pic32mx764f128h.pp 2.5 MB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012401340144015401640174018401940204021402240234024402540264027402840294030403140324033403440354036403740384039404040414042404340444045404640474048404940504051405240534054405540564057405840594060406140624063406440654066406740684069407040714072407340744075407640774078407940804081408240834084408540864087408840894090409140924093409440954096409740984099410041014102410341044105410641074108410941104111411241134114411541164117411841194120412141224123412441254126412741284129413041314132413341344135413641374138413941404141414241434144414541464147414841494150415141524153415441554156415741584159416041614162416341644165416641674168416941704171417241734174417541764177417841794180418141824183418441854186418741884189419041914192419341944195419641974198419942004201420242034204420542064207420842094210421142124213421442154216421742184219422042214222422342244225422642274228422942304231423242334234423542364237423842394240424142424243424442454246424742484249425042514252425342544255425642574258425942604261426242634264426542664267426842694270427142724273427442754276427742784279428042814282428342844285428642874288428942904291429242934294429542964297429842994300430143024303430443054306430743084309431043114312431343144315431643174318431943204321432243234324432543264327432843294330433143324333433443354336433743384339434043414342434343444345434643474348434943504351435243534354435543564357435843594360436143624363436443654366436743684369437043714372437343744375437643774378437943804381438243834384438543864387438843894390439143924393439443954396439743984399440044014402440344044405440644074408440944104411441244134414441544164417441844194420442144224423442444254426442744284429443044314432443344344435443644374438443944404441444244434444444544464447444844494450445144524453445444554456445744584459446044614462446344644465446644674468446944704471447244734474447544764477447844794480448144824483448444854486448744884489449044914492449344944495449644974498449945004501450245034504450545064507450845094510451145124513451445154516451745184519452045214522452345244525452645274528452945304531453245334534453545364537453845394540454145424543454445454546454745484549455045514552455345544555455645574558455945604561456245634564456545664567456845694570457145724573457445754576457745784579458045814582458345844585458645874588458945904591459245934594459545964597459845994600460146024603460446054606460746084609461046114612461346144615461646174618461946204621462246234624462546264627462846294630463146324633463446354636463746384639464046414642464346444645464646474648464946504651465246534654465546564657465846594660466146624663466446654666466746684669467046714672467346744675467646774678467946804681468246834684468546864687468846894690469146924693469446954696469746984699470047014702470347044705470647074708470947104711471247134714471547164717471847194720472147224723472447254726472747284729473047314732473347344735473647374738473947404741474247434744474547464747474847494750475147524753475447554756475747584759476047614762476347644765476647674768476947704771477247734774477547764777477847794780478147824783478447854786478747884789479047914792479347944795479647974798479948004801480248034804480548064807480848094810481148124813481448154816481748184819482048214822482348244825482648274828482948304831483248334834483548364837483848394840484148424843484448454846484748484849485048514852485348544855485648574858485948604861486248634864486548664867486848694870487148724873487448754876487748784879488048814882488348844885488648874888488948904891489248934894489548964897489848994900490149024903490449054906490749084909491049114912491349144915491649174918491949204921492249234924492549264927492849294930493149324933493449354936493749384939494049414942494349444945494649474948494949504951495249534954495549564957495849594960496149624963496449654966496749684969497049714972497349744975497649774978497949804981498249834984498549864987498849894990499149924993499449954996499749984999500050015002500350045005500650075008500950105011501250135014501550165017501850195020502150225023502450255026502750285029503050315032503350345035503650375038503950405041504250435044504550465047504850495050505150525053505450555056505750585059506050615062506350645065506650675068506950705071507250735074507550765077507850795080508150825083508450855086508750885089509050915092509350945095509650975098509951005101510251035104510551065107510851095110511151125113511451155116511751185119512051215122512351245125512651275128512951305131513251335134513551365137513851395140514151425143514451455146514751485149515051515152515351545155515651575158515951605161516251635164516551665167516851695170517151725173517451755176517751785179518051815182518351845185518651875188518951905191519251935194519551965197519851995200520152025203520452055206520752085209521052115212521352145215521652175218521952205221522252235224522552265227522852295230523152325233523452355236523752385239524052415242524352445245524652475248524952505251525252535254525552565257525852595260526152625263526452655266526752685269527052715272527352745275527652775278527952805281528252835284528552865287528852895290529152925293529452955296529752985299530053015302530353045305530653075308530953105311531253135314531553165317531853195320532153225323532453255326532753285329533053315332533353345335533653375338533953405341534253435344534553465347534853495350535153525353535453555356535753585359536053615362536353645365536653675368536953705371537253735374537553765377537853795380538153825383538453855386538753885389539053915392539353945395539653975398539954005401540254035404540554065407540854095410541154125413541454155416541754185419542054215422542354245425542654275428542954305431543254335434543554365437543854395440544154425443544454455446544754485449545054515452545354545455545654575458545954605461546254635464546554665467546854695470547154725473547454755476547754785479548054815482548354845485548654875488548954905491549254935494549554965497549854995500550155025503550455055506550755085509551055115512551355145515551655175518551955205521552255235524552555265527552855295530553155325533553455355536553755385539554055415542554355445545554655475548554955505551555255535554555555565557555855595560556155625563556455655566556755685569557055715572557355745575557655775578557955805581558255835584558555865587558855895590559155925593559455955596559755985599560056015602560356045605560656075608560956105611561256135614561556165617561856195620562156225623562456255626562756285629563056315632563356345635563656375638563956405641564256435644564556465647564856495650565156525653565456555656565756585659566056615662566356645665566656675668566956705671567256735674567556765677567856795680568156825683568456855686568756885689569056915692569356945695569656975698569957005701570257035704570557065707570857095710571157125713571457155716571757185719572057215722572357245725572657275728572957305731573257335734573557365737573857395740574157425743574457455746574757485749575057515752575357545755575657575758575957605761576257635764576557665767576857695770577157725773577457755776577757785779578057815782578357845785578657875788578957905791579257935794579557965797579857995800580158025803580458055806580758085809581058115812581358145815581658175818581958205821582258235824582558265827582858295830583158325833583458355836583758385839584058415842584358445845584658475848584958505851585258535854585558565857585858595860586158625863586458655866586758685869587058715872587358745875587658775878587958805881588258835884588558865887588858895890589158925893589458955896589758985899590059015902590359045905590659075908590959105911591259135914591559165917591859195920592159225923592459255926592759285929593059315932593359345935593659375938593959405941594259435944594559465947594859495950595159525953595459555956595759585959596059615962596359645965596659675968596959705971597259735974597559765977597859795980598159825983598459855986598759885989599059915992599359945995599659975998599960006001600260036004600560066007600860096010601160126013601460156016601760186019602060216022602360246025602660276028602960306031603260336034603560366037603860396040604160426043604460456046604760486049605060516052605360546055605660576058605960606061606260636064606560666067606860696070607160726073607460756076607760786079608060816082608360846085608660876088608960906091609260936094609560966097609860996100610161026103610461056106610761086109611061116112611361146115611661176118611961206121612261236124612561266127612861296130613161326133613461356136613761386139614061416142614361446145614661476148614961506151615261536154615561566157615861596160616161626163616461656166616761686169617061716172617361746175617661776178617961806181618261836184618561866187618861896190619161926193619461956196619761986199620062016202620362046205620662076208620962106211621262136214621562166217621862196220622162226223622462256226622762286229623062316232623362346235623662376238623962406241624262436244624562466247624862496250625162526253625462556256625762586259626062616262626362646265626662676268626962706271627262736274627562766277627862796280628162826283628462856286628762886289629062916292629362946295629662976298629963006301630263036304630563066307630863096310631163126313631463156316631763186319632063216322632363246325632663276328632963306331633263336334633563366337633863396340634163426343634463456346634763486349635063516352635363546355635663576358635963606361636263636364636563666367636863696370637163726373637463756376637763786379638063816382638363846385638663876388638963906391639263936394639563966397639863996400640164026403640464056406640764086409641064116412641364146415641664176418641964206421642264236424642564266427642864296430643164326433643464356436643764386439644064416442644364446445644664476448644964506451645264536454645564566457645864596460646164626463646464656466646764686469647064716472647364746475647664776478647964806481648264836484648564866487648864896490649164926493649464956496649764986499650065016502650365046505650665076508650965106511651265136514651565166517651865196520652165226523652465256526652765286529653065316532653365346535653665376538653965406541654265436544654565466547654865496550655165526553655465556556655765586559656065616562656365646565656665676568656965706571657265736574657565766577657865796580658165826583658465856586658765886589659065916592659365946595659665976598659966006601660266036604660566066607660866096610661166126613661466156616661766186619662066216622662366246625662666276628662966306631663266336634663566366637663866396640664166426643664466456646664766486649665066516652665366546655665666576658665966606661666266636664666566666667666866696670667166726673667466756676667766786679668066816682668366846685668666876688668966906691669266936694669566966697669866996700670167026703670467056706670767086709671067116712671367146715671667176718671967206721672267236724672567266727672867296730673167326733673467356736673767386739674067416742674367446745674667476748674967506751675267536754675567566757675867596760676167626763676467656766676767686769677067716772677367746775677667776778677967806781678267836784678567866787678867896790679167926793679467956796679767986799680068016802680368046805680668076808680968106811681268136814681568166817681868196820682168226823682468256826682768286829683068316832683368346835683668376838683968406841684268436844684568466847684868496850685168526853685468556856685768586859686068616862686368646865686668676868686968706871687268736874687568766877687868796880688168826883688468856886688768886889689068916892689368946895689668976898689969006901690269036904690569066907690869096910691169126913691469156916691769186919692069216922692369246925692669276928692969306931693269336934693569366937693869396940694169426943694469456946694769486949695069516952695369546955695669576958695969606961696269636964696569666967696869696970697169726973697469756976697769786979698069816982698369846985698669876988698969906991699269936994699569966997699869997000700170027003700470057006700770087009701070117012701370147015701670177018701970207021702270237024702570267027702870297030703170327033703470357036703770387039704070417042704370447045704670477048704970507051705270537054705570567057705870597060706170627063706470657066706770687069707070717072707370747075707670777078707970807081708270837084708570867087708870897090709170927093709470957096709770987099710071017102710371047105710671077108710971107111711271137114711571167117711871197120712171227123712471257126712771287129713071317132713371347135713671377138713971407141714271437144714571467147714871497150715171527153715471557156715771587159716071617162716371647165716671677168716971707171717271737174717571767177717871797180718171827183718471857186718771887189719071917192719371947195719671977198719972007201720272037204720572067207720872097210721172127213721472157216721772187219722072217222722372247225722672277228722972307231723272337234723572367237723872397240724172427243724472457246724772487249725072517252725372547255725672577258725972607261726272637264726572667267726872697270727172727273727472757276727772787279728072817282728372847285728672877288728972907291729272937294729572967297729872997300730173027303730473057306730773087309731073117312731373147315731673177318731973207321732273237324732573267327732873297330733173327333733473357336733773387339734073417342734373447345734673477348734973507351735273537354735573567357735873597360736173627363736473657366736773687369737073717372737373747375737673777378737973807381738273837384738573867387738873897390739173927393739473957396739773987399740074017402740374047405740674077408740974107411741274137414741574167417741874197420742174227423742474257426742774287429743074317432743374347435743674377438743974407441744274437444744574467447744874497450745174527453745474557456745774587459746074617462746374647465746674677468746974707471747274737474747574767477747874797480748174827483748474857486748774887489749074917492749374947495749674977498749975007501750275037504750575067507750875097510751175127513751475157516751775187519752075217522752375247525752675277528752975307531753275337534753575367537753875397540754175427543754475457546754775487549755075517552755375547555755675577558755975607561756275637564756575667567756875697570757175727573757475757576757775787579758075817582758375847585758675877588758975907591759275937594759575967597759875997600760176027603760476057606760776087609761076117612761376147615761676177618761976207621762276237624762576267627762876297630763176327633763476357636763776387639764076417642764376447645764676477648764976507651765276537654765576567657765876597660766176627663766476657666766776687669767076717672767376747675767676777678767976807681768276837684768576867687768876897690769176927693769476957696769776987699770077017702770377047705770677077708770977107711771277137714771577167717771877197720772177227723772477257726772777287729773077317732773377347735773677377738773977407741774277437744774577467747774877497750775177527753775477557756775777587759776077617762776377647765776677677768776977707771777277737774777577767777777877797780778177827783778477857786778777887789779077917792779377947795779677977798779978007801780278037804780578067807780878097810781178127813781478157816781778187819782078217822782378247825782678277828782978307831783278337834783578367837783878397840784178427843784478457846784778487849785078517852785378547855785678577858785978607861786278637864786578667867786878697870787178727873787478757876787778787879788078817882788378847885788678877888788978907891789278937894789578967897789878997900790179027903790479057906790779087909791079117912791379147915791679177918791979207921792279237924792579267927792879297930793179327933793479357936793779387939794079417942794379447945794679477948794979507951795279537954795579567957795879597960796179627963796479657966796779687969797079717972797379747975797679777978797979807981798279837984798579867987798879897990799179927993799479957996799779987999800080018002800380048005800680078008800980108011801280138014801580168017801880198020802180228023802480258026802780288029803080318032803380348035803680378038803980408041804280438044804580468047804880498050805180528053805480558056805780588059806080618062806380648065806680678068806980708071807280738074807580768077807880798080808180828083808480858086808780888089809080918092809380948095809680978098809981008101810281038104810581068107810881098110811181128113811481158116811781188119812081218122812381248125812681278128812981308131813281338134813581368137813881398140814181428143814481458146814781488149815081518152815381548155815681578158815981608161816281638164816581668167816881698170817181728173817481758176817781788179818081818182818381848185818681878188818981908191819281938194819581968197819881998200820182028203820482058206820782088209821082118212821382148215821682178218821982208221822282238224822582268227822882298230823182328233823482358236823782388239824082418242824382448245824682478248824982508251825282538254825582568257825882598260826182628263826482658266826782688269827082718272827382748275827682778278827982808281828282838284828582868287828882898290829182928293829482958296829782988299830083018302830383048305830683078308830983108311831283138314831583168317831883198320832183228323832483258326832783288329833083318332833383348335833683378338833983408341834283438344834583468347834883498350835183528353835483558356835783588359836083618362836383648365836683678368836983708371837283738374837583768377837883798380838183828383838483858386838783888389839083918392839383948395839683978398839984008401840284038404840584068407840884098410841184128413841484158416841784188419842084218422842384248425842684278428842984308431843284338434843584368437843884398440844184428443844484458446844784488449845084518452845384548455845684578458845984608461846284638464846584668467846884698470847184728473847484758476847784788479848084818482848384848485848684878488848984908491849284938494849584968497849884998500850185028503850485058506850785088509851085118512851385148515851685178518851985208521852285238524852585268527852885298530853185328533853485358536853785388539854085418542854385448545854685478548854985508551855285538554855585568557855885598560856185628563856485658566856785688569857085718572857385748575857685778578857985808581858285838584858585868587858885898590859185928593859485958596859785988599860086018602860386048605860686078608860986108611861286138614861586168617861886198620862186228623862486258626862786288629863086318632863386348635863686378638863986408641864286438644864586468647864886498650865186528653865486558656865786588659866086618662866386648665866686678668866986708671867286738674867586768677867886798680868186828683868486858686868786888689869086918692869386948695869686978698869987008701870287038704870587068707870887098710871187128713871487158716871787188719872087218722872387248725872687278728872987308731873287338734873587368737873887398740874187428743874487458746874787488749875087518752875387548755875687578758875987608761876287638764876587668767876887698770877187728773877487758776877787788779878087818782878387848785878687878788878987908791879287938794879587968797879887998800880188028803880488058806880788088809881088118812881388148815881688178818881988208821882288238824882588268827882888298830883188328833883488358836883788388839884088418842884388448845884688478848884988508851885288538854885588568857885888598860886188628863886488658866886788688869887088718872887388748875887688778878887988808881888288838884888588868887888888898890889188928893889488958896889788988899890089018902890389048905890689078908890989108911891289138914891589168917891889198920892189228923892489258926892789288929893089318932893389348935893689378938893989408941894289438944894589468947894889498950895189528953895489558956895789588959896089618962896389648965896689678968896989708971897289738974897589768977897889798980898189828983898489858986898789888989899089918992899389948995899689978998899990009001900290039004900590069007900890099010901190129013901490159016901790189019902090219022902390249025902690279028902990309031903290339034903590369037903890399040904190429043904490459046904790489049905090519052905390549055905690579058905990609061906290639064906590669067906890699070907190729073907490759076907790789079908090819082908390849085908690879088908990909091909290939094909590969097909890999100910191029103910491059106910791089109911091119112911391149115911691179118911991209121912291239124912591269127912891299130913191329133913491359136913791389139914091419142914391449145914691479148914991509151915291539154915591569157915891599160916191629163916491659166916791689169917091719172917391749175917691779178917991809181918291839184918591869187918891899190919191929193919491959196919791989199920092019202920392049205920692079208920992109211921292139214921592169217921892199220922192229223922492259226922792289229923092319232923392349235923692379238923992409241924292439244924592469247924892499250925192529253925492559256925792589259926092619262926392649265926692679268926992709271927292739274927592769277927892799280928192829283928492859286928792889289929092919292929392949295929692979298929993009301930293039304930593069307930893099310931193129313931493159316931793189319932093219322932393249325932693279328932993309331933293339334933593369337933893399340934193429343934493459346934793489349935093519352935393549355935693579358935993609361936293639364936593669367936893699370937193729373937493759376937793789379938093819382938393849385938693879388938993909391939293939394939593969397939893999400940194029403940494059406940794089409941094119412941394149415941694179418941994209421942294239424942594269427942894299430943194329433943494359436943794389439944094419442944394449445944694479448944994509451945294539454945594569457945894599460946194629463946494659466946794689469947094719472947394749475947694779478947994809481948294839484948594869487948894899490949194929493949494959496949794989499950095019502950395049505950695079508950995109511951295139514951595169517951895199520952195229523952495259526952795289529953095319532953395349535953695379538953995409541954295439544954595469547954895499550955195529553955495559556955795589559956095619562956395649565956695679568956995709571957295739574957595769577957895799580958195829583958495859586958795889589959095919592959395949595959695979598959996009601960296039604960596069607960896099610961196129613961496159616961796189619962096219622962396249625962696279628962996309631963296339634963596369637963896399640964196429643964496459646964796489649965096519652965396549655965696579658965996609661966296639664966596669667966896699670967196729673967496759676967796789679968096819682968396849685968696879688968996909691969296939694969596969697969896999700970197029703970497059706970797089709971097119712971397149715971697179718971997209721972297239724972597269727972897299730973197329733973497359736973797389739974097419742974397449745974697479748974997509751975297539754975597569757975897599760976197629763976497659766976797689769977097719772977397749775977697779778977997809781978297839784978597869787978897899790979197929793979497959796979797989799980098019802980398049805980698079808980998109811981298139814981598169817981898199820982198229823982498259826982798289829983098319832983398349835983698379838983998409841984298439844984598469847984898499850985198529853985498559856985798589859986098619862986398649865986698679868986998709871987298739874987598769877987898799880988198829883988498859886988798889889989098919892989398949895989698979898989999009901990299039904990599069907990899099910991199129913991499159916991799189919992099219922992399249925992699279928992999309931993299339934993599369937993899399940994199429943994499459946994799489949995099519952995399549955995699579958995999609961996299639964996599669967996899699970997199729973997499759976997799789979998099819982998399849985998699879988998999909991999299939994999599969997999899991000010001100021000310004100051000610007100081000910010100111001210013100141001510016100171001810019100201002110022100231002410025100261002710028100291003010031100321003310034100351003610037100381003910040100411004210043100441004510046100471004810049100501005110052100531005410055100561005710058100591006010061100621006310064100651006610067100681006910070100711007210073100741007510076100771007810079100801008110082100831008410085100861008710088100891009010091100921009310094100951009610097100981009910100101011010210103101041010510106101071010810109101101011110112101131011410115101161011710118101191012010121101221012310124101251012610127101281012910130101311013210133101341013510136101371013810139101401014110142101431014410145101461014710148101491015010151101521015310154101551015610157101581015910160101611016210163101641016510166101671016810169101701017110172101731017410175101761017710178101791018010181101821018310184101851018610187101881018910190101911019210193101941019510196101971019810199102001020110202102031020410205102061020710208102091021010211102121021310214102151021610217102181021910220102211022210223102241022510226102271022810229102301023110232102331023410235102361023710238102391024010241102421024310244102451024610247102481024910250102511025210253102541025510256102571025810259102601026110262102631026410265102661026710268102691027010271102721027310274102751027610277102781027910280102811028210283102841028510286102871028810289102901029110292102931029410295102961029710298102991030010301103021030310304103051030610307103081030910310103111031210313103141031510316103171031810319103201032110322103231032410325103261032710328103291033010331103321033310334103351033610337103381033910340103411034210343103441034510346103471034810349103501035110352103531035410355103561035710358103591036010361103621036310364103651036610367103681036910370103711037210373103741037510376103771037810379103801038110382103831038410385103861038710388103891039010391103921039310394103951039610397103981039910400104011040210403104041040510406104071040810409104101041110412104131041410415104161041710418104191042010421104221042310424104251042610427104281042910430104311043210433104341043510436104371043810439104401044110442104431044410445104461044710448104491045010451104521045310454104551045610457104581045910460104611046210463104641046510466104671046810469104701047110472104731047410475104761047710478104791048010481104821048310484104851048610487104881048910490104911049210493104941049510496104971049810499105001050110502105031050410505105061050710508105091051010511105121051310514105151051610517105181051910520105211052210523105241052510526105271052810529105301053110532105331053410535105361053710538105391054010541105421054310544105451054610547105481054910550105511055210553105541055510556105571055810559105601056110562105631056410565105661056710568105691057010571105721057310574105751057610577105781057910580105811058210583105841058510586105871058810589105901059110592105931059410595105961059710598105991060010601106021060310604106051060610607106081060910610106111061210613106141061510616106171061810619106201062110622106231062410625106261062710628106291063010631106321063310634106351063610637106381063910640106411064210643106441064510646106471064810649106501065110652106531065410655106561065710658106591066010661106621066310664106651066610667106681066910670106711067210673106741067510676106771067810679106801068110682106831068410685106861068710688106891069010691106921069310694106951069610697106981069910700107011070210703107041070510706107071070810709107101071110712107131071410715107161071710718107191072010721107221072310724107251072610727107281072910730107311073210733107341073510736107371073810739107401074110742107431074410745107461074710748107491075010751107521075310754107551075610757107581075910760107611076210763107641076510766107671076810769107701077110772107731077410775107761077710778107791078010781107821078310784107851078610787107881078910790107911079210793107941079510796107971079810799108001080110802108031080410805108061080710808108091081010811108121081310814108151081610817108181081910820108211082210823108241082510826108271082810829108301083110832108331083410835108361083710838108391084010841108421084310844108451084610847108481084910850108511085210853108541085510856108571085810859108601086110862108631086410865108661086710868108691087010871108721087310874108751087610877108781087910880108811088210883108841088510886108871088810889108901089110892108931089410895108961089710898108991090010901109021090310904109051090610907109081090910910109111091210913109141091510916109171091810919109201092110922109231092410925109261092710928109291093010931109321093310934109351093610937109381093910940109411094210943109441094510946109471094810949109501095110952109531095410955109561095710958109591096010961109621096310964109651096610967109681096910970109711097210973109741097510976109771097810979109801098110982109831098410985109861098710988109891099010991109921099310994109951099610997109981099911000110011100211003110041100511006110071100811009110101101111012110131101411015110161101711018110191102011021110221102311024110251102611027110281102911030110311103211033110341103511036110371103811039110401104111042110431104411045110461104711048110491105011051110521105311054110551105611057110581105911060110611106211063110641106511066110671106811069110701107111072110731107411075110761107711078110791108011081110821108311084110851108611087110881108911090110911109211093110941109511096110971109811099111001110111102111031110411105111061110711108111091111011111111121111311114111151111611117111181111911120111211112211123111241112511126111271112811129111301113111132111331113411135111361113711138111391114011141111421114311144111451114611147111481114911150111511115211153111541115511156111571115811159111601116111162111631116411165111661116711168111691117011171111721117311174111751117611177111781117911180111811118211183111841118511186111871118811189111901119111192111931119411195111961119711198111991120011201112021120311204112051120611207112081120911210112111121211213112141121511216112171121811219112201122111222112231122411225112261122711228112291123011231112321123311234112351123611237112381123911240112411124211243112441124511246112471124811249112501125111252112531125411255112561125711258112591126011261112621126311264112651126611267112681126911270112711127211273112741127511276112771127811279112801128111282112831128411285112861128711288112891129011291112921129311294112951129611297112981129911300113011130211303113041130511306113071130811309113101131111312113131131411315113161131711318113191132011321113221132311324113251132611327113281132911330113311133211333113341133511336113371133811339113401134111342113431134411345113461134711348113491135011351113521135311354113551135611357113581135911360113611136211363113641136511366113671136811369113701137111372113731137411375113761137711378113791138011381113821138311384113851138611387113881138911390113911139211393113941139511396113971139811399114001140111402114031140411405114061140711408114091141011411114121141311414114151141611417114181141911420114211142211423114241142511426114271142811429114301143111432114331143411435114361143711438114391144011441114421144311444114451144611447114481144911450114511145211453114541145511456114571145811459114601146111462114631146411465114661146711468114691147011471114721147311474114751147611477114781147911480114811148211483114841148511486114871148811489114901149111492114931149411495114961149711498114991150011501115021150311504115051150611507115081150911510115111151211513115141151511516115171151811519115201152111522115231152411525115261152711528115291153011531115321153311534115351153611537115381153911540115411154211543115441154511546115471154811549115501155111552115531155411555115561155711558115591156011561115621156311564115651156611567115681156911570115711157211573115741157511576115771157811579115801158111582115831158411585115861158711588115891159011591115921159311594115951159611597115981159911600116011160211603116041160511606116071160811609116101161111612116131161411615116161161711618116191162011621116221162311624116251162611627116281162911630116311163211633116341163511636116371163811639116401164111642116431164411645116461164711648116491165011651116521165311654116551165611657116581165911660116611166211663116641166511666116671166811669116701167111672116731167411675116761167711678116791168011681116821168311684116851168611687116881168911690116911169211693116941169511696116971169811699117001170111702117031170411705117061170711708117091171011711117121171311714117151171611717117181171911720117211172211723117241172511726117271172811729117301173111732117331173411735117361173711738117391174011741117421174311744117451174611747117481174911750117511175211753117541175511756117571175811759117601176111762117631176411765117661176711768117691177011771117721177311774117751177611777117781177911780117811178211783117841178511786117871178811789117901179111792117931179411795117961179711798117991180011801118021180311804118051180611807118081180911810118111181211813118141181511816118171181811819118201182111822118231182411825118261182711828118291183011831118321183311834118351183611837118381183911840118411184211843118441184511846118471184811849118501185111852118531185411855118561185711858118591186011861118621186311864118651186611867118681186911870118711187211873118741187511876118771187811879118801188111882118831188411885118861188711888118891189011891118921189311894118951189611897118981189911900119011190211903119041190511906119071190811909119101191111912119131191411915119161191711918119191192011921119221192311924119251192611927119281192911930119311193211933119341193511936119371193811939119401194111942119431194411945119461194711948119491195011951119521195311954119551195611957119581195911960119611196211963119641196511966119671196811969119701197111972119731197411975119761197711978119791198011981119821198311984119851198611987119881198911990119911199211993119941199511996119971199811999120001200112002120031200412005120061200712008120091201012011120121201312014120151201612017120181201912020120211202212023120241202512026120271202812029120301203112032120331203412035120361203712038120391204012041120421204312044120451204612047120481204912050120511205212053120541205512056120571205812059120601206112062120631206412065120661206712068120691207012071120721207312074120751207612077120781207912080120811208212083120841208512086120871208812089120901209112092120931209412095120961209712098120991210012101121021210312104121051210612107121081210912110121111211212113121141211512116121171211812119121201212112122121231212412125121261212712128121291213012131121321213312134121351213612137121381213912140121411214212143121441214512146121471214812149121501215112152121531215412155121561215712158121591216012161121621216312164121651216612167121681216912170121711217212173121741217512176121771217812179121801218112182121831218412185121861218712188121891219012191121921219312194121951219612197121981219912200122011220212203122041220512206122071220812209122101221112212122131221412215122161221712218122191222012221122221222312224122251222612227122281222912230122311223212233122341223512236122371223812239122401224112242122431224412245122461224712248122491225012251122521225312254122551225612257122581225912260122611226212263122641226512266122671226812269122701227112272122731227412275122761227712278122791228012281122821228312284122851228612287122881228912290122911229212293122941229512296122971229812299123001230112302123031230412305123061230712308123091231012311123121231312314123151231612317123181231912320123211232212323123241232512326123271232812329123301233112332123331233412335123361233712338123391234012341123421234312344123451234612347123481234912350123511235212353123541235512356123571235812359123601236112362123631236412365123661236712368123691237012371123721237312374123751237612377123781237912380123811238212383123841238512386123871238812389123901239112392123931239412395123961239712398123991240012401124021240312404124051240612407124081240912410124111241212413124141241512416124171241812419124201242112422124231242412425124261242712428124291243012431124321243312434124351243612437124381243912440124411244212443124441244512446124471244812449124501245112452124531245412455124561245712458124591246012461124621246312464124651246612467124681246912470124711247212473124741247512476124771247812479124801248112482124831248412485124861248712488124891249012491124921249312494124951249612497124981249912500125011250212503125041250512506125071250812509125101251112512125131251412515125161251712518125191252012521125221252312524125251252612527125281252912530125311253212533125341253512536125371253812539125401254112542125431254412545125461254712548125491255012551125521255312554125551255612557125581255912560125611256212563125641256512566125671256812569125701257112572125731257412575125761257712578125791258012581125821258312584125851258612587125881258912590125911259212593125941259512596125971259812599126001260112602126031260412605126061260712608126091261012611126121261312614126151261612617126181261912620126211262212623126241262512626126271262812629126301263112632126331263412635126361263712638126391264012641126421264312644126451264612647126481264912650126511265212653126541265512656126571265812659126601266112662126631266412665126661266712668126691267012671126721267312674126751267612677126781267912680126811268212683126841268512686126871268812689126901269112692126931269412695126961269712698126991270012701127021270312704127051270612707127081270912710127111271212713127141271512716127171271812719127201272112722127231272412725127261272712728127291273012731127321273312734127351273612737127381273912740127411274212743127441274512746127471274812749127501275112752127531275412755127561275712758127591276012761127621276312764127651276612767127681276912770127711277212773127741277512776127771277812779127801278112782127831278412785127861278712788127891279012791127921279312794127951279612797127981279912800128011280212803128041280512806128071280812809128101281112812128131281412815128161281712818128191282012821128221282312824128251282612827128281282912830128311283212833128341283512836128371283812839128401284112842128431284412845128461284712848128491285012851128521285312854128551285612857128581285912860128611286212863128641286512866128671286812869128701287112872128731287412875128761287712878128791288012881128821288312884128851288612887128881288912890128911289212893128941289512896128971289812899129001290112902129031290412905129061290712908129091291012911129121291312914129151291612917129181291912920129211292212923129241292512926129271292812929129301293112932129331293412935129361293712938129391294012941129421294312944129451294612947129481294912950129511295212953129541295512956129571295812959129601296112962129631296412965129661296712968129691297012971129721297312974129751297612977129781297912980129811298212983129841298512986129871298812989129901299112992129931299412995129961299712998129991300013001130021300313004130051300613007130081300913010130111301213013130141301513016130171301813019130201302113022130231302413025130261302713028130291303013031130321303313034130351303613037130381303913040130411304213043130441304513046130471304813049130501305113052130531305413055130561305713058130591306013061130621306313064130651306613067130681306913070130711307213073130741307513076130771307813079130801308113082130831308413085130861308713088130891309013091130921309313094130951309613097130981309913100131011310213103131041310513106131071310813109131101311113112131131311413115131161311713118131191312013121131221312313124131251312613127131281312913130131311313213133131341313513136131371313813139131401314113142131431314413145131461314713148131491315013151131521315313154131551315613157131581315913160131611316213163131641316513166131671316813169131701317113172131731317413175131761317713178131791318013181131821318313184131851318613187131881318913190131911319213193131941319513196131971319813199132001320113202132031320413205132061320713208132091321013211132121321313214132151321613217132181321913220132211322213223132241322513226132271322813229132301323113232132331323413235132361323713238132391324013241132421324313244132451324613247132481324913250132511325213253132541325513256132571325813259132601326113262132631326413265132661326713268132691327013271132721327313274132751327613277132781327913280132811328213283132841328513286132871328813289132901329113292132931329413295132961329713298132991330013301133021330313304133051330613307133081330913310133111331213313133141331513316133171331813319133201332113322133231332413325133261332713328133291333013331133321333313334133351333613337133381333913340133411334213343133441334513346133471334813349133501335113352133531335413355133561335713358133591336013361133621336313364133651336613367133681336913370133711337213373133741337513376133771337813379133801338113382133831338413385133861338713388133891339013391133921339313394133951339613397133981339913400134011340213403134041340513406134071340813409134101341113412134131341413415134161341713418134191342013421134221342313424134251342613427134281342913430134311343213433134341343513436134371343813439134401344113442134431344413445134461344713448134491345013451134521345313454134551345613457134581345913460134611346213463134641346513466134671346813469134701347113472134731347413475134761347713478134791348013481134821348313484134851348613487134881348913490134911349213493134941349513496134971349813499135001350113502135031350413505135061350713508135091351013511135121351313514135151351613517135181351913520135211352213523135241352513526135271352813529135301353113532135331353413535135361353713538135391354013541135421354313544135451354613547135481354913550135511355213553135541355513556135571355813559135601356113562135631356413565135661356713568135691357013571135721357313574135751357613577135781357913580135811358213583135841358513586135871358813589135901359113592135931359413595135961359713598135991360013601136021360313604136051360613607136081360913610136111361213613136141361513616136171361813619136201362113622136231362413625136261362713628136291363013631136321363313634136351363613637136381363913640136411364213643136441364513646136471364813649136501365113652136531365413655136561365713658136591366013661136621366313664136651366613667136681366913670136711367213673136741367513676136771367813679136801368113682136831368413685136861368713688136891369013691136921369313694136951369613697136981369913700137011370213703137041370513706137071370813709137101371113712137131371413715137161371713718137191372013721137221372313724137251372613727137281372913730137311373213733137341373513736137371373813739137401374113742137431374413745137461374713748137491375013751137521375313754137551375613757137581375913760137611376213763137641376513766137671376813769137701377113772137731377413775137761377713778137791378013781137821378313784137851378613787137881378913790137911379213793137941379513796137971379813799138001380113802138031380413805138061380713808138091381013811138121381313814138151381613817138181381913820138211382213823138241382513826138271382813829138301383113832138331383413835138361383713838138391384013841138421384313844138451384613847138481384913850138511385213853138541385513856138571385813859138601386113862138631386413865138661386713868138691387013871138721387313874138751387613877138781387913880138811388213883138841388513886138871388813889138901389113892138931389413895138961389713898138991390013901139021390313904139051390613907139081390913910139111391213913139141391513916139171391813919139201392113922139231392413925139261392713928139291393013931139321393313934139351393613937139381393913940139411394213943139441394513946139471394813949139501395113952139531395413955139561395713958139591396013961139621396313964139651396613967139681396913970139711397213973139741397513976139771397813979139801398113982139831398413985139861398713988139891399013991139921399313994139951399613997139981399914000140011400214003140041400514006140071400814009140101401114012140131401414015140161401714018140191402014021140221402314024140251402614027140281402914030140311403214033140341403514036140371403814039140401404114042140431404414045140461404714048140491405014051140521405314054140551405614057140581405914060140611406214063140641406514066140671406814069140701407114072140731407414075140761407714078140791408014081140821408314084140851408614087140881408914090140911409214093140941409514096140971409814099141001410114102141031410414105141061410714108141091411014111141121411314114141151411614117141181411914120141211412214123141241412514126141271412814129141301413114132141331413414135141361413714138141391414014141141421414314144141451414614147141481414914150141511415214153141541415514156141571415814159141601416114162141631416414165141661416714168141691417014171141721417314174141751417614177141781417914180141811418214183141841418514186141871418814189141901419114192141931419414195141961419714198141991420014201142021420314204142051420614207142081420914210142111421214213142141421514216142171421814219142201422114222142231422414225142261422714228142291423014231142321423314234142351423614237142381423914240142411424214243142441424514246142471424814249142501425114252142531425414255142561425714258142591426014261142621426314264142651426614267142681426914270142711427214273142741427514276142771427814279142801428114282142831428414285142861428714288142891429014291142921429314294142951429614297142981429914300143011430214303143041430514306143071430814309143101431114312143131431414315143161431714318143191432014321143221432314324143251432614327143281432914330143311433214333143341433514336143371433814339143401434114342143431434414345143461434714348143491435014351143521435314354143551435614357143581435914360143611436214363143641436514366143671436814369143701437114372143731437414375143761437714378143791438014381143821438314384143851438614387143881438914390143911439214393143941439514396143971439814399144001440114402144031440414405144061440714408144091441014411144121441314414144151441614417144181441914420144211442214423144241442514426144271442814429144301443114432144331443414435144361443714438144391444014441144421444314444144451444614447144481444914450144511445214453144541445514456144571445814459144601446114462144631446414465144661446714468144691447014471144721447314474144751447614477144781447914480144811448214483144841448514486144871448814489144901449114492144931449414495144961449714498144991450014501145021450314504145051450614507145081450914510145111451214513145141451514516145171451814519145201452114522145231452414525145261452714528145291453014531145321453314534145351453614537145381453914540145411454214543145441454514546145471454814549145501455114552145531455414555145561455714558145591456014561145621456314564145651456614567145681456914570145711457214573145741457514576145771457814579145801458114582145831458414585145861458714588145891459014591145921459314594145951459614597145981459914600146011460214603146041460514606146071460814609146101461114612146131461414615146161461714618146191462014621146221462314624146251462614627146281462914630146311463214633146341463514636146371463814639146401464114642146431464414645146461464714648146491465014651146521465314654146551465614657146581465914660146611466214663146641466514666146671466814669146701467114672146731467414675146761467714678146791468014681146821468314684146851468614687146881468914690146911469214693146941469514696146971469814699147001470114702147031470414705147061470714708147091471014711147121471314714147151471614717147181471914720147211472214723147241472514726147271472814729147301473114732147331473414735147361473714738147391474014741147421474314744147451474614747147481474914750147511475214753147541475514756147571475814759147601476114762147631476414765147661476714768147691477014771147721477314774147751477614777147781477914780147811478214783147841478514786147871478814789147901479114792147931479414795147961479714798147991480014801148021480314804148051480614807148081480914810148111481214813148141481514816148171481814819148201482114822148231482414825148261482714828148291483014831148321483314834148351483614837148381483914840148411484214843148441484514846148471484814849148501485114852148531485414855148561485714858148591486014861148621486314864148651486614867148681486914870148711487214873148741487514876148771487814879148801488114882148831488414885148861488714888148891489014891148921489314894148951489614897148981489914900149011490214903149041490514906149071490814909149101491114912149131491414915149161491714918149191492014921149221492314924149251492614927149281492914930149311493214933149341493514936149371493814939149401494114942149431494414945149461494714948149491495014951149521495314954149551495614957149581495914960149611496214963149641496514966149671496814969149701497114972149731497414975149761497714978149791498014981149821498314984149851498614987149881498914990149911499214993149941499514996149971499814999150001500115002150031500415005150061500715008150091501015011150121501315014150151501615017150181501915020150211502215023150241502515026150271502815029150301503115032150331503415035150361503715038150391504015041150421504315044150451504615047150481504915050150511505215053150541505515056150571505815059150601506115062150631506415065150661506715068150691507015071150721507315074150751507615077150781507915080150811508215083150841508515086150871508815089150901509115092150931509415095150961509715098150991510015101151021510315104151051510615107151081510915110151111511215113151141511515116151171511815119151201512115122151231512415125151261512715128151291513015131151321513315134151351513615137151381513915140151411514215143151441514515146151471514815149151501515115152151531515415155151561515715158151591516015161151621516315164151651516615167151681516915170151711517215173151741517515176151771517815179151801518115182151831518415185151861518715188151891519015191151921519315194151951519615197151981519915200152011520215203152041520515206152071520815209152101521115212152131521415215152161521715218152191522015221152221522315224152251522615227152281522915230152311523215233152341523515236152371523815239152401524115242152431524415245152461524715248152491525015251152521525315254152551525615257152581525915260152611526215263152641526515266152671526815269152701527115272152731527415275152761527715278152791528015281152821528315284152851528615287152881528915290152911529215293152941529515296152971529815299153001530115302153031530415305153061530715308153091531015311153121531315314153151531615317153181531915320153211532215323153241532515326153271532815329153301533115332153331533415335153361533715338153391534015341153421534315344153451534615347153481534915350153511535215353153541535515356153571535815359153601536115362153631536415365153661536715368153691537015371153721537315374153751537615377153781537915380153811538215383153841538515386153871538815389153901539115392153931539415395153961539715398153991540015401154021540315404154051540615407154081540915410154111541215413154141541515416154171541815419154201542115422154231542415425154261542715428154291543015431154321543315434154351543615437154381543915440154411544215443154441544515446154471544815449154501545115452154531545415455154561545715458154591546015461154621546315464154651546615467154681546915470154711547215473154741547515476154771547815479154801548115482154831548415485154861548715488154891549015491154921549315494154951549615497154981549915500155011550215503155041550515506155071550815509155101551115512155131551415515155161551715518155191552015521155221552315524155251552615527155281552915530155311553215533155341553515536155371553815539155401554115542155431554415545155461554715548155491555015551155521555315554155551555615557155581555915560155611556215563155641556515566155671556815569155701557115572155731557415575155761557715578155791558015581155821558315584155851558615587155881558915590155911559215593155941559515596155971559815599156001560115602156031560415605156061560715608156091561015611156121561315614156151561615617156181561915620156211562215623156241562515626156271562815629156301563115632156331563415635156361563715638156391564015641156421564315644156451564615647156481564915650156511565215653156541565515656156571565815659156601566115662156631566415665156661566715668156691567015671156721567315674156751567615677156781567915680156811568215683156841568515686156871568815689156901569115692156931569415695156961569715698156991570015701157021570315704157051570615707157081570915710157111571215713157141571515716157171571815719157201572115722157231572415725157261572715728157291573015731157321573315734157351573615737157381573915740157411574215743157441574515746157471574815749157501575115752157531575415755157561575715758157591576015761157621576315764157651576615767157681576915770157711577215773157741577515776157771577815779157801578115782157831578415785157861578715788157891579015791157921579315794157951579615797157981579915800158011580215803158041580515806158071580815809158101581115812158131581415815158161581715818158191582015821158221582315824158251582615827158281582915830158311583215833158341583515836158371583815839158401584115842158431584415845158461584715848158491585015851158521585315854158551585615857158581585915860158611586215863158641586515866158671586815869158701587115872158731587415875158761587715878158791588015881158821588315884158851588615887158881588915890158911589215893158941589515896158971589815899159001590115902159031590415905159061590715908159091591015911159121591315914159151591615917159181591915920159211592215923159241592515926159271592815929159301593115932159331593415935159361593715938159391594015941159421594315944159451594615947159481594915950159511595215953159541595515956159571595815959159601596115962159631596415965159661596715968159691597015971159721597315974159751597615977159781597915980159811598215983159841598515986159871598815989159901599115992159931599415995159961599715998159991600016001160021600316004160051600616007160081600916010160111601216013160141601516016160171601816019160201602116022160231602416025160261602716028160291603016031160321603316034160351603616037160381603916040160411604216043160441604516046160471604816049160501605116052160531605416055160561605716058160591606016061160621606316064160651606616067160681606916070160711607216073160741607516076160771607816079160801608116082160831608416085160861608716088160891609016091160921609316094160951609616097160981609916100161011610216103161041610516106161071610816109161101611116112161131611416115161161611716118161191612016121161221612316124161251612616127161281612916130161311613216133161341613516136161371613816139161401614116142161431614416145161461614716148161491615016151161521615316154161551615616157161581615916160161611616216163161641616516166161671616816169161701617116172161731617416175161761617716178161791618016181161821618316184161851618616187161881618916190161911619216193161941619516196161971619816199162001620116202162031620416205162061620716208162091621016211162121621316214162151621616217162181621916220162211622216223162241622516226162271622816229162301623116232162331623416235162361623716238162391624016241162421624316244162451624616247162481624916250162511625216253162541625516256162571625816259162601626116262162631626416265162661626716268162691627016271162721627316274162751627616277162781627916280162811628216283162841628516286162871628816289162901629116292162931629416295162961629716298162991630016301163021630316304163051630616307163081630916310163111631216313163141631516316163171631816319163201632116322163231632416325163261632716328163291633016331163321633316334163351633616337163381633916340163411634216343163441634516346163471634816349163501635116352163531635416355163561635716358163591636016361163621636316364163651636616367163681636916370163711637216373163741637516376163771637816379163801638116382163831638416385163861638716388163891639016391163921639316394163951639616397163981639916400164011640216403164041640516406164071640816409164101641116412164131641416415164161641716418164191642016421164221642316424164251642616427164281642916430164311643216433164341643516436164371643816439164401644116442164431644416445164461644716448164491645016451164521645316454164551645616457164581645916460164611646216463164641646516466164671646816469164701647116472164731647416475164761647716478164791648016481164821648316484164851648616487164881648916490164911649216493164941649516496164971649816499165001650116502165031650416505165061650716508165091651016511165121651316514165151651616517165181651916520165211652216523165241652516526165271652816529165301653116532165331653416535165361653716538165391654016541165421654316544165451654616547165481654916550165511655216553165541655516556165571655816559165601656116562165631656416565165661656716568165691657016571165721657316574165751657616577165781657916580165811658216583165841658516586165871658816589165901659116592165931659416595165961659716598165991660016601166021660316604166051660616607166081660916610166111661216613166141661516616166171661816619166201662116622166231662416625166261662716628166291663016631166321663316634166351663616637166381663916640166411664216643166441664516646166471664816649166501665116652166531665416655166561665716658166591666016661166621666316664166651666616667166681666916670166711667216673166741667516676166771667816679166801668116682166831668416685166861668716688166891669016691166921669316694166951669616697166981669916700167011670216703167041670516706167071670816709167101671116712167131671416715167161671716718167191672016721167221672316724167251672616727167281672916730167311673216733167341673516736167371673816739167401674116742167431674416745167461674716748167491675016751167521675316754167551675616757167581675916760167611676216763167641676516766167671676816769167701677116772167731677416775167761677716778167791678016781167821678316784167851678616787167881678916790167911679216793167941679516796167971679816799168001680116802168031680416805168061680716808168091681016811168121681316814168151681616817168181681916820168211682216823168241682516826168271682816829168301683116832168331683416835168361683716838168391684016841168421684316844168451684616847168481684916850168511685216853168541685516856168571685816859168601686116862168631686416865168661686716868168691687016871168721687316874168751687616877168781687916880168811688216883168841688516886168871688816889168901689116892168931689416895168961689716898168991690016901169021690316904169051690616907169081690916910169111691216913169141691516916169171691816919169201692116922169231692416925169261692716928169291693016931169321693316934169351693616937169381693916940169411694216943169441694516946169471694816949169501695116952169531695416955169561695716958169591696016961169621696316964169651696616967169681696916970169711697216973169741697516976169771697816979169801698116982169831698416985169861698716988169891699016991169921699316994169951699616997169981699917000170011700217003170041700517006170071700817009170101701117012170131701417015170161701717018170191702017021170221702317024170251702617027170281702917030170311703217033170341703517036170371703817039170401704117042170431704417045170461704717048170491705017051170521705317054170551705617057170581705917060170611706217063170641706517066170671706817069170701707117072170731707417075170761707717078170791708017081170821708317084170851708617087170881708917090170911709217093170941709517096170971709817099171001710117102171031710417105171061710717108171091711017111171121711317114171151711617117171181711917120171211712217123171241712517126171271712817129171301713117132171331713417135171361713717138171391714017141171421714317144171451714617147171481714917150171511715217153171541715517156171571715817159171601716117162171631716417165171661716717168171691717017171171721717317174171751717617177171781717917180171811718217183171841718517186171871718817189171901719117192171931719417195171961719717198171991720017201172021720317204172051720617207172081720917210172111721217213172141721517216172171721817219172201722117222172231722417225172261722717228172291723017231172321723317234172351723617237172381723917240172411724217243172441724517246172471724817249172501725117252172531725417255172561725717258172591726017261172621726317264172651726617267172681726917270172711727217273172741727517276172771727817279172801728117282172831728417285172861728717288172891729017291172921729317294172951729617297172981729917300173011730217303173041730517306173071730817309173101731117312173131731417315173161731717318173191732017321173221732317324173251732617327173281732917330173311733217333173341733517336173371733817339173401734117342173431734417345173461734717348173491735017351173521735317354173551735617357173581735917360173611736217363173641736517366173671736817369173701737117372173731737417375173761737717378173791738017381173821738317384173851738617387173881738917390173911739217393173941739517396173971739817399174001740117402174031740417405174061740717408174091741017411174121741317414174151741617417174181741917420174211742217423174241742517426174271742817429174301743117432174331743417435174361743717438174391744017441174421744317444174451744617447174481744917450174511745217453174541745517456174571745817459174601746117462174631746417465174661746717468174691747017471174721747317474174751747617477174781747917480174811748217483174841748517486174871748817489174901749117492174931749417495174961749717498174991750017501175021750317504175051750617507175081750917510175111751217513175141751517516175171751817519175201752117522175231752417525175261752717528175291753017531175321753317534175351753617537175381753917540175411754217543175441754517546175471754817549175501755117552175531755417555175561755717558175591756017561175621756317564175651756617567175681756917570175711757217573175741757517576175771757817579175801758117582175831758417585175861758717588175891759017591175921759317594175951759617597175981759917600176011760217603176041760517606176071760817609176101761117612176131761417615176161761717618176191762017621176221762317624176251762617627176281762917630176311763217633176341763517636176371763817639176401764117642176431764417645176461764717648176491765017651176521765317654176551765617657176581765917660176611766217663176641766517666176671766817669176701767117672176731767417675176761767717678176791768017681176821768317684176851768617687176881768917690176911769217693176941769517696176971769817699177001770117702177031770417705177061770717708177091771017711177121771317714177151771617717177181771917720177211772217723177241772517726177271772817729177301773117732177331773417735177361773717738177391774017741177421774317744177451774617747177481774917750177511775217753177541775517756177571775817759177601776117762177631776417765177661776717768177691777017771177721777317774177751777617777177781777917780177811778217783177841778517786177871778817789177901779117792177931779417795177961779717798177991780017801178021780317804178051780617807178081780917810178111781217813178141781517816178171781817819178201782117822178231782417825178261782717828178291783017831178321783317834178351783617837178381783917840178411784217843178441784517846178471784817849178501785117852178531785417855178561785717858178591786017861178621786317864178651786617867178681786917870178711787217873178741787517876178771787817879178801788117882178831788417885178861788717888178891789017891178921789317894178951789617897178981789917900179011790217903179041790517906179071790817909179101791117912179131791417915179161791717918179191792017921179221792317924179251792617927179281792917930179311793217933179341793517936179371793817939179401794117942179431794417945179461794717948179491795017951179521795317954179551795617957179581795917960179611796217963179641796517966179671796817969179701797117972179731797417975179761797717978179791798017981179821798317984179851798617987179881798917990179911799217993179941799517996179971799817999180001800118002180031800418005180061800718008180091801018011180121801318014180151801618017180181801918020180211802218023180241802518026180271802818029180301803118032180331803418035180361803718038180391804018041180421804318044180451804618047180481804918050180511805218053180541805518056180571805818059180601806118062180631806418065180661806718068180691807018071180721807318074180751807618077180781807918080180811808218083180841808518086180871808818089180901809118092180931809418095180961809718098180991810018101181021810318104181051810618107181081810918110181111811218113181141811518116181171811818119181201812118122181231812418125181261812718128181291813018131181321813318134181351813618137181381813918140181411814218143181441814518146181471814818149181501815118152181531815418155181561815718158181591816018161181621816318164181651816618167181681816918170181711817218173181741817518176181771817818179181801818118182181831818418185181861818718188181891819018191181921819318194181951819618197181981819918200182011820218203182041820518206182071820818209182101821118212182131821418215182161821718218182191822018221182221822318224182251822618227182281822918230182311823218233182341823518236182371823818239182401824118242182431824418245182461824718248182491825018251182521825318254182551825618257182581825918260182611826218263182641826518266182671826818269182701827118272182731827418275182761827718278182791828018281182821828318284182851828618287182881828918290182911829218293182941829518296182971829818299183001830118302183031830418305183061830718308183091831018311183121831318314183151831618317183181831918320183211832218323183241832518326183271832818329183301833118332183331833418335183361833718338183391834018341183421834318344183451834618347183481834918350183511835218353183541835518356183571835818359183601836118362183631836418365183661836718368183691837018371183721837318374183751837618377183781837918380183811838218383183841838518386183871838818389183901839118392183931839418395183961839718398183991840018401184021840318404184051840618407184081840918410184111841218413184141841518416184171841818419184201842118422184231842418425184261842718428184291843018431184321843318434184351843618437184381843918440184411844218443184441844518446184471844818449184501845118452184531845418455184561845718458184591846018461184621846318464184651846618467184681846918470184711847218473184741847518476184771847818479184801848118482184831848418485184861848718488184891849018491184921849318494184951849618497184981849918500185011850218503185041850518506185071850818509185101851118512185131851418515185161851718518185191852018521185221852318524185251852618527185281852918530185311853218533185341853518536185371853818539185401854118542185431854418545185461854718548185491855018551185521855318554185551855618557185581855918560185611856218563185641856518566185671856818569185701857118572185731857418575185761857718578185791858018581185821858318584185851858618587185881858918590185911859218593185941859518596185971859818599186001860118602186031860418605186061860718608186091861018611186121861318614186151861618617186181861918620186211862218623186241862518626186271862818629186301863118632186331863418635186361863718638186391864018641186421864318644186451864618647186481864918650186511865218653186541865518656186571865818659186601866118662186631866418665186661866718668186691867018671186721867318674186751867618677186781867918680186811868218683186841868518686186871868818689186901869118692186931869418695186961869718698186991870018701187021870318704187051870618707187081870918710187111871218713187141871518716187171871818719187201872118722187231872418725187261872718728187291873018731187321873318734187351873618737187381873918740187411874218743187441874518746187471874818749187501875118752187531875418755187561875718758187591876018761187621876318764187651876618767187681876918770187711877218773187741877518776187771877818779187801878118782187831878418785187861878718788187891879018791187921879318794187951879618797187981879918800188011880218803188041880518806188071880818809188101881118812188131881418815188161881718818188191882018821188221882318824188251882618827188281882918830188311883218833188341883518836188371883818839188401884118842188431884418845188461884718848188491885018851188521885318854188551885618857188581885918860188611886218863188641886518866188671886818869188701887118872188731887418875188761887718878188791888018881188821888318884188851888618887188881888918890188911889218893188941889518896188971889818899189001890118902189031890418905189061890718908189091891018911189121891318914189151891618917189181891918920189211892218923189241892518926189271892818929189301893118932189331893418935189361893718938189391894018941189421894318944189451894618947189481894918950189511895218953189541895518956189571895818959189601896118962189631896418965189661896718968189691897018971189721897318974189751897618977189781897918980189811898218983189841898518986189871898818989189901899118992189931899418995189961899718998189991900019001190021900319004190051900619007190081900919010190111901219013190141901519016190171901819019190201902119022190231902419025190261902719028190291903019031190321903319034190351903619037190381903919040190411904219043190441904519046190471904819049190501905119052190531905419055190561905719058190591906019061190621906319064190651906619067190681906919070190711907219073190741907519076190771907819079190801908119082190831908419085190861908719088190891909019091190921909319094190951909619097190981909919100191011910219103191041910519106191071910819109191101911119112191131911419115191161911719118191191912019121191221912319124191251912619127191281912919130191311913219133191341913519136191371913819139191401914119142191431914419145191461914719148191491915019151191521915319154191551915619157191581915919160191611916219163191641916519166191671916819169191701917119172191731917419175191761917719178191791918019181191821918319184191851918619187191881918919190191911919219193191941919519196191971919819199192001920119202192031920419205192061920719208192091921019211192121921319214192151921619217192181921919220192211922219223192241922519226192271922819229192301923119232192331923419235192361923719238192391924019241192421924319244192451924619247192481924919250192511925219253192541925519256192571925819259192601926119262192631926419265192661926719268192691927019271192721927319274192751927619277192781927919280192811928219283192841928519286192871928819289192901929119292192931929419295192961929719298192991930019301193021930319304193051930619307193081930919310193111931219313193141931519316193171931819319193201932119322193231932419325193261932719328193291933019331193321933319334193351933619337193381933919340193411934219343193441934519346193471934819349193501935119352193531935419355193561935719358193591936019361193621936319364193651936619367193681936919370193711937219373193741937519376193771937819379193801938119382193831938419385193861938719388193891939019391193921939319394193951939619397193981939919400194011940219403194041940519406194071940819409194101941119412194131941419415194161941719418194191942019421194221942319424194251942619427194281942919430194311943219433194341943519436194371943819439194401944119442194431944419445194461944719448194491945019451194521945319454194551945619457194581945919460194611946219463194641946519466194671946819469194701947119472194731947419475194761947719478194791948019481194821948319484194851948619487194881948919490194911949219493194941949519496194971949819499195001950119502195031950419505195061950719508195091951019511195121951319514195151951619517195181951919520195211952219523195241952519526195271952819529195301953119532195331953419535195361953719538195391954019541195421954319544195451954619547195481954919550195511955219553195541955519556195571955819559195601956119562195631956419565195661956719568195691957019571195721957319574195751957619577195781957919580195811958219583195841958519586195871958819589195901959119592195931959419595195961959719598195991960019601196021960319604196051960619607196081960919610196111961219613196141961519616196171961819619196201962119622196231962419625196261962719628196291963019631196321963319634196351963619637196381963919640196411964219643196441964519646196471964819649196501965119652196531965419655196561965719658196591966019661196621966319664196651966619667196681966919670196711967219673196741967519676196771967819679196801968119682196831968419685196861968719688196891969019691196921969319694196951969619697196981969919700197011970219703197041970519706197071970819709197101971119712197131971419715197161971719718197191972019721197221972319724197251972619727197281972919730197311973219733197341973519736197371973819739197401974119742197431974419745197461974719748197491975019751197521975319754197551975619757197581975919760197611976219763197641976519766197671976819769197701977119772197731977419775197761977719778197791978019781197821978319784197851978619787197881978919790197911979219793197941979519796197971979819799198001980119802198031980419805198061980719808198091981019811198121981319814198151981619817198181981919820198211982219823198241982519826198271982819829198301983119832198331983419835198361983719838198391984019841198421984319844198451984619847198481984919850198511985219853198541985519856198571985819859198601986119862198631986419865198661986719868198691987019871198721987319874198751987619877198781987919880198811988219883198841988519886198871988819889198901989119892198931989419895198961989719898198991990019901199021990319904199051990619907199081990919910199111991219913199141991519916199171991819919199201992119922199231992419925199261992719928199291993019931199321993319934199351993619937199381993919940199411994219943199441994519946199471994819949199501995119952199531995419955199561995719958199591996019961199621996319964199651996619967199681996919970199711997219973199741997519976199771997819979199801998119982199831998419985199861998719988199891999019991199921999319994199951999619997199981999920000200012000220003200042000520006200072000820009200102001120012200132001420015200162001720018200192002020021200222002320024200252002620027200282002920030200312003220033200342003520036200372003820039200402004120042200432004420045200462004720048200492005020051200522005320054200552005620057200582005920060200612006220063200642006520066200672006820069200702007120072200732007420075200762007720078200792008020081200822008320084200852008620087200882008920090200912009220093200942009520096200972009820099201002010120102201032010420105201062010720108201092011020111201122011320114201152011620117201182011920120201212012220123201242012520126201272012820129201302013120132201332013420135201362013720138201392014020141201422014320144201452014620147201482014920150201512015220153201542015520156201572015820159201602016120162201632016420165201662016720168201692017020171201722017320174201752017620177201782017920180201812018220183201842018520186201872018820189201902019120192201932019420195201962019720198201992020020201202022020320204202052020620207202082020920210202112021220213202142021520216202172021820219202202022120222202232022420225202262022720228202292023020231202322023320234202352023620237202382023920240202412024220243202442024520246202472024820249202502025120252202532025420255202562025720258202592026020261202622026320264202652026620267202682026920270202712027220273202742027520276202772027820279202802028120282202832028420285202862028720288202892029020291202922029320294202952029620297202982029920300203012030220303203042030520306203072030820309203102031120312203132031420315203162031720318203192032020321203222032320324203252032620327203282032920330203312033220333203342033520336203372033820339203402034120342203432034420345203462034720348203492035020351203522035320354203552035620357203582035920360203612036220363203642036520366203672036820369203702037120372203732037420375203762037720378203792038020381203822038320384203852038620387203882038920390203912039220393203942039520396203972039820399204002040120402204032040420405204062040720408204092041020411204122041320414204152041620417204182041920420204212042220423204242042520426204272042820429204302043120432204332043420435204362043720438204392044020441204422044320444204452044620447204482044920450204512045220453204542045520456204572045820459204602046120462204632046420465204662046720468204692047020471204722047320474204752047620477204782047920480204812048220483204842048520486204872048820489204902049120492204932049420495204962049720498204992050020501205022050320504205052050620507205082050920510205112051220513205142051520516205172051820519205202052120522205232052420525205262052720528205292053020531205322053320534205352053620537205382053920540205412054220543205442054520546205472054820549205502055120552205532055420555205562055720558205592056020561205622056320564205652056620567205682056920570205712057220573205742057520576205772057820579205802058120582205832058420585205862058720588205892059020591205922059320594205952059620597205982059920600206012060220603206042060520606206072060820609206102061120612206132061420615206162061720618206192062020621206222062320624206252062620627206282062920630206312063220633206342063520636206372063820639206402064120642206432064420645206462064720648206492065020651206522065320654206552065620657206582065920660206612066220663206642066520666206672066820669206702067120672206732067420675206762067720678206792068020681206822068320684206852068620687206882068920690206912069220693206942069520696206972069820699207002070120702207032070420705207062070720708207092071020711207122071320714207152071620717207182071920720207212072220723207242072520726207272072820729207302073120732207332073420735207362073720738207392074020741207422074320744207452074620747207482074920750207512075220753207542075520756207572075820759207602076120762207632076420765207662076720768207692077020771207722077320774207752077620777207782077920780207812078220783207842078520786207872078820789207902079120792207932079420795207962079720798207992080020801208022080320804208052080620807208082080920810208112081220813208142081520816208172081820819208202082120822208232082420825208262082720828208292083020831208322083320834208352083620837208382083920840208412084220843208442084520846208472084820849208502085120852208532085420855208562085720858208592086020861208622086320864208652086620867208682086920870208712087220873208742087520876208772087820879208802088120882208832088420885208862088720888208892089020891208922089320894208952089620897208982089920900209012090220903209042090520906209072090820909209102091120912209132091420915209162091720918209192092020921209222092320924209252092620927209282092920930209312093220933209342093520936209372093820939209402094120942209432094420945209462094720948209492095020951209522095320954209552095620957209582095920960209612096220963209642096520966209672096820969209702097120972209732097420975209762097720978209792098020981209822098320984209852098620987209882098920990209912099220993209942099520996209972099820999210002100121002210032100421005210062100721008210092101021011210122101321014210152101621017210182101921020210212102221023210242102521026210272102821029210302103121032210332103421035210362103721038210392104021041210422104321044210452104621047210482104921050210512105221053210542105521056210572105821059210602106121062210632106421065210662106721068210692107021071210722107321074210752107621077210782107921080210812108221083210842108521086210872108821089210902109121092210932109421095210962109721098210992110021101211022110321104211052110621107211082110921110211112111221113211142111521116211172111821119211202112121122211232112421125211262112721128211292113021131211322113321134211352113621137211382113921140211412114221143211442114521146211472114821149211502115121152211532115421155211562115721158211592116021161211622116321164211652116621167211682116921170211712117221173211742117521176211772117821179211802118121182211832118421185211862118721188211892119021191211922119321194211952119621197211982119921200212012120221203212042120521206212072120821209212102121121212212132121421215212162121721218212192122021221212222122321224212252122621227212282122921230212312123221233212342123521236212372123821239212402124121242212432124421245212462124721248212492125021251212522125321254212552125621257212582125921260212612126221263212642126521266212672126821269212702127121272212732127421275212762127721278212792128021281212822128321284212852128621287212882128921290212912129221293212942129521296212972129821299213002130121302213032130421305213062130721308213092131021311213122131321314213152131621317213182131921320213212132221323213242132521326213272132821329213302133121332213332133421335213362133721338213392134021341213422134321344213452134621347213482134921350213512135221353213542135521356213572135821359213602136121362213632136421365213662136721368213692137021371213722137321374213752137621377213782137921380213812138221383213842138521386213872138821389213902139121392213932139421395213962139721398213992140021401214022140321404214052140621407214082140921410214112141221413214142141521416214172141821419214202142121422214232142421425214262142721428214292143021431214322143321434214352143621437214382143921440214412144221443214442144521446214472144821449214502145121452214532145421455214562145721458214592146021461214622146321464214652146621467214682146921470214712147221473214742147521476214772147821479214802148121482214832148421485214862148721488214892149021491214922149321494214952149621497214982149921500215012150221503215042150521506215072150821509215102151121512215132151421515215162151721518215192152021521215222152321524215252152621527215282152921530215312153221533215342153521536215372153821539215402154121542215432154421545215462154721548215492155021551215522155321554215552155621557215582155921560215612156221563215642156521566215672156821569215702157121572215732157421575215762157721578215792158021581215822158321584215852158621587215882158921590215912159221593215942159521596215972159821599216002160121602216032160421605216062160721608216092161021611216122161321614216152161621617216182161921620216212162221623216242162521626216272162821629216302163121632216332163421635216362163721638216392164021641216422164321644216452164621647216482164921650216512165221653216542165521656216572165821659216602166121662216632166421665216662166721668216692167021671216722167321674216752167621677216782167921680216812168221683216842168521686216872168821689216902169121692216932169421695216962169721698216992170021701217022170321704217052170621707217082170921710217112171221713217142171521716217172171821719217202172121722217232172421725217262172721728217292173021731217322173321734217352173621737217382173921740217412174221743217442174521746217472174821749217502175121752217532175421755217562175721758217592176021761217622176321764217652176621767217682176921770217712177221773217742177521776217772177821779217802178121782217832178421785217862178721788217892179021791217922179321794217952179621797217982179921800218012180221803218042180521806218072180821809218102181121812218132181421815218162181721818218192182021821218222182321824218252182621827218282182921830218312183221833218342183521836218372183821839218402184121842218432184421845218462184721848218492185021851218522185321854218552185621857218582185921860218612186221863218642186521866218672186821869218702187121872218732187421875218762187721878218792188021881218822188321884218852188621887218882188921890218912189221893218942189521896218972189821899219002190121902219032190421905219062190721908219092191021911219122191321914219152191621917219182191921920219212192221923219242192521926219272192821929219302193121932219332193421935219362193721938219392194021941219422194321944219452194621947219482194921950219512195221953219542195521956219572195821959219602196121962219632196421965219662196721968219692197021971219722197321974219752197621977219782197921980219812198221983219842198521986219872198821989219902199121992219932199421995219962199721998219992200022001220022200322004220052200622007220082200922010220112201222013220142201522016220172201822019220202202122022220232202422025220262202722028220292203022031220322203322034220352203622037220382203922040220412204222043220442204522046220472204822049220502205122052220532205422055220562205722058220592206022061220622206322064220652206622067220682206922070220712207222073220742207522076220772207822079220802208122082220832208422085220862208722088220892209022091220922209322094220952209622097220982209922100221012210222103221042210522106221072210822109221102211122112221132211422115221162211722118221192212022121221222212322124221252212622127221282212922130221312213222133221342213522136221372213822139221402214122142221432214422145221462214722148221492215022151221522215322154221552215622157221582215922160221612216222163221642216522166221672216822169221702217122172221732217422175221762217722178221792218022181221822218322184221852218622187221882218922190221912219222193221942219522196221972219822199222002220122202222032220422205222062220722208222092221022211222122221322214222152221622217222182221922220222212222222223222242222522226222272222822229222302223122232222332223422235222362223722238222392224022241222422224322244222452224622247222482224922250222512225222253222542225522256222572225822259222602226122262222632226422265222662226722268222692227022271222722227322274222752227622277222782227922280222812228222283222842228522286222872228822289222902229122292222932229422295222962229722298222992230022301223022230322304223052230622307223082230922310223112231222313223142231522316223172231822319223202232122322223232232422325223262232722328223292233022331223322233322334223352233622337223382233922340223412234222343223442234522346223472234822349223502235122352223532235422355223562235722358223592236022361223622236322364223652236622367223682236922370223712237222373223742237522376223772237822379223802238122382223832238422385223862238722388223892239022391223922239322394223952239622397223982239922400224012240222403224042240522406224072240822409224102241122412224132241422415224162241722418224192242022421224222242322424224252242622427224282242922430224312243222433224342243522436224372243822439224402244122442224432244422445224462244722448224492245022451224522245322454224552245622457224582245922460224612246222463224642246522466224672246822469224702247122472224732247422475224762247722478224792248022481224822248322484224852248622487224882248922490224912249222493224942249522496224972249822499225002250122502225032250422505225062250722508225092251022511225122251322514225152251622517225182251922520225212252222523225242252522526225272252822529225302253122532225332253422535225362253722538225392254022541225422254322544225452254622547225482254922550225512255222553225542255522556225572255822559225602256122562225632256422565225662256722568225692257022571225722257322574225752257622577225782257922580225812258222583225842258522586225872258822589225902259122592225932259422595225962259722598225992260022601226022260322604226052260622607226082260922610226112261222613226142261522616226172261822619226202262122622226232262422625226262262722628226292263022631226322263322634226352263622637226382263922640226412264222643226442264522646226472264822649226502265122652226532265422655226562265722658226592266022661226622266322664226652266622667226682266922670226712267222673226742267522676226772267822679226802268122682226832268422685226862268722688226892269022691226922269322694226952269622697226982269922700227012270222703227042270522706227072270822709227102271122712227132271422715227162271722718227192272022721227222272322724227252272622727227282272922730227312273222733227342273522736227372273822739227402274122742227432274422745227462274722748227492275022751227522275322754227552275622757227582275922760227612276222763227642276522766227672276822769227702277122772227732277422775227762277722778227792278022781227822278322784227852278622787227882278922790227912279222793227942279522796227972279822799228002280122802228032280422805228062280722808228092281022811228122281322814228152281622817228182281922820228212282222823228242282522826228272282822829228302283122832228332283422835228362283722838228392284022841228422284322844228452284622847228482284922850228512285222853228542285522856228572285822859228602286122862228632286422865228662286722868228692287022871228722287322874228752287622877228782287922880228812288222883228842288522886228872288822889228902289122892228932289422895228962289722898228992290022901229022290322904229052290622907229082290922910229112291222913229142291522916229172291822919229202292122922229232292422925229262292722928229292293022931229322293322934229352293622937229382293922940229412294222943229442294522946229472294822949229502295122952229532295422955229562295722958229592296022961229622296322964229652296622967229682296922970229712297222973229742297522976229772297822979229802298122982229832298422985229862298722988229892299022991229922299322994229952299622997229982299923000230012300223003230042300523006230072300823009230102301123012230132301423015230162301723018230192302023021230222302323024230252302623027230282302923030230312303223033230342303523036230372303823039230402304123042230432304423045230462304723048230492305023051230522305323054230552305623057230582305923060230612306223063230642306523066230672306823069230702307123072230732307423075230762307723078230792308023081230822308323084230852308623087230882308923090230912309223093230942309523096230972309823099231002310123102231032310423105231062310723108231092311023111231122311323114231152311623117231182311923120231212312223123231242312523126231272312823129231302313123132231332313423135231362313723138231392314023141231422314323144231452314623147231482314923150231512315223153231542315523156231572315823159231602316123162231632316423165231662316723168231692317023171231722317323174231752317623177231782317923180231812318223183231842318523186231872318823189231902319123192231932319423195231962319723198231992320023201232022320323204232052320623207232082320923210232112321223213232142321523216232172321823219232202322123222232232322423225232262322723228232292323023231232322323323234232352323623237232382323923240232412324223243232442324523246232472324823249232502325123252232532325423255232562325723258232592326023261232622326323264232652326623267232682326923270232712327223273232742327523276232772327823279232802328123282232832328423285232862328723288232892329023291232922329323294232952329623297232982329923300233012330223303233042330523306233072330823309233102331123312233132331423315233162331723318233192332023321233222332323324233252332623327233282332923330233312333223333233342333523336233372333823339233402334123342233432334423345233462334723348233492335023351233522335323354233552335623357233582335923360233612336223363233642336523366233672336823369233702337123372233732337423375233762337723378233792338023381233822338323384233852338623387233882338923390233912339223393233942339523396233972339823399234002340123402234032340423405234062340723408234092341023411234122341323414234152341623417234182341923420234212342223423234242342523426234272342823429234302343123432234332343423435234362343723438234392344023441234422344323444234452344623447234482344923450234512345223453234542345523456234572345823459234602346123462234632346423465234662346723468234692347023471234722347323474234752347623477234782347923480234812348223483234842348523486234872348823489234902349123492234932349423495234962349723498234992350023501235022350323504235052350623507235082350923510235112351223513235142351523516235172351823519235202352123522235232352423525235262352723528235292353023531235322353323534235352353623537235382353923540235412354223543235442354523546235472354823549235502355123552235532355423555235562355723558235592356023561235622356323564235652356623567235682356923570235712357223573235742357523576235772357823579235802358123582235832358423585235862358723588235892359023591235922359323594235952359623597235982359923600236012360223603236042360523606236072360823609236102361123612236132361423615236162361723618236192362023621236222362323624236252362623627236282362923630236312363223633236342363523636236372363823639236402364123642236432364423645236462364723648236492365023651236522365323654236552365623657236582365923660236612366223663236642366523666236672366823669236702367123672236732367423675236762367723678236792368023681236822368323684236852368623687236882368923690236912369223693236942369523696236972369823699237002370123702237032370423705237062370723708237092371023711237122371323714237152371623717237182371923720237212372223723237242372523726237272372823729237302373123732237332373423735237362373723738237392374023741237422374323744237452374623747237482374923750237512375223753237542375523756237572375823759237602376123762237632376423765237662376723768237692377023771237722377323774237752377623777237782377923780237812378223783237842378523786237872378823789237902379123792237932379423795237962379723798237992380023801238022380323804238052380623807238082380923810238112381223813238142381523816238172381823819238202382123822238232382423825238262382723828238292383023831238322383323834238352383623837238382383923840238412384223843238442384523846238472384823849238502385123852238532385423855238562385723858238592386023861238622386323864238652386623867238682386923870238712387223873238742387523876238772387823879238802388123882238832388423885238862388723888238892389023891238922389323894238952389623897238982389923900239012390223903239042390523906239072390823909239102391123912239132391423915239162391723918239192392023921239222392323924239252392623927239282392923930239312393223933239342393523936239372393823939239402394123942239432394423945239462394723948239492395023951239522395323954239552395623957239582395923960239612396223963239642396523966239672396823969239702397123972239732397423975239762397723978239792398023981239822398323984239852398623987239882398923990239912399223993239942399523996239972399823999240002400124002240032400424005240062400724008240092401024011240122401324014240152401624017240182401924020240212402224023240242402524026240272402824029240302403124032240332403424035240362403724038240392404024041240422404324044240452404624047240482404924050240512405224053240542405524056240572405824059240602406124062240632406424065240662406724068240692407024071240722407324074240752407624077240782407924080240812408224083240842408524086240872408824089240902409124092240932409424095240962409724098240992410024101241022410324104241052410624107241082410924110241112411224113241142411524116241172411824119241202412124122241232412424125241262412724128241292413024131241322413324134241352413624137241382413924140241412414224143241442414524146241472414824149241502415124152241532415424155241562415724158241592416024161241622416324164241652416624167241682416924170241712417224173241742417524176241772417824179241802418124182241832418424185241862418724188241892419024191241922419324194241952419624197241982419924200242012420224203242042420524206242072420824209242102421124212242132421424215242162421724218242192422024221242222422324224242252422624227242282422924230242312423224233242342423524236242372423824239242402424124242242432424424245242462424724248242492425024251242522425324254242552425624257242582425924260242612426224263242642426524266242672426824269242702427124272242732427424275242762427724278242792428024281242822428324284242852428624287242882428924290242912429224293242942429524296242972429824299243002430124302243032430424305243062430724308243092431024311243122431324314243152431624317243182431924320243212432224323243242432524326243272432824329243302433124332243332433424335243362433724338243392434024341243422434324344243452434624347243482434924350243512435224353243542435524356243572435824359243602436124362243632436424365243662436724368243692437024371243722437324374243752437624377243782437924380243812438224383243842438524386243872438824389243902439124392243932439424395243962439724398243992440024401244022440324404244052440624407244082440924410244112441224413244142441524416244172441824419244202442124422244232442424425244262442724428244292443024431244322443324434244352443624437244382443924440244412444224443244442444524446244472444824449244502445124452244532445424455244562445724458244592446024461244622446324464244652446624467244682446924470244712447224473244742447524476244772447824479244802448124482244832448424485244862448724488244892449024491244922449324494244952449624497244982449924500245012450224503245042450524506245072450824509245102451124512245132451424515245162451724518245192452024521245222452324524245252452624527245282452924530245312453224533245342453524536245372453824539245402454124542245432454424545245462454724548245492455024551245522455324554245552455624557245582455924560245612456224563245642456524566245672456824569245702457124572245732457424575245762457724578245792458024581245822458324584245852458624587245882458924590245912459224593245942459524596245972459824599246002460124602246032460424605246062460724608246092461024611246122461324614246152461624617246182461924620246212462224623246242462524626246272462824629246302463124632246332463424635246362463724638246392464024641246422464324644246452464624647246482464924650246512465224653246542465524656246572465824659246602466124662246632466424665246662466724668246692467024671246722467324674246752467624677246782467924680246812468224683246842468524686246872468824689246902469124692246932469424695246962469724698246992470024701247022470324704247052470624707247082470924710247112471224713247142471524716247172471824719247202472124722247232472424725247262472724728247292473024731247322473324734247352473624737247382473924740247412474224743247442474524746247472474824749247502475124752247532475424755247562475724758247592476024761247622476324764247652476624767247682476924770247712477224773247742477524776247772477824779247802478124782247832478424785247862478724788247892479024791247922479324794247952479624797247982479924800248012480224803248042480524806248072480824809248102481124812248132481424815248162481724818248192482024821248222482324824248252482624827248282482924830248312483224833248342483524836248372483824839248402484124842248432484424845248462484724848248492485024851248522485324854248552485624857248582485924860248612486224863248642486524866248672486824869248702487124872248732487424875248762487724878248792488024881248822488324884248852488624887248882488924890248912489224893248942489524896248972489824899249002490124902249032490424905249062490724908249092491024911249122491324914249152491624917249182491924920249212492224923249242492524926249272492824929249302493124932249332493424935249362493724938249392494024941249422494324944249452494624947249482494924950249512495224953249542495524956249572495824959249602496124962249632496424965249662496724968249692497024971249722497324974249752497624977249782497924980249812498224983249842498524986249872498824989249902499124992249932499424995249962499724998249992500025001250022500325004250052500625007250082500925010250112501225013250142501525016250172501825019250202502125022250232502425025250262502725028250292503025031250322503325034250352503625037250382503925040250412504225043250442504525046250472504825049250502505125052250532505425055250562505725058250592506025061250622506325064250652506625067250682506925070250712507225073250742507525076250772507825079250802508125082250832508425085250862508725088250892509025091250922509325094250952509625097250982509925100251012510225103251042510525106251072510825109251102511125112251132511425115251162511725118251192512025121251222512325124251252512625127251282512925130251312513225133251342513525136251372513825139251402514125142251432514425145251462514725148251492515025151251522515325154251552515625157251582515925160251612516225163251642516525166251672516825169251702517125172251732517425175251762517725178251792518025181251822518325184251852518625187251882518925190251912519225193251942519525196251972519825199252002520125202252032520425205252062520725208252092521025211252122521325214252152521625217252182521925220252212522225223252242522525226252272522825229252302523125232252332523425235252362523725238252392524025241252422524325244252452524625247252482524925250252512525225253252542525525256252572525825259252602526125262252632526425265252662526725268252692527025271252722527325274252752527625277252782527925280252812528225283252842528525286252872528825289252902529125292252932529425295252962529725298252992530025301253022530325304253052530625307253082530925310253112531225313253142531525316253172531825319253202532125322253232532425325253262532725328253292533025331253322533325334253352533625337253382533925340253412534225343253442534525346253472534825349253502535125352253532535425355253562535725358253592536025361253622536325364253652536625367253682536925370253712537225373253742537525376253772537825379253802538125382253832538425385253862538725388253892539025391253922539325394253952539625397253982539925400254012540225403254042540525406254072540825409254102541125412254132541425415254162541725418254192542025421254222542325424254252542625427254282542925430254312543225433254342543525436254372543825439254402544125442254432544425445254462544725448254492545025451254522545325454254552545625457254582545925460254612546225463254642546525466254672546825469254702547125472254732547425475254762547725478254792548025481254822548325484254852548625487254882548925490254912549225493254942549525496254972549825499255002550125502255032550425505255062550725508255092551025511255122551325514255152551625517255182551925520255212552225523255242552525526255272552825529255302553125532255332553425535255362553725538255392554025541255422554325544255452554625547255482554925550255512555225553255542555525556255572555825559255602556125562255632556425565255662556725568255692557025571255722557325574255752557625577255782557925580255812558225583255842558525586255872558825589255902559125592255932559425595255962559725598255992560025601256022560325604256052560625607256082560925610256112561225613256142561525616256172561825619256202562125622256232562425625256262562725628256292563025631256322563325634256352563625637256382563925640256412564225643256442564525646256472564825649256502565125652256532565425655256562565725658256592566025661256622566325664256652566625667256682566925670256712567225673256742567525676256772567825679256802568125682256832568425685256862568725688256892569025691256922569325694256952569625697256982569925700257012570225703257042570525706257072570825709257102571125712257132571425715257162571725718257192572025721257222572325724257252572625727257282572925730257312573225733257342573525736257372573825739257402574125742257432574425745257462574725748257492575025751257522575325754257552575625757257582575925760257612576225763257642576525766257672576825769257702577125772257732577425775257762577725778257792578025781257822578325784257852578625787257882578925790257912579225793257942579525796257972579825799258002580125802258032580425805258062580725808258092581025811258122581325814258152581625817258182581925820258212582225823258242582525826258272582825829258302583125832258332583425835258362583725838258392584025841258422584325844258452584625847258482584925850258512585225853258542585525856258572585825859258602586125862258632586425865258662586725868258692587025871258722587325874258752587625877258782587925880258812588225883258842588525886258872588825889258902589125892258932589425895258962589725898258992590025901259022590325904259052590625907259082590925910259112591225913259142591525916259172591825919259202592125922259232592425925259262592725928259292593025931259322593325934259352593625937259382593925940259412594225943259442594525946259472594825949259502595125952259532595425955259562595725958259592596025961259622596325964259652596625967259682596925970259712597225973259742597525976259772597825979259802598125982259832598425985259862598725988259892599025991259922599325994259952599625997259982599926000260012600226003260042600526006260072600826009260102601126012260132601426015260162601726018260192602026021260222602326024260252602626027260282602926030260312603226033260342603526036260372603826039260402604126042260432604426045260462604726048260492605026051260522605326054260552605626057260582605926060260612606226063260642606526066260672606826069260702607126072260732607426075260762607726078260792608026081260822608326084260852608626087260882608926090260912609226093260942609526096260972609826099261002610126102261032610426105261062610726108261092611026111261122611326114261152611626117261182611926120261212612226123261242612526126261272612826129261302613126132261332613426135261362613726138261392614026141261422614326144261452614626147261482614926150261512615226153261542615526156261572615826159261602616126162261632616426165261662616726168261692617026171261722617326174261752617626177261782617926180261812618226183261842618526186261872618826189261902619126192261932619426195261962619726198261992620026201262022620326204262052620626207262082620926210262112621226213262142621526216262172621826219262202622126222262232622426225262262622726228262292623026231262322623326234262352623626237262382623926240262412624226243262442624526246262472624826249262502625126252262532625426255262562625726258262592626026261262622626326264262652626626267262682626926270262712627226273262742627526276262772627826279262802628126282262832628426285262862628726288262892629026291262922629326294262952629626297262982629926300263012630226303263042630526306263072630826309263102631126312263132631426315263162631726318263192632026321263222632326324263252632626327263282632926330263312633226333263342633526336263372633826339263402634126342263432634426345263462634726348263492635026351263522635326354263552635626357263582635926360263612636226363263642636526366263672636826369263702637126372263732637426375263762637726378263792638026381263822638326384263852638626387263882638926390263912639226393263942639526396263972639826399264002640126402264032640426405264062640726408264092641026411264122641326414264152641626417264182641926420264212642226423264242642526426264272642826429264302643126432264332643426435264362643726438264392644026441264422644326444264452644626447264482644926450264512645226453264542645526456264572645826459264602646126462264632646426465264662646726468264692647026471264722647326474264752647626477264782647926480264812648226483264842648526486264872648826489264902649126492264932649426495264962649726498264992650026501265022650326504265052650626507265082650926510265112651226513265142651526516265172651826519265202652126522265232652426525265262652726528265292653026531265322653326534265352653626537265382653926540265412654226543265442654526546265472654826549265502655126552265532655426555265562655726558265592656026561265622656326564265652656626567265682656926570265712657226573265742657526576265772657826579265802658126582265832658426585265862658726588265892659026591265922659326594265952659626597265982659926600266012660226603266042660526606266072660826609266102661126612266132661426615266162661726618266192662026621266222662326624266252662626627266282662926630266312663226633266342663526636266372663826639266402664126642266432664426645266462664726648266492665026651266522665326654266552665626657266582665926660266612666226663266642666526666266672666826669266702667126672266732667426675266762667726678266792668026681266822668326684266852668626687266882668926690266912669226693266942669526696266972669826699267002670126702267032670426705267062670726708267092671026711267122671326714267152671626717267182671926720267212672226723267242672526726267272672826729267302673126732267332673426735267362673726738267392674026741267422674326744267452674626747267482674926750267512675226753267542675526756267572675826759267602676126762267632676426765267662676726768267692677026771267722677326774267752677626777267782677926780267812678226783267842678526786267872678826789267902679126792267932679426795267962679726798267992680026801268022680326804268052680626807268082680926810268112681226813268142681526816268172681826819268202682126822268232682426825268262682726828268292683026831268322683326834268352683626837268382683926840268412684226843268442684526846268472684826849268502685126852268532685426855268562685726858268592686026861268622686326864268652686626867268682686926870268712687226873268742687526876268772687826879268802688126882268832688426885268862688726888268892689026891268922689326894268952689626897268982689926900269012690226903269042690526906269072690826909269102691126912269132691426915269162691726918269192692026921269222692326924269252692626927269282692926930269312693226933269342693526936269372693826939269402694126942269432694426945269462694726948269492695026951269522695326954269552695626957269582695926960269612696226963269642696526966269672696826969269702697126972269732697426975269762697726978269792698026981269822698326984269852698626987269882698926990269912699226993269942699526996269972699826999270002700127002270032700427005270062700727008270092701027011270122701327014270152701627017270182701927020270212702227023270242702527026270272702827029270302703127032270332703427035270362703727038270392704027041270422704327044270452704627047270482704927050270512705227053270542705527056270572705827059270602706127062270632706427065270662706727068270692707027071270722707327074270752707627077270782707927080270812708227083270842708527086270872708827089270902709127092270932709427095270962709727098270992710027101271022710327104271052710627107271082710927110271112711227113271142711527116271172711827119271202712127122271232712427125271262712727128271292713027131271322713327134271352713627137271382713927140271412714227143271442714527146271472714827149271502715127152271532715427155271562715727158271592716027161271622716327164271652716627167271682716927170271712717227173271742717527176271772717827179271802718127182271832718427185271862718727188271892719027191271922719327194271952719627197271982719927200272012720227203272042720527206272072720827209272102721127212272132721427215272162721727218272192722027221272222722327224272252722627227272282722927230272312723227233272342723527236272372723827239272402724127242272432724427245272462724727248272492725027251272522725327254272552725627257272582725927260272612726227263272642726527266272672726827269272702727127272272732727427275272762727727278272792728027281272822728327284272852728627287272882728927290272912729227293272942729527296272972729827299273002730127302273032730427305273062730727308273092731027311273122731327314273152731627317273182731927320273212732227323273242732527326273272732827329273302733127332273332733427335273362733727338273392734027341273422734327344273452734627347273482734927350273512735227353273542735527356273572735827359273602736127362273632736427365273662736727368273692737027371273722737327374273752737627377273782737927380273812738227383273842738527386273872738827389273902739127392273932739427395273962739727398273992740027401274022740327404274052740627407274082740927410274112741227413274142741527416274172741827419274202742127422274232742427425274262742727428274292743027431274322743327434274352743627437274382743927440274412744227443274442744527446274472744827449274502745127452274532745427455274562745727458274592746027461274622746327464274652746627467274682746927470274712747227473274742747527476274772747827479274802748127482274832748427485274862748727488274892749027491274922749327494274952749627497274982749927500275012750227503275042750527506275072750827509275102751127512275132751427515275162751727518275192752027521275222752327524275252752627527275282752927530275312753227533275342753527536275372753827539275402754127542275432754427545275462754727548275492755027551275522755327554275552755627557275582755927560275612756227563275642756527566275672756827569275702757127572275732757427575275762757727578275792758027581275822758327584275852758627587275882758927590275912759227593275942759527596275972759827599276002760127602276032760427605276062760727608276092761027611276122761327614276152761627617276182761927620276212762227623276242762527626276272762827629276302763127632276332763427635276362763727638276392764027641276422764327644276452764627647276482764927650276512765227653276542765527656276572765827659276602766127662276632766427665276662766727668276692767027671276722767327674276752767627677276782767927680276812768227683276842768527686276872768827689276902769127692276932769427695276962769727698276992770027701277022770327704277052770627707277082770927710277112771227713277142771527716277172771827719277202772127722277232772427725277262772727728277292773027731277322773327734277352773627737277382773927740277412774227743277442774527746277472774827749277502775127752277532775427755277562775727758277592776027761277622776327764277652776627767277682776927770277712777227773277742777527776277772777827779277802778127782277832778427785277862778727788277892779027791277922779327794277952779627797277982779927800278012780227803278042780527806278072780827809278102781127812278132781427815278162781727818278192782027821278222782327824278252782627827278282782927830278312783227833278342783527836278372783827839278402784127842278432784427845278462784727848278492785027851278522785327854278552785627857278582785927860278612786227863278642786527866278672786827869278702787127872278732787427875278762787727878278792788027881278822788327884278852788627887278882788927890278912789227893278942789527896278972789827899279002790127902279032790427905279062790727908279092791027911279122791327914279152791627917279182791927920279212792227923279242792527926279272792827929279302793127932279332793427935279362793727938279392794027941279422794327944279452794627947279482794927950279512795227953279542795527956279572795827959279602796127962279632796427965279662796727968279692797027971279722797327974279752797627977279782797927980279812798227983279842798527986279872798827989279902799127992279932799427995279962799727998279992800028001280022800328004280052800628007280082800928010280112801228013280142801528016280172801828019280202802128022280232802428025280262802728028280292803028031280322803328034280352803628037280382803928040280412804228043280442804528046280472804828049280502805128052280532805428055280562805728058280592806028061280622806328064280652806628067280682806928070280712807228073280742807528076280772807828079280802808128082280832808428085280862808728088280892809028091280922809328094280952809628097280982809928100281012810228103281042810528106281072810828109281102811128112281132811428115281162811728118281192812028121281222812328124281252812628127281282812928130281312813228133281342813528136281372813828139281402814128142281432814428145281462814728148281492815028151281522815328154281552815628157281582815928160281612816228163281642816528166281672816828169281702817128172281732817428175281762817728178281792818028181281822818328184281852818628187281882818928190281912819228193281942819528196281972819828199282002820128202282032820428205282062820728208282092821028211282122821328214282152821628217282182821928220282212822228223282242822528226282272822828229282302823128232282332823428235282362823728238282392824028241282422824328244282452824628247282482824928250282512825228253282542825528256282572825828259282602826128262282632826428265282662826728268282692827028271282722827328274282752827628277282782827928280282812828228283282842828528286282872828828289282902829128292282932829428295282962829728298282992830028301283022830328304283052830628307283082830928310283112831228313283142831528316283172831828319283202832128322283232832428325283262832728328283292833028331283322833328334283352833628337283382833928340283412834228343283442834528346283472834828349283502835128352283532835428355283562835728358283592836028361283622836328364283652836628367283682836928370283712837228373283742837528376283772837828379283802838128382283832838428385283862838728388283892839028391283922839328394283952839628397283982839928400284012840228403284042840528406284072840828409284102841128412284132841428415284162841728418284192842028421284222842328424284252842628427284282842928430284312843228433284342843528436284372843828439284402844128442284432844428445284462844728448284492845028451284522845328454284552845628457284582845928460284612846228463284642846528466284672846828469284702847128472284732847428475284762847728478284792848028481284822848328484284852848628487284882848928490284912849228493284942849528496284972849828499285002850128502285032850428505285062850728508285092851028511285122851328514285152851628517285182851928520285212852228523285242852528526285272852828529285302853128532285332853428535285362853728538285392854028541285422854328544285452854628547285482854928550285512855228553285542855528556285572855828559285602856128562285632856428565285662856728568285692857028571285722857328574285752857628577285782857928580285812858228583285842858528586285872858828589285902859128592285932859428595285962859728598285992860028601286022860328604286052860628607286082860928610286112861228613286142861528616286172861828619286202862128622286232862428625286262862728628286292863028631286322863328634286352863628637286382863928640286412864228643286442864528646286472864828649286502865128652286532865428655286562865728658286592866028661286622866328664286652866628667286682866928670286712867228673286742867528676286772867828679286802868128682286832868428685286862868728688286892869028691286922869328694286952869628697286982869928700287012870228703287042870528706287072870828709287102871128712287132871428715287162871728718287192872028721287222872328724287252872628727287282872928730287312873228733287342873528736287372873828739287402874128742287432874428745287462874728748287492875028751287522875328754287552875628757287582875928760287612876228763287642876528766287672876828769287702877128772287732877428775287762877728778287792878028781287822878328784287852878628787287882878928790287912879228793287942879528796287972879828799288002880128802288032880428805288062880728808288092881028811288122881328814288152881628817288182881928820288212882228823288242882528826288272882828829288302883128832288332883428835288362883728838288392884028841288422884328844288452884628847288482884928850288512885228853288542885528856288572885828859288602886128862288632886428865288662886728868288692887028871288722887328874288752887628877288782887928880288812888228883288842888528886288872888828889288902889128892288932889428895288962889728898288992890028901289022890328904289052890628907289082890928910289112891228913289142891528916289172891828919289202892128922289232892428925289262892728928289292893028931289322893328934289352893628937289382893928940289412894228943289442894528946289472894828949289502895128952289532895428955289562895728958289592896028961289622896328964289652896628967289682896928970289712897228973289742897528976289772897828979289802898128982289832898428985289862898728988289892899028991289922899328994289952899628997289982899929000290012900229003290042900529006290072900829009290102901129012290132901429015290162901729018290192902029021290222902329024290252902629027290282902929030290312903229033290342903529036290372903829039290402904129042290432904429045290462904729048290492905029051290522905329054290552905629057290582905929060290612906229063290642906529066290672906829069290702907129072290732907429075290762907729078290792908029081290822908329084290852908629087290882908929090290912909229093290942909529096290972909829099291002910129102291032910429105291062910729108291092911029111291122911329114291152911629117291182911929120291212912229123291242912529126291272912829129291302913129132291332913429135291362913729138291392914029141291422914329144291452914629147291482914929150291512915229153291542915529156291572915829159291602916129162291632916429165291662916729168291692917029171291722917329174291752917629177291782917929180291812918229183291842918529186291872918829189291902919129192291932919429195291962919729198291992920029201292022920329204292052920629207292082920929210292112921229213292142921529216292172921829219292202922129222292232922429225292262922729228292292923029231292322923329234292352923629237292382923929240292412924229243292442924529246292472924829249292502925129252292532925429255292562925729258292592926029261292622926329264292652926629267292682926929270292712927229273292742927529276292772927829279292802928129282292832928429285292862928729288292892929029291292922929329294292952929629297292982929929300293012930229303293042930529306293072930829309293102931129312293132931429315293162931729318293192932029321293222932329324293252932629327293282932929330293312933229333293342933529336293372933829339293402934129342293432934429345293462934729348293492935029351293522935329354293552935629357293582935929360293612936229363293642936529366293672936829369293702937129372293732937429375293762937729378293792938029381293822938329384293852938629387293882938929390293912939229393293942939529396293972939829399294002940129402294032940429405294062940729408294092941029411294122941329414294152941629417294182941929420294212942229423294242942529426294272942829429294302943129432294332943429435294362943729438294392944029441294422944329444294452944629447294482944929450294512945229453294542945529456294572945829459294602946129462294632946429465294662946729468294692947029471294722947329474294752947629477294782947929480294812948229483294842948529486294872948829489294902949129492294932949429495294962949729498294992950029501295022950329504295052950629507295082950929510295112951229513295142951529516295172951829519295202952129522295232952429525295262952729528295292953029531295322953329534295352953629537295382953929540295412954229543295442954529546295472954829549295502955129552295532955429555295562955729558295592956029561295622956329564295652956629567295682956929570295712957229573295742957529576295772957829579295802958129582295832958429585295862958729588295892959029591295922959329594295952959629597295982959929600296012960229603296042960529606296072960829609296102961129612296132961429615296162961729618296192962029621296222962329624296252962629627296282962929630296312963229633296342963529636296372963829639296402964129642296432964429645296462964729648296492965029651296522965329654296552965629657296582965929660296612966229663296642966529666296672966829669296702967129672296732967429675296762967729678296792968029681296822968329684296852968629687296882968929690296912969229693296942969529696296972969829699297002970129702297032970429705297062970729708297092971029711297122971329714297152971629717297182971929720297212972229723297242972529726297272972829729297302973129732297332973429735297362973729738297392974029741297422974329744297452974629747297482974929750297512975229753297542975529756297572975829759297602976129762297632976429765297662976729768297692977029771297722977329774297752977629777297782977929780297812978229783297842978529786297872978829789297902979129792297932979429795297962979729798297992980029801298022980329804298052980629807298082980929810298112981229813298142981529816298172981829819298202982129822298232982429825298262982729828298292983029831298322983329834298352983629837298382983929840298412984229843298442984529846298472984829849298502985129852298532985429855298562985729858298592986029861298622986329864298652986629867298682986929870298712987229873298742987529876298772987829879298802988129882298832988429885298862988729888298892989029891298922989329894298952989629897298982989929900299012990229903299042990529906299072990829909299102991129912299132991429915299162991729918299192992029921299222992329924299252992629927299282992929930299312993229933299342993529936299372993829939299402994129942299432994429945299462994729948299492995029951299522995329954299552995629957299582995929960299612996229963299642996529966299672996829969299702997129972299732997429975299762997729978299792998029981299822998329984299852998629987299882998929990299912999229993299942999529996299972999829999300003000130002300033000430005300063000730008300093001030011300123001330014300153001630017300183001930020300213002230023300243002530026300273002830029300303003130032300333003430035300363003730038300393004030041300423004330044300453004630047300483004930050300513005230053300543005530056300573005830059300603006130062300633006430065300663006730068300693007030071300723007330074300753007630077300783007930080300813008230083300843008530086300873008830089300903009130092300933009430095300963009730098300993010030101301023010330104301053010630107301083010930110301113011230113301143011530116301173011830119301203012130122301233012430125301263012730128301293013030131301323013330134301353013630137301383013930140301413014230143301443014530146301473014830149301503015130152301533015430155301563015730158301593016030161301623016330164301653016630167301683016930170301713017230173301743017530176301773017830179301803018130182301833018430185301863018730188301893019030191301923019330194301953019630197301983019930200302013020230203302043020530206302073020830209302103021130212302133021430215302163021730218302193022030221302223022330224302253022630227302283022930230302313023230233302343023530236302373023830239302403024130242302433024430245302463024730248302493025030251302523025330254302553025630257302583025930260302613026230263302643026530266302673026830269302703027130272302733027430275302763027730278302793028030281302823028330284302853028630287302883028930290302913029230293302943029530296302973029830299303003030130302303033030430305303063030730308303093031030311303123031330314303153031630317303183031930320303213032230323303243032530326303273032830329303303033130332303333033430335303363033730338303393034030341303423034330344303453034630347303483034930350303513035230353303543035530356303573035830359303603036130362303633036430365303663036730368303693037030371303723037330374303753037630377303783037930380303813038230383303843038530386303873038830389303903039130392303933039430395303963039730398303993040030401304023040330404304053040630407304083040930410304113041230413304143041530416304173041830419304203042130422304233042430425304263042730428304293043030431304323043330434304353043630437304383043930440304413044230443304443044530446304473044830449304503045130452304533045430455304563045730458304593046030461304623046330464304653046630467304683046930470304713047230473304743047530476304773047830479304803048130482304833048430485304863048730488304893049030491304923049330494304953049630497304983049930500305013050230503305043050530506305073050830509305103051130512305133051430515305163051730518305193052030521305223052330524305253052630527305283052930530305313053230533305343053530536305373053830539305403054130542305433054430545305463054730548305493055030551305523055330554305553055630557305583055930560305613056230563305643056530566305673056830569305703057130572305733057430575305763057730578305793058030581305823058330584305853058630587305883058930590305913059230593305943059530596305973059830599306003060130602306033060430605306063060730608306093061030611306123061330614306153061630617306183061930620306213062230623306243062530626306273062830629306303063130632306333063430635306363063730638306393064030641306423064330644306453064630647306483064930650306513065230653306543065530656306573065830659306603066130662306633066430665306663066730668306693067030671306723067330674306753067630677306783067930680306813068230683306843068530686306873068830689306903069130692306933069430695306963069730698306993070030701307023070330704307053070630707307083070930710307113071230713307143071530716307173071830719307203072130722307233072430725307263072730728307293073030731307323073330734307353073630737307383073930740307413074230743307443074530746307473074830749307503075130752307533075430755307563075730758307593076030761307623076330764307653076630767307683076930770307713077230773307743077530776307773077830779307803078130782307833078430785307863078730788307893079030791307923079330794307953079630797307983079930800308013080230803308043080530806308073080830809308103081130812308133081430815308163081730818308193082030821308223082330824308253082630827308283082930830308313083230833308343083530836308373083830839308403084130842308433084430845308463084730848308493085030851308523085330854308553085630857308583085930860308613086230863308643086530866308673086830869308703087130872308733087430875308763087730878308793088030881308823088330884308853088630887308883088930890308913089230893308943089530896308973089830899309003090130902309033090430905309063090730908309093091030911309123091330914309153091630917309183091930920309213092230923309243092530926309273092830929309303093130932309333093430935309363093730938309393094030941309423094330944309453094630947309483094930950309513095230953309543095530956309573095830959309603096130962309633096430965309663096730968309693097030971309723097330974309753097630977309783097930980309813098230983309843098530986309873098830989309903099130992309933099430995309963099730998309993100031001310023100331004310053100631007310083100931010310113101231013310143101531016310173101831019310203102131022310233102431025310263102731028310293103031031310323103331034310353103631037310383103931040310413104231043310443104531046310473104831049310503105131052310533105431055310563105731058310593106031061310623106331064310653106631067310683106931070310713107231073310743107531076310773107831079310803108131082310833108431085310863108731088310893109031091310923109331094310953109631097310983109931100311013110231103311043110531106311073110831109311103111131112311133111431115311163111731118311193112031121311223112331124311253112631127311283112931130311313113231133311343113531136311373113831139311403114131142311433114431145311463114731148311493115031151311523115331154311553115631157311583115931160311613116231163311643116531166311673116831169311703117131172311733117431175311763117731178311793118031181311823118331184311853118631187311883118931190311913119231193311943119531196311973119831199312003120131202312033120431205312063120731208312093121031211312123121331214312153121631217312183121931220312213122231223312243122531226312273122831229312303123131232312333123431235312363123731238312393124031241312423124331244312453124631247312483124931250312513125231253312543125531256312573125831259312603126131262312633126431265312663126731268312693127031271312723127331274312753127631277312783127931280312813128231283312843128531286312873128831289312903129131292312933129431295312963129731298312993130031301313023130331304313053130631307313083130931310313113131231313313143131531316313173131831319313203132131322313233132431325313263132731328313293133031331313323133331334313353133631337313383133931340313413134231343313443134531346313473134831349313503135131352313533135431355313563135731358313593136031361313623136331364313653136631367313683136931370313713137231373313743137531376313773137831379313803138131382313833138431385313863138731388313893139031391313923139331394313953139631397313983139931400314013140231403314043140531406314073140831409314103141131412314133141431415314163141731418314193142031421314223142331424314253142631427314283142931430314313143231433314343143531436314373143831439314403144131442314433144431445314463144731448314493145031451314523145331454314553145631457314583145931460314613146231463314643146531466314673146831469314703147131472314733147431475314763147731478314793148031481314823148331484314853148631487314883148931490314913149231493314943149531496314973149831499315003150131502315033150431505315063150731508315093151031511315123151331514315153151631517315183151931520315213152231523315243152531526315273152831529315303153131532315333153431535315363153731538315393154031541315423154331544315453154631547315483154931550315513155231553315543155531556315573155831559315603156131562315633156431565315663156731568315693157031571315723157331574315753157631577315783157931580315813158231583315843158531586315873158831589315903159131592315933159431595315963159731598315993160031601316023160331604316053160631607316083160931610316113161231613316143161531616316173161831619316203162131622316233162431625316263162731628316293163031631316323163331634316353163631637316383163931640316413164231643316443164531646316473164831649316503165131652316533165431655316563165731658316593166031661316623166331664316653166631667316683166931670316713167231673316743167531676316773167831679316803168131682316833168431685316863168731688316893169031691316923169331694316953169631697316983169931700317013170231703317043170531706317073170831709317103171131712317133171431715317163171731718317193172031721317223172331724317253172631727317283172931730317313173231733317343173531736317373173831739317403174131742317433174431745317463174731748317493175031751317523175331754317553175631757317583175931760317613176231763317643176531766317673176831769317703177131772317733177431775317763177731778317793178031781317823178331784317853178631787317883178931790317913179231793317943179531796317973179831799318003180131802318033180431805318063180731808318093181031811318123181331814318153181631817318183181931820318213182231823318243182531826318273182831829318303183131832318333183431835318363183731838318393184031841318423184331844318453184631847318483184931850318513185231853318543185531856318573185831859318603186131862318633186431865318663186731868318693187031871318723187331874318753187631877318783187931880318813188231883318843188531886318873188831889318903189131892318933189431895318963189731898318993190031901319023190331904319053190631907319083190931910319113191231913319143191531916319173191831919319203192131922319233192431925319263192731928319293193031931319323193331934319353193631937319383193931940319413194231943319443194531946319473194831949319503195131952319533195431955319563195731958319593196031961319623196331964319653196631967319683196931970319713197231973319743197531976319773197831979319803198131982319833198431985319863198731988319893199031991319923199331994319953199631997319983199932000320013200232003320043200532006320073200832009320103201132012320133201432015320163201732018320193202032021320223202332024320253202632027320283202932030320313203232033320343203532036320373203832039320403204132042320433204432045320463204732048320493205032051320523205332054320553205632057320583205932060320613206232063320643206532066320673206832069320703207132072320733207432075320763207732078320793208032081320823208332084320853208632087320883208932090320913209232093320943209532096320973209832099321003210132102321033210432105321063210732108321093211032111321123211332114321153211632117321183211932120321213212232123321243212532126321273212832129321303213132132321333213432135321363213732138321393214032141321423214332144321453214632147321483214932150321513215232153321543215532156321573215832159321603216132162321633216432165321663216732168321693217032171321723217332174321753217632177321783217932180321813218232183321843218532186321873218832189321903219132192321933219432195321963219732198321993220032201322023220332204322053220632207322083220932210322113221232213322143221532216322173221832219322203222132222322233222432225322263222732228322293223032231322323223332234322353223632237322383223932240322413224232243322443224532246322473224832249322503225132252322533225432255322563225732258322593226032261322623226332264322653226632267322683226932270322713227232273322743227532276322773227832279322803228132282322833228432285322863228732288322893229032291322923229332294322953229632297322983229932300323013230232303323043230532306323073230832309323103231132312323133231432315323163231732318323193232032321323223232332324323253232632327323283232932330323313233232333323343233532336323373233832339323403234132342323433234432345323463234732348323493235032351323523235332354323553235632357323583235932360323613236232363323643236532366323673236832369323703237132372323733237432375323763237732378323793238032381323823238332384323853238632387323883238932390323913239232393323943239532396323973239832399324003240132402324033240432405324063240732408324093241032411324123241332414324153241632417324183241932420324213242232423324243242532426324273242832429324303243132432324333243432435324363243732438324393244032441324423244332444324453244632447324483244932450324513245232453324543245532456324573245832459324603246132462324633246432465324663246732468324693247032471324723247332474324753247632477324783247932480324813248232483324843248532486324873248832489324903249132492324933249432495324963249732498324993250032501325023250332504325053250632507325083250932510325113251232513325143251532516325173251832519325203252132522325233252432525325263252732528325293253032531325323253332534325353253632537325383253932540325413254232543325443254532546325473254832549325503255132552325533255432555325563255732558325593256032561325623256332564325653256632567325683256932570325713257232573325743257532576325773257832579325803258132582325833258432585325863258732588325893259032591325923259332594325953259632597325983259932600326013260232603326043260532606326073260832609326103261132612326133261432615326163261732618326193262032621326223262332624326253262632627326283262932630326313263232633326343263532636326373263832639326403264132642326433264432645326463264732648326493265032651326523265332654326553265632657326583265932660326613266232663326643266532666326673266832669326703267132672326733267432675326763267732678326793268032681326823268332684326853268632687326883268932690326913269232693326943269532696326973269832699327003270132702327033270432705327063270732708327093271032711327123271332714327153271632717327183271932720327213272232723327243272532726327273272832729327303273132732327333273432735327363273732738327393274032741327423274332744327453274632747327483274932750327513275232753327543275532756327573275832759327603276132762327633276432765327663276732768327693277032771327723277332774327753277632777327783277932780327813278232783327843278532786327873278832789327903279132792327933279432795327963279732798327993280032801328023280332804328053280632807328083280932810328113281232813328143281532816328173281832819328203282132822328233282432825328263282732828328293283032831328323283332834328353283632837328383283932840328413284232843328443284532846328473284832849328503285132852328533285432855328563285732858328593286032861328623286332864328653286632867328683286932870328713287232873328743287532876328773287832879328803288132882328833288432885328863288732888328893289032891328923289332894328953289632897328983289932900329013290232903329043290532906329073290832909329103291132912329133291432915329163291732918329193292032921329223292332924329253292632927329283292932930329313293232933329343293532936329373293832939329403294132942329433294432945329463294732948329493295032951329523295332954329553295632957329583295932960329613296232963329643296532966329673296832969329703297132972329733297432975329763297732978329793298032981329823298332984329853298632987329883298932990329913299232993329943299532996329973299832999330003300133002330033300433005330063300733008330093301033011330123301333014330153301633017330183301933020330213302233023330243302533026330273302833029330303303133032330333303433035330363303733038330393304033041330423304333044330453304633047330483304933050330513305233053330543305533056330573305833059330603306133062330633306433065330663306733068330693307033071330723307333074330753307633077330783307933080330813308233083330843308533086330873308833089330903309133092330933309433095330963309733098330993310033101331023310333104331053310633107331083310933110331113311233113331143311533116331173311833119331203312133122331233312433125331263312733128331293313033131331323313333134331353313633137331383313933140331413314233143331443314533146331473314833149331503315133152331533315433155331563315733158331593316033161331623316333164331653316633167331683316933170331713317233173331743317533176331773317833179331803318133182331833318433185331863318733188331893319033191331923319333194331953319633197331983319933200332013320233203332043320533206332073320833209332103321133212332133321433215332163321733218332193322033221332223322333224332253322633227332283322933230332313323233233332343323533236332373323833239332403324133242332433324433245332463324733248332493325033251332523325333254332553325633257332583325933260332613326233263332643326533266332673326833269332703327133272332733327433275332763327733278332793328033281332823328333284332853328633287332883328933290332913329233293332943329533296332973329833299333003330133302333033330433305333063330733308333093331033311333123331333314333153331633317333183331933320333213332233323333243332533326333273332833329333303333133332333333333433335333363333733338333393334033341333423334333344333453334633347333483334933350333513335233353333543335533356333573335833359333603336133362333633336433365333663336733368333693337033371333723337333374333753337633377333783337933380333813338233383333843338533386333873338833389333903339133392333933339433395333963339733398333993340033401334023340333404334053340633407334083340933410334113341233413334143341533416334173341833419334203342133422334233342433425334263342733428334293343033431334323343333434334353343633437334383343933440334413344233443334443344533446334473344833449334503345133452334533345433455334563345733458334593346033461334623346333464334653346633467334683346933470334713347233473334743347533476334773347833479334803348133482334833348433485334863348733488334893349033491334923349333494334953349633497334983349933500335013350233503335043350533506335073350833509335103351133512335133351433515335163351733518335193352033521335223352333524335253352633527335283352933530335313353233533335343353533536335373353833539335403354133542335433354433545335463354733548335493355033551335523355333554335553355633557335583355933560335613356233563335643356533566335673356833569335703357133572335733357433575335763357733578335793358033581335823358333584335853358633587335883358933590335913359233593335943359533596335973359833599336003360133602336033360433605336063360733608336093361033611336123361333614336153361633617336183361933620336213362233623336243362533626336273362833629336303363133632336333363433635336363363733638336393364033641336423364333644336453364633647336483364933650336513365233653336543365533656336573365833659336603366133662336633366433665336663366733668336693367033671336723367333674336753367633677336783367933680336813368233683336843368533686336873368833689336903369133692336933369433695336963369733698336993370033701337023370333704337053370633707337083370933710337113371233713337143371533716337173371833719337203372133722337233372433725337263372733728337293373033731337323373333734337353373633737337383373933740337413374233743337443374533746337473374833749337503375133752337533375433755337563375733758337593376033761337623376333764337653376633767337683376933770337713377233773337743377533776337773377833779337803378133782337833378433785337863378733788337893379033791337923379333794337953379633797337983379933800338013380233803338043380533806338073380833809338103381133812338133381433815338163381733818338193382033821338223382333824338253382633827338283382933830338313383233833338343383533836338373383833839338403384133842338433384433845338463384733848338493385033851338523385333854338553385633857338583385933860338613386233863338643386533866338673386833869338703387133872338733387433875338763387733878338793388033881338823388333884338853388633887338883388933890338913389233893338943389533896338973389833899339003390133902339033390433905339063390733908339093391033911339123391333914339153391633917339183391933920339213392233923339243392533926339273392833929339303393133932339333393433935339363393733938339393394033941339423394333944339453394633947339483394933950339513395233953339543395533956339573395833959339603396133962339633396433965339663396733968339693397033971339723397333974339753397633977339783397933980339813398233983339843398533986339873398833989339903399133992339933399433995339963399733998339993400034001340023400334004340053400634007340083400934010340113401234013340143401534016340173401834019340203402134022340233402434025340263402734028340293403034031340323403334034340353403634037340383403934040340413404234043340443404534046340473404834049340503405134052340533405434055340563405734058340593406034061340623406334064340653406634067340683406934070340713407234073340743407534076340773407834079340803408134082340833408434085340863408734088340893409034091340923409334094340953409634097340983409934100341013410234103341043410534106341073410834109341103411134112341133411434115341163411734118341193412034121341223412334124341253412634127341283412934130341313413234133341343413534136341373413834139341403414134142341433414434145341463414734148341493415034151341523415334154341553415634157341583415934160341613416234163341643416534166341673416834169341703417134172341733417434175341763417734178341793418034181341823418334184341853418634187341883418934190341913419234193341943419534196341973419834199342003420134202342033420434205342063420734208342093421034211342123421334214342153421634217342183421934220342213422234223342243422534226342273422834229342303423134232342333423434235342363423734238342393424034241342423424334244342453424634247342483424934250342513425234253342543425534256342573425834259342603426134262342633426434265342663426734268342693427034271342723427334274342753427634277342783427934280342813428234283342843428534286342873428834289342903429134292342933429434295342963429734298342993430034301343023430334304343053430634307343083430934310343113431234313343143431534316343173431834319343203432134322343233432434325343263432734328343293433034331343323433334334343353433634337343383433934340343413434234343343443434534346343473434834349343503435134352343533435434355343563435734358343593436034361343623436334364343653436634367343683436934370343713437234373343743437534376343773437834379343803438134382343833438434385343863438734388343893439034391343923439334394343953439634397343983439934400344013440234403344043440534406344073440834409344103441134412344133441434415344163441734418344193442034421344223442334424344253442634427344283442934430344313443234433344343443534436344373443834439344403444134442344433444434445344463444734448344493445034451344523445334454344553445634457344583445934460344613446234463344643446534466344673446834469344703447134472344733447434475344763447734478344793448034481344823448334484344853448634487344883448934490344913449234493344943449534496344973449834499345003450134502345033450434505345063450734508345093451034511345123451334514345153451634517345183451934520345213452234523345243452534526345273452834529345303453134532345333453434535345363453734538345393454034541345423454334544345453454634547345483454934550345513455234553345543455534556345573455834559345603456134562345633456434565345663456734568345693457034571345723457334574345753457634577345783457934580345813458234583345843458534586345873458834589345903459134592345933459434595345963459734598345993460034601346023460334604346053460634607346083460934610346113461234613346143461534616346173461834619346203462134622346233462434625346263462734628346293463034631346323463334634346353463634637346383463934640346413464234643346443464534646346473464834649346503465134652346533465434655346563465734658346593466034661346623466334664346653466634667346683466934670346713467234673346743467534676346773467834679346803468134682346833468434685346863468734688346893469034691346923469334694346953469634697346983469934700347013470234703347043470534706347073470834709347103471134712347133471434715347163471734718347193472034721347223472334724347253472634727347283472934730347313473234733347343473534736347373473834739347403474134742347433474434745347463474734748347493475034751347523475334754347553475634757347583475934760347613476234763347643476534766347673476834769347703477134772347733477434775347763477734778347793478034781347823478334784347853478634787347883478934790347913479234793347943479534796347973479834799348003480134802348033480434805348063480734808348093481034811348123481334814348153481634817348183481934820348213482234823348243482534826348273482834829348303483134832348333483434835348363483734838348393484034841348423484334844348453484634847348483484934850348513485234853348543485534856348573485834859348603486134862348633486434865348663486734868348693487034871348723487334874348753487634877348783487934880348813488234883348843488534886348873488834889348903489134892348933489434895348963489734898348993490034901349023490334904349053490634907349083490934910349113491234913349143491534916349173491834919349203492134922349233492434925349263492734928349293493034931349323493334934349353493634937349383493934940349413494234943349443494534946349473494834949349503495134952349533495434955349563495734958349593496034961349623496334964349653496634967349683496934970349713497234973349743497534976349773497834979349803498134982349833498434985349863498734988349893499034991349923499334994349953499634997349983499935000350013500235003350043500535006350073500835009350103501135012350133501435015350163501735018350193502035021350223502335024350253502635027350283502935030350313503235033350343503535036350373503835039350403504135042350433504435045350463504735048350493505035051350523505335054350553505635057350583505935060350613506235063350643506535066350673506835069350703507135072350733507435075350763507735078350793508035081350823508335084350853508635087350883508935090350913509235093350943509535096350973509835099351003510135102351033510435105351063510735108351093511035111351123511335114351153511635117351183511935120351213512235123351243512535126351273512835129351303513135132351333513435135351363513735138351393514035141351423514335144351453514635147351483514935150351513515235153351543515535156351573515835159351603516135162351633516435165351663516735168351693517035171351723517335174351753517635177351783517935180351813518235183351843518535186351873518835189351903519135192351933519435195351963519735198351993520035201352023520335204352053520635207352083520935210352113521235213352143521535216352173521835219352203522135222352233522435225352263522735228352293523035231352323523335234352353523635237352383523935240352413524235243352443524535246352473524835249352503525135252352533525435255352563525735258352593526035261352623526335264352653526635267352683526935270352713527235273352743527535276352773527835279352803528135282352833528435285352863528735288352893529035291352923529335294352953529635297352983529935300353013530235303353043530535306353073530835309353103531135312353133531435315353163531735318353193532035321353223532335324353253532635327353283532935330353313533235333353343533535336353373533835339353403534135342353433534435345353463534735348353493535035351353523535335354353553535635357353583535935360353613536235363353643536535366353673536835369353703537135372353733537435375353763537735378353793538035381353823538335384353853538635387353883538935390353913539235393353943539535396353973539835399354003540135402354033540435405354063540735408354093541035411354123541335414354153541635417354183541935420354213542235423354243542535426354273542835429354303543135432354333543435435354363543735438354393544035441354423544335444354453544635447354483544935450354513545235453354543545535456354573545835459354603546135462354633546435465354663546735468354693547035471354723547335474354753547635477354783547935480354813548235483354843548535486354873548835489354903549135492354933549435495354963549735498354993550035501355023550335504355053550635507355083550935510355113551235513355143551535516355173551835519355203552135522355233552435525355263552735528355293553035531355323553335534355353553635537355383553935540355413554235543355443554535546355473554835549355503555135552355533555435555355563555735558355593556035561355623556335564355653556635567355683556935570355713557235573355743557535576355773557835579355803558135582355833558435585355863558735588355893559035591355923559335594355953559635597355983559935600356013560235603356043560535606356073560835609356103561135612356133561435615356163561735618356193562035621356223562335624356253562635627356283562935630356313563235633356343563535636356373563835639356403564135642356433564435645356463564735648356493565035651356523565335654356553565635657356583565935660356613566235663356643566535666356673566835669356703567135672356733567435675356763567735678356793568035681356823568335684356853568635687356883568935690356913569235693356943569535696356973569835699357003570135702357033570435705357063570735708357093571035711357123571335714357153571635717357183571935720357213572235723357243572535726357273572835729357303573135732357333573435735357363573735738357393574035741357423574335744357453574635747357483574935750357513575235753357543575535756357573575835759357603576135762357633576435765357663576735768357693577035771357723577335774357753577635777357783577935780357813578235783357843578535786357873578835789357903579135792357933579435795357963579735798357993580035801358023580335804358053580635807358083580935810358113581235813358143581535816358173581835819358203582135822358233582435825358263582735828358293583035831358323583335834358353583635837358383583935840358413584235843358443584535846358473584835849358503585135852358533585435855358563585735858358593586035861358623586335864358653586635867358683586935870358713587235873358743587535876358773587835879358803588135882358833588435885358863588735888358893589035891358923589335894358953589635897358983589935900359013590235903359043590535906359073590835909359103591135912359133591435915359163591735918359193592035921359223592335924359253592635927359283592935930359313593235933359343593535936359373593835939359403594135942359433594435945359463594735948359493595035951359523595335954359553595635957359583595935960359613596235963359643596535966359673596835969359703597135972359733597435975359763597735978359793598035981359823598335984359853598635987359883598935990359913599235993359943599535996359973599835999360003600136002360033600436005360063600736008360093601036011360123601336014360153601636017360183601936020360213602236023360243602536026360273602836029360303603136032360333603436035360363603736038360393604036041360423604336044360453604636047360483604936050360513605236053360543605536056360573605836059360603606136062360633606436065360663606736068360693607036071360723607336074360753607636077360783607936080360813608236083360843608536086360873608836089360903609136092360933609436095360963609736098360993610036101361023610336104361053610636107361083610936110361113611236113361143611536116361173611836119361203612136122361233612436125361263612736128361293613036131361323613336134361353613636137361383613936140361413614236143361443614536146361473614836149361503615136152361533615436155361563615736158361593616036161361623616336164361653616636167361683616936170361713617236173361743617536176361773617836179361803618136182361833618436185361863618736188361893619036191361923619336194361953619636197361983619936200362013620236203362043620536206362073620836209362103621136212362133621436215362163621736218362193622036221362223622336224362253622636227362283622936230362313623236233362343623536236362373623836239362403624136242362433624436245362463624736248362493625036251362523625336254362553625636257362583625936260362613626236263362643626536266362673626836269362703627136272362733627436275362763627736278362793628036281362823628336284362853628636287362883628936290362913629236293362943629536296362973629836299363003630136302363033630436305363063630736308363093631036311363123631336314363153631636317363183631936320363213632236323363243632536326363273632836329363303633136332363333633436335363363633736338363393634036341363423634336344363453634636347363483634936350363513635236353363543635536356363573635836359363603636136362363633636436365363663636736368363693637036371363723637336374363753637636377363783637936380363813638236383363843638536386363873638836389363903639136392363933639436395363963639736398363993640036401364023640336404364053640636407364083640936410364113641236413364143641536416364173641836419364203642136422364233642436425364263642736428364293643036431364323643336434364353643636437364383643936440364413644236443364443644536446364473644836449364503645136452364533645436455364563645736458364593646036461364623646336464364653646636467364683646936470364713647236473364743647536476364773647836479364803648136482364833648436485364863648736488364893649036491364923649336494364953649636497364983649936500365013650236503365043650536506365073650836509365103651136512365133651436515365163651736518365193652036521365223652336524365253652636527365283652936530365313653236533365343653536536365373653836539365403654136542365433654436545365463654736548365493655036551365523655336554365553655636557365583655936560365613656236563365643656536566365673656836569365703657136572365733657436575365763657736578365793658036581365823658336584365853658636587365883658936590365913659236593365943659536596365973659836599366003660136602366033660436605366063660736608366093661036611366123661336614366153661636617366183661936620366213662236623366243662536626366273662836629366303663136632366333663436635366363663736638366393664036641366423664336644366453664636647366483664936650366513665236653366543665536656366573665836659366603666136662366633666436665366663666736668366693667036671366723667336674366753667636677366783667936680366813668236683366843668536686366873668836689366903669136692366933669436695366963669736698366993670036701367023670336704367053670636707367083670936710367113671236713367143671536716367173671836719367203672136722367233672436725367263672736728367293673036731367323673336734367353673636737367383673936740367413674236743367443674536746367473674836749367503675136752367533675436755367563675736758367593676036761367623676336764367653676636767367683676936770367713677236773367743677536776367773677836779367803678136782367833678436785367863678736788367893679036791367923679336794367953679636797367983679936800368013680236803368043680536806368073680836809368103681136812368133681436815368163681736818368193682036821368223682336824368253682636827368283682936830368313683236833368343683536836368373683836839368403684136842368433684436845368463684736848368493685036851368523685336854368553685636857368583685936860368613686236863368643686536866368673686836869368703687136872368733687436875368763687736878368793688036881368823688336884368853688636887368883688936890368913689236893368943689536896368973689836899369003690136902369033690436905369063690736908369093691036911369123691336914369153691636917369183691936920369213692236923369243692536926369273692836929369303693136932369333693436935369363693736938369393694036941369423694336944369453694636947369483694936950369513695236953369543695536956369573695836959369603696136962369633696436965369663696736968369693697036971369723697336974369753697636977369783697936980369813698236983369843698536986369873698836989369903699136992369933699436995369963699736998369993700037001370023700337004370053700637007370083700937010370113701237013370143701537016370173701837019370203702137022370233702437025370263702737028370293703037031370323703337034370353703637037370383703937040370413704237043370443704537046370473704837049370503705137052370533705437055370563705737058370593706037061370623706337064370653706637067370683706937070370713707237073370743707537076370773707837079370803708137082370833708437085370863708737088370893709037091370923709337094370953709637097370983709937100371013710237103371043710537106371073710837109371103711137112371133711437115371163711737118371193712037121371223712337124371253712637127371283712937130371313713237133371343713537136371373713837139371403714137142371433714437145371463714737148371493715037151371523715337154371553715637157371583715937160371613716237163371643716537166371673716837169371703717137172371733717437175371763717737178371793718037181371823718337184371853718637187371883718937190371913719237193371943719537196371973719837199372003720137202372033720437205372063720737208372093721037211372123721337214372153721637217372183721937220372213722237223372243722537226372273722837229372303723137232372333723437235372363723737238372393724037241372423724337244372453724637247372483724937250372513725237253372543725537256372573725837259372603726137262372633726437265372663726737268372693727037271372723727337274372753727637277372783727937280372813728237283372843728537286372873728837289372903729137292372933729437295372963729737298372993730037301373023730337304373053730637307373083730937310373113731237313373143731537316373173731837319373203732137322373233732437325373263732737328373293733037331373323733337334373353733637337373383733937340373413734237343373443734537346373473734837349373503735137352373533735437355373563735737358373593736037361373623736337364373653736637367373683736937370373713737237373373743737537376373773737837379373803738137382373833738437385373863738737388373893739037391373923739337394373953739637397373983739937400374013740237403374043740537406374073740837409374103741137412374133741437415374163741737418374193742037421374223742337424374253742637427374283742937430374313743237433374343743537436374373743837439374403744137442374433744437445374463744737448374493745037451374523745337454374553745637457374583745937460374613746237463374643746537466374673746837469374703747137472374733747437475374763747737478374793748037481374823748337484374853748637487374883748937490374913749237493374943749537496374973749837499375003750137502375033750437505375063750737508375093751037511375123751337514375153751637517375183751937520375213752237523375243752537526375273752837529375303753137532375333753437535375363753737538375393754037541375423754337544375453754637547375483754937550375513755237553375543755537556375573755837559375603756137562375633756437565375663756737568375693757037571375723757337574375753757637577375783757937580375813758237583375843758537586375873758837589375903759137592375933759437595375963759737598375993760037601376023760337604376053760637607376083760937610376113761237613376143761537616376173761837619376203762137622376233762437625376263762737628376293763037631376323763337634376353763637637376383763937640376413764237643376443764537646376473764837649376503765137652376533765437655376563765737658376593766037661376623766337664376653766637667376683766937670376713767237673376743767537676376773767837679376803768137682376833768437685376863768737688376893769037691376923769337694376953769637697376983769937700377013770237703377043770537706377073770837709377103771137712377133771437715377163771737718377193772037721377223772337724377253772637727377283772937730377313773237733377343773537736377373773837739377403774137742377433774437745377463774737748377493775037751377523775337754377553775637757377583775937760377613776237763377643776537766377673776837769377703777137772377733777437775377763777737778377793778037781377823778337784377853778637787377883778937790377913779237793377943779537796377973779837799378003780137802378033780437805378063780737808378093781037811378123781337814378153781637817378183781937820378213782237823378243782537826378273782837829378303783137832378333783437835378363783737838378393784037841378423784337844378453784637847378483784937850378513785237853378543785537856378573785837859378603786137862378633786437865378663786737868378693787037871378723787337874378753787637877378783787937880378813788237883378843788537886378873788837889378903789137892378933789437895378963789737898378993790037901379023790337904379053790637907379083790937910379113791237913379143791537916379173791837919379203792137922379233792437925379263792737928379293793037931379323793337934379353793637937379383793937940379413794237943379443794537946379473794837949379503795137952379533795437955379563795737958379593796037961379623796337964379653796637967379683796937970379713797237973379743797537976379773797837979379803798137982379833798437985379863798737988379893799037991379923799337994379953799637997379983799938000380013800238003380043800538006380073800838009380103801138012380133801438015380163801738018380193802038021380223802338024380253802638027380283802938030380313803238033380343803538036380373803838039380403804138042380433804438045380463804738048380493805038051380523805338054380553805638057380583805938060380613806238063380643806538066380673806838069380703807138072380733807438075380763807738078380793808038081380823808338084380853808638087380883808938090380913809238093380943809538096380973809838099381003810138102381033810438105381063810738108381093811038111381123811338114381153811638117381183811938120381213812238123381243812538126381273812838129381303813138132381333813438135381363813738138381393814038141381423814338144381453814638147381483814938150381513815238153381543815538156381573815838159381603816138162381633816438165381663816738168381693817038171381723817338174381753817638177381783817938180381813818238183381843818538186381873818838189381903819138192381933819438195381963819738198381993820038201382023820338204382053820638207382083820938210382113821238213382143821538216382173821838219382203822138222382233822438225382263822738228382293823038231382323823338234382353823638237382383823938240382413824238243382443824538246382473824838249382503825138252382533825438255382563825738258382593826038261382623826338264382653826638267382683826938270382713827238273382743827538276382773827838279382803828138282382833828438285382863828738288382893829038291382923829338294382953829638297382983829938300383013830238303383043830538306383073830838309383103831138312383133831438315383163831738318383193832038321383223832338324383253832638327383283832938330383313833238333383343833538336383373833838339383403834138342383433834438345383463834738348383493835038351383523835338354383553835638357383583835938360383613836238363383643836538366383673836838369383703837138372383733837438375383763837738378383793838038381383823838338384383853838638387383883838938390383913839238393383943839538396383973839838399384003840138402384033840438405384063840738408384093841038411384123841338414384153841638417384183841938420384213842238423384243842538426384273842838429384303843138432384333843438435384363843738438384393844038441384423844338444384453844638447384483844938450384513845238453384543845538456384573845838459384603846138462384633846438465384663846738468384693847038471384723847338474384753847638477384783847938480384813848238483384843848538486384873848838489384903849138492384933849438495384963849738498384993850038501385023850338504385053850638507385083850938510385113851238513385143851538516385173851838519385203852138522385233852438525385263852738528385293853038531385323853338534385353853638537385383853938540385413854238543385443854538546385473854838549385503855138552385533855438555385563855738558385593856038561385623856338564385653856638567385683856938570385713857238573385743857538576385773857838579385803858138582385833858438585385863858738588385893859038591385923859338594385953859638597385983859938600386013860238603386043860538606386073860838609386103861138612386133861438615386163861738618386193862038621386223862338624386253862638627386283862938630386313863238633386343863538636386373863838639386403864138642386433864438645386463864738648386493865038651386523865338654386553865638657386583865938660386613866238663386643866538666386673866838669386703867138672386733867438675386763867738678386793868038681386823868338684386853868638687386883868938690386913869238693386943869538696386973869838699387003870138702387033870438705387063870738708387093871038711387123871338714387153871638717387183871938720387213872238723387243872538726387273872838729387303873138732387333873438735387363873738738387393874038741387423874338744387453874638747387483874938750387513875238753387543875538756387573875838759387603876138762387633876438765387663876738768387693877038771387723877338774387753877638777387783877938780387813878238783387843878538786387873878838789387903879138792387933879438795387963879738798387993880038801388023880338804388053880638807388083880938810388113881238813388143881538816388173881838819388203882138822388233882438825388263882738828388293883038831388323883338834388353883638837388383883938840388413884238843388443884538846388473884838849388503885138852388533885438855388563885738858388593886038861388623886338864388653886638867388683886938870388713887238873388743887538876388773887838879388803888138882388833888438885388863888738888388893889038891388923889338894388953889638897388983889938900389013890238903389043890538906389073890838909389103891138912389133891438915389163891738918389193892038921389223892338924389253892638927389283892938930389313893238933389343893538936389373893838939389403894138942389433894438945389463894738948389493895038951389523895338954389553895638957389583895938960389613896238963389643896538966389673896838969389703897138972389733897438975389763897738978389793898038981389823898338984389853898638987389883898938990389913899238993389943899538996389973899838999390003900139002390033900439005390063900739008390093901039011390123901339014390153901639017390183901939020390213902239023390243902539026390273902839029390303903139032390333903439035390363903739038390393904039041390423904339044390453904639047390483904939050390513905239053390543905539056390573905839059390603906139062390633906439065390663906739068390693907039071390723907339074390753907639077390783907939080390813908239083390843908539086390873908839089390903909139092390933909439095390963909739098390993910039101391023910339104391053910639107391083910939110391113911239113391143911539116391173911839119391203912139122391233912439125391263912739128391293913039131391323913339134391353913639137391383913939140391413914239143391443914539146391473914839149391503915139152391533915439155391563915739158391593916039161391623916339164391653916639167391683916939170391713917239173391743917539176391773917839179391803918139182391833918439185391863918739188391893919039191391923919339194391953919639197391983919939200392013920239203392043920539206392073920839209392103921139212392133921439215392163921739218392193922039221392223922339224392253922639227392283922939230392313923239233392343923539236392373923839239392403924139242392433924439245392463924739248392493925039251392523925339254392553925639257392583925939260392613926239263392643926539266392673926839269392703927139272392733927439275392763927739278392793928039281392823928339284392853928639287392883928939290392913929239293392943929539296392973929839299393003930139302393033930439305393063930739308393093931039311393123931339314393153931639317393183931939320393213932239323393243932539326393273932839329393303933139332393333933439335393363933739338393393934039341393423934339344393453934639347393483934939350393513935239353393543935539356393573935839359393603936139362393633936439365393663936739368393693937039371393723937339374393753937639377393783937939380393813938239383393843938539386393873938839389393903939139392393933939439395393963939739398393993940039401394023940339404394053940639407394083940939410394113941239413394143941539416394173941839419394203942139422394233942439425394263942739428394293943039431394323943339434394353943639437394383943939440394413944239443394443944539446394473944839449394503945139452394533945439455394563945739458394593946039461394623946339464394653946639467394683946939470394713947239473394743947539476394773947839479394803948139482394833948439485394863948739488394893949039491394923949339494394953949639497394983949939500395013950239503395043950539506395073950839509395103951139512395133951439515395163951739518395193952039521395223952339524395253952639527395283952939530395313953239533395343953539536395373953839539395403954139542395433954439545395463954739548395493955039551395523955339554395553955639557395583955939560395613956239563395643956539566395673956839569395703957139572395733957439575395763957739578395793958039581395823958339584395853958639587395883958939590395913959239593395943959539596395973959839599396003960139602396033960439605396063960739608396093961039611396123961339614396153961639617396183961939620396213962239623396243962539626396273962839629396303963139632396333963439635396363963739638396393964039641396423964339644396453964639647396483964939650396513965239653396543965539656396573965839659396603966139662396633966439665396663966739668396693967039671396723967339674396753967639677396783967939680396813968239683396843968539686396873968839689396903969139692396933969439695396963969739698396993970039701397023970339704397053970639707397083970939710397113971239713397143971539716397173971839719397203972139722397233972439725397263972739728397293973039731397323973339734397353973639737397383973939740397413974239743397443974539746397473974839749397503975139752397533975439755397563975739758397593976039761397623976339764397653976639767397683976939770397713977239773397743977539776397773977839779397803978139782397833978439785397863978739788397893979039791397923979339794397953979639797397983979939800398013980239803398043980539806398073980839809398103981139812398133981439815398163981739818398193982039821398223982339824398253982639827398283982939830398313983239833398343983539836398373983839839398403984139842398433984439845398463984739848398493985039851398523985339854398553985639857398583985939860398613986239863398643986539866398673986839869398703987139872398733987439875398763987739878398793988039881398823988339884398853988639887398883988939890398913989239893398943989539896398973989839899399003990139902399033990439905399063990739908399093991039911399123991339914399153991639917399183991939920399213992239923399243992539926399273992839929399303993139932399333993439935399363993739938399393994039941399423994339944399453994639947399483994939950399513995239953399543995539956399573995839959399603996139962399633996439965399663996739968399693997039971399723997339974399753997639977399783997939980399813998239983399843998539986399873998839989399903999139992399933999439995399963999739998399994000040001400024000340004400054000640007400084000940010400114001240013400144001540016400174001840019400204002140022400234002440025400264002740028400294003040031400324003340034400354003640037400384003940040400414004240043400444004540046400474004840049400504005140052400534005440055400564005740058400594006040061400624006340064400654006640067400684006940070400714007240073400744007540076400774007840079400804008140082400834008440085400864008740088400894009040091400924009340094400954009640097400984009940100401014010240103401044010540106401074010840109401104011140112401134011440115401164011740118401194012040121401224012340124401254012640127401284012940130401314013240133401344013540136401374013840139401404014140142401434014440145401464014740148401494015040151401524015340154401554015640157401584015940160401614016240163401644016540166401674016840169401704017140172401734017440175401764017740178401794018040181401824018340184401854018640187401884018940190401914019240193401944019540196401974019840199402004020140202402034020440205402064020740208402094021040211402124021340214402154021640217402184021940220402214022240223402244022540226402274022840229402304023140232402334023440235402364023740238402394024040241402424024340244402454024640247402484024940250402514025240253402544025540256402574025840259402604026140262402634026440265402664026740268402694027040271402724027340274402754027640277402784027940280402814028240283402844028540286402874028840289402904029140292402934029440295402964029740298402994030040301403024030340304403054030640307403084030940310403114031240313403144031540316403174031840319403204032140322403234032440325403264032740328403294033040331403324033340334403354033640337403384033940340403414034240343403444034540346403474034840349403504035140352403534035440355403564035740358403594036040361403624036340364403654036640367403684036940370403714037240373403744037540376403774037840379403804038140382403834038440385403864038740388403894039040391403924039340394403954039640397403984039940400404014040240403404044040540406404074040840409404104041140412404134041440415404164041740418404194042040421404224042340424404254042640427404284042940430404314043240433404344043540436404374043840439404404044140442404434044440445404464044740448404494045040451404524045340454404554045640457404584045940460404614046240463404644046540466404674046840469404704047140472404734047440475404764047740478404794048040481404824048340484404854048640487404884048940490404914049240493404944049540496404974049840499405004050140502405034050440505405064050740508405094051040511405124051340514405154051640517405184051940520405214052240523405244052540526405274052840529405304053140532405334053440535405364053740538405394054040541405424054340544405454054640547405484054940550405514055240553405544055540556405574055840559405604056140562405634056440565405664056740568405694057040571405724057340574405754057640577405784057940580405814058240583405844058540586405874058840589405904059140592405934059440595405964059740598405994060040601406024060340604406054060640607406084060940610406114061240613406144061540616406174061840619406204062140622406234062440625406264062740628406294063040631406324063340634406354063640637406384063940640406414064240643406444064540646406474064840649406504065140652406534065440655406564065740658406594066040661406624066340664406654066640667406684066940670406714067240673406744067540676406774067840679406804068140682406834068440685406864068740688406894069040691406924069340694406954069640697406984069940700407014070240703407044070540706407074070840709407104071140712407134071440715407164071740718407194072040721407224072340724407254072640727407284072940730407314073240733407344073540736407374073840739407404074140742407434074440745407464074740748407494075040751407524075340754407554075640757407584075940760407614076240763407644076540766407674076840769407704077140772407734077440775407764077740778407794078040781407824078340784407854078640787407884078940790407914079240793407944079540796407974079840799408004080140802408034080440805408064080740808408094081040811408124081340814408154081640817408184081940820408214082240823408244082540826408274082840829408304083140832408334083440835408364083740838408394084040841408424084340844408454084640847408484084940850408514085240853408544085540856408574085840859408604086140862408634086440865408664086740868408694087040871408724087340874408754087640877408784087940880408814088240883408844088540886408874088840889408904089140892408934089440895408964089740898408994090040901409024090340904409054090640907409084090940910409114091240913409144091540916409174091840919409204092140922409234092440925409264092740928409294093040931409324093340934409354093640937409384093940940409414094240943409444094540946409474094840949409504095140952409534095440955409564095740958409594096040961409624096340964409654096640967409684096940970409714097240973409744097540976409774097840979409804098140982409834098440985409864098740988409894099040991409924099340994409954099640997409984099941000410014100241003410044100541006410074100841009410104101141012410134101441015410164101741018410194102041021410224102341024410254102641027410284102941030410314103241033410344103541036410374103841039410404104141042410434104441045410464104741048410494105041051410524105341054410554105641057410584105941060410614106241063410644106541066410674106841069410704107141072410734107441075410764107741078410794108041081410824108341084410854108641087410884108941090410914109241093410944109541096410974109841099411004110141102411034110441105411064110741108411094111041111411124111341114411154111641117411184111941120411214112241123411244112541126411274112841129411304113141132411334113441135411364113741138411394114041141411424114341144411454114641147411484114941150411514115241153411544115541156411574115841159411604116141162411634116441165411664116741168411694117041171411724117341174411754117641177411784117941180411814118241183411844118541186411874118841189411904119141192411934119441195411964119741198411994120041201412024120341204412054120641207412084120941210412114121241213412144121541216412174121841219412204122141222412234122441225412264122741228412294123041231412324123341234412354123641237412384123941240412414124241243412444124541246412474124841249412504125141252412534125441255412564125741258412594126041261412624126341264412654126641267412684126941270412714127241273412744127541276412774127841279412804128141282412834128441285412864128741288412894129041291412924129341294412954129641297412984129941300413014130241303413044130541306413074130841309413104131141312413134131441315413164131741318413194132041321413224132341324413254132641327413284132941330413314133241333413344133541336413374133841339413404134141342413434134441345413464134741348413494135041351413524135341354413554135641357413584135941360413614136241363413644136541366413674136841369413704137141372413734137441375413764137741378413794138041381413824138341384413854138641387413884138941390413914139241393413944139541396413974139841399414004140141402414034140441405414064140741408414094141041411414124141341414414154141641417414184141941420414214142241423414244142541426414274142841429414304143141432414334143441435414364143741438414394144041441414424144341444414454144641447414484144941450414514145241453414544145541456414574145841459414604146141462414634146441465414664146741468414694147041471414724147341474414754147641477414784147941480414814148241483414844148541486414874148841489414904149141492414934149441495414964149741498414994150041501415024150341504415054150641507415084150941510415114151241513415144151541516415174151841519415204152141522415234152441525415264152741528415294153041531415324153341534415354153641537415384153941540415414154241543415444154541546415474154841549415504155141552415534155441555415564155741558415594156041561415624156341564415654156641567415684156941570415714157241573415744157541576415774157841579415804158141582415834158441585415864158741588415894159041591415924159341594415954159641597415984159941600416014160241603416044160541606416074160841609416104161141612416134161441615416164161741618416194162041621416224162341624416254162641627416284162941630416314163241633416344163541636416374163841639416404164141642416434164441645416464164741648416494165041651416524165341654416554165641657416584165941660416614166241663416644166541666416674166841669416704167141672416734167441675416764167741678416794168041681416824168341684416854168641687416884168941690416914169241693416944169541696416974169841699417004170141702417034170441705417064170741708417094171041711417124171341714417154171641717417184171941720417214172241723417244172541726417274172841729417304173141732417334173441735417364173741738417394174041741417424174341744417454174641747417484174941750417514175241753417544175541756417574175841759417604176141762417634176441765417664176741768417694177041771417724177341774417754177641777417784177941780417814178241783417844178541786417874178841789417904179141792417934179441795417964179741798417994180041801418024180341804418054180641807418084180941810418114181241813418144181541816418174181841819418204182141822418234182441825418264182741828418294183041831418324183341834418354183641837418384183941840418414184241843418444184541846418474184841849418504185141852418534185441855418564185741858418594186041861418624186341864418654186641867418684186941870418714187241873418744187541876418774187841879418804188141882418834188441885418864188741888418894189041891418924189341894418954189641897418984189941900419014190241903419044190541906419074190841909419104191141912419134191441915419164191741918419194192041921419224192341924419254192641927419284192941930419314193241933419344193541936419374193841939419404194141942419434194441945419464194741948419494195041951419524195341954419554195641957419584195941960419614196241963419644196541966419674196841969419704197141972419734197441975419764197741978419794198041981419824198341984419854198641987419884198941990419914199241993419944199541996419974199841999420004200142002420034200442005420064200742008420094201042011420124201342014420154201642017420184201942020420214202242023420244202542026420274202842029420304203142032420334203442035420364203742038420394204042041420424204342044420454204642047420484204942050420514205242053420544205542056420574205842059420604206142062420634206442065420664206742068420694207042071420724207342074420754207642077420784207942080420814208242083420844208542086420874208842089420904209142092420934209442095420964209742098420994210042101421024210342104421054210642107421084210942110421114211242113421144211542116421174211842119421204212142122421234212442125421264212742128421294213042131421324213342134421354213642137421384213942140421414214242143421444214542146421474214842149421504215142152421534215442155421564215742158421594216042161421624216342164421654216642167421684216942170421714217242173421744217542176421774217842179421804218142182421834218442185421864218742188421894219042191421924219342194421954219642197421984219942200422014220242203422044220542206422074220842209422104221142212422134221442215422164221742218422194222042221422224222342224422254222642227422284222942230422314223242233422344223542236422374223842239422404224142242422434224442245422464224742248422494225042251422524225342254422554225642257422584225942260422614226242263422644226542266422674226842269422704227142272422734227442275422764227742278422794228042281422824228342284422854228642287422884228942290422914229242293422944229542296422974229842299423004230142302423034230442305423064230742308423094231042311423124231342314423154231642317423184231942320423214232242323423244232542326423274232842329423304233142332423334233442335423364233742338423394234042341423424234342344423454234642347423484234942350423514235242353423544235542356423574235842359423604236142362423634236442365423664236742368423694237042371423724237342374423754237642377423784237942380423814238242383423844238542386423874238842389423904239142392423934239442395423964239742398423994240042401424024240342404424054240642407424084240942410424114241242413424144241542416424174241842419424204242142422424234242442425424264242742428424294243042431424324243342434424354243642437424384243942440424414244242443424444244542446424474244842449424504245142452424534245442455424564245742458424594246042461424624246342464424654246642467424684246942470424714247242473424744247542476424774247842479424804248142482424834248442485424864248742488424894249042491424924249342494424954249642497424984249942500425014250242503425044250542506425074250842509425104251142512425134251442515425164251742518425194252042521425224252342524425254252642527425284252942530425314253242533425344253542536425374253842539425404254142542425434254442545425464254742548425494255042551425524255342554425554255642557425584255942560425614256242563425644256542566425674256842569425704257142572425734257442575425764257742578425794258042581425824258342584425854258642587425884258942590425914259242593425944259542596425974259842599426004260142602426034260442605426064260742608426094261042611426124261342614426154261642617426184261942620426214262242623426244262542626426274262842629426304263142632426334263442635426364263742638426394264042641426424264342644426454264642647426484264942650426514265242653426544265542656426574265842659426604266142662426634266442665426664266742668426694267042671426724267342674426754267642677426784267942680426814268242683426844268542686426874268842689426904269142692426934269442695426964269742698426994270042701427024270342704427054270642707427084270942710427114271242713427144271542716427174271842719427204272142722427234272442725427264272742728427294273042731427324273342734427354273642737427384273942740427414274242743427444274542746427474274842749427504275142752427534275442755427564275742758427594276042761427624276342764427654276642767427684276942770427714277242773427744277542776427774277842779427804278142782427834278442785427864278742788427894279042791427924279342794427954279642797427984279942800428014280242803428044280542806428074280842809428104281142812428134281442815428164281742818428194282042821428224282342824428254282642827428284282942830428314283242833428344283542836428374283842839428404284142842428434284442845428464284742848428494285042851428524285342854428554285642857428584285942860428614286242863428644286542866428674286842869428704287142872428734287442875428764287742878428794288042881428824288342884428854288642887428884288942890428914289242893428944289542896428974289842899429004290142902429034290442905429064290742908429094291042911429124291342914429154291642917429184291942920429214292242923429244292542926429274292842929429304293142932429334293442935429364293742938429394294042941429424294342944429454294642947429484294942950429514295242953429544295542956429574295842959429604296142962429634296442965429664296742968429694297042971429724297342974429754297642977429784297942980429814298242983429844298542986429874298842989429904299142992429934299442995429964299742998429994300043001430024300343004430054300643007430084300943010430114301243013430144301543016430174301843019430204302143022430234302443025430264302743028430294303043031430324303343034430354303643037430384303943040430414304243043430444304543046430474304843049430504305143052430534305443055430564305743058430594306043061430624306343064430654306643067430684306943070430714307243073430744307543076430774307843079430804308143082430834308443085430864308743088430894309043091430924309343094430954309643097430984309943100431014310243103431044310543106431074310843109431104311143112431134311443115431164311743118431194312043121431224312343124431254312643127431284312943130431314313243133431344313543136431374313843139431404314143142431434314443145431464314743148431494315043151431524315343154431554315643157431584315943160431614316243163431644316543166431674316843169431704317143172431734317443175431764317743178431794318043181431824318343184431854318643187431884318943190431914319243193431944319543196431974319843199432004320143202432034320443205432064320743208432094321043211432124321343214432154321643217432184321943220432214322243223432244322543226432274322843229432304323143232432334323443235432364323743238432394324043241432424324343244432454324643247432484324943250432514325243253432544325543256432574325843259432604326143262432634326443265432664326743268432694327043271432724327343274432754327643277432784327943280432814328243283432844328543286432874328843289432904329143292432934329443295432964329743298432994330043301433024330343304433054330643307433084330943310433114331243313433144331543316433174331843319433204332143322433234332443325433264332743328433294333043331433324333343334433354333643337433384333943340433414334243343433444334543346433474334843349433504335143352433534335443355433564335743358433594336043361433624336343364433654336643367433684336943370433714337243373433744337543376433774337843379433804338143382433834338443385433864338743388433894339043391433924339343394433954339643397433984339943400434014340243403434044340543406434074340843409434104341143412434134341443415434164341743418434194342043421434224342343424434254342643427434284342943430434314343243433434344343543436434374343843439434404344143442434434344443445434464344743448434494345043451434524345343454434554345643457434584345943460434614346243463434644346543466434674346843469434704347143472434734347443475434764347743478434794348043481434824348343484434854348643487434884348943490434914349243493434944349543496434974349843499435004350143502435034350443505435064350743508435094351043511435124351343514435154351643517435184351943520435214352243523435244352543526435274352843529435304353143532435334353443535435364353743538435394354043541435424354343544435454354643547435484354943550435514355243553435544355543556435574355843559435604356143562435634356443565435664356743568435694357043571435724357343574435754357643577435784357943580435814358243583435844358543586435874358843589435904359143592435934359443595435964359743598435994360043601436024360343604436054360643607436084360943610436114361243613436144361543616436174361843619436204362143622436234362443625436264362743628436294363043631436324363343634436354363643637436384363943640436414364243643436444364543646436474364843649436504365143652436534365443655436564365743658436594366043661436624366343664436654366643667436684366943670436714367243673436744367543676436774367843679436804368143682436834368443685436864368743688436894369043691436924369343694436954369643697436984369943700437014370243703437044370543706437074370843709437104371143712437134371443715437164371743718437194372043721437224372343724437254372643727437284372943730437314373243733437344373543736437374373843739437404374143742437434374443745437464374743748437494375043751437524375343754437554375643757437584375943760437614376243763437644376543766437674376843769437704377143772437734377443775437764377743778437794378043781437824378343784437854378643787437884378943790437914379243793437944379543796437974379843799438004380143802438034380443805438064380743808438094381043811438124381343814438154381643817438184381943820438214382243823438244382543826438274382843829438304383143832438334383443835438364383743838438394384043841438424384343844438454384643847438484384943850438514385243853438544385543856438574385843859438604386143862438634386443865438664386743868438694387043871438724387343874438754387643877438784387943880438814388243883438844388543886438874388843889438904389143892438934389443895438964389743898438994390043901439024390343904439054390643907439084390943910439114391243913439144391543916439174391843919439204392143922439234392443925439264392743928439294393043931439324393343934439354393643937439384393943940439414394243943439444394543946439474394843949439504395143952439534395443955439564395743958439594396043961439624396343964439654396643967439684396943970439714397243973439744397543976439774397843979439804398143982439834398443985439864398743988439894399043991439924399343994439954399643997439984399944000440014400244003440044400544006440074400844009440104401144012440134401444015440164401744018440194402044021440224402344024440254402644027440284402944030440314403244033440344403544036440374403844039440404404144042440434404444045440464404744048440494405044051440524405344054440554405644057440584405944060440614406244063440644406544066440674406844069440704407144072440734407444075440764407744078440794408044081440824408344084440854408644087440884408944090440914409244093440944409544096440974409844099441004410144102441034410444105441064410744108441094411044111441124411344114441154411644117441184411944120441214412244123441244412544126441274412844129441304413144132441334413444135441364413744138441394414044141441424414344144441454414644147441484414944150441514415244153441544415544156441574415844159441604416144162441634416444165441664416744168441694417044171441724417344174441754417644177441784417944180441814418244183441844418544186441874418844189441904419144192441934419444195441964419744198441994420044201442024420344204442054420644207442084420944210442114421244213442144421544216442174421844219442204422144222442234422444225442264422744228442294423044231442324423344234442354423644237442384423944240442414424244243442444424544246442474424844249442504425144252442534425444255442564425744258442594426044261442624426344264442654426644267442684426944270442714427244273442744427544276442774427844279442804428144282442834428444285442864428744288442894429044291442924429344294442954429644297442984429944300443014430244303443044430544306443074430844309443104431144312443134431444315443164431744318443194432044321443224432344324443254432644327443284432944330443314433244333443344433544336443374433844339443404434144342443434434444345443464434744348443494435044351443524435344354443554435644357443584435944360443614436244363443644436544366443674436844369443704437144372443734437444375443764437744378443794438044381443824438344384443854438644387443884438944390443914439244393443944439544396443974439844399444004440144402444034440444405444064440744408444094441044411444124441344414444154441644417444184441944420444214442244423444244442544426444274442844429444304443144432444334443444435444364443744438444394444044441444424444344444444454444644447444484444944450444514445244453444544445544456444574445844459444604446144462444634446444465444664446744468444694447044471444724447344474444754447644477444784447944480444814448244483444844448544486444874448844489444904449144492444934449444495444964449744498444994450044501445024450344504445054450644507445084450944510445114451244513445144451544516445174451844519445204452144522445234452444525445264452744528445294453044531445324453344534445354453644537445384453944540445414454244543445444454544546445474454844549445504455144552445534455444555445564455744558445594456044561445624456344564445654456644567445684456944570445714457244573445744457544576445774457844579445804458144582445834458444585445864458744588445894459044591445924459344594445954459644597445984459944600446014460244603446044460544606446074460844609446104461144612446134461444615446164461744618446194462044621446224462344624446254462644627446284462944630446314463244633446344463544636446374463844639446404464144642446434464444645446464464744648446494465044651446524465344654446554465644657446584465944660446614466244663446644466544666446674466844669446704467144672446734467444675446764467744678446794468044681446824468344684446854468644687446884468944690446914469244693446944469544696446974469844699447004470144702447034470444705447064470744708447094471044711447124471344714447154471644717447184471944720447214472244723447244472544726447274472844729447304473144732447334473444735447364473744738447394474044741447424474344744447454474644747447484474944750447514475244753447544475544756447574475844759447604476144762447634476444765447664476744768447694477044771447724477344774447754477644777447784477944780447814478244783447844478544786447874478844789447904479144792447934479444795447964479744798447994480044801448024480344804448054480644807448084480944810448114481244813448144481544816448174481844819448204482144822448234482444825448264482744828448294483044831448324483344834448354483644837448384483944840448414484244843448444484544846448474484844849448504485144852448534485444855448564485744858448594486044861448624486344864448654486644867448684486944870448714487244873448744487544876448774487844879448804488144882448834488444885448864488744888448894489044891448924489344894448954489644897448984489944900449014490244903449044490544906449074490844909449104491144912449134491444915449164491744918449194492044921449224492344924449254492644927449284492944930449314493244933449344493544936449374493844939449404494144942449434494444945449464494744948449494495044951449524495344954449554495644957449584495944960449614496244963449644496544966449674496844969449704497144972449734497444975449764497744978449794498044981449824498344984449854498644987449884498944990449914499244993449944499544996449974499844999450004500145002450034500445005450064500745008450094501045011450124501345014450154501645017450184501945020450214502245023450244502545026450274502845029450304503145032450334503445035450364503745038450394504045041450424504345044450454504645047450484504945050450514505245053450544505545056450574505845059450604506145062450634506445065450664506745068450694507045071450724507345074450754507645077450784507945080450814508245083450844508545086450874508845089450904509145092450934509445095450964509745098450994510045101451024510345104451054510645107451084510945110451114511245113451144511545116451174511845119451204512145122451234512445125451264512745128451294513045131451324513345134451354513645137451384513945140451414514245143451444514545146451474514845149451504515145152451534515445155451564515745158451594516045161451624516345164451654516645167451684516945170451714517245173451744517545176451774517845179451804518145182451834518445185451864518745188451894519045191451924519345194451954519645197451984519945200452014520245203452044520545206452074520845209452104521145212452134521445215452164521745218452194522045221452224522345224452254522645227452284522945230452314523245233452344523545236452374523845239452404524145242452434524445245452464524745248452494525045251452524525345254452554525645257452584525945260452614526245263452644526545266452674526845269452704527145272452734527445275452764527745278452794528045281452824528345284452854528645287452884528945290452914529245293452944529545296452974529845299453004530145302453034530445305453064530745308453094531045311453124531345314453154531645317453184531945320453214532245323453244532545326453274532845329453304533145332453334533445335453364533745338453394534045341453424534345344453454534645347453484534945350453514535245353453544535545356453574535845359453604536145362453634536445365453664536745368453694537045371453724537345374453754537645377453784537945380453814538245383453844538545386453874538845389453904539145392453934539445395453964539745398453994540045401454024540345404454054540645407454084540945410454114541245413454144541545416454174541845419454204542145422454234542445425454264542745428454294543045431454324543345434454354543645437454384543945440454414544245443454444544545446454474544845449454504545145452454534545445455454564545745458454594546045461454624546345464454654546645467454684546945470454714547245473454744547545476454774547845479454804548145482454834548445485454864548745488454894549045491454924549345494454954549645497454984549945500455014550245503455044550545506455074550845509455104551145512455134551445515455164551745518455194552045521455224552345524455254552645527455284552945530455314553245533455344553545536455374553845539455404554145542455434554445545455464554745548455494555045551455524555345554455554555645557455584555945560455614556245563455644556545566455674556845569455704557145572455734557445575455764557745578455794558045581455824558345584455854558645587455884558945590455914559245593455944559545596455974559845599456004560145602456034560445605456064560745608456094561045611456124561345614456154561645617456184561945620456214562245623456244562545626456274562845629456304563145632456334563445635456364563745638456394564045641456424564345644456454564645647456484564945650456514565245653456544565545656456574565845659456604566145662456634566445665456664566745668456694567045671456724567345674456754567645677456784567945680456814568245683456844568545686456874568845689456904569145692456934569445695456964569745698456994570045701457024570345704457054570645707457084570945710457114571245713457144571545716457174571845719457204572145722457234572445725457264572745728457294573045731457324573345734457354573645737457384573945740457414574245743457444574545746457474574845749457504575145752457534575445755457564575745758457594576045761457624576345764457654576645767457684576945770457714577245773457744577545776457774577845779457804578145782457834578445785457864578745788457894579045791457924579345794457954579645797457984579945800458014580245803458044580545806458074580845809458104581145812458134581445815458164581745818458194582045821458224582345824458254582645827458284582945830458314583245833458344583545836458374583845839458404584145842458434584445845458464584745848458494585045851458524585345854458554585645857458584585945860458614586245863458644586545866458674586845869458704587145872458734587445875458764587745878458794588045881458824588345884458854588645887458884588945890458914589245893458944589545896458974589845899459004590145902459034590445905459064590745908459094591045911459124591345914459154591645917459184591945920459214592245923459244592545926459274592845929459304593145932459334593445935459364593745938459394594045941459424594345944459454594645947459484594945950459514595245953459544595545956459574595845959459604596145962459634596445965459664596745968459694597045971459724597345974459754597645977459784597945980459814598245983459844598545986459874598845989459904599145992459934599445995459964599745998459994600046001460024600346004460054600646007460084600946010460114601246013460144601546016460174601846019460204602146022460234602446025460264602746028460294603046031460324603346034460354603646037460384603946040460414604246043460444604546046460474604846049460504605146052460534605446055460564605746058460594606046061460624606346064460654606646067460684606946070460714607246073460744607546076460774607846079460804608146082460834608446085460864608746088460894609046091460924609346094460954609646097460984609946100461014610246103461044610546106461074610846109461104611146112461134611446115461164611746118461194612046121461224612346124461254612646127461284612946130461314613246133461344613546136461374613846139461404614146142461434614446145461464614746148461494615046151461524615346154461554615646157461584615946160461614616246163461644616546166461674616846169461704617146172461734617446175461764617746178461794618046181461824618346184461854618646187461884618946190461914619246193461944619546196461974619846199462004620146202462034620446205462064620746208462094621046211462124621346214462154621646217462184621946220462214622246223462244622546226462274622846229462304623146232462334623446235462364623746238462394624046241462424624346244462454624646247462484624946250462514625246253462544625546256462574625846259462604626146262462634626446265462664626746268462694627046271462724627346274462754627646277462784627946280462814628246283462844628546286462874628846289462904629146292462934629446295462964629746298462994630046301463024630346304463054630646307463084630946310463114631246313463144631546316463174631846319463204632146322463234632446325463264632746328463294633046331463324633346334463354633646337463384633946340463414634246343463444634546346463474634846349463504635146352463534635446355463564635746358463594636046361463624636346364463654636646367463684636946370463714637246373463744637546376463774637846379463804638146382463834638446385463864638746388463894639046391463924639346394463954639646397463984639946400464014640246403464044640546406464074640846409464104641146412464134641446415464164641746418464194642046421464224642346424464254642646427464284642946430464314643246433464344643546436464374643846439464404644146442464434644446445464464644746448464494645046451464524645346454464554645646457464584645946460464614646246463464644646546466464674646846469464704647146472464734647446475464764647746478464794648046481464824648346484464854648646487464884648946490464914649246493464944649546496464974649846499465004650146502465034650446505465064650746508465094651046511465124651346514465154651646517465184651946520465214652246523465244652546526465274652846529465304653146532465334653446535465364653746538465394654046541465424654346544465454654646547465484654946550465514655246553465544655546556465574655846559465604656146562465634656446565465664656746568465694657046571465724657346574465754657646577465784657946580465814658246583465844658546586465874658846589465904659146592465934659446595465964659746598465994660046601466024660346604466054660646607466084660946610466114661246613466144661546616466174661846619466204662146622466234662446625466264662746628466294663046631466324663346634466354663646637466384663946640466414664246643466444664546646466474664846649466504665146652466534665446655466564665746658466594666046661466624666346664466654666646667466684666946670466714667246673466744667546676466774667846679466804668146682466834668446685466864668746688466894669046691466924669346694466954669646697466984669946700467014670246703467044670546706467074670846709467104671146712467134671446715467164671746718467194672046721467224672346724467254672646727467284672946730467314673246733467344673546736467374673846739467404674146742467434674446745467464674746748467494675046751467524675346754467554675646757467584675946760467614676246763467644676546766467674676846769467704677146772467734677446775467764677746778467794678046781467824678346784467854678646787467884678946790467914679246793467944679546796467974679846799468004680146802468034680446805468064680746808468094681046811468124681346814468154681646817468184681946820468214682246823468244682546826468274682846829468304683146832468334683446835468364683746838468394684046841468424684346844468454684646847468484684946850468514685246853468544685546856468574685846859468604686146862468634686446865468664686746868468694687046871468724687346874468754687646877468784687946880468814688246883468844688546886468874688846889468904689146892468934689446895468964689746898468994690046901469024690346904469054690646907469084690946910469114691246913469144691546916469174691846919469204692146922469234692446925469264692746928469294693046931469324693346934469354693646937469384693946940469414694246943469444694546946469474694846949469504695146952469534695446955469564695746958469594696046961469624696346964469654696646967469684696946970469714697246973469744697546976469774697846979469804698146982469834698446985469864698746988469894699046991469924699346994469954699646997469984699947000470014700247003470044700547006470074700847009470104701147012470134701447015470164701747018470194702047021470224702347024470254702647027470284702947030470314703247033470344703547036470374703847039470404704147042470434704447045470464704747048470494705047051470524705347054470554705647057470584705947060470614706247063470644706547066470674706847069470704707147072470734707447075470764707747078470794708047081470824708347084470854708647087470884708947090470914709247093470944709547096470974709847099471004710147102471034710447105471064710747108471094711047111471124711347114471154711647117471184711947120471214712247123471244712547126471274712847129471304713147132471334713447135471364713747138471394714047141471424714347144471454714647147471484714947150471514715247153471544715547156471574715847159471604716147162471634716447165471664716747168471694717047171471724717347174471754717647177471784717947180471814718247183471844718547186471874718847189471904719147192471934719447195471964719747198471994720047201472024720347204472054720647207472084720947210472114721247213472144721547216472174721847219472204722147222472234722447225472264722747228472294723047231472324723347234472354723647237472384723947240472414724247243472444724547246472474724847249472504725147252472534725447255472564725747258472594726047261472624726347264472654726647267472684726947270472714727247273472744727547276472774727847279472804728147282472834728447285472864728747288472894729047291472924729347294472954729647297472984729947300473014730247303473044730547306473074730847309473104731147312473134731447315473164731747318473194732047321473224732347324473254732647327473284732947330473314733247333473344733547336473374733847339473404734147342473434734447345473464734747348473494735047351473524735347354473554735647357473584735947360473614736247363473644736547366473674736847369473704737147372473734737447375473764737747378473794738047381473824738347384473854738647387473884738947390473914739247393473944739547396473974739847399474004740147402474034740447405474064740747408474094741047411474124741347414474154741647417474184741947420474214742247423474244742547426474274742847429474304743147432474334743447435474364743747438474394744047441474424744347444474454744647447474484744947450474514745247453474544745547456474574745847459474604746147462474634746447465474664746747468474694747047471474724747347474474754747647477474784747947480474814748247483474844748547486474874748847489474904749147492474934749447495474964749747498474994750047501475024750347504475054750647507475084750947510475114751247513475144751547516475174751847519475204752147522475234752447525475264752747528475294753047531475324753347534475354753647537475384753947540475414754247543475444754547546475474754847549475504755147552475534755447555475564755747558475594756047561475624756347564475654756647567475684756947570475714757247573475744757547576475774757847579475804758147582475834758447585475864758747588475894759047591475924759347594475954759647597475984759947600476014760247603476044760547606476074760847609476104761147612476134761447615476164761747618476194762047621476224762347624476254762647627476284762947630476314763247633476344763547636476374763847639476404764147642476434764447645476464764747648476494765047651476524765347654476554765647657476584765947660476614766247663476644766547666476674766847669476704767147672476734767447675476764767747678476794768047681476824768347684476854768647687476884768947690476914769247693476944769547696476974769847699477004770147702477034770447705477064770747708477094771047711477124771347714477154771647717477184771947720477214772247723477244772547726477274772847729477304773147732477334773447735477364773747738477394774047741477424774347744477454774647747477484774947750477514775247753477544775547756477574775847759477604776147762477634776447765477664776747768477694777047771477724777347774477754777647777477784777947780477814778247783477844778547786477874778847789477904779147792477934779447795477964779747798477994780047801478024780347804478054780647807478084780947810478114781247813478144781547816478174781847819478204782147822478234782447825478264782747828478294783047831478324783347834478354783647837478384783947840478414784247843478444784547846478474784847849478504785147852478534785447855478564785747858478594786047861478624786347864478654786647867478684786947870478714787247873478744787547876478774787847879478804788147882478834788447885478864788747888478894789047891478924789347894478954789647897478984789947900479014790247903479044790547906479074790847909479104791147912479134791447915479164791747918479194792047921479224792347924479254792647927479284792947930479314793247933479344793547936479374793847939479404794147942479434794447945479464794747948479494795047951479524795347954479554795647957479584795947960479614796247963479644796547966479674796847969479704797147972479734797447975479764797747978479794798047981479824798347984479854798647987479884798947990479914799247993479944799547996479974799847999480004800148002480034800448005480064800748008480094801048011480124801348014480154801648017480184801948020480214802248023480244802548026480274802848029480304803148032480334803448035480364803748038480394804048041480424804348044480454804648047480484804948050480514805248053480544805548056480574805848059480604806148062480634806448065480664806748068480694807048071480724807348074480754807648077480784807948080480814808248083480844808548086480874808848089480904809148092480934809448095480964809748098480994810048101481024810348104481054810648107481084810948110481114811248113481144811548116481174811848119481204812148122481234812448125481264812748128481294813048131481324813348134481354813648137481384813948140481414814248143481444814548146481474814848149481504815148152481534815448155481564815748158481594816048161481624816348164481654816648167481684816948170481714817248173481744817548176481774817848179481804818148182481834818448185481864818748188481894819048191481924819348194481954819648197481984819948200482014820248203482044820548206482074820848209482104821148212482134821448215482164821748218482194822048221482224822348224482254822648227482284822948230482314823248233482344823548236482374823848239482404824148242482434824448245482464824748248482494825048251482524825348254482554825648257482584825948260482614826248263482644826548266482674826848269482704827148272482734827448275482764827748278482794828048281482824828348284482854828648287482884828948290482914829248293482944829548296482974829848299483004830148302483034830448305483064830748308483094831048311483124831348314483154831648317483184831948320483214832248323483244832548326483274832848329483304833148332483334833448335483364833748338483394834048341483424834348344483454834648347483484834948350483514835248353483544835548356483574835848359483604836148362483634836448365483664836748368483694837048371483724837348374483754837648377483784837948380483814838248383483844838548386483874838848389483904839148392483934839448395483964839748398483994840048401484024840348404484054840648407484084840948410484114841248413484144841548416484174841848419484204842148422484234842448425484264842748428484294843048431484324843348434484354843648437484384843948440484414844248443484444844548446484474844848449484504845148452484534845448455484564845748458484594846048461484624846348464484654846648467484684846948470484714847248473484744847548476484774847848479484804848148482484834848448485484864848748488484894849048491484924849348494484954849648497484984849948500485014850248503485044850548506485074850848509485104851148512485134851448515485164851748518485194852048521485224852348524485254852648527485284852948530485314853248533485344853548536485374853848539485404854148542485434854448545485464854748548485494855048551485524855348554485554855648557485584855948560485614856248563485644856548566485674856848569485704857148572485734857448575485764857748578485794858048581485824858348584485854858648587485884858948590485914859248593485944859548596485974859848599486004860148602486034860448605486064860748608486094861048611486124861348614486154861648617486184861948620486214862248623486244862548626486274862848629486304863148632486334863448635486364863748638486394864048641486424864348644486454864648647486484864948650486514865248653486544865548656486574865848659486604866148662486634866448665486664866748668486694867048671486724867348674486754867648677486784867948680486814868248683486844868548686486874868848689486904869148692486934869448695486964869748698486994870048701487024870348704487054870648707487084870948710487114871248713487144871548716487174871848719487204872148722487234872448725487264872748728487294873048731487324873348734487354873648737487384873948740487414874248743487444874548746487474874848749487504875148752487534875448755487564875748758487594876048761487624876348764487654876648767487684876948770487714877248773487744877548776487774877848779487804878148782487834878448785487864878748788487894879048791487924879348794487954879648797487984879948800488014880248803488044880548806488074880848809488104881148812488134881448815488164881748818488194882048821488224882348824488254882648827488284882948830488314883248833488344883548836488374883848839488404884148842488434884448845488464884748848488494885048851488524885348854488554885648857488584885948860488614886248863488644886548866488674886848869488704887148872488734887448875488764887748878488794888048881488824888348884488854888648887488884888948890488914889248893488944889548896488974889848899489004890148902489034890448905489064890748908489094891048911489124891348914489154891648917489184891948920489214892248923489244892548926489274892848929489304893148932489334893448935489364893748938489394894048941489424894348944489454894648947489484894948950489514895248953489544895548956489574895848959489604896148962489634896448965489664896748968489694897048971489724897348974489754897648977489784897948980489814898248983489844898548986489874898848989489904899148992489934899448995489964899748998489994900049001490024900349004490054900649007490084900949010490114901249013490144901549016490174901849019490204902149022490234902449025490264902749028490294903049031490324903349034490354903649037490384903949040490414904249043490444904549046490474904849049490504905149052490534905449055490564905749058490594906049061490624906349064490654906649067490684906949070490714907249073490744907549076490774907849079490804908149082490834908449085490864908749088490894909049091490924909349094490954909649097490984909949100491014910249103491044910549106491074910849109491104911149112491134911449115491164911749118491194912049121491224912349124491254912649127491284912949130491314913249133491344913549136491374913849139491404914149142491434914449145491464914749148491494915049151491524915349154491554915649157491584915949160491614916249163491644916549166491674916849169491704917149172491734917449175491764917749178491794918049181491824918349184491854918649187491884918949190491914919249193491944919549196491974919849199492004920149202492034920449205492064920749208492094921049211492124921349214492154921649217492184921949220492214922249223492244922549226492274922849229492304923149232492334923449235492364923749238492394924049241492424924349244492454924649247492484924949250492514925249253492544925549256492574925849259492604926149262492634926449265492664926749268492694927049271492724927349274492754927649277492784927949280492814928249283492844928549286492874928849289492904929149292492934929449295492964929749298492994930049301493024930349304493054930649307493084930949310493114931249313493144931549316493174931849319493204932149322493234932449325493264932749328493294933049331493324933349334493354933649337493384933949340493414934249343493444934549346493474934849349493504935149352493534935449355493564935749358493594936049361493624936349364493654936649367493684936949370493714937249373493744937549376493774937849379493804938149382493834938449385493864938749388493894939049391493924939349394493954939649397493984939949400494014940249403494044940549406494074940849409494104941149412494134941449415494164941749418494194942049421494224942349424494254942649427494284942949430494314943249433494344943549436494374943849439494404944149442494434944449445494464944749448494494945049451494524945349454494554945649457494584945949460494614946249463494644946549466494674946849469494704947149472494734947449475494764947749478494794948049481494824948349484494854948649487494884948949490494914949249493494944949549496494974949849499495004950149502495034950449505495064950749508495094951049511495124951349514495154951649517495184951949520495214952249523495244952549526495274952849529495304953149532495334953449535495364953749538495394954049541495424954349544495454954649547495484954949550495514955249553495544955549556495574955849559495604956149562495634956449565495664956749568495694957049571495724957349574495754957649577495784957949580495814958249583495844958549586495874958849589495904959149592495934959449595495964959749598495994960049601496024960349604496054960649607496084960949610496114961249613496144961549616496174961849619496204962149622496234962449625496264962749628496294963049631496324963349634496354963649637496384963949640496414964249643496444964549646496474964849649496504965149652496534965449655496564965749658496594966049661496624966349664496654966649667496684966949670496714967249673496744967549676496774967849679496804968149682496834968449685496864968749688496894969049691496924969349694496954969649697496984969949700497014970249703497044970549706497074970849709497104971149712497134971449715497164971749718497194972049721497224972349724497254972649727497284972949730497314973249733497344973549736497374973849739497404974149742497434974449745497464974749748497494975049751497524975349754497554975649757497584975949760497614976249763497644976549766497674976849769497704977149772497734977449775497764977749778497794978049781497824978349784497854978649787497884978949790497914979249793497944979549796497974979849799498004980149802498034980449805498064980749808498094981049811498124981349814498154981649817498184981949820498214982249823498244982549826498274982849829498304983149832498334983449835498364983749838498394984049841498424984349844498454984649847498484984949850498514985249853498544985549856498574985849859498604986149862498634986449865498664986749868498694987049871498724987349874498754987649877498784987949880498814988249883498844988549886498874988849889498904989149892498934989449895498964989749898498994990049901499024990349904499054990649907499084990949910499114991249913499144991549916499174991849919499204992149922499234992449925499264992749928499294993049931499324993349934499354993649937499384993949940499414994249943499444994549946499474994849949499504995149952499534995449955499564995749958499594996049961499624996349964499654996649967499684996949970499714997249973499744997549976499774997849979499804998149982499834998449985499864998749988499894999049991499924999349994499954999649997499984999950000500015000250003500045000550006500075000850009500105001150012500135001450015500165001750018500195002050021500225002350024500255002650027500285002950030500315003250033500345003550036500375003850039500405004150042500435004450045500465004750048500495005050051500525005350054500555005650057500585005950060500615006250063500645006550066500675006850069500705007150072500735007450075500765007750078500795008050081500825008350084500855008650087500885008950090500915009250093500945009550096500975009850099501005010150102501035010450105501065010750108501095011050111501125011350114501155011650117501185011950120501215012250123501245012550126501275012850129501305013150132501335013450135501365013750138501395014050141501425014350144501455014650147501485014950150501515015250153501545015550156501575015850159501605016150162501635016450165501665016750168501695017050171501725017350174501755017650177501785017950180501815018250183501845018550186501875018850189501905019150192501935019450195501965019750198501995020050201502025020350204502055020650207502085020950210502115021250213502145021550216502175021850219502205022150222502235022450225502265022750228502295023050231502325023350234502355023650237502385023950240502415024250243502445024550246502475024850249502505025150252502535025450255502565025750258502595026050261502625026350264502655026650267502685026950270502715027250273502745027550276502775027850279502805028150282502835028450285502865028750288502895029050291502925029350294502955029650297502985029950300503015030250303503045030550306503075030850309503105031150312503135031450315503165031750318503195032050321503225032350324503255032650327503285032950330503315033250333503345033550336503375033850339503405034150342503435034450345503465034750348503495035050351503525035350354503555035650357503585035950360503615036250363503645036550366503675036850369503705037150372503735037450375503765037750378503795038050381503825038350384503855038650387503885038950390503915039250393503945039550396503975039850399504005040150402504035040450405504065040750408504095041050411504125041350414504155041650417504185041950420504215042250423504245042550426504275042850429504305043150432504335043450435504365043750438504395044050441504425044350444504455044650447504485044950450504515045250453504545045550456504575045850459504605046150462504635046450465504665046750468504695047050471504725047350474504755047650477504785047950480504815048250483504845048550486504875048850489504905049150492504935049450495504965049750498504995050050501505025050350504505055050650507505085050950510505115051250513505145051550516505175051850519505205052150522505235052450525505265052750528505295053050531505325053350534505355053650537505385053950540505415054250543505445054550546505475054850549505505055150552505535055450555505565055750558505595056050561505625056350564505655056650567505685056950570505715057250573505745057550576505775057850579505805058150582505835058450585505865058750588505895059050591505925059350594505955059650597505985059950600506015060250603506045060550606506075060850609506105061150612506135061450615506165061750618506195062050621506225062350624506255062650627506285062950630506315063250633506345063550636506375063850639506405064150642506435064450645506465064750648506495065050651506525065350654506555065650657506585065950660506615066250663506645066550666506675066850669506705067150672506735067450675506765067750678506795068050681506825068350684506855068650687506885068950690506915069250693506945069550696506975069850699507005070150702507035070450705507065070750708507095071050711507125071350714507155071650717507185071950720507215072250723507245072550726507275072850729507305073150732507335073450735507365073750738507395074050741507425074350744507455074650747507485074950750507515075250753507545075550756507575075850759507605076150762507635076450765507665076750768507695077050771507725077350774507755077650777507785077950780507815078250783507845078550786507875078850789507905079150792507935079450795507965079750798507995080050801508025080350804508055080650807508085080950810508115081250813508145081550816508175081850819508205082150822508235082450825508265082750828508295083050831508325083350834508355083650837508385083950840508415084250843508445084550846508475084850849508505085150852508535085450855508565085750858508595086050861508625086350864508655086650867508685086950870508715087250873508745087550876508775087850879508805088150882508835088450885508865088750888508895089050891508925089350894508955089650897508985089950900509015090250903509045090550906509075090850909509105091150912509135091450915509165091750918509195092050921509225092350924509255092650927509285092950930509315093250933509345093550936509375093850939509405094150942509435094450945509465094750948509495095050951509525095350954509555095650957509585095950960509615096250963509645096550966509675096850969509705097150972509735097450975509765097750978509795098050981509825098350984509855098650987509885098950990509915099250993509945099550996509975099850999510005100151002510035100451005510065100751008510095101051011510125101351014510155101651017510185101951020510215102251023510245102551026510275102851029510305103151032510335103451035510365103751038510395104051041510425104351044510455104651047510485104951050510515105251053510545105551056510575105851059510605106151062510635106451065510665106751068510695107051071510725107351074510755107651077510785107951080510815108251083510845108551086510875108851089510905109151092510935109451095510965109751098510995110051101511025110351104511055110651107511085110951110511115111251113511145111551116511175111851119511205112151122511235112451125511265112751128511295113051131511325113351134511355113651137511385113951140511415114251143511445114551146511475114851149511505115151152511535115451155511565115751158511595116051161511625116351164511655116651167511685116951170511715117251173511745117551176511775117851179511805118151182511835118451185511865118751188511895119051191511925119351194511955119651197511985119951200512015120251203512045120551206512075120851209512105121151212512135121451215512165121751218512195122051221512225122351224512255122651227512285122951230512315123251233512345123551236512375123851239512405124151242512435124451245512465124751248512495125051251512525125351254512555125651257512585125951260512615126251263512645126551266512675126851269512705127151272512735127451275512765127751278512795128051281512825128351284512855128651287512885128951290512915129251293512945129551296512975129851299513005130151302513035130451305513065130751308513095131051311513125131351314513155131651317513185131951320513215132251323513245132551326513275132851329513305133151332513335133451335513365133751338513395134051341513425134351344513455134651347513485134951350513515135251353513545135551356513575135851359513605136151362513635136451365513665136751368513695137051371513725137351374513755137651377513785137951380513815138251383513845138551386513875138851389513905139151392513935139451395513965139751398513995140051401514025140351404514055140651407514085140951410514115141251413514145141551416514175141851419514205142151422514235142451425514265142751428514295143051431514325143351434514355143651437514385143951440514415144251443514445144551446514475144851449514505145151452514535145451455514565145751458514595146051461514625146351464514655146651467514685146951470514715147251473514745147551476514775147851479514805148151482514835148451485514865148751488514895149051491514925149351494514955149651497514985149951500515015150251503515045150551506515075150851509515105151151512515135151451515515165151751518515195152051521515225152351524515255152651527515285152951530515315153251533515345153551536515375153851539515405154151542515435154451545515465154751548515495155051551515525155351554515555155651557515585155951560515615156251563515645156551566515675156851569515705157151572515735157451575515765157751578515795158051581515825158351584515855158651587515885158951590515915159251593515945159551596515975159851599516005160151602516035160451605516065160751608516095161051611516125161351614516155161651617516185161951620516215162251623516245162551626516275162851629516305163151632516335163451635516365163751638516395164051641516425164351644516455164651647516485164951650516515165251653516545165551656516575165851659516605166151662516635166451665516665166751668516695167051671516725167351674516755167651677516785167951680516815168251683516845168551686516875168851689516905169151692516935169451695516965169751698516995170051701517025170351704517055170651707517085170951710517115171251713517145171551716517175171851719517205172151722517235172451725517265172751728517295173051731517325173351734517355173651737517385173951740517415174251743517445174551746517475174851749517505175151752517535175451755517565175751758517595176051761517625176351764517655176651767517685176951770517715177251773517745177551776517775177851779517805178151782517835178451785517865178751788517895179051791517925179351794517955179651797517985179951800518015180251803518045180551806518075180851809518105181151812518135181451815518165181751818518195182051821518225182351824518255182651827518285182951830518315183251833518345183551836518375183851839518405184151842518435184451845518465184751848518495185051851518525185351854518555185651857518585185951860518615186251863518645186551866518675186851869518705187151872518735187451875518765187751878518795188051881518825188351884518855188651887518885188951890518915189251893518945189551896518975189851899519005190151902519035190451905519065190751908519095191051911519125191351914519155191651917519185191951920519215192251923519245192551926519275192851929519305193151932519335193451935519365193751938519395194051941519425194351944519455194651947519485194951950519515195251953519545195551956519575195851959519605196151962519635196451965519665196751968519695197051971519725197351974519755197651977519785197951980519815198251983519845198551986519875198851989519905199151992519935199451995519965199751998519995200052001520025200352004520055200652007520085200952010520115201252013520145201552016520175201852019520205202152022520235202452025520265202752028520295203052031520325203352034520355203652037520385203952040520415204252043520445204552046520475204852049520505205152052520535205452055520565205752058520595206052061520625206352064520655206652067520685206952070520715207252073520745207552076520775207852079520805208152082520835208452085520865208752088520895209052091520925209352094520955209652097520985209952100521015210252103521045210552106521075210852109521105211152112521135211452115521165211752118521195212052121521225212352124521255212652127521285212952130521315213252133521345213552136521375213852139521405214152142521435214452145521465214752148521495215052151521525215352154521555215652157521585215952160521615216252163521645216552166521675216852169521705217152172521735217452175521765217752178521795218052181521825218352184521855218652187521885218952190521915219252193521945219552196521975219852199522005220152202522035220452205522065220752208522095221052211522125221352214522155221652217522185221952220522215222252223522245222552226522275222852229522305223152232522335223452235522365223752238522395224052241522425224352244522455224652247522485224952250522515225252253522545225552256522575225852259522605226152262522635226452265522665226752268522695227052271522725227352274522755227652277522785227952280522815228252283522845228552286522875228852289522905229152292522935229452295522965229752298522995230052301523025230352304523055230652307523085230952310523115231252313523145231552316523175231852319523205232152322523235232452325523265232752328523295233052331523325233352334523355233652337523385233952340523415234252343523445234552346523475234852349523505235152352523535235452355523565235752358523595236052361523625236352364523655236652367523685236952370523715237252373523745237552376523775237852379523805238152382523835238452385523865238752388523895239052391523925239352394523955239652397523985239952400524015240252403524045240552406524075240852409524105241152412524135241452415524165241752418524195242052421524225242352424524255242652427524285242952430524315243252433524345243552436524375243852439524405244152442524435244452445524465244752448524495245052451524525245352454524555245652457524585245952460524615246252463524645246552466524675246852469524705247152472524735247452475524765247752478524795248052481524825248352484524855248652487524885248952490524915249252493524945249552496524975249852499525005250152502525035250452505525065250752508525095251052511525125251352514525155251652517525185251952520525215252252523525245252552526525275252852529525305253152532525335253452535525365253752538525395254052541525425254352544525455254652547525485254952550525515255252553525545255552556525575255852559525605256152562525635256452565525665256752568525695257052571525725257352574525755257652577525785257952580525815258252583525845258552586525875258852589525905259152592525935259452595525965259752598525995260052601526025260352604526055260652607526085260952610526115261252613526145261552616526175261852619526205262152622526235262452625526265262752628526295263052631526325263352634526355263652637526385263952640526415264252643526445264552646526475264852649526505265152652526535265452655526565265752658526595266052661526625266352664526655266652667526685266952670526715267252673526745267552676526775267852679526805268152682526835268452685526865268752688526895269052691526925269352694526955269652697526985269952700527015270252703527045270552706527075270852709527105271152712527135271452715527165271752718527195272052721527225272352724527255272652727527285272952730527315273252733527345273552736527375273852739527405274152742527435274452745527465274752748527495275052751527525275352754527555275652757527585275952760527615276252763527645276552766527675276852769527705277152772527735277452775527765277752778527795278052781527825278352784527855278652787527885278952790527915279252793527945279552796527975279852799528005280152802528035280452805528065280752808528095281052811528125281352814528155281652817528185281952820528215282252823528245282552826528275282852829528305283152832528335283452835528365283752838528395284052841528425284352844528455284652847528485284952850528515285252853528545285552856528575285852859528605286152862528635286452865528665286752868528695287052871528725287352874528755287652877528785287952880528815288252883528845288552886528875288852889528905289152892528935289452895528965289752898528995290052901529025290352904529055290652907529085290952910529115291252913529145291552916529175291852919529205292152922529235292452925529265292752928529295293052931529325293352934529355293652937529385293952940529415294252943529445294552946529475294852949529505295152952529535295452955529565295752958529595296052961529625296352964529655296652967529685296952970529715297252973529745297552976529775297852979529805298152982529835298452985529865298752988529895299052991529925299352994529955299652997529985299953000530015300253003530045300553006530075300853009530105301153012530135301453015530165301753018530195302053021530225302353024530255302653027530285302953030530315303253033530345303553036530375303853039530405304153042530435304453045530465304753048530495305053051530525305353054530555305653057530585305953060530615306253063530645306553066530675306853069530705307153072530735307453075530765307753078530795308053081530825308353084530855308653087530885308953090530915309253093530945309553096530975309853099531005310153102531035310453105531065310753108531095311053111531125311353114531155311653117531185311953120531215312253123531245312553126531275312853129531305313153132531335313453135531365313753138531395314053141531425314353144531455314653147531485314953150531515315253153531545315553156531575315853159531605316153162531635316453165531665316753168531695317053171531725317353174531755317653177531785317953180531815318253183531845318553186531875318853189531905319153192531935319453195531965319753198531995320053201532025320353204532055320653207532085320953210532115321253213532145321553216532175321853219532205322153222532235322453225532265322753228532295323053231532325323353234532355323653237532385323953240532415324253243532445324553246532475324853249532505325153252532535325453255532565325753258532595326053261532625326353264532655326653267532685326953270532715327253273532745327553276532775327853279532805328153282532835328453285532865328753288532895329053291532925329353294532955329653297532985329953300533015330253303533045330553306533075330853309533105331153312533135331453315533165331753318533195332053321533225332353324533255332653327533285332953330533315333253333533345333553336533375333853339533405334153342533435334453345533465334753348533495335053351533525335353354533555335653357533585335953360533615336253363533645336553366533675336853369533705337153372533735337453375533765337753378533795338053381533825338353384533855338653387533885338953390533915339253393533945339553396533975339853399534005340153402534035340453405534065340753408534095341053411534125341353414534155341653417534185341953420534215342253423534245342553426534275342853429534305343153432534335343453435534365343753438534395344053441534425344353444534455344653447534485344953450534515345253453534545345553456534575345853459534605346153462534635346453465534665346753468534695347053471534725347353474534755347653477534785347953480534815348253483534845348553486534875348853489534905349153492534935349453495534965349753498534995350053501535025350353504535055350653507535085350953510535115351253513535145351553516535175351853519535205352153522535235352453525535265352753528535295353053531535325353353534535355353653537535385353953540535415354253543535445354553546535475354853549535505355153552535535355453555535565355753558535595356053561535625356353564535655356653567535685356953570535715357253573535745357553576535775357853579535805358153582535835358453585535865358753588535895359053591535925359353594535955359653597535985359953600536015360253603536045360553606536075360853609536105361153612536135361453615536165361753618536195362053621536225362353624536255362653627536285362953630536315363253633536345363553636536375363853639536405364153642536435364453645536465364753648536495365053651536525365353654536555365653657536585365953660536615366253663536645366553666536675366853669536705367153672536735367453675536765367753678536795368053681536825368353684536855368653687536885368953690536915369253693536945369553696536975369853699537005370153702537035370453705537065370753708537095371053711537125371353714537155371653717537185371953720537215372253723537245372553726537275372853729537305373153732537335373453735537365373753738537395374053741537425374353744537455374653747537485374953750537515375253753537545375553756537575375853759537605376153762537635376453765537665376753768537695377053771537725377353774537755377653777537785377953780537815378253783537845378553786537875378853789537905379153792537935379453795537965379753798537995380053801538025380353804538055380653807538085380953810538115381253813538145381553816538175381853819538205382153822538235382453825538265382753828538295383053831538325383353834538355383653837538385383953840538415384253843538445384553846538475384853849538505385153852538535385453855538565385753858538595386053861538625386353864538655386653867538685386953870538715387253873538745387553876538775387853879538805388153882538835388453885538865388753888538895389053891538925389353894538955389653897538985389953900539015390253903539045390553906539075390853909539105391153912539135391453915539165391753918539195392053921539225392353924539255392653927539285392953930539315393253933539345393553936539375393853939539405394153942539435394453945539465394753948539495395053951539525395353954539555395653957539585395953960539615396253963539645396553966539675396853969539705397153972539735397453975539765397753978539795398053981539825398353984539855398653987539885398953990539915399253993539945399553996539975399853999540005400154002540035400454005540065400754008540095401054011540125401354014540155401654017540185401954020540215402254023540245402554026540275402854029540305403154032540335403454035540365403754038540395404054041540425404354044540455404654047540485404954050540515405254053540545405554056540575405854059540605406154062540635406454065540665406754068540695407054071540725407354074540755407654077540785407954080540815408254083540845408554086540875408854089540905409154092540935409454095540965409754098540995410054101541025410354104541055410654107541085410954110541115411254113541145411554116541175411854119541205412154122541235412454125541265412754128541295413054131541325413354134541355413654137541385413954140541415414254143541445414554146541475414854149541505415154152541535415454155541565415754158541595416054161541625416354164541655416654167541685416954170541715417254173541745417554176541775417854179541805418154182541835418454185541865418754188541895419054191541925419354194541955419654197541985419954200542015420254203542045420554206542075420854209542105421154212542135421454215542165421754218542195422054221542225422354224542255422654227542285422954230542315423254233542345423554236542375423854239542405424154242542435424454245542465424754248542495425054251542525425354254542555425654257542585425954260542615426254263542645426554266542675426854269542705427154272542735427454275542765427754278542795428054281542825428354284542855428654287542885428954290542915429254293542945429554296542975429854299543005430154302543035430454305543065430754308543095431054311543125431354314543155431654317543185431954320543215432254323543245432554326543275432854329543305433154332543335433454335543365433754338543395434054341543425434354344543455434654347543485434954350543515435254353543545435554356543575435854359543605436154362543635436454365543665436754368543695437054371543725437354374543755437654377543785437954380543815438254383543845438554386543875438854389543905439154392543935439454395543965439754398543995440054401544025440354404544055440654407544085440954410544115441254413544145441554416544175441854419544205442154422544235442454425544265442754428544295443054431544325443354434544355443654437544385443954440544415444254443544445444554446544475444854449544505445154452544535445454455544565445754458544595446054461544625446354464544655446654467544685446954470544715447254473544745447554476544775447854479544805448154482544835448454485544865448754488544895449054491544925449354494544955449654497544985449954500545015450254503545045450554506545075450854509545105451154512545135451454515545165451754518545195452054521545225452354524545255452654527545285452954530545315453254533545345453554536545375453854539545405454154542545435454454545545465454754548545495455054551545525455354554545555455654557545585455954560545615456254563545645456554566545675456854569545705457154572545735457454575545765457754578545795458054581545825458354584545855458654587545885458954590545915459254593545945459554596545975459854599546005460154602546035460454605546065460754608546095461054611546125461354614546155461654617546185461954620546215462254623546245462554626546275462854629546305463154632546335463454635546365463754638546395464054641546425464354644546455464654647546485464954650546515465254653546545465554656546575465854659546605466154662546635466454665546665466754668546695467054671546725467354674546755467654677546785467954680546815468254683546845468554686546875468854689546905469154692546935469454695546965469754698546995470054701547025470354704547055470654707547085470954710547115471254713547145471554716547175471854719547205472154722547235472454725547265472754728547295473054731547325473354734547355473654737547385473954740547415474254743547445474554746547475474854749547505475154752547535475454755547565475754758547595476054761547625476354764547655476654767547685476954770547715477254773547745477554776547775477854779547805478154782547835478454785547865478754788547895479054791547925479354794547955479654797547985479954800548015480254803548045480554806548075480854809548105481154812548135481454815548165481754818548195482054821548225482354824548255482654827548285482954830548315483254833548345483554836548375483854839548405484154842548435484454845548465484754848548495485054851548525485354854548555485654857548585485954860548615486254863548645486554866548675486854869548705487154872548735487454875548765487754878548795488054881548825488354884548855488654887548885488954890548915489254893548945489554896548975489854899549005490154902549035490454905549065490754908549095491054911549125491354914549155491654917549185491954920549215492254923549245492554926549275492854929549305493154932549335493454935549365493754938549395494054941549425494354944549455494654947549485494954950549515495254953549545495554956549575495854959549605496154962549635496454965549665496754968549695497054971549725497354974549755497654977549785497954980549815498254983549845498554986549875498854989549905499154992549935499454995549965499754998549995500055001550025500355004550055500655007550085500955010550115501255013550145501555016550175501855019550205502155022550235502455025550265502755028550295503055031550325503355034550355503655037550385503955040550415504255043550445504555046550475504855049550505505155052550535505455055550565505755058550595506055061550625506355064550655506655067550685506955070550715507255073550745507555076550775507855079550805508155082550835508455085550865508755088550895509055091550925509355094550955509655097550985509955100551015510255103551045510555106551075510855109551105511155112551135511455115551165511755118551195512055121551225512355124551255512655127551285512955130551315513255133551345513555136551375513855139551405514155142551435514455145551465514755148551495515055151551525515355154551555515655157551585515955160551615516255163551645516555166551675516855169551705517155172551735517455175551765517755178551795518055181551825518355184551855518655187551885518955190551915519255193551945519555196551975519855199552005520155202552035520455205552065520755208552095521055211552125521355214552155521655217552185521955220552215522255223552245522555226552275522855229552305523155232552335523455235552365523755238552395524055241552425524355244552455524655247552485524955250552515525255253552545525555256552575525855259552605526155262552635526455265552665526755268552695527055271552725527355274552755527655277552785527955280552815528255283552845528555286552875528855289552905529155292552935529455295552965529755298552995530055301553025530355304553055530655307553085530955310553115531255313553145531555316553175531855319553205532155322553235532455325553265532755328553295533055331553325533355334553355533655337553385533955340553415534255343553445534555346553475534855349553505535155352553535535455355553565535755358553595536055361553625536355364553655536655367553685536955370553715537255373553745537555376553775537855379553805538155382553835538455385553865538755388553895539055391553925539355394553955539655397553985539955400554015540255403554045540555406554075540855409554105541155412554135541455415554165541755418554195542055421554225542355424554255542655427554285542955430554315543255433554345543555436554375543855439554405544155442554435544455445554465544755448554495545055451554525545355454554555545655457554585545955460554615546255463554645546555466554675546855469554705547155472554735547455475554765547755478554795548055481554825548355484554855548655487554885548955490554915549255493554945549555496554975549855499555005550155502555035550455505555065550755508555095551055511555125551355514555155551655517555185551955520555215552255523555245552555526555275552855529555305553155532555335553455535555365553755538555395554055541555425554355544555455554655547555485554955550555515555255553555545555555556555575555855559555605556155562555635556455565555665556755568555695557055571555725557355574555755557655577555785557955580555815558255583555845558555586555875558855589555905559155592555935559455595555965559755598555995560055601556025560355604556055560655607556085560955610556115561255613556145561555616556175561855619556205562155622556235562455625556265562755628556295563055631556325563355634556355563655637556385563955640556415564255643556445564555646556475564855649556505565155652556535565455655556565565755658556595566055661556625566355664556655566655667556685566955670556715567255673556745567555676556775567855679556805568155682556835568455685556865568755688556895569055691556925569355694556955569655697556985569955700557015570255703557045570555706557075570855709557105571155712557135571455715557165571755718557195572055721557225572355724557255572655727557285572955730557315573255733557345573555736557375573855739557405574155742557435574455745557465574755748557495575055751557525575355754557555575655757557585575955760557615576255763557645576555766557675576855769557705577155772557735577455775557765577755778557795578055781557825578355784557855578655787557885578955790557915579255793557945579555796557975579855799558005580155802558035580455805558065580755808558095581055811558125581355814558155581655817558185581955820558215582255823558245582555826558275582855829558305583155832558335583455835558365583755838558395584055841558425584355844558455584655847558485584955850558515585255853558545585555856558575585855859558605586155862558635586455865558665586755868558695587055871558725587355874558755587655877558785587955880558815588255883558845588555886558875588855889558905589155892558935589455895558965589755898558995590055901559025590355904559055590655907559085590955910559115591255913559145591555916559175591855919559205592155922559235592455925559265592755928559295593055931559325593355934559355593655937559385593955940559415594255943559445594555946559475594855949559505595155952559535595455955559565595755958559595596055961559625596355964559655596655967559685596955970559715597255973559745597555976559775597855979559805598155982559835598455985559865598755988559895599055991559925599355994559955599655997559985599956000560015600256003560045600556006560075600856009560105601156012560135601456015560165601756018560195602056021560225602356024560255602656027560285602956030560315603256033560345603556036560375603856039560405604156042560435604456045560465604756048560495605056051560525605356054560555605656057560585605956060560615606256063560645606556066560675606856069560705607156072560735607456075560765607756078560795608056081560825608356084560855608656087560885608956090560915609256093560945609556096560975609856099561005610156102561035610456105561065610756108561095611056111561125611356114561155611656117561185611956120561215612256123561245612556126561275612856129561305613156132561335613456135561365613756138561395614056141561425614356144561455614656147561485614956150561515615256153561545615556156561575615856159561605616156162561635616456165561665616756168561695617056171561725617356174561755617656177561785617956180561815618256183561845618556186561875618856189561905619156192561935619456195561965619756198561995620056201562025620356204562055620656207562085620956210562115621256213562145621556216562175621856219562205622156222562235622456225562265622756228562295623056231562325623356234562355623656237562385623956240562415624256243562445624556246562475624856249562505625156252562535625456255562565625756258562595626056261562625626356264562655626656267562685626956270562715627256273562745627556276562775627856279562805628156282562835628456285562865628756288562895629056291562925629356294562955629656297562985629956300563015630256303563045630556306563075630856309563105631156312563135631456315563165631756318563195632056321563225632356324563255632656327563285632956330563315633256333563345633556336563375633856339563405634156342563435634456345563465634756348563495635056351563525635356354563555635656357563585635956360563615636256363563645636556366563675636856369563705637156372563735637456375563765637756378563795638056381563825638356384563855638656387563885638956390563915639256393563945639556396563975639856399564005640156402564035640456405564065640756408564095641056411564125641356414564155641656417564185641956420564215642256423564245642556426564275642856429564305643156432564335643456435564365643756438564395644056441564425644356444564455644656447564485644956450564515645256453564545645556456564575645856459564605646156462564635646456465564665646756468564695647056471564725647356474564755647656477564785647956480564815648256483564845648556486564875648856489564905649156492564935649456495564965649756498564995650056501565025650356504565055650656507565085650956510565115651256513565145651556516565175651856519565205652156522565235652456525565265652756528565295653056531565325653356534565355653656537565385653956540565415654256543565445654556546565475654856549565505655156552565535655456555565565655756558565595656056561565625656356564565655656656567565685656956570565715657256573565745657556576565775657856579565805658156582565835658456585565865658756588565895659056591565925659356594565955659656597565985659956600566015660256603566045660556606566075660856609566105661156612566135661456615566165661756618566195662056621566225662356624566255662656627566285662956630566315663256633566345663556636566375663856639566405664156642566435664456645566465664756648566495665056651566525665356654566555665656657566585665956660566615666256663566645666556666566675666856669566705667156672566735667456675566765667756678566795668056681566825668356684566855668656687566885668956690566915669256693566945669556696566975669856699567005670156702567035670456705567065670756708567095671056711567125671356714567155671656717567185671956720567215672256723567245672556726567275672856729567305673156732567335673456735567365673756738567395674056741567425674356744567455674656747567485674956750567515675256753567545675556756567575675856759567605676156762567635676456765567665676756768567695677056771567725677356774567755677656777567785677956780567815678256783567845678556786567875678856789567905679156792567935679456795567965679756798567995680056801568025680356804568055680656807568085680956810568115681256813568145681556816568175681856819568205682156822568235682456825568265682756828568295683056831568325683356834568355683656837568385683956840568415684256843568445684556846568475684856849568505685156852568535685456855568565685756858568595686056861568625686356864568655686656867568685686956870568715687256873568745687556876568775687856879568805688156882568835688456885568865688756888568895689056891568925689356894568955689656897568985689956900569015690256903569045690556906569075690856909569105691156912569135691456915569165691756918569195692056921569225692356924569255692656927569285692956930569315693256933569345693556936569375693856939569405694156942569435694456945569465694756948569495695056951569525695356954569555695656957569585695956960569615696256963569645696556966569675696856969569705697156972569735697456975569765697756978569795698056981569825698356984569855698656987569885698956990569915699256993569945699556996569975699856999570005700157002570035700457005570065700757008570095701057011570125701357014570155701657017570185701957020570215702257023570245702557026570275702857029570305703157032570335703457035570365703757038570395704057041570425704357044570455704657047570485704957050570515705257053570545705557056570575705857059570605706157062570635706457065570665706757068570695707057071570725707357074570755707657077570785707957080570815708257083570845708557086570875708857089570905709157092570935709457095570965709757098570995710057101571025710357104571055710657107571085710957110571115711257113571145711557116571175711857119571205712157122571235712457125571265712757128571295713057131571325713357134571355713657137571385713957140571415714257143571445714557146571475714857149571505715157152571535715457155571565715757158571595716057161571625716357164571655716657167571685716957170571715717257173571745717557176571775717857179571805718157182571835718457185571865718757188571895719057191571925719357194571955719657197571985719957200572015720257203572045720557206572075720857209572105721157212572135721457215572165721757218572195722057221572225722357224572255722657227572285722957230572315723257233572345723557236572375723857239572405724157242572435724457245572465724757248572495725057251572525725357254572555725657257572585725957260572615726257263572645726557266572675726857269572705727157272572735727457275572765727757278572795728057281572825728357284572855728657287572885728957290572915729257293572945729557296572975729857299573005730157302573035730457305573065730757308573095731057311573125731357314573155731657317573185731957320573215732257323573245732557326573275732857329573305733157332573335733457335573365733757338573395734057341573425734357344573455734657347573485734957350573515735257353573545735557356573575735857359573605736157362573635736457365573665736757368573695737057371573725737357374573755737657377573785737957380573815738257383573845738557386573875738857389573905739157392573935739457395573965739757398573995740057401574025740357404574055740657407574085740957410574115741257413574145741557416574175741857419574205742157422574235742457425574265742757428574295743057431574325743357434574355743657437574385743957440574415744257443574445744557446574475744857449574505745157452574535745457455574565745757458574595746057461574625746357464574655746657467574685746957470574715747257473574745747557476574775747857479574805748157482574835748457485574865748757488574895749057491574925749357494574955749657497574985749957500575015750257503575045750557506575075750857509575105751157512575135751457515575165751757518575195752057521575225752357524575255752657527575285752957530575315753257533575345753557536575375753857539575405754157542575435754457545575465754757548575495755057551575525755357554575555755657557575585755957560575615756257563575645756557566575675756857569575705757157572575735757457575575765757757578575795758057581575825758357584575855758657587575885758957590575915759257593575945759557596575975759857599576005760157602576035760457605576065760757608576095761057611576125761357614576155761657617576185761957620576215762257623576245762557626576275762857629576305763157632576335763457635576365763757638576395764057641576425764357644576455764657647576485764957650576515765257653576545765557656576575765857659576605766157662576635766457665576665766757668576695767057671576725767357674576755767657677576785767957680576815768257683576845768557686576875768857689576905769157692576935769457695576965769757698576995770057701577025770357704577055770657707577085770957710577115771257713577145771557716577175771857719577205772157722577235772457725577265772757728577295773057731577325773357734577355773657737577385773957740577415774257743577445774557746577475774857749577505775157752577535775457755577565775757758577595776057761577625776357764577655776657767577685776957770577715777257773577745777557776577775777857779577805778157782577835778457785577865778757788577895779057791577925779357794577955779657797577985779957800578015780257803578045780557806578075780857809578105781157812578135781457815578165781757818578195782057821578225782357824578255782657827578285782957830578315783257833578345783557836578375783857839578405784157842578435784457845578465784757848578495785057851578525785357854578555785657857578585785957860578615786257863578645786557866578675786857869578705787157872578735787457875578765787757878578795788057881578825788357884578855788657887578885788957890578915789257893578945789557896578975789857899579005790157902579035790457905579065790757908579095791057911579125791357914579155791657917579185791957920579215792257923579245792557926579275792857929579305793157932579335793457935579365793757938579395794057941579425794357944579455794657947579485794957950579515795257953579545795557956579575795857959579605796157962579635796457965579665796757968579695797057971579725797357974579755797657977579785797957980579815798257983579845798557986579875798857989579905799157992579935799457995579965799757998579995800058001580025800358004580055800658007580085800958010580115801258013580145801558016580175801858019580205802158022580235802458025580265802758028580295803058031580325803358034580355803658037580385803958040580415804258043580445804558046580475804858049580505805158052580535805458055580565805758058580595806058061580625806358064580655806658067580685806958070580715807258073580745807558076580775807858079580805808158082580835808458085580865808758088580895809058091580925809358094580955809658097580985809958100581015810258103581045810558106581075810858109581105811158112581135811458115581165811758118581195812058121581225812358124581255812658127581285812958130581315813258133581345813558136581375813858139581405814158142581435814458145581465814758148581495815058151581525815358154581555815658157581585815958160581615816258163581645816558166581675816858169581705817158172581735817458175581765817758178581795818058181581825818358184581855818658187581885818958190581915819258193581945819558196581975819858199582005820158202582035820458205582065820758208582095821058211582125821358214582155821658217582185821958220582215822258223582245822558226582275822858229582305823158232582335823458235582365823758238582395824058241582425824358244582455824658247582485824958250582515825258253582545825558256582575825858259582605826158262582635826458265582665826758268582695827058271582725827358274582755827658277582785827958280582815828258283582845828558286582875828858289582905829158292582935829458295582965829758298582995830058301583025830358304583055830658307583085830958310583115831258313583145831558316583175831858319583205832158322583235832458325583265832758328583295833058331583325833358334583355833658337583385833958340583415834258343583445834558346583475834858349583505835158352583535835458355583565835758358583595836058361583625836358364583655836658367583685836958370583715837258373583745837558376583775837858379583805838158382583835838458385583865838758388583895839058391583925839358394583955839658397583985839958400584015840258403584045840558406584075840858409584105841158412584135841458415584165841758418584195842058421584225842358424584255842658427584285842958430584315843258433584345843558436584375843858439584405844158442584435844458445584465844758448584495845058451584525845358454584555845658457584585845958460584615846258463584645846558466584675846858469584705847158472584735847458475584765847758478584795848058481584825848358484584855848658487584885848958490584915849258493584945849558496584975849858499585005850158502585035850458505585065850758508585095851058511585125851358514585155851658517585185851958520585215852258523585245852558526585275852858529585305853158532585335853458535585365853758538585395854058541585425854358544585455854658547585485854958550585515855258553585545855558556585575855858559585605856158562585635856458565585665856758568585695857058571585725857358574585755857658577585785857958580585815858258583585845858558586585875858858589585905859158592585935859458595585965859758598585995860058601586025860358604586055860658607586085860958610586115861258613586145861558616586175861858619586205862158622586235862458625586265862758628586295863058631586325863358634586355863658637586385863958640586415864258643586445864558646586475864858649586505865158652586535865458655586565865758658586595866058661586625866358664586655866658667586685866958670586715867258673586745867558676586775867858679586805868158682586835868458685586865868758688586895869058691586925869358694586955869658697586985869958700587015870258703587045870558706587075870858709587105871158712587135871458715587165871758718587195872058721587225872358724587255872658727587285872958730587315873258733587345873558736587375873858739587405874158742587435874458745587465874758748587495875058751587525875358754587555875658757587585875958760587615876258763587645876558766587675876858769587705877158772587735877458775587765877758778587795878058781587825878358784587855878658787587885878958790587915879258793587945879558796587975879858799588005880158802588035880458805588065880758808588095881058811588125881358814588155881658817588185881958820588215882258823588245882558826588275882858829588305883158832588335883458835588365883758838588395884058841588425884358844588455884658847588485884958850588515885258853588545885558856588575885858859588605886158862588635886458865588665886758868588695887058871588725887358874588755887658877588785887958880588815888258883588845888558886588875888858889588905889158892588935889458895588965889758898588995890058901589025890358904589055890658907589085890958910589115891258913589145891558916589175891858919589205892158922589235892458925589265892758928589295893058931589325893358934589355893658937589385893958940589415894258943589445894558946589475894858949589505895158952589535895458955589565895758958589595896058961589625896358964589655896658967589685896958970589715897258973589745897558976589775897858979589805898158982589835898458985589865898758988589895899058991589925899358994589955899658997589985899959000590015900259003590045900559006590075900859009590105901159012590135901459015590165901759018590195902059021590225902359024590255902659027590285902959030590315903259033590345903559036590375903859039590405904159042590435904459045590465904759048590495905059051590525905359054590555905659057590585905959060590615906259063590645906559066590675906859069590705907159072590735907459075590765907759078590795908059081590825908359084590855908659087590885908959090590915909259093590945909559096590975909859099591005910159102591035910459105591065910759108591095911059111591125911359114591155911659117591185911959120591215912259123591245912559126591275912859129591305913159132591335913459135591365913759138591395914059141591425914359144591455914659147591485914959150591515915259153591545915559156591575915859159591605916159162591635916459165591665916759168591695917059171591725917359174591755917659177591785917959180591815918259183591845918559186591875918859189591905919159192591935919459195591965919759198591995920059201592025920359204592055920659207592085920959210592115921259213592145921559216592175921859219592205922159222592235922459225592265922759228592295923059231592325923359234592355923659237592385923959240592415924259243592445924559246592475924859249592505925159252592535925459255592565925759258592595926059261592625926359264592655926659267592685926959270592715927259273592745927559276592775927859279592805928159282592835928459285592865928759288592895929059291592925929359294592955929659297592985929959300593015930259303593045930559306593075930859309593105931159312593135931459315593165931759318593195932059321593225932359324593255932659327593285932959330593315933259333593345933559336593375933859339593405934159342593435934459345593465934759348593495935059351593525935359354593555935659357593585935959360593615936259363593645936559366593675936859369593705937159372593735937459375593765937759378593795938059381593825938359384593855938659387593885938959390593915939259393593945939559396593975939859399594005940159402594035940459405594065940759408594095941059411594125941359414594155941659417594185941959420594215942259423594245942559426594275942859429594305943159432594335943459435594365943759438594395944059441594425944359444594455944659447594485944959450594515945259453594545945559456594575945859459594605946159462594635946459465594665946759468594695947059471594725947359474594755947659477594785947959480594815948259483594845948559486594875948859489594905949159492594935949459495594965949759498594995950059501595025950359504595055950659507595085950959510595115951259513595145951559516595175951859519595205952159522595235952459525595265952759528595295953059531595325953359534595355953659537595385953959540595415954259543595445954559546595475954859549595505955159552595535955459555595565955759558595595956059561595625956359564595655956659567595685956959570595715957259573595745957559576595775957859579595805958159582595835958459585595865958759588595895959059591595925959359594595955959659597595985959959600596015960259603596045960559606596075960859609596105961159612596135961459615596165961759618596195962059621596225962359624596255962659627596285962959630596315963259633596345963559636596375963859639596405964159642596435964459645596465964759648596495965059651596525965359654596555965659657596585965959660596615966259663596645966559666596675966859669596705967159672596735967459675596765967759678596795968059681596825968359684596855968659687596885968959690596915969259693596945969559696596975969859699597005970159702597035970459705597065970759708597095971059711597125971359714597155971659717597185971959720597215972259723597245972559726597275972859729597305973159732597335973459735597365973759738597395974059741597425974359744597455974659747597485974959750597515975259753597545975559756597575975859759597605976159762597635976459765597665976759768597695977059771597725977359774597755977659777597785977959780597815978259783597845978559786597875978859789597905979159792597935979459795597965979759798597995980059801598025980359804598055980659807598085980959810598115981259813598145981559816598175981859819598205982159822598235982459825598265982759828598295983059831598325983359834598355983659837598385983959840598415984259843598445984559846598475984859849598505985159852598535985459855598565985759858598595986059861598625986359864598655986659867598685986959870598715987259873598745987559876598775987859879598805988159882598835988459885598865988759888598895989059891598925989359894598955989659897598985989959900599015990259903599045990559906599075990859909599105991159912599135991459915599165991759918599195992059921599225992359924599255992659927599285992959930599315993259933599345993559936599375993859939599405994159942599435994459945599465994759948599495995059951599525995359954599555995659957599585995959960599615996259963599645996559966599675996859969599705997159972599735997459975599765997759978599795998059981599825998359984599855998659987599885998959990599915999259993599945999559996599975999859999600006000160002600036000460005600066000760008600096001060011600126001360014600156001660017600186001960020600216002260023600246002560026600276002860029600306003160032600336003460035600366003760038600396004060041600426004360044600456004660047600486004960050600516005260053600546005560056600576005860059600606006160062600636006460065600666006760068600696007060071600726007360074600756007660077600786007960080600816008260083600846008560086600876008860089600906009160092600936009460095600966009760098600996010060101601026010360104601056010660107601086010960110601116011260113601146011560116601176011860119601206012160122601236012460125601266012760128601296013060131601326013360134601356013660137601386013960140601416014260143601446014560146601476014860149601506015160152601536015460155601566015760158601596016060161601626016360164601656016660167601686016960170601716017260173601746017560176601776017860179601806018160182601836018460185601866018760188601896019060191601926019360194601956019660197601986019960200602016020260203602046020560206602076020860209602106021160212602136021460215602166021760218602196022060221602226022360224602256022660227602286022960230602316023260233602346023560236602376023860239602406024160242602436024460245602466024760248602496025060251602526025360254602556025660257602586025960260602616026260263602646026560266602676026860269602706027160272602736027460275602766027760278602796028060281602826028360284602856028660287602886028960290602916029260293602946029560296602976029860299603006030160302603036030460305603066030760308603096031060311603126031360314603156031660317603186031960320603216032260323603246032560326603276032860329603306033160332603336033460335603366033760338603396034060341603426034360344603456034660347603486034960350603516035260353603546035560356603576035860359603606036160362603636036460365603666036760368603696037060371603726037360374603756037660377603786037960380603816038260383603846038560386603876038860389603906039160392603936039460395603966039760398603996040060401604026040360404604056040660407604086040960410604116041260413604146041560416604176041860419604206042160422604236042460425604266042760428604296043060431604326043360434604356043660437604386043960440604416044260443604446044560446604476044860449604506045160452604536045460455604566045760458604596046060461604626046360464604656046660467604686046960470604716047260473604746047560476604776047860479604806048160482604836048460485604866048760488604896049060491604926049360494604956049660497604986049960500605016050260503605046050560506605076050860509605106051160512605136051460515605166051760518605196052060521605226052360524605256052660527605286052960530605316053260533605346053560536605376053860539605406054160542605436054460545605466054760548605496055060551605526055360554605556055660557605586055960560605616056260563605646056560566605676056860569605706057160572605736057460575605766057760578605796058060581605826058360584605856058660587605886058960590605916059260593605946059560596605976059860599606006060160602606036060460605606066060760608606096061060611606126061360614606156061660617606186061960620606216062260623606246062560626606276062860629606306063160632606336063460635606366063760638606396064060641606426064360644606456064660647606486064960650606516065260653606546065560656606576065860659606606066160662606636066460665606666066760668606696067060671606726067360674606756067660677606786067960680606816068260683606846068560686606876068860689606906069160692606936069460695606966069760698606996070060701607026070360704607056070660707607086070960710607116071260713607146071560716607176071860719607206072160722607236072460725607266072760728607296073060731607326073360734607356073660737607386073960740607416074260743607446074560746607476074860749607506075160752607536075460755607566075760758607596076060761607626076360764607656076660767607686076960770607716077260773607746077560776607776077860779607806078160782607836078460785607866078760788607896079060791607926079360794607956079660797607986079960800608016080260803608046080560806608076080860809608106081160812608136081460815608166081760818608196082060821608226082360824608256082660827608286082960830608316083260833608346083560836608376083860839608406084160842608436084460845608466084760848608496085060851608526085360854608556085660857608586085960860608616086260863608646086560866608676086860869608706087160872608736087460875608766087760878608796088060881608826088360884608856088660887608886088960890608916089260893608946089560896608976089860899609006090160902609036090460905609066090760908609096091060911609126091360914609156091660917609186091960920609216092260923609246092560926609276092860929609306093160932609336093460935609366093760938609396094060941609426094360944609456094660947609486094960950609516095260953609546095560956609576095860959609606096160962609636096460965609666096760968609696097060971609726097360974609756097660977609786097960980609816098260983609846098560986609876098860989609906099160992609936099460995609966099760998609996100061001610026100361004610056100661007610086100961010610116101261013610146101561016610176101861019610206102161022610236102461025610266102761028610296103061031610326103361034610356103661037610386103961040610416104261043610446104561046610476104861049610506105161052610536105461055610566105761058610596106061061610626106361064610656106661067610686106961070610716107261073610746107561076610776107861079610806108161082610836108461085610866108761088610896109061091610926109361094610956109661097610986109961100611016110261103611046110561106611076110861109611106111161112611136111461115611166111761118611196112061121611226112361124611256112661127611286112961130611316113261133611346113561136611376113861139611406114161142611436114461145611466114761148611496115061151611526115361154611556115661157611586115961160611616116261163611646116561166611676116861169611706117161172611736117461175611766117761178611796118061181611826118361184611856118661187611886118961190611916119261193611946119561196611976119861199612006120161202612036120461205612066120761208612096121061211612126121361214612156121661217612186121961220612216122261223612246122561226612276122861229612306123161232612336123461235612366123761238612396124061241612426124361244612456124661247612486124961250612516125261253612546125561256612576125861259612606126161262612636126461265612666126761268612696127061271612726127361274612756127661277612786127961280612816128261283612846128561286612876128861289612906129161292612936129461295612966129761298612996130061301613026130361304613056130661307613086130961310613116131261313613146131561316613176131861319613206132161322613236132461325613266132761328613296133061331613326133361334613356133661337613386133961340613416134261343613446134561346613476134861349613506135161352613536135461355613566135761358613596136061361613626136361364613656136661367613686136961370613716137261373613746137561376613776137861379613806138161382613836138461385613866138761388613896139061391613926139361394613956139661397613986139961400614016140261403614046140561406614076140861409614106141161412614136141461415614166141761418614196142061421614226142361424614256142661427614286142961430614316143261433614346143561436614376143861439614406144161442614436144461445614466144761448614496145061451614526145361454614556145661457614586145961460614616146261463614646146561466614676146861469614706147161472614736147461475614766147761478614796148061481614826148361484614856148661487614886148961490614916149261493614946149561496614976149861499615006150161502615036150461505615066150761508615096151061511615126151361514615156151661517615186151961520615216152261523615246152561526615276152861529615306153161532615336153461535615366153761538615396154061541615426154361544615456154661547615486154961550615516155261553615546155561556615576155861559615606156161562615636156461565615666156761568615696157061571615726157361574615756157661577615786157961580615816158261583615846158561586615876158861589615906159161592615936159461595615966159761598615996160061601616026160361604616056160661607616086160961610616116161261613616146161561616616176161861619616206162161622616236162461625616266162761628616296163061631616326163361634616356163661637616386163961640616416164261643616446164561646616476164861649616506165161652616536165461655616566165761658616596166061661616626166361664616656166661667616686166961670616716167261673616746167561676616776167861679616806168161682616836168461685616866168761688616896169061691616926169361694616956169661697616986169961700617016170261703617046170561706617076170861709617106171161712617136171461715617166171761718617196172061721617226172361724617256172661727617286172961730617316173261733617346173561736617376173861739617406174161742617436174461745617466174761748617496175061751617526175361754617556175661757617586175961760617616176261763617646176561766617676176861769617706177161772617736177461775617766177761778617796178061781617826178361784617856178661787617886178961790617916179261793617946179561796617976179861799618006180161802618036180461805618066180761808618096181061811618126181361814618156181661817618186181961820618216182261823618246182561826618276182861829618306183161832618336183461835618366183761838618396184061841618426184361844618456184661847618486184961850618516185261853618546185561856618576185861859618606186161862618636186461865618666186761868618696187061871618726187361874618756187661877618786187961880618816188261883618846188561886618876188861889618906189161892618936189461895618966189761898618996190061901619026190361904619056190661907619086190961910619116191261913619146191561916619176191861919619206192161922619236192461925619266192761928619296193061931619326193361934619356193661937619386193961940619416194261943619446194561946619476194861949619506195161952619536195461955619566195761958619596196061961619626196361964619656196661967619686196961970619716197261973619746197561976619776197861979619806198161982619836198461985619866198761988619896199061991619926199361994619956199661997619986199962000620016200262003620046200562006620076200862009620106201162012620136201462015620166201762018620196202062021620226202362024620256202662027620286202962030620316203262033620346203562036620376203862039620406204162042620436204462045620466204762048620496205062051620526205362054620556205662057620586205962060620616206262063620646206562066620676206862069620706207162072620736207462075620766207762078620796208062081620826208362084620856208662087620886208962090620916209262093620946209562096620976209862099621006210162102621036210462105621066210762108621096211062111621126211362114621156211662117621186211962120621216212262123621246212562126621276212862129621306213162132621336213462135621366213762138621396214062141621426214362144621456214662147621486214962150621516215262153621546215562156621576215862159621606216162162621636216462165621666216762168621696217062171621726217362174621756217662177621786217962180621816218262183621846218562186621876218862189621906219162192621936219462195621966219762198621996220062201622026220362204622056220662207622086220962210622116221262213622146221562216622176221862219622206222162222622236222462225622266222762228622296223062231622326223362234622356223662237622386223962240622416224262243622446224562246622476224862249622506225162252622536225462255622566225762258622596226062261622626226362264622656226662267622686226962270622716227262273622746227562276622776227862279622806228162282622836228462285622866228762288622896229062291622926229362294622956229662297622986229962300623016230262303623046230562306623076230862309623106231162312623136231462315623166231762318623196232062321623226232362324623256232662327623286232962330623316233262333623346233562336623376233862339623406234162342623436234462345623466234762348623496235062351623526235362354623556235662357623586235962360623616236262363623646236562366623676236862369623706237162372623736237462375623766237762378623796238062381623826238362384623856238662387623886238962390623916239262393623946239562396623976239862399624006240162402624036240462405624066240762408624096241062411624126241362414624156241662417624186241962420624216242262423624246242562426624276242862429624306243162432624336243462435624366243762438624396244062441624426244362444624456244662447624486244962450624516245262453624546245562456624576245862459624606246162462624636246462465624666246762468624696247062471624726247362474624756247662477624786247962480624816248262483624846248562486624876248862489624906249162492624936249462495624966249762498624996250062501625026250362504625056250662507625086250962510625116251262513625146251562516625176251862519625206252162522625236252462525625266252762528625296253062531625326253362534625356253662537625386253962540625416254262543625446254562546625476254862549625506255162552625536255462555625566255762558625596256062561625626256362564625656256662567625686256962570625716257262573625746257562576625776257862579625806258162582625836258462585625866258762588625896259062591625926259362594625956259662597625986259962600626016260262603626046260562606626076260862609626106261162612626136261462615626166261762618626196262062621626226262362624626256262662627626286262962630626316263262633626346263562636626376263862639626406264162642626436264462645626466264762648626496265062651626526265362654626556265662657626586265962660626616266262663626646266562666626676266862669626706267162672626736267462675626766267762678626796268062681626826268362684626856268662687626886268962690626916269262693626946269562696626976269862699627006270162702627036270462705627066270762708627096271062711627126271362714627156271662717627186271962720627216272262723627246272562726627276272862729627306273162732627336273462735627366273762738627396274062741627426274362744627456274662747627486274962750627516275262753627546275562756627576275862759627606276162762627636276462765627666276762768627696277062771627726277362774627756277662777627786277962780627816278262783627846278562786627876278862789627906279162792627936279462795627966279762798627996280062801628026280362804628056280662807628086280962810628116281262813628146281562816628176281862819628206282162822628236282462825628266282762828628296283062831628326283362834628356283662837628386283962840628416284262843628446284562846628476284862849628506285162852628536285462855628566285762858628596286062861628626286362864628656286662867628686286962870628716287262873628746287562876628776287862879628806288162882628836288462885628866288762888628896289062891628926289362894628956289662897628986289962900629016290262903629046290562906629076290862909629106291162912629136291462915629166291762918629196292062921629226292362924629256292662927629286292962930629316293262933629346293562936629376293862939629406294162942629436294462945629466294762948629496295062951629526295362954629556295662957629586295962960629616296262963629646296562966629676296862969629706297162972629736297462975629766297762978629796298062981629826298362984629856298662987629886298962990629916299262993629946299562996629976299862999630006300163002630036300463005630066300763008630096301063011630126301363014630156301663017630186301963020630216302263023630246302563026630276302863029630306303163032630336303463035630366303763038630396304063041630426304363044630456304663047630486304963050630516305263053630546305563056630576305863059630606306163062630636306463065630666306763068630696307063071630726307363074630756307663077630786307963080630816308263083630846308563086630876308863089630906309163092630936309463095630966309763098630996310063101631026310363104631056310663107631086310963110631116311263113631146311563116631176311863119631206312163122631236312463125631266312763128631296313063131631326313363134631356313663137631386313963140631416314263143631446314563146631476314863149631506315163152631536315463155631566315763158631596316063161631626316363164631656316663167631686316963170631716317263173631746317563176631776317863179631806318163182631836318463185631866318763188631896319063191631926319363194631956319663197631986319963200632016320263203632046320563206632076320863209632106321163212632136321463215632166321763218632196322063221632226322363224632256322663227632286322963230632316323263233632346323563236632376323863239632406324163242632436324463245632466324763248632496325063251632526325363254632556325663257632586325963260632616326263263632646326563266632676326863269632706327163272632736327463275632766327763278632796328063281632826328363284632856328663287632886328963290632916329263293632946329563296632976329863299633006330163302633036330463305633066330763308633096331063311633126331363314633156331663317633186331963320633216332263323633246332563326633276332863329633306333163332633336333463335633366333763338633396334063341633426334363344633456334663347633486334963350633516335263353633546335563356633576335863359633606336163362633636336463365633666336763368633696337063371633726337363374633756337663377633786337963380633816338263383633846338563386633876338863389633906339163392633936339463395633966339763398633996340063401634026340363404634056340663407634086340963410634116341263413634146341563416634176341863419634206342163422634236342463425634266342763428634296343063431634326343363434634356343663437634386343963440634416344263443634446344563446634476344863449634506345163452634536345463455634566345763458634596346063461634626346363464634656346663467634686346963470634716347263473634746347563476634776347863479634806348163482634836348463485634866348763488634896349063491634926349363494634956349663497634986349963500635016350263503635046350563506635076350863509635106351163512635136351463515635166351763518635196352063521635226352363524635256352663527635286352963530635316353263533635346353563536635376353863539635406354163542635436354463545635466354763548635496355063551635526355363554635556355663557635586355963560635616356263563635646356563566635676356863569635706357163572635736357463575635766357763578635796358063581635826358363584635856358663587635886358963590635916359263593635946359563596635976359863599636006360163602636036360463605636066360763608636096361063611636126361363614636156361663617636186361963620636216362263623636246362563626636276362863629636306363163632636336363463635636366363763638636396364063641636426364363644636456364663647636486364963650636516365263653636546365563656636576365863659636606366163662636636366463665636666366763668636696367063671636726367363674636756367663677636786367963680636816368263683636846368563686636876368863689636906369163692636936369463695636966369763698636996370063701637026370363704637056370663707637086370963710637116371263713637146371563716637176371863719637206372163722637236372463725637266372763728637296373063731637326373363734637356373663737637386373963740637416374263743637446374563746637476374863749637506375163752637536375463755637566375763758637596376063761637626376363764637656376663767637686376963770637716377263773637746377563776637776377863779637806378163782637836378463785637866378763788637896379063791637926379363794637956379663797637986379963800638016380263803638046380563806638076380863809638106381163812638136381463815638166381763818638196382063821638226382363824638256382663827638286382963830638316383263833638346383563836638376383863839638406384163842638436384463845638466384763848638496385063851638526385363854638556385663857638586385963860638616386263863638646386563866638676386863869638706387163872638736387463875638766387763878638796388063881638826388363884638856388663887638886388963890638916389263893638946389563896638976389863899639006390163902639036390463905639066390763908639096391063911639126391363914639156391663917639186391963920639216392263923639246392563926639276392863929639306393163932639336393463935639366393763938639396394063941639426394363944639456394663947639486394963950639516395263953639546395563956639576395863959639606396163962639636396463965639666396763968639696397063971639726397363974639756397663977639786397963980639816398263983639846398563986639876398863989639906399163992639936399463995639966399763998639996400064001640026400364004640056400664007640086400964010640116401264013640146401564016640176401864019640206402164022640236402464025640266402764028640296403064031640326403364034640356403664037640386403964040640416404264043640446404564046640476404864049640506405164052640536405464055640566405764058640596406064061640626406364064640656406664067640686406964070640716407264073640746407564076640776407864079640806408164082640836408464085640866408764088640896409064091640926409364094640956409664097640986409964100641016410264103641046410564106641076410864109641106411164112641136411464115641166411764118641196412064121641226412364124641256412664127641286412964130641316413264133641346413564136641376413864139641406414164142641436414464145641466414764148641496415064151641526415364154641556415664157641586415964160641616416264163641646416564166641676416864169641706417164172641736417464175641766417764178641796418064181641826418364184641856418664187641886418964190641916419264193641946419564196641976419864199642006420164202642036420464205642066420764208642096421064211642126421364214642156421664217642186421964220642216422264223642246422564226642276422864229642306423164232642336423464235642366423764238642396424064241642426424364244642456424664247642486424964250642516425264253642546425564256642576425864259642606426164262642636426464265642666426764268642696427064271642726427364274642756427664277642786427964280642816428264283642846428564286642876428864289642906429164292642936429464295642966429764298642996430064301643026430364304643056430664307643086430964310643116431264313643146431564316643176431864319643206432164322643236432464325643266432764328643296433064331643326433364334643356433664337643386433964340643416434264343643446434564346643476434864349643506435164352643536435464355643566435764358643596436064361643626436364364643656436664367643686436964370643716437264373643746437564376643776437864379643806438164382643836438464385643866438764388643896439064391643926439364394643956439664397643986439964400644016440264403644046440564406644076440864409644106441164412644136441464415644166441764418644196442064421644226442364424644256442664427644286442964430644316443264433644346443564436644376443864439644406444164442644436444464445644466444764448644496445064451644526445364454644556445664457644586445964460644616446264463644646446564466644676446864469644706447164472644736447464475644766447764478644796448064481644826448364484644856448664487644886448964490644916449264493644946449564496644976449864499645006450164502645036450464505645066450764508645096451064511645126451364514645156451664517645186451964520645216452264523645246452564526645276452864529645306453164532645336453464535645366453764538645396454064541645426454364544645456454664547645486454964550645516455264553645546455564556645576455864559645606456164562645636456464565645666456764568645696457064571645726457364574645756457664577645786457964580645816458264583645846458564586645876458864589645906459164592645936459464595645966459764598645996460064601646026460364604646056460664607646086460964610646116461264613646146461564616646176461864619646206462164622646236462464625646266462764628646296463064631646326463364634646356463664637646386463964640646416464264643646446464564646646476464864649646506465164652646536465464655646566465764658646596466064661646626466364664646656466664667646686466964670646716467264673646746467564676646776467864679646806468164682646836468464685646866468764688646896469064691646926469364694646956469664697646986469964700647016470264703647046470564706647076470864709647106471164712647136471464715647166471764718647196472064721647226472364724647256472664727647286472964730647316473264733647346473564736647376473864739647406474164742647436474464745647466474764748647496475064751647526475364754647556475664757647586475964760647616476264763647646476564766647676476864769647706477164772647736477464775647766477764778647796478064781647826478364784647856478664787647886478964790647916479264793647946479564796647976479864799648006480164802648036480464805648066480764808648096481064811648126481364814648156481664817648186481964820648216482264823648246482564826648276482864829648306483164832648336483464835648366483764838648396484064841648426484364844648456484664847648486484964850648516485264853648546485564856648576485864859648606486164862648636486464865648666486764868648696487064871648726487364874648756487664877648786487964880648816488264883648846488564886648876488864889648906489164892648936489464895648966489764898648996490064901649026490364904649056490664907649086490964910649116491264913649146491564916649176491864919649206492164922649236492464925649266492764928649296493064931649326493364934649356493664937649386493964940649416494264943649446494564946649476494864949649506495164952649536495464955649566495764958649596496064961649626496364964649656496664967649686496964970649716497264973649746497564976649776497864979649806498164982649836498464985649866498764988649896499064991649926499364994649956499664997649986499965000650016500265003650046500565006650076500865009650106501165012650136501465015650166501765018650196502065021650226502365024650256502665027650286502965030650316503265033650346503565036650376503865039650406504165042650436504465045650466504765048650496505065051650526505365054650556505665057650586505965060650616506265063650646506565066650676506865069650706507165072650736507465075650766507765078650796508065081650826508365084650856508665087650886508965090650916509265093650946509565096650976509865099651006510165102651036510465105651066510765108651096511065111651126511365114651156511665117651186511965120651216512265123651246512565126651276512865129651306513165132651336513465135651366513765138651396514065141651426514365144651456514665147651486514965150651516515265153651546515565156651576515865159651606516165162651636516465165651666516765168651696517065171651726517365174651756517665177651786517965180651816518265183651846518565186651876518865189651906519165192651936519465195651966519765198651996520065201652026520365204652056520665207652086520965210652116521265213652146521565216652176521865219652206522165222652236522465225652266522765228652296523065231652326523365234652356523665237652386523965240652416524265243652446524565246652476524865249652506525165252652536525465255652566525765258652596526065261652626526365264652656526665267652686526965270652716527265273652746527565276652776527865279652806528165282652836528465285652866528765288652896529065291652926529365294652956529665297652986529965300653016530265303653046530565306653076530865309653106531165312653136531465315653166531765318653196532065321653226532365324653256532665327653286532965330653316533265333653346533565336653376533865339653406534165342653436534465345653466534765348653496535065351653526535365354653556535665357653586535965360653616536265363653646536565366653676536865369653706537165372653736537465375653766537765378653796538065381653826538365384653856538665387653886538965390653916539265393653946539565396653976539865399654006540165402654036540465405654066540765408654096541065411654126541365414654156541665417654186541965420654216542265423654246542565426654276542865429654306543165432654336543465435654366543765438654396544065441654426544365444654456544665447654486544965450654516545265453654546545565456654576545865459654606546165462654636546465465654666546765468654696547065471654726547365474654756547665477654786547965480654816548265483654846548565486654876548865489654906549165492654936549465495654966549765498654996550065501655026550365504655056550665507655086550965510655116551265513655146551565516655176551865519655206552165522655236552465525655266552765528655296553065531655326553365534655356553665537655386553965540655416554265543655446554565546655476554865549655506555165552655536555465555655566555765558655596556065561655626556365564655656556665567655686556965570655716557265573655746557565576655776557865579655806558165582655836558465585655866558765588655896559065591655926559365594655956559665597655986559965600656016560265603656046560565606656076560865609656106561165612656136561465615656166561765618656196562065621656226562365624656256562665627656286562965630656316563265633656346563565636656376563865639656406564165642656436564465645656466564765648656496565065651656526565365654656556565665657656586565965660656616566265663656646566565666656676566865669656706567165672656736567465675656766567765678656796568065681656826568365684656856568665687656886568965690656916569265693656946569565696656976569865699657006570165702657036570465705657066570765708657096571065711657126571365714657156571665717657186571965720657216572265723657246572565726657276572865729657306573165732657336573465735657366573765738657396574065741657426574365744657456574665747657486574965750657516575265753657546575565756657576575865759657606576165762657636576465765657666576765768657696577065771657726577365774657756577665777657786577965780657816578265783657846578565786657876578865789657906579165792657936579465795657966579765798657996580065801658026580365804658056580665807658086580965810658116581265813658146581565816658176581865819658206582165822658236582465825658266582765828658296583065831658326583365834658356583665837658386583965840658416584265843658446584565846658476584865849658506585165852658536585465855658566585765858658596586065861658626586365864658656586665867658686586965870658716587265873658746587565876658776587865879658806588165882658836588465885658866588765888658896589065891658926589365894658956589665897658986589965900659016590265903659046590565906659076590865909659106591165912659136591465915659166591765918659196592065921659226592365924659256592665927659286592965930659316593265933659346593565936659376593865939659406594165942659436594465945659466594765948659496595065951659526595365954659556595665957659586595965960659616596265963659646596565966659676596865969659706597165972659736597465975659766597765978659796598065981659826598365984659856598665987659886598965990659916599265993659946599565996659976599865999660006600166002660036600466005660066600766008660096601066011660126601366014660156601666017660186601966020660216602266023660246602566026660276602866029660306603166032660336603466035660366603766038660396604066041660426604366044660456604666047660486604966050660516605266053660546605566056660576605866059660606606166062660636606466065660666606766068660696607066071660726607366074660756607666077660786607966080660816608266083660846608566086660876608866089660906609166092660936609466095660966609766098660996610066101661026610366104661056610666107661086610966110661116611266113661146611566116661176611866119661206612166122661236612466125661266612766128661296613066131661326613366134661356613666137661386613966140661416614266143661446614566146661476614866149661506615166152661536615466155661566615766158661596616066161661626616366164661656616666167661686616966170661716617266173661746617566176661776617866179661806618166182661836618466185661866618766188661896619066191661926619366194661956619666197661986619966200662016620266203662046620566206662076620866209662106621166212662136621466215662166621766218662196622066221662226622366224662256622666227662286622966230662316623266233662346623566236662376623866239662406624166242662436624466245662466624766248662496625066251662526625366254662556625666257662586625966260662616626266263662646626566266662676626866269662706627166272662736627466275662766627766278662796628066281662826628366284662856628666287662886628966290662916629266293662946629566296662976629866299663006630166302663036630466305663066630766308663096631066311663126631366314663156631666317663186631966320663216632266323663246632566326663276632866329663306633166332663336633466335663366633766338663396634066341663426634366344663456634666347663486634966350663516635266353663546635566356663576635866359663606636166362663636636466365663666636766368663696637066371663726637366374663756637666377663786637966380663816638266383663846638566386663876638866389663906639166392663936639466395663966639766398663996640066401664026640366404664056640666407664086640966410664116641266413664146641566416664176641866419664206642166422664236642466425664266642766428664296643066431664326643366434664356643666437664386643966440664416644266443664446644566446664476644866449664506645166452664536645466455664566645766458664596646066461664626646366464664656646666467664686646966470664716647266473664746647566476664776647866479664806648166482664836648466485664866648766488664896649066491664926649366494664956649666497664986649966500665016650266503665046650566506665076650866509665106651166512665136651466515665166651766518665196652066521665226652366524665256652666527665286652966530665316653266533665346653566536665376653866539665406654166542665436654466545665466654766548665496655066551665526655366554665556655666557665586655966560665616656266563665646656566566665676656866569665706657166572665736657466575665766657766578665796658066581665826658366584665856658666587665886658966590665916659266593665946659566596665976659866599666006660166602666036660466605666066660766608666096661066611666126661366614666156661666617666186661966620666216662266623666246662566626666276662866629666306663166632666336663466635666366663766638666396664066641666426664366644666456664666647666486664966650666516665266653666546665566656666576665866659666606666166662666636666466665666666666766668666696667066671666726667366674666756667666677666786667966680666816668266683666846668566686666876668866689666906669166692666936669466695666966669766698666996670066701667026670366704667056670666707667086670966710667116671266713667146671566716667176671866719667206672166722667236672466725667266672766728667296673066731667326673366734667356673666737667386673966740667416674266743667446674566746667476674866749667506675166752667536675466755667566675766758667596676066761667626676366764667656676666767667686676966770667716677266773667746677566776667776677866779667806678166782667836678466785667866678766788667896679066791667926679366794667956679666797667986679966800668016680266803668046680566806668076680866809668106681166812668136681466815668166681766818668196682066821668226682366824668256682666827668286682966830668316683266833668346683566836668376683866839668406684166842668436684466845668466684766848668496685066851668526685366854668556685666857668586685966860668616686266863668646686566866668676686866869668706687166872668736687466875668766687766878668796688066881668826688366884668856688666887668886688966890668916689266893668946689566896668976689866899669006690166902669036690466905669066690766908669096691066911669126691366914669156691666917669186691966920669216692266923669246692566926669276692866929669306693166932669336693466935669366693766938669396694066941669426694366944669456694666947669486694966950669516695266953669546695566956669576695866959669606696166962669636696466965669666696766968669696697066971669726697366974669756697666977669786697966980669816698266983669846698566986669876698866989669906699166992669936699466995669966699766998669996700067001670026700367004670056700667007670086700967010670116701267013670146701567016670176701867019670206702167022670236702467025670266702767028670296703067031670326703367034670356703667037670386703967040670416704267043670446704567046670476704867049670506705167052670536705467055670566705767058670596706067061670626706367064670656706667067670686706967070670716707267073670746707567076670776707867079670806708167082670836708467085670866708767088670896709067091670926709367094670956709667097670986709967100671016710267103671046710567106671076710867109671106711167112671136711467115671166711767118671196712067121671226712367124671256712667127671286712967130671316713267133671346713567136671376713867139671406714167142671436714467145671466714767148671496715067151671526715367154671556715667157671586715967160671616716267163671646716567166671676716867169671706717167172671736717467175671766717767178671796718067181671826718367184671856718667187671886718967190671916719267193671946719567196671976719867199672006720167202672036720467205672066720767208672096721067211672126721367214672156721667217672186721967220672216722267223672246722567226672276722867229672306723167232672336723467235672366723767238672396724067241672426724367244672456724667247672486724967250672516725267253672546725567256672576725867259672606726167262672636726467265672666726767268672696727067271672726727367274672756727667277672786727967280672816728267283672846728567286672876728867289672906729167292672936729467295672966729767298672996730067301673026730367304673056730667307673086730967310673116731267313673146731567316673176731867319673206732167322673236732467325673266732767328673296733067331673326733367334673356733667337673386733967340673416734267343673446734567346673476734867349673506735167352673536735467355673566735767358673596736067361673626736367364673656736667367673686736967370673716737267373673746737567376673776737867379673806738167382673836738467385673866738767388673896739067391673926739367394673956739667397673986739967400674016740267403674046740567406674076740867409674106741167412674136741467415674166741767418674196742067421674226742367424674256742667427674286742967430674316743267433674346743567436674376743867439674406744167442674436744467445674466744767448674496745067451674526745367454674556745667457674586745967460674616746267463674646746567466674676746867469674706747167472674736747467475674766747767478674796748067481674826748367484674856748667487674886748967490674916749267493674946749567496674976749867499675006750167502675036750467505675066750767508675096751067511675126751367514675156751667517675186751967520675216752267523675246752567526675276752867529675306753167532675336753467535675366753767538675396754067541675426754367544675456754667547675486754967550675516755267553675546755567556675576755867559675606756167562675636756467565675666756767568675696757067571675726757367574675756757667577675786757967580675816758267583675846758567586675876758867589675906759167592675936759467595675966759767598675996760067601676026760367604676056760667607676086760967610676116761267613676146761567616676176761867619676206762167622676236762467625676266762767628676296763067631676326763367634676356763667637676386763967640676416764267643676446764567646676476764867649676506765167652676536765467655676566765767658676596766067661676626766367664676656766667667676686766967670676716767267673676746767567676676776767867679676806768167682676836768467685676866768767688676896769067691676926769367694676956769667697676986769967700677016770267703677046770567706677076770867709677106771167712677136771467715677166771767718677196772067721677226772367724677256772667727677286772967730677316773267733677346773567736677376773867739677406774167742677436774467745677466774767748677496775067751677526775367754677556775667757677586775967760677616776267763677646776567766677676776867769677706777167772677736777467775677766777767778677796778067781677826778367784677856778667787677886778967790677916779267793677946779567796677976779867799678006780167802678036780467805678066780767808678096781067811678126781367814678156781667817678186781967820678216782267823678246782567826678276782867829678306783167832678336783467835678366783767838678396784067841678426784367844678456784667847678486784967850678516785267853678546785567856678576785867859678606786167862678636786467865678666786767868678696787067871678726787367874678756787667877678786787967880678816788267883678846788567886678876788867889678906789167892678936789467895678966789767898678996790067901679026790367904679056790667907679086790967910679116791267913679146791567916679176791867919679206792167922679236792467925679266792767928679296793067931679326793367934679356793667937679386793967940679416794267943679446794567946679476794867949679506795167952679536795467955679566795767958679596796067961679626796367964679656796667967679686796967970679716797267973679746797567976679776797867979679806798167982679836798467985679866798767988679896799067991679926799367994679956799667997679986799968000680016800268003680046800568006680076800868009680106801168012680136801468015680166801768018680196802068021680226802368024680256802668027680286802968030680316803268033680346803568036680376803868039680406804168042680436804468045680466804768048680496805068051680526805368054680556805668057680586805968060680616806268063680646806568066680676806868069680706807168072680736807468075680766807768078680796808068081680826808368084680856808668087680886808968090680916809268093680946809568096680976809868099681006810168102681036810468105681066810768108681096811068111681126811368114681156811668117681186811968120681216812268123681246812568126681276812868129681306813168132681336813468135681366813768138681396814068141681426814368144681456814668147681486814968150681516815268153681546815568156681576815868159681606816168162681636816468165681666816768168681696817068171681726817368174681756817668177681786817968180681816818268183681846818568186681876818868189681906819168192681936819468195681966819768198681996820068201682026820368204682056820668207682086820968210682116821268213682146821568216682176821868219682206822168222682236822468225682266822768228682296823068231682326823368234682356823668237682386823968240682416824268243682446824568246682476824868249682506825168252682536825468255682566825768258682596826068261682626826368264682656826668267682686826968270682716827268273682746827568276682776827868279682806828168282682836828468285682866828768288682896829068291682926829368294682956829668297682986829968300683016830268303683046830568306683076830868309683106831168312683136831468315683166831768318683196832068321683226832368324683256832668327683286832968330683316833268333683346833568336683376833868339683406834168342683436834468345683466834768348683496835068351683526835368354683556835668357683586835968360683616836268363683646836568366683676836868369683706837168372683736837468375683766837768378683796838068381683826838368384683856838668387683886838968390683916839268393683946839568396683976839868399684006840168402684036840468405684066840768408684096841068411684126841368414684156841668417684186841968420684216842268423684246842568426684276842868429684306843168432684336843468435684366843768438684396844068441684426844368444684456844668447684486844968450684516845268453684546845568456684576845868459684606846168462684636846468465684666846768468684696847068471684726847368474684756847668477684786847968480684816848268483684846848568486684876848868489684906849168492684936849468495684966849768498684996850068501685026850368504685056850668507685086850968510685116851268513685146851568516685176851868519685206852168522685236852468525685266852768528685296853068531685326853368534685356853668537685386853968540685416854268543685446854568546685476854868549685506855168552685536855468555685566855768558685596856068561685626856368564685656856668567685686856968570685716857268573685746857568576685776857868579685806858168582685836858468585685866858768588685896859068591685926859368594685956859668597685986859968600686016860268603686046860568606686076860868609686106861168612686136861468615686166861768618686196862068621686226862368624686256862668627686286862968630686316863268633686346863568636686376863868639686406864168642686436864468645686466864768648686496865068651686526865368654686556865668657686586865968660686616866268663686646866568666686676866868669686706867168672686736867468675686766867768678686796868068681686826868368684686856868668687686886868968690686916869268693686946869568696686976869868699687006870168702687036870468705687066870768708687096871068711687126871368714687156871668717687186871968720687216872268723687246872568726687276872868729687306873168732687336873468735687366873768738687396874068741687426874368744687456874668747687486874968750687516875268753687546875568756687576875868759687606876168762687636876468765687666876768768687696877068771687726877368774687756877668777687786877968780687816878268783687846878568786687876878868789687906879168792687936879468795687966879768798687996880068801688026880368804688056880668807688086880968810688116881268813688146881568816688176881868819688206882168822688236882468825688266882768828688296883068831688326883368834688356883668837688386883968840688416884268843688446884568846688476884868849688506885168852688536885468855688566885768858688596886068861688626886368864688656886668867688686886968870688716887268873688746887568876688776887868879688806888168882688836888468885688866888768888688896889068891688926889368894688956889668897688986889968900689016890268903689046890568906689076890868909689106891168912689136891468915689166891768918689196892068921689226892368924689256892668927689286892968930689316893268933689346893568936689376893868939689406894168942689436894468945689466894768948689496895068951689526895368954689556895668957689586895968960689616896268963689646896568966689676896868969689706897168972689736897468975689766897768978689796898068981689826898368984689856898668987689886898968990689916899268993689946899568996689976899868999690006900169002690036900469005690066900769008690096901069011690126901369014690156901669017690186901969020690216902269023690246902569026690276902869029690306903169032690336903469035690366903769038690396904069041690426904369044690456904669047690486904969050690516905269053690546905569056690576905869059690606906169062690636906469065690666906769068690696907069071690726907369074690756907669077690786907969080690816908269083690846908569086690876908869089690906909169092690936909469095690966909769098690996910069101691026910369104691056910669107691086910969110691116911269113691146911569116691176911869119691206912169122691236912469125691266912769128691296913069131691326913369134691356913669137691386913969140691416914269143691446914569146691476914869149691506915169152691536915469155691566915769158691596916069161691626916369164691656916669167691686916969170691716917269173691746917569176691776917869179691806918169182691836918469185691866918769188691896919069191691926919369194691956919669197691986919969200692016920269203692046920569206692076920869209692106921169212692136921469215692166921769218692196922069221692226922369224692256922669227692286922969230692316923269233692346923569236692376923869239692406924169242692436924469245692466924769248692496925069251692526925369254692556925669257692586925969260692616926269263692646926569266692676926869269692706927169272692736927469275692766927769278692796928069281692826928369284692856928669287692886928969290692916929269293692946929569296692976929869299693006930169302693036930469305693066930769308693096931069311693126931369314693156931669317693186931969320693216932269323693246932569326693276932869329693306933169332693336933469335693366933769338693396934069341693426934369344693456934669347693486934969350693516935269353693546935569356693576935869359693606936169362693636936469365693666936769368693696937069371693726937369374693756937669377693786937969380693816938269383693846938569386693876938869389693906939169392693936939469395693966939769398693996940069401694026940369404694056940669407694086940969410694116941269413694146941569416694176941869419694206942169422694236942469425694266942769428694296943069431694326943369434694356943669437694386943969440694416944269443694446944569446694476944869449694506945169452694536945469455694566945769458694596946069461694626946369464694656946669467694686946969470694716947269473694746947569476694776947869479694806948169482694836948469485694866948769488694896949069491694926949369494694956949669497694986949969500695016950269503695046950569506695076950869509695106951169512695136951469515695166951769518695196952069521695226952369524695256952669527695286952969530695316953269533695346953569536695376953869539695406954169542695436954469545695466954769548695496955069551695526955369554695556955669557695586955969560695616956269563695646956569566695676956869569695706957169572695736957469575695766957769578695796958069581695826958369584695856958669587695886958969590695916959269593695946959569596695976959869599696006960169602696036960469605696066960769608696096961069611696126961369614696156961669617696186961969620696216962269623696246962569626696276962869629696306963169632696336963469635696366963769638696396964069641696426964369644696456964669647696486964969650696516965269653696546965569656696576965869659696606966169662696636966469665696666966769668696696967069671696726967369674696756967669677696786967969680696816968269683696846968569686696876968869689696906969169692696936969469695696966969769698696996970069701697026970369704697056970669707697086970969710697116971269713697146971569716697176971869719697206972169722697236972469725697266972769728697296973069731697326973369734697356973669737697386973969740697416974269743697446974569746697476974869749697506975169752697536975469755697566975769758697596976069761697626976369764697656976669767697686976969770697716977269773697746977569776697776977869779697806978169782697836978469785697866978769788697896979069791697926979369794697956979669797697986979969800698016980269803698046980569806698076980869809698106981169812698136981469815698166981769818698196982069821698226982369824698256982669827698286982969830698316983269833698346983569836698376983869839698406984169842698436984469845698466984769848698496985069851698526985369854698556985669857698586985969860698616986269863698646986569866698676986869869698706987169872698736987469875698766987769878698796988069881698826988369884698856988669887698886988969890698916989269893698946989569896698976989869899699006990169902699036990469905699066990769908699096991069911699126991369914699156991669917699186991969920699216992269923699246992569926699276992869929699306993169932699336993469935699366993769938699396994069941699426994369944699456994669947699486994969950699516995269953699546995569956699576995869959699606996169962699636996469965699666996769968699696997069971699726997369974699756997669977699786997969980699816998269983699846998569986699876998869989699906999169992699936999469995699966999769998699997000070001700027000370004700057000670007700087000970010700117001270013700147001570016700177001870019700207002170022700237002470025700267002770028700297003070031700327003370034700357003670037700387003970040700417004270043700447004570046700477004870049700507005170052700537005470055700567005770058700597006070061700627006370064700657006670067700687006970070700717007270073700747007570076700777007870079700807008170082700837008470085700867008770088700897009070091700927009370094700957009670097700987009970100701017010270103701047010570106701077010870109701107011170112701137011470115701167011770118701197012070121701227012370124701257012670127701287012970130701317013270133701347013570136701377013870139701407014170142701437014470145701467014770148701497015070151701527015370154701557015670157701587015970160701617016270163701647016570166701677016870169701707017170172701737017470175701767017770178701797018070181701827018370184701857018670187701887018970190701917019270193701947019570196701977019870199702007020170202702037020470205702067020770208702097021070211702127021370214702157021670217702187021970220702217022270223702247022570226702277022870229702307023170232702337023470235702367023770238702397024070241702427024370244702457024670247702487024970250702517025270253702547025570256702577025870259702607026170262702637026470265702667026770268702697027070271702727027370274702757027670277702787027970280702817028270283702847028570286702877028870289702907029170292702937029470295702967029770298702997030070301703027030370304703057030670307703087030970310703117031270313703147031570316703177031870319703207032170322703237032470325703267032770328703297033070331703327033370334703357033670337703387033970340703417034270343703447034570346703477034870349703507035170352703537035470355703567035770358703597036070361703627036370364703657036670367703687036970370703717037270373703747037570376703777037870379703807038170382703837038470385703867038770388703897039070391703927039370394703957039670397703987039970400704017040270403704047040570406704077040870409704107041170412704137041470415704167041770418704197042070421704227042370424704257042670427704287042970430704317043270433704347043570436704377043870439704407044170442704437044470445704467044770448704497045070451704527045370454704557045670457704587045970460704617046270463704647046570466704677046870469704707047170472704737047470475704767047770478704797048070481704827048370484704857048670487704887048970490704917049270493704947049570496704977049870499705007050170502705037050470505705067050770508705097051070511705127051370514705157051670517705187051970520705217052270523705247052570526705277052870529705307053170532705337053470535705367053770538705397054070541705427054370544705457054670547705487054970550705517055270553705547055570556705577055870559705607056170562705637056470565705667056770568705697057070571705727057370574705757057670577705787057970580705817058270583705847058570586705877058870589705907059170592705937059470595705967059770598705997060070601706027060370604706057060670607706087060970610706117061270613706147061570616706177061870619706207062170622706237062470625706267062770628706297063070631706327063370634706357063670637706387063970640706417064270643706447064570646706477064870649706507065170652706537065470655706567065770658706597066070661706627066370664706657066670667706687066970670706717067270673706747067570676706777067870679706807068170682706837068470685706867068770688706897069070691706927069370694706957069670697706987069970700707017070270703707047070570706707077070870709707107071170712707137071470715707167071770718707197072070721707227072370724707257072670727707287072970730707317073270733707347073570736707377073870739707407074170742707437074470745707467074770748707497075070751707527075370754707557075670757707587075970760707617076270763707647076570766707677076870769707707077170772707737077470775707767077770778707797078070781707827078370784707857078670787707887078970790707917079270793707947079570796707977079870799708007080170802708037080470805708067080770808708097081070811708127081370814708157081670817708187081970820708217082270823708247082570826708277082870829708307083170832708337083470835708367083770838708397084070841708427084370844708457084670847708487084970850708517085270853708547085570856708577085870859708607086170862708637086470865708667086770868708697087070871708727087370874708757087670877708787087970880708817088270883708847088570886708877088870889708907089170892708937089470895708967089770898708997090070901709027090370904709057090670907709087090970910709117091270913709147091570916709177091870919709207092170922709237092470925709267092770928709297093070931709327093370934709357093670937709387093970940709417094270943709447094570946709477094870949709507095170952709537095470955709567095770958709597096070961709627096370964709657096670967709687096970970709717097270973709747097570976709777097870979709807098170982709837098470985709867098770988709897099070991709927099370994709957099670997709987099971000710017100271003710047100571006710077100871009710107101171012710137101471015710167101771018710197102071021710227102371024710257102671027710287102971030710317103271033710347103571036710377103871039710407104171042710437104471045710467104771048710497105071051710527105371054710557105671057710587105971060710617106271063710647106571066710677106871069710707107171072710737107471075710767107771078710797108071081710827108371084710857108671087710887108971090710917109271093710947109571096710977109871099711007110171102711037110471105711067110771108711097111071111711127111371114711157111671117711187111971120711217112271123711247112571126711277112871129711307113171132711337113471135711367113771138711397114071141711427114371144711457114671147711487114971150711517115271153711547115571156711577115871159711607116171162711637116471165711667116771168711697117071171711727117371174711757117671177711787117971180711817118271183711847118571186711877118871189711907119171192711937119471195711967119771198711997120071201712027120371204712057120671207712087120971210712117121271213712147121571216712177121871219712207122171222712237122471225712267122771228712297123071231712327123371234712357123671237712387123971240712417124271243712447124571246712477124871249712507125171252712537125471255712567125771258712597126071261712627126371264712657126671267712687126971270712717127271273712747127571276712777127871279712807128171282712837128471285712867128771288712897129071291712927129371294712957129671297712987129971300713017130271303713047130571306713077130871309713107131171312713137131471315713167131771318713197132071321713227132371324713257132671327713287132971330713317133271333713347133571336713377133871339713407134171342713437134471345713467134771348713497135071351713527135371354713557135671357713587135971360713617136271363713647136571366713677136871369713707137171372713737137471375713767137771378713797138071381713827138371384713857138671387713887138971390713917139271393713947139571396713977139871399714007140171402714037140471405714067140771408714097141071411714127141371414714157141671417714187141971420714217142271423714247142571426714277142871429714307143171432714337143471435714367143771438714397144071441714427144371444714457144671447714487144971450714517145271453714547145571456714577145871459714607146171462714637146471465714667146771468714697147071471714727147371474714757147671477714787147971480714817148271483714847148571486714877148871489714907149171492714937149471495714967149771498714997150071501715027150371504715057150671507715087150971510715117151271513715147151571516715177151871519715207152171522715237152471525715267152771528715297153071531715327153371534715357153671537715387153971540715417154271543715447154571546715477154871549715507155171552715537155471555715567155771558715597156071561715627156371564715657156671567715687156971570715717157271573715747157571576715777157871579715807158171582715837158471585715867158771588715897159071591715927159371594715957159671597715987159971600716017160271603716047160571606716077160871609716107161171612716137161471615716167161771618716197162071621716227162371624716257162671627716287162971630716317163271633716347163571636716377163871639716407164171642716437164471645716467164771648716497165071651716527165371654716557165671657716587165971660716617166271663716647166571666716677166871669716707167171672716737167471675716767167771678716797168071681716827168371684716857168671687716887168971690716917169271693716947169571696716977169871699717007170171702717037170471705717067170771708717097171071711717127171371714717157171671717717187171971720717217172271723717247172571726717277172871729717307173171732717337173471735717367173771738717397174071741717427174371744717457174671747717487174971750717517175271753717547175571756717577175871759717607176171762717637176471765717667176771768717697177071771717727177371774717757177671777717787177971780717817178271783717847178571786717877178871789717907179171792717937179471795717967179771798717997180071801718027180371804718057180671807718087180971810718117181271813718147181571816718177181871819718207182171822718237182471825718267182771828718297183071831718327183371834718357183671837718387183971840718417184271843718447184571846718477184871849718507185171852718537185471855718567185771858718597186071861718627186371864718657186671867718687186971870718717187271873718747187571876718777187871879718807188171882718837188471885718867188771888718897189071891718927189371894718957189671897718987189971900719017190271903719047190571906719077190871909719107191171912719137191471915719167191771918719197192071921719227192371924719257192671927719287192971930719317193271933719347193571936719377193871939719407194171942719437194471945719467194771948719497195071951719527195371954719557195671957719587195971960719617196271963719647196571966719677196871969719707197171972719737197471975719767197771978719797198071981719827198371984719857198671987719887198971990719917199271993719947199571996719977199871999720007200172002720037200472005720067200772008720097201072011720127201372014720157201672017720187201972020720217202272023720247202572026720277202872029720307203172032720337203472035720367203772038720397204072041720427204372044720457204672047720487204972050720517205272053720547205572056720577205872059720607206172062720637206472065720667206772068720697207072071720727207372074720757207672077720787207972080720817208272083720847208572086720877208872089720907209172092720937209472095720967209772098720997210072101721027210372104721057210672107721087210972110721117211272113721147211572116721177211872119721207212172122721237212472125721267212772128721297213072131721327213372134721357213672137721387213972140721417214272143721447214572146721477214872149721507215172152721537215472155721567215772158721597216072161721627216372164721657216672167721687216972170721717217272173721747217572176721777217872179721807218172182721837218472185721867218772188721897219072191721927219372194721957219672197721987219972200722017220272203722047220572206722077220872209722107221172212722137221472215722167221772218722197222072221722227222372224722257222672227722287222972230722317223272233722347223572236722377223872239722407224172242722437224472245722467224772248722497225072251722527225372254722557225672257722587225972260722617226272263722647226572266722677226872269722707227172272722737227472275722767227772278722797228072281722827228372284722857228672287722887228972290722917229272293722947229572296722977229872299723007230172302723037230472305723067230772308723097231072311723127231372314723157231672317723187231972320723217232272323723247232572326723277232872329723307233172332723337233472335723367233772338723397234072341723427234372344723457234672347723487234972350723517235272353723547235572356723577235872359723607236172362723637236472365723667236772368723697237072371723727237372374723757237672377723787237972380723817238272383723847238572386723877238872389723907239172392723937239472395723967239772398723997240072401724027240372404724057240672407724087240972410724117241272413724147241572416724177241872419724207242172422724237242472425724267242772428724297243072431724327243372434724357243672437724387243972440724417244272443724447244572446724477244872449724507245172452724537245472455724567245772458724597246072461724627246372464724657246672467724687246972470724717247272473724747247572476724777247872479724807248172482724837248472485724867248772488724897249072491724927249372494724957249672497724987249972500725017250272503725047250572506725077250872509725107251172512725137251472515725167251772518725197252072521725227252372524725257252672527725287252972530725317253272533725347253572536725377253872539725407254172542725437254472545725467254772548725497255072551725527255372554725557255672557725587255972560725617256272563725647256572566725677256872569725707257172572725737257472575725767257772578725797258072581725827258372584725857258672587725887258972590725917259272593725947259572596725977259872599726007260172602726037260472605726067260772608726097261072611726127261372614726157261672617726187261972620726217262272623726247262572626726277262872629726307263172632726337263472635726367263772638726397264072641726427264372644726457264672647726487264972650726517265272653726547265572656726577265872659726607266172662726637266472665726667266772668726697267072671726727267372674726757267672677726787267972680726817268272683726847268572686726877268872689726907269172692726937269472695726967269772698726997270072701727027270372704727057270672707727087270972710727117271272713727147271572716727177271872719727207272172722727237272472725727267272772728727297273072731727327273372734727357273672737727387273972740727417274272743727447274572746727477274872749727507275172752727537275472755727567275772758727597276072761727627276372764727657276672767727687276972770727717277272773727747277572776727777277872779727807278172782727837278472785727867278772788727897279072791727927279372794727957279672797727987279972800728017280272803728047280572806728077280872809728107281172812728137281472815728167281772818728197282072821728227282372824728257282672827728287282972830728317283272833728347283572836728377283872839728407284172842728437284472845728467284772848728497285072851728527285372854728557285672857728587285972860728617286272863728647286572866728677286872869728707287172872728737287472875728767287772878728797288072881728827288372884728857288672887728887288972890728917289272893728947289572896728977289872899729007290172902729037290472905729067290772908729097291072911729127291372914729157291672917729187291972920729217292272923729247292572926729277292872929729307293172932729337293472935729367293772938729397294072941729427294372944729457294672947729487294972950729517295272953729547295572956729577295872959729607296172962729637296472965729667296772968729697297072971729727297372974729757297672977729787297972980729817298272983729847298572986729877298872989729907299172992729937299472995729967299772998729997300073001730027300373004730057300673007730087300973010730117301273013730147301573016730177301873019730207302173022730237302473025730267302773028730297303073031730327303373034730357303673037730387303973040730417304273043730447304573046730477304873049730507305173052730537305473055730567305773058730597306073061730627306373064730657306673067730687306973070730717307273073730747307573076730777307873079730807308173082730837308473085730867308773088730897309073091730927309373094730957309673097730987309973100731017310273103731047310573106731077310873109731107311173112731137311473115731167311773118731197312073121731227312373124731257312673127731287312973130731317313273133731347313573136731377313873139731407314173142731437314473145731467314773148731497315073151731527315373154731557315673157731587315973160731617316273163731647316573166731677316873169731707317173172731737317473175731767317773178731797318073181731827318373184731857318673187731887318973190731917319273193731947319573196731977319873199732007320173202732037320473205732067320773208732097321073211732127321373214732157321673217732187321973220732217322273223732247322573226732277322873229732307323173232732337323473235732367323773238732397324073241732427324373244732457324673247732487324973250732517325273253732547325573256732577325873259732607326173262732637326473265732667326773268732697327073271732727327373274732757327673277732787327973280732817328273283732847328573286732877328873289732907329173292732937329473295732967329773298732997330073301733027330373304733057330673307733087330973310733117331273313733147331573316733177331873319733207332173322733237332473325733267332773328733297333073331733327333373334733357333673337733387333973340733417334273343733447334573346733477334873349733507335173352733537335473355733567335773358733597336073361733627336373364733657336673367733687336973370733717337273373733747337573376733777337873379733807338173382733837338473385733867338773388733897339073391733927339373394733957339673397733987339973400734017340273403734047340573406734077340873409734107341173412734137341473415734167341773418734197342073421734227342373424734257342673427734287342973430734317343273433734347343573436734377343873439734407344173442734437344473445734467344773448734497345073451734527345373454734557345673457734587345973460734617346273463734647346573466734677346873469734707347173472734737347473475734767347773478734797348073481734827348373484734857348673487734887348973490734917349273493734947349573496734977349873499735007350173502735037350473505735067350773508735097351073511735127351373514735157351673517735187351973520735217352273523735247352573526735277352873529735307353173532735337353473535735367353773538735397354073541735427354373544735457354673547735487354973550735517355273553735547355573556735577355873559735607356173562735637356473565735667356773568735697357073571735727357373574735757357673577735787357973580735817358273583735847358573586735877358873589735907359173592735937359473595735967359773598735997360073601736027360373604736057360673607736087360973610736117361273613736147361573616736177361873619736207362173622736237362473625736267362773628736297363073631736327363373634736357363673637736387363973640736417364273643736447364573646736477364873649736507365173652736537365473655736567365773658736597366073661736627366373664736657366673667736687366973670736717367273673736747367573676736777367873679736807368173682736837368473685736867368773688736897369073691736927369373694736957369673697736987369973700737017370273703737047370573706737077370873709737107371173712737137371473715737167371773718737197372073721737227372373724737257372673727737287372973730737317373273733737347373573736737377373873739737407374173742737437374473745737467374773748737497375073751737527375373754737557375673757737587375973760737617376273763737647376573766737677376873769737707377173772737737377473775737767377773778737797378073781737827378373784737857378673787737887378973790737917379273793737947379573796737977379873799738007380173802738037380473805738067380773808738097381073811738127381373814738157381673817738187381973820738217382273823738247382573826738277382873829738307383173832738337383473835738367383773838738397384073841738427384373844738457384673847738487384973850738517385273853738547385573856738577385873859738607386173862738637386473865738667386773868738697387073871738727387373874738757387673877738787387973880738817388273883738847388573886738877388873889738907389173892738937389473895738967389773898738997390073901739027390373904739057390673907739087390973910739117391273913739147391573916739177391873919739207392173922739237392473925739267392773928739297393073931739327393373934739357393673937739387393973940739417394273943739447394573946739477394873949739507395173952739537395473955739567395773958739597396073961739627396373964739657396673967739687396973970739717397273973739747397573976739777397873979739807398173982739837398473985739867398773988739897399073991739927399373994739957399673997739987399974000740017400274003740047400574006740077400874009740107401174012740137401474015740167401774018740197402074021740227402374024740257402674027740287402974030740317403274033740347403574036740377403874039740407404174042740437404474045740467404774048740497405074051740527405374054740557405674057740587405974060740617406274063740647406574066740677406874069740707407174072740737407474075740767407774078740797408074081740827408374084740857408674087740887408974090740917409274093740947409574096740977409874099741007410174102741037410474105741067410774108741097411074111741127411374114741157411674117741187411974120741217412274123741247412574126741277412874129741307413174132741337413474135741367413774138741397414074141741427414374144741457414674147741487414974150741517415274153741547415574156741577415874159741607416174162741637416474165741667416774168741697417074171741727417374174741757417674177741787417974180741817418274183741847418574186741877418874189741907419174192741937419474195741967419774198741997420074201742027420374204742057420674207742087420974210742117421274213742147421574216742177421874219742207422174222742237422474225742267422774228742297423074231742327423374234742357423674237742387423974240742417424274243742447424574246742477424874249742507425174252742537425474255742567425774258742597426074261742627426374264742657426674267742687426974270742717427274273742747427574276742777427874279742807428174282742837428474285742867428774288742897429074291742927429374294742957429674297742987429974300743017430274303743047430574306743077430874309743107431174312743137431474315743167431774318743197432074321743227432374324743257432674327743287432974330743317433274333743347433574336743377433874339743407434174342743437434474345743467434774348743497435074351743527435374354743557435674357743587435974360743617436274363743647436574366743677436874369743707437174372743737437474375743767437774378743797438074381743827438374384743857438674387743887438974390743917439274393743947439574396743977439874399744007440174402744037440474405744067440774408744097441074411744127441374414744157441674417744187441974420744217442274423744247442574426744277442874429744307443174432744337443474435744367443774438744397444074441744427444374444744457444674447744487444974450744517445274453744547445574456744577445874459744607446174462744637446474465744667446774468744697447074471744727447374474744757447674477744787447974480744817448274483744847448574486744877448874489744907449174492744937449474495744967449774498744997450074501745027450374504745057450674507745087450974510745117451274513745147451574516745177451874519745207452174522745237452474525745267452774528745297453074531745327453374534745357453674537745387453974540745417454274543745447454574546745477454874549745507455174552745537455474555745567455774558745597456074561745627456374564745657456674567745687456974570745717457274573745747457574576745777457874579745807458174582745837458474585745867458774588745897459074591745927459374594745957459674597745987459974600746017460274603746047460574606746077460874609746107461174612746137461474615746167461774618746197462074621746227462374624746257462674627746287462974630746317463274633746347463574636746377463874639746407464174642746437464474645746467464774648746497465074651746527465374654746557465674657746587465974660746617466274663746647466574666746677466874669746707467174672746737467474675746767467774678746797468074681746827468374684746857468674687746887468974690746917469274693746947469574696746977469874699747007470174702747037470474705747067470774708747097471074711747127471374714747157471674717747187471974720747217472274723747247472574726747277472874729747307473174732747337473474735747367473774738747397474074741747427474374744747457474674747747487474974750747517475274753747547475574756747577475874759747607476174762747637476474765747667476774768747697477074771747727477374774747757477674777747787477974780747817478274783747847478574786747877478874789747907479174792747937479474795747967479774798747997480074801748027480374804748057480674807748087480974810748117481274813748147481574816748177481874819748207482174822748237482474825748267482774828748297483074831748327483374834748357483674837748387483974840748417484274843748447484574846748477484874849748507485174852748537485474855748567485774858748597486074861748627486374864748657486674867748687486974870748717487274873748747487574876748777487874879748807488174882748837488474885748867488774888748897489074891748927489374894748957489674897748987489974900749017490274903749047490574906749077490874909749107491174912749137491474915749167491774918749197492074921749227492374924749257492674927749287492974930749317493274933749347493574936749377493874939749407494174942749437494474945749467494774948749497495074951749527495374954749557495674957749587495974960749617496274963749647496574966749677496874969749707497174972749737497474975749767497774978749797498074981749827498374984749857498674987749887498974990749917499274993749947499574996749977499874999750007500175002750037500475005750067500775008750097501075011750127501375014750157501675017750187501975020750217502275023750247502575026750277502875029750307503175032750337503475035750367503775038750397504075041750427504375044750457504675047750487504975050750517505275053750547505575056750577505875059750607506175062750637506475065750667506775068750697507075071750727507375074750757507675077750787507975080750817508275083750847508575086750877508875089750907509175092750937509475095750967509775098750997510075101751027510375104751057510675107751087510975110751117511275113751147511575116751177511875119751207512175122751237512475125751267512775128751297513075131751327513375134751357513675137751387513975140751417514275143751447514575146751477514875149751507515175152751537515475155751567515775158751597516075161751627516375164751657516675167751687516975170751717517275173751747517575176751777517875179751807518175182751837518475185751867518775188751897519075191751927519375194751957519675197751987519975200752017520275203752047520575206752077520875209752107521175212752137521475215752167521775218752197522075221752227522375224752257522675227752287522975230752317523275233752347523575236752377523875239752407524175242752437524475245752467524775248752497525075251752527525375254752557525675257752587525975260752617526275263752647526575266752677526875269752707527175272752737527475275752767527775278752797528075281752827528375284752857528675287752887528975290752917529275293752947529575296752977529875299753007530175302753037530475305753067530775308753097531075311753127531375314753157531675317753187531975320753217532275323753247532575326753277532875329753307533175332753337533475335753367533775338753397534075341753427534375344753457534675347753487534975350753517535275353753547535575356753577535875359753607536175362753637536475365753667536775368753697537075371753727537375374753757537675377753787537975380753817538275383753847538575386753877538875389753907539175392753937539475395753967539775398753997540075401754027540375404754057540675407754087540975410754117541275413754147541575416754177541875419754207542175422754237542475425754267542775428754297543075431754327543375434754357543675437754387543975440754417544275443754447544575446754477544875449754507545175452754537545475455754567545775458754597546075461754627546375464754657546675467754687546975470754717547275473754747547575476754777547875479754807548175482754837548475485754867548775488754897549075491754927549375494754957549675497754987549975500755017550275503755047550575506755077550875509755107551175512755137551475515755167551775518755197552075521755227552375524755257552675527755287552975530755317553275533755347553575536755377553875539755407554175542755437554475545755467554775548755497555075551755527555375554755557555675557755587555975560755617556275563755647556575566755677556875569755707557175572755737557475575755767557775578755797558075581755827558375584755857558675587755887558975590755917559275593755947559575596755977559875599756007560175602756037560475605756067560775608756097561075611756127561375614756157561675617756187561975620756217562275623756247562575626756277562875629756307563175632756337563475635756367563775638756397564075641756427564375644756457564675647756487564975650756517565275653756547565575656756577565875659756607566175662756637566475665756667566775668756697567075671756727567375674756757567675677756787567975680756817568275683756847568575686756877568875689756907569175692756937569475695756967569775698756997570075701757027570375704757057570675707757087570975710757117571275713757147571575716757177571875719757207572175722757237572475725757267572775728757297573075731757327573375734757357573675737757387573975740757417574275743757447574575746757477574875749757507575175752757537575475755757567575775758757597576075761757627576375764757657576675767757687576975770757717577275773757747577575776757777577875779757807578175782757837578475785757867578775788757897579075791757927579375794757957579675797757987579975800758017580275803758047580575806758077580875809758107581175812758137581475815758167581775818758197582075821758227582375824758257582675827758287582975830758317583275833758347583575836758377583875839758407584175842758437584475845758467584775848758497585075851758527585375854758557585675857758587585975860758617586275863758647586575866758677586875869758707587175872758737587475875758767587775878758797588075881758827588375884758857588675887758887588975890758917589275893758947589575896758977589875899759007590175902759037590475905759067590775908759097591075911759127591375914759157591675917759187591975920759217592275923759247592575926759277592875929759307593175932759337593475935759367593775938759397594075941759427594375944759457594675947759487594975950759517595275953759547595575956759577595875959759607596175962759637596475965759667596775968759697597075971759727597375974759757597675977759787597975980759817598275983759847598575986759877598875989759907599175992759937599475995759967599775998759997600076001760027600376004760057600676007760087600976010760117601276013760147601576016760177601876019760207602176022760237602476025760267602776028760297603076031760327603376034760357603676037760387603976040760417604276043760447604576046760477604876049760507605176052760537605476055760567605776058760597606076061760627606376064760657606676067760687606976070760717607276073760747607576076760777607876079760807608176082760837608476085760867608776088760897609076091760927609376094760957609676097760987609976100761017610276103761047610576106761077610876109761107611176112761137611476115761167611776118761197612076121761227612376124761257612676127761287612976130761317613276133761347613576136761377613876139761407614176142761437614476145761467614776148761497615076151761527615376154761557615676157761587615976160761617616276163761647616576166761677616876169761707617176172761737617476175761767617776178761797618076181761827618376184761857618676187761887618976190761917619276193761947619576196761977619876199762007620176202762037620476205762067620776208762097621076211762127621376214762157621676217762187621976220762217622276223762247622576226762277622876229762307623176232762337623476235762367623776238762397624076241762427624376244762457624676247762487624976250762517625276253762547625576256762577625876259762607626176262762637626476265762667626776268762697627076271762727627376274762757627676277762787627976280762817628276283762847628576286762877628876289762907629176292762937629476295762967629776298762997630076301763027630376304763057630676307763087630976310763117631276313763147631576316763177631876319763207632176322763237632476325763267632776328763297633076331763327633376334763357633676337763387633976340763417634276343763447634576346763477634876349763507635176352763537635476355763567635776358763597636076361763627636376364763657636676367763687636976370763717637276373763747637576376763777637876379763807638176382763837638476385763867638776388763897639076391763927639376394763957639676397763987639976400764017640276403764047640576406764077640876409764107641176412764137641476415764167641776418764197642076421764227642376424764257642676427764287642976430764317643276433764347643576436764377643876439764407644176442764437644476445764467644776448764497645076451764527645376454764557645676457764587645976460764617646276463764647646576466764677646876469764707647176472764737647476475764767647776478764797648076481764827648376484764857648676487764887648976490764917649276493764947649576496764977649876499765007650176502765037650476505765067650776508765097651076511765127651376514765157651676517765187651976520765217652276523765247652576526765277652876529765307653176532765337653476535765367653776538765397654076541765427654376544765457654676547765487654976550765517655276553765547655576556765577655876559765607656176562765637656476565765667656776568765697657076571765727657376574765757657676577765787657976580765817658276583765847658576586765877658876589765907659176592765937659476595765967659776598765997660076601766027660376604766057660676607766087660976610766117661276613766147661576616766177661876619766207662176622766237662476625766267662776628766297663076631766327663376634766357663676637766387663976640766417664276643766447664576646766477664876649766507665176652766537665476655766567665776658766597666076661766627666376664766657666676667766687666976670766717667276673766747667576676766777667876679766807668176682766837668476685766867668776688766897669076691766927669376694766957669676697766987669976700767017670276703767047670576706767077670876709767107671176712767137671476715767167671776718767197672076721767227672376724767257672676727767287672976730767317673276733767347673576736767377673876739767407674176742767437674476745767467674776748767497675076751767527675376754767557675676757767587675976760767617676276763767647676576766767677676876769767707677176772767737677476775767767677776778767797678076781767827678376784767857678676787767887678976790767917679276793767947679576796767977679876799768007680176802768037680476805768067680776808768097681076811768127681376814768157681676817768187681976820768217682276823768247682576826768277682876829768307683176832768337683476835768367683776838768397684076841768427684376844768457684676847768487684976850768517685276853768547685576856768577685876859768607686176862768637686476865768667686776868768697687076871768727687376874768757687676877768787687976880768817688276883768847688576886768877688876889768907689176892768937689476895768967689776898768997690076901769027690376904769057690676907769087690976910769117691276913769147691576916769177691876919769207692176922769237692476925769267692776928769297693076931769327693376934769357693676937769387693976940769417694276943769447694576946769477694876949769507695176952769537695476955769567695776958769597696076961769627696376964769657696676967769687696976970769717697276973769747697576976769777697876979769807698176982769837698476985769867698776988769897699076991769927699376994769957699676997769987699977000770017700277003770047700577006770077700877009770107701177012770137701477015770167701777018770197702077021770227702377024770257702677027770287702977030770317703277033770347703577036770377703877039770407704177042770437704477045770467704777048770497705077051770527705377054770557705677057770587705977060770617706277063770647706577066770677706877069770707707177072770737707477075770767707777078770797708077081770827708377084770857708677087770887708977090770917709277093770947709577096770977709877099771007710177102771037710477105771067710777108771097711077111771127711377114771157711677117771187711977120771217712277123771247712577126771277712877129771307713177132771337713477135771367713777138771397714077141771427714377144771457714677147771487714977150771517715277153771547715577156771577715877159771607716177162771637716477165771667716777168771697717077171771727717377174771757717677177771787717977180771817718277183771847718577186771877718877189771907719177192771937719477195771967719777198771997720077201772027720377204772057720677207772087720977210772117721277213772147721577216772177721877219772207722177222772237722477225772267722777228772297723077231772327723377234772357723677237772387723977240772417724277243772447724577246772477724877249772507725177252772537725477255772567725777258772597726077261772627726377264772657726677267772687726977270772717727277273772747727577276772777727877279772807728177282772837728477285772867728777288772897729077291772927729377294772957729677297772987729977300773017730277303773047730577306773077730877309773107731177312773137731477315773167731777318773197732077321773227732377324773257732677327773287732977330773317733277333773347733577336773377733877339773407734177342773437734477345773467734777348773497735077351773527735377354773557735677357773587735977360773617736277363773647736577366773677736877369773707737177372773737737477375773767737777378773797738077381773827738377384773857738677387773887738977390773917739277393773947739577396773977739877399774007740177402774037740477405774067740777408774097741077411774127741377414774157741677417774187741977420774217742277423774247742577426774277742877429774307743177432774337743477435774367743777438774397744077441774427744377444774457744677447774487744977450774517745277453774547745577456774577745877459774607746177462774637746477465774667746777468774697747077471774727747377474774757747677477774787747977480774817748277483774847748577486774877748877489774907749177492774937749477495774967749777498774997750077501775027750377504775057750677507775087750977510775117751277513775147751577516775177751877519775207752177522775237752477525775267752777528775297753077531775327753377534775357753677537775387753977540775417754277543775447754577546775477754877549775507755177552775537755477555775567755777558775597756077561775627756377564775657756677567775687756977570775717757277573775747757577576775777757877579775807758177582775837758477585775867758777588775897759077591775927759377594775957759677597775987759977600776017760277603776047760577606776077760877609776107761177612776137761477615776167761777618776197762077621776227762377624776257762677627776287762977630776317763277633776347763577636776377763877639776407764177642776437764477645776467764777648776497765077651776527765377654776557765677657776587765977660776617766277663776647766577666776677766877669776707767177672776737767477675776767767777678776797768077681776827768377684776857768677687776887768977690776917769277693776947769577696776977769877699777007770177702777037770477705777067770777708777097771077711777127771377714777157771677717777187771977720777217772277723777247772577726777277772877729777307773177732777337773477735777367773777738777397774077741777427774377744777457774677747777487774977750777517775277753777547775577756777577775877759777607776177762777637776477765777667776777768777697777077771777727777377774777757777677777777787777977780777817778277783777847778577786777877778877789777907779177792777937779477795777967779777798777997780077801778027780377804778057780677807778087780977810778117781277813778147781577816778177781877819778207782177822778237782477825778267782777828778297783077831778327783377834778357783677837778387783977840778417784277843778447784577846778477784877849778507785177852778537785477855778567785777858778597786077861778627786377864778657786677867778687786977870778717787277873778747787577876778777787877879778807788177882778837788477885778867788777888778897789077891778927789377894778957789677897778987789977900779017790277903779047790577906779077790877909779107791177912779137791477915779167791777918779197792077921779227792377924779257792677927779287792977930779317793277933779347793577936779377793877939779407794177942779437794477945779467794777948779497795077951779527795377954779557795677957779587795977960779617796277963779647796577966779677796877969779707797177972779737797477975779767797777978779797798077981779827798377984779857798677987779887798977990779917799277993779947799577996779977799877999780007800178002780037800478005780067800778008780097801078011780127801378014780157801678017780187801978020780217802278023780247802578026780277802878029780307803178032780337803478035780367803778038780397804078041780427804378044780457804678047780487804978050780517805278053780547805578056780577805878059780607806178062780637806478065780667806778068780697807078071780727807378074780757807678077780787807978080780817808278083780847808578086780877808878089780907809178092780937809478095780967809778098780997810078101781027810378104781057810678107781087810978110781117811278113781147811578116781177811878119781207812178122781237812478125781267812778128781297813078131781327813378134781357813678137781387813978140781417814278143781447814578146781477814878149781507815178152781537815478155781567815778158781597816078161781627816378164781657816678167781687816978170781717817278173781747817578176781777817878179781807818178182781837818478185781867818778188781897819078191781927819378194781957819678197781987819978200782017820278203782047820578206782077820878209782107821178212782137821478215782167821778218782197822078221782227822378224782257822678227782287822978230782317823278233782347823578236782377823878239782407824178242782437824478245782467824778248782497825078251782527825378254782557825678257782587825978260782617826278263782647826578266782677826878269782707827178272782737827478275782767827778278782797828078281782827828378284782857828678287782887828978290782917829278293782947829578296782977829878299783007830178302783037830478305783067830778308783097831078311783127831378314783157831678317783187831978320783217832278323783247832578326783277832878329783307833178332783337833478335783367833778338783397834078341783427834378344783457834678347783487834978350783517835278353783547835578356783577835878359783607836178362783637836478365783667836778368783697837078371783727837378374783757837678377783787837978380783817838278383783847838578386783877838878389783907839178392783937839478395783967839778398783997840078401784027840378404784057840678407784087840978410784117841278413784147841578416784177841878419784207842178422784237842478425784267842778428784297843078431784327843378434784357843678437784387843978440784417844278443784447844578446784477844878449784507845178452784537845478455784567845778458784597846078461784627846378464784657846678467784687846978470784717847278473784747847578476784777847878479784807848178482784837848478485784867848778488784897849078491784927849378494784957849678497784987849978500785017850278503785047850578506785077850878509785107851178512785137851478515785167851778518785197852078521785227852378524785257852678527785287852978530785317853278533785347853578536785377853878539785407854178542785437854478545785467854778548785497855078551785527855378554785557855678557785587855978560785617856278563785647856578566785677856878569785707857178572785737857478575785767857778578785797858078581785827858378584785857858678587785887858978590785917859278593785947859578596785977859878599786007860178602786037860478605786067860778608786097861078611786127861378614786157861678617786187861978620786217862278623786247862578626786277862878629786307863178632786337863478635786367863778638786397864078641786427864378644786457864678647786487864978650786517865278653786547865578656786577865878659786607866178662786637866478665786667866778668786697867078671786727867378674786757867678677786787867978680786817868278683786847868578686786877868878689786907869178692786937869478695786967869778698786997870078701787027870378704787057870678707787087870978710787117871278713787147871578716787177871878719787207872178722787237872478725787267872778728787297873078731787327873378734787357873678737787387873978740787417874278743787447874578746787477874878749787507875178752787537875478755787567875778758787597876078761787627876378764787657876678767787687876978770787717877278773787747877578776787777877878779787807878178782787837878478785787867878778788787897879078791787927879378794787957879678797787987879978800788017880278803788047880578806788077880878809788107881178812788137881478815788167881778818788197882078821788227882378824788257882678827788287882978830788317883278833788347883578836788377883878839788407884178842788437884478845788467884778848788497885078851788527885378854788557885678857788587885978860788617886278863788647886578866788677886878869788707887178872788737887478875788767887778878788797888078881788827888378884788857888678887788887888978890788917889278893788947889578896788977889878899789007890178902789037890478905789067890778908789097891078911789127891378914789157891678917789187891978920789217892278923789247892578926789277892878929789307893178932789337893478935789367893778938789397894078941789427894378944789457894678947789487894978950789517895278953789547895578956789577895878959789607896178962789637896478965789667896778968789697897078971789727897378974789757897678977789787897978980789817898278983789847898578986789877898878989789907899178992789937899478995789967899778998789997900079001790027900379004790057900679007790087900979010790117901279013790147901579016790177901879019790207902179022790237902479025790267902779028790297903079031790327903379034790357903679037790387903979040790417904279043790447904579046790477904879049790507905179052790537905479055790567905779058790597906079061790627906379064790657906679067790687906979070790717907279073790747907579076790777907879079790807908179082790837908479085790867908779088790897909079091790927909379094790957909679097790987909979100791017910279103791047910579106791077910879109791107911179112791137911479115791167911779118791197912079121791227912379124791257912679127791287912979130791317913279133791347913579136791377913879139791407914179142791437914479145791467914779148791497915079151791527915379154791557915679157791587915979160791617916279163791647916579166791677916879169791707917179172791737917479175791767917779178791797918079181791827918379184791857918679187791887918979190791917919279193791947919579196791977919879199792007920179202792037920479205792067920779208792097921079211792127921379214792157921679217792187921979220792217922279223792247922579226792277922879229792307923179232792337923479235792367923779238792397924079241792427924379244792457924679247792487924979250792517925279253792547925579256792577925879259792607926179262792637926479265792667926779268792697927079271792727927379274792757927679277792787927979280792817928279283792847928579286792877928879289792907929179292792937929479295792967929779298792997930079301793027930379304793057930679307793087930979310793117931279313793147931579316793177931879319793207932179322793237932479325793267932779328793297933079331793327933379334793357933679337793387933979340793417934279343793447934579346793477934879349793507935179352793537935479355793567935779358793597936079361793627936379364793657936679367793687936979370793717937279373793747937579376793777937879379793807938179382793837938479385793867938779388793897939079391793927939379394793957939679397793987939979400794017940279403794047940579406794077940879409794107941179412794137941479415794167941779418794197942079421794227942379424794257942679427794287942979430794317943279433794347943579436794377943879439794407944179442794437944479445794467944779448794497945079451794527945379454794557945679457794587945979460794617946279463794647946579466794677946879469794707947179472794737947479475794767947779478794797948079481794827948379484794857948679487794887948979490794917949279493794947949579496794977949879499795007950179502795037950479505795067950779508795097951079511795127951379514795157951679517795187951979520795217952279523795247952579526795277952879529795307953179532795337953479535795367953779538795397954079541795427954379544795457954679547795487954979550795517955279553795547955579556795577955879559795607956179562795637956479565795667956779568795697957079571795727957379574795757957679577795787957979580795817958279583795847958579586795877958879589795907959179592795937959479595795967959779598795997960079601796027960379604796057960679607796087960979610796117961279613796147961579616796177961879619796207962179622796237962479625796267962779628796297963079631796327963379634796357963679637796387963979640796417964279643796447964579646796477964879649796507965179652796537965479655796567965779658796597966079661796627966379664796657966679667796687966979670796717967279673796747967579676796777967879679796807968179682796837968479685796867968779688796897969079691796927969379694796957969679697796987969979700797017970279703797047970579706797077970879709797107971179712797137971479715797167971779718797197972079721797227972379724797257972679727797287972979730797317973279733797347973579736797377973879739797407974179742797437974479745797467974779748797497975079751797527975379754797557975679757797587975979760797617976279763797647976579766797677976879769797707977179772797737977479775797767977779778797797978079781797827978379784797857978679787797887978979790797917979279793797947979579796797977979879799798007980179802798037980479805798067980779808798097981079811798127981379814798157981679817798187981979820798217982279823798247982579826798277982879829798307983179832798337983479835798367983779838798397984079841798427984379844798457984679847798487984979850798517985279853798547985579856798577985879859798607986179862798637986479865798667986779868798697987079871798727987379874798757987679877798787987979880798817988279883798847988579886798877988879889798907989179892798937989479895798967989779898798997990079901799027990379904799057990679907799087990979910799117991279913799147991579916799177991879919799207992179922799237992479925799267992779928799297993079931799327993379934799357993679937799387993979940799417994279943799447994579946799477994879949799507995179952799537995479955799567995779958799597996079961799627996379964799657996679967799687996979970799717997279973799747997579976799777997879979799807998179982799837998479985799867998779988799897999079991799927999379994799957999679997799987999980000800018000280003800048000580006800078000880009800108001180012800138001480015800168001780018800198002080021800228002380024800258002680027800288002980030800318003280033800348003580036800378003880039800408004180042800438004480045800468004780048800498005080051800528005380054800558005680057800588005980060800618006280063800648006580066800678006880069800708007180072800738007480075800768007780078800798008080081800828008380084800858008680087800888008980090800918009280093800948009580096800978009880099801008010180102801038010480105801068010780108801098011080111801128011380114801158011680117801188011980120801218012280123801248012580126801278012880129801308013180132801338013480135801368013780138801398014080141801428014380144801458014680147801488014980150801518015280153801548015580156801578015880159801608016180162801638016480165801668016780168801698017080171801728017380174801758017680177801788017980180801818018280183801848018580186801878018880189801908019180192801938019480195801968019780198801998020080201802028020380204802058020680207802088020980210802118021280213802148021580216802178021880219802208022180222802238022480225802268022780228802298023080231802328023380234802358023680237802388023980240802418024280243802448024580246802478024880249802508025180252802538025480255802568025780258802598026080261802628026380264802658026680267802688026980270802718027280273802748027580276802778027880279802808028180282802838028480285802868028780288802898029080291802928029380294802958029680297802988029980300803018030280303803048030580306803078030880309803108031180312803138031480315803168031780318803198032080321803228032380324803258032680327803288032980330803318033280333803348033580336803378033880339803408034180342803438034480345803468034780348803498035080351803528035380354803558035680357803588035980360803618036280363803648036580366803678036880369803708037180372803738037480375803768037780378803798038080381803828038380384803858038680387803888038980390803918039280393803948039580396803978039880399804008040180402804038040480405804068040780408804098041080411804128041380414804158041680417804188041980420804218042280423804248042580426804278042880429804308043180432804338043480435804368043780438804398044080441804428044380444804458044680447804488044980450804518045280453804548045580456804578045880459804608046180462804638046480465804668046780468804698047080471804728047380474804758047680477804788047980480804818048280483804848048580486804878048880489804908049180492804938049480495804968049780498804998050080501805028050380504805058050680507805088050980510805118051280513805148051580516805178051880519805208052180522805238052480525805268052780528805298053080531805328053380534805358053680537805388053980540805418054280543805448054580546805478054880549805508055180552805538055480555805568055780558805598056080561805628056380564805658056680567805688056980570805718057280573805748057580576805778057880579805808058180582805838058480585805868058780588805898059080591805928059380594805958059680597805988059980600806018060280603806048060580606806078060880609806108061180612806138061480615806168061780618806198062080621806228062380624806258062680627806288062980630806318063280633806348063580636806378063880639806408064180642806438064480645806468064780648806498065080651806528065380654806558065680657806588065980660806618066280663806648066580666806678066880669806708067180672806738067480675806768067780678806798068080681806828068380684806858068680687806888068980690806918069280693806948069580696806978069880699807008070180702807038070480705807068070780708807098071080711807128071380714807158071680717807188071980720807218072280723807248072580726807278072880729807308073180732807338073480735807368073780738807398074080741807428074380744807458074680747807488074980750807518075280753807548075580756807578075880759807608076180762807638076480765807668076780768807698077080771807728077380774807758077680777807788077980780807818078280783807848078580786807878078880789807908079180792807938079480795807968079780798807998080080801808028080380804808058080680807808088080980810808118081280813808148081580816808178081880819808208082180822808238082480825808268082780828808298083080831808328083380834808358083680837808388083980840808418084280843808448084580846808478084880849808508085180852808538085480855808568085780858808598086080861808628086380864808658086680867808688086980870808718087280873808748087580876808778087880879808808088180882808838088480885808868088780888808898089080891808928089380894808958089680897808988089980900809018090280903809048090580906809078090880909809108091180912809138091480915809168091780918809198092080921809228092380924809258092680927809288092980930809318093280933809348093580936809378093880939809408094180942809438094480945809468094780948809498095080951809528095380954809558095680957809588095980960809618096280963809648096580966809678096880969809708097180972809738097480975809768097780978809798098080981809828098380984809858098680987809888098980990809918099280993809948099580996809978099880999810008100181002810038100481005810068100781008810098101081011810128101381014810158101681017810188101981020810218102281023810248102581026810278102881029810308103181032810338103481035810368103781038810398104081041810428104381044810458104681047810488104981050810518105281053810548105581056810578105881059810608106181062810638106481065810668106781068810698107081071810728107381074810758107681077810788107981080810818108281083810848108581086810878108881089810908109181092810938109481095810968109781098810998110081101811028110381104811058110681107811088110981110811118111281113811148111581116811178111881119811208112181122811238112481125811268112781128811298113081131811328113381134811358113681137811388113981140811418114281143811448114581146811478114881149811508115181152811538115481155811568115781158811598116081161811628116381164811658116681167811688116981170811718117281173811748117581176811778117881179811808118181182811838118481185811868118781188811898119081191811928119381194811958119681197811988119981200812018120281203812048120581206812078120881209812108121181212812138121481215812168121781218812198122081221812228122381224812258122681227812288122981230812318123281233812348123581236812378123881239812408124181242812438124481245812468124781248812498125081251812528125381254812558125681257812588125981260812618126281263812648126581266812678126881269812708127181272812738127481275812768127781278812798128081281812828128381284812858128681287812888128981290812918129281293812948129581296812978129881299813008130181302813038130481305813068130781308813098131081311813128131381314813158131681317813188131981320813218132281323813248132581326813278132881329813308133181332813338133481335813368133781338813398134081341813428134381344813458134681347813488134981350813518135281353813548135581356813578135881359813608136181362813638136481365813668136781368813698137081371813728137381374813758137681377813788137981380813818138281383813848138581386813878138881389813908139181392813938139481395813968139781398813998140081401814028140381404814058140681407814088140981410814118141281413814148141581416814178141881419814208142181422814238142481425814268142781428814298143081431814328143381434814358143681437814388143981440814418144281443814448144581446814478144881449814508145181452814538145481455814568145781458814598146081461814628146381464814658146681467814688146981470814718147281473814748147581476814778147881479814808148181482814838148481485814868148781488814898149081491814928149381494814958149681497814988149981500815018150281503815048150581506815078150881509815108151181512815138151481515815168151781518815198152081521815228152381524815258152681527815288152981530815318153281533815348153581536815378153881539815408154181542815438154481545815468154781548815498155081551815528155381554815558155681557815588155981560815618156281563815648156581566815678156881569815708157181572815738157481575815768157781578815798158081581815828158381584815858158681587815888158981590815918159281593815948159581596815978159881599816008160181602816038160481605816068160781608816098161081611816128161381614816158161681617816188161981620816218162281623816248162581626816278162881629816308163181632816338163481635816368163781638816398164081641816428164381644816458164681647816488164981650816518165281653816548165581656816578165881659816608166181662816638166481665816668166781668816698167081671816728167381674816758167681677816788167981680816818168281683816848168581686816878168881689816908169181692816938169481695816968169781698816998170081701817028170381704817058170681707817088170981710817118171281713817148171581716817178171881719817208172181722817238172481725817268172781728817298173081731817328173381734817358173681737817388173981740817418174281743817448174581746817478174881749817508175181752817538175481755817568175781758817598176081761817628176381764817658176681767817688176981770817718177281773817748177581776817778177881779817808178181782817838178481785817868178781788817898179081791817928179381794817958179681797817988179981800818018180281803818048180581806818078180881809818108181181812818138181481815818168181781818818198182081821818228182381824818258182681827818288182981830818318183281833818348183581836818378183881839818408184181842818438184481845818468184781848818498185081851818528185381854818558185681857818588185981860818618186281863818648186581866818678186881869818708187181872818738187481875818768187781878818798188081881818828188381884818858188681887818888188981890818918189281893818948189581896818978189881899819008190181902819038190481905819068190781908819098191081911819128191381914819158191681917819188191981920819218192281923819248192581926819278192881929819308193181932819338193481935819368193781938819398194081941819428194381944819458194681947819488194981950819518195281953819548195581956819578195881959819608196181962819638196481965819668196781968819698197081971819728197381974819758197681977819788197981980819818198281983819848198581986819878198881989819908199181992819938199481995819968199781998819998200082001820028200382004820058200682007820088200982010820118201282013820148201582016820178201882019820208202182022820238202482025820268202782028820298203082031820328203382034820358203682037820388203982040820418204282043820448204582046820478204882049820508205182052820538205482055820568205782058820598206082061820628206382064820658206682067820688206982070820718207282073820748207582076820778207882079820808208182082820838208482085820868208782088820898209082091820928209382094820958209682097820988209982100821018210282103821048210582106821078210882109821108211182112821138211482115821168211782118821198212082121821228212382124821258212682127821288212982130821318213282133821348213582136821378213882139821408214182142821438214482145821468214782148821498215082151821528215382154821558215682157821588215982160821618216282163821648216582166821678216882169821708217182172821738217482175821768217782178821798218082181821828218382184821858218682187821888218982190821918219282193821948219582196821978219882199822008220182202822038220482205822068220782208822098221082211822128221382214822158221682217822188221982220822218222282223822248222582226822278222882229822308223182232822338223482235822368223782238822398224082241822428224382244822458224682247822488224982250822518225282253822548225582256822578225882259822608226182262822638226482265822668226782268822698227082271822728227382274822758227682277822788227982280822818228282283822848228582286822878228882289822908229182292822938229482295822968229782298822998230082301823028230382304823058230682307823088230982310823118231282313823148231582316823178231882319823208232182322823238232482325823268232782328823298233082331823328233382334823358233682337823388233982340823418234282343823448234582346823478234882349823508235182352823538235482355823568235782358823598236082361823628236382364823658236682367823688236982370823718237282373823748237582376823778237882379823808238182382823838238482385823868238782388823898239082391823928239382394823958239682397823988239982400824018240282403824048240582406824078240882409824108241182412824138241482415824168241782418824198242082421824228242382424824258242682427824288242982430824318243282433824348243582436824378243882439824408244182442824438244482445824468244782448824498245082451824528245382454824558245682457824588245982460824618246282463824648246582466824678246882469824708247182472824738247482475824768247782478824798248082481824828248382484824858248682487824888248982490824918249282493824948249582496824978249882499825008250182502825038250482505825068250782508825098251082511825128251382514825158251682517825188251982520825218252282523825248252582526825278252882529825308253182532825338253482535825368253782538825398254082541825428254382544825458254682547825488254982550825518255282553825548255582556825578255882559825608256182562825638256482565825668256782568825698257082571825728257382574825758257682577825788257982580825818258282583825848258582586825878258882589825908259182592825938259482595825968259782598825998260082601826028260382604826058260682607826088260982610826118261282613826148261582616826178261882619826208262182622826238262482625826268262782628826298263082631826328263382634826358263682637826388263982640826418264282643826448264582646826478264882649826508265182652826538265482655826568265782658826598266082661826628266382664826658266682667826688266982670826718267282673826748267582676826778267882679826808268182682826838268482685826868268782688826898269082691826928269382694826958269682697826988269982700827018270282703827048270582706827078270882709827108271182712827138271482715827168271782718827198272082721827228272382724827258272682727827288272982730827318273282733827348273582736827378273882739827408274182742827438274482745827468274782748827498275082751827528275382754827558275682757827588275982760827618276282763827648276582766827678276882769827708277182772827738277482775827768277782778827798278082781827828278382784827858278682787827888278982790827918279282793827948279582796827978279882799828008280182802828038280482805828068280782808828098281082811828128281382814828158281682817828188281982820828218282282823828248282582826828278282882829828308283182832828338283482835828368283782838828398284082841828428284382844828458284682847828488284982850828518285282853828548285582856828578285882859828608286182862828638286482865828668286782868828698287082871828728287382874828758287682877828788287982880828818288282883828848288582886828878288882889828908289182892828938289482895828968289782898828998290082901829028290382904829058290682907829088290982910829118291282913829148291582916829178291882919829208292182922829238292482925829268292782928829298293082931829328293382934829358293682937829388293982940829418294282943829448294582946829478294882949829508295182952829538295482955829568295782958829598296082961829628296382964829658296682967829688296982970829718297282973829748297582976829778297882979829808298182982829838298482985829868298782988829898299082991829928299382994829958299682997829988299983000830018300283003830048300583006830078300883009830108301183012830138301483015830168301783018830198302083021830228302383024830258302683027830288302983030830318303283033830348303583036830378303883039830408304183042830438304483045830468304783048830498305083051830528305383054830558305683057830588305983060830618306283063830648306583066830678306883069830708307183072830738307483075830768307783078830798308083081830828308383084830858308683087830888308983090830918309283093830948309583096830978309883099831008310183102831038310483105831068310783108831098311083111831128311383114831158311683117831188311983120831218312283123831248312583126831278312883129831308313183132831338313483135831368313783138831398314083141831428314383144831458314683147831488314983150831518315283153831548315583156831578315883159831608316183162831638316483165831668316783168831698317083171831728317383174831758317683177831788317983180831818318283183831848318583186831878318883189831908319183192831938319483195831968319783198831998320083201832028320383204832058320683207832088320983210832118321283213832148321583216832178321883219832208322183222832238322483225832268322783228832298323083231832328323383234832358323683237832388323983240832418324283243832448324583246832478324883249832508325183252832538325483255832568325783258832598326083261832628326383264832658326683267832688326983270832718327283273832748327583276832778327883279832808328183282832838328483285832868328783288832898329083291832928329383294832958329683297832988329983300833018330283303833048330583306833078330883309833108331183312833138331483315833168331783318833198332083321833228332383324833258332683327833288332983330833318333283333833348333583336833378333883339833408334183342833438334483345833468334783348833498335083351833528335383354833558335683357833588335983360833618336283363833648336583366833678336883369833708337183372833738337483375833768337783378833798338083381833828338383384833858338683387833888338983390833918339283393833948339583396833978339883399834008340183402834038340483405834068340783408834098341083411834128341383414834158341683417834188341983420834218342283423834248342583426834278342883429834308343183432834338343483435834368343783438834398344083441834428344383444834458344683447834488344983450834518345283453834548345583456834578345883459834608346183462834638346483465834668346783468834698347083471834728347383474834758347683477834788347983480834818348283483834848348583486834878348883489834908349183492834938349483495834968349783498834998350083501835028350383504835058350683507835088350983510835118351283513835148351583516835178351883519835208352183522835238352483525835268352783528835298353083531835328353383534835358353683537835388353983540835418354283543835448354583546835478354883549835508355183552835538355483555835568355783558835598356083561835628356383564835658356683567835688356983570835718357283573835748357583576835778357883579835808358183582835838358483585835868358783588835898359083591835928359383594835958359683597835988359983600836018360283603836048360583606836078360883609836108361183612836138361483615836168361783618836198362083621836228362383624836258362683627836288362983630836318363283633836348363583636836378363883639836408364183642836438364483645836468364783648836498365083651836528365383654836558365683657836588365983660836618366283663836648366583666836678366883669836708367183672836738367483675836768367783678836798368083681836828368383684836858368683687836888368983690836918369283693836948369583696836978369883699837008370183702837038370483705837068370783708837098371083711837128371383714837158371683717837188371983720837218372283723837248372583726837278372883729837308373183732837338373483735837368373783738837398374083741837428374383744837458374683747837488374983750837518375283753837548375583756837578375883759837608376183762837638376483765837668376783768837698377083771837728377383774837758377683777837788377983780837818378283783837848378583786837878378883789837908379183792837938379483795837968379783798837998380083801838028380383804838058380683807838088380983810838118381283813838148381583816838178381883819838208382183822838238382483825838268382783828838298383083831838328383383834838358383683837838388383983840838418384283843838448384583846838478384883849838508385183852838538385483855838568385783858838598386083861838628386383864838658386683867838688386983870838718387283873838748387583876838778387883879838808388183882838838388483885838868388783888838898389083891838928389383894838958389683897838988389983900839018390283903839048390583906839078390883909839108391183912839138391483915839168391783918839198392083921839228392383924839258392683927839288392983930839318393283933839348393583936839378393883939839408394183942839438394483945839468394783948839498395083951839528395383954839558395683957839588395983960839618396283963839648396583966839678396883969839708397183972839738397483975839768397783978839798398083981839828398383984839858398683987839888398983990839918399283993839948399583996839978399883999840008400184002840038400484005840068400784008840098401084011840128401384014840158401684017840188401984020840218402284023840248402584026840278402884029840308403184032840338403484035840368403784038840398404084041840428404384044840458404684047840488404984050840518405284053840548405584056840578405884059840608406184062840638406484065840668406784068840698407084071840728407384074840758407684077840788407984080840818408284083840848408584086840878408884089840908409184092840938409484095840968409784098840998410084101841028410384104841058410684107841088410984110841118411284113841148411584116841178411884119841208412184122841238412484125841268412784128841298413084131841328413384134841358413684137841388413984140841418414284143841448414584146841478414884149841508415184152841538415484155841568415784158841598416084161841628416384164841658416684167841688416984170841718417284173841748417584176841778417884179841808418184182841838418484185841868418784188841898419084191841928419384194841958419684197841988419984200842018420284203842048420584206842078420884209842108421184212842138421484215842168421784218842198422084221842228422384224842258422684227842288422984230842318423284233842348423584236842378423884239842408424184242842438424484245842468424784248842498425084251842528425384254842558425684257842588425984260842618426284263842648426584266842678426884269842708427184272842738427484275842768427784278842798428084281842828428384284842858428684287842888428984290842918429284293842948429584296842978429884299843008430184302843038430484305843068430784308843098431084311843128431384314843158431684317843188431984320843218432284323843248432584326843278432884329843308433184332843338433484335843368433784338843398434084341843428434384344843458434684347843488434984350843518435284353843548435584356843578435884359843608436184362843638436484365843668436784368843698437084371843728437384374843758437684377843788437984380843818438284383843848438584386843878438884389843908439184392843938439484395843968439784398843998440084401844028440384404844058440684407844088440984410844118441284413844148441584416844178441884419844208442184422844238442484425844268442784428844298443084431844328443384434844358443684437844388443984440844418444284443844448444584446844478444884449844508445184452844538445484455844568445784458844598446084461844628446384464844658446684467844688446984470844718447284473844748447584476844778447884479844808448184482844838448484485844868448784488844898449084491844928449384494844958449684497844988449984500845018450284503845048450584506845078450884509845108451184512845138451484515845168451784518845198452084521845228452384524845258452684527845288452984530845318453284533845348453584536845378453884539845408454184542845438454484545845468454784548845498455084551845528455384554845558455684557845588455984560845618456284563845648456584566845678456884569845708457184572845738457484575845768457784578845798458084581845828458384584845858458684587845888458984590845918459284593845948459584596845978459884599846008460184602846038460484605846068460784608846098461084611846128461384614846158461684617846188461984620846218462284623846248462584626846278462884629846308463184632846338463484635846368463784638846398464084641846428464384644846458464684647846488464984650846518465284653846548465584656846578465884659846608466184662846638466484665846668466784668846698467084671846728467384674846758467684677846788467984680846818468284683846848468584686846878468884689846908469184692846938469484695846968469784698846998470084701847028470384704847058470684707847088470984710847118471284713847148471584716847178471884719847208472184722847238472484725847268472784728847298473084731847328473384734847358473684737847388473984740847418474284743847448474584746847478474884749847508475184752847538475484755847568475784758847598476084761847628476384764847658476684767847688476984770847718477284773847748477584776847778477884779847808478184782847838478484785847868478784788847898479084791847928479384794847958479684797847988479984800848018480284803848048480584806848078480884809848108481184812848138481484815848168481784818848198482084821848228482384824848258482684827848288482984830848318483284833848348483584836848378483884839848408484184842848438484484845848468484784848848498485084851848528485384854848558485684857848588485984860848618486284863848648486584866848678486884869848708487184872848738487484875848768487784878848798488084881848828488384884848858488684887848888488984890848918489284893848948489584896848978489884899849008490184902849038490484905849068490784908849098491084911849128491384914849158491684917849188491984920849218492284923849248492584926849278492884929849308493184932849338493484935849368493784938849398494084941849428494384944849458494684947849488494984950849518495284953849548495584956849578495884959849608496184962849638496484965849668496784968849698497084971849728497384974849758497684977849788497984980849818498284983849848498584986849878498884989849908499184992849938499484995849968499784998849998500085001850028500385004850058500685007850088500985010850118501285013850148501585016850178501885019850208502185022850238502485025850268502785028850298503085031850328503385034850358503685037850388503985040850418504285043850448504585046850478504885049850508505185052850538505485055850568505785058850598506085061850628506385064850658506685067850688506985070850718507285073850748507585076850778507885079850808508185082850838508485085850868508785088850898509085091850928509385094850958509685097850988509985100851018510285103851048510585106851078510885109851108511185112851138511485115851168511785118851198512085121851228512385124851258512685127851288512985130851318513285133851348513585136851378513885139851408514185142851438514485145851468514785148851498515085151851528515385154851558515685157851588515985160851618516285163851648516585166851678516885169851708517185172851738517485175851768517785178851798518085181851828518385184851858518685187851888518985190851918519285193851948519585196851978519885199852008520185202852038520485205852068520785208852098521085211852128521385214852158521685217852188521985220852218522285223852248522585226852278522885229852308523185232852338523485235852368523785238852398524085241852428524385244852458524685247852488524985250852518525285253852548525585256852578525885259852608526185262852638526485265852668526785268852698527085271852728527385274852758527685277852788527985280852818528285283852848528585286852878528885289852908529185292852938529485295852968529785298852998530085301853028530385304853058530685307853088530985310853118531285313853148531585316853178531885319853208532185322853238532485325853268532785328853298533085331853328533385334853358533685337853388533985340853418534285343853448534585346853478534885349853508535185352853538535485355853568535785358853598536085361853628536385364853658536685367853688536985370853718537285373853748537585376853778537885379853808538185382853838538485385853868538785388853898539085391853928539385394853958539685397853988539985400854018540285403854048540585406854078540885409854108541185412854138541485415854168541785418854198542085421854228542385424854258542685427854288542985430854318543285433854348543585436854378543885439854408544185442854438544485445854468544785448854498545085451854528545385454854558545685457854588545985460854618546285463854648546585466854678546885469854708547185472854738547485475854768547785478854798548085481854828548385484854858548685487854888548985490854918549285493854948549585496854978549885499855008550185502855038550485505855068550785508855098551085511855128551385514855158551685517855188551985520855218552285523855248552585526855278552885529855308553185532855338553485535855368553785538855398554085541855428554385544855458554685547855488554985550855518555285553855548555585556855578555885559855608556185562855638556485565855668556785568855698557085571855728557385574855758557685577855788557985580855818558285583855848558585586855878558885589855908559185592855938559485595855968559785598855998560085601856028560385604856058560685607856088560985610856118561285613856148561585616856178561885619856208562185622856238562485625856268562785628856298563085631856328563385634856358563685637856388563985640856418564285643856448564585646856478564885649856508565185652856538565485655856568565785658856598566085661856628566385664856658566685667856688566985670856718567285673856748567585676856778567885679856808568185682856838568485685856868568785688856898569085691856928569385694856958569685697856988569985700857018570285703857048570585706857078570885709857108571185712857138571485715857168571785718857198572085721857228572385724857258572685727857288572985730857318573285733857348573585736857378573885739857408574185742857438574485745857468574785748857498575085751857528575385754857558575685757857588575985760857618576285763857648576585766857678576885769857708577185772857738577485775857768577785778857798578085781857828578385784857858578685787857888578985790857918579285793857948579585796857978579885799858008580185802858038580485805858068580785808858098581085811858128581385814858158581685817858188581985820858218582285823858248582585826858278582885829858308583185832858338583485835858368583785838858398584085841858428584385844858458584685847858488584985850858518585285853858548585585856858578585885859858608586185862858638586485865858668586785868858698587085871858728587385874858758587685877858788587985880858818588285883858848588585886858878588885889858908589185892858938589485895858968589785898858998590085901859028590385904859058590685907859088590985910859118591285913859148591585916859178591885919859208592185922859238592485925859268592785928859298593085931859328593385934859358593685937859388593985940859418594285943859448594585946859478594885949859508595185952859538595485955859568595785958859598596085961859628596385964859658596685967859688596985970859718597285973859748597585976859778597885979859808598185982859838598485985859868598785988859898599085991859928599385994859958599685997859988599986000860018600286003860048600586006860078600886009860108601186012860138601486015860168601786018860198602086021860228602386024860258602686027860288602986030860318603286033860348603586036860378603886039860408604186042860438604486045860468604786048860498605086051860528605386054860558605686057860588605986060860618606286063860648606586066860678606886069860708607186072860738607486075860768607786078860798608086081860828608386084860858608686087860888608986090860918609286093860948609586096860978609886099861008610186102861038610486105861068610786108861098611086111861128611386114861158611686117861188611986120861218612286123861248612586126861278612886129861308613186132861338613486135861368613786138861398614086141861428614386144861458614686147861488614986150861518615286153861548615586156861578615886159861608616186162861638616486165861668616786168861698617086171861728617386174861758617686177861788617986180
  1. unit pic32mx764f128h;
  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. TSPI4_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. TSPI4_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. TSPI4_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. TSPI4_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. TSPI4Registers = record
  3873. SPI3ACONbits : TSPI4_SPI3ACON;
  3874. SPI3ACON : longWord;
  3875. SPI4CONbits : TSPI4_SPI4CON;
  3876. SPI4CON : longWord;
  3877. SPI3ACONCLR : longWord;
  3878. SPI4CONCLR : longWord;
  3879. SPI3ACONSET : longWord;
  3880. SPI4CONSET : longWord;
  3881. SPI3ACONINV : longWord;
  3882. SPI4CONINV : longWord;
  3883. SPI3ASTATbits : TSPI4_SPI3ASTAT;
  3884. SPI3ASTAT : longWord;
  3885. SPI4STATbits : TSPI4_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. TUART1B_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. TUART1B_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. TUART1B_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. TUART1B_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. TUART1BRegisters = record
  4693. U1BMODEbits : TUART1B_U1BMODE;
  4694. U1BMODE : longWord;
  4695. U4MODEbits : TUART1B_U4MODE;
  4696. U4MODE : longWord;
  4697. U1BMODECLR : longWord;
  4698. U4MODECLR : longWord;
  4699. U1BMODESET : longWord;
  4700. U4MODESET : longWord;
  4701. U1BMODEINV : longWord;
  4702. U4MODEINV : longWord;
  4703. U1BSTAbits : TUART1B_U1BSTA;
  4704. U1BSTA : longWord;
  4705. U4STAbits : TUART1B_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. TUART2B_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. TUART2B_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. TUART2B_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. TUART2B_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. TUART2BRegisters = record
  5515. U2BMODEbits : TUART2B_U2BMODE;
  5516. U2BMODE : longWord;
  5517. U6MODEbits : TUART2B_U6MODE;
  5518. U6MODE : longWord;
  5519. U2BMODECLR : longWord;
  5520. U6MODECLR : longWord;
  5521. U2BMODESET : longWord;
  5522. U6MODESET : longWord;
  5523. U2BMODEINV : longWord;
  5524. U6MODEINV : longWord;
  5525. U2BSTAbits : TUART2B_U2BSTA;
  5526. U2BSTA : longWord;
  5527. U6STAbits : TUART2B_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. TUART3A_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. TUART3A_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. TUART3A_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. TUART3A_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. TUART3ARegisters = record
  5944. U2MODEbits : TUART3A_U2MODE;
  5945. U2MODE : longWord;
  5946. U3AMODEbits : TUART3A_U3AMODE;
  5947. U3AMODE : longWord;
  5948. U2MODECLR : longWord;
  5949. U3AMODECLR : longWord;
  5950. U2MODESET : longWord;
  5951. U3AMODESET : longWord;
  5952. U2MODEINV : longWord;
  5953. U3AMODEINV : longWord;
  5954. U2STAbits : TUART3A_U2STA;
  5955. U2STA : longWord;
  5956. U3ASTAbits : TUART3A_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. TUART3B_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. TUART3B_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. TUART3B_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. TUART3B_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. TUART3BRegisters = record
  6337. U3BMODEbits : TUART3B_U3BMODE;
  6338. U3BMODE : longWord;
  6339. U5MODEbits : TUART3B_U5MODE;
  6340. U5MODE : longWord;
  6341. U3BMODECLR : longWord;
  6342. U5MODECLR : longWord;
  6343. U3BMODESET : longWord;
  6344. U5MODESET : longWord;
  6345. U3BMODEINV : longWord;
  6346. U5MODEINV : longWord;
  6347. U3BSTAbits : TUART3B_U3BSTA;
  6348. U3BSTA : longWord;
  6349. U5STAbits : TUART3B_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 getETHIF : TBits_1; inline;
  8270. function getFCEIF : TBits_1; inline;
  8271. function getFSCMIF : TBits_1; inline;
  8272. function getI2C2ABIF : TBits_1; inline;
  8273. function getI2C2AMIF : TBits_1; inline;
  8274. function getI2C2ASIF : TBits_1; inline;
  8275. function getI2C3ABIF : TBits_1; inline;
  8276. function getI2C3AMIF : TBits_1; inline;
  8277. function getI2C3ASIF : TBits_1; inline;
  8278. function getI2C4BIF : TBits_1; inline;
  8279. function getI2C4MIF : TBits_1; inline;
  8280. function getI2C4SIF : TBits_1; inline;
  8281. function getI2C5BIF : TBits_1; inline;
  8282. function getI2C5MIF : TBits_1; inline;
  8283. function getI2C5SIF : TBits_1; inline;
  8284. function getIC1EIF : TBits_1; inline;
  8285. function getIC2EIF : TBits_1; inline;
  8286. function getIC3EIF : TBits_1; inline;
  8287. function getPMPIF : TBits_1; inline;
  8288. function getRTCCIF : TBits_1; inline;
  8289. function getSPI2AEIF : TBits_1; inline;
  8290. function getSPI2ARXIF : TBits_1; inline;
  8291. function getSPI2ATXIF : TBits_1; inline;
  8292. function getSPI2EIF : TBits_1; inline;
  8293. function getSPI2RXIF : TBits_1; inline;
  8294. function getSPI2TXIF : TBits_1; inline;
  8295. function getSPI3AEIF : TBits_1; inline;
  8296. function getSPI3ARXIF : TBits_1; inline;
  8297. function getSPI3ATXIF : TBits_1; inline;
  8298. function getSPI4EIF : TBits_1; inline;
  8299. function getSPI4RXIF : TBits_1; inline;
  8300. function getSPI4TXIF : TBits_1; inline;
  8301. function getU2AEIF : TBits_1; inline;
  8302. function getU2ARXIF : TBits_1; inline;
  8303. function getU2ATXIF : TBits_1; inline;
  8304. function getU2EIF : TBits_1; inline;
  8305. function getU2RXIF : TBits_1; inline;
  8306. function getU2TXIF : TBits_1; inline;
  8307. function getU3AEIF : TBits_1; inline;
  8308. function getU3ARXIF : TBits_1; inline;
  8309. function getU3ATXIF : TBits_1; inline;
  8310. function getU3EIF : TBits_1; inline;
  8311. function getU3RXIF : TBits_1; inline;
  8312. function getU3TXIF : TBits_1; inline;
  8313. function getUSBIF : TBits_1; inline;
  8314. function getw : TBits_32; inline;
  8315. procedure setAD1IF(thebits : TBits_1); inline;
  8316. procedure setCAN1IF(thebits : TBits_1); inline;
  8317. procedure setCMP1IF(thebits : TBits_1); inline;
  8318. procedure setCMP2IF(thebits : TBits_1); inline;
  8319. procedure setCNIF(thebits : TBits_1); inline;
  8320. procedure setDMA0IF(thebits : TBits_1); inline;
  8321. procedure setDMA1IF(thebits : TBits_1); inline;
  8322. procedure setDMA2IF(thebits : TBits_1); inline;
  8323. procedure setDMA3IF(thebits : TBits_1); inline;
  8324. procedure setETHIF(thebits : TBits_1); inline;
  8325. procedure setFCEIF(thebits : TBits_1); inline;
  8326. procedure setFSCMIF(thebits : TBits_1); inline;
  8327. procedure setI2C2ABIF(thebits : TBits_1); inline;
  8328. procedure setI2C2AMIF(thebits : TBits_1); inline;
  8329. procedure setI2C2ASIF(thebits : TBits_1); inline;
  8330. procedure setI2C3ABIF(thebits : TBits_1); inline;
  8331. procedure setI2C3AMIF(thebits : TBits_1); inline;
  8332. procedure setI2C3ASIF(thebits : TBits_1); inline;
  8333. procedure setI2C4BIF(thebits : TBits_1); inline;
  8334. procedure setI2C4MIF(thebits : TBits_1); inline;
  8335. procedure setI2C4SIF(thebits : TBits_1); inline;
  8336. procedure setI2C5BIF(thebits : TBits_1); inline;
  8337. procedure setI2C5MIF(thebits : TBits_1); inline;
  8338. procedure setI2C5SIF(thebits : TBits_1); inline;
  8339. procedure setIC1EIF(thebits : TBits_1); inline;
  8340. procedure setIC2EIF(thebits : TBits_1); inline;
  8341. procedure setIC3EIF(thebits : TBits_1); inline;
  8342. procedure setPMPIF(thebits : TBits_1); inline;
  8343. procedure setRTCCIF(thebits : TBits_1); inline;
  8344. procedure setSPI2AEIF(thebits : TBits_1); inline;
  8345. procedure setSPI2ARXIF(thebits : TBits_1); inline;
  8346. procedure setSPI2ATXIF(thebits : TBits_1); inline;
  8347. procedure setSPI2EIF(thebits : TBits_1); inline;
  8348. procedure setSPI2RXIF(thebits : TBits_1); inline;
  8349. procedure setSPI2TXIF(thebits : TBits_1); inline;
  8350. procedure setSPI3AEIF(thebits : TBits_1); inline;
  8351. procedure setSPI3ARXIF(thebits : TBits_1); inline;
  8352. procedure setSPI3ATXIF(thebits : TBits_1); inline;
  8353. procedure setSPI4EIF(thebits : TBits_1); inline;
  8354. procedure setSPI4RXIF(thebits : TBits_1); inline;
  8355. procedure setSPI4TXIF(thebits : TBits_1); inline;
  8356. procedure setU2AEIF(thebits : TBits_1); inline;
  8357. procedure setU2ARXIF(thebits : TBits_1); inline;
  8358. procedure setU2ATXIF(thebits : TBits_1); inline;
  8359. procedure setU2EIF(thebits : TBits_1); inline;
  8360. procedure setU2RXIF(thebits : TBits_1); inline;
  8361. procedure setU2TXIF(thebits : TBits_1); inline;
  8362. procedure setU3AEIF(thebits : TBits_1); inline;
  8363. procedure setU3ARXIF(thebits : TBits_1); inline;
  8364. procedure setU3ATXIF(thebits : TBits_1); inline;
  8365. procedure setU3EIF(thebits : TBits_1); inline;
  8366. procedure setU3RXIF(thebits : TBits_1); inline;
  8367. procedure setU3TXIF(thebits : TBits_1); inline;
  8368. procedure setUSBIF(thebits : TBits_1); inline;
  8369. procedure setw(thebits : TBits_32); inline;
  8370. public
  8371. procedure clearAD1IF; inline;
  8372. procedure clearCAN1IF; inline;
  8373. procedure clearCMP1IF; inline;
  8374. procedure clearCMP2IF; inline;
  8375. procedure clearCNIF; inline;
  8376. procedure clearDMA0IF; inline;
  8377. procedure clearDMA1IF; inline;
  8378. procedure clearDMA2IF; inline;
  8379. procedure clearDMA3IF; inline;
  8380. procedure clearETHIF; inline;
  8381. procedure clearFCEIF; inline;
  8382. procedure clearFSCMIF; inline;
  8383. procedure clearI2C2ABIF; inline;
  8384. procedure clearI2C2AMIF; inline;
  8385. procedure clearI2C2ASIF; inline;
  8386. procedure clearI2C3ABIF; inline;
  8387. procedure clearI2C3AMIF; inline;
  8388. procedure clearI2C3ASIF; inline;
  8389. procedure clearI2C4BIF; inline;
  8390. procedure clearI2C4MIF; inline;
  8391. procedure clearI2C4SIF; inline;
  8392. procedure clearI2C5BIF; inline;
  8393. procedure clearI2C5MIF; inline;
  8394. procedure clearI2C5SIF; inline;
  8395. procedure clearIC1EIF; inline;
  8396. procedure clearIC2EIF; inline;
  8397. procedure clearIC3EIF; inline;
  8398. procedure clearPMPIF; inline;
  8399. procedure clearRTCCIF; inline;
  8400. procedure clearSPI2AEIF; inline;
  8401. procedure clearSPI2ARXIF; inline;
  8402. procedure clearSPI2ATXIF; inline;
  8403. procedure clearSPI2EIF; inline;
  8404. procedure clearSPI2RXIF; inline;
  8405. procedure clearSPI2TXIF; inline;
  8406. procedure clearSPI3AEIF; inline;
  8407. procedure clearSPI3ARXIF; inline;
  8408. procedure clearSPI3ATXIF; inline;
  8409. procedure clearSPI4EIF; inline;
  8410. procedure clearSPI4RXIF; inline;
  8411. procedure clearSPI4TXIF; inline;
  8412. procedure clearU2AEIF; inline;
  8413. procedure clearU2ARXIF; inline;
  8414. procedure clearU2ATXIF; inline;
  8415. procedure clearU2EIF; inline;
  8416. procedure clearU2RXIF; inline;
  8417. procedure clearU2TXIF; inline;
  8418. procedure clearU3AEIF; inline;
  8419. procedure clearU3ARXIF; inline;
  8420. procedure clearU3ATXIF; inline;
  8421. procedure clearU3EIF; inline;
  8422. procedure clearU3RXIF; inline;
  8423. procedure clearU3TXIF; inline;
  8424. procedure clearUSBIF; inline;
  8425. procedure setAD1IF; inline;
  8426. procedure setCAN1IF; inline;
  8427. procedure setCMP1IF; inline;
  8428. procedure setCMP2IF; inline;
  8429. procedure setCNIF; inline;
  8430. procedure setDMA0IF; inline;
  8431. procedure setDMA1IF; inline;
  8432. procedure setDMA2IF; inline;
  8433. procedure setDMA3IF; inline;
  8434. procedure setETHIF; inline;
  8435. procedure setFCEIF; inline;
  8436. procedure setFSCMIF; inline;
  8437. procedure setI2C2ABIF; inline;
  8438. procedure setI2C2AMIF; inline;
  8439. procedure setI2C2ASIF; inline;
  8440. procedure setI2C3ABIF; inline;
  8441. procedure setI2C3AMIF; inline;
  8442. procedure setI2C3ASIF; inline;
  8443. procedure setI2C4BIF; inline;
  8444. procedure setI2C4MIF; inline;
  8445. procedure setI2C4SIF; inline;
  8446. procedure setI2C5BIF; inline;
  8447. procedure setI2C5MIF; inline;
  8448. procedure setI2C5SIF; inline;
  8449. procedure setIC1EIF; inline;
  8450. procedure setIC2EIF; inline;
  8451. procedure setIC3EIF; inline;
  8452. procedure setPMPIF; inline;
  8453. procedure setRTCCIF; inline;
  8454. procedure setSPI2AEIF; inline;
  8455. procedure setSPI2ARXIF; inline;
  8456. procedure setSPI2ATXIF; inline;
  8457. procedure setSPI2EIF; inline;
  8458. procedure setSPI2RXIF; inline;
  8459. procedure setSPI2TXIF; inline;
  8460. procedure setSPI3AEIF; inline;
  8461. procedure setSPI3ARXIF; inline;
  8462. procedure setSPI3ATXIF; inline;
  8463. procedure setSPI4EIF; inline;
  8464. procedure setSPI4RXIF; inline;
  8465. procedure setSPI4TXIF; inline;
  8466. procedure setU2AEIF; inline;
  8467. procedure setU2ARXIF; inline;
  8468. procedure setU2ATXIF; inline;
  8469. procedure setU2EIF; inline;
  8470. procedure setU2RXIF; inline;
  8471. procedure setU2TXIF; inline;
  8472. procedure setU3AEIF; inline;
  8473. procedure setU3ARXIF; inline;
  8474. procedure setU3ATXIF; inline;
  8475. procedure setU3EIF; inline;
  8476. procedure setU3RXIF; inline;
  8477. procedure setU3TXIF; inline;
  8478. procedure setUSBIF; inline;
  8479. property AD1IF : TBits_1 read getAD1IF write setAD1IF;
  8480. property CAN1IF : TBits_1 read getCAN1IF write setCAN1IF;
  8481. property CMP1IF : TBits_1 read getCMP1IF write setCMP1IF;
  8482. property CMP2IF : TBits_1 read getCMP2IF write setCMP2IF;
  8483. property CNIF : TBits_1 read getCNIF write setCNIF;
  8484. property DMA0IF : TBits_1 read getDMA0IF write setDMA0IF;
  8485. property DMA1IF : TBits_1 read getDMA1IF write setDMA1IF;
  8486. property DMA2IF : TBits_1 read getDMA2IF write setDMA2IF;
  8487. property DMA3IF : TBits_1 read getDMA3IF write setDMA3IF;
  8488. property ETHIF : TBits_1 read getETHIF write setETHIF;
  8489. property FCEIF : TBits_1 read getFCEIF write setFCEIF;
  8490. property FSCMIF : TBits_1 read getFSCMIF write setFSCMIF;
  8491. property I2C2ABIF : TBits_1 read getI2C2ABIF write setI2C2ABIF;
  8492. property I2C2AMIF : TBits_1 read getI2C2AMIF write setI2C2AMIF;
  8493. property I2C2ASIF : TBits_1 read getI2C2ASIF write setI2C2ASIF;
  8494. property I2C3ABIF : TBits_1 read getI2C3ABIF write setI2C3ABIF;
  8495. property I2C3AMIF : TBits_1 read getI2C3AMIF write setI2C3AMIF;
  8496. property I2C3ASIF : TBits_1 read getI2C3ASIF write setI2C3ASIF;
  8497. property I2C4BIF : TBits_1 read getI2C4BIF write setI2C4BIF;
  8498. property I2C4MIF : TBits_1 read getI2C4MIF write setI2C4MIF;
  8499. property I2C4SIF : TBits_1 read getI2C4SIF write setI2C4SIF;
  8500. property I2C5BIF : TBits_1 read getI2C5BIF write setI2C5BIF;
  8501. property I2C5MIF : TBits_1 read getI2C5MIF write setI2C5MIF;
  8502. property I2C5SIF : TBits_1 read getI2C5SIF write setI2C5SIF;
  8503. property IC1EIF : TBits_1 read getIC1EIF write setIC1EIF;
  8504. property IC2EIF : TBits_1 read getIC2EIF write setIC2EIF;
  8505. property IC3EIF : TBits_1 read getIC3EIF write setIC3EIF;
  8506. property PMPIF : TBits_1 read getPMPIF write setPMPIF;
  8507. property RTCCIF : TBits_1 read getRTCCIF write setRTCCIF;
  8508. property SPI2AEIF : TBits_1 read getSPI2AEIF write setSPI2AEIF;
  8509. property SPI2ARXIF : TBits_1 read getSPI2ARXIF write setSPI2ARXIF;
  8510. property SPI2ATXIF : TBits_1 read getSPI2ATXIF write setSPI2ATXIF;
  8511. property SPI2EIF : TBits_1 read getSPI2EIF write setSPI2EIF;
  8512. property SPI2RXIF : TBits_1 read getSPI2RXIF write setSPI2RXIF;
  8513. property SPI2TXIF : TBits_1 read getSPI2TXIF write setSPI2TXIF;
  8514. property SPI3AEIF : TBits_1 read getSPI3AEIF write setSPI3AEIF;
  8515. property SPI3ARXIF : TBits_1 read getSPI3ARXIF write setSPI3ARXIF;
  8516. property SPI3ATXIF : TBits_1 read getSPI3ATXIF write setSPI3ATXIF;
  8517. property SPI4EIF : TBits_1 read getSPI4EIF write setSPI4EIF;
  8518. property SPI4RXIF : TBits_1 read getSPI4RXIF write setSPI4RXIF;
  8519. property SPI4TXIF : TBits_1 read getSPI4TXIF write setSPI4TXIF;
  8520. property U2AEIF : TBits_1 read getU2AEIF write setU2AEIF;
  8521. property U2ARXIF : TBits_1 read getU2ARXIF write setU2ARXIF;
  8522. property U2ATXIF : TBits_1 read getU2ATXIF write setU2ATXIF;
  8523. property U2EIF : TBits_1 read getU2EIF write setU2EIF;
  8524. property U2RXIF : TBits_1 read getU2RXIF write setU2RXIF;
  8525. property U2TXIF : TBits_1 read getU2TXIF write setU2TXIF;
  8526. property U3AEIF : TBits_1 read getU3AEIF write setU3AEIF;
  8527. property U3ARXIF : TBits_1 read getU3ARXIF write setU3ARXIF;
  8528. property U3ATXIF : TBits_1 read getU3ATXIF write setU3ATXIF;
  8529. property U3EIF : TBits_1 read getU3EIF write setU3EIF;
  8530. property U3RXIF : TBits_1 read getU3RXIF write setU3RXIF;
  8531. property U3TXIF : TBits_1 read getU3TXIF write setU3TXIF;
  8532. property USBIF : TBits_1 read getUSBIF write setUSBIF;
  8533. property w : TBits_32 read getw write setw;
  8534. end;
  8535. TINT_IFS2 = record
  8536. private
  8537. function getIC4EIF : TBits_1; inline;
  8538. function getIC5EIF : TBits_1; inline;
  8539. function getPMPEIF : TBits_1; inline;
  8540. function getU1BEIF : TBits_1; inline;
  8541. function getU1BRXIF : TBits_1; inline;
  8542. function getU1BTXIF : TBits_1; inline;
  8543. function getU2BEIF : TBits_1; inline;
  8544. function getU2BRXIF : TBits_1; inline;
  8545. function getU2BTXIF : TBits_1; inline;
  8546. function getU3BEIF : TBits_1; inline;
  8547. function getU3BRXIF : TBits_1; inline;
  8548. function getU3BTXIF : TBits_1; inline;
  8549. function getU4EIF : TBits_1; inline;
  8550. function getU4RXIF : TBits_1; inline;
  8551. function getU4TXIF : TBits_1; inline;
  8552. function getU5EIF : TBits_1; inline;
  8553. function getU5RXIF : TBits_1; inline;
  8554. function getU5TXIF : TBits_1; inline;
  8555. function getU6EIF : TBits_1; inline;
  8556. function getU6RXIF : TBits_1; inline;
  8557. function getU6TXIF : TBits_1; inline;
  8558. function getw : TBits_32; inline;
  8559. procedure setIC4EIF(thebits : TBits_1); inline;
  8560. procedure setIC5EIF(thebits : TBits_1); inline;
  8561. procedure setPMPEIF(thebits : TBits_1); inline;
  8562. procedure setU1BEIF(thebits : TBits_1); inline;
  8563. procedure setU1BRXIF(thebits : TBits_1); inline;
  8564. procedure setU1BTXIF(thebits : TBits_1); inline;
  8565. procedure setU2BEIF(thebits : TBits_1); inline;
  8566. procedure setU2BRXIF(thebits : TBits_1); inline;
  8567. procedure setU2BTXIF(thebits : TBits_1); inline;
  8568. procedure setU3BEIF(thebits : TBits_1); inline;
  8569. procedure setU3BRXIF(thebits : TBits_1); inline;
  8570. procedure setU3BTXIF(thebits : TBits_1); inline;
  8571. procedure setU4EIF(thebits : TBits_1); inline;
  8572. procedure setU4RXIF(thebits : TBits_1); inline;
  8573. procedure setU4TXIF(thebits : TBits_1); inline;
  8574. procedure setU5EIF(thebits : TBits_1); inline;
  8575. procedure setU5RXIF(thebits : TBits_1); inline;
  8576. procedure setU5TXIF(thebits : TBits_1); inline;
  8577. procedure setU6EIF(thebits : TBits_1); inline;
  8578. procedure setU6RXIF(thebits : TBits_1); inline;
  8579. procedure setU6TXIF(thebits : TBits_1); inline;
  8580. procedure setw(thebits : TBits_32); inline;
  8581. public
  8582. procedure clearIC4EIF; inline;
  8583. procedure clearIC5EIF; inline;
  8584. procedure clearPMPEIF; inline;
  8585. procedure clearU1BEIF; inline;
  8586. procedure clearU1BRXIF; inline;
  8587. procedure clearU1BTXIF; inline;
  8588. procedure clearU2BEIF; inline;
  8589. procedure clearU2BRXIF; inline;
  8590. procedure clearU2BTXIF; inline;
  8591. procedure clearU3BEIF; inline;
  8592. procedure clearU3BRXIF; inline;
  8593. procedure clearU3BTXIF; inline;
  8594. procedure clearU4EIF; inline;
  8595. procedure clearU4RXIF; inline;
  8596. procedure clearU4TXIF; inline;
  8597. procedure clearU5EIF; inline;
  8598. procedure clearU5RXIF; inline;
  8599. procedure clearU5TXIF; inline;
  8600. procedure clearU6EIF; inline;
  8601. procedure clearU6RXIF; inline;
  8602. procedure clearU6TXIF; inline;
  8603. procedure setIC4EIF; inline;
  8604. procedure setIC5EIF; inline;
  8605. procedure setPMPEIF; inline;
  8606. procedure setU1BEIF; inline;
  8607. procedure setU1BRXIF; inline;
  8608. procedure setU1BTXIF; inline;
  8609. procedure setU2BEIF; inline;
  8610. procedure setU2BRXIF; inline;
  8611. procedure setU2BTXIF; inline;
  8612. procedure setU3BEIF; inline;
  8613. procedure setU3BRXIF; inline;
  8614. procedure setU3BTXIF; inline;
  8615. procedure setU4EIF; inline;
  8616. procedure setU4RXIF; inline;
  8617. procedure setU4TXIF; inline;
  8618. procedure setU5EIF; inline;
  8619. procedure setU5RXIF; inline;
  8620. procedure setU5TXIF; inline;
  8621. procedure setU6EIF; inline;
  8622. procedure setU6RXIF; inline;
  8623. procedure setU6TXIF; inline;
  8624. property IC4EIF : TBits_1 read getIC4EIF write setIC4EIF;
  8625. property IC5EIF : TBits_1 read getIC5EIF write setIC5EIF;
  8626. property PMPEIF : TBits_1 read getPMPEIF write setPMPEIF;
  8627. property U1BEIF : TBits_1 read getU1BEIF write setU1BEIF;
  8628. property U1BRXIF : TBits_1 read getU1BRXIF write setU1BRXIF;
  8629. property U1BTXIF : TBits_1 read getU1BTXIF write setU1BTXIF;
  8630. property U2BEIF : TBits_1 read getU2BEIF write setU2BEIF;
  8631. property U2BRXIF : TBits_1 read getU2BRXIF write setU2BRXIF;
  8632. property U2BTXIF : TBits_1 read getU2BTXIF write setU2BTXIF;
  8633. property U3BEIF : TBits_1 read getU3BEIF write setU3BEIF;
  8634. property U3BRXIF : TBits_1 read getU3BRXIF write setU3BRXIF;
  8635. property U3BTXIF : TBits_1 read getU3BTXIF write setU3BTXIF;
  8636. property U4EIF : TBits_1 read getU4EIF write setU4EIF;
  8637. property U4RXIF : TBits_1 read getU4RXIF write setU4RXIF;
  8638. property U4TXIF : TBits_1 read getU4TXIF write setU4TXIF;
  8639. property U5EIF : TBits_1 read getU5EIF write setU5EIF;
  8640. property U5RXIF : TBits_1 read getU5RXIF write setU5RXIF;
  8641. property U5TXIF : TBits_1 read getU5TXIF write setU5TXIF;
  8642. property U6EIF : TBits_1 read getU6EIF write setU6EIF;
  8643. property U6RXIF : TBits_1 read getU6RXIF write setU6RXIF;
  8644. property U6TXIF : TBits_1 read getU6TXIF write setU6TXIF;
  8645. property w : TBits_32 read getw write setw;
  8646. end;
  8647. TINT_IEC0 = record
  8648. private
  8649. function getCS0IE : TBits_1; inline;
  8650. function getCS1IE : TBits_1; inline;
  8651. function getCTIE : TBits_1; inline;
  8652. function getI2C1ABIE : TBits_1; inline;
  8653. function getI2C1AMIE : TBits_1; inline;
  8654. function getI2C1ASIE : TBits_1; inline;
  8655. function getI2C1BIE : TBits_1; inline;
  8656. function getI2C1MIE : TBits_1; inline;
  8657. function getI2C1SIE : TBits_1; inline;
  8658. function getI2C3BIE : TBits_1; inline;
  8659. function getI2C3MIE : TBits_1; inline;
  8660. function getI2C3SIE : TBits_1; inline;
  8661. function getIC1IE : TBits_1; inline;
  8662. function getIC2IE : TBits_1; inline;
  8663. function getIC3IE : TBits_1; inline;
  8664. function getIC4IE : TBits_1; inline;
  8665. function getIC5IE : TBits_1; inline;
  8666. function getINT0IE : TBits_1; inline;
  8667. function getINT1IE : TBits_1; inline;
  8668. function getINT2IE : TBits_1; inline;
  8669. function getINT3IE : TBits_1; inline;
  8670. function getINT4IE : TBits_1; inline;
  8671. function getOC1IE : TBits_1; inline;
  8672. function getOC2IE : TBits_1; inline;
  8673. function getOC3IE : TBits_1; inline;
  8674. function getOC4IE : TBits_1; inline;
  8675. function getOC5IE : TBits_1; inline;
  8676. function getSPI1AEIE : TBits_1; inline;
  8677. function getSPI1ARXIE : TBits_1; inline;
  8678. function getSPI1ATXIE : TBits_1; inline;
  8679. function getSPI3EIE : TBits_1; inline;
  8680. function getSPI3RXIE : TBits_1; inline;
  8681. function getSPI3TXIE : TBits_1; inline;
  8682. function getT1IE : TBits_1; inline;
  8683. function getT2IE : TBits_1; inline;
  8684. function getT3IE : TBits_1; inline;
  8685. function getT4IE : TBits_1; inline;
  8686. function getT5IE : TBits_1; inline;
  8687. function getU1AEIE : TBits_1; inline;
  8688. function getU1ARXIE : TBits_1; inline;
  8689. function getU1ATXIE : TBits_1; inline;
  8690. function getU1EIE : TBits_1; inline;
  8691. function getU1RXIE : TBits_1; inline;
  8692. function getU1TXIE : TBits_1; inline;
  8693. function getw : TBits_32; inline;
  8694. procedure setCS0IE(thebits : TBits_1); inline;
  8695. procedure setCS1IE(thebits : TBits_1); inline;
  8696. procedure setCTIE(thebits : TBits_1); inline;
  8697. procedure setI2C1ABIE(thebits : TBits_1); inline;
  8698. procedure setI2C1AMIE(thebits : TBits_1); inline;
  8699. procedure setI2C1ASIE(thebits : TBits_1); inline;
  8700. procedure setI2C1BIE(thebits : TBits_1); inline;
  8701. procedure setI2C1MIE(thebits : TBits_1); inline;
  8702. procedure setI2C1SIE(thebits : TBits_1); inline;
  8703. procedure setI2C3BIE(thebits : TBits_1); inline;
  8704. procedure setI2C3MIE(thebits : TBits_1); inline;
  8705. procedure setI2C3SIE(thebits : TBits_1); inline;
  8706. procedure setIC1IE(thebits : TBits_1); inline;
  8707. procedure setIC2IE(thebits : TBits_1); inline;
  8708. procedure setIC3IE(thebits : TBits_1); inline;
  8709. procedure setIC4IE(thebits : TBits_1); inline;
  8710. procedure setIC5IE(thebits : TBits_1); inline;
  8711. procedure setINT0IE(thebits : TBits_1); inline;
  8712. procedure setINT1IE(thebits : TBits_1); inline;
  8713. procedure setINT2IE(thebits : TBits_1); inline;
  8714. procedure setINT3IE(thebits : TBits_1); inline;
  8715. procedure setINT4IE(thebits : TBits_1); inline;
  8716. procedure setOC1IE(thebits : TBits_1); inline;
  8717. procedure setOC2IE(thebits : TBits_1); inline;
  8718. procedure setOC3IE(thebits : TBits_1); inline;
  8719. procedure setOC4IE(thebits : TBits_1); inline;
  8720. procedure setOC5IE(thebits : TBits_1); inline;
  8721. procedure setSPI1AEIE(thebits : TBits_1); inline;
  8722. procedure setSPI1ARXIE(thebits : TBits_1); inline;
  8723. procedure setSPI1ATXIE(thebits : TBits_1); inline;
  8724. procedure setSPI3EIE(thebits : TBits_1); inline;
  8725. procedure setSPI3RXIE(thebits : TBits_1); inline;
  8726. procedure setSPI3TXIE(thebits : TBits_1); inline;
  8727. procedure setT1IE(thebits : TBits_1); inline;
  8728. procedure setT2IE(thebits : TBits_1); inline;
  8729. procedure setT3IE(thebits : TBits_1); inline;
  8730. procedure setT4IE(thebits : TBits_1); inline;
  8731. procedure setT5IE(thebits : TBits_1); inline;
  8732. procedure setU1AEIE(thebits : TBits_1); inline;
  8733. procedure setU1ARXIE(thebits : TBits_1); inline;
  8734. procedure setU1ATXIE(thebits : TBits_1); inline;
  8735. procedure setU1EIE(thebits : TBits_1); inline;
  8736. procedure setU1RXIE(thebits : TBits_1); inline;
  8737. procedure setU1TXIE(thebits : TBits_1); inline;
  8738. procedure setw(thebits : TBits_32); inline;
  8739. public
  8740. procedure clearCS0IE; inline;
  8741. procedure clearCS1IE; inline;
  8742. procedure clearCTIE; inline;
  8743. procedure clearI2C1ABIE; inline;
  8744. procedure clearI2C1AMIE; inline;
  8745. procedure clearI2C1ASIE; inline;
  8746. procedure clearI2C1BIE; inline;
  8747. procedure clearI2C1MIE; inline;
  8748. procedure clearI2C1SIE; inline;
  8749. procedure clearI2C3BIE; inline;
  8750. procedure clearI2C3MIE; inline;
  8751. procedure clearI2C3SIE; inline;
  8752. procedure clearIC1IE; inline;
  8753. procedure clearIC2IE; inline;
  8754. procedure clearIC3IE; inline;
  8755. procedure clearIC4IE; inline;
  8756. procedure clearIC5IE; inline;
  8757. procedure clearINT0IE; inline;
  8758. procedure clearINT1IE; inline;
  8759. procedure clearINT2IE; inline;
  8760. procedure clearINT3IE; inline;
  8761. procedure clearINT4IE; inline;
  8762. procedure clearOC1IE; inline;
  8763. procedure clearOC2IE; inline;
  8764. procedure clearOC3IE; inline;
  8765. procedure clearOC4IE; inline;
  8766. procedure clearOC5IE; inline;
  8767. procedure clearSPI1AEIE; inline;
  8768. procedure clearSPI1ARXIE; inline;
  8769. procedure clearSPI1ATXIE; inline;
  8770. procedure clearSPI3EIE; inline;
  8771. procedure clearSPI3RXIE; inline;
  8772. procedure clearSPI3TXIE; inline;
  8773. procedure clearT1IE; inline;
  8774. procedure clearT2IE; inline;
  8775. procedure clearT3IE; inline;
  8776. procedure clearT4IE; inline;
  8777. procedure clearT5IE; inline;
  8778. procedure clearU1AEIE; inline;
  8779. procedure clearU1ARXIE; inline;
  8780. procedure clearU1ATXIE; inline;
  8781. procedure clearU1EIE; inline;
  8782. procedure clearU1RXIE; inline;
  8783. procedure clearU1TXIE; inline;
  8784. procedure setCS0IE; inline;
  8785. procedure setCS1IE; inline;
  8786. procedure setCTIE; inline;
  8787. procedure setI2C1ABIE; inline;
  8788. procedure setI2C1AMIE; inline;
  8789. procedure setI2C1ASIE; inline;
  8790. procedure setI2C1BIE; inline;
  8791. procedure setI2C1MIE; inline;
  8792. procedure setI2C1SIE; inline;
  8793. procedure setI2C3BIE; inline;
  8794. procedure setI2C3MIE; inline;
  8795. procedure setI2C3SIE; inline;
  8796. procedure setIC1IE; inline;
  8797. procedure setIC2IE; inline;
  8798. procedure setIC3IE; inline;
  8799. procedure setIC4IE; inline;
  8800. procedure setIC5IE; inline;
  8801. procedure setINT0IE; inline;
  8802. procedure setINT1IE; inline;
  8803. procedure setINT2IE; inline;
  8804. procedure setINT3IE; inline;
  8805. procedure setINT4IE; inline;
  8806. procedure setOC1IE; inline;
  8807. procedure setOC2IE; inline;
  8808. procedure setOC3IE; inline;
  8809. procedure setOC4IE; inline;
  8810. procedure setOC5IE; inline;
  8811. procedure setSPI1AEIE; inline;
  8812. procedure setSPI1ARXIE; inline;
  8813. procedure setSPI1ATXIE; inline;
  8814. procedure setSPI3EIE; inline;
  8815. procedure setSPI3RXIE; inline;
  8816. procedure setSPI3TXIE; inline;
  8817. procedure setT1IE; inline;
  8818. procedure setT2IE; inline;
  8819. procedure setT3IE; inline;
  8820. procedure setT4IE; inline;
  8821. procedure setT5IE; inline;
  8822. procedure setU1AEIE; inline;
  8823. procedure setU1ARXIE; inline;
  8824. procedure setU1ATXIE; inline;
  8825. procedure setU1EIE; inline;
  8826. procedure setU1RXIE; inline;
  8827. procedure setU1TXIE; inline;
  8828. property CS0IE : TBits_1 read getCS0IE write setCS0IE;
  8829. property CS1IE : TBits_1 read getCS1IE write setCS1IE;
  8830. property CTIE : TBits_1 read getCTIE write setCTIE;
  8831. property I2C1ABIE : TBits_1 read getI2C1ABIE write setI2C1ABIE;
  8832. property I2C1AMIE : TBits_1 read getI2C1AMIE write setI2C1AMIE;
  8833. property I2C1ASIE : TBits_1 read getI2C1ASIE write setI2C1ASIE;
  8834. property I2C1BIE : TBits_1 read getI2C1BIE write setI2C1BIE;
  8835. property I2C1MIE : TBits_1 read getI2C1MIE write setI2C1MIE;
  8836. property I2C1SIE : TBits_1 read getI2C1SIE write setI2C1SIE;
  8837. property I2C3BIE : TBits_1 read getI2C3BIE write setI2C3BIE;
  8838. property I2C3MIE : TBits_1 read getI2C3MIE write setI2C3MIE;
  8839. property I2C3SIE : TBits_1 read getI2C3SIE write setI2C3SIE;
  8840. property IC1IE : TBits_1 read getIC1IE write setIC1IE;
  8841. property IC2IE : TBits_1 read getIC2IE write setIC2IE;
  8842. property IC3IE : TBits_1 read getIC3IE write setIC3IE;
  8843. property IC4IE : TBits_1 read getIC4IE write setIC4IE;
  8844. property IC5IE : TBits_1 read getIC5IE write setIC5IE;
  8845. property INT0IE : TBits_1 read getINT0IE write setINT0IE;
  8846. property INT1IE : TBits_1 read getINT1IE write setINT1IE;
  8847. property INT2IE : TBits_1 read getINT2IE write setINT2IE;
  8848. property INT3IE : TBits_1 read getINT3IE write setINT3IE;
  8849. property INT4IE : TBits_1 read getINT4IE write setINT4IE;
  8850. property OC1IE : TBits_1 read getOC1IE write setOC1IE;
  8851. property OC2IE : TBits_1 read getOC2IE write setOC2IE;
  8852. property OC3IE : TBits_1 read getOC3IE write setOC3IE;
  8853. property OC4IE : TBits_1 read getOC4IE write setOC4IE;
  8854. property OC5IE : TBits_1 read getOC5IE write setOC5IE;
  8855. property SPI1AEIE : TBits_1 read getSPI1AEIE write setSPI1AEIE;
  8856. property SPI1ARXIE : TBits_1 read getSPI1ARXIE write setSPI1ARXIE;
  8857. property SPI1ATXIE : TBits_1 read getSPI1ATXIE write setSPI1ATXIE;
  8858. property SPI3EIE : TBits_1 read getSPI3EIE write setSPI3EIE;
  8859. property SPI3RXIE : TBits_1 read getSPI3RXIE write setSPI3RXIE;
  8860. property SPI3TXIE : TBits_1 read getSPI3TXIE write setSPI3TXIE;
  8861. property T1IE : TBits_1 read getT1IE write setT1IE;
  8862. property T2IE : TBits_1 read getT2IE write setT2IE;
  8863. property T3IE : TBits_1 read getT3IE write setT3IE;
  8864. property T4IE : TBits_1 read getT4IE write setT4IE;
  8865. property T5IE : TBits_1 read getT5IE write setT5IE;
  8866. property U1AEIE : TBits_1 read getU1AEIE write setU1AEIE;
  8867. property U1ARXIE : TBits_1 read getU1ARXIE write setU1ARXIE;
  8868. property U1ATXIE : TBits_1 read getU1ATXIE write setU1ATXIE;
  8869. property U1EIE : TBits_1 read getU1EIE write setU1EIE;
  8870. property U1RXIE : TBits_1 read getU1RXIE write setU1RXIE;
  8871. property U1TXIE : TBits_1 read getU1TXIE write setU1TXIE;
  8872. property w : TBits_32 read getw write setw;
  8873. end;
  8874. TINT_IEC1 = record
  8875. private
  8876. function getAD1IE : TBits_1; inline;
  8877. function getCAN1IE : TBits_1; inline;
  8878. function getCMP1IE : TBits_1; inline;
  8879. function getCMP2IE : TBits_1; inline;
  8880. function getCNIE : TBits_1; inline;
  8881. function getDMA0IE : TBits_1; inline;
  8882. function getDMA1IE : TBits_1; inline;
  8883. function getDMA2IE : TBits_1; inline;
  8884. function getDMA3IE : TBits_1; inline;
  8885. function getETHIE : TBits_1; inline;
  8886. function getFCEIE : TBits_1; inline;
  8887. function getFSCMIE : TBits_1; inline;
  8888. function getI2C2ABIE : TBits_1; inline;
  8889. function getI2C2AMIE : TBits_1; inline;
  8890. function getI2C2ASIE : TBits_1; inline;
  8891. function getI2C3ABIE : TBits_1; inline;
  8892. function getI2C3AMIE : TBits_1; inline;
  8893. function getI2C3ASIE : TBits_1; inline;
  8894. function getI2C4BIE : TBits_1; inline;
  8895. function getI2C4MIE : TBits_1; inline;
  8896. function getI2C4SIE : TBits_1; inline;
  8897. function getI2C5BIE : TBits_1; inline;
  8898. function getI2C5MIE : TBits_1; inline;
  8899. function getI2C5SIE : TBits_1; inline;
  8900. function getIC1EIE : TBits_1; inline;
  8901. function getIC2EIE : TBits_1; inline;
  8902. function getIC3EIE : TBits_1; inline;
  8903. function getPMPIE : TBits_1; inline;
  8904. function getRTCCIE : TBits_1; inline;
  8905. function getSPI2AEIE : TBits_1; inline;
  8906. function getSPI2ARXIE : TBits_1; inline;
  8907. function getSPI2ATXIE : TBits_1; inline;
  8908. function getSPI2EIE : TBits_1; inline;
  8909. function getSPI2RXIE : TBits_1; inline;
  8910. function getSPI2TXIE : TBits_1; inline;
  8911. function getSPI3AEIE : TBits_1; inline;
  8912. function getSPI3ARXIE : TBits_1; inline;
  8913. function getSPI3ATXIE : TBits_1; inline;
  8914. function getSPI4EIE : TBits_1; inline;
  8915. function getSPI4RXIE : TBits_1; inline;
  8916. function getSPI4TXIE : TBits_1; inline;
  8917. function getU2AEIE : TBits_1; inline;
  8918. function getU2ARXIE : TBits_1; inline;
  8919. function getU2ATXIE : TBits_1; inline;
  8920. function getU2EIE : TBits_1; inline;
  8921. function getU2RXIE : TBits_1; inline;
  8922. function getU2TXIE : TBits_1; inline;
  8923. function getU3AEIE : TBits_1; inline;
  8924. function getU3ARXIE : TBits_1; inline;
  8925. function getU3ATXIE : TBits_1; inline;
  8926. function getU3EIE : TBits_1; inline;
  8927. function getU3RXIE : TBits_1; inline;
  8928. function getU3TXIE : TBits_1; inline;
  8929. function getUSBIE : TBits_1; inline;
  8930. function getw : TBits_32; inline;
  8931. procedure setAD1IE(thebits : TBits_1); inline;
  8932. procedure setCAN1IE(thebits : TBits_1); inline;
  8933. procedure setCMP1IE(thebits : TBits_1); inline;
  8934. procedure setCMP2IE(thebits : TBits_1); inline;
  8935. procedure setCNIE(thebits : TBits_1); inline;
  8936. procedure setDMA0IE(thebits : TBits_1); inline;
  8937. procedure setDMA1IE(thebits : TBits_1); inline;
  8938. procedure setDMA2IE(thebits : TBits_1); inline;
  8939. procedure setDMA3IE(thebits : TBits_1); inline;
  8940. procedure setETHIE(thebits : TBits_1); inline;
  8941. procedure setFCEIE(thebits : TBits_1); inline;
  8942. procedure setFSCMIE(thebits : TBits_1); inline;
  8943. procedure setI2C2ABIE(thebits : TBits_1); inline;
  8944. procedure setI2C2AMIE(thebits : TBits_1); inline;
  8945. procedure setI2C2ASIE(thebits : TBits_1); inline;
  8946. procedure setI2C3ABIE(thebits : TBits_1); inline;
  8947. procedure setI2C3AMIE(thebits : TBits_1); inline;
  8948. procedure setI2C3ASIE(thebits : TBits_1); inline;
  8949. procedure setI2C4BIE(thebits : TBits_1); inline;
  8950. procedure setI2C4MIE(thebits : TBits_1); inline;
  8951. procedure setI2C4SIE(thebits : TBits_1); inline;
  8952. procedure setI2C5BIE(thebits : TBits_1); inline;
  8953. procedure setI2C5MIE(thebits : TBits_1); inline;
  8954. procedure setI2C5SIE(thebits : TBits_1); inline;
  8955. procedure setIC1EIE(thebits : TBits_1); inline;
  8956. procedure setIC2EIE(thebits : TBits_1); inline;
  8957. procedure setIC3EIE(thebits : TBits_1); inline;
  8958. procedure setPMPIE(thebits : TBits_1); inline;
  8959. procedure setRTCCIE(thebits : TBits_1); inline;
  8960. procedure setSPI2AEIE(thebits : TBits_1); inline;
  8961. procedure setSPI2ARXIE(thebits : TBits_1); inline;
  8962. procedure setSPI2ATXIE(thebits : TBits_1); inline;
  8963. procedure setSPI2EIE(thebits : TBits_1); inline;
  8964. procedure setSPI2RXIE(thebits : TBits_1); inline;
  8965. procedure setSPI2TXIE(thebits : TBits_1); inline;
  8966. procedure setSPI3AEIE(thebits : TBits_1); inline;
  8967. procedure setSPI3ARXIE(thebits : TBits_1); inline;
  8968. procedure setSPI3ATXIE(thebits : TBits_1); inline;
  8969. procedure setSPI4EIE(thebits : TBits_1); inline;
  8970. procedure setSPI4RXIE(thebits : TBits_1); inline;
  8971. procedure setSPI4TXIE(thebits : TBits_1); inline;
  8972. procedure setU2AEIE(thebits : TBits_1); inline;
  8973. procedure setU2ARXIE(thebits : TBits_1); inline;
  8974. procedure setU2ATXIE(thebits : TBits_1); inline;
  8975. procedure setU2EIE(thebits : TBits_1); inline;
  8976. procedure setU2RXIE(thebits : TBits_1); inline;
  8977. procedure setU2TXIE(thebits : TBits_1); inline;
  8978. procedure setU3AEIE(thebits : TBits_1); inline;
  8979. procedure setU3ARXIE(thebits : TBits_1); inline;
  8980. procedure setU3ATXIE(thebits : TBits_1); inline;
  8981. procedure setU3EIE(thebits : TBits_1); inline;
  8982. procedure setU3RXIE(thebits : TBits_1); inline;
  8983. procedure setU3TXIE(thebits : TBits_1); inline;
  8984. procedure setUSBIE(thebits : TBits_1); inline;
  8985. procedure setw(thebits : TBits_32); inline;
  8986. public
  8987. procedure clearAD1IE; inline;
  8988. procedure clearCAN1IE; inline;
  8989. procedure clearCMP1IE; inline;
  8990. procedure clearCMP2IE; inline;
  8991. procedure clearCNIE; inline;
  8992. procedure clearDMA0IE; inline;
  8993. procedure clearDMA1IE; inline;
  8994. procedure clearDMA2IE; inline;
  8995. procedure clearDMA3IE; inline;
  8996. procedure clearETHIE; inline;
  8997. procedure clearFCEIE; inline;
  8998. procedure clearFSCMIE; inline;
  8999. procedure clearI2C2ABIE; inline;
  9000. procedure clearI2C2AMIE; inline;
  9001. procedure clearI2C2ASIE; inline;
  9002. procedure clearI2C3ABIE; inline;
  9003. procedure clearI2C3AMIE; inline;
  9004. procedure clearI2C3ASIE; inline;
  9005. procedure clearI2C4BIE; inline;
  9006. procedure clearI2C4MIE; inline;
  9007. procedure clearI2C4SIE; inline;
  9008. procedure clearI2C5BIE; inline;
  9009. procedure clearI2C5MIE; inline;
  9010. procedure clearI2C5SIE; inline;
  9011. procedure clearIC1EIE; inline;
  9012. procedure clearIC2EIE; inline;
  9013. procedure clearIC3EIE; inline;
  9014. procedure clearPMPIE; inline;
  9015. procedure clearRTCCIE; inline;
  9016. procedure clearSPI2AEIE; inline;
  9017. procedure clearSPI2ARXIE; inline;
  9018. procedure clearSPI2ATXIE; inline;
  9019. procedure clearSPI2EIE; inline;
  9020. procedure clearSPI2RXIE; inline;
  9021. procedure clearSPI2TXIE; inline;
  9022. procedure clearSPI3AEIE; inline;
  9023. procedure clearSPI3ARXIE; inline;
  9024. procedure clearSPI3ATXIE; inline;
  9025. procedure clearSPI4EIE; inline;
  9026. procedure clearSPI4RXIE; inline;
  9027. procedure clearSPI4TXIE; inline;
  9028. procedure clearU2AEIE; inline;
  9029. procedure clearU2ARXIE; inline;
  9030. procedure clearU2ATXIE; inline;
  9031. procedure clearU2EIE; inline;
  9032. procedure clearU2RXIE; inline;
  9033. procedure clearU2TXIE; inline;
  9034. procedure clearU3AEIE; inline;
  9035. procedure clearU3ARXIE; inline;
  9036. procedure clearU3ATXIE; inline;
  9037. procedure clearU3EIE; inline;
  9038. procedure clearU3RXIE; inline;
  9039. procedure clearU3TXIE; inline;
  9040. procedure clearUSBIE; inline;
  9041. procedure setAD1IE; inline;
  9042. procedure setCAN1IE; inline;
  9043. procedure setCMP1IE; inline;
  9044. procedure setCMP2IE; inline;
  9045. procedure setCNIE; inline;
  9046. procedure setDMA0IE; inline;
  9047. procedure setDMA1IE; inline;
  9048. procedure setDMA2IE; inline;
  9049. procedure setDMA3IE; inline;
  9050. procedure setETHIE; inline;
  9051. procedure setFCEIE; inline;
  9052. procedure setFSCMIE; inline;
  9053. procedure setI2C2ABIE; inline;
  9054. procedure setI2C2AMIE; inline;
  9055. procedure setI2C2ASIE; inline;
  9056. procedure setI2C3ABIE; inline;
  9057. procedure setI2C3AMIE; inline;
  9058. procedure setI2C3ASIE; inline;
  9059. procedure setI2C4BIE; inline;
  9060. procedure setI2C4MIE; inline;
  9061. procedure setI2C4SIE; inline;
  9062. procedure setI2C5BIE; inline;
  9063. procedure setI2C5MIE; inline;
  9064. procedure setI2C5SIE; inline;
  9065. procedure setIC1EIE; inline;
  9066. procedure setIC2EIE; inline;
  9067. procedure setIC3EIE; inline;
  9068. procedure setPMPIE; inline;
  9069. procedure setRTCCIE; inline;
  9070. procedure setSPI2AEIE; inline;
  9071. procedure setSPI2ARXIE; inline;
  9072. procedure setSPI2ATXIE; inline;
  9073. procedure setSPI2EIE; inline;
  9074. procedure setSPI2RXIE; inline;
  9075. procedure setSPI2TXIE; inline;
  9076. procedure setSPI3AEIE; inline;
  9077. procedure setSPI3ARXIE; inline;
  9078. procedure setSPI3ATXIE; inline;
  9079. procedure setSPI4EIE; inline;
  9080. procedure setSPI4RXIE; inline;
  9081. procedure setSPI4TXIE; inline;
  9082. procedure setU2AEIE; inline;
  9083. procedure setU2ARXIE; inline;
  9084. procedure setU2ATXIE; inline;
  9085. procedure setU2EIE; inline;
  9086. procedure setU2RXIE; inline;
  9087. procedure setU2TXIE; inline;
  9088. procedure setU3AEIE; inline;
  9089. procedure setU3ARXIE; inline;
  9090. procedure setU3ATXIE; inline;
  9091. procedure setU3EIE; inline;
  9092. procedure setU3RXIE; inline;
  9093. procedure setU3TXIE; inline;
  9094. procedure setUSBIE; inline;
  9095. property AD1IE : TBits_1 read getAD1IE write setAD1IE;
  9096. property CAN1IE : TBits_1 read getCAN1IE write setCAN1IE;
  9097. property CMP1IE : TBits_1 read getCMP1IE write setCMP1IE;
  9098. property CMP2IE : TBits_1 read getCMP2IE write setCMP2IE;
  9099. property CNIE : TBits_1 read getCNIE write setCNIE;
  9100. property DMA0IE : TBits_1 read getDMA0IE write setDMA0IE;
  9101. property DMA1IE : TBits_1 read getDMA1IE write setDMA1IE;
  9102. property DMA2IE : TBits_1 read getDMA2IE write setDMA2IE;
  9103. property DMA3IE : TBits_1 read getDMA3IE write setDMA3IE;
  9104. property ETHIE : TBits_1 read getETHIE write setETHIE;
  9105. property FCEIE : TBits_1 read getFCEIE write setFCEIE;
  9106. property FSCMIE : TBits_1 read getFSCMIE write setFSCMIE;
  9107. property I2C2ABIE : TBits_1 read getI2C2ABIE write setI2C2ABIE;
  9108. property I2C2AMIE : TBits_1 read getI2C2AMIE write setI2C2AMIE;
  9109. property I2C2ASIE : TBits_1 read getI2C2ASIE write setI2C2ASIE;
  9110. property I2C3ABIE : TBits_1 read getI2C3ABIE write setI2C3ABIE;
  9111. property I2C3AMIE : TBits_1 read getI2C3AMIE write setI2C3AMIE;
  9112. property I2C3ASIE : TBits_1 read getI2C3ASIE write setI2C3ASIE;
  9113. property I2C4BIE : TBits_1 read getI2C4BIE write setI2C4BIE;
  9114. property I2C4MIE : TBits_1 read getI2C4MIE write setI2C4MIE;
  9115. property I2C4SIE : TBits_1 read getI2C4SIE write setI2C4SIE;
  9116. property I2C5BIE : TBits_1 read getI2C5BIE write setI2C5BIE;
  9117. property I2C5MIE : TBits_1 read getI2C5MIE write setI2C5MIE;
  9118. property I2C5SIE : TBits_1 read getI2C5SIE write setI2C5SIE;
  9119. property IC1EIE : TBits_1 read getIC1EIE write setIC1EIE;
  9120. property IC2EIE : TBits_1 read getIC2EIE write setIC2EIE;
  9121. property IC3EIE : TBits_1 read getIC3EIE write setIC3EIE;
  9122. property PMPIE : TBits_1 read getPMPIE write setPMPIE;
  9123. property RTCCIE : TBits_1 read getRTCCIE write setRTCCIE;
  9124. property SPI2AEIE : TBits_1 read getSPI2AEIE write setSPI2AEIE;
  9125. property SPI2ARXIE : TBits_1 read getSPI2ARXIE write setSPI2ARXIE;
  9126. property SPI2ATXIE : TBits_1 read getSPI2ATXIE write setSPI2ATXIE;
  9127. property SPI2EIE : TBits_1 read getSPI2EIE write setSPI2EIE;
  9128. property SPI2RXIE : TBits_1 read getSPI2RXIE write setSPI2RXIE;
  9129. property SPI2TXIE : TBits_1 read getSPI2TXIE write setSPI2TXIE;
  9130. property SPI3AEIE : TBits_1 read getSPI3AEIE write setSPI3AEIE;
  9131. property SPI3ARXIE : TBits_1 read getSPI3ARXIE write setSPI3ARXIE;
  9132. property SPI3ATXIE : TBits_1 read getSPI3ATXIE write setSPI3ATXIE;
  9133. property SPI4EIE : TBits_1 read getSPI4EIE write setSPI4EIE;
  9134. property SPI4RXIE : TBits_1 read getSPI4RXIE write setSPI4RXIE;
  9135. property SPI4TXIE : TBits_1 read getSPI4TXIE write setSPI4TXIE;
  9136. property U2AEIE : TBits_1 read getU2AEIE write setU2AEIE;
  9137. property U2ARXIE : TBits_1 read getU2ARXIE write setU2ARXIE;
  9138. property U2ATXIE : TBits_1 read getU2ATXIE write setU2ATXIE;
  9139. property U2EIE : TBits_1 read getU2EIE write setU2EIE;
  9140. property U2RXIE : TBits_1 read getU2RXIE write setU2RXIE;
  9141. property U2TXIE : TBits_1 read getU2TXIE write setU2TXIE;
  9142. property U3AEIE : TBits_1 read getU3AEIE write setU3AEIE;
  9143. property U3ARXIE : TBits_1 read getU3ARXIE write setU3ARXIE;
  9144. property U3ATXIE : TBits_1 read getU3ATXIE write setU3ATXIE;
  9145. property U3EIE : TBits_1 read getU3EIE write setU3EIE;
  9146. property U3RXIE : TBits_1 read getU3RXIE write setU3RXIE;
  9147. property U3TXIE : TBits_1 read getU3TXIE write setU3TXIE;
  9148. property USBIE : TBits_1 read getUSBIE write setUSBIE;
  9149. property w : TBits_32 read getw write setw;
  9150. end;
  9151. TINT_IEC2 = record
  9152. private
  9153. function getIC4EIE : TBits_1; inline;
  9154. function getIC5EIE : TBits_1; inline;
  9155. function getPMPEIE : TBits_1; inline;
  9156. function getU1BEIE : TBits_1; inline;
  9157. function getU1BRXIE : TBits_1; inline;
  9158. function getU1BTXIE : TBits_1; inline;
  9159. function getU2BEIE : TBits_1; inline;
  9160. function getU2BRXIE : TBits_1; inline;
  9161. function getU2BTXIE : TBits_1; inline;
  9162. function getU3BEIE : TBits_1; inline;
  9163. function getU3BRXIE : TBits_1; inline;
  9164. function getU3BTXIE : TBits_1; inline;
  9165. function getU4EIE : TBits_1; inline;
  9166. function getU4RXIE : TBits_1; inline;
  9167. function getU4TXIE : TBits_1; inline;
  9168. function getU5EIE : TBits_1; inline;
  9169. function getU5RXIE : TBits_1; inline;
  9170. function getU5TXIE : TBits_1; inline;
  9171. function getU6EIE : TBits_1; inline;
  9172. function getU6RXIE : TBits_1; inline;
  9173. function getU6TXIE : TBits_1; inline;
  9174. function getw : TBits_32; inline;
  9175. procedure setIC4EIE(thebits : TBits_1); inline;
  9176. procedure setIC5EIE(thebits : TBits_1); inline;
  9177. procedure setPMPEIE(thebits : TBits_1); inline;
  9178. procedure setU1BEIE(thebits : TBits_1); inline;
  9179. procedure setU1BRXIE(thebits : TBits_1); inline;
  9180. procedure setU1BTXIE(thebits : TBits_1); inline;
  9181. procedure setU2BEIE(thebits : TBits_1); inline;
  9182. procedure setU2BRXIE(thebits : TBits_1); inline;
  9183. procedure setU2BTXIE(thebits : TBits_1); inline;
  9184. procedure setU3BEIE(thebits : TBits_1); inline;
  9185. procedure setU3BRXIE(thebits : TBits_1); inline;
  9186. procedure setU3BTXIE(thebits : TBits_1); inline;
  9187. procedure setU4EIE(thebits : TBits_1); inline;
  9188. procedure setU4RXIE(thebits : TBits_1); inline;
  9189. procedure setU4TXIE(thebits : TBits_1); inline;
  9190. procedure setU5EIE(thebits : TBits_1); inline;
  9191. procedure setU5RXIE(thebits : TBits_1); inline;
  9192. procedure setU5TXIE(thebits : TBits_1); inline;
  9193. procedure setU6EIE(thebits : TBits_1); inline;
  9194. procedure setU6RXIE(thebits : TBits_1); inline;
  9195. procedure setU6TXIE(thebits : TBits_1); inline;
  9196. procedure setw(thebits : TBits_32); inline;
  9197. public
  9198. procedure clearIC4EIE; inline;
  9199. procedure clearIC5EIE; inline;
  9200. procedure clearPMPEIE; inline;
  9201. procedure clearU1BEIE; inline;
  9202. procedure clearU1BRXIE; inline;
  9203. procedure clearU1BTXIE; inline;
  9204. procedure clearU2BEIE; inline;
  9205. procedure clearU2BRXIE; inline;
  9206. procedure clearU2BTXIE; inline;
  9207. procedure clearU3BEIE; inline;
  9208. procedure clearU3BRXIE; inline;
  9209. procedure clearU3BTXIE; inline;
  9210. procedure clearU4EIE; inline;
  9211. procedure clearU4RXIE; inline;
  9212. procedure clearU4TXIE; inline;
  9213. procedure clearU5EIE; inline;
  9214. procedure clearU5RXIE; inline;
  9215. procedure clearU5TXIE; inline;
  9216. procedure clearU6EIE; inline;
  9217. procedure clearU6RXIE; inline;
  9218. procedure clearU6TXIE; inline;
  9219. procedure setIC4EIE; inline;
  9220. procedure setIC5EIE; inline;
  9221. procedure setPMPEIE; inline;
  9222. procedure setU1BEIE; inline;
  9223. procedure setU1BRXIE; inline;
  9224. procedure setU1BTXIE; inline;
  9225. procedure setU2BEIE; inline;
  9226. procedure setU2BRXIE; inline;
  9227. procedure setU2BTXIE; inline;
  9228. procedure setU3BEIE; inline;
  9229. procedure setU3BRXIE; inline;
  9230. procedure setU3BTXIE; inline;
  9231. procedure setU4EIE; inline;
  9232. procedure setU4RXIE; inline;
  9233. procedure setU4TXIE; inline;
  9234. procedure setU5EIE; inline;
  9235. procedure setU5RXIE; inline;
  9236. procedure setU5TXIE; inline;
  9237. procedure setU6EIE; inline;
  9238. procedure setU6RXIE; inline;
  9239. procedure setU6TXIE; inline;
  9240. property IC4EIE : TBits_1 read getIC4EIE write setIC4EIE;
  9241. property IC5EIE : TBits_1 read getIC5EIE write setIC5EIE;
  9242. property PMPEIE : TBits_1 read getPMPEIE write setPMPEIE;
  9243. property U1BEIE : TBits_1 read getU1BEIE write setU1BEIE;
  9244. property U1BRXIE : TBits_1 read getU1BRXIE write setU1BRXIE;
  9245. property U1BTXIE : TBits_1 read getU1BTXIE write setU1BTXIE;
  9246. property U2BEIE : TBits_1 read getU2BEIE write setU2BEIE;
  9247. property U2BRXIE : TBits_1 read getU2BRXIE write setU2BRXIE;
  9248. property U2BTXIE : TBits_1 read getU2BTXIE write setU2BTXIE;
  9249. property U3BEIE : TBits_1 read getU3BEIE write setU3BEIE;
  9250. property U3BRXIE : TBits_1 read getU3BRXIE write setU3BRXIE;
  9251. property U3BTXIE : TBits_1 read getU3BTXIE write setU3BTXIE;
  9252. property U4EIE : TBits_1 read getU4EIE write setU4EIE;
  9253. property U4RXIE : TBits_1 read getU4RXIE write setU4RXIE;
  9254. property U4TXIE : TBits_1 read getU4TXIE write setU4TXIE;
  9255. property U5EIE : TBits_1 read getU5EIE write setU5EIE;
  9256. property U5RXIE : TBits_1 read getU5RXIE write setU5RXIE;
  9257. property U5TXIE : TBits_1 read getU5TXIE write setU5TXIE;
  9258. property U6EIE : TBits_1 read getU6EIE write setU6EIE;
  9259. property U6RXIE : TBits_1 read getU6RXIE write setU6RXIE;
  9260. property U6TXIE : TBits_1 read getU6TXIE write setU6TXIE;
  9261. property w : TBits_32 read getw write setw;
  9262. end;
  9263. TINT_IPC0 = record
  9264. private
  9265. function getCS0IP : TBits_3; inline;
  9266. function getCS0IS : TBits_2; inline;
  9267. function getCS1IP : TBits_3; inline;
  9268. function getCS1IS : TBits_2; inline;
  9269. function getCTIP : TBits_3; inline;
  9270. function getCTIS : TBits_2; inline;
  9271. function getINT0IP : TBits_3; inline;
  9272. function getINT0IS : TBits_2; inline;
  9273. function getw : TBits_32; inline;
  9274. procedure setCS0IP(thebits : TBits_3); inline;
  9275. procedure setCS0IS(thebits : TBits_2); inline;
  9276. procedure setCS1IP(thebits : TBits_3); inline;
  9277. procedure setCS1IS(thebits : TBits_2); inline;
  9278. procedure setCTIP(thebits : TBits_3); inline;
  9279. procedure setCTIS(thebits : TBits_2); inline;
  9280. procedure setINT0IP(thebits : TBits_3); inline;
  9281. procedure setINT0IS(thebits : TBits_2); inline;
  9282. procedure setw(thebits : TBits_32); inline;
  9283. public
  9284. property CS0IP : TBits_3 read getCS0IP write setCS0IP;
  9285. property CS0IS : TBits_2 read getCS0IS write setCS0IS;
  9286. property CS1IP : TBits_3 read getCS1IP write setCS1IP;
  9287. property CS1IS : TBits_2 read getCS1IS write setCS1IS;
  9288. property CTIP : TBits_3 read getCTIP write setCTIP;
  9289. property CTIS : TBits_2 read getCTIS write setCTIS;
  9290. property INT0IP : TBits_3 read getINT0IP write setINT0IP;
  9291. property INT0IS : TBits_2 read getINT0IS write setINT0IS;
  9292. property w : TBits_32 read getw write setw;
  9293. end;
  9294. TINT_IPC1 = record
  9295. private
  9296. function getIC1IP : TBits_3; inline;
  9297. function getIC1IS : TBits_2; inline;
  9298. function getINT1IP : TBits_3; inline;
  9299. function getINT1IS : TBits_2; inline;
  9300. function getOC1IP : TBits_3; inline;
  9301. function getOC1IS : TBits_2; inline;
  9302. function getT1IP : TBits_3; inline;
  9303. function getT1IS : TBits_2; inline;
  9304. function getw : TBits_32; inline;
  9305. procedure setIC1IP(thebits : TBits_3); inline;
  9306. procedure setIC1IS(thebits : TBits_2); inline;
  9307. procedure setINT1IP(thebits : TBits_3); inline;
  9308. procedure setINT1IS(thebits : TBits_2); inline;
  9309. procedure setOC1IP(thebits : TBits_3); inline;
  9310. procedure setOC1IS(thebits : TBits_2); inline;
  9311. procedure setT1IP(thebits : TBits_3); inline;
  9312. procedure setT1IS(thebits : TBits_2); inline;
  9313. procedure setw(thebits : TBits_32); inline;
  9314. public
  9315. property IC1IP : TBits_3 read getIC1IP write setIC1IP;
  9316. property IC1IS : TBits_2 read getIC1IS write setIC1IS;
  9317. property INT1IP : TBits_3 read getINT1IP write setINT1IP;
  9318. property INT1IS : TBits_2 read getINT1IS write setINT1IS;
  9319. property OC1IP : TBits_3 read getOC1IP write setOC1IP;
  9320. property OC1IS : TBits_2 read getOC1IS write setOC1IS;
  9321. property T1IP : TBits_3 read getT1IP write setT1IP;
  9322. property T1IS : TBits_2 read getT1IS write setT1IS;
  9323. property w : TBits_32 read getw write setw;
  9324. end;
  9325. TINT_IPC2 = record
  9326. private
  9327. function getIC2IP : TBits_3; inline;
  9328. function getIC2IS : TBits_2; inline;
  9329. function getINT2IP : TBits_3; inline;
  9330. function getINT2IS : TBits_2; inline;
  9331. function getOC2IP : TBits_3; inline;
  9332. function getOC2IS : TBits_2; inline;
  9333. function getT2IP : TBits_3; inline;
  9334. function getT2IS : TBits_2; inline;
  9335. function getw : TBits_32; inline;
  9336. procedure setIC2IP(thebits : TBits_3); inline;
  9337. procedure setIC2IS(thebits : TBits_2); inline;
  9338. procedure setINT2IP(thebits : TBits_3); inline;
  9339. procedure setINT2IS(thebits : TBits_2); inline;
  9340. procedure setOC2IP(thebits : TBits_3); inline;
  9341. procedure setOC2IS(thebits : TBits_2); inline;
  9342. procedure setT2IP(thebits : TBits_3); inline;
  9343. procedure setT2IS(thebits : TBits_2); inline;
  9344. procedure setw(thebits : TBits_32); inline;
  9345. public
  9346. property IC2IP : TBits_3 read getIC2IP write setIC2IP;
  9347. property IC2IS : TBits_2 read getIC2IS write setIC2IS;
  9348. property INT2IP : TBits_3 read getINT2IP write setINT2IP;
  9349. property INT2IS : TBits_2 read getINT2IS write setINT2IS;
  9350. property OC2IP : TBits_3 read getOC2IP write setOC2IP;
  9351. property OC2IS : TBits_2 read getOC2IS write setOC2IS;
  9352. property T2IP : TBits_3 read getT2IP write setT2IP;
  9353. property T2IS : TBits_2 read getT2IS write setT2IS;
  9354. property w : TBits_32 read getw write setw;
  9355. end;
  9356. TINT_IPC3 = record
  9357. private
  9358. function getIC3IP : TBits_3; inline;
  9359. function getIC3IS : TBits_2; inline;
  9360. function getINT3IP : TBits_3; inline;
  9361. function getINT3IS : TBits_2; inline;
  9362. function getOC3IP : TBits_3; inline;
  9363. function getOC3IS : TBits_2; inline;
  9364. function getT3IP : TBits_3; inline;
  9365. function getT3IS : TBits_2; inline;
  9366. function getw : TBits_32; inline;
  9367. procedure setIC3IP(thebits : TBits_3); inline;
  9368. procedure setIC3IS(thebits : TBits_2); inline;
  9369. procedure setINT3IP(thebits : TBits_3); inline;
  9370. procedure setINT3IS(thebits : TBits_2); inline;
  9371. procedure setOC3IP(thebits : TBits_3); inline;
  9372. procedure setOC3IS(thebits : TBits_2); inline;
  9373. procedure setT3IP(thebits : TBits_3); inline;
  9374. procedure setT3IS(thebits : TBits_2); inline;
  9375. procedure setw(thebits : TBits_32); inline;
  9376. public
  9377. property IC3IP : TBits_3 read getIC3IP write setIC3IP;
  9378. property IC3IS : TBits_2 read getIC3IS write setIC3IS;
  9379. property INT3IP : TBits_3 read getINT3IP write setINT3IP;
  9380. property INT3IS : TBits_2 read getINT3IS write setINT3IS;
  9381. property OC3IP : TBits_3 read getOC3IP write setOC3IP;
  9382. property OC3IS : TBits_2 read getOC3IS write setOC3IS;
  9383. property T3IP : TBits_3 read getT3IP write setT3IP;
  9384. property T3IS : TBits_2 read getT3IS write setT3IS;
  9385. property w : TBits_32 read getw write setw;
  9386. end;
  9387. TINT_IPC4 = record
  9388. private
  9389. function getIC4IP : TBits_3; inline;
  9390. function getIC4IS : TBits_2; inline;
  9391. function getINT4IP : TBits_3; inline;
  9392. function getINT4IS : TBits_2; inline;
  9393. function getOC4IP : TBits_3; inline;
  9394. function getOC4IS : TBits_2; inline;
  9395. function getT4IP : TBits_3; inline;
  9396. function getT4IS : TBits_2; inline;
  9397. function getw : TBits_32; inline;
  9398. procedure setIC4IP(thebits : TBits_3); inline;
  9399. procedure setIC4IS(thebits : TBits_2); inline;
  9400. procedure setINT4IP(thebits : TBits_3); inline;
  9401. procedure setINT4IS(thebits : TBits_2); inline;
  9402. procedure setOC4IP(thebits : TBits_3); inline;
  9403. procedure setOC4IS(thebits : TBits_2); inline;
  9404. procedure setT4IP(thebits : TBits_3); inline;
  9405. procedure setT4IS(thebits : TBits_2); inline;
  9406. procedure setw(thebits : TBits_32); inline;
  9407. public
  9408. property IC4IP : TBits_3 read getIC4IP write setIC4IP;
  9409. property IC4IS : TBits_2 read getIC4IS write setIC4IS;
  9410. property INT4IP : TBits_3 read getINT4IP write setINT4IP;
  9411. property INT4IS : TBits_2 read getINT4IS write setINT4IS;
  9412. property OC4IP : TBits_3 read getOC4IP write setOC4IP;
  9413. property OC4IS : TBits_2 read getOC4IS write setOC4IS;
  9414. property T4IP : TBits_3 read getT4IP write setT4IP;
  9415. property T4IS : TBits_2 read getT4IS write setT4IS;
  9416. property w : TBits_32 read getw write setw;
  9417. end;
  9418. TINT_IPC5 = record
  9419. private
  9420. function getIC5IP : TBits_3; inline;
  9421. function getIC5IS : TBits_2; inline;
  9422. function getOC5IP : TBits_3; inline;
  9423. function getOC5IS : TBits_2; inline;
  9424. function getT5IP : TBits_3; inline;
  9425. function getT5IS : TBits_2; inline;
  9426. function getw : TBits_32; inline;
  9427. procedure setIC5IP(thebits : TBits_3); inline;
  9428. procedure setIC5IS(thebits : TBits_2); inline;
  9429. procedure setOC5IP(thebits : TBits_3); inline;
  9430. procedure setOC5IS(thebits : TBits_2); inline;
  9431. procedure setT5IP(thebits : TBits_3); inline;
  9432. procedure setT5IS(thebits : TBits_2); inline;
  9433. procedure setw(thebits : TBits_32); inline;
  9434. public
  9435. property IC5IP : TBits_3 read getIC5IP write setIC5IP;
  9436. property IC5IS : TBits_2 read getIC5IS write setIC5IS;
  9437. property OC5IP : TBits_3 read getOC5IP write setOC5IP;
  9438. property OC5IS : TBits_2 read getOC5IS write setOC5IS;
  9439. property T5IP : TBits_3 read getT5IP write setT5IP;
  9440. property T5IS : TBits_2 read getT5IS write setT5IS;
  9441. property w : TBits_32 read getw write setw;
  9442. end;
  9443. TINT_IPC6 = record
  9444. private
  9445. function getAD1IP : TBits_3; inline;
  9446. function getAD1IS : TBits_2; inline;
  9447. function getCNIP : TBits_3; inline;
  9448. function getCNIS : TBits_2; inline;
  9449. function getI2C1AIP : TBits_3; inline;
  9450. function getI2C1AIS : TBits_2; inline;
  9451. function getI2C1IP : TBits_3; inline;
  9452. function getI2C1IS : TBits_2; inline;
  9453. function getI2C3IP : TBits_3; inline;
  9454. function getI2C3IS : TBits_2; inline;
  9455. function getSPI1AIP : TBits_3; inline;
  9456. function getSPI1AIS : TBits_2; inline;
  9457. function getSPI3IP : TBits_3; inline;
  9458. function getSPI3IS : TBits_2; inline;
  9459. function getU1AIP : TBits_3; inline;
  9460. function getU1AIS : TBits_2; inline;
  9461. function getU1IP : TBits_3; inline;
  9462. function getU1IS : TBits_2; inline;
  9463. function getw : TBits_32; inline;
  9464. procedure setAD1IP(thebits : TBits_3); inline;
  9465. procedure setAD1IS(thebits : TBits_2); inline;
  9466. procedure setCNIP(thebits : TBits_3); inline;
  9467. procedure setCNIS(thebits : TBits_2); inline;
  9468. procedure setI2C1AIP(thebits : TBits_3); inline;
  9469. procedure setI2C1AIS(thebits : TBits_2); inline;
  9470. procedure setI2C1IP(thebits : TBits_3); inline;
  9471. procedure setI2C1IS(thebits : TBits_2); inline;
  9472. procedure setI2C3IP(thebits : TBits_3); inline;
  9473. procedure setI2C3IS(thebits : TBits_2); inline;
  9474. procedure setSPI1AIP(thebits : TBits_3); inline;
  9475. procedure setSPI1AIS(thebits : TBits_2); inline;
  9476. procedure setSPI3IP(thebits : TBits_3); inline;
  9477. procedure setSPI3IS(thebits : TBits_2); inline;
  9478. procedure setU1AIP(thebits : TBits_3); inline;
  9479. procedure setU1AIS(thebits : TBits_2); inline;
  9480. procedure setU1IP(thebits : TBits_3); inline;
  9481. procedure setU1IS(thebits : TBits_2); inline;
  9482. procedure setw(thebits : TBits_32); inline;
  9483. public
  9484. property AD1IP : TBits_3 read getAD1IP write setAD1IP;
  9485. property AD1IS : TBits_2 read getAD1IS write setAD1IS;
  9486. property CNIP : TBits_3 read getCNIP write setCNIP;
  9487. property CNIS : TBits_2 read getCNIS write setCNIS;
  9488. property I2C1AIP : TBits_3 read getI2C1AIP write setI2C1AIP;
  9489. property I2C1AIS : TBits_2 read getI2C1AIS write setI2C1AIS;
  9490. property I2C1IP : TBits_3 read getI2C1IP write setI2C1IP;
  9491. property I2C1IS : TBits_2 read getI2C1IS write setI2C1IS;
  9492. property I2C3IP : TBits_3 read getI2C3IP write setI2C3IP;
  9493. property I2C3IS : TBits_2 read getI2C3IS write setI2C3IS;
  9494. property SPI1AIP : TBits_3 read getSPI1AIP write setSPI1AIP;
  9495. property SPI1AIS : TBits_2 read getSPI1AIS write setSPI1AIS;
  9496. property SPI3IP : TBits_3 read getSPI3IP write setSPI3IP;
  9497. property SPI3IS : TBits_2 read getSPI3IS write setSPI3IS;
  9498. property U1AIP : TBits_3 read getU1AIP write setU1AIP;
  9499. property U1AIS : TBits_2 read getU1AIS write setU1AIS;
  9500. property U1IP : TBits_3 read getU1IP write setU1IP;
  9501. property U1IS : TBits_2 read getU1IS write setU1IS;
  9502. property w : TBits_32 read getw write setw;
  9503. end;
  9504. TINT_IPC7 = record
  9505. private
  9506. function getCMP1IP : TBits_3; inline;
  9507. function getCMP1IS : TBits_2; inline;
  9508. function getCMP2IP : TBits_3; inline;
  9509. function getCMP2IS : TBits_2; inline;
  9510. function getI2C2AIP : TBits_3; inline;
  9511. function getI2C2AIS : TBits_2; inline;
  9512. function getI2C4IP : TBits_3; inline;
  9513. function getI2C4IS : TBits_2; inline;
  9514. function getPMPIP : TBits_3; inline;
  9515. function getPMPIS : TBits_2; inline;
  9516. function getSPI2AIP : TBits_3; inline;
  9517. function getSPI2AIS : TBits_2; inline;
  9518. function getSPI2IP : TBits_3; inline;
  9519. function getSPI2IS : TBits_2; inline;
  9520. function getU2AIP : TBits_3; inline;
  9521. function getU2AIS : TBits_2; inline;
  9522. function getU3IP : TBits_3; inline;
  9523. function getU3IS : TBits_2; inline;
  9524. function getw : TBits_32; inline;
  9525. procedure setCMP1IP(thebits : TBits_3); inline;
  9526. procedure setCMP1IS(thebits : TBits_2); inline;
  9527. procedure setCMP2IP(thebits : TBits_3); inline;
  9528. procedure setCMP2IS(thebits : TBits_2); inline;
  9529. procedure setI2C2AIP(thebits : TBits_3); inline;
  9530. procedure setI2C2AIS(thebits : TBits_2); inline;
  9531. procedure setI2C4IP(thebits : TBits_3); inline;
  9532. procedure setI2C4IS(thebits : TBits_2); inline;
  9533. procedure setPMPIP(thebits : TBits_3); inline;
  9534. procedure setPMPIS(thebits : TBits_2); inline;
  9535. procedure setSPI2AIP(thebits : TBits_3); inline;
  9536. procedure setSPI2AIS(thebits : TBits_2); inline;
  9537. procedure setSPI2IP(thebits : TBits_3); inline;
  9538. procedure setSPI2IS(thebits : TBits_2); inline;
  9539. procedure setU2AIP(thebits : TBits_3); inline;
  9540. procedure setU2AIS(thebits : TBits_2); inline;
  9541. procedure setU3IP(thebits : TBits_3); inline;
  9542. procedure setU3IS(thebits : TBits_2); inline;
  9543. procedure setw(thebits : TBits_32); inline;
  9544. public
  9545. property CMP1IP : TBits_3 read getCMP1IP write setCMP1IP;
  9546. property CMP1IS : TBits_2 read getCMP1IS write setCMP1IS;
  9547. property CMP2IP : TBits_3 read getCMP2IP write setCMP2IP;
  9548. property CMP2IS : TBits_2 read getCMP2IS write setCMP2IS;
  9549. property I2C2AIP : TBits_3 read getI2C2AIP write setI2C2AIP;
  9550. property I2C2AIS : TBits_2 read getI2C2AIS write setI2C2AIS;
  9551. property I2C4IP : TBits_3 read getI2C4IP write setI2C4IP;
  9552. property I2C4IS : TBits_2 read getI2C4IS write setI2C4IS;
  9553. property PMPIP : TBits_3 read getPMPIP write setPMPIP;
  9554. property PMPIS : TBits_2 read getPMPIS write setPMPIS;
  9555. property SPI2AIP : TBits_3 read getSPI2AIP write setSPI2AIP;
  9556. property SPI2AIS : TBits_2 read getSPI2AIS write setSPI2AIS;
  9557. property SPI2IP : TBits_3 read getSPI2IP write setSPI2IP;
  9558. property SPI2IS : TBits_2 read getSPI2IS write setSPI2IS;
  9559. property U2AIP : TBits_3 read getU2AIP write setU2AIP;
  9560. property U2AIS : TBits_2 read getU2AIS write setU2AIS;
  9561. property U3IP : TBits_3 read getU3IP write setU3IP;
  9562. property U3IS : TBits_2 read getU3IS write setU3IS;
  9563. property w : TBits_32 read getw write setw;
  9564. end;
  9565. TINT_IPC8 = record
  9566. private
  9567. function getFSCMIP : TBits_3; inline;
  9568. function getFSCMIS : TBits_2; inline;
  9569. function getI2C3AIP : TBits_3; inline;
  9570. function getI2C3AIS : TBits_2; inline;
  9571. function getI2C5IP : TBits_3; inline;
  9572. function getI2C5IS : TBits_2; inline;
  9573. function getRTCCIP : TBits_3; inline;
  9574. function getRTCCIS : TBits_2; inline;
  9575. function getSPI3AIP : TBits_3; inline;
  9576. function getSPI3AIS : TBits_2; inline;
  9577. function getSPI4IP : TBits_3; inline;
  9578. function getSPI4IS : TBits_2; inline;
  9579. function getU2IP : TBits_3; inline;
  9580. function getU2IS : TBits_2; inline;
  9581. function getU3AIP : TBits_3; inline;
  9582. function getU3AIS : TBits_2; inline;
  9583. function getw : TBits_32; inline;
  9584. procedure setFSCMIP(thebits : TBits_3); inline;
  9585. procedure setFSCMIS(thebits : TBits_2); inline;
  9586. procedure setI2C3AIP(thebits : TBits_3); inline;
  9587. procedure setI2C3AIS(thebits : TBits_2); inline;
  9588. procedure setI2C5IP(thebits : TBits_3); inline;
  9589. procedure setI2C5IS(thebits : TBits_2); inline;
  9590. procedure setRTCCIP(thebits : TBits_3); inline;
  9591. procedure setRTCCIS(thebits : TBits_2); inline;
  9592. procedure setSPI3AIP(thebits : TBits_3); inline;
  9593. procedure setSPI3AIS(thebits : TBits_2); inline;
  9594. procedure setSPI4IP(thebits : TBits_3); inline;
  9595. procedure setSPI4IS(thebits : TBits_2); inline;
  9596. procedure setU2IP(thebits : TBits_3); inline;
  9597. procedure setU2IS(thebits : TBits_2); inline;
  9598. procedure setU3AIP(thebits : TBits_3); inline;
  9599. procedure setU3AIS(thebits : TBits_2); inline;
  9600. procedure setw(thebits : TBits_32); inline;
  9601. public
  9602. property FSCMIP : TBits_3 read getFSCMIP write setFSCMIP;
  9603. property FSCMIS : TBits_2 read getFSCMIS write setFSCMIS;
  9604. property I2C3AIP : TBits_3 read getI2C3AIP write setI2C3AIP;
  9605. property I2C3AIS : TBits_2 read getI2C3AIS write setI2C3AIS;
  9606. property I2C5IP : TBits_3 read getI2C5IP write setI2C5IP;
  9607. property I2C5IS : TBits_2 read getI2C5IS write setI2C5IS;
  9608. property RTCCIP : TBits_3 read getRTCCIP write setRTCCIP;
  9609. property RTCCIS : TBits_2 read getRTCCIS write setRTCCIS;
  9610. property SPI3AIP : TBits_3 read getSPI3AIP write setSPI3AIP;
  9611. property SPI3AIS : TBits_2 read getSPI3AIS write setSPI3AIS;
  9612. property SPI4IP : TBits_3 read getSPI4IP write setSPI4IP;
  9613. property SPI4IS : TBits_2 read getSPI4IS write setSPI4IS;
  9614. property U2IP : TBits_3 read getU2IP write setU2IP;
  9615. property U2IS : TBits_2 read getU2IS write setU2IS;
  9616. property U3AIP : TBits_3 read getU3AIP write setU3AIP;
  9617. property U3AIS : TBits_2 read getU3AIS write setU3AIS;
  9618. property w : TBits_32 read getw write setw;
  9619. end;
  9620. TINT_IPC9 = record
  9621. private
  9622. function getDMA0IP : TBits_3; inline;
  9623. function getDMA0IS : TBits_2; inline;
  9624. function getDMA1IP : TBits_3; inline;
  9625. function getDMA1IS : TBits_2; inline;
  9626. function getDMA2IP : TBits_3; inline;
  9627. function getDMA2IS : TBits_2; inline;
  9628. function getDMA3IP : TBits_3; inline;
  9629. function getDMA3IS : TBits_2; inline;
  9630. function getw : TBits_32; inline;
  9631. procedure setDMA0IP(thebits : TBits_3); inline;
  9632. procedure setDMA0IS(thebits : TBits_2); inline;
  9633. procedure setDMA1IP(thebits : TBits_3); inline;
  9634. procedure setDMA1IS(thebits : TBits_2); inline;
  9635. procedure setDMA2IP(thebits : TBits_3); inline;
  9636. procedure setDMA2IS(thebits : TBits_2); inline;
  9637. procedure setDMA3IP(thebits : TBits_3); inline;
  9638. procedure setDMA3IS(thebits : TBits_2); inline;
  9639. procedure setw(thebits : TBits_32); inline;
  9640. public
  9641. property DMA0IP : TBits_3 read getDMA0IP write setDMA0IP;
  9642. property DMA0IS : TBits_2 read getDMA0IS write setDMA0IS;
  9643. property DMA1IP : TBits_3 read getDMA1IP write setDMA1IP;
  9644. property DMA1IS : TBits_2 read getDMA1IS write setDMA1IS;
  9645. property DMA2IP : TBits_3 read getDMA2IP write setDMA2IP;
  9646. property DMA2IS : TBits_2 read getDMA2IS write setDMA2IS;
  9647. property DMA3IP : TBits_3 read getDMA3IP write setDMA3IP;
  9648. property DMA3IS : TBits_2 read getDMA3IS write setDMA3IS;
  9649. property w : TBits_32 read getw write setw;
  9650. end;
  9651. TINT_IPC11 = record
  9652. private
  9653. function getCAN1IP : TBits_3; inline;
  9654. function getCAN1IS : TBits_2; inline;
  9655. function getFCEIP : TBits_3; inline;
  9656. function getFCEIS : TBits_2; inline;
  9657. function getUSBIP : TBits_3; inline;
  9658. function getUSBIS : TBits_2; inline;
  9659. function getw : TBits_32; inline;
  9660. procedure setCAN1IP(thebits : TBits_3); inline;
  9661. procedure setCAN1IS(thebits : TBits_2); inline;
  9662. procedure setFCEIP(thebits : TBits_3); inline;
  9663. procedure setFCEIS(thebits : TBits_2); inline;
  9664. procedure setUSBIP(thebits : TBits_3); inline;
  9665. procedure setUSBIS(thebits : TBits_2); inline;
  9666. procedure setw(thebits : TBits_32); inline;
  9667. public
  9668. property CAN1IP : TBits_3 read getCAN1IP write setCAN1IP;
  9669. property CAN1IS : TBits_2 read getCAN1IS write setCAN1IS;
  9670. property FCEIP : TBits_3 read getFCEIP write setFCEIP;
  9671. property FCEIS : TBits_2 read getFCEIS write setFCEIS;
  9672. property USBIP : TBits_3 read getUSBIP write setUSBIP;
  9673. property USBIS : TBits_2 read getUSBIS write setUSBIS;
  9674. property w : TBits_32 read getw write setw;
  9675. end;
  9676. TINT_IPC12 = record
  9677. private
  9678. function getETHIP : TBits_3; inline;
  9679. function getETHIS : TBits_2; inline;
  9680. function getU1BIP : TBits_3; inline;
  9681. function getU1BIS : TBits_2; inline;
  9682. function getU2BIP : TBits_3; inline;
  9683. function getU2BIS : TBits_2; inline;
  9684. function getU3BIP : TBits_3; inline;
  9685. function getU3BIS : TBits_2; inline;
  9686. function getU4IP : TBits_3; inline;
  9687. function getU4IS : TBits_2; inline;
  9688. function getU5IP : TBits_3; inline;
  9689. function getU5IS : TBits_2; inline;
  9690. function getU6IP : TBits_3; inline;
  9691. function getU6IS : TBits_2; inline;
  9692. function getw : TBits_32; inline;
  9693. procedure setETHIP(thebits : TBits_3); inline;
  9694. procedure setETHIS(thebits : TBits_2); inline;
  9695. procedure setU1BIP(thebits : TBits_3); inline;
  9696. procedure setU1BIS(thebits : TBits_2); inline;
  9697. procedure setU2BIP(thebits : TBits_3); inline;
  9698. procedure setU2BIS(thebits : TBits_2); inline;
  9699. procedure setU3BIP(thebits : TBits_3); inline;
  9700. procedure setU3BIS(thebits : TBits_2); inline;
  9701. procedure setU4IP(thebits : TBits_3); inline;
  9702. procedure setU4IS(thebits : TBits_2); inline;
  9703. procedure setU5IP(thebits : TBits_3); inline;
  9704. procedure setU5IS(thebits : TBits_2); inline;
  9705. procedure setU6IP(thebits : TBits_3); inline;
  9706. procedure setU6IS(thebits : TBits_2); inline;
  9707. procedure setw(thebits : TBits_32); inline;
  9708. public
  9709. property ETHIP : TBits_3 read getETHIP write setETHIP;
  9710. property ETHIS : TBits_2 read getETHIS write setETHIS;
  9711. property U1BIP : TBits_3 read getU1BIP write setU1BIP;
  9712. property U1BIS : TBits_2 read getU1BIS write setU1BIS;
  9713. property U2BIP : TBits_3 read getU2BIP write setU2BIP;
  9714. property U2BIS : TBits_2 read getU2BIS write setU2BIS;
  9715. property U3BIP : TBits_3 read getU3BIP write setU3BIP;
  9716. property U3BIS : TBits_2 read getU3BIS write setU3BIS;
  9717. property U4IP : TBits_3 read getU4IP write setU4IP;
  9718. property U4IS : TBits_2 read getU4IS write setU4IS;
  9719. property U5IP : TBits_3 read getU5IP write setU5IP;
  9720. property U5IS : TBits_2 read getU5IS write setU5IS;
  9721. property U6IP : TBits_3 read getU6IP write setU6IP;
  9722. property U6IS : TBits_2 read getU6IS write setU6IS;
  9723. property w : TBits_32 read getw write setw;
  9724. end;
  9725. type
  9726. TINTRegisters = record
  9727. INTCONbits : TINT_INTCON;
  9728. INTCON : longWord;
  9729. INTCONCLR : longWord;
  9730. INTCONSET : longWord;
  9731. INTCONINV : longWord;
  9732. INTSTAT : longWord;
  9733. IPTMR : longWord;
  9734. IPTMRCLR : longWord;
  9735. IPTMRSET : longWord;
  9736. IPTMRINV : longWord;
  9737. IFS0bits : TINT_IFS0;
  9738. IFS0 : longWord;
  9739. IFS0CLR : longWord;
  9740. IFS0SET : longWord;
  9741. IFS0INV : longWord;
  9742. IFS1bits : TINT_IFS1;
  9743. IFS1 : longWord;
  9744. IFS1CLR : longWord;
  9745. IFS1SET : longWord;
  9746. IFS1INV : longWord;
  9747. IFS2bits : TINT_IFS2;
  9748. IFS2 : longWord;
  9749. IFS2CLR : longWord;
  9750. IFS2SET : longWord;
  9751. IFS2INV : longWord;
  9752. IEC0bits : TINT_IEC0;
  9753. IEC0 : longWord;
  9754. IEC0CLR : longWord;
  9755. IEC0SET : longWord;
  9756. IEC0INV : longWord;
  9757. IEC1bits : TINT_IEC1;
  9758. IEC1 : longWord;
  9759. IEC1CLR : longWord;
  9760. IEC1SET : longWord;
  9761. IEC1INV : longWord;
  9762. IEC2bits : TINT_IEC2;
  9763. IEC2 : longWord;
  9764. IEC2CLR : longWord;
  9765. IEC2SET : longWord;
  9766. IEC2INV : longWord;
  9767. IPC0bits : TINT_IPC0;
  9768. IPC0 : longWord;
  9769. IPC0CLR : longWord;
  9770. IPC0SET : longWord;
  9771. IPC0INV : longWord;
  9772. IPC1bits : TINT_IPC1;
  9773. IPC1 : longWord;
  9774. IPC1CLR : longWord;
  9775. IPC1SET : longWord;
  9776. IPC1INV : longWord;
  9777. IPC2bits : TINT_IPC2;
  9778. IPC2 : longWord;
  9779. IPC2CLR : longWord;
  9780. IPC2SET : longWord;
  9781. IPC2INV : longWord;
  9782. IPC3bits : TINT_IPC3;
  9783. IPC3 : longWord;
  9784. IPC3CLR : longWord;
  9785. IPC3SET : longWord;
  9786. IPC3INV : longWord;
  9787. IPC4bits : TINT_IPC4;
  9788. IPC4 : longWord;
  9789. IPC4CLR : longWord;
  9790. IPC4SET : longWord;
  9791. IPC4INV : longWord;
  9792. IPC5bits : TINT_IPC5;
  9793. IPC5 : longWord;
  9794. IPC5CLR : longWord;
  9795. IPC5SET : longWord;
  9796. IPC5INV : longWord;
  9797. IPC6bits : TINT_IPC6;
  9798. IPC6 : longWord;
  9799. IPC6CLR : longWord;
  9800. IPC6SET : longWord;
  9801. IPC6INV : longWord;
  9802. IPC7bits : TINT_IPC7;
  9803. IPC7 : longWord;
  9804. IPC7CLR : longWord;
  9805. IPC7SET : longWord;
  9806. IPC7INV : longWord;
  9807. IPC8bits : TINT_IPC8;
  9808. IPC8 : longWord;
  9809. IPC8CLR : longWord;
  9810. IPC8SET : longWord;
  9811. IPC8INV : longWord;
  9812. IPC9bits : TINT_IPC9;
  9813. IPC9 : longWord;
  9814. IPC9CLR : longWord;
  9815. IPC9SET : longWord;
  9816. IPC9INV : longWord;
  9817. IPC10 : longWord;
  9818. IPC10CLR : longWord;
  9819. IPC10SET : longWord;
  9820. IPC10INV : longWord;
  9821. IPC11bits : TINT_IPC11;
  9822. IPC11 : longWord;
  9823. IPC11CLR : longWord;
  9824. IPC11SET : longWord;
  9825. IPC11INV : longWord;
  9826. IPC12bits : TINT_IPC12;
  9827. IPC12 : longWord;
  9828. IPC12CLR : longWord;
  9829. IPC12SET : longWord;
  9830. IPC12INV : longWord;
  9831. end;
  9832. TBMX_BMXCON = record
  9833. private
  9834. function getBMXARB : TBits_3; inline;
  9835. function getBMXCHEDMA : TBits_1; inline;
  9836. function getBMXERRDMA : TBits_1; inline;
  9837. function getBMXERRDS : TBits_1; inline;
  9838. function getBMXERRICD : TBits_1; inline;
  9839. function getBMXERRIS : TBits_1; inline;
  9840. function getBMXERRIXI : TBits_1; inline;
  9841. function getBMXWSDRM : TBits_1; inline;
  9842. function getw : TBits_32; inline;
  9843. procedure setBMXARB(thebits : TBits_3); inline;
  9844. procedure setBMXCHEDMA(thebits : TBits_1); inline;
  9845. procedure setBMXERRDMA(thebits : TBits_1); inline;
  9846. procedure setBMXERRDS(thebits : TBits_1); inline;
  9847. procedure setBMXERRICD(thebits : TBits_1); inline;
  9848. procedure setBMXERRIS(thebits : TBits_1); inline;
  9849. procedure setBMXERRIXI(thebits : TBits_1); inline;
  9850. procedure setBMXWSDRM(thebits : TBits_1); inline;
  9851. procedure setw(thebits : TBits_32); inline;
  9852. public
  9853. procedure clearBMXCHEDMA; inline;
  9854. procedure clearBMXERRDMA; inline;
  9855. procedure clearBMXERRDS; inline;
  9856. procedure clearBMXERRICD; inline;
  9857. procedure clearBMXERRIS; inline;
  9858. procedure clearBMXERRIXI; inline;
  9859. procedure clearBMXWSDRM; inline;
  9860. procedure setBMXCHEDMA; inline;
  9861. procedure setBMXERRDMA; inline;
  9862. procedure setBMXERRDS; inline;
  9863. procedure setBMXERRICD; inline;
  9864. procedure setBMXERRIS; inline;
  9865. procedure setBMXERRIXI; inline;
  9866. procedure setBMXWSDRM; inline;
  9867. property BMXARB : TBits_3 read getBMXARB write setBMXARB;
  9868. property BMXCHEDMA : TBits_1 read getBMXCHEDMA write setBMXCHEDMA;
  9869. property BMXERRDMA : TBits_1 read getBMXERRDMA write setBMXERRDMA;
  9870. property BMXERRDS : TBits_1 read getBMXERRDS write setBMXERRDS;
  9871. property BMXERRICD : TBits_1 read getBMXERRICD write setBMXERRICD;
  9872. property BMXERRIS : TBits_1 read getBMXERRIS write setBMXERRIS;
  9873. property BMXERRIXI : TBits_1 read getBMXERRIXI write setBMXERRIXI;
  9874. property BMXWSDRM : TBits_1 read getBMXWSDRM write setBMXWSDRM;
  9875. property w : TBits_32 read getw write setw;
  9876. end;
  9877. type
  9878. TBMXRegisters = record
  9879. BMXCONbits : TBMX_BMXCON;
  9880. BMXCON : longWord;
  9881. BMXCONCLR : longWord;
  9882. BMXCONSET : longWord;
  9883. BMXCONINV : longWord;
  9884. BMXDKPBA : longWord;
  9885. BMXDKPBACLR : longWord;
  9886. BMXDKPBASET : longWord;
  9887. BMXDKPBAINV : longWord;
  9888. BMXDUDBA : longWord;
  9889. BMXDUDBACLR : longWord;
  9890. BMXDUDBASET : longWord;
  9891. BMXDUDBAINV : longWord;
  9892. BMXDUPBA : longWord;
  9893. BMXDUPBACLR : longWord;
  9894. BMXDUPBASET : longWord;
  9895. BMXDUPBAINV : longWord;
  9896. BMXDRMSZ : longWord;
  9897. BMXPUPBA : longWord;
  9898. BMXPUPBACLR : longWord;
  9899. BMXPUPBASET : longWord;
  9900. BMXPUPBAINV : longWord;
  9901. BMXPFMSZ : longWord;
  9902. BMXBOOTSZ : longWord;
  9903. end;
  9904. TDMAC_DMACON = record
  9905. private
  9906. function getDMABUSY : TBits_1; inline;
  9907. function getON : TBits_1; inline;
  9908. function getSUSPEND : TBits_1; inline;
  9909. function getw : TBits_32; inline;
  9910. procedure setDMABUSY(thebits : TBits_1); inline;
  9911. procedure setON(thebits : TBits_1); inline;
  9912. procedure setSUSPEND(thebits : TBits_1); inline;
  9913. procedure setw(thebits : TBits_32); inline;
  9914. public
  9915. procedure clearDMABUSY; inline;
  9916. procedure clearON; inline;
  9917. procedure clearSUSPEND; inline;
  9918. procedure setDMABUSY; inline;
  9919. procedure setON; inline;
  9920. procedure setSUSPEND; inline;
  9921. property DMABUSY : TBits_1 read getDMABUSY write setDMABUSY;
  9922. property ON : TBits_1 read getON write setON;
  9923. property SUSPEND : TBits_1 read getSUSPEND write setSUSPEND;
  9924. property w : TBits_32 read getw write setw;
  9925. end;
  9926. TDMAC_DMASTAT = record
  9927. private
  9928. function getDMACH : TBits_3; inline;
  9929. function getRDWR : TBits_1; inline;
  9930. function getw : TBits_32; inline;
  9931. procedure setDMACH(thebits : TBits_3); inline;
  9932. procedure setRDWR(thebits : TBits_1); inline;
  9933. procedure setw(thebits : TBits_32); inline;
  9934. public
  9935. procedure clearRDWR; inline;
  9936. procedure setRDWR; inline;
  9937. property DMACH : TBits_3 read getDMACH write setDMACH;
  9938. property RDWR : TBits_1 read getRDWR write setRDWR;
  9939. property w : TBits_32 read getw write setw;
  9940. end;
  9941. TDMAC_DCRCCON = record
  9942. private
  9943. function getBITO : TBits_1; inline;
  9944. function getBYTO : TBits_2; inline;
  9945. function getCRCAPP : TBits_1; inline;
  9946. function getCRCCH : TBits_3; inline;
  9947. function getCRCEN : TBits_1; inline;
  9948. function getCRCTYP : TBits_1; inline;
  9949. function getPLEN : TBits_5; inline;
  9950. function getWBO : TBits_1; inline;
  9951. function getw : TBits_32; inline;
  9952. procedure setBITO(thebits : TBits_1); inline;
  9953. procedure setBYTO(thebits : TBits_2); inline;
  9954. procedure setCRCAPP(thebits : TBits_1); inline;
  9955. procedure setCRCCH(thebits : TBits_3); inline;
  9956. procedure setCRCEN(thebits : TBits_1); inline;
  9957. procedure setCRCTYP(thebits : TBits_1); inline;
  9958. procedure setPLEN(thebits : TBits_5); inline;
  9959. procedure setWBO(thebits : TBits_1); inline;
  9960. procedure setw(thebits : TBits_32); inline;
  9961. public
  9962. procedure clearBITO; inline;
  9963. procedure clearCRCAPP; inline;
  9964. procedure clearCRCEN; inline;
  9965. procedure clearCRCTYP; inline;
  9966. procedure clearWBO; inline;
  9967. procedure setBITO; inline;
  9968. procedure setCRCAPP; inline;
  9969. procedure setCRCEN; inline;
  9970. procedure setCRCTYP; inline;
  9971. procedure setWBO; inline;
  9972. property BITO : TBits_1 read getBITO write setBITO;
  9973. property BYTO : TBits_2 read getBYTO write setBYTO;
  9974. property CRCAPP : TBits_1 read getCRCAPP write setCRCAPP;
  9975. property CRCCH : TBits_3 read getCRCCH write setCRCCH;
  9976. property CRCEN : TBits_1 read getCRCEN write setCRCEN;
  9977. property CRCTYP : TBits_1 read getCRCTYP write setCRCTYP;
  9978. property PLEN : TBits_5 read getPLEN write setPLEN;
  9979. property WBO : TBits_1 read getWBO write setWBO;
  9980. property w : TBits_32 read getw write setw;
  9981. end;
  9982. type
  9983. TDMACRegisters = record
  9984. DMACONbits : TDMAC_DMACON;
  9985. DMACON : longWord;
  9986. DMACONCLR : longWord;
  9987. DMACONSET : longWord;
  9988. DMACONINV : longWord;
  9989. DMASTATbits : TDMAC_DMASTAT;
  9990. DMASTAT : longWord;
  9991. DMASTATCLR : longWord;
  9992. DMASTATSET : longWord;
  9993. DMASTATINV : longWord;
  9994. DMAADDR : longWord;
  9995. DMAADDRCLR : longWord;
  9996. DMAADDRSET : longWord;
  9997. DMAADDRINV : longWord;
  9998. DCRCCONbits : TDMAC_DCRCCON;
  9999. DCRCCON : longWord;
  10000. DCRCCONCLR : longWord;
  10001. DCRCCONSET : longWord;
  10002. DCRCCONINV : longWord;
  10003. DCRCDATA : longWord;
  10004. DCRCDATACLR : longWord;
  10005. DCRCDATASET : longWord;
  10006. DCRCDATAINV : longWord;
  10007. DCRCXOR : longWord;
  10008. DCRCXORCLR : longWord;
  10009. DCRCXORSET : longWord;
  10010. DCRCXORINV : longWord;
  10011. end;
  10012. TDMAC0_DCH0CON = record
  10013. private
  10014. function getCHAED : TBits_1; inline;
  10015. function getCHAEN : TBits_1; inline;
  10016. function getCHBUSY : TBits_1; inline;
  10017. function getCHCHN : TBits_1; inline;
  10018. function getCHCHNS : TBits_1; inline;
  10019. function getCHEDET : TBits_1; inline;
  10020. function getCHEN : TBits_1; inline;
  10021. function getCHPRI : TBits_2; inline;
  10022. function getw : TBits_32; inline;
  10023. procedure setCHAED(thebits : TBits_1); inline;
  10024. procedure setCHAEN(thebits : TBits_1); inline;
  10025. procedure setCHBUSY(thebits : TBits_1); inline;
  10026. procedure setCHCHN(thebits : TBits_1); inline;
  10027. procedure setCHCHNS(thebits : TBits_1); inline;
  10028. procedure setCHEDET(thebits : TBits_1); inline;
  10029. procedure setCHEN(thebits : TBits_1); inline;
  10030. procedure setCHPRI(thebits : TBits_2); inline;
  10031. procedure setw(thebits : TBits_32); inline;
  10032. public
  10033. procedure clearCHAED; inline;
  10034. procedure clearCHAEN; inline;
  10035. procedure clearCHBUSY; inline;
  10036. procedure clearCHCHN; inline;
  10037. procedure clearCHCHNS; inline;
  10038. procedure clearCHEDET; inline;
  10039. procedure clearCHEN; inline;
  10040. procedure setCHAED; inline;
  10041. procedure setCHAEN; inline;
  10042. procedure setCHBUSY; inline;
  10043. procedure setCHCHN; inline;
  10044. procedure setCHCHNS; inline;
  10045. procedure setCHEDET; inline;
  10046. procedure setCHEN; inline;
  10047. property CHAED : TBits_1 read getCHAED write setCHAED;
  10048. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10049. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10050. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10051. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10052. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10053. property CHEN : TBits_1 read getCHEN write setCHEN;
  10054. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10055. property w : TBits_32 read getw write setw;
  10056. end;
  10057. TDMAC0_DCH0ECON = record
  10058. private
  10059. function getAIRQEN : TBits_1; inline;
  10060. function getCABORT : TBits_1; inline;
  10061. function getCFORCE : TBits_1; inline;
  10062. function getCHAIRQ : TBits_8; inline;
  10063. function getCHSIRQ : TBits_8; inline;
  10064. function getPATEN : TBits_1; inline;
  10065. function getSIRQEN : TBits_1; inline;
  10066. function getw : TBits_32; inline;
  10067. procedure setAIRQEN(thebits : TBits_1); inline;
  10068. procedure setCABORT(thebits : TBits_1); inline;
  10069. procedure setCFORCE(thebits : TBits_1); inline;
  10070. procedure setCHAIRQ(thebits : TBits_8); inline;
  10071. procedure setCHSIRQ(thebits : TBits_8); inline;
  10072. procedure setPATEN(thebits : TBits_1); inline;
  10073. procedure setSIRQEN(thebits : TBits_1); inline;
  10074. procedure setw(thebits : TBits_32); inline;
  10075. public
  10076. procedure clearAIRQEN; inline;
  10077. procedure clearCABORT; inline;
  10078. procedure clearCFORCE; inline;
  10079. procedure clearPATEN; inline;
  10080. procedure clearSIRQEN; inline;
  10081. procedure setAIRQEN; inline;
  10082. procedure setCABORT; inline;
  10083. procedure setCFORCE; inline;
  10084. procedure setPATEN; inline;
  10085. procedure setSIRQEN; inline;
  10086. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10087. property CABORT : TBits_1 read getCABORT write setCABORT;
  10088. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10089. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10090. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10091. property PATEN : TBits_1 read getPATEN write setPATEN;
  10092. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10093. property w : TBits_32 read getw write setw;
  10094. end;
  10095. TDMAC0_DCH0INT = record
  10096. private
  10097. function getCHBCIE : TBits_1; inline;
  10098. function getCHBCIF : TBits_1; inline;
  10099. function getCHCCIE : TBits_1; inline;
  10100. function getCHCCIF : TBits_1; inline;
  10101. function getCHDDIE : TBits_1; inline;
  10102. function getCHDDIF : TBits_1; inline;
  10103. function getCHDHIE : TBits_1; inline;
  10104. function getCHDHIF : TBits_1; inline;
  10105. function getCHERIE : TBits_1; inline;
  10106. function getCHERIF : TBits_1; inline;
  10107. function getCHSDIE : TBits_1; inline;
  10108. function getCHSDIF : TBits_1; inline;
  10109. function getCHSHIE : TBits_1; inline;
  10110. function getCHSHIF : TBits_1; inline;
  10111. function getCHTAIE : TBits_1; inline;
  10112. function getCHTAIF : TBits_1; inline;
  10113. function getw : TBits_32; inline;
  10114. procedure setCHBCIE(thebits : TBits_1); inline;
  10115. procedure setCHBCIF(thebits : TBits_1); inline;
  10116. procedure setCHCCIE(thebits : TBits_1); inline;
  10117. procedure setCHCCIF(thebits : TBits_1); inline;
  10118. procedure setCHDDIE(thebits : TBits_1); inline;
  10119. procedure setCHDDIF(thebits : TBits_1); inline;
  10120. procedure setCHDHIE(thebits : TBits_1); inline;
  10121. procedure setCHDHIF(thebits : TBits_1); inline;
  10122. procedure setCHERIE(thebits : TBits_1); inline;
  10123. procedure setCHERIF(thebits : TBits_1); inline;
  10124. procedure setCHSDIE(thebits : TBits_1); inline;
  10125. procedure setCHSDIF(thebits : TBits_1); inline;
  10126. procedure setCHSHIE(thebits : TBits_1); inline;
  10127. procedure setCHSHIF(thebits : TBits_1); inline;
  10128. procedure setCHTAIE(thebits : TBits_1); inline;
  10129. procedure setCHTAIF(thebits : TBits_1); inline;
  10130. procedure setw(thebits : TBits_32); inline;
  10131. public
  10132. procedure clearCHBCIE; inline;
  10133. procedure clearCHBCIF; inline;
  10134. procedure clearCHCCIE; inline;
  10135. procedure clearCHCCIF; inline;
  10136. procedure clearCHDDIE; inline;
  10137. procedure clearCHDDIF; inline;
  10138. procedure clearCHDHIE; inline;
  10139. procedure clearCHDHIF; inline;
  10140. procedure clearCHERIE; inline;
  10141. procedure clearCHERIF; inline;
  10142. procedure clearCHSDIE; inline;
  10143. procedure clearCHSDIF; inline;
  10144. procedure clearCHSHIE; inline;
  10145. procedure clearCHSHIF; inline;
  10146. procedure clearCHTAIE; inline;
  10147. procedure clearCHTAIF; inline;
  10148. procedure setCHBCIE; inline;
  10149. procedure setCHBCIF; inline;
  10150. procedure setCHCCIE; inline;
  10151. procedure setCHCCIF; inline;
  10152. procedure setCHDDIE; inline;
  10153. procedure setCHDDIF; inline;
  10154. procedure setCHDHIE; inline;
  10155. procedure setCHDHIF; inline;
  10156. procedure setCHERIE; inline;
  10157. procedure setCHERIF; inline;
  10158. procedure setCHSDIE; inline;
  10159. procedure setCHSDIF; inline;
  10160. procedure setCHSHIE; inline;
  10161. procedure setCHSHIF; inline;
  10162. procedure setCHTAIE; inline;
  10163. procedure setCHTAIF; inline;
  10164. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10165. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10166. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10167. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10168. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10169. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10170. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10171. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10172. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10173. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10174. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10175. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10176. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10177. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10178. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10179. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10180. property w : TBits_32 read getw write setw;
  10181. end;
  10182. type
  10183. TDMAC0Registers = record
  10184. DCH0CONbits : TDMAC0_DCH0CON;
  10185. DCH0CON : longWord;
  10186. DCH0CONCLR : longWord;
  10187. DCH0CONSET : longWord;
  10188. DCH0CONINV : longWord;
  10189. DCH0ECONbits : TDMAC0_DCH0ECON;
  10190. DCH0ECON : longWord;
  10191. DCH0ECONCLR : longWord;
  10192. DCH0ECONSET : longWord;
  10193. DCH0ECONINV : longWord;
  10194. DCH0INTbits : TDMAC0_DCH0INT;
  10195. DCH0INT : longWord;
  10196. DCH0INTCLR : longWord;
  10197. DCH0INTSET : longWord;
  10198. DCH0INTINV : longWord;
  10199. DCH0SSA : longWord;
  10200. DCH0SSACLR : longWord;
  10201. DCH0SSASET : longWord;
  10202. DCH0SSAINV : longWord;
  10203. DCH0DSA : longWord;
  10204. DCH0DSACLR : longWord;
  10205. DCH0DSASET : longWord;
  10206. DCH0DSAINV : longWord;
  10207. DCH0SSIZ : longWord;
  10208. DCH0SSIZCLR : longWord;
  10209. DCH0SSIZSET : longWord;
  10210. DCH0SSIZINV : longWord;
  10211. DCH0DSIZ : longWord;
  10212. DCH0DSIZCLR : longWord;
  10213. DCH0DSIZSET : longWord;
  10214. DCH0DSIZINV : longWord;
  10215. DCH0SPTR : longWord;
  10216. DCH0SPTRCLR : longWord;
  10217. DCH0SPTRSET : longWord;
  10218. DCH0SPTRINV : longWord;
  10219. DCH0DPTR : longWord;
  10220. DCH0DPTRCLR : longWord;
  10221. DCH0DPTRSET : longWord;
  10222. DCH0DPTRINV : longWord;
  10223. DCH0CSIZ : longWord;
  10224. DCH0CSIZCLR : longWord;
  10225. DCH0CSIZSET : longWord;
  10226. DCH0CSIZINV : longWord;
  10227. DCH0CPTR : longWord;
  10228. DCH0CPTRCLR : longWord;
  10229. DCH0CPTRSET : longWord;
  10230. DCH0CPTRINV : longWord;
  10231. DCH0DAT : longWord;
  10232. DCH0DATCLR : longWord;
  10233. DCH0DATSET : longWord;
  10234. DCH0DATINV : longWord;
  10235. end;
  10236. TDMAC1_DCH1CON = record
  10237. private
  10238. function getCHAED : TBits_1; inline;
  10239. function getCHAEN : TBits_1; inline;
  10240. function getCHBUSY : TBits_1; inline;
  10241. function getCHCHN : TBits_1; inline;
  10242. function getCHCHNS : TBits_1; inline;
  10243. function getCHEDET : TBits_1; inline;
  10244. function getCHEN : TBits_1; inline;
  10245. function getCHPRI : TBits_2; inline;
  10246. function getw : TBits_32; inline;
  10247. procedure setCHAED(thebits : TBits_1); inline;
  10248. procedure setCHAEN(thebits : TBits_1); inline;
  10249. procedure setCHBUSY(thebits : TBits_1); inline;
  10250. procedure setCHCHN(thebits : TBits_1); inline;
  10251. procedure setCHCHNS(thebits : TBits_1); inline;
  10252. procedure setCHEDET(thebits : TBits_1); inline;
  10253. procedure setCHEN(thebits : TBits_1); inline;
  10254. procedure setCHPRI(thebits : TBits_2); inline;
  10255. procedure setw(thebits : TBits_32); inline;
  10256. public
  10257. procedure clearCHAED; inline;
  10258. procedure clearCHAEN; inline;
  10259. procedure clearCHBUSY; inline;
  10260. procedure clearCHCHN; inline;
  10261. procedure clearCHCHNS; inline;
  10262. procedure clearCHEDET; inline;
  10263. procedure clearCHEN; inline;
  10264. procedure setCHAED; inline;
  10265. procedure setCHAEN; inline;
  10266. procedure setCHBUSY; inline;
  10267. procedure setCHCHN; inline;
  10268. procedure setCHCHNS; inline;
  10269. procedure setCHEDET; inline;
  10270. procedure setCHEN; inline;
  10271. property CHAED : TBits_1 read getCHAED write setCHAED;
  10272. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10273. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10274. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10275. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10276. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10277. property CHEN : TBits_1 read getCHEN write setCHEN;
  10278. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10279. property w : TBits_32 read getw write setw;
  10280. end;
  10281. TDMAC1_DCH1ECON = record
  10282. private
  10283. function getAIRQEN : TBits_1; inline;
  10284. function getCABORT : TBits_1; inline;
  10285. function getCFORCE : TBits_1; inline;
  10286. function getCHAIRQ : TBits_8; inline;
  10287. function getCHSIRQ : TBits_8; inline;
  10288. function getPATEN : TBits_1; inline;
  10289. function getSIRQEN : TBits_1; inline;
  10290. function getw : TBits_32; inline;
  10291. procedure setAIRQEN(thebits : TBits_1); inline;
  10292. procedure setCABORT(thebits : TBits_1); inline;
  10293. procedure setCFORCE(thebits : TBits_1); inline;
  10294. procedure setCHAIRQ(thebits : TBits_8); inline;
  10295. procedure setCHSIRQ(thebits : TBits_8); inline;
  10296. procedure setPATEN(thebits : TBits_1); inline;
  10297. procedure setSIRQEN(thebits : TBits_1); inline;
  10298. procedure setw(thebits : TBits_32); inline;
  10299. public
  10300. procedure clearAIRQEN; inline;
  10301. procedure clearCABORT; inline;
  10302. procedure clearCFORCE; inline;
  10303. procedure clearPATEN; inline;
  10304. procedure clearSIRQEN; inline;
  10305. procedure setAIRQEN; inline;
  10306. procedure setCABORT; inline;
  10307. procedure setCFORCE; inline;
  10308. procedure setPATEN; inline;
  10309. procedure setSIRQEN; inline;
  10310. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10311. property CABORT : TBits_1 read getCABORT write setCABORT;
  10312. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10313. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10314. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10315. property PATEN : TBits_1 read getPATEN write setPATEN;
  10316. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10317. property w : TBits_32 read getw write setw;
  10318. end;
  10319. TDMAC1_DCH1INT = record
  10320. private
  10321. function getCHBCIE : TBits_1; inline;
  10322. function getCHBCIF : TBits_1; inline;
  10323. function getCHCCIE : TBits_1; inline;
  10324. function getCHCCIF : TBits_1; inline;
  10325. function getCHDDIE : TBits_1; inline;
  10326. function getCHDDIF : TBits_1; inline;
  10327. function getCHDHIE : TBits_1; inline;
  10328. function getCHDHIF : TBits_1; inline;
  10329. function getCHERIE : TBits_1; inline;
  10330. function getCHERIF : TBits_1; inline;
  10331. function getCHSDIE : TBits_1; inline;
  10332. function getCHSDIF : TBits_1; inline;
  10333. function getCHSHIE : TBits_1; inline;
  10334. function getCHSHIF : TBits_1; inline;
  10335. function getCHTAIE : TBits_1; inline;
  10336. function getCHTAIF : TBits_1; inline;
  10337. function getw : TBits_32; inline;
  10338. procedure setCHBCIE(thebits : TBits_1); inline;
  10339. procedure setCHBCIF(thebits : TBits_1); inline;
  10340. procedure setCHCCIE(thebits : TBits_1); inline;
  10341. procedure setCHCCIF(thebits : TBits_1); inline;
  10342. procedure setCHDDIE(thebits : TBits_1); inline;
  10343. procedure setCHDDIF(thebits : TBits_1); inline;
  10344. procedure setCHDHIE(thebits : TBits_1); inline;
  10345. procedure setCHDHIF(thebits : TBits_1); inline;
  10346. procedure setCHERIE(thebits : TBits_1); inline;
  10347. procedure setCHERIF(thebits : TBits_1); inline;
  10348. procedure setCHSDIE(thebits : TBits_1); inline;
  10349. procedure setCHSDIF(thebits : TBits_1); inline;
  10350. procedure setCHSHIE(thebits : TBits_1); inline;
  10351. procedure setCHSHIF(thebits : TBits_1); inline;
  10352. procedure setCHTAIE(thebits : TBits_1); inline;
  10353. procedure setCHTAIF(thebits : TBits_1); inline;
  10354. procedure setw(thebits : TBits_32); inline;
  10355. public
  10356. procedure clearCHBCIE; inline;
  10357. procedure clearCHBCIF; inline;
  10358. procedure clearCHCCIE; inline;
  10359. procedure clearCHCCIF; inline;
  10360. procedure clearCHDDIE; inline;
  10361. procedure clearCHDDIF; inline;
  10362. procedure clearCHDHIE; inline;
  10363. procedure clearCHDHIF; inline;
  10364. procedure clearCHERIE; inline;
  10365. procedure clearCHERIF; inline;
  10366. procedure clearCHSDIE; inline;
  10367. procedure clearCHSDIF; inline;
  10368. procedure clearCHSHIE; inline;
  10369. procedure clearCHSHIF; inline;
  10370. procedure clearCHTAIE; inline;
  10371. procedure clearCHTAIF; inline;
  10372. procedure setCHBCIE; inline;
  10373. procedure setCHBCIF; inline;
  10374. procedure setCHCCIE; inline;
  10375. procedure setCHCCIF; inline;
  10376. procedure setCHDDIE; inline;
  10377. procedure setCHDDIF; inline;
  10378. procedure setCHDHIE; inline;
  10379. procedure setCHDHIF; inline;
  10380. procedure setCHERIE; inline;
  10381. procedure setCHERIF; inline;
  10382. procedure setCHSDIE; inline;
  10383. procedure setCHSDIF; inline;
  10384. procedure setCHSHIE; inline;
  10385. procedure setCHSHIF; inline;
  10386. procedure setCHTAIE; inline;
  10387. procedure setCHTAIF; inline;
  10388. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10389. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10390. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10391. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10392. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10393. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10394. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10395. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10396. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10397. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10398. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10399. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10400. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10401. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10402. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10403. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10404. property w : TBits_32 read getw write setw;
  10405. end;
  10406. type
  10407. TDMAC1Registers = record
  10408. DCH1CONbits : TDMAC1_DCH1CON;
  10409. DCH1CON : longWord;
  10410. DCH1CONCLR : longWord;
  10411. DCH1CONSET : longWord;
  10412. DCH1CONINV : longWord;
  10413. DCH1ECONbits : TDMAC1_DCH1ECON;
  10414. DCH1ECON : longWord;
  10415. DCH1ECONCLR : longWord;
  10416. DCH1ECONSET : longWord;
  10417. DCH1ECONINV : longWord;
  10418. DCH1INTbits : TDMAC1_DCH1INT;
  10419. DCH1INT : longWord;
  10420. DCH1INTCLR : longWord;
  10421. DCH1INTSET : longWord;
  10422. DCH1INTINV : longWord;
  10423. DCH1SSA : longWord;
  10424. DCH1SSACLR : longWord;
  10425. DCH1SSASET : longWord;
  10426. DCH1SSAINV : longWord;
  10427. DCH1DSA : longWord;
  10428. DCH1DSACLR : longWord;
  10429. DCH1DSASET : longWord;
  10430. DCH1DSAINV : longWord;
  10431. DCH1SSIZ : longWord;
  10432. DCH1SSIZCLR : longWord;
  10433. DCH1SSIZSET : longWord;
  10434. DCH1SSIZINV : longWord;
  10435. DCH1DSIZ : longWord;
  10436. DCH1DSIZCLR : longWord;
  10437. DCH1DSIZSET : longWord;
  10438. DCH1DSIZINV : longWord;
  10439. DCH1SPTR : longWord;
  10440. DCH1SPTRCLR : longWord;
  10441. DCH1SPTRSET : longWord;
  10442. DCH1SPTRINV : longWord;
  10443. DCH1DPTR : longWord;
  10444. DCH1DPTRCLR : longWord;
  10445. DCH1DPTRSET : longWord;
  10446. DCH1DPTRINV : longWord;
  10447. DCH1CSIZ : longWord;
  10448. DCH1CSIZCLR : longWord;
  10449. DCH1CSIZSET : longWord;
  10450. DCH1CSIZINV : longWord;
  10451. DCH1CPTR : longWord;
  10452. DCH1CPTRCLR : longWord;
  10453. DCH1CPTRSET : longWord;
  10454. DCH1CPTRINV : longWord;
  10455. DCH1DAT : longWord;
  10456. DCH1DATCLR : longWord;
  10457. DCH1DATSET : longWord;
  10458. DCH1DATINV : longWord;
  10459. end;
  10460. TDMAC2_DCH2CON = record
  10461. private
  10462. function getCHAED : TBits_1; inline;
  10463. function getCHAEN : TBits_1; inline;
  10464. function getCHBUSY : TBits_1; inline;
  10465. function getCHCHN : TBits_1; inline;
  10466. function getCHCHNS : TBits_1; inline;
  10467. function getCHEDET : TBits_1; inline;
  10468. function getCHEN : TBits_1; inline;
  10469. function getCHPRI : TBits_2; inline;
  10470. function getw : TBits_32; inline;
  10471. procedure setCHAED(thebits : TBits_1); inline;
  10472. procedure setCHAEN(thebits : TBits_1); inline;
  10473. procedure setCHBUSY(thebits : TBits_1); inline;
  10474. procedure setCHCHN(thebits : TBits_1); inline;
  10475. procedure setCHCHNS(thebits : TBits_1); inline;
  10476. procedure setCHEDET(thebits : TBits_1); inline;
  10477. procedure setCHEN(thebits : TBits_1); inline;
  10478. procedure setCHPRI(thebits : TBits_2); inline;
  10479. procedure setw(thebits : TBits_32); inline;
  10480. public
  10481. procedure clearCHAED; inline;
  10482. procedure clearCHAEN; inline;
  10483. procedure clearCHBUSY; inline;
  10484. procedure clearCHCHN; inline;
  10485. procedure clearCHCHNS; inline;
  10486. procedure clearCHEDET; inline;
  10487. procedure clearCHEN; inline;
  10488. procedure setCHAED; inline;
  10489. procedure setCHAEN; inline;
  10490. procedure setCHBUSY; inline;
  10491. procedure setCHCHN; inline;
  10492. procedure setCHCHNS; inline;
  10493. procedure setCHEDET; inline;
  10494. procedure setCHEN; inline;
  10495. property CHAED : TBits_1 read getCHAED write setCHAED;
  10496. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10497. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10498. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10499. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10500. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10501. property CHEN : TBits_1 read getCHEN write setCHEN;
  10502. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10503. property w : TBits_32 read getw write setw;
  10504. end;
  10505. TDMAC2_DCH2ECON = record
  10506. private
  10507. function getAIRQEN : TBits_1; inline;
  10508. function getCABORT : TBits_1; inline;
  10509. function getCFORCE : TBits_1; inline;
  10510. function getCHAIRQ : TBits_8; inline;
  10511. function getCHSIRQ : TBits_8; inline;
  10512. function getPATEN : TBits_1; inline;
  10513. function getSIRQEN : TBits_1; inline;
  10514. function getw : TBits_32; inline;
  10515. procedure setAIRQEN(thebits : TBits_1); inline;
  10516. procedure setCABORT(thebits : TBits_1); inline;
  10517. procedure setCFORCE(thebits : TBits_1); inline;
  10518. procedure setCHAIRQ(thebits : TBits_8); inline;
  10519. procedure setCHSIRQ(thebits : TBits_8); inline;
  10520. procedure setPATEN(thebits : TBits_1); inline;
  10521. procedure setSIRQEN(thebits : TBits_1); inline;
  10522. procedure setw(thebits : TBits_32); inline;
  10523. public
  10524. procedure clearAIRQEN; inline;
  10525. procedure clearCABORT; inline;
  10526. procedure clearCFORCE; inline;
  10527. procedure clearPATEN; inline;
  10528. procedure clearSIRQEN; inline;
  10529. procedure setAIRQEN; inline;
  10530. procedure setCABORT; inline;
  10531. procedure setCFORCE; inline;
  10532. procedure setPATEN; inline;
  10533. procedure setSIRQEN; inline;
  10534. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10535. property CABORT : TBits_1 read getCABORT write setCABORT;
  10536. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10537. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10538. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10539. property PATEN : TBits_1 read getPATEN write setPATEN;
  10540. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10541. property w : TBits_32 read getw write setw;
  10542. end;
  10543. TDMAC2_DCH2INT = record
  10544. private
  10545. function getCHBCIE : TBits_1; inline;
  10546. function getCHBCIF : TBits_1; inline;
  10547. function getCHCCIE : TBits_1; inline;
  10548. function getCHCCIF : TBits_1; inline;
  10549. function getCHDDIE : TBits_1; inline;
  10550. function getCHDDIF : TBits_1; inline;
  10551. function getCHDHIE : TBits_1; inline;
  10552. function getCHDHIF : TBits_1; inline;
  10553. function getCHERIE : TBits_1; inline;
  10554. function getCHERIF : TBits_1; inline;
  10555. function getCHSDIE : TBits_1; inline;
  10556. function getCHSDIF : TBits_1; inline;
  10557. function getCHSHIE : TBits_1; inline;
  10558. function getCHSHIF : TBits_1; inline;
  10559. function getCHTAIE : TBits_1; inline;
  10560. function getCHTAIF : TBits_1; inline;
  10561. function getw : TBits_32; inline;
  10562. procedure setCHBCIE(thebits : TBits_1); inline;
  10563. procedure setCHBCIF(thebits : TBits_1); inline;
  10564. procedure setCHCCIE(thebits : TBits_1); inline;
  10565. procedure setCHCCIF(thebits : TBits_1); inline;
  10566. procedure setCHDDIE(thebits : TBits_1); inline;
  10567. procedure setCHDDIF(thebits : TBits_1); inline;
  10568. procedure setCHDHIE(thebits : TBits_1); inline;
  10569. procedure setCHDHIF(thebits : TBits_1); inline;
  10570. procedure setCHERIE(thebits : TBits_1); inline;
  10571. procedure setCHERIF(thebits : TBits_1); inline;
  10572. procedure setCHSDIE(thebits : TBits_1); inline;
  10573. procedure setCHSDIF(thebits : TBits_1); inline;
  10574. procedure setCHSHIE(thebits : TBits_1); inline;
  10575. procedure setCHSHIF(thebits : TBits_1); inline;
  10576. procedure setCHTAIE(thebits : TBits_1); inline;
  10577. procedure setCHTAIF(thebits : TBits_1); inline;
  10578. procedure setw(thebits : TBits_32); inline;
  10579. public
  10580. procedure clearCHBCIE; inline;
  10581. procedure clearCHBCIF; inline;
  10582. procedure clearCHCCIE; inline;
  10583. procedure clearCHCCIF; inline;
  10584. procedure clearCHDDIE; inline;
  10585. procedure clearCHDDIF; inline;
  10586. procedure clearCHDHIE; inline;
  10587. procedure clearCHDHIF; inline;
  10588. procedure clearCHERIE; inline;
  10589. procedure clearCHERIF; inline;
  10590. procedure clearCHSDIE; inline;
  10591. procedure clearCHSDIF; inline;
  10592. procedure clearCHSHIE; inline;
  10593. procedure clearCHSHIF; inline;
  10594. procedure clearCHTAIE; inline;
  10595. procedure clearCHTAIF; inline;
  10596. procedure setCHBCIE; inline;
  10597. procedure setCHBCIF; inline;
  10598. procedure setCHCCIE; inline;
  10599. procedure setCHCCIF; inline;
  10600. procedure setCHDDIE; inline;
  10601. procedure setCHDDIF; inline;
  10602. procedure setCHDHIE; inline;
  10603. procedure setCHDHIF; inline;
  10604. procedure setCHERIE; inline;
  10605. procedure setCHERIF; inline;
  10606. procedure setCHSDIE; inline;
  10607. procedure setCHSDIF; inline;
  10608. procedure setCHSHIE; inline;
  10609. procedure setCHSHIF; inline;
  10610. procedure setCHTAIE; inline;
  10611. procedure setCHTAIF; inline;
  10612. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10613. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10614. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10615. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10616. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10617. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10618. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10619. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10620. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10621. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10622. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10623. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10624. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10625. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10626. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10627. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10628. property w : TBits_32 read getw write setw;
  10629. end;
  10630. type
  10631. TDMAC2Registers = record
  10632. DCH2CONbits : TDMAC2_DCH2CON;
  10633. DCH2CON : longWord;
  10634. DCH2CONCLR : longWord;
  10635. DCH2CONSET : longWord;
  10636. DCH2CONINV : longWord;
  10637. DCH2ECONbits : TDMAC2_DCH2ECON;
  10638. DCH2ECON : longWord;
  10639. DCH2ECONCLR : longWord;
  10640. DCH2ECONSET : longWord;
  10641. DCH2ECONINV : longWord;
  10642. DCH2INTbits : TDMAC2_DCH2INT;
  10643. DCH2INT : longWord;
  10644. DCH2INTCLR : longWord;
  10645. DCH2INTSET : longWord;
  10646. DCH2INTINV : longWord;
  10647. DCH2SSA : longWord;
  10648. DCH2SSACLR : longWord;
  10649. DCH2SSASET : longWord;
  10650. DCH2SSAINV : longWord;
  10651. DCH2DSA : longWord;
  10652. DCH2DSACLR : longWord;
  10653. DCH2DSASET : longWord;
  10654. DCH2DSAINV : longWord;
  10655. DCH2SSIZ : longWord;
  10656. DCH2SSIZCLR : longWord;
  10657. DCH2SSIZSET : longWord;
  10658. DCH2SSIZINV : longWord;
  10659. DCH2DSIZ : longWord;
  10660. DCH2DSIZCLR : longWord;
  10661. DCH2DSIZSET : longWord;
  10662. DCH2DSIZINV : longWord;
  10663. DCH2SPTR : longWord;
  10664. DCH2SPTRCLR : longWord;
  10665. DCH2SPTRSET : longWord;
  10666. DCH2SPTRINV : longWord;
  10667. DCH2DPTR : longWord;
  10668. DCH2DPTRCLR : longWord;
  10669. DCH2DPTRSET : longWord;
  10670. DCH2DPTRINV : longWord;
  10671. DCH2CSIZ : longWord;
  10672. DCH2CSIZCLR : longWord;
  10673. DCH2CSIZSET : longWord;
  10674. DCH2CSIZINV : longWord;
  10675. DCH2CPTR : longWord;
  10676. DCH2CPTRCLR : longWord;
  10677. DCH2CPTRSET : longWord;
  10678. DCH2CPTRINV : longWord;
  10679. DCH2DAT : longWord;
  10680. DCH2DATCLR : longWord;
  10681. DCH2DATSET : longWord;
  10682. DCH2DATINV : longWord;
  10683. end;
  10684. TDMAC3_DCH3CON = record
  10685. private
  10686. function getCHAED : TBits_1; inline;
  10687. function getCHAEN : TBits_1; inline;
  10688. function getCHBUSY : TBits_1; inline;
  10689. function getCHCHN : TBits_1; inline;
  10690. function getCHCHNS : TBits_1; inline;
  10691. function getCHEDET : TBits_1; inline;
  10692. function getCHEN : TBits_1; inline;
  10693. function getCHPRI : TBits_2; inline;
  10694. function getw : TBits_32; inline;
  10695. procedure setCHAED(thebits : TBits_1); inline;
  10696. procedure setCHAEN(thebits : TBits_1); inline;
  10697. procedure setCHBUSY(thebits : TBits_1); inline;
  10698. procedure setCHCHN(thebits : TBits_1); inline;
  10699. procedure setCHCHNS(thebits : TBits_1); inline;
  10700. procedure setCHEDET(thebits : TBits_1); inline;
  10701. procedure setCHEN(thebits : TBits_1); inline;
  10702. procedure setCHPRI(thebits : TBits_2); inline;
  10703. procedure setw(thebits : TBits_32); inline;
  10704. public
  10705. procedure clearCHAED; inline;
  10706. procedure clearCHAEN; inline;
  10707. procedure clearCHBUSY; inline;
  10708. procedure clearCHCHN; inline;
  10709. procedure clearCHCHNS; inline;
  10710. procedure clearCHEDET; inline;
  10711. procedure clearCHEN; inline;
  10712. procedure setCHAED; inline;
  10713. procedure setCHAEN; inline;
  10714. procedure setCHBUSY; inline;
  10715. procedure setCHCHN; inline;
  10716. procedure setCHCHNS; inline;
  10717. procedure setCHEDET; inline;
  10718. procedure setCHEN; inline;
  10719. property CHAED : TBits_1 read getCHAED write setCHAED;
  10720. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10721. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10722. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10723. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10724. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10725. property CHEN : TBits_1 read getCHEN write setCHEN;
  10726. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10727. property w : TBits_32 read getw write setw;
  10728. end;
  10729. TDMAC3_DCH3ECON = record
  10730. private
  10731. function getAIRQEN : TBits_1; inline;
  10732. function getCABORT : TBits_1; inline;
  10733. function getCFORCE : TBits_1; inline;
  10734. function getCHAIRQ : TBits_8; inline;
  10735. function getCHSIRQ : TBits_8; inline;
  10736. function getPATEN : TBits_1; inline;
  10737. function getSIRQEN : TBits_1; inline;
  10738. function getw : TBits_32; inline;
  10739. procedure setAIRQEN(thebits : TBits_1); inline;
  10740. procedure setCABORT(thebits : TBits_1); inline;
  10741. procedure setCFORCE(thebits : TBits_1); inline;
  10742. procedure setCHAIRQ(thebits : TBits_8); inline;
  10743. procedure setCHSIRQ(thebits : TBits_8); inline;
  10744. procedure setPATEN(thebits : TBits_1); inline;
  10745. procedure setSIRQEN(thebits : TBits_1); inline;
  10746. procedure setw(thebits : TBits_32); inline;
  10747. public
  10748. procedure clearAIRQEN; inline;
  10749. procedure clearCABORT; inline;
  10750. procedure clearCFORCE; inline;
  10751. procedure clearPATEN; inline;
  10752. procedure clearSIRQEN; inline;
  10753. procedure setAIRQEN; inline;
  10754. procedure setCABORT; inline;
  10755. procedure setCFORCE; inline;
  10756. procedure setPATEN; inline;
  10757. procedure setSIRQEN; inline;
  10758. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10759. property CABORT : TBits_1 read getCABORT write setCABORT;
  10760. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10761. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10762. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10763. property PATEN : TBits_1 read getPATEN write setPATEN;
  10764. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10765. property w : TBits_32 read getw write setw;
  10766. end;
  10767. TDMAC3_DCH3INT = record
  10768. private
  10769. function getCHBCIE : TBits_1; inline;
  10770. function getCHBCIF : TBits_1; inline;
  10771. function getCHCCIE : TBits_1; inline;
  10772. function getCHCCIF : TBits_1; inline;
  10773. function getCHDDIE : TBits_1; inline;
  10774. function getCHDDIF : TBits_1; inline;
  10775. function getCHDHIE : TBits_1; inline;
  10776. function getCHDHIF : TBits_1; inline;
  10777. function getCHERIE : TBits_1; inline;
  10778. function getCHERIF : TBits_1; inline;
  10779. function getCHSDIE : TBits_1; inline;
  10780. function getCHSDIF : TBits_1; inline;
  10781. function getCHSHIE : TBits_1; inline;
  10782. function getCHSHIF : TBits_1; inline;
  10783. function getCHTAIE : TBits_1; inline;
  10784. function getCHTAIF : TBits_1; inline;
  10785. function getw : TBits_32; inline;
  10786. procedure setCHBCIE(thebits : TBits_1); inline;
  10787. procedure setCHBCIF(thebits : TBits_1); inline;
  10788. procedure setCHCCIE(thebits : TBits_1); inline;
  10789. procedure setCHCCIF(thebits : TBits_1); inline;
  10790. procedure setCHDDIE(thebits : TBits_1); inline;
  10791. procedure setCHDDIF(thebits : TBits_1); inline;
  10792. procedure setCHDHIE(thebits : TBits_1); inline;
  10793. procedure setCHDHIF(thebits : TBits_1); inline;
  10794. procedure setCHERIE(thebits : TBits_1); inline;
  10795. procedure setCHERIF(thebits : TBits_1); inline;
  10796. procedure setCHSDIE(thebits : TBits_1); inline;
  10797. procedure setCHSDIF(thebits : TBits_1); inline;
  10798. procedure setCHSHIE(thebits : TBits_1); inline;
  10799. procedure setCHSHIF(thebits : TBits_1); inline;
  10800. procedure setCHTAIE(thebits : TBits_1); inline;
  10801. procedure setCHTAIF(thebits : TBits_1); inline;
  10802. procedure setw(thebits : TBits_32); inline;
  10803. public
  10804. procedure clearCHBCIE; inline;
  10805. procedure clearCHBCIF; inline;
  10806. procedure clearCHCCIE; inline;
  10807. procedure clearCHCCIF; inline;
  10808. procedure clearCHDDIE; inline;
  10809. procedure clearCHDDIF; inline;
  10810. procedure clearCHDHIE; inline;
  10811. procedure clearCHDHIF; inline;
  10812. procedure clearCHERIE; inline;
  10813. procedure clearCHERIF; inline;
  10814. procedure clearCHSDIE; inline;
  10815. procedure clearCHSDIF; inline;
  10816. procedure clearCHSHIE; inline;
  10817. procedure clearCHSHIF; inline;
  10818. procedure clearCHTAIE; inline;
  10819. procedure clearCHTAIF; inline;
  10820. procedure setCHBCIE; inline;
  10821. procedure setCHBCIF; inline;
  10822. procedure setCHCCIE; inline;
  10823. procedure setCHCCIF; inline;
  10824. procedure setCHDDIE; inline;
  10825. procedure setCHDDIF; inline;
  10826. procedure setCHDHIE; inline;
  10827. procedure setCHDHIF; inline;
  10828. procedure setCHERIE; inline;
  10829. procedure setCHERIF; inline;
  10830. procedure setCHSDIE; inline;
  10831. procedure setCHSDIF; inline;
  10832. procedure setCHSHIE; inline;
  10833. procedure setCHSHIF; inline;
  10834. procedure setCHTAIE; inline;
  10835. procedure setCHTAIF; inline;
  10836. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10837. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10838. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10839. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10840. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10841. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10842. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10843. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10844. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10845. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10846. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10847. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10848. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10849. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10850. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10851. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10852. property w : TBits_32 read getw write setw;
  10853. end;
  10854. type
  10855. TDMAC3Registers = record
  10856. DCH3CONbits : TDMAC3_DCH3CON;
  10857. DCH3CON : longWord;
  10858. DCH3CONCLR : longWord;
  10859. DCH3CONSET : longWord;
  10860. DCH3CONINV : longWord;
  10861. DCH3ECONbits : TDMAC3_DCH3ECON;
  10862. DCH3ECON : longWord;
  10863. DCH3ECONCLR : longWord;
  10864. DCH3ECONSET : longWord;
  10865. DCH3ECONINV : longWord;
  10866. DCH3INTbits : TDMAC3_DCH3INT;
  10867. DCH3INT : longWord;
  10868. DCH3INTCLR : longWord;
  10869. DCH3INTSET : longWord;
  10870. DCH3INTINV : longWord;
  10871. DCH3SSA : longWord;
  10872. DCH3SSACLR : longWord;
  10873. DCH3SSASET : longWord;
  10874. DCH3SSAINV : longWord;
  10875. DCH3DSA : longWord;
  10876. DCH3DSACLR : longWord;
  10877. DCH3DSASET : longWord;
  10878. DCH3DSAINV : longWord;
  10879. DCH3SSIZ : longWord;
  10880. DCH3SSIZCLR : longWord;
  10881. DCH3SSIZSET : longWord;
  10882. DCH3SSIZINV : longWord;
  10883. DCH3DSIZ : longWord;
  10884. DCH3DSIZCLR : longWord;
  10885. DCH3DSIZSET : longWord;
  10886. DCH3DSIZINV : longWord;
  10887. DCH3SPTR : longWord;
  10888. DCH3SPTRCLR : longWord;
  10889. DCH3SPTRSET : longWord;
  10890. DCH3SPTRINV : longWord;
  10891. DCH3DPTR : longWord;
  10892. DCH3DPTRCLR : longWord;
  10893. DCH3DPTRSET : longWord;
  10894. DCH3DPTRINV : longWord;
  10895. DCH3CSIZ : longWord;
  10896. DCH3CSIZCLR : longWord;
  10897. DCH3CSIZSET : longWord;
  10898. DCH3CSIZINV : longWord;
  10899. DCH3CPTR : longWord;
  10900. DCH3CPTRCLR : longWord;
  10901. DCH3CPTRSET : longWord;
  10902. DCH3CPTRINV : longWord;
  10903. DCH3DAT : longWord;
  10904. DCH3DATCLR : longWord;
  10905. DCH3DATSET : longWord;
  10906. DCH3DATINV : longWord;
  10907. end;
  10908. TPCACHE_CHECON = record
  10909. private
  10910. function getCHECOH : TBits_1; inline;
  10911. function getDCSZ : TBits_2; inline;
  10912. function getPFMWS : TBits_3; inline;
  10913. function getPREFEN : TBits_2; inline;
  10914. function getw : TBits_32; inline;
  10915. procedure setCHECOH(thebits : TBits_1); inline;
  10916. procedure setDCSZ(thebits : TBits_2); inline;
  10917. procedure setPFMWS(thebits : TBits_3); inline;
  10918. procedure setPREFEN(thebits : TBits_2); inline;
  10919. procedure setw(thebits : TBits_32); inline;
  10920. public
  10921. procedure clearCHECOH; inline;
  10922. procedure setCHECOH; inline;
  10923. property CHECOH : TBits_1 read getCHECOH write setCHECOH;
  10924. property DCSZ : TBits_2 read getDCSZ write setDCSZ;
  10925. property PFMWS : TBits_3 read getPFMWS write setPFMWS;
  10926. property PREFEN : TBits_2 read getPREFEN write setPREFEN;
  10927. property w : TBits_32 read getw write setw;
  10928. end;
  10929. TPCACHE_CHETAG = record
  10930. private
  10931. function getLLOCK : TBits_1; inline;
  10932. function getLTAG : TBits_20; inline;
  10933. function getLTAGBOOT : TBits_1; inline;
  10934. function getLTYPE : TBits_1; inline;
  10935. function getLVALID : TBits_1; inline;
  10936. function getw : TBits_32; inline;
  10937. procedure setLLOCK(thebits : TBits_1); inline;
  10938. procedure setLTAG(thebits : TBits_20); inline;
  10939. procedure setLTAGBOOT(thebits : TBits_1); inline;
  10940. procedure setLTYPE(thebits : TBits_1); inline;
  10941. procedure setLVALID(thebits : TBits_1); inline;
  10942. procedure setw(thebits : TBits_32); inline;
  10943. public
  10944. procedure clearLLOCK; inline;
  10945. procedure clearLTAGBOOT; inline;
  10946. procedure clearLTYPE; inline;
  10947. procedure clearLVALID; inline;
  10948. procedure setLLOCK; inline;
  10949. procedure setLTAGBOOT; inline;
  10950. procedure setLTYPE; inline;
  10951. procedure setLVALID; inline;
  10952. property LLOCK : TBits_1 read getLLOCK write setLLOCK;
  10953. property LTAG : TBits_20 read getLTAG write setLTAG;
  10954. property LTAGBOOT : TBits_1 read getLTAGBOOT write setLTAGBOOT;
  10955. property LTYPE : TBits_1 read getLTYPE write setLTYPE;
  10956. property LVALID : TBits_1 read getLVALID write setLVALID;
  10957. property w : TBits_32 read getw write setw;
  10958. end;
  10959. type
  10960. TPCACHERegisters = record
  10961. CHECONbits : TPCACHE_CHECON;
  10962. CHECON : longWord;
  10963. CHECONCLR : longWord;
  10964. CHECONSET : longWord;
  10965. CHECONINV : longWord;
  10966. CHEACC : longWord;
  10967. CHEACCCLR : longWord;
  10968. CHEACCSET : longWord;
  10969. CHEACCINV : longWord;
  10970. CHETAGbits : TPCACHE_CHETAG;
  10971. CHETAG : longWord;
  10972. CHETAGCLR : longWord;
  10973. CHETAGSET : longWord;
  10974. CHETAGINV : longWord;
  10975. CHEMSK : longWord;
  10976. CHEMSKCLR : longWord;
  10977. CHEMSKSET : longWord;
  10978. CHEMSKINV : longWord;
  10979. CHEW0 : longWord;
  10980. CHEW1 : longWord;
  10981. CHEW2 : longWord;
  10982. CHEW3 : longWord;
  10983. CHELRU : longWord;
  10984. CHEHIT : longWord;
  10985. CHEMIS : longWord;
  10986. CHEPFABT : longWord;
  10987. end;
  10988. TUSB_U1IR = record
  10989. private
  10990. function getATTACHIF : TBits_1; inline;
  10991. function getDETACHIF : TBits_1; inline;
  10992. function getIDLEIF : TBits_1; inline;
  10993. function getRESUMEIF : TBits_1; inline;
  10994. function getSOFIF : TBits_1; inline;
  10995. function getSTALLIF : TBits_1; inline;
  10996. function getTRNIF : TBits_1; inline;
  10997. function getUERRIF : TBits_1; inline;
  10998. function getURSTIF : TBits_1; inline;
  10999. function getURSTIF_DETACHIF : TBits_1; inline;
  11000. procedure setATTACHIF(thebits : TBits_1); inline;
  11001. procedure setDETACHIF(thebits : TBits_1); inline;
  11002. procedure setIDLEIF(thebits : TBits_1); inline;
  11003. procedure setRESUMEIF(thebits : TBits_1); inline;
  11004. procedure setSOFIF(thebits : TBits_1); inline;
  11005. procedure setSTALLIF(thebits : TBits_1); inline;
  11006. procedure setTRNIF(thebits : TBits_1); inline;
  11007. procedure setUERRIF(thebits : TBits_1); inline;
  11008. procedure setURSTIF(thebits : TBits_1); inline;
  11009. procedure setURSTIF_DETACHIF(thebits : TBits_1); inline;
  11010. public
  11011. procedure clearATTACHIF; inline;
  11012. procedure clearDETACHIF; inline;
  11013. procedure clearIDLEIF; inline;
  11014. procedure clearRESUMEIF; inline;
  11015. procedure clearSOFIF; inline;
  11016. procedure clearSTALLIF; inline;
  11017. procedure clearTRNIF; inline;
  11018. procedure clearUERRIF; inline;
  11019. procedure clearURSTIF; inline;
  11020. procedure clearURSTIF_DETACHIF; inline;
  11021. procedure setATTACHIF; inline;
  11022. procedure setDETACHIF; inline;
  11023. procedure setIDLEIF; inline;
  11024. procedure setRESUMEIF; inline;
  11025. procedure setSOFIF; inline;
  11026. procedure setSTALLIF; inline;
  11027. procedure setTRNIF; inline;
  11028. procedure setUERRIF; inline;
  11029. procedure setURSTIF; inline;
  11030. procedure setURSTIF_DETACHIF; inline;
  11031. property ATTACHIF : TBits_1 read getATTACHIF write setATTACHIF;
  11032. property DETACHIF : TBits_1 read getDETACHIF write setDETACHIF;
  11033. property IDLEIF : TBits_1 read getIDLEIF write setIDLEIF;
  11034. property RESUMEIF : TBits_1 read getRESUMEIF write setRESUMEIF;
  11035. property SOFIF : TBits_1 read getSOFIF write setSOFIF;
  11036. property STALLIF : TBits_1 read getSTALLIF write setSTALLIF;
  11037. property TRNIF : TBits_1 read getTRNIF write setTRNIF;
  11038. property UERRIF : TBits_1 read getUERRIF write setUERRIF;
  11039. property URSTIF : TBits_1 read getURSTIF write setURSTIF;
  11040. property URSTIF_DETACHIF : TBits_1 read getURSTIF_DETACHIF write setURSTIF_DETACHIF;
  11041. end;
  11042. TUSB_U1IE = record
  11043. private
  11044. function getATTACHIE : TBits_1; inline;
  11045. function getDETACHIE : TBits_1; inline;
  11046. function getIDLEIE : TBits_1; inline;
  11047. function getRESUMEIE : TBits_1; inline;
  11048. function getSOFIE : TBits_1; inline;
  11049. function getSTALLIE : TBits_1; inline;
  11050. function getTRNIE : TBits_1; inline;
  11051. function getUERRIE : TBits_1; inline;
  11052. function getURSTIE : TBits_1; inline;
  11053. function getURSTIE_DETACHIE : TBits_1; inline;
  11054. procedure setATTACHIE(thebits : TBits_1); inline;
  11055. procedure setDETACHIE(thebits : TBits_1); inline;
  11056. procedure setIDLEIE(thebits : TBits_1); inline;
  11057. procedure setRESUMEIE(thebits : TBits_1); inline;
  11058. procedure setSOFIE(thebits : TBits_1); inline;
  11059. procedure setSTALLIE(thebits : TBits_1); inline;
  11060. procedure setTRNIE(thebits : TBits_1); inline;
  11061. procedure setUERRIE(thebits : TBits_1); inline;
  11062. procedure setURSTIE(thebits : TBits_1); inline;
  11063. procedure setURSTIE_DETACHIE(thebits : TBits_1); inline;
  11064. public
  11065. procedure clearATTACHIE; inline;
  11066. procedure clearDETACHIE; inline;
  11067. procedure clearIDLEIE; inline;
  11068. procedure clearRESUMEIE; inline;
  11069. procedure clearSOFIE; inline;
  11070. procedure clearSTALLIE; inline;
  11071. procedure clearTRNIE; inline;
  11072. procedure clearUERRIE; inline;
  11073. procedure clearURSTIE; inline;
  11074. procedure clearURSTIE_DETACHIE; inline;
  11075. procedure setATTACHIE; inline;
  11076. procedure setDETACHIE; inline;
  11077. procedure setIDLEIE; inline;
  11078. procedure setRESUMEIE; inline;
  11079. procedure setSOFIE; inline;
  11080. procedure setSTALLIE; inline;
  11081. procedure setTRNIE; inline;
  11082. procedure setUERRIE; inline;
  11083. procedure setURSTIE; inline;
  11084. procedure setURSTIE_DETACHIE; inline;
  11085. property ATTACHIE : TBits_1 read getATTACHIE write setATTACHIE;
  11086. property DETACHIE : TBits_1 read getDETACHIE write setDETACHIE;
  11087. property IDLEIE : TBits_1 read getIDLEIE write setIDLEIE;
  11088. property RESUMEIE : TBits_1 read getRESUMEIE write setRESUMEIE;
  11089. property SOFIE : TBits_1 read getSOFIE write setSOFIE;
  11090. property STALLIE : TBits_1 read getSTALLIE write setSTALLIE;
  11091. property TRNIE : TBits_1 read getTRNIE write setTRNIE;
  11092. property UERRIE : TBits_1 read getUERRIE write setUERRIE;
  11093. property URSTIE : TBits_1 read getURSTIE write setURSTIE;
  11094. property URSTIE_DETACHIE : TBits_1 read getURSTIE_DETACHIE write setURSTIE_DETACHIE;
  11095. end;
  11096. TUSB_U1EIR = record
  11097. private
  11098. function getBMXEF : TBits_1; inline;
  11099. function getBTOEF : TBits_1; inline;
  11100. function getBTSEF : TBits_1; inline;
  11101. function getCRC16EF : TBits_1; inline;
  11102. function getCRC5EF : TBits_1; inline;
  11103. function getCRC5EF_EOFEF : TBits_1; inline;
  11104. function getDFN8EF : TBits_1; inline;
  11105. function getDMAEF : TBits_1; inline;
  11106. function getEOFEF : TBits_1; inline;
  11107. function getPIDEF : TBits_1; inline;
  11108. procedure setBMXEF(thebits : TBits_1); inline;
  11109. procedure setBTOEF(thebits : TBits_1); inline;
  11110. procedure setBTSEF(thebits : TBits_1); inline;
  11111. procedure setCRC16EF(thebits : TBits_1); inline;
  11112. procedure setCRC5EF(thebits : TBits_1); inline;
  11113. procedure setCRC5EF_EOFEF(thebits : TBits_1); inline;
  11114. procedure setDFN8EF(thebits : TBits_1); inline;
  11115. procedure setDMAEF(thebits : TBits_1); inline;
  11116. procedure setEOFEF(thebits : TBits_1); inline;
  11117. procedure setPIDEF(thebits : TBits_1); inline;
  11118. public
  11119. procedure clearBMXEF; inline;
  11120. procedure clearBTOEF; inline;
  11121. procedure clearBTSEF; inline;
  11122. procedure clearCRC16EF; inline;
  11123. procedure clearCRC5EF; inline;
  11124. procedure clearCRC5EF_EOFEF; inline;
  11125. procedure clearDFN8EF; inline;
  11126. procedure clearDMAEF; inline;
  11127. procedure clearEOFEF; inline;
  11128. procedure clearPIDEF; inline;
  11129. procedure setBMXEF; inline;
  11130. procedure setBTOEF; inline;
  11131. procedure setBTSEF; inline;
  11132. procedure setCRC16EF; inline;
  11133. procedure setCRC5EF; inline;
  11134. procedure setCRC5EF_EOFEF; inline;
  11135. procedure setDFN8EF; inline;
  11136. procedure setDMAEF; inline;
  11137. procedure setEOFEF; inline;
  11138. procedure setPIDEF; inline;
  11139. property BMXEF : TBits_1 read getBMXEF write setBMXEF;
  11140. property BTOEF : TBits_1 read getBTOEF write setBTOEF;
  11141. property BTSEF : TBits_1 read getBTSEF write setBTSEF;
  11142. property CRC16EF : TBits_1 read getCRC16EF write setCRC16EF;
  11143. property CRC5EF : TBits_1 read getCRC5EF write setCRC5EF;
  11144. property CRC5EF_EOFEF : TBits_1 read getCRC5EF_EOFEF write setCRC5EF_EOFEF;
  11145. property DFN8EF : TBits_1 read getDFN8EF write setDFN8EF;
  11146. property DMAEF : TBits_1 read getDMAEF write setDMAEF;
  11147. property EOFEF : TBits_1 read getEOFEF write setEOFEF;
  11148. property PIDEF : TBits_1 read getPIDEF write setPIDEF;
  11149. end;
  11150. TUSB_U1EIE = record
  11151. private
  11152. function getBMXEE : TBits_1; inline;
  11153. function getBTOEE : TBits_1; inline;
  11154. function getBTSEE : TBits_1; inline;
  11155. function getCRC16EE : TBits_1; inline;
  11156. function getCRC5EE : TBits_1; inline;
  11157. function getCRC5EE_EOFEE : TBits_1; inline;
  11158. function getDFN8EE : TBits_1; inline;
  11159. function getDMAEE : TBits_1; inline;
  11160. function getEOFEE : TBits_1; inline;
  11161. function getPIDEE : TBits_1; inline;
  11162. procedure setBMXEE(thebits : TBits_1); inline;
  11163. procedure setBTOEE(thebits : TBits_1); inline;
  11164. procedure setBTSEE(thebits : TBits_1); inline;
  11165. procedure setCRC16EE(thebits : TBits_1); inline;
  11166. procedure setCRC5EE(thebits : TBits_1); inline;
  11167. procedure setCRC5EE_EOFEE(thebits : TBits_1); inline;
  11168. procedure setDFN8EE(thebits : TBits_1); inline;
  11169. procedure setDMAEE(thebits : TBits_1); inline;
  11170. procedure setEOFEE(thebits : TBits_1); inline;
  11171. procedure setPIDEE(thebits : TBits_1); inline;
  11172. public
  11173. procedure clearBMXEE; inline;
  11174. procedure clearBTOEE; inline;
  11175. procedure clearBTSEE; inline;
  11176. procedure clearCRC16EE; inline;
  11177. procedure clearCRC5EE; inline;
  11178. procedure clearCRC5EE_EOFEE; inline;
  11179. procedure clearDFN8EE; inline;
  11180. procedure clearDMAEE; inline;
  11181. procedure clearEOFEE; inline;
  11182. procedure clearPIDEE; inline;
  11183. procedure setBMXEE; inline;
  11184. procedure setBTOEE; inline;
  11185. procedure setBTSEE; inline;
  11186. procedure setCRC16EE; inline;
  11187. procedure setCRC5EE; inline;
  11188. procedure setCRC5EE_EOFEE; inline;
  11189. procedure setDFN8EE; inline;
  11190. procedure setDMAEE; inline;
  11191. procedure setEOFEE; inline;
  11192. procedure setPIDEE; inline;
  11193. property BMXEE : TBits_1 read getBMXEE write setBMXEE;
  11194. property BTOEE : TBits_1 read getBTOEE write setBTOEE;
  11195. property BTSEE : TBits_1 read getBTSEE write setBTSEE;
  11196. property CRC16EE : TBits_1 read getCRC16EE write setCRC16EE;
  11197. property CRC5EE : TBits_1 read getCRC5EE write setCRC5EE;
  11198. property CRC5EE_EOFEE : TBits_1 read getCRC5EE_EOFEE write setCRC5EE_EOFEE;
  11199. property DFN8EE : TBits_1 read getDFN8EE write setDFN8EE;
  11200. property DMAEE : TBits_1 read getDMAEE write setDMAEE;
  11201. property EOFEE : TBits_1 read getEOFEE write setEOFEE;
  11202. property PIDEE : TBits_1 read getPIDEE write setPIDEE;
  11203. end;
  11204. TUSB_U1STAT = record
  11205. private
  11206. function getDIR : TBits_1; inline;
  11207. function getENDPT : TBits_4; inline;
  11208. function getENDPT0 : TBits_1; inline;
  11209. function getENDPT1 : TBits_1; inline;
  11210. function getENDPT2 : TBits_1; inline;
  11211. function getENDPT3 : TBits_1; inline;
  11212. function getPPBI : TBits_1; inline;
  11213. procedure setDIR(thebits : TBits_1); inline;
  11214. procedure setENDPT(thebits : TBits_4); inline;
  11215. procedure setENDPT0(thebits : TBits_1); inline;
  11216. procedure setENDPT1(thebits : TBits_1); inline;
  11217. procedure setENDPT2(thebits : TBits_1); inline;
  11218. procedure setENDPT3(thebits : TBits_1); inline;
  11219. procedure setPPBI(thebits : TBits_1); inline;
  11220. public
  11221. procedure clearDIR; inline;
  11222. procedure clearENDPT0; inline;
  11223. procedure clearENDPT1; inline;
  11224. procedure clearENDPT2; inline;
  11225. procedure clearENDPT3; inline;
  11226. procedure clearPPBI; inline;
  11227. procedure setDIR; inline;
  11228. procedure setENDPT0; inline;
  11229. procedure setENDPT1; inline;
  11230. procedure setENDPT2; inline;
  11231. procedure setENDPT3; inline;
  11232. procedure setPPBI; inline;
  11233. property DIR : TBits_1 read getDIR write setDIR;
  11234. property ENDPT : TBits_4 read getENDPT write setENDPT;
  11235. property ENDPT0 : TBits_1 read getENDPT0 write setENDPT0;
  11236. property ENDPT1 : TBits_1 read getENDPT1 write setENDPT1;
  11237. property ENDPT2 : TBits_1 read getENDPT2 write setENDPT2;
  11238. property ENDPT3 : TBits_1 read getENDPT3 write setENDPT3;
  11239. property PPBI : TBits_1 read getPPBI write setPPBI;
  11240. end;
  11241. TUSB_U1CON = record
  11242. private
  11243. function getHOSTEN : TBits_1; inline;
  11244. function getJSTATE : TBits_1; inline;
  11245. function getPKTDIS : TBits_1; inline;
  11246. function getPKTDIS_TOKBUSY : TBits_1; inline;
  11247. function getPPBRST : TBits_1; inline;
  11248. function getRESUME : TBits_1; inline;
  11249. function getSE0 : TBits_1; inline;
  11250. function getSOFEN : TBits_1; inline;
  11251. function getTOKBUSY : TBits_1; inline;
  11252. function getUSBEN : TBits_1; inline;
  11253. function getUSBEN_SOFEN : TBits_1; inline;
  11254. function getUSBRST : TBits_1; inline;
  11255. procedure setHOSTEN(thebits : TBits_1); inline;
  11256. procedure setJSTATE(thebits : TBits_1); inline;
  11257. procedure setPKTDIS(thebits : TBits_1); inline;
  11258. procedure setPKTDIS_TOKBUSY(thebits : TBits_1); inline;
  11259. procedure setPPBRST(thebits : TBits_1); inline;
  11260. procedure setRESUME(thebits : TBits_1); inline;
  11261. procedure setSE0(thebits : TBits_1); inline;
  11262. procedure setSOFEN(thebits : TBits_1); inline;
  11263. procedure setTOKBUSY(thebits : TBits_1); inline;
  11264. procedure setUSBEN(thebits : TBits_1); inline;
  11265. procedure setUSBEN_SOFEN(thebits : TBits_1); inline;
  11266. procedure setUSBRST(thebits : TBits_1); inline;
  11267. public
  11268. procedure clearHOSTEN; inline;
  11269. procedure clearJSTATE; inline;
  11270. procedure clearPKTDIS; inline;
  11271. procedure clearPKTDIS_TOKBUSY; inline;
  11272. procedure clearPPBRST; inline;
  11273. procedure clearRESUME; inline;
  11274. procedure clearSE0; inline;
  11275. procedure clearSOFEN; inline;
  11276. procedure clearTOKBUSY; inline;
  11277. procedure clearUSBEN; inline;
  11278. procedure clearUSBEN_SOFEN; inline;
  11279. procedure clearUSBRST; inline;
  11280. procedure setHOSTEN; inline;
  11281. procedure setJSTATE; inline;
  11282. procedure setPKTDIS; inline;
  11283. procedure setPKTDIS_TOKBUSY; inline;
  11284. procedure setPPBRST; inline;
  11285. procedure setRESUME; inline;
  11286. procedure setSE0; inline;
  11287. procedure setSOFEN; inline;
  11288. procedure setTOKBUSY; inline;
  11289. procedure setUSBEN; inline;
  11290. procedure setUSBEN_SOFEN; inline;
  11291. procedure setUSBRST; inline;
  11292. property HOSTEN : TBits_1 read getHOSTEN write setHOSTEN;
  11293. property JSTATE : TBits_1 read getJSTATE write setJSTATE;
  11294. property PKTDIS : TBits_1 read getPKTDIS write setPKTDIS;
  11295. property PKTDIS_TOKBUSY : TBits_1 read getPKTDIS_TOKBUSY write setPKTDIS_TOKBUSY;
  11296. property PPBRST : TBits_1 read getPPBRST write setPPBRST;
  11297. property RESUME : TBits_1 read getRESUME write setRESUME;
  11298. property SE0 : TBits_1 read getSE0 write setSE0;
  11299. property SOFEN : TBits_1 read getSOFEN write setSOFEN;
  11300. property TOKBUSY : TBits_1 read getTOKBUSY write setTOKBUSY;
  11301. property USBEN : TBits_1 read getUSBEN write setUSBEN;
  11302. property USBEN_SOFEN : TBits_1 read getUSBEN_SOFEN write setUSBEN_SOFEN;
  11303. property USBRST : TBits_1 read getUSBRST write setUSBRST;
  11304. end;
  11305. TUSB_U1ADDR = record
  11306. private
  11307. function getDEVADDR : TBits_7; inline;
  11308. function getDEVADDR0 : TBits_1; inline;
  11309. function getDEVADDR1 : TBits_1; inline;
  11310. function getDEVADDR2 : TBits_1; inline;
  11311. function getDEVADDR3 : TBits_1; inline;
  11312. function getDEVADDR4 : TBits_1; inline;
  11313. function getDEVADDR5 : TBits_1; inline;
  11314. function getDEVADDR6 : TBits_1; inline;
  11315. function getLSPDEN : TBits_1; inline;
  11316. procedure setDEVADDR(thebits : TBits_7); inline;
  11317. procedure setDEVADDR0(thebits : TBits_1); inline;
  11318. procedure setDEVADDR1(thebits : TBits_1); inline;
  11319. procedure setDEVADDR2(thebits : TBits_1); inline;
  11320. procedure setDEVADDR3(thebits : TBits_1); inline;
  11321. procedure setDEVADDR4(thebits : TBits_1); inline;
  11322. procedure setDEVADDR5(thebits : TBits_1); inline;
  11323. procedure setDEVADDR6(thebits : TBits_1); inline;
  11324. procedure setLSPDEN(thebits : TBits_1); inline;
  11325. public
  11326. procedure clearDEVADDR0; inline;
  11327. procedure clearDEVADDR1; inline;
  11328. procedure clearDEVADDR2; inline;
  11329. procedure clearDEVADDR3; inline;
  11330. procedure clearDEVADDR4; inline;
  11331. procedure clearDEVADDR5; inline;
  11332. procedure clearDEVADDR6; inline;
  11333. procedure clearLSPDEN; inline;
  11334. procedure setDEVADDR0; inline;
  11335. procedure setDEVADDR1; inline;
  11336. procedure setDEVADDR2; inline;
  11337. procedure setDEVADDR3; inline;
  11338. procedure setDEVADDR4; inline;
  11339. procedure setDEVADDR5; inline;
  11340. procedure setDEVADDR6; inline;
  11341. procedure setLSPDEN; inline;
  11342. property DEVADDR : TBits_7 read getDEVADDR write setDEVADDR;
  11343. property DEVADDR0 : TBits_1 read getDEVADDR0 write setDEVADDR0;
  11344. property DEVADDR1 : TBits_1 read getDEVADDR1 write setDEVADDR1;
  11345. property DEVADDR2 : TBits_1 read getDEVADDR2 write setDEVADDR2;
  11346. property DEVADDR3 : TBits_1 read getDEVADDR3 write setDEVADDR3;
  11347. property DEVADDR4 : TBits_1 read getDEVADDR4 write setDEVADDR4;
  11348. property DEVADDR5 : TBits_1 read getDEVADDR5 write setDEVADDR5;
  11349. property DEVADDR6 : TBits_1 read getDEVADDR6 write setDEVADDR6;
  11350. property LSPDEN : TBits_1 read getLSPDEN write setLSPDEN;
  11351. end;
  11352. TUSB_U1FRML = record
  11353. private
  11354. function getFRM0 : TBits_1; inline;
  11355. function getFRM1 : TBits_1; inline;
  11356. function getFRM2 : TBits_1; inline;
  11357. function getFRM3 : TBits_1; inline;
  11358. function getFRM4 : TBits_1; inline;
  11359. function getFRM5 : TBits_1; inline;
  11360. function getFRM6 : TBits_1; inline;
  11361. function getFRM7 : TBits_1; inline;
  11362. function getFRML : TBits_8; inline;
  11363. procedure setFRM0(thebits : TBits_1); inline;
  11364. procedure setFRM1(thebits : TBits_1); inline;
  11365. procedure setFRM2(thebits : TBits_1); inline;
  11366. procedure setFRM3(thebits : TBits_1); inline;
  11367. procedure setFRM4(thebits : TBits_1); inline;
  11368. procedure setFRM5(thebits : TBits_1); inline;
  11369. procedure setFRM6(thebits : TBits_1); inline;
  11370. procedure setFRM7(thebits : TBits_1); inline;
  11371. procedure setFRML(thebits : TBits_8); inline;
  11372. public
  11373. procedure clearFRM0; inline;
  11374. procedure clearFRM1; inline;
  11375. procedure clearFRM2; inline;
  11376. procedure clearFRM3; inline;
  11377. procedure clearFRM4; inline;
  11378. procedure clearFRM5; inline;
  11379. procedure clearFRM6; inline;
  11380. procedure clearFRM7; inline;
  11381. procedure setFRM0; inline;
  11382. procedure setFRM1; inline;
  11383. procedure setFRM2; inline;
  11384. procedure setFRM3; inline;
  11385. procedure setFRM4; inline;
  11386. procedure setFRM5; inline;
  11387. procedure setFRM6; inline;
  11388. procedure setFRM7; inline;
  11389. property FRM0 : TBits_1 read getFRM0 write setFRM0;
  11390. property FRM1 : TBits_1 read getFRM1 write setFRM1;
  11391. property FRM2 : TBits_1 read getFRM2 write setFRM2;
  11392. property FRM3 : TBits_1 read getFRM3 write setFRM3;
  11393. property FRM4 : TBits_1 read getFRM4 write setFRM4;
  11394. property FRM5 : TBits_1 read getFRM5 write setFRM5;
  11395. property FRM6 : TBits_1 read getFRM6 write setFRM6;
  11396. property FRM7 : TBits_1 read getFRM7 write setFRM7;
  11397. property FRML : TBits_8 read getFRML write setFRML;
  11398. end;
  11399. TUSB_U1FRMH = record
  11400. private
  11401. function getFRM10 : TBits_1; inline;
  11402. function getFRM8 : TBits_1; inline;
  11403. function getFRM9 : TBits_1; inline;
  11404. function getFRMH : TBits_3; inline;
  11405. procedure setFRM10(thebits : TBits_1); inline;
  11406. procedure setFRM8(thebits : TBits_1); inline;
  11407. procedure setFRM9(thebits : TBits_1); inline;
  11408. procedure setFRMH(thebits : TBits_3); inline;
  11409. public
  11410. procedure clearFRM10; inline;
  11411. procedure clearFRM8; inline;
  11412. procedure clearFRM9; inline;
  11413. procedure setFRM10; inline;
  11414. procedure setFRM8; inline;
  11415. procedure setFRM9; inline;
  11416. property FRM10 : TBits_1 read getFRM10 write setFRM10;
  11417. property FRM8 : TBits_1 read getFRM8 write setFRM8;
  11418. property FRM9 : TBits_1 read getFRM9 write setFRM9;
  11419. property FRMH : TBits_3 read getFRMH write setFRMH;
  11420. end;
  11421. TUSB_U1TOK = record
  11422. private
  11423. function getEP : TBits_4; inline;
  11424. function getEP0 : TBits_1; inline;
  11425. function getEP1 : TBits_1; inline;
  11426. function getEP2 : TBits_1; inline;
  11427. function getEP3 : TBits_1; inline;
  11428. function getPID : TBits_4; inline;
  11429. function getPID0 : TBits_1; inline;
  11430. function getPID1 : TBits_1; inline;
  11431. function getPID2 : TBits_1; inline;
  11432. function getPID3 : TBits_1; inline;
  11433. procedure setEP(thebits : TBits_4); inline;
  11434. procedure setEP0(thebits : TBits_1); inline;
  11435. procedure setEP1(thebits : TBits_1); inline;
  11436. procedure setEP2(thebits : TBits_1); inline;
  11437. procedure setEP3(thebits : TBits_1); inline;
  11438. procedure setPID(thebits : TBits_4); inline;
  11439. procedure setPID0(thebits : TBits_1); inline;
  11440. procedure setPID1(thebits : TBits_1); inline;
  11441. procedure setPID2(thebits : TBits_1); inline;
  11442. procedure setPID3(thebits : TBits_1); inline;
  11443. public
  11444. procedure clearEP0; inline;
  11445. procedure clearEP1; inline;
  11446. procedure clearEP2; inline;
  11447. procedure clearEP3; inline;
  11448. procedure clearPID0; inline;
  11449. procedure clearPID1; inline;
  11450. procedure clearPID2; inline;
  11451. procedure clearPID3; inline;
  11452. procedure setEP0; inline;
  11453. procedure setEP1; inline;
  11454. procedure setEP2; inline;
  11455. procedure setEP3; inline;
  11456. procedure setPID0; inline;
  11457. procedure setPID1; inline;
  11458. procedure setPID2; inline;
  11459. procedure setPID3; inline;
  11460. property EP : TBits_4 read getEP write setEP;
  11461. property EP0 : TBits_1 read getEP0 write setEP0;
  11462. property EP1 : TBits_1 read getEP1 write setEP1;
  11463. property EP2 : TBits_1 read getEP2 write setEP2;
  11464. property EP3 : TBits_1 read getEP3 write setEP3;
  11465. property PID : TBits_4 read getPID write setPID;
  11466. property PID0 : TBits_1 read getPID0 write setPID0;
  11467. property PID1 : TBits_1 read getPID1 write setPID1;
  11468. property PID2 : TBits_1 read getPID2 write setPID2;
  11469. property PID3 : TBits_1 read getPID3 write setPID3;
  11470. end;
  11471. type
  11472. TUSBRegisters = record
  11473. U1OTGIR : longWord;
  11474. U1OTGIRCLR : longWord;
  11475. U1OTGIE : longWord;
  11476. U1OTGIECLR : longWord;
  11477. U1OTGIESET : longWord;
  11478. U1OTGIEINV : longWord;
  11479. U1OTGSTAT : longWord;
  11480. U1OTGCON : longWord;
  11481. U1OTGCONCLR : longWord;
  11482. U1OTGCONSET : longWord;
  11483. U1OTGCONINV : longWord;
  11484. U1PWRC : longWord;
  11485. U1PWRCCLR : longWord;
  11486. U1PWRCSET : longWord;
  11487. U1PWRCINV : longWord;
  11488. U1IRbits : TUSB_U1IR;
  11489. U1IR : longWord;
  11490. U1IRCLR : longWord;
  11491. U1IEbits : TUSB_U1IE;
  11492. U1IE : longWord;
  11493. U1IECLR : longWord;
  11494. U1IESET : longWord;
  11495. U1IEINV : longWord;
  11496. U1EIRbits : TUSB_U1EIR;
  11497. U1EIR : longWord;
  11498. U1EIRCLR : longWord;
  11499. U1EIEbits : TUSB_U1EIE;
  11500. U1EIE : longWord;
  11501. U1EIECLR : longWord;
  11502. U1EIESET : longWord;
  11503. U1EIEINV : longWord;
  11504. U1STATbits : TUSB_U1STAT;
  11505. U1STAT : longWord;
  11506. U1CONbits : TUSB_U1CON;
  11507. U1CON : longWord;
  11508. U1CONCLR : longWord;
  11509. U1CONSET : longWord;
  11510. U1CONINV : longWord;
  11511. U1ADDRbits : TUSB_U1ADDR;
  11512. U1ADDR : longWord;
  11513. U1ADDRCLR : longWord;
  11514. U1ADDRSET : longWord;
  11515. U1ADDRINV : longWord;
  11516. U1BDTP1 : longWord;
  11517. U1BDTP1CLR : longWord;
  11518. U1BDTP1SET : longWord;
  11519. U1BDTP1INV : longWord;
  11520. U1FRMLbits : TUSB_U1FRML;
  11521. U1FRML : longWord;
  11522. U1FRMHbits : TUSB_U1FRMH;
  11523. U1FRMH : longWord;
  11524. U1TOKbits : TUSB_U1TOK;
  11525. U1TOK : longWord;
  11526. U1TOKCLR : longWord;
  11527. U1TOKSET : longWord;
  11528. U1TOKINV : longWord;
  11529. U1SOF : longWord;
  11530. U1SOFCLR : longWord;
  11531. U1SOFSET : longWord;
  11532. U1SOFINV : longWord;
  11533. U1BDTP2 : longWord;
  11534. U1BDTP2CLR : longWord;
  11535. U1BDTP2SET : longWord;
  11536. U1BDTP2INV : longWord;
  11537. U1BDTP3 : longWord;
  11538. U1BDTP3CLR : longWord;
  11539. U1BDTP3SET : longWord;
  11540. U1BDTP3INV : longWord;
  11541. U1CNFG1 : longWord;
  11542. U1CNFG1CLR : longWord;
  11543. U1CNFG1SET : longWord;
  11544. U1CNFG1INV : longWord;
  11545. U1EP0 : longWord;
  11546. U1EP0CLR : longWord;
  11547. U1EP0SET : longWord;
  11548. U1EP0INV : longWord;
  11549. U1EP1 : longWord;
  11550. U1EP1CLR : longWord;
  11551. U1EP1SET : longWord;
  11552. U1EP1INV : longWord;
  11553. U1EP2 : longWord;
  11554. U1EP2CLR : longWord;
  11555. U1EP2SET : longWord;
  11556. U1EP2INV : longWord;
  11557. U1EP3 : longWord;
  11558. U1EP3CLR : longWord;
  11559. U1EP3SET : longWord;
  11560. U1EP3INV : longWord;
  11561. U1EP4 : longWord;
  11562. U1EP4CLR : longWord;
  11563. U1EP4SET : longWord;
  11564. U1EP4INV : longWord;
  11565. U1EP5 : longWord;
  11566. U1EP5CLR : longWord;
  11567. U1EP5SET : longWord;
  11568. U1EP5INV : longWord;
  11569. U1EP6 : longWord;
  11570. U1EP6CLR : longWord;
  11571. U1EP6SET : longWord;
  11572. U1EP6INV : longWord;
  11573. U1EP7 : longWord;
  11574. U1EP7CLR : longWord;
  11575. U1EP7SET : longWord;
  11576. U1EP7INV : longWord;
  11577. U1EP8 : longWord;
  11578. U1EP8CLR : longWord;
  11579. U1EP8SET : longWord;
  11580. U1EP8INV : longWord;
  11581. U1EP9 : longWord;
  11582. U1EP9CLR : longWord;
  11583. U1EP9SET : longWord;
  11584. U1EP9INV : longWord;
  11585. U1EP10 : longWord;
  11586. U1EP10CLR : longWord;
  11587. U1EP10SET : longWord;
  11588. U1EP10INV : longWord;
  11589. U1EP11 : longWord;
  11590. U1EP11CLR : longWord;
  11591. U1EP11SET : longWord;
  11592. U1EP11INV : longWord;
  11593. U1EP12 : longWord;
  11594. U1EP12CLR : longWord;
  11595. U1EP12SET : longWord;
  11596. U1EP12INV : longWord;
  11597. U1EP13 : longWord;
  11598. U1EP13CLR : longWord;
  11599. U1EP13SET : longWord;
  11600. U1EP13INV : longWord;
  11601. U1EP14 : longWord;
  11602. U1EP14CLR : longWord;
  11603. U1EP14SET : longWord;
  11604. U1EP14INV : longWord;
  11605. U1EP15 : longWord;
  11606. U1EP15CLR : longWord;
  11607. U1EP15SET : longWord;
  11608. U1EP15INV : longWord;
  11609. end;
  11610. TPORTB_TRISB = record
  11611. private
  11612. function getTRISB0 : TBits_1; inline;
  11613. function getTRISB1 : TBits_1; inline;
  11614. function getTRISB10 : TBits_1; inline;
  11615. function getTRISB11 : TBits_1; inline;
  11616. function getTRISB12 : TBits_1; inline;
  11617. function getTRISB13 : TBits_1; inline;
  11618. function getTRISB14 : TBits_1; inline;
  11619. function getTRISB15 : TBits_1; inline;
  11620. function getTRISB2 : TBits_1; inline;
  11621. function getTRISB3 : TBits_1; inline;
  11622. function getTRISB4 : TBits_1; inline;
  11623. function getTRISB5 : TBits_1; inline;
  11624. function getTRISB6 : TBits_1; inline;
  11625. function getTRISB7 : TBits_1; inline;
  11626. function getTRISB8 : TBits_1; inline;
  11627. function getTRISB9 : TBits_1; inline;
  11628. function getw : TBits_32; inline;
  11629. procedure setTRISB0(thebits : TBits_1); inline;
  11630. procedure setTRISB1(thebits : TBits_1); inline;
  11631. procedure setTRISB10(thebits : TBits_1); inline;
  11632. procedure setTRISB11(thebits : TBits_1); inline;
  11633. procedure setTRISB12(thebits : TBits_1); inline;
  11634. procedure setTRISB13(thebits : TBits_1); inline;
  11635. procedure setTRISB14(thebits : TBits_1); inline;
  11636. procedure setTRISB15(thebits : TBits_1); inline;
  11637. procedure setTRISB2(thebits : TBits_1); inline;
  11638. procedure setTRISB3(thebits : TBits_1); inline;
  11639. procedure setTRISB4(thebits : TBits_1); inline;
  11640. procedure setTRISB5(thebits : TBits_1); inline;
  11641. procedure setTRISB6(thebits : TBits_1); inline;
  11642. procedure setTRISB7(thebits : TBits_1); inline;
  11643. procedure setTRISB8(thebits : TBits_1); inline;
  11644. procedure setTRISB9(thebits : TBits_1); inline;
  11645. procedure setw(thebits : TBits_32); inline;
  11646. public
  11647. procedure clearTRISB0; inline;
  11648. procedure clearTRISB10; inline;
  11649. procedure clearTRISB11; inline;
  11650. procedure clearTRISB12; inline;
  11651. procedure clearTRISB13; inline;
  11652. procedure clearTRISB14; inline;
  11653. procedure clearTRISB15; inline;
  11654. procedure clearTRISB1; inline;
  11655. procedure clearTRISB2; inline;
  11656. procedure clearTRISB3; inline;
  11657. procedure clearTRISB4; inline;
  11658. procedure clearTRISB5; inline;
  11659. procedure clearTRISB6; inline;
  11660. procedure clearTRISB7; inline;
  11661. procedure clearTRISB8; inline;
  11662. procedure clearTRISB9; inline;
  11663. procedure setTRISB0; inline;
  11664. procedure setTRISB10; inline;
  11665. procedure setTRISB11; inline;
  11666. procedure setTRISB12; inline;
  11667. procedure setTRISB13; inline;
  11668. procedure setTRISB14; inline;
  11669. procedure setTRISB15; inline;
  11670. procedure setTRISB1; inline;
  11671. procedure setTRISB2; inline;
  11672. procedure setTRISB3; inline;
  11673. procedure setTRISB4; inline;
  11674. procedure setTRISB5; inline;
  11675. procedure setTRISB6; inline;
  11676. procedure setTRISB7; inline;
  11677. procedure setTRISB8; inline;
  11678. procedure setTRISB9; inline;
  11679. property TRISB0 : TBits_1 read getTRISB0 write setTRISB0;
  11680. property TRISB1 : TBits_1 read getTRISB1 write setTRISB1;
  11681. property TRISB10 : TBits_1 read getTRISB10 write setTRISB10;
  11682. property TRISB11 : TBits_1 read getTRISB11 write setTRISB11;
  11683. property TRISB12 : TBits_1 read getTRISB12 write setTRISB12;
  11684. property TRISB13 : TBits_1 read getTRISB13 write setTRISB13;
  11685. property TRISB14 : TBits_1 read getTRISB14 write setTRISB14;
  11686. property TRISB15 : TBits_1 read getTRISB15 write setTRISB15;
  11687. property TRISB2 : TBits_1 read getTRISB2 write setTRISB2;
  11688. property TRISB3 : TBits_1 read getTRISB3 write setTRISB3;
  11689. property TRISB4 : TBits_1 read getTRISB4 write setTRISB4;
  11690. property TRISB5 : TBits_1 read getTRISB5 write setTRISB5;
  11691. property TRISB6 : TBits_1 read getTRISB6 write setTRISB6;
  11692. property TRISB7 : TBits_1 read getTRISB7 write setTRISB7;
  11693. property TRISB8 : TBits_1 read getTRISB8 write setTRISB8;
  11694. property TRISB9 : TBits_1 read getTRISB9 write setTRISB9;
  11695. property w : TBits_32 read getw write setw;
  11696. end;
  11697. TPORTB_PORTB = record
  11698. private
  11699. function getRB0 : TBits_1; inline;
  11700. function getRB1 : TBits_1; inline;
  11701. function getRB10 : TBits_1; inline;
  11702. function getRB11 : TBits_1; inline;
  11703. function getRB12 : TBits_1; inline;
  11704. function getRB13 : TBits_1; inline;
  11705. function getRB14 : TBits_1; inline;
  11706. function getRB15 : TBits_1; inline;
  11707. function getRB2 : TBits_1; inline;
  11708. function getRB3 : TBits_1; inline;
  11709. function getRB4 : TBits_1; inline;
  11710. function getRB5 : TBits_1; inline;
  11711. function getRB6 : TBits_1; inline;
  11712. function getRB7 : TBits_1; inline;
  11713. function getRB8 : TBits_1; inline;
  11714. function getRB9 : TBits_1; inline;
  11715. function getw : TBits_32; inline;
  11716. procedure setRB0(thebits : TBits_1); inline;
  11717. procedure setRB1(thebits : TBits_1); inline;
  11718. procedure setRB10(thebits : TBits_1); inline;
  11719. procedure setRB11(thebits : TBits_1); inline;
  11720. procedure setRB12(thebits : TBits_1); inline;
  11721. procedure setRB13(thebits : TBits_1); inline;
  11722. procedure setRB14(thebits : TBits_1); inline;
  11723. procedure setRB15(thebits : TBits_1); inline;
  11724. procedure setRB2(thebits : TBits_1); inline;
  11725. procedure setRB3(thebits : TBits_1); inline;
  11726. procedure setRB4(thebits : TBits_1); inline;
  11727. procedure setRB5(thebits : TBits_1); inline;
  11728. procedure setRB6(thebits : TBits_1); inline;
  11729. procedure setRB7(thebits : TBits_1); inline;
  11730. procedure setRB8(thebits : TBits_1); inline;
  11731. procedure setRB9(thebits : TBits_1); inline;
  11732. procedure setw(thebits : TBits_32); inline;
  11733. public
  11734. procedure clearRB0; inline;
  11735. procedure clearRB10; inline;
  11736. procedure clearRB11; inline;
  11737. procedure clearRB12; inline;
  11738. procedure clearRB13; inline;
  11739. procedure clearRB14; inline;
  11740. procedure clearRB15; inline;
  11741. procedure clearRB1; inline;
  11742. procedure clearRB2; inline;
  11743. procedure clearRB3; inline;
  11744. procedure clearRB4; inline;
  11745. procedure clearRB5; inline;
  11746. procedure clearRB6; inline;
  11747. procedure clearRB7; inline;
  11748. procedure clearRB8; inline;
  11749. procedure clearRB9; inline;
  11750. procedure setRB0; inline;
  11751. procedure setRB10; inline;
  11752. procedure setRB11; inline;
  11753. procedure setRB12; inline;
  11754. procedure setRB13; inline;
  11755. procedure setRB14; inline;
  11756. procedure setRB15; inline;
  11757. procedure setRB1; inline;
  11758. procedure setRB2; inline;
  11759. procedure setRB3; inline;
  11760. procedure setRB4; inline;
  11761. procedure setRB5; inline;
  11762. procedure setRB6; inline;
  11763. procedure setRB7; inline;
  11764. procedure setRB8; inline;
  11765. procedure setRB9; inline;
  11766. property RB0 : TBits_1 read getRB0 write setRB0;
  11767. property RB1 : TBits_1 read getRB1 write setRB1;
  11768. property RB10 : TBits_1 read getRB10 write setRB10;
  11769. property RB11 : TBits_1 read getRB11 write setRB11;
  11770. property RB12 : TBits_1 read getRB12 write setRB12;
  11771. property RB13 : TBits_1 read getRB13 write setRB13;
  11772. property RB14 : TBits_1 read getRB14 write setRB14;
  11773. property RB15 : TBits_1 read getRB15 write setRB15;
  11774. property RB2 : TBits_1 read getRB2 write setRB2;
  11775. property RB3 : TBits_1 read getRB3 write setRB3;
  11776. property RB4 : TBits_1 read getRB4 write setRB4;
  11777. property RB5 : TBits_1 read getRB5 write setRB5;
  11778. property RB6 : TBits_1 read getRB6 write setRB6;
  11779. property RB7 : TBits_1 read getRB7 write setRB7;
  11780. property RB8 : TBits_1 read getRB8 write setRB8;
  11781. property RB9 : TBits_1 read getRB9 write setRB9;
  11782. property w : TBits_32 read getw write setw;
  11783. end;
  11784. 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);
  11785. TPortB_bitset = set of TPortB_bits;
  11786. TPORTB_LATB = record
  11787. private
  11788. function getLATB0 : TBits_1; inline;
  11789. function getLATB1 : TBits_1; inline;
  11790. function getLATB10 : TBits_1; inline;
  11791. function getLATB11 : TBits_1; inline;
  11792. function getLATB12 : TBits_1; inline;
  11793. function getLATB13 : TBits_1; inline;
  11794. function getLATB14 : TBits_1; inline;
  11795. function getLATB15 : TBits_1; inline;
  11796. function getLATB2 : TBits_1; inline;
  11797. function getLATB3 : TBits_1; inline;
  11798. function getLATB4 : TBits_1; inline;
  11799. function getLATB5 : TBits_1; inline;
  11800. function getLATB6 : TBits_1; inline;
  11801. function getLATB7 : TBits_1; inline;
  11802. function getLATB8 : TBits_1; inline;
  11803. function getLATB9 : TBits_1; inline;
  11804. function getw : TBits_32; inline;
  11805. procedure setLATB0(thebits : TBits_1); inline;
  11806. procedure setLATB1(thebits : TBits_1); inline;
  11807. procedure setLATB10(thebits : TBits_1); inline;
  11808. procedure setLATB11(thebits : TBits_1); inline;
  11809. procedure setLATB12(thebits : TBits_1); inline;
  11810. procedure setLATB13(thebits : TBits_1); inline;
  11811. procedure setLATB14(thebits : TBits_1); inline;
  11812. procedure setLATB15(thebits : TBits_1); inline;
  11813. procedure setLATB2(thebits : TBits_1); inline;
  11814. procedure setLATB3(thebits : TBits_1); inline;
  11815. procedure setLATB4(thebits : TBits_1); inline;
  11816. procedure setLATB5(thebits : TBits_1); inline;
  11817. procedure setLATB6(thebits : TBits_1); inline;
  11818. procedure setLATB7(thebits : TBits_1); inline;
  11819. procedure setLATB8(thebits : TBits_1); inline;
  11820. procedure setLATB9(thebits : TBits_1); inline;
  11821. procedure setw(thebits : TBits_32); inline;
  11822. public
  11823. procedure clearLATB0; inline;
  11824. procedure clearLATB10; inline;
  11825. procedure clearLATB11; inline;
  11826. procedure clearLATB12; inline;
  11827. procedure clearLATB13; inline;
  11828. procedure clearLATB14; inline;
  11829. procedure clearLATB15; inline;
  11830. procedure clearLATB1; inline;
  11831. procedure clearLATB2; inline;
  11832. procedure clearLATB3; inline;
  11833. procedure clearLATB4; inline;
  11834. procedure clearLATB5; inline;
  11835. procedure clearLATB6; inline;
  11836. procedure clearLATB7; inline;
  11837. procedure clearLATB8; inline;
  11838. procedure clearLATB9; inline;
  11839. procedure setLATB0; inline;
  11840. procedure setLATB10; inline;
  11841. procedure setLATB11; inline;
  11842. procedure setLATB12; inline;
  11843. procedure setLATB13; inline;
  11844. procedure setLATB14; inline;
  11845. procedure setLATB15; inline;
  11846. procedure setLATB1; inline;
  11847. procedure setLATB2; inline;
  11848. procedure setLATB3; inline;
  11849. procedure setLATB4; inline;
  11850. procedure setLATB5; inline;
  11851. procedure setLATB6; inline;
  11852. procedure setLATB7; inline;
  11853. procedure setLATB8; inline;
  11854. procedure setLATB9; inline;
  11855. property LATB0 : TBits_1 read getLATB0 write setLATB0;
  11856. property LATB1 : TBits_1 read getLATB1 write setLATB1;
  11857. property LATB10 : TBits_1 read getLATB10 write setLATB10;
  11858. property LATB11 : TBits_1 read getLATB11 write setLATB11;
  11859. property LATB12 : TBits_1 read getLATB12 write setLATB12;
  11860. property LATB13 : TBits_1 read getLATB13 write setLATB13;
  11861. property LATB14 : TBits_1 read getLATB14 write setLATB14;
  11862. property LATB15 : TBits_1 read getLATB15 write setLATB15;
  11863. property LATB2 : TBits_1 read getLATB2 write setLATB2;
  11864. property LATB3 : TBits_1 read getLATB3 write setLATB3;
  11865. property LATB4 : TBits_1 read getLATB4 write setLATB4;
  11866. property LATB5 : TBits_1 read getLATB5 write setLATB5;
  11867. property LATB6 : TBits_1 read getLATB6 write setLATB6;
  11868. property LATB7 : TBits_1 read getLATB7 write setLATB7;
  11869. property LATB8 : TBits_1 read getLATB8 write setLATB8;
  11870. property LATB9 : TBits_1 read getLATB9 write setLATB9;
  11871. property w : TBits_32 read getw write setw;
  11872. end;
  11873. TPORTB_ODCB = record
  11874. private
  11875. function getODCB0 : TBits_1; inline;
  11876. function getODCB1 : TBits_1; inline;
  11877. function getODCB10 : TBits_1; inline;
  11878. function getODCB11 : TBits_1; inline;
  11879. function getODCB12 : TBits_1; inline;
  11880. function getODCB13 : TBits_1; inline;
  11881. function getODCB14 : TBits_1; inline;
  11882. function getODCB15 : TBits_1; inline;
  11883. function getODCB2 : TBits_1; inline;
  11884. function getODCB3 : TBits_1; inline;
  11885. function getODCB4 : TBits_1; inline;
  11886. function getODCB5 : TBits_1; inline;
  11887. function getODCB6 : TBits_1; inline;
  11888. function getODCB7 : TBits_1; inline;
  11889. function getODCB8 : TBits_1; inline;
  11890. function getODCB9 : TBits_1; inline;
  11891. function getw : TBits_32; inline;
  11892. procedure setODCB0(thebits : TBits_1); inline;
  11893. procedure setODCB1(thebits : TBits_1); inline;
  11894. procedure setODCB10(thebits : TBits_1); inline;
  11895. procedure setODCB11(thebits : TBits_1); inline;
  11896. procedure setODCB12(thebits : TBits_1); inline;
  11897. procedure setODCB13(thebits : TBits_1); inline;
  11898. procedure setODCB14(thebits : TBits_1); inline;
  11899. procedure setODCB15(thebits : TBits_1); inline;
  11900. procedure setODCB2(thebits : TBits_1); inline;
  11901. procedure setODCB3(thebits : TBits_1); inline;
  11902. procedure setODCB4(thebits : TBits_1); inline;
  11903. procedure setODCB5(thebits : TBits_1); inline;
  11904. procedure setODCB6(thebits : TBits_1); inline;
  11905. procedure setODCB7(thebits : TBits_1); inline;
  11906. procedure setODCB8(thebits : TBits_1); inline;
  11907. procedure setODCB9(thebits : TBits_1); inline;
  11908. procedure setw(thebits : TBits_32); inline;
  11909. public
  11910. procedure clearODCB0; inline;
  11911. procedure clearODCB10; inline;
  11912. procedure clearODCB11; inline;
  11913. procedure clearODCB12; inline;
  11914. procedure clearODCB13; inline;
  11915. procedure clearODCB14; inline;
  11916. procedure clearODCB15; inline;
  11917. procedure clearODCB1; inline;
  11918. procedure clearODCB2; inline;
  11919. procedure clearODCB3; inline;
  11920. procedure clearODCB4; inline;
  11921. procedure clearODCB5; inline;
  11922. procedure clearODCB6; inline;
  11923. procedure clearODCB7; inline;
  11924. procedure clearODCB8; inline;
  11925. procedure clearODCB9; inline;
  11926. procedure setODCB0; inline;
  11927. procedure setODCB10; inline;
  11928. procedure setODCB11; inline;
  11929. procedure setODCB12; inline;
  11930. procedure setODCB13; inline;
  11931. procedure setODCB14; inline;
  11932. procedure setODCB15; inline;
  11933. procedure setODCB1; inline;
  11934. procedure setODCB2; inline;
  11935. procedure setODCB3; inline;
  11936. procedure setODCB4; inline;
  11937. procedure setODCB5; inline;
  11938. procedure setODCB6; inline;
  11939. procedure setODCB7; inline;
  11940. procedure setODCB8; inline;
  11941. procedure setODCB9; inline;
  11942. property ODCB0 : TBits_1 read getODCB0 write setODCB0;
  11943. property ODCB1 : TBits_1 read getODCB1 write setODCB1;
  11944. property ODCB10 : TBits_1 read getODCB10 write setODCB10;
  11945. property ODCB11 : TBits_1 read getODCB11 write setODCB11;
  11946. property ODCB12 : TBits_1 read getODCB12 write setODCB12;
  11947. property ODCB13 : TBits_1 read getODCB13 write setODCB13;
  11948. property ODCB14 : TBits_1 read getODCB14 write setODCB14;
  11949. property ODCB15 : TBits_1 read getODCB15 write setODCB15;
  11950. property ODCB2 : TBits_1 read getODCB2 write setODCB2;
  11951. property ODCB3 : TBits_1 read getODCB3 write setODCB3;
  11952. property ODCB4 : TBits_1 read getODCB4 write setODCB4;
  11953. property ODCB5 : TBits_1 read getODCB5 write setODCB5;
  11954. property ODCB6 : TBits_1 read getODCB6 write setODCB6;
  11955. property ODCB7 : TBits_1 read getODCB7 write setODCB7;
  11956. property ODCB8 : TBits_1 read getODCB8 write setODCB8;
  11957. property ODCB9 : TBits_1 read getODCB9 write setODCB9;
  11958. property w : TBits_32 read getw write setw;
  11959. end;
  11960. type
  11961. TPORTBRegisters = record
  11962. TRISBbits : TPORTB_TRISB;
  11963. TRISB : longWord;
  11964. TRISBCLR : longWord;
  11965. TRISBSET : longWord;
  11966. TRISBINV : longWord;
  11967. PORTBbits : TPORTB_PORTB;
  11968. PORTB : longWord;
  11969. PORTBCLR : longWord;
  11970. PORTBSET : longWord;
  11971. PORTBINV : longWord;
  11972. LATBbits : TPORTB_LATB;
  11973. LATB : longWord;
  11974. LATBCLR : longWord;
  11975. LATBSET : longWord;
  11976. LATBINV : longWord;
  11977. ODCBbits : TPORTB_ODCB;
  11978. ODCB : longWord;
  11979. ODCBCLR : longWord;
  11980. ODCBSET : longWord;
  11981. ODCBINV : longWord;
  11982. end;
  11983. TPORTC_TRISC = record
  11984. private
  11985. function getTRISC12 : TBits_1; inline;
  11986. function getTRISC13 : TBits_1; inline;
  11987. function getTRISC14 : TBits_1; inline;
  11988. function getTRISC15 : TBits_1; inline;
  11989. function getw : TBits_32; inline;
  11990. procedure setTRISC12(thebits : TBits_1); inline;
  11991. procedure setTRISC13(thebits : TBits_1); inline;
  11992. procedure setTRISC14(thebits : TBits_1); inline;
  11993. procedure setTRISC15(thebits : TBits_1); inline;
  11994. procedure setw(thebits : TBits_32); inline;
  11995. public
  11996. procedure clearTRISC12; inline;
  11997. procedure clearTRISC13; inline;
  11998. procedure clearTRISC14; inline;
  11999. procedure clearTRISC15; inline;
  12000. procedure setTRISC12; inline;
  12001. procedure setTRISC13; inline;
  12002. procedure setTRISC14; inline;
  12003. procedure setTRISC15; inline;
  12004. property TRISC12 : TBits_1 read getTRISC12 write setTRISC12;
  12005. property TRISC13 : TBits_1 read getTRISC13 write setTRISC13;
  12006. property TRISC14 : TBits_1 read getTRISC14 write setTRISC14;
  12007. property TRISC15 : TBits_1 read getTRISC15 write setTRISC15;
  12008. property w : TBits_32 read getw write setw;
  12009. end;
  12010. TPORTC_PORTC = record
  12011. private
  12012. function getRC12 : TBits_1; inline;
  12013. function getRC13 : TBits_1; inline;
  12014. function getRC14 : TBits_1; inline;
  12015. function getRC15 : TBits_1; inline;
  12016. function getw : TBits_32; inline;
  12017. procedure setRC12(thebits : TBits_1); inline;
  12018. procedure setRC13(thebits : TBits_1); inline;
  12019. procedure setRC14(thebits : TBits_1); inline;
  12020. procedure setRC15(thebits : TBits_1); inline;
  12021. procedure setw(thebits : TBits_32); inline;
  12022. public
  12023. procedure clearRC12; inline;
  12024. procedure clearRC13; inline;
  12025. procedure clearRC14; inline;
  12026. procedure clearRC15; inline;
  12027. procedure setRC12; inline;
  12028. procedure setRC13; inline;
  12029. procedure setRC14; inline;
  12030. procedure setRC15; inline;
  12031. property RC12 : TBits_1 read getRC12 write setRC12;
  12032. property RC13 : TBits_1 read getRC13 write setRC13;
  12033. property RC14 : TBits_1 read getRC14 write setRC14;
  12034. property RC15 : TBits_1 read getRC15 write setRC15;
  12035. property w : TBits_32 read getw write setw;
  12036. end;
  12037. TPortC_bits=(RC12=12,RC13=13,RC14=14,RC15=15);
  12038. TPortC_bitset = set of TPortC_bits;
  12039. TPORTC_LATC = record
  12040. private
  12041. function getLATC12 : TBits_1; inline;
  12042. function getLATC13 : TBits_1; inline;
  12043. function getLATC14 : TBits_1; inline;
  12044. function getLATC15 : TBits_1; inline;
  12045. function getw : TBits_32; inline;
  12046. procedure setLATC12(thebits : TBits_1); inline;
  12047. procedure setLATC13(thebits : TBits_1); inline;
  12048. procedure setLATC14(thebits : TBits_1); inline;
  12049. procedure setLATC15(thebits : TBits_1); inline;
  12050. procedure setw(thebits : TBits_32); inline;
  12051. public
  12052. procedure clearLATC12; inline;
  12053. procedure clearLATC13; inline;
  12054. procedure clearLATC14; inline;
  12055. procedure clearLATC15; inline;
  12056. procedure setLATC12; inline;
  12057. procedure setLATC13; inline;
  12058. procedure setLATC14; inline;
  12059. procedure setLATC15; inline;
  12060. property LATC12 : TBits_1 read getLATC12 write setLATC12;
  12061. property LATC13 : TBits_1 read getLATC13 write setLATC13;
  12062. property LATC14 : TBits_1 read getLATC14 write setLATC14;
  12063. property LATC15 : TBits_1 read getLATC15 write setLATC15;
  12064. property w : TBits_32 read getw write setw;
  12065. end;
  12066. TPORTC_ODCC = record
  12067. private
  12068. function getODCC12 : TBits_1; inline;
  12069. function getODCC13 : TBits_1; inline;
  12070. function getODCC14 : TBits_1; inline;
  12071. function getODCC15 : TBits_1; inline;
  12072. function getw : TBits_32; inline;
  12073. procedure setODCC12(thebits : TBits_1); inline;
  12074. procedure setODCC13(thebits : TBits_1); inline;
  12075. procedure setODCC14(thebits : TBits_1); inline;
  12076. procedure setODCC15(thebits : TBits_1); inline;
  12077. procedure setw(thebits : TBits_32); inline;
  12078. public
  12079. procedure clearODCC12; inline;
  12080. procedure clearODCC13; inline;
  12081. procedure clearODCC14; inline;
  12082. procedure clearODCC15; inline;
  12083. procedure setODCC12; inline;
  12084. procedure setODCC13; inline;
  12085. procedure setODCC14; inline;
  12086. procedure setODCC15; inline;
  12087. property ODCC12 : TBits_1 read getODCC12 write setODCC12;
  12088. property ODCC13 : TBits_1 read getODCC13 write setODCC13;
  12089. property ODCC14 : TBits_1 read getODCC14 write setODCC14;
  12090. property ODCC15 : TBits_1 read getODCC15 write setODCC15;
  12091. property w : TBits_32 read getw write setw;
  12092. end;
  12093. type
  12094. TPORTCRegisters = record
  12095. TRISCbits : TPORTC_TRISC;
  12096. TRISC : longWord;
  12097. TRISCCLR : longWord;
  12098. TRISCSET : longWord;
  12099. TRISCINV : longWord;
  12100. PORTCbits : TPORTC_PORTC;
  12101. PORTC : longWord;
  12102. PORTCCLR : longWord;
  12103. PORTCSET : longWord;
  12104. PORTCINV : longWord;
  12105. LATCbits : TPORTC_LATC;
  12106. LATC : longWord;
  12107. LATCCLR : longWord;
  12108. LATCSET : longWord;
  12109. LATCINV : longWord;
  12110. ODCCbits : TPORTC_ODCC;
  12111. ODCC : longWord;
  12112. ODCCCLR : longWord;
  12113. ODCCSET : longWord;
  12114. ODCCINV : longWord;
  12115. end;
  12116. TPORTD_TRISD = record
  12117. private
  12118. function getTRISD0 : TBits_1; inline;
  12119. function getTRISD1 : TBits_1; inline;
  12120. function getTRISD10 : TBits_1; inline;
  12121. function getTRISD11 : TBits_1; inline;
  12122. function getTRISD2 : TBits_1; inline;
  12123. function getTRISD3 : TBits_1; inline;
  12124. function getTRISD4 : TBits_1; inline;
  12125. function getTRISD5 : TBits_1; inline;
  12126. function getTRISD6 : TBits_1; inline;
  12127. function getTRISD7 : TBits_1; inline;
  12128. function getTRISD8 : TBits_1; inline;
  12129. function getTRISD9 : TBits_1; inline;
  12130. function getw : TBits_32; inline;
  12131. procedure setTRISD0(thebits : TBits_1); inline;
  12132. procedure setTRISD1(thebits : TBits_1); inline;
  12133. procedure setTRISD10(thebits : TBits_1); inline;
  12134. procedure setTRISD11(thebits : TBits_1); inline;
  12135. procedure setTRISD2(thebits : TBits_1); inline;
  12136. procedure setTRISD3(thebits : TBits_1); inline;
  12137. procedure setTRISD4(thebits : TBits_1); inline;
  12138. procedure setTRISD5(thebits : TBits_1); inline;
  12139. procedure setTRISD6(thebits : TBits_1); inline;
  12140. procedure setTRISD7(thebits : TBits_1); inline;
  12141. procedure setTRISD8(thebits : TBits_1); inline;
  12142. procedure setTRISD9(thebits : TBits_1); inline;
  12143. procedure setw(thebits : TBits_32); inline;
  12144. public
  12145. procedure clearTRISD0; inline;
  12146. procedure clearTRISD10; inline;
  12147. procedure clearTRISD11; inline;
  12148. procedure clearTRISD1; inline;
  12149. procedure clearTRISD2; inline;
  12150. procedure clearTRISD3; inline;
  12151. procedure clearTRISD4; inline;
  12152. procedure clearTRISD5; inline;
  12153. procedure clearTRISD6; inline;
  12154. procedure clearTRISD7; inline;
  12155. procedure clearTRISD8; inline;
  12156. procedure clearTRISD9; inline;
  12157. procedure setTRISD0; inline;
  12158. procedure setTRISD10; inline;
  12159. procedure setTRISD11; inline;
  12160. procedure setTRISD1; inline;
  12161. procedure setTRISD2; inline;
  12162. procedure setTRISD3; inline;
  12163. procedure setTRISD4; inline;
  12164. procedure setTRISD5; inline;
  12165. procedure setTRISD6; inline;
  12166. procedure setTRISD7; inline;
  12167. procedure setTRISD8; inline;
  12168. procedure setTRISD9; inline;
  12169. property TRISD0 : TBits_1 read getTRISD0 write setTRISD0;
  12170. property TRISD1 : TBits_1 read getTRISD1 write setTRISD1;
  12171. property TRISD10 : TBits_1 read getTRISD10 write setTRISD10;
  12172. property TRISD11 : TBits_1 read getTRISD11 write setTRISD11;
  12173. property TRISD2 : TBits_1 read getTRISD2 write setTRISD2;
  12174. property TRISD3 : TBits_1 read getTRISD3 write setTRISD3;
  12175. property TRISD4 : TBits_1 read getTRISD4 write setTRISD4;
  12176. property TRISD5 : TBits_1 read getTRISD5 write setTRISD5;
  12177. property TRISD6 : TBits_1 read getTRISD6 write setTRISD6;
  12178. property TRISD7 : TBits_1 read getTRISD7 write setTRISD7;
  12179. property TRISD8 : TBits_1 read getTRISD8 write setTRISD8;
  12180. property TRISD9 : TBits_1 read getTRISD9 write setTRISD9;
  12181. property w : TBits_32 read getw write setw;
  12182. end;
  12183. TPORTD_PORTD = record
  12184. private
  12185. function getRD0 : TBits_1; inline;
  12186. function getRD1 : TBits_1; inline;
  12187. function getRD10 : TBits_1; inline;
  12188. function getRD11 : TBits_1; inline;
  12189. function getRD2 : TBits_1; inline;
  12190. function getRD3 : TBits_1; inline;
  12191. function getRD4 : TBits_1; inline;
  12192. function getRD5 : TBits_1; inline;
  12193. function getRD6 : TBits_1; inline;
  12194. function getRD7 : TBits_1; inline;
  12195. function getRD8 : TBits_1; inline;
  12196. function getRD9 : TBits_1; inline;
  12197. function getw : TBits_32; inline;
  12198. procedure setRD0(thebits : TBits_1); inline;
  12199. procedure setRD1(thebits : TBits_1); inline;
  12200. procedure setRD10(thebits : TBits_1); inline;
  12201. procedure setRD11(thebits : TBits_1); inline;
  12202. procedure setRD2(thebits : TBits_1); inline;
  12203. procedure setRD3(thebits : TBits_1); inline;
  12204. procedure setRD4(thebits : TBits_1); inline;
  12205. procedure setRD5(thebits : TBits_1); inline;
  12206. procedure setRD6(thebits : TBits_1); inline;
  12207. procedure setRD7(thebits : TBits_1); inline;
  12208. procedure setRD8(thebits : TBits_1); inline;
  12209. procedure setRD9(thebits : TBits_1); inline;
  12210. procedure setw(thebits : TBits_32); inline;
  12211. public
  12212. procedure clearRD0; inline;
  12213. procedure clearRD10; inline;
  12214. procedure clearRD11; inline;
  12215. procedure clearRD1; inline;
  12216. procedure clearRD2; inline;
  12217. procedure clearRD3; inline;
  12218. procedure clearRD4; inline;
  12219. procedure clearRD5; inline;
  12220. procedure clearRD6; inline;
  12221. procedure clearRD7; inline;
  12222. procedure clearRD8; inline;
  12223. procedure clearRD9; inline;
  12224. procedure setRD0; inline;
  12225. procedure setRD10; inline;
  12226. procedure setRD11; inline;
  12227. procedure setRD1; inline;
  12228. procedure setRD2; inline;
  12229. procedure setRD3; inline;
  12230. procedure setRD4; inline;
  12231. procedure setRD5; inline;
  12232. procedure setRD6; inline;
  12233. procedure setRD7; inline;
  12234. procedure setRD8; inline;
  12235. procedure setRD9; inline;
  12236. property RD0 : TBits_1 read getRD0 write setRD0;
  12237. property RD1 : TBits_1 read getRD1 write setRD1;
  12238. property RD10 : TBits_1 read getRD10 write setRD10;
  12239. property RD11 : TBits_1 read getRD11 write setRD11;
  12240. property RD2 : TBits_1 read getRD2 write setRD2;
  12241. property RD3 : TBits_1 read getRD3 write setRD3;
  12242. property RD4 : TBits_1 read getRD4 write setRD4;
  12243. property RD5 : TBits_1 read getRD5 write setRD5;
  12244. property RD6 : TBits_1 read getRD6 write setRD6;
  12245. property RD7 : TBits_1 read getRD7 write setRD7;
  12246. property RD8 : TBits_1 read getRD8 write setRD8;
  12247. property RD9 : TBits_1 read getRD9 write setRD9;
  12248. property w : TBits_32 read getw write setw;
  12249. end;
  12250. 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);
  12251. TPortD_bitset = set of TPortD_bits;
  12252. TPORTD_LATD = record
  12253. private
  12254. function getLATD0 : TBits_1; inline;
  12255. function getLATD1 : TBits_1; inline;
  12256. function getLATD10 : TBits_1; inline;
  12257. function getLATD11 : TBits_1; inline;
  12258. function getLATD2 : TBits_1; inline;
  12259. function getLATD3 : TBits_1; inline;
  12260. function getLATD4 : TBits_1; inline;
  12261. function getLATD5 : TBits_1; inline;
  12262. function getLATD6 : TBits_1; inline;
  12263. function getLATD7 : TBits_1; inline;
  12264. function getLATD8 : TBits_1; inline;
  12265. function getLATD9 : TBits_1; inline;
  12266. function getw : TBits_32; inline;
  12267. procedure setLATD0(thebits : TBits_1); inline;
  12268. procedure setLATD1(thebits : TBits_1); inline;
  12269. procedure setLATD10(thebits : TBits_1); inline;
  12270. procedure setLATD11(thebits : TBits_1); inline;
  12271. procedure setLATD2(thebits : TBits_1); inline;
  12272. procedure setLATD3(thebits : TBits_1); inline;
  12273. procedure setLATD4(thebits : TBits_1); inline;
  12274. procedure setLATD5(thebits : TBits_1); inline;
  12275. procedure setLATD6(thebits : TBits_1); inline;
  12276. procedure setLATD7(thebits : TBits_1); inline;
  12277. procedure setLATD8(thebits : TBits_1); inline;
  12278. procedure setLATD9(thebits : TBits_1); inline;
  12279. procedure setw(thebits : TBits_32); inline;
  12280. public
  12281. procedure clearLATD0; inline;
  12282. procedure clearLATD10; inline;
  12283. procedure clearLATD11; inline;
  12284. procedure clearLATD1; inline;
  12285. procedure clearLATD2; inline;
  12286. procedure clearLATD3; inline;
  12287. procedure clearLATD4; inline;
  12288. procedure clearLATD5; inline;
  12289. procedure clearLATD6; inline;
  12290. procedure clearLATD7; inline;
  12291. procedure clearLATD8; inline;
  12292. procedure clearLATD9; inline;
  12293. procedure setLATD0; inline;
  12294. procedure setLATD10; inline;
  12295. procedure setLATD11; inline;
  12296. procedure setLATD1; inline;
  12297. procedure setLATD2; inline;
  12298. procedure setLATD3; inline;
  12299. procedure setLATD4; inline;
  12300. procedure setLATD5; inline;
  12301. procedure setLATD6; inline;
  12302. procedure setLATD7; inline;
  12303. procedure setLATD8; inline;
  12304. procedure setLATD9; inline;
  12305. property LATD0 : TBits_1 read getLATD0 write setLATD0;
  12306. property LATD1 : TBits_1 read getLATD1 write setLATD1;
  12307. property LATD10 : TBits_1 read getLATD10 write setLATD10;
  12308. property LATD11 : TBits_1 read getLATD11 write setLATD11;
  12309. property LATD2 : TBits_1 read getLATD2 write setLATD2;
  12310. property LATD3 : TBits_1 read getLATD3 write setLATD3;
  12311. property LATD4 : TBits_1 read getLATD4 write setLATD4;
  12312. property LATD5 : TBits_1 read getLATD5 write setLATD5;
  12313. property LATD6 : TBits_1 read getLATD6 write setLATD6;
  12314. property LATD7 : TBits_1 read getLATD7 write setLATD7;
  12315. property LATD8 : TBits_1 read getLATD8 write setLATD8;
  12316. property LATD9 : TBits_1 read getLATD9 write setLATD9;
  12317. property w : TBits_32 read getw write setw;
  12318. end;
  12319. TPORTD_ODCD = record
  12320. private
  12321. function getODCD0 : TBits_1; inline;
  12322. function getODCD1 : TBits_1; inline;
  12323. function getODCD10 : TBits_1; inline;
  12324. function getODCD11 : TBits_1; inline;
  12325. function getODCD2 : TBits_1; inline;
  12326. function getODCD3 : TBits_1; inline;
  12327. function getODCD4 : TBits_1; inline;
  12328. function getODCD5 : TBits_1; inline;
  12329. function getODCD6 : TBits_1; inline;
  12330. function getODCD7 : TBits_1; inline;
  12331. function getODCD8 : TBits_1; inline;
  12332. function getODCD9 : TBits_1; inline;
  12333. function getw : TBits_32; inline;
  12334. procedure setODCD0(thebits : TBits_1); inline;
  12335. procedure setODCD1(thebits : TBits_1); inline;
  12336. procedure setODCD10(thebits : TBits_1); inline;
  12337. procedure setODCD11(thebits : TBits_1); inline;
  12338. procedure setODCD2(thebits : TBits_1); inline;
  12339. procedure setODCD3(thebits : TBits_1); inline;
  12340. procedure setODCD4(thebits : TBits_1); inline;
  12341. procedure setODCD5(thebits : TBits_1); inline;
  12342. procedure setODCD6(thebits : TBits_1); inline;
  12343. procedure setODCD7(thebits : TBits_1); inline;
  12344. procedure setODCD8(thebits : TBits_1); inline;
  12345. procedure setODCD9(thebits : TBits_1); inline;
  12346. procedure setw(thebits : TBits_32); inline;
  12347. public
  12348. procedure clearODCD0; inline;
  12349. procedure clearODCD10; inline;
  12350. procedure clearODCD11; inline;
  12351. procedure clearODCD1; inline;
  12352. procedure clearODCD2; inline;
  12353. procedure clearODCD3; inline;
  12354. procedure clearODCD4; inline;
  12355. procedure clearODCD5; inline;
  12356. procedure clearODCD6; inline;
  12357. procedure clearODCD7; inline;
  12358. procedure clearODCD8; inline;
  12359. procedure clearODCD9; inline;
  12360. procedure setODCD0; inline;
  12361. procedure setODCD10; inline;
  12362. procedure setODCD11; inline;
  12363. procedure setODCD1; inline;
  12364. procedure setODCD2; inline;
  12365. procedure setODCD3; inline;
  12366. procedure setODCD4; inline;
  12367. procedure setODCD5; inline;
  12368. procedure setODCD6; inline;
  12369. procedure setODCD7; inline;
  12370. procedure setODCD8; inline;
  12371. procedure setODCD9; inline;
  12372. property ODCD0 : TBits_1 read getODCD0 write setODCD0;
  12373. property ODCD1 : TBits_1 read getODCD1 write setODCD1;
  12374. property ODCD10 : TBits_1 read getODCD10 write setODCD10;
  12375. property ODCD11 : TBits_1 read getODCD11 write setODCD11;
  12376. property ODCD2 : TBits_1 read getODCD2 write setODCD2;
  12377. property ODCD3 : TBits_1 read getODCD3 write setODCD3;
  12378. property ODCD4 : TBits_1 read getODCD4 write setODCD4;
  12379. property ODCD5 : TBits_1 read getODCD5 write setODCD5;
  12380. property ODCD6 : TBits_1 read getODCD6 write setODCD6;
  12381. property ODCD7 : TBits_1 read getODCD7 write setODCD7;
  12382. property ODCD8 : TBits_1 read getODCD8 write setODCD8;
  12383. property ODCD9 : TBits_1 read getODCD9 write setODCD9;
  12384. property w : TBits_32 read getw write setw;
  12385. end;
  12386. type
  12387. TPORTDRegisters = record
  12388. TRISDbits : TPORTD_TRISD;
  12389. TRISD : longWord;
  12390. TRISDCLR : longWord;
  12391. TRISDSET : longWord;
  12392. TRISDINV : longWord;
  12393. PORTDbits : TPORTD_PORTD;
  12394. PORTD : longWord;
  12395. PORTDCLR : longWord;
  12396. PORTDSET : longWord;
  12397. PORTDINV : longWord;
  12398. LATDbits : TPORTD_LATD;
  12399. LATD : longWord;
  12400. LATDCLR : longWord;
  12401. LATDSET : longWord;
  12402. LATDINV : longWord;
  12403. ODCDbits : TPORTD_ODCD;
  12404. ODCD : longWord;
  12405. ODCDCLR : longWord;
  12406. ODCDSET : longWord;
  12407. ODCDINV : longWord;
  12408. end;
  12409. TPORTE_TRISE = record
  12410. private
  12411. function getTRISE0 : TBits_1; inline;
  12412. function getTRISE1 : TBits_1; inline;
  12413. function getTRISE2 : TBits_1; inline;
  12414. function getTRISE3 : TBits_1; inline;
  12415. function getTRISE4 : TBits_1; inline;
  12416. function getTRISE5 : TBits_1; inline;
  12417. function getTRISE6 : TBits_1; inline;
  12418. function getTRISE7 : TBits_1; inline;
  12419. function getw : TBits_32; inline;
  12420. procedure setTRISE0(thebits : TBits_1); inline;
  12421. procedure setTRISE1(thebits : TBits_1); inline;
  12422. procedure setTRISE2(thebits : TBits_1); inline;
  12423. procedure setTRISE3(thebits : TBits_1); inline;
  12424. procedure setTRISE4(thebits : TBits_1); inline;
  12425. procedure setTRISE5(thebits : TBits_1); inline;
  12426. procedure setTRISE6(thebits : TBits_1); inline;
  12427. procedure setTRISE7(thebits : TBits_1); inline;
  12428. procedure setw(thebits : TBits_32); inline;
  12429. public
  12430. procedure clearTRISE0; inline;
  12431. procedure clearTRISE1; inline;
  12432. procedure clearTRISE2; inline;
  12433. procedure clearTRISE3; inline;
  12434. procedure clearTRISE4; inline;
  12435. procedure clearTRISE5; inline;
  12436. procedure clearTRISE6; inline;
  12437. procedure clearTRISE7; inline;
  12438. procedure setTRISE0; inline;
  12439. procedure setTRISE1; inline;
  12440. procedure setTRISE2; inline;
  12441. procedure setTRISE3; inline;
  12442. procedure setTRISE4; inline;
  12443. procedure setTRISE5; inline;
  12444. procedure setTRISE6; inline;
  12445. procedure setTRISE7; inline;
  12446. property TRISE0 : TBits_1 read getTRISE0 write setTRISE0;
  12447. property TRISE1 : TBits_1 read getTRISE1 write setTRISE1;
  12448. property TRISE2 : TBits_1 read getTRISE2 write setTRISE2;
  12449. property TRISE3 : TBits_1 read getTRISE3 write setTRISE3;
  12450. property TRISE4 : TBits_1 read getTRISE4 write setTRISE4;
  12451. property TRISE5 : TBits_1 read getTRISE5 write setTRISE5;
  12452. property TRISE6 : TBits_1 read getTRISE6 write setTRISE6;
  12453. property TRISE7 : TBits_1 read getTRISE7 write setTRISE7;
  12454. property w : TBits_32 read getw write setw;
  12455. end;
  12456. TPORTE_PORTE = record
  12457. private
  12458. function getRE0 : TBits_1; inline;
  12459. function getRE1 : TBits_1; inline;
  12460. function getRE2 : TBits_1; inline;
  12461. function getRE3 : TBits_1; inline;
  12462. function getRE4 : TBits_1; inline;
  12463. function getRE5 : TBits_1; inline;
  12464. function getRE6 : TBits_1; inline;
  12465. function getRE7 : TBits_1; inline;
  12466. function getw : TBits_32; inline;
  12467. procedure setRE0(thebits : TBits_1); inline;
  12468. procedure setRE1(thebits : TBits_1); inline;
  12469. procedure setRE2(thebits : TBits_1); inline;
  12470. procedure setRE3(thebits : TBits_1); inline;
  12471. procedure setRE4(thebits : TBits_1); inline;
  12472. procedure setRE5(thebits : TBits_1); inline;
  12473. procedure setRE6(thebits : TBits_1); inline;
  12474. procedure setRE7(thebits : TBits_1); inline;
  12475. procedure setw(thebits : TBits_32); inline;
  12476. public
  12477. procedure clearRE0; inline;
  12478. procedure clearRE1; inline;
  12479. procedure clearRE2; inline;
  12480. procedure clearRE3; inline;
  12481. procedure clearRE4; inline;
  12482. procedure clearRE5; inline;
  12483. procedure clearRE6; inline;
  12484. procedure clearRE7; inline;
  12485. procedure setRE0; inline;
  12486. procedure setRE1; inline;
  12487. procedure setRE2; inline;
  12488. procedure setRE3; inline;
  12489. procedure setRE4; inline;
  12490. procedure setRE5; inline;
  12491. procedure setRE6; inline;
  12492. procedure setRE7; inline;
  12493. property RE0 : TBits_1 read getRE0 write setRE0;
  12494. property RE1 : TBits_1 read getRE1 write setRE1;
  12495. property RE2 : TBits_1 read getRE2 write setRE2;
  12496. property RE3 : TBits_1 read getRE3 write setRE3;
  12497. property RE4 : TBits_1 read getRE4 write setRE4;
  12498. property RE5 : TBits_1 read getRE5 write setRE5;
  12499. property RE6 : TBits_1 read getRE6 write setRE6;
  12500. property RE7 : TBits_1 read getRE7 write setRE7;
  12501. property w : TBits_32 read getw write setw;
  12502. end;
  12503. TPortE_bits=(RE0=0,RE1=1,RE2=2,RE3=3,RE4=4,RE5=5,RE6=6,RE7=7);
  12504. TPortE_bitset = set of TPortE_bits;
  12505. TPORTE_LATE = record
  12506. private
  12507. function getLATE0 : TBits_1; inline;
  12508. function getLATE1 : TBits_1; inline;
  12509. function getLATE2 : TBits_1; inline;
  12510. function getLATE3 : TBits_1; inline;
  12511. function getLATE4 : TBits_1; inline;
  12512. function getLATE5 : TBits_1; inline;
  12513. function getLATE6 : TBits_1; inline;
  12514. function getLATE7 : TBits_1; inline;
  12515. function getw : TBits_32; inline;
  12516. procedure setLATE0(thebits : TBits_1); inline;
  12517. procedure setLATE1(thebits : TBits_1); inline;
  12518. procedure setLATE2(thebits : TBits_1); inline;
  12519. procedure setLATE3(thebits : TBits_1); inline;
  12520. procedure setLATE4(thebits : TBits_1); inline;
  12521. procedure setLATE5(thebits : TBits_1); inline;
  12522. procedure setLATE6(thebits : TBits_1); inline;
  12523. procedure setLATE7(thebits : TBits_1); inline;
  12524. procedure setw(thebits : TBits_32); inline;
  12525. public
  12526. procedure clearLATE0; inline;
  12527. procedure clearLATE1; inline;
  12528. procedure clearLATE2; inline;
  12529. procedure clearLATE3; inline;
  12530. procedure clearLATE4; inline;
  12531. procedure clearLATE5; inline;
  12532. procedure clearLATE6; inline;
  12533. procedure clearLATE7; inline;
  12534. procedure setLATE0; inline;
  12535. procedure setLATE1; inline;
  12536. procedure setLATE2; inline;
  12537. procedure setLATE3; inline;
  12538. procedure setLATE4; inline;
  12539. procedure setLATE5; inline;
  12540. procedure setLATE6; inline;
  12541. procedure setLATE7; inline;
  12542. property LATE0 : TBits_1 read getLATE0 write setLATE0;
  12543. property LATE1 : TBits_1 read getLATE1 write setLATE1;
  12544. property LATE2 : TBits_1 read getLATE2 write setLATE2;
  12545. property LATE3 : TBits_1 read getLATE3 write setLATE3;
  12546. property LATE4 : TBits_1 read getLATE4 write setLATE4;
  12547. property LATE5 : TBits_1 read getLATE5 write setLATE5;
  12548. property LATE6 : TBits_1 read getLATE6 write setLATE6;
  12549. property LATE7 : TBits_1 read getLATE7 write setLATE7;
  12550. property w : TBits_32 read getw write setw;
  12551. end;
  12552. TPORTE_ODCE = record
  12553. private
  12554. function getODCE0 : TBits_1; inline;
  12555. function getODCE1 : TBits_1; inline;
  12556. function getODCE2 : TBits_1; inline;
  12557. function getODCE3 : TBits_1; inline;
  12558. function getODCE4 : TBits_1; inline;
  12559. function getODCE5 : TBits_1; inline;
  12560. function getODCE6 : TBits_1; inline;
  12561. function getODCE7 : TBits_1; inline;
  12562. function getw : TBits_32; inline;
  12563. procedure setODCE0(thebits : TBits_1); inline;
  12564. procedure setODCE1(thebits : TBits_1); inline;
  12565. procedure setODCE2(thebits : TBits_1); inline;
  12566. procedure setODCE3(thebits : TBits_1); inline;
  12567. procedure setODCE4(thebits : TBits_1); inline;
  12568. procedure setODCE5(thebits : TBits_1); inline;
  12569. procedure setODCE6(thebits : TBits_1); inline;
  12570. procedure setODCE7(thebits : TBits_1); inline;
  12571. procedure setw(thebits : TBits_32); inline;
  12572. public
  12573. procedure clearODCE0; inline;
  12574. procedure clearODCE1; inline;
  12575. procedure clearODCE2; inline;
  12576. procedure clearODCE3; inline;
  12577. procedure clearODCE4; inline;
  12578. procedure clearODCE5; inline;
  12579. procedure clearODCE6; inline;
  12580. procedure clearODCE7; inline;
  12581. procedure setODCE0; inline;
  12582. procedure setODCE1; inline;
  12583. procedure setODCE2; inline;
  12584. procedure setODCE3; inline;
  12585. procedure setODCE4; inline;
  12586. procedure setODCE5; inline;
  12587. procedure setODCE6; inline;
  12588. procedure setODCE7; inline;
  12589. property ODCE0 : TBits_1 read getODCE0 write setODCE0;
  12590. property ODCE1 : TBits_1 read getODCE1 write setODCE1;
  12591. property ODCE2 : TBits_1 read getODCE2 write setODCE2;
  12592. property ODCE3 : TBits_1 read getODCE3 write setODCE3;
  12593. property ODCE4 : TBits_1 read getODCE4 write setODCE4;
  12594. property ODCE5 : TBits_1 read getODCE5 write setODCE5;
  12595. property ODCE6 : TBits_1 read getODCE6 write setODCE6;
  12596. property ODCE7 : TBits_1 read getODCE7 write setODCE7;
  12597. property w : TBits_32 read getw write setw;
  12598. end;
  12599. type
  12600. TPORTERegisters = record
  12601. TRISEbits : TPORTE_TRISE;
  12602. TRISE : longWord;
  12603. TRISECLR : longWord;
  12604. TRISESET : longWord;
  12605. TRISEINV : longWord;
  12606. PORTEbits : TPORTE_PORTE;
  12607. PORTE : longWord;
  12608. PORTECLR : longWord;
  12609. PORTESET : longWord;
  12610. PORTEINV : longWord;
  12611. LATEbits : TPORTE_LATE;
  12612. LATE : longWord;
  12613. LATECLR : longWord;
  12614. LATESET : longWord;
  12615. LATEINV : longWord;
  12616. ODCEbits : TPORTE_ODCE;
  12617. ODCE : longWord;
  12618. ODCECLR : longWord;
  12619. ODCESET : longWord;
  12620. ODCEINV : longWord;
  12621. end;
  12622. TPORTF_TRISF = record
  12623. private
  12624. function getTRISF0 : TBits_1; inline;
  12625. function getTRISF1 : TBits_1; inline;
  12626. function getTRISF2 : TBits_1; inline;
  12627. function getTRISF3 : TBits_1; inline;
  12628. function getTRISF4 : TBits_1; inline;
  12629. function getTRISF5 : TBits_1; inline;
  12630. function getw : TBits_32; inline;
  12631. procedure setTRISF0(thebits : TBits_1); inline;
  12632. procedure setTRISF1(thebits : TBits_1); inline;
  12633. procedure setTRISF2(thebits : TBits_1); inline;
  12634. procedure setTRISF3(thebits : TBits_1); inline;
  12635. procedure setTRISF4(thebits : TBits_1); inline;
  12636. procedure setTRISF5(thebits : TBits_1); inline;
  12637. procedure setw(thebits : TBits_32); inline;
  12638. public
  12639. procedure clearTRISF0; inline;
  12640. procedure clearTRISF1; inline;
  12641. procedure clearTRISF2; inline;
  12642. procedure clearTRISF3; inline;
  12643. procedure clearTRISF4; inline;
  12644. procedure clearTRISF5; inline;
  12645. procedure setTRISF0; inline;
  12646. procedure setTRISF1; inline;
  12647. procedure setTRISF2; inline;
  12648. procedure setTRISF3; inline;
  12649. procedure setTRISF4; inline;
  12650. procedure setTRISF5; inline;
  12651. property TRISF0 : TBits_1 read getTRISF0 write setTRISF0;
  12652. property TRISF1 : TBits_1 read getTRISF1 write setTRISF1;
  12653. property TRISF2 : TBits_1 read getTRISF2 write setTRISF2;
  12654. property TRISF3 : TBits_1 read getTRISF3 write setTRISF3;
  12655. property TRISF4 : TBits_1 read getTRISF4 write setTRISF4;
  12656. property TRISF5 : TBits_1 read getTRISF5 write setTRISF5;
  12657. property w : TBits_32 read getw write setw;
  12658. end;
  12659. TPORTF_PORTF = record
  12660. private
  12661. function getRF0 : TBits_1; inline;
  12662. function getRF1 : TBits_1; inline;
  12663. function getRF2 : TBits_1; inline;
  12664. function getRF3 : TBits_1; inline;
  12665. function getRF4 : TBits_1; inline;
  12666. function getRF5 : TBits_1; inline;
  12667. function getw : TBits_32; inline;
  12668. procedure setRF0(thebits : TBits_1); inline;
  12669. procedure setRF1(thebits : TBits_1); inline;
  12670. procedure setRF2(thebits : TBits_1); inline;
  12671. procedure setRF3(thebits : TBits_1); inline;
  12672. procedure setRF4(thebits : TBits_1); inline;
  12673. procedure setRF5(thebits : TBits_1); inline;
  12674. procedure setw(thebits : TBits_32); inline;
  12675. public
  12676. procedure clearRF0; inline;
  12677. procedure clearRF1; inline;
  12678. procedure clearRF2; inline;
  12679. procedure clearRF3; inline;
  12680. procedure clearRF4; inline;
  12681. procedure clearRF5; inline;
  12682. procedure setRF0; inline;
  12683. procedure setRF1; inline;
  12684. procedure setRF2; inline;
  12685. procedure setRF3; inline;
  12686. procedure setRF4; inline;
  12687. procedure setRF5; inline;
  12688. property RF0 : TBits_1 read getRF0 write setRF0;
  12689. property RF1 : TBits_1 read getRF1 write setRF1;
  12690. property RF2 : TBits_1 read getRF2 write setRF2;
  12691. property RF3 : TBits_1 read getRF3 write setRF3;
  12692. property RF4 : TBits_1 read getRF4 write setRF4;
  12693. property RF5 : TBits_1 read getRF5 write setRF5;
  12694. property w : TBits_32 read getw write setw;
  12695. end;
  12696. TPortF_bits=(RF0=0,RF1=1,RF2=2,RF3=3,RF4=4,RF5=5);
  12697. TPortF_bitset = set of TPortF_bits;
  12698. TPORTF_LATF = record
  12699. private
  12700. function getLATF0 : TBits_1; inline;
  12701. function getLATF1 : TBits_1; inline;
  12702. function getLATF2 : TBits_1; inline;
  12703. function getLATF3 : TBits_1; inline;
  12704. function getLATF4 : TBits_1; inline;
  12705. function getLATF5 : TBits_1; inline;
  12706. function getw : TBits_32; inline;
  12707. procedure setLATF0(thebits : TBits_1); inline;
  12708. procedure setLATF1(thebits : TBits_1); inline;
  12709. procedure setLATF2(thebits : TBits_1); inline;
  12710. procedure setLATF3(thebits : TBits_1); inline;
  12711. procedure setLATF4(thebits : TBits_1); inline;
  12712. procedure setLATF5(thebits : TBits_1); inline;
  12713. procedure setw(thebits : TBits_32); inline;
  12714. public
  12715. procedure clearLATF0; inline;
  12716. procedure clearLATF1; inline;
  12717. procedure clearLATF2; inline;
  12718. procedure clearLATF3; inline;
  12719. procedure clearLATF4; inline;
  12720. procedure clearLATF5; inline;
  12721. procedure setLATF0; inline;
  12722. procedure setLATF1; inline;
  12723. procedure setLATF2; inline;
  12724. procedure setLATF3; inline;
  12725. procedure setLATF4; inline;
  12726. procedure setLATF5; inline;
  12727. property LATF0 : TBits_1 read getLATF0 write setLATF0;
  12728. property LATF1 : TBits_1 read getLATF1 write setLATF1;
  12729. property LATF2 : TBits_1 read getLATF2 write setLATF2;
  12730. property LATF3 : TBits_1 read getLATF3 write setLATF3;
  12731. property LATF4 : TBits_1 read getLATF4 write setLATF4;
  12732. property LATF5 : TBits_1 read getLATF5 write setLATF5;
  12733. property w : TBits_32 read getw write setw;
  12734. end;
  12735. TPORTF_ODCF = record
  12736. private
  12737. function getODCF0 : TBits_1; inline;
  12738. function getODCF1 : TBits_1; inline;
  12739. function getODCF2 : TBits_1; inline;
  12740. function getODCF3 : TBits_1; inline;
  12741. function getODCF4 : TBits_1; inline;
  12742. function getODCF5 : TBits_1; inline;
  12743. function getw : TBits_32; inline;
  12744. procedure setODCF0(thebits : TBits_1); inline;
  12745. procedure setODCF1(thebits : TBits_1); inline;
  12746. procedure setODCF2(thebits : TBits_1); inline;
  12747. procedure setODCF3(thebits : TBits_1); inline;
  12748. procedure setODCF4(thebits : TBits_1); inline;
  12749. procedure setODCF5(thebits : TBits_1); inline;
  12750. procedure setw(thebits : TBits_32); inline;
  12751. public
  12752. procedure clearODCF0; inline;
  12753. procedure clearODCF1; inline;
  12754. procedure clearODCF2; inline;
  12755. procedure clearODCF3; inline;
  12756. procedure clearODCF4; inline;
  12757. procedure clearODCF5; inline;
  12758. procedure setODCF0; inline;
  12759. procedure setODCF1; inline;
  12760. procedure setODCF2; inline;
  12761. procedure setODCF3; inline;
  12762. procedure setODCF4; inline;
  12763. procedure setODCF5; inline;
  12764. property ODCF0 : TBits_1 read getODCF0 write setODCF0;
  12765. property ODCF1 : TBits_1 read getODCF1 write setODCF1;
  12766. property ODCF2 : TBits_1 read getODCF2 write setODCF2;
  12767. property ODCF3 : TBits_1 read getODCF3 write setODCF3;
  12768. property ODCF4 : TBits_1 read getODCF4 write setODCF4;
  12769. property ODCF5 : TBits_1 read getODCF5 write setODCF5;
  12770. property w : TBits_32 read getw write setw;
  12771. end;
  12772. type
  12773. TPORTFRegisters = record
  12774. TRISFbits : TPORTF_TRISF;
  12775. TRISF : longWord;
  12776. TRISFCLR : longWord;
  12777. TRISFSET : longWord;
  12778. TRISFINV : longWord;
  12779. PORTFbits : TPORTF_PORTF;
  12780. PORTF : longWord;
  12781. PORTFCLR : longWord;
  12782. PORTFSET : longWord;
  12783. PORTFINV : longWord;
  12784. LATFbits : TPORTF_LATF;
  12785. LATF : longWord;
  12786. LATFCLR : longWord;
  12787. LATFSET : longWord;
  12788. LATFINV : longWord;
  12789. ODCFbits : TPORTF_ODCF;
  12790. ODCF : longWord;
  12791. ODCFCLR : longWord;
  12792. ODCFSET : longWord;
  12793. ODCFINV : longWord;
  12794. end;
  12795. TPORTG_TRISG = record
  12796. private
  12797. function getTRISG2 : TBits_1; inline;
  12798. function getTRISG3 : TBits_1; inline;
  12799. function getTRISG6 : TBits_1; inline;
  12800. function getTRISG7 : TBits_1; inline;
  12801. function getTRISG8 : TBits_1; inline;
  12802. function getTRISG9 : TBits_1; inline;
  12803. function getw : TBits_32; inline;
  12804. procedure setTRISG2(thebits : TBits_1); inline;
  12805. procedure setTRISG3(thebits : TBits_1); inline;
  12806. procedure setTRISG6(thebits : TBits_1); inline;
  12807. procedure setTRISG7(thebits : TBits_1); inline;
  12808. procedure setTRISG8(thebits : TBits_1); inline;
  12809. procedure setTRISG9(thebits : TBits_1); inline;
  12810. procedure setw(thebits : TBits_32); inline;
  12811. public
  12812. procedure clearTRISG2; inline;
  12813. procedure clearTRISG3; inline;
  12814. procedure clearTRISG6; inline;
  12815. procedure clearTRISG7; inline;
  12816. procedure clearTRISG8; inline;
  12817. procedure clearTRISG9; inline;
  12818. procedure setTRISG2; inline;
  12819. procedure setTRISG3; inline;
  12820. procedure setTRISG6; inline;
  12821. procedure setTRISG7; inline;
  12822. procedure setTRISG8; inline;
  12823. procedure setTRISG9; inline;
  12824. property TRISG2 : TBits_1 read getTRISG2 write setTRISG2;
  12825. property TRISG3 : TBits_1 read getTRISG3 write setTRISG3;
  12826. property TRISG6 : TBits_1 read getTRISG6 write setTRISG6;
  12827. property TRISG7 : TBits_1 read getTRISG7 write setTRISG7;
  12828. property TRISG8 : TBits_1 read getTRISG8 write setTRISG8;
  12829. property TRISG9 : TBits_1 read getTRISG9 write setTRISG9;
  12830. property w : TBits_32 read getw write setw;
  12831. end;
  12832. TPORTG_PORTG = record
  12833. private
  12834. function getRG2 : TBits_1; inline;
  12835. function getRG3 : TBits_1; inline;
  12836. function getRG6 : TBits_1; inline;
  12837. function getRG7 : TBits_1; inline;
  12838. function getRG8 : TBits_1; inline;
  12839. function getRG9 : TBits_1; inline;
  12840. function getw : TBits_32; inline;
  12841. procedure setRG2(thebits : TBits_1); inline;
  12842. procedure setRG3(thebits : TBits_1); inline;
  12843. procedure setRG6(thebits : TBits_1); inline;
  12844. procedure setRG7(thebits : TBits_1); inline;
  12845. procedure setRG8(thebits : TBits_1); inline;
  12846. procedure setRG9(thebits : TBits_1); inline;
  12847. procedure setw(thebits : TBits_32); inline;
  12848. public
  12849. procedure clearRG2; inline;
  12850. procedure clearRG3; inline;
  12851. procedure clearRG6; inline;
  12852. procedure clearRG7; inline;
  12853. procedure clearRG8; inline;
  12854. procedure clearRG9; inline;
  12855. procedure setRG2; inline;
  12856. procedure setRG3; inline;
  12857. procedure setRG6; inline;
  12858. procedure setRG7; inline;
  12859. procedure setRG8; inline;
  12860. procedure setRG9; inline;
  12861. property RG2 : TBits_1 read getRG2 write setRG2;
  12862. property RG3 : TBits_1 read getRG3 write setRG3;
  12863. property RG6 : TBits_1 read getRG6 write setRG6;
  12864. property RG7 : TBits_1 read getRG7 write setRG7;
  12865. property RG8 : TBits_1 read getRG8 write setRG8;
  12866. property RG9 : TBits_1 read getRG9 write setRG9;
  12867. property w : TBits_32 read getw write setw;
  12868. end;
  12869. TPortG_bits=(RG2=2,RG3=3,RG6=6,RG7=7,RG8=8,RG9=9);
  12870. TPortG_bitset = set of TPortG_bits;
  12871. TPORTG_LATG = record
  12872. private
  12873. function getLATG2 : TBits_1; inline;
  12874. function getLATG3 : TBits_1; inline;
  12875. function getLATG6 : TBits_1; inline;
  12876. function getLATG7 : TBits_1; inline;
  12877. function getLATG8 : TBits_1; inline;
  12878. function getLATG9 : TBits_1; inline;
  12879. function getw : TBits_32; inline;
  12880. procedure setLATG2(thebits : TBits_1); inline;
  12881. procedure setLATG3(thebits : TBits_1); inline;
  12882. procedure setLATG6(thebits : TBits_1); inline;
  12883. procedure setLATG7(thebits : TBits_1); inline;
  12884. procedure setLATG8(thebits : TBits_1); inline;
  12885. procedure setLATG9(thebits : TBits_1); inline;
  12886. procedure setw(thebits : TBits_32); inline;
  12887. public
  12888. procedure clearLATG2; inline;
  12889. procedure clearLATG3; inline;
  12890. procedure clearLATG6; inline;
  12891. procedure clearLATG7; inline;
  12892. procedure clearLATG8; inline;
  12893. procedure clearLATG9; inline;
  12894. procedure setLATG2; inline;
  12895. procedure setLATG3; inline;
  12896. procedure setLATG6; inline;
  12897. procedure setLATG7; inline;
  12898. procedure setLATG8; inline;
  12899. procedure setLATG9; inline;
  12900. property LATG2 : TBits_1 read getLATG2 write setLATG2;
  12901. property LATG3 : TBits_1 read getLATG3 write setLATG3;
  12902. property LATG6 : TBits_1 read getLATG6 write setLATG6;
  12903. property LATG7 : TBits_1 read getLATG7 write setLATG7;
  12904. property LATG8 : TBits_1 read getLATG8 write setLATG8;
  12905. property LATG9 : TBits_1 read getLATG9 write setLATG9;
  12906. property w : TBits_32 read getw write setw;
  12907. end;
  12908. TPORTG_ODCG = record
  12909. private
  12910. function getODCG2 : TBits_1; inline;
  12911. function getODCG3 : TBits_1; inline;
  12912. function getODCG6 : TBits_1; inline;
  12913. function getODCG7 : TBits_1; inline;
  12914. function getODCG8 : TBits_1; inline;
  12915. function getODCG9 : TBits_1; inline;
  12916. function getw : TBits_32; inline;
  12917. procedure setODCG2(thebits : TBits_1); inline;
  12918. procedure setODCG3(thebits : TBits_1); inline;
  12919. procedure setODCG6(thebits : TBits_1); inline;
  12920. procedure setODCG7(thebits : TBits_1); inline;
  12921. procedure setODCG8(thebits : TBits_1); inline;
  12922. procedure setODCG9(thebits : TBits_1); inline;
  12923. procedure setw(thebits : TBits_32); inline;
  12924. public
  12925. procedure clearODCG2; inline;
  12926. procedure clearODCG3; inline;
  12927. procedure clearODCG6; inline;
  12928. procedure clearODCG7; inline;
  12929. procedure clearODCG8; inline;
  12930. procedure clearODCG9; inline;
  12931. procedure setODCG2; inline;
  12932. procedure setODCG3; inline;
  12933. procedure setODCG6; inline;
  12934. procedure setODCG7; inline;
  12935. procedure setODCG8; inline;
  12936. procedure setODCG9; inline;
  12937. property ODCG2 : TBits_1 read getODCG2 write setODCG2;
  12938. property ODCG3 : TBits_1 read getODCG3 write setODCG3;
  12939. property ODCG6 : TBits_1 read getODCG6 write setODCG6;
  12940. property ODCG7 : TBits_1 read getODCG7 write setODCG7;
  12941. property ODCG8 : TBits_1 read getODCG8 write setODCG8;
  12942. property ODCG9 : TBits_1 read getODCG9 write setODCG9;
  12943. property w : TBits_32 read getw write setw;
  12944. end;
  12945. TPORTG_CNCON = record
  12946. private
  12947. function getON : TBits_1; inline;
  12948. function getSIDL : TBits_1; inline;
  12949. function getw : TBits_32; inline;
  12950. procedure setON(thebits : TBits_1); inline;
  12951. procedure setSIDL(thebits : TBits_1); inline;
  12952. procedure setw(thebits : TBits_32); inline;
  12953. public
  12954. procedure clearON; inline;
  12955. procedure clearSIDL; inline;
  12956. procedure setON; inline;
  12957. procedure setSIDL; inline;
  12958. property ON : TBits_1 read getON write setON;
  12959. property SIDL : TBits_1 read getSIDL write setSIDL;
  12960. property w : TBits_32 read getw write setw;
  12961. end;
  12962. TPORTG_CNEN = record
  12963. private
  12964. function getCNEN0 : TBits_1; inline;
  12965. function getCNEN1 : TBits_1; inline;
  12966. function getCNEN10 : TBits_1; inline;
  12967. function getCNEN11 : TBits_1; inline;
  12968. function getCNEN12 : TBits_1; inline;
  12969. function getCNEN13 : TBits_1; inline;
  12970. function getCNEN14 : TBits_1; inline;
  12971. function getCNEN15 : TBits_1; inline;
  12972. function getCNEN16 : TBits_1; inline;
  12973. function getCNEN17 : TBits_1; inline;
  12974. function getCNEN18 : TBits_1; inline;
  12975. function getCNEN2 : TBits_1; inline;
  12976. function getCNEN3 : TBits_1; inline;
  12977. function getCNEN4 : TBits_1; inline;
  12978. function getCNEN5 : TBits_1; inline;
  12979. function getCNEN6 : TBits_1; inline;
  12980. function getCNEN7 : TBits_1; inline;
  12981. function getCNEN8 : TBits_1; inline;
  12982. function getCNEN9 : TBits_1; inline;
  12983. function getw : TBits_32; inline;
  12984. procedure setCNEN0(thebits : TBits_1); inline;
  12985. procedure setCNEN1(thebits : TBits_1); inline;
  12986. procedure setCNEN10(thebits : TBits_1); inline;
  12987. procedure setCNEN11(thebits : TBits_1); inline;
  12988. procedure setCNEN12(thebits : TBits_1); inline;
  12989. procedure setCNEN13(thebits : TBits_1); inline;
  12990. procedure setCNEN14(thebits : TBits_1); inline;
  12991. procedure setCNEN15(thebits : TBits_1); inline;
  12992. procedure setCNEN16(thebits : TBits_1); inline;
  12993. procedure setCNEN17(thebits : TBits_1); inline;
  12994. procedure setCNEN18(thebits : TBits_1); inline;
  12995. procedure setCNEN2(thebits : TBits_1); inline;
  12996. procedure setCNEN3(thebits : TBits_1); inline;
  12997. procedure setCNEN4(thebits : TBits_1); inline;
  12998. procedure setCNEN5(thebits : TBits_1); inline;
  12999. procedure setCNEN6(thebits : TBits_1); inline;
  13000. procedure setCNEN7(thebits : TBits_1); inline;
  13001. procedure setCNEN8(thebits : TBits_1); inline;
  13002. procedure setCNEN9(thebits : TBits_1); inline;
  13003. procedure setw(thebits : TBits_32); inline;
  13004. public
  13005. procedure clearCNEN0; inline;
  13006. procedure clearCNEN10; inline;
  13007. procedure clearCNEN11; inline;
  13008. procedure clearCNEN12; inline;
  13009. procedure clearCNEN13; inline;
  13010. procedure clearCNEN14; inline;
  13011. procedure clearCNEN15; inline;
  13012. procedure clearCNEN16; inline;
  13013. procedure clearCNEN17; inline;
  13014. procedure clearCNEN18; inline;
  13015. procedure clearCNEN1; inline;
  13016. procedure clearCNEN2; inline;
  13017. procedure clearCNEN3; inline;
  13018. procedure clearCNEN4; inline;
  13019. procedure clearCNEN5; inline;
  13020. procedure clearCNEN6; inline;
  13021. procedure clearCNEN7; inline;
  13022. procedure clearCNEN8; inline;
  13023. procedure clearCNEN9; inline;
  13024. procedure setCNEN0; inline;
  13025. procedure setCNEN10; inline;
  13026. procedure setCNEN11; inline;
  13027. procedure setCNEN12; inline;
  13028. procedure setCNEN13; inline;
  13029. procedure setCNEN14; inline;
  13030. procedure setCNEN15; inline;
  13031. procedure setCNEN16; inline;
  13032. procedure setCNEN17; inline;
  13033. procedure setCNEN18; inline;
  13034. procedure setCNEN1; inline;
  13035. procedure setCNEN2; inline;
  13036. procedure setCNEN3; inline;
  13037. procedure setCNEN4; inline;
  13038. procedure setCNEN5; inline;
  13039. procedure setCNEN6; inline;
  13040. procedure setCNEN7; inline;
  13041. procedure setCNEN8; inline;
  13042. procedure setCNEN9; inline;
  13043. property CNEN0 : TBits_1 read getCNEN0 write setCNEN0;
  13044. property CNEN1 : TBits_1 read getCNEN1 write setCNEN1;
  13045. property CNEN10 : TBits_1 read getCNEN10 write setCNEN10;
  13046. property CNEN11 : TBits_1 read getCNEN11 write setCNEN11;
  13047. property CNEN12 : TBits_1 read getCNEN12 write setCNEN12;
  13048. property CNEN13 : TBits_1 read getCNEN13 write setCNEN13;
  13049. property CNEN14 : TBits_1 read getCNEN14 write setCNEN14;
  13050. property CNEN15 : TBits_1 read getCNEN15 write setCNEN15;
  13051. property CNEN16 : TBits_1 read getCNEN16 write setCNEN16;
  13052. property CNEN17 : TBits_1 read getCNEN17 write setCNEN17;
  13053. property CNEN18 : TBits_1 read getCNEN18 write setCNEN18;
  13054. property CNEN2 : TBits_1 read getCNEN2 write setCNEN2;
  13055. property CNEN3 : TBits_1 read getCNEN3 write setCNEN3;
  13056. property CNEN4 : TBits_1 read getCNEN4 write setCNEN4;
  13057. property CNEN5 : TBits_1 read getCNEN5 write setCNEN5;
  13058. property CNEN6 : TBits_1 read getCNEN6 write setCNEN6;
  13059. property CNEN7 : TBits_1 read getCNEN7 write setCNEN7;
  13060. property CNEN8 : TBits_1 read getCNEN8 write setCNEN8;
  13061. property CNEN9 : TBits_1 read getCNEN9 write setCNEN9;
  13062. property w : TBits_32 read getw write setw;
  13063. end;
  13064. TPORTG_CNPUE = record
  13065. private
  13066. function getCNPUE0 : TBits_1; inline;
  13067. function getCNPUE1 : TBits_1; inline;
  13068. function getCNPUE10 : TBits_1; inline;
  13069. function getCNPUE11 : TBits_1; inline;
  13070. function getCNPUE12 : TBits_1; inline;
  13071. function getCNPUE13 : TBits_1; inline;
  13072. function getCNPUE14 : TBits_1; inline;
  13073. function getCNPUE15 : TBits_1; inline;
  13074. function getCNPUE16 : TBits_1; inline;
  13075. function getCNPUE17 : TBits_1; inline;
  13076. function getCNPUE18 : TBits_1; inline;
  13077. function getCNPUE2 : TBits_1; inline;
  13078. function getCNPUE3 : TBits_1; inline;
  13079. function getCNPUE4 : TBits_1; inline;
  13080. function getCNPUE5 : TBits_1; inline;
  13081. function getCNPUE6 : TBits_1; inline;
  13082. function getCNPUE7 : TBits_1; inline;
  13083. function getCNPUE8 : TBits_1; inline;
  13084. function getCNPUE9 : TBits_1; inline;
  13085. function getw : TBits_32; inline;
  13086. procedure setCNPUE0(thebits : TBits_1); inline;
  13087. procedure setCNPUE1(thebits : TBits_1); inline;
  13088. procedure setCNPUE10(thebits : TBits_1); inline;
  13089. procedure setCNPUE11(thebits : TBits_1); inline;
  13090. procedure setCNPUE12(thebits : TBits_1); inline;
  13091. procedure setCNPUE13(thebits : TBits_1); inline;
  13092. procedure setCNPUE14(thebits : TBits_1); inline;
  13093. procedure setCNPUE15(thebits : TBits_1); inline;
  13094. procedure setCNPUE16(thebits : TBits_1); inline;
  13095. procedure setCNPUE17(thebits : TBits_1); inline;
  13096. procedure setCNPUE18(thebits : TBits_1); inline;
  13097. procedure setCNPUE2(thebits : TBits_1); inline;
  13098. procedure setCNPUE3(thebits : TBits_1); inline;
  13099. procedure setCNPUE4(thebits : TBits_1); inline;
  13100. procedure setCNPUE5(thebits : TBits_1); inline;
  13101. procedure setCNPUE6(thebits : TBits_1); inline;
  13102. procedure setCNPUE7(thebits : TBits_1); inline;
  13103. procedure setCNPUE8(thebits : TBits_1); inline;
  13104. procedure setCNPUE9(thebits : TBits_1); inline;
  13105. procedure setw(thebits : TBits_32); inline;
  13106. public
  13107. procedure clearCNPUE0; inline;
  13108. procedure clearCNPUE10; inline;
  13109. procedure clearCNPUE11; inline;
  13110. procedure clearCNPUE12; inline;
  13111. procedure clearCNPUE13; inline;
  13112. procedure clearCNPUE14; inline;
  13113. procedure clearCNPUE15; inline;
  13114. procedure clearCNPUE16; inline;
  13115. procedure clearCNPUE17; inline;
  13116. procedure clearCNPUE18; inline;
  13117. procedure clearCNPUE1; inline;
  13118. procedure clearCNPUE2; inline;
  13119. procedure clearCNPUE3; inline;
  13120. procedure clearCNPUE4; inline;
  13121. procedure clearCNPUE5; inline;
  13122. procedure clearCNPUE6; inline;
  13123. procedure clearCNPUE7; inline;
  13124. procedure clearCNPUE8; inline;
  13125. procedure clearCNPUE9; inline;
  13126. procedure setCNPUE0; inline;
  13127. procedure setCNPUE10; inline;
  13128. procedure setCNPUE11; inline;
  13129. procedure setCNPUE12; inline;
  13130. procedure setCNPUE13; inline;
  13131. procedure setCNPUE14; inline;
  13132. procedure setCNPUE15; inline;
  13133. procedure setCNPUE16; inline;
  13134. procedure setCNPUE17; inline;
  13135. procedure setCNPUE18; inline;
  13136. procedure setCNPUE1; inline;
  13137. procedure setCNPUE2; inline;
  13138. procedure setCNPUE3; inline;
  13139. procedure setCNPUE4; inline;
  13140. procedure setCNPUE5; inline;
  13141. procedure setCNPUE6; inline;
  13142. procedure setCNPUE7; inline;
  13143. procedure setCNPUE8; inline;
  13144. procedure setCNPUE9; inline;
  13145. property CNPUE0 : TBits_1 read getCNPUE0 write setCNPUE0;
  13146. property CNPUE1 : TBits_1 read getCNPUE1 write setCNPUE1;
  13147. property CNPUE10 : TBits_1 read getCNPUE10 write setCNPUE10;
  13148. property CNPUE11 : TBits_1 read getCNPUE11 write setCNPUE11;
  13149. property CNPUE12 : TBits_1 read getCNPUE12 write setCNPUE12;
  13150. property CNPUE13 : TBits_1 read getCNPUE13 write setCNPUE13;
  13151. property CNPUE14 : TBits_1 read getCNPUE14 write setCNPUE14;
  13152. property CNPUE15 : TBits_1 read getCNPUE15 write setCNPUE15;
  13153. property CNPUE16 : TBits_1 read getCNPUE16 write setCNPUE16;
  13154. property CNPUE17 : TBits_1 read getCNPUE17 write setCNPUE17;
  13155. property CNPUE18 : TBits_1 read getCNPUE18 write setCNPUE18;
  13156. property CNPUE2 : TBits_1 read getCNPUE2 write setCNPUE2;
  13157. property CNPUE3 : TBits_1 read getCNPUE3 write setCNPUE3;
  13158. property CNPUE4 : TBits_1 read getCNPUE4 write setCNPUE4;
  13159. property CNPUE5 : TBits_1 read getCNPUE5 write setCNPUE5;
  13160. property CNPUE6 : TBits_1 read getCNPUE6 write setCNPUE6;
  13161. property CNPUE7 : TBits_1 read getCNPUE7 write setCNPUE7;
  13162. property CNPUE8 : TBits_1 read getCNPUE8 write setCNPUE8;
  13163. property CNPUE9 : TBits_1 read getCNPUE9 write setCNPUE9;
  13164. property w : TBits_32 read getw write setw;
  13165. end;
  13166. type
  13167. TPORTGRegisters = record
  13168. TRISGbits : TPORTG_TRISG;
  13169. TRISG : longWord;
  13170. TRISGCLR : longWord;
  13171. TRISGSET : longWord;
  13172. TRISGINV : longWord;
  13173. PORTGbits : TPORTG_PORTG;
  13174. PORTG : longWord;
  13175. PORTGCLR : longWord;
  13176. PORTGSET : longWord;
  13177. PORTGINV : longWord;
  13178. LATGbits : TPORTG_LATG;
  13179. LATG : longWord;
  13180. LATGCLR : longWord;
  13181. LATGSET : longWord;
  13182. LATGINV : longWord;
  13183. ODCGbits : TPORTG_ODCG;
  13184. ODCG : longWord;
  13185. ODCGCLR : longWord;
  13186. ODCGSET : longWord;
  13187. ODCGINV : longWord;
  13188. CNCONbits : TPORTG_CNCON;
  13189. CNCON : longWord;
  13190. CNCONCLR : longWord;
  13191. CNCONSET : longWord;
  13192. CNCONINV : longWord;
  13193. CNENbits : TPORTG_CNEN;
  13194. CNEN : longWord;
  13195. CNENCLR : longWord;
  13196. CNENSET : longWord;
  13197. CNENINV : longWord;
  13198. CNPUEbits : TPORTG_CNPUE;
  13199. CNPUE : longWord;
  13200. CNPUECLR : longWord;
  13201. CNPUESET : longWord;
  13202. CNPUEINV : longWord;
  13203. end;
  13204. TETH_ETHCON1 = record
  13205. private
  13206. function getAUTOFC : TBits_1; inline;
  13207. function getBUFCDEC : TBits_1; inline;
  13208. function getMANFC : TBits_1; inline;
  13209. function getON : TBits_1; inline;
  13210. function getPTV : TBits_16; inline;
  13211. function getRXEN : TBits_1; inline;
  13212. function getSIDL : TBits_1; inline;
  13213. function getTXRTS : TBits_1; inline;
  13214. function getw : TBits_32; inline;
  13215. procedure setAUTOFC(thebits : TBits_1); inline;
  13216. procedure setBUFCDEC(thebits : TBits_1); inline;
  13217. procedure setMANFC(thebits : TBits_1); inline;
  13218. procedure setON(thebits : TBits_1); inline;
  13219. procedure setPTV(thebits : TBits_16); inline;
  13220. procedure setRXEN(thebits : TBits_1); inline;
  13221. procedure setSIDL(thebits : TBits_1); inline;
  13222. procedure setTXRTS(thebits : TBits_1); inline;
  13223. procedure setw(thebits : TBits_32); inline;
  13224. public
  13225. procedure clearAUTOFC; inline;
  13226. procedure clearBUFCDEC; inline;
  13227. procedure clearMANFC; inline;
  13228. procedure clearON; inline;
  13229. procedure clearRXEN; inline;
  13230. procedure clearSIDL; inline;
  13231. procedure clearTXRTS; inline;
  13232. procedure setAUTOFC; inline;
  13233. procedure setBUFCDEC; inline;
  13234. procedure setMANFC; inline;
  13235. procedure setON; inline;
  13236. procedure setRXEN; inline;
  13237. procedure setSIDL; inline;
  13238. procedure setTXRTS; inline;
  13239. property AUTOFC : TBits_1 read getAUTOFC write setAUTOFC;
  13240. property BUFCDEC : TBits_1 read getBUFCDEC write setBUFCDEC;
  13241. property MANFC : TBits_1 read getMANFC write setMANFC;
  13242. property ON : TBits_1 read getON write setON;
  13243. property PTV : TBits_16 read getPTV write setPTV;
  13244. property RXEN : TBits_1 read getRXEN write setRXEN;
  13245. property SIDL : TBits_1 read getSIDL write setSIDL;
  13246. property TXRTS : TBits_1 read getTXRTS write setTXRTS;
  13247. property w : TBits_32 read getw write setw;
  13248. end;
  13249. TETH_ETHCON2 = record
  13250. private
  13251. function getRXBUF_SZ : TBits_7; inline;
  13252. function getw : TBits_32; inline;
  13253. procedure setRXBUF_SZ(thebits : TBits_7); inline;
  13254. procedure setw(thebits : TBits_32); inline;
  13255. public
  13256. property RXBUF_SZ : TBits_7 read getRXBUF_SZ write setRXBUF_SZ;
  13257. property w : TBits_32 read getw write setw;
  13258. end;
  13259. TETH_ETHTXST = record
  13260. private
  13261. function getTXSTADDR : TBits_30; inline;
  13262. function getw : TBits_32; inline;
  13263. procedure setTXSTADDR(thebits : TBits_30); inline;
  13264. procedure setw(thebits : TBits_32); inline;
  13265. public
  13266. property TXSTADDR : TBits_30 read getTXSTADDR write setTXSTADDR;
  13267. property w : TBits_32 read getw write setw;
  13268. end;
  13269. TETH_ETHRXST = record
  13270. private
  13271. function getRXSTADDR : TBits_30; inline;
  13272. function getw : TBits_32; inline;
  13273. procedure setRXSTADDR(thebits : TBits_30); inline;
  13274. procedure setw(thebits : TBits_32); inline;
  13275. public
  13276. property RXSTADDR : TBits_30 read getRXSTADDR write setRXSTADDR;
  13277. property w : TBits_32 read getw write setw;
  13278. end;
  13279. TETH_ETHHT0 = record
  13280. private
  13281. function getHTLOWER : TBits_32; inline;
  13282. function getw : TBits_32; inline;
  13283. procedure setHTLOWER(thebits : TBits_32); inline;
  13284. procedure setw(thebits : TBits_32); inline;
  13285. public
  13286. property HTLOWER : TBits_32 read getHTLOWER write setHTLOWER;
  13287. property w : TBits_32 read getw write setw;
  13288. end;
  13289. TETH_ETHHT1 = record
  13290. private
  13291. function getHTUPPER : TBits_32; inline;
  13292. function getw : TBits_32; inline;
  13293. procedure setHTUPPER(thebits : TBits_32); inline;
  13294. procedure setw(thebits : TBits_32); inline;
  13295. public
  13296. property HTUPPER : TBits_32 read getHTUPPER write setHTUPPER;
  13297. property w : TBits_32 read getw write setw;
  13298. end;
  13299. TETH_ETHPMM0 = record
  13300. private
  13301. function getPMMLOWER : TBits_32; inline;
  13302. function getw : TBits_32; inline;
  13303. procedure setPMMLOWER(thebits : TBits_32); inline;
  13304. procedure setw(thebits : TBits_32); inline;
  13305. public
  13306. property PMMLOWER : TBits_32 read getPMMLOWER write setPMMLOWER;
  13307. property w : TBits_32 read getw write setw;
  13308. end;
  13309. TETH_ETHPMM1 = record
  13310. private
  13311. function getPMMUPPER : TBits_32; inline;
  13312. function getw : TBits_32; inline;
  13313. procedure setPMMUPPER(thebits : TBits_32); inline;
  13314. procedure setw(thebits : TBits_32); inline;
  13315. public
  13316. property PMMUPPER : TBits_32 read getPMMUPPER write setPMMUPPER;
  13317. property w : TBits_32 read getw write setw;
  13318. end;
  13319. TETH_ETHPMCS = record
  13320. private
  13321. function getPMCS : TBits_16; inline;
  13322. function getw : TBits_32; inline;
  13323. procedure setPMCS(thebits : TBits_16); inline;
  13324. procedure setw(thebits : TBits_32); inline;
  13325. public
  13326. property PMCS : TBits_16 read getPMCS write setPMCS;
  13327. property w : TBits_32 read getw write setw;
  13328. end;
  13329. TETH_ETHPMO = record
  13330. private
  13331. function getPMO : TBits_16; inline;
  13332. function getw : TBits_32; inline;
  13333. procedure setPMO(thebits : TBits_16); inline;
  13334. procedure setw(thebits : TBits_32); inline;
  13335. public
  13336. property PMO : TBits_16 read getPMO write setPMO;
  13337. property w : TBits_32 read getw write setw;
  13338. end;
  13339. TETH_ETHRXFC = record
  13340. private
  13341. function getBCEN : TBits_1; inline;
  13342. function getCRCERREN : TBits_1; inline;
  13343. function getCRCOKEN : TBits_1; inline;
  13344. function getHTEN : TBits_1; inline;
  13345. function getMCEN : TBits_1; inline;
  13346. function getMPEN : TBits_1; inline;
  13347. function getNOTMEEN : TBits_1; inline;
  13348. function getNOTPM : TBits_1; inline;
  13349. function getPMMODE : TBits_4; inline;
  13350. function getRUNTEN : TBits_1; inline;
  13351. function getRUNTERREN : TBits_1; inline;
  13352. function getUCEN : TBits_1; inline;
  13353. function getw : TBits_32; inline;
  13354. procedure setBCEN(thebits : TBits_1); inline;
  13355. procedure setCRCERREN(thebits : TBits_1); inline;
  13356. procedure setCRCOKEN(thebits : TBits_1); inline;
  13357. procedure setHTEN(thebits : TBits_1); inline;
  13358. procedure setMCEN(thebits : TBits_1); inline;
  13359. procedure setMPEN(thebits : TBits_1); inline;
  13360. procedure setNOTMEEN(thebits : TBits_1); inline;
  13361. procedure setNOTPM(thebits : TBits_1); inline;
  13362. procedure setPMMODE(thebits : TBits_4); inline;
  13363. procedure setRUNTEN(thebits : TBits_1); inline;
  13364. procedure setRUNTERREN(thebits : TBits_1); inline;
  13365. procedure setUCEN(thebits : TBits_1); inline;
  13366. procedure setw(thebits : TBits_32); inline;
  13367. public
  13368. procedure clearBCEN; inline;
  13369. procedure clearCRCERREN; inline;
  13370. procedure clearCRCOKEN; inline;
  13371. procedure clearHTEN; inline;
  13372. procedure clearMCEN; inline;
  13373. procedure clearMPEN; inline;
  13374. procedure clearNOTMEEN; inline;
  13375. procedure clearNOTPM; inline;
  13376. procedure clearRUNTEN; inline;
  13377. procedure clearRUNTERREN; inline;
  13378. procedure clearUCEN; inline;
  13379. procedure setBCEN; inline;
  13380. procedure setCRCERREN; inline;
  13381. procedure setCRCOKEN; inline;
  13382. procedure setHTEN; inline;
  13383. procedure setMCEN; inline;
  13384. procedure setMPEN; inline;
  13385. procedure setNOTMEEN; inline;
  13386. procedure setNOTPM; inline;
  13387. procedure setRUNTEN; inline;
  13388. procedure setRUNTERREN; inline;
  13389. procedure setUCEN; inline;
  13390. property BCEN : TBits_1 read getBCEN write setBCEN;
  13391. property CRCERREN : TBits_1 read getCRCERREN write setCRCERREN;
  13392. property CRCOKEN : TBits_1 read getCRCOKEN write setCRCOKEN;
  13393. property HTEN : TBits_1 read getHTEN write setHTEN;
  13394. property MCEN : TBits_1 read getMCEN write setMCEN;
  13395. property MPEN : TBits_1 read getMPEN write setMPEN;
  13396. property NOTMEEN : TBits_1 read getNOTMEEN write setNOTMEEN;
  13397. property NOTPM : TBits_1 read getNOTPM write setNOTPM;
  13398. property PMMODE : TBits_4 read getPMMODE write setPMMODE;
  13399. property RUNTEN : TBits_1 read getRUNTEN write setRUNTEN;
  13400. property RUNTERREN : TBits_1 read getRUNTERREN write setRUNTERREN;
  13401. property UCEN : TBits_1 read getUCEN write setUCEN;
  13402. property w : TBits_32 read getw write setw;
  13403. end;
  13404. TETH_ETHRXWM = record
  13405. private
  13406. function getRXEWM : TBits_8; inline;
  13407. function getRXFWM : TBits_8; inline;
  13408. function getw : TBits_32; inline;
  13409. procedure setRXEWM(thebits : TBits_8); inline;
  13410. procedure setRXFWM(thebits : TBits_8); inline;
  13411. procedure setw(thebits : TBits_32); inline;
  13412. public
  13413. property RXEWM : TBits_8 read getRXEWM write setRXEWM;
  13414. property RXFWM : TBits_8 read getRXFWM write setRXFWM;
  13415. property w : TBits_32 read getw write setw;
  13416. end;
  13417. TETH_ETHIEN = record
  13418. private
  13419. function getEWMARKIE : TBits_1; inline;
  13420. function getFWMARKIE : TBits_1; inline;
  13421. function getPKTPENDIE : TBits_1; inline;
  13422. function getRXACTIE : TBits_1; inline;
  13423. function getRXBUFNAIE : TBits_1; inline;
  13424. function getRXBUSEIE : TBits_1; inline;
  13425. function getRXDONEIE : TBits_1; inline;
  13426. function getRXOVFLWIE : TBits_1; inline;
  13427. function getTXABORTIE : TBits_1; inline;
  13428. function getTXBUSEIE : TBits_1; inline;
  13429. function getTXDONEIE : TBits_1; inline;
  13430. function getw : TBits_32; inline;
  13431. procedure setEWMARKIE(thebits : TBits_1); inline;
  13432. procedure setFWMARKIE(thebits : TBits_1); inline;
  13433. procedure setPKTPENDIE(thebits : TBits_1); inline;
  13434. procedure setRXACTIE(thebits : TBits_1); inline;
  13435. procedure setRXBUFNAIE(thebits : TBits_1); inline;
  13436. procedure setRXBUSEIE(thebits : TBits_1); inline;
  13437. procedure setRXDONEIE(thebits : TBits_1); inline;
  13438. procedure setRXOVFLWIE(thebits : TBits_1); inline;
  13439. procedure setTXABORTIE(thebits : TBits_1); inline;
  13440. procedure setTXBUSEIE(thebits : TBits_1); inline;
  13441. procedure setTXDONEIE(thebits : TBits_1); inline;
  13442. procedure setw(thebits : TBits_32); inline;
  13443. public
  13444. procedure clearEWMARKIE; inline;
  13445. procedure clearFWMARKIE; inline;
  13446. procedure clearPKTPENDIE; inline;
  13447. procedure clearRXACTIE; inline;
  13448. procedure clearRXBUFNAIE; inline;
  13449. procedure clearRXBUSEIE; inline;
  13450. procedure clearRXDONEIE; inline;
  13451. procedure clearRXOVFLWIE; inline;
  13452. procedure clearTXABORTIE; inline;
  13453. procedure clearTXBUSEIE; inline;
  13454. procedure clearTXDONEIE; inline;
  13455. procedure setEWMARKIE; inline;
  13456. procedure setFWMARKIE; inline;
  13457. procedure setPKTPENDIE; inline;
  13458. procedure setRXACTIE; inline;
  13459. procedure setRXBUFNAIE; inline;
  13460. procedure setRXBUSEIE; inline;
  13461. procedure setRXDONEIE; inline;
  13462. procedure setRXOVFLWIE; inline;
  13463. procedure setTXABORTIE; inline;
  13464. procedure setTXBUSEIE; inline;
  13465. procedure setTXDONEIE; inline;
  13466. property EWMARKIE : TBits_1 read getEWMARKIE write setEWMARKIE;
  13467. property FWMARKIE : TBits_1 read getFWMARKIE write setFWMARKIE;
  13468. property PKTPENDIE : TBits_1 read getPKTPENDIE write setPKTPENDIE;
  13469. property RXACTIE : TBits_1 read getRXACTIE write setRXACTIE;
  13470. property RXBUFNAIE : TBits_1 read getRXBUFNAIE write setRXBUFNAIE;
  13471. property RXBUSEIE : TBits_1 read getRXBUSEIE write setRXBUSEIE;
  13472. property RXDONEIE : TBits_1 read getRXDONEIE write setRXDONEIE;
  13473. property RXOVFLWIE : TBits_1 read getRXOVFLWIE write setRXOVFLWIE;
  13474. property TXABORTIE : TBits_1 read getTXABORTIE write setTXABORTIE;
  13475. property TXBUSEIE : TBits_1 read getTXBUSEIE write setTXBUSEIE;
  13476. property TXDONEIE : TBits_1 read getTXDONEIE write setTXDONEIE;
  13477. property w : TBits_32 read getw write setw;
  13478. end;
  13479. TETH_ETHIRQ = record
  13480. private
  13481. function getEWMARK : TBits_1; inline;
  13482. function getFWMARK : TBits_1; inline;
  13483. function getPKTPEND : TBits_1; inline;
  13484. function getRXACT : TBits_1; inline;
  13485. function getRXBUFNA : TBits_1; inline;
  13486. function getRXBUSE : TBits_1; inline;
  13487. function getRXDONE : TBits_1; inline;
  13488. function getRXOVFLW : TBits_1; inline;
  13489. function getTXABORT : TBits_1; inline;
  13490. function getTXBUSE : TBits_1; inline;
  13491. function getTXDONE : TBits_1; inline;
  13492. function getw : TBits_32; inline;
  13493. procedure setEWMARK(thebits : TBits_1); inline;
  13494. procedure setFWMARK(thebits : TBits_1); inline;
  13495. procedure setPKTPEND(thebits : TBits_1); inline;
  13496. procedure setRXACT(thebits : TBits_1); inline;
  13497. procedure setRXBUFNA(thebits : TBits_1); inline;
  13498. procedure setRXBUSE(thebits : TBits_1); inline;
  13499. procedure setRXDONE(thebits : TBits_1); inline;
  13500. procedure setRXOVFLW(thebits : TBits_1); inline;
  13501. procedure setTXABORT(thebits : TBits_1); inline;
  13502. procedure setTXBUSE(thebits : TBits_1); inline;
  13503. procedure setTXDONE(thebits : TBits_1); inline;
  13504. procedure setw(thebits : TBits_32); inline;
  13505. public
  13506. procedure clearEWMARK; inline;
  13507. procedure clearFWMARK; inline;
  13508. procedure clearPKTPEND; inline;
  13509. procedure clearRXACT; inline;
  13510. procedure clearRXBUFNA; inline;
  13511. procedure clearRXBUSE; inline;
  13512. procedure clearRXDONE; inline;
  13513. procedure clearRXOVFLW; inline;
  13514. procedure clearTXABORT; inline;
  13515. procedure clearTXBUSE; inline;
  13516. procedure clearTXDONE; inline;
  13517. procedure setEWMARK; inline;
  13518. procedure setFWMARK; inline;
  13519. procedure setPKTPEND; inline;
  13520. procedure setRXACT; inline;
  13521. procedure setRXBUFNA; inline;
  13522. procedure setRXBUSE; inline;
  13523. procedure setRXDONE; inline;
  13524. procedure setRXOVFLW; inline;
  13525. procedure setTXABORT; inline;
  13526. procedure setTXBUSE; inline;
  13527. procedure setTXDONE; inline;
  13528. property EWMARK : TBits_1 read getEWMARK write setEWMARK;
  13529. property FWMARK : TBits_1 read getFWMARK write setFWMARK;
  13530. property PKTPEND : TBits_1 read getPKTPEND write setPKTPEND;
  13531. property RXACT : TBits_1 read getRXACT write setRXACT;
  13532. property RXBUFNA : TBits_1 read getRXBUFNA write setRXBUFNA;
  13533. property RXBUSE : TBits_1 read getRXBUSE write setRXBUSE;
  13534. property RXDONE : TBits_1 read getRXDONE write setRXDONE;
  13535. property RXOVFLW : TBits_1 read getRXOVFLW write setRXOVFLW;
  13536. property TXABORT : TBits_1 read getTXABORT write setTXABORT;
  13537. property TXBUSE : TBits_1 read getTXBUSE write setTXBUSE;
  13538. property TXDONE : TBits_1 read getTXDONE write setTXDONE;
  13539. property w : TBits_32 read getw write setw;
  13540. end;
  13541. TETH_ETHSTAT = record
  13542. private
  13543. function getBUFCNT : TBits_8; inline;
  13544. function getBUSY : TBits_1; inline;
  13545. function getETHBUSY : TBits_1; inline;
  13546. function getRXBUSY : TBits_1; inline;
  13547. function getTXBUSY : TBits_1; inline;
  13548. function getw : TBits_32; inline;
  13549. procedure setBUFCNT(thebits : TBits_8); inline;
  13550. procedure setBUSY(thebits : TBits_1); inline;
  13551. procedure setETHBUSY(thebits : TBits_1); inline;
  13552. procedure setRXBUSY(thebits : TBits_1); inline;
  13553. procedure setTXBUSY(thebits : TBits_1); inline;
  13554. procedure setw(thebits : TBits_32); inline;
  13555. public
  13556. procedure clearBUSY; inline;
  13557. procedure clearETHBUSY; inline;
  13558. procedure clearRXBUSY; inline;
  13559. procedure clearTXBUSY; inline;
  13560. procedure setBUSY; inline;
  13561. procedure setETHBUSY; inline;
  13562. procedure setRXBUSY; inline;
  13563. procedure setTXBUSY; inline;
  13564. property BUFCNT : TBits_8 read getBUFCNT write setBUFCNT;
  13565. property BUSY : TBits_1 read getBUSY write setBUSY;
  13566. property ETHBUSY : TBits_1 read getETHBUSY write setETHBUSY;
  13567. property RXBUSY : TBits_1 read getRXBUSY write setRXBUSY;
  13568. property TXBUSY : TBits_1 read getTXBUSY write setTXBUSY;
  13569. property w : TBits_32 read getw write setw;
  13570. end;
  13571. TETH_ETHRXOVFLOW = record
  13572. private
  13573. function getRXOVFLWCNT : TBits_16; inline;
  13574. function getw : TBits_32; inline;
  13575. procedure setRXOVFLWCNT(thebits : TBits_16); inline;
  13576. procedure setw(thebits : TBits_32); inline;
  13577. public
  13578. property RXOVFLWCNT : TBits_16 read getRXOVFLWCNT write setRXOVFLWCNT;
  13579. property w : TBits_32 read getw write setw;
  13580. end;
  13581. TETH_ETHFRMTXOK = record
  13582. private
  13583. function getFRMTXOKCNT : TBits_16; inline;
  13584. function getw : TBits_32; inline;
  13585. procedure setFRMTXOKCNT(thebits : TBits_16); inline;
  13586. procedure setw(thebits : TBits_32); inline;
  13587. public
  13588. property FRMTXOKCNT : TBits_16 read getFRMTXOKCNT write setFRMTXOKCNT;
  13589. property w : TBits_32 read getw write setw;
  13590. end;
  13591. TETH_ETHSCOLFRM = record
  13592. private
  13593. function getSCOLFRMCNT : TBits_16; inline;
  13594. function getw : TBits_32; inline;
  13595. procedure setSCOLFRMCNT(thebits : TBits_16); inline;
  13596. procedure setw(thebits : TBits_32); inline;
  13597. public
  13598. property SCOLFRMCNT : TBits_16 read getSCOLFRMCNT write setSCOLFRMCNT;
  13599. property w : TBits_32 read getw write setw;
  13600. end;
  13601. TETH_ETHMCOLFRM = record
  13602. private
  13603. function getMCOLFRMCNT : TBits_16; inline;
  13604. function getMCOLFRM_CNT : TBits_16; inline;
  13605. function getw : TBits_32; inline;
  13606. procedure setMCOLFRMCNT(thebits : TBits_16); inline;
  13607. procedure setMCOLFRM_CNT(thebits : TBits_16); inline;
  13608. procedure setw(thebits : TBits_32); inline;
  13609. public
  13610. property MCOLFRMCNT : TBits_16 read getMCOLFRMCNT write setMCOLFRMCNT;
  13611. property MCOLFRM_CNT : TBits_16 read getMCOLFRM_CNT write setMCOLFRM_CNT;
  13612. property w : TBits_32 read getw write setw;
  13613. end;
  13614. TETH_ETHFRMRXOK = record
  13615. private
  13616. function getFRMRXOKCNT : TBits_16; inline;
  13617. function getw : TBits_32; inline;
  13618. procedure setFRMRXOKCNT(thebits : TBits_16); inline;
  13619. procedure setw(thebits : TBits_32); inline;
  13620. public
  13621. property FRMRXOKCNT : TBits_16 read getFRMRXOKCNT write setFRMRXOKCNT;
  13622. property w : TBits_32 read getw write setw;
  13623. end;
  13624. TETH_ETHFCSERR = record
  13625. private
  13626. function getFCSERRCNT : TBits_16; inline;
  13627. function getw : TBits_32; inline;
  13628. procedure setFCSERRCNT(thebits : TBits_16); inline;
  13629. procedure setw(thebits : TBits_32); inline;
  13630. public
  13631. property FCSERRCNT : TBits_16 read getFCSERRCNT write setFCSERRCNT;
  13632. property w : TBits_32 read getw write setw;
  13633. end;
  13634. TETH_ETHALGNERR = record
  13635. private
  13636. function getALGNERRCNT : TBits_16; inline;
  13637. function getw : TBits_32; inline;
  13638. procedure setALGNERRCNT(thebits : TBits_16); inline;
  13639. procedure setw(thebits : TBits_32); inline;
  13640. public
  13641. property ALGNERRCNT : TBits_16 read getALGNERRCNT write setALGNERRCNT;
  13642. property w : TBits_32 read getw write setw;
  13643. end;
  13644. TETH_EMAC1CFG1 = record
  13645. private
  13646. function getLOOPBACK : TBits_1; inline;
  13647. function getPASSALL : TBits_1; inline;
  13648. function getRESETRFUN : TBits_1; inline;
  13649. function getRESETRMCS : TBits_1; inline;
  13650. function getRESETTFUN : TBits_1; inline;
  13651. function getRESETTMCS : TBits_1; inline;
  13652. function getRXENABLE : TBits_1; inline;
  13653. function getRXPAUSE : TBits_1; inline;
  13654. function getSIMRESET : TBits_1; inline;
  13655. function getSOFTRESET : TBits_1; inline;
  13656. function getTXPAUSE : TBits_1; inline;
  13657. function getw : TBits_32; inline;
  13658. procedure setLOOPBACK(thebits : TBits_1); inline;
  13659. procedure setPASSALL(thebits : TBits_1); inline;
  13660. procedure setRESETRFUN(thebits : TBits_1); inline;
  13661. procedure setRESETRMCS(thebits : TBits_1); inline;
  13662. procedure setRESETTFUN(thebits : TBits_1); inline;
  13663. procedure setRESETTMCS(thebits : TBits_1); inline;
  13664. procedure setRXENABLE(thebits : TBits_1); inline;
  13665. procedure setRXPAUSE(thebits : TBits_1); inline;
  13666. procedure setSIMRESET(thebits : TBits_1); inline;
  13667. procedure setSOFTRESET(thebits : TBits_1); inline;
  13668. procedure setTXPAUSE(thebits : TBits_1); inline;
  13669. procedure setw(thebits : TBits_32); inline;
  13670. public
  13671. procedure clearLOOPBACK; inline;
  13672. procedure clearPASSALL; inline;
  13673. procedure clearRESETRFUN; inline;
  13674. procedure clearRESETRMCS; inline;
  13675. procedure clearRESETTFUN; inline;
  13676. procedure clearRESETTMCS; inline;
  13677. procedure clearRXENABLE; inline;
  13678. procedure clearRXPAUSE; inline;
  13679. procedure clearSIMRESET; inline;
  13680. procedure clearSOFTRESET; inline;
  13681. procedure clearTXPAUSE; inline;
  13682. procedure setLOOPBACK; inline;
  13683. procedure setPASSALL; inline;
  13684. procedure setRESETRFUN; inline;
  13685. procedure setRESETRMCS; inline;
  13686. procedure setRESETTFUN; inline;
  13687. procedure setRESETTMCS; inline;
  13688. procedure setRXENABLE; inline;
  13689. procedure setRXPAUSE; inline;
  13690. procedure setSIMRESET; inline;
  13691. procedure setSOFTRESET; inline;
  13692. procedure setTXPAUSE; inline;
  13693. property LOOPBACK : TBits_1 read getLOOPBACK write setLOOPBACK;
  13694. property PASSALL : TBits_1 read getPASSALL write setPASSALL;
  13695. property RESETRFUN : TBits_1 read getRESETRFUN write setRESETRFUN;
  13696. property RESETRMCS : TBits_1 read getRESETRMCS write setRESETRMCS;
  13697. property RESETTFUN : TBits_1 read getRESETTFUN write setRESETTFUN;
  13698. property RESETTMCS : TBits_1 read getRESETTMCS write setRESETTMCS;
  13699. property RXENABLE : TBits_1 read getRXENABLE write setRXENABLE;
  13700. property RXPAUSE : TBits_1 read getRXPAUSE write setRXPAUSE;
  13701. property SIMRESET : TBits_1 read getSIMRESET write setSIMRESET;
  13702. property SOFTRESET : TBits_1 read getSOFTRESET write setSOFTRESET;
  13703. property TXPAUSE : TBits_1 read getTXPAUSE write setTXPAUSE;
  13704. property w : TBits_32 read getw write setw;
  13705. end;
  13706. TETH_EMACxCFG1 = record
  13707. private
  13708. function getLOOPBACK : TBits_1; inline;
  13709. function getPASSALL : TBits_1; inline;
  13710. function getRESETRFUN : TBits_1; inline;
  13711. function getRESETRMCS : TBits_1; inline;
  13712. function getRESETTFUN : TBits_1; inline;
  13713. function getRESETTMCS : TBits_1; inline;
  13714. function getRXENABLE : TBits_1; inline;
  13715. function getRXPAUSE : TBits_1; inline;
  13716. function getSIMRESET : TBits_1; inline;
  13717. function getSOFTRESET : TBits_1; inline;
  13718. function getTXPAUSE : TBits_1; inline;
  13719. function getw : TBits_32; inline;
  13720. procedure setLOOPBACK(thebits : TBits_1); inline;
  13721. procedure setPASSALL(thebits : TBits_1); inline;
  13722. procedure setRESETRFUN(thebits : TBits_1); inline;
  13723. procedure setRESETRMCS(thebits : TBits_1); inline;
  13724. procedure setRESETTFUN(thebits : TBits_1); inline;
  13725. procedure setRESETTMCS(thebits : TBits_1); inline;
  13726. procedure setRXENABLE(thebits : TBits_1); inline;
  13727. procedure setRXPAUSE(thebits : TBits_1); inline;
  13728. procedure setSIMRESET(thebits : TBits_1); inline;
  13729. procedure setSOFTRESET(thebits : TBits_1); inline;
  13730. procedure setTXPAUSE(thebits : TBits_1); inline;
  13731. procedure setw(thebits : TBits_32); inline;
  13732. public
  13733. procedure clearLOOPBACK; inline;
  13734. procedure clearPASSALL; inline;
  13735. procedure clearRESETRFUN; inline;
  13736. procedure clearRESETRMCS; inline;
  13737. procedure clearRESETTFUN; inline;
  13738. procedure clearRESETTMCS; inline;
  13739. procedure clearRXENABLE; inline;
  13740. procedure clearRXPAUSE; inline;
  13741. procedure clearSIMRESET; inline;
  13742. procedure clearSOFTRESET; inline;
  13743. procedure clearTXPAUSE; inline;
  13744. procedure setLOOPBACK; inline;
  13745. procedure setPASSALL; inline;
  13746. procedure setRESETRFUN; inline;
  13747. procedure setRESETRMCS; inline;
  13748. procedure setRESETTFUN; inline;
  13749. procedure setRESETTMCS; inline;
  13750. procedure setRXENABLE; inline;
  13751. procedure setRXPAUSE; inline;
  13752. procedure setSIMRESET; inline;
  13753. procedure setSOFTRESET; inline;
  13754. procedure setTXPAUSE; inline;
  13755. property LOOPBACK : TBits_1 read getLOOPBACK write setLOOPBACK;
  13756. property PASSALL : TBits_1 read getPASSALL write setPASSALL;
  13757. property RESETRFUN : TBits_1 read getRESETRFUN write setRESETRFUN;
  13758. property RESETRMCS : TBits_1 read getRESETRMCS write setRESETRMCS;
  13759. property RESETTFUN : TBits_1 read getRESETTFUN write setRESETTFUN;
  13760. property RESETTMCS : TBits_1 read getRESETTMCS write setRESETTMCS;
  13761. property RXENABLE : TBits_1 read getRXENABLE write setRXENABLE;
  13762. property RXPAUSE : TBits_1 read getRXPAUSE write setRXPAUSE;
  13763. property SIMRESET : TBits_1 read getSIMRESET write setSIMRESET;
  13764. property SOFTRESET : TBits_1 read getSOFTRESET write setSOFTRESET;
  13765. property TXPAUSE : TBits_1 read getTXPAUSE write setTXPAUSE;
  13766. property w : TBits_32 read getw write setw;
  13767. end;
  13768. TETH_EMAC1CFG2 = record
  13769. private
  13770. function getAUTOPAD : TBits_1; inline;
  13771. function getBPNOBKOFF : TBits_1; inline;
  13772. function getCRCENABLE : TBits_1; inline;
  13773. function getDELAYCRC : TBits_1; inline;
  13774. function getEXCESSDFR : TBits_1; inline;
  13775. function getFULLDPLX : TBits_1; inline;
  13776. function getHUGEFRM : TBits_1; inline;
  13777. function getLENGTHCK : TBits_1; inline;
  13778. function getLONGPRE : TBits_1; inline;
  13779. function getNOBKOFF : TBits_1; inline;
  13780. function getPADENABLE : TBits_1; inline;
  13781. function getPUREPRE : TBits_1; inline;
  13782. function getVLANPAD : TBits_1; inline;
  13783. function getw : TBits_32; inline;
  13784. procedure setAUTOPAD(thebits : TBits_1); inline;
  13785. procedure setBPNOBKOFF(thebits : TBits_1); inline;
  13786. procedure setCRCENABLE(thebits : TBits_1); inline;
  13787. procedure setDELAYCRC(thebits : TBits_1); inline;
  13788. procedure setEXCESSDFR(thebits : TBits_1); inline;
  13789. procedure setFULLDPLX(thebits : TBits_1); inline;
  13790. procedure setHUGEFRM(thebits : TBits_1); inline;
  13791. procedure setLENGTHCK(thebits : TBits_1); inline;
  13792. procedure setLONGPRE(thebits : TBits_1); inline;
  13793. procedure setNOBKOFF(thebits : TBits_1); inline;
  13794. procedure setPADENABLE(thebits : TBits_1); inline;
  13795. procedure setPUREPRE(thebits : TBits_1); inline;
  13796. procedure setVLANPAD(thebits : TBits_1); inline;
  13797. procedure setw(thebits : TBits_32); inline;
  13798. public
  13799. procedure clearAUTOPAD; inline;
  13800. procedure clearBPNOBKOFF; inline;
  13801. procedure clearCRCENABLE; inline;
  13802. procedure clearDELAYCRC; inline;
  13803. procedure clearEXCESSDFR; inline;
  13804. procedure clearFULLDPLX; inline;
  13805. procedure clearHUGEFRM; inline;
  13806. procedure clearLENGTHCK; inline;
  13807. procedure clearLONGPRE; inline;
  13808. procedure clearNOBKOFF; inline;
  13809. procedure clearPADENABLE; inline;
  13810. procedure clearPUREPRE; inline;
  13811. procedure clearVLANPAD; inline;
  13812. procedure setAUTOPAD; inline;
  13813. procedure setBPNOBKOFF; inline;
  13814. procedure setCRCENABLE; inline;
  13815. procedure setDELAYCRC; inline;
  13816. procedure setEXCESSDFR; inline;
  13817. procedure setFULLDPLX; inline;
  13818. procedure setHUGEFRM; inline;
  13819. procedure setLENGTHCK; inline;
  13820. procedure setLONGPRE; inline;
  13821. procedure setNOBKOFF; inline;
  13822. procedure setPADENABLE; inline;
  13823. procedure setPUREPRE; inline;
  13824. procedure setVLANPAD; inline;
  13825. property AUTOPAD : TBits_1 read getAUTOPAD write setAUTOPAD;
  13826. property BPNOBKOFF : TBits_1 read getBPNOBKOFF write setBPNOBKOFF;
  13827. property CRCENABLE : TBits_1 read getCRCENABLE write setCRCENABLE;
  13828. property DELAYCRC : TBits_1 read getDELAYCRC write setDELAYCRC;
  13829. property EXCESSDFR : TBits_1 read getEXCESSDFR write setEXCESSDFR;
  13830. property FULLDPLX : TBits_1 read getFULLDPLX write setFULLDPLX;
  13831. property HUGEFRM : TBits_1 read getHUGEFRM write setHUGEFRM;
  13832. property LENGTHCK : TBits_1 read getLENGTHCK write setLENGTHCK;
  13833. property LONGPRE : TBits_1 read getLONGPRE write setLONGPRE;
  13834. property NOBKOFF : TBits_1 read getNOBKOFF write setNOBKOFF;
  13835. property PADENABLE : TBits_1 read getPADENABLE write setPADENABLE;
  13836. property PUREPRE : TBits_1 read getPUREPRE write setPUREPRE;
  13837. property VLANPAD : TBits_1 read getVLANPAD write setVLANPAD;
  13838. property w : TBits_32 read getw write setw;
  13839. end;
  13840. TETH_EMACxCFG2 = record
  13841. private
  13842. function getAUTOPAD : TBits_1; inline;
  13843. function getBPNOBKOFF : TBits_1; inline;
  13844. function getCRCENABLE : TBits_1; inline;
  13845. function getDELAYCRC : TBits_1; inline;
  13846. function getEXCESSDFR : TBits_1; inline;
  13847. function getFULLDPLX : TBits_1; inline;
  13848. function getHUGEFRM : TBits_1; inline;
  13849. function getLENGTHCK : TBits_1; inline;
  13850. function getLONGPRE : TBits_1; inline;
  13851. function getNOBKOFF : TBits_1; inline;
  13852. function getPADENABLE : TBits_1; inline;
  13853. function getPUREPRE : TBits_1; inline;
  13854. function getVLANPAD : TBits_1; inline;
  13855. function getw : TBits_32; inline;
  13856. procedure setAUTOPAD(thebits : TBits_1); inline;
  13857. procedure setBPNOBKOFF(thebits : TBits_1); inline;
  13858. procedure setCRCENABLE(thebits : TBits_1); inline;
  13859. procedure setDELAYCRC(thebits : TBits_1); inline;
  13860. procedure setEXCESSDFR(thebits : TBits_1); inline;
  13861. procedure setFULLDPLX(thebits : TBits_1); inline;
  13862. procedure setHUGEFRM(thebits : TBits_1); inline;
  13863. procedure setLENGTHCK(thebits : TBits_1); inline;
  13864. procedure setLONGPRE(thebits : TBits_1); inline;
  13865. procedure setNOBKOFF(thebits : TBits_1); inline;
  13866. procedure setPADENABLE(thebits : TBits_1); inline;
  13867. procedure setPUREPRE(thebits : TBits_1); inline;
  13868. procedure setVLANPAD(thebits : TBits_1); inline;
  13869. procedure setw(thebits : TBits_32); inline;
  13870. public
  13871. procedure clearAUTOPAD; inline;
  13872. procedure clearBPNOBKOFF; inline;
  13873. procedure clearCRCENABLE; inline;
  13874. procedure clearDELAYCRC; inline;
  13875. procedure clearEXCESSDFR; inline;
  13876. procedure clearFULLDPLX; inline;
  13877. procedure clearHUGEFRM; inline;
  13878. procedure clearLENGTHCK; inline;
  13879. procedure clearLONGPRE; inline;
  13880. procedure clearNOBKOFF; inline;
  13881. procedure clearPADENABLE; inline;
  13882. procedure clearPUREPRE; inline;
  13883. procedure clearVLANPAD; inline;
  13884. procedure setAUTOPAD; inline;
  13885. procedure setBPNOBKOFF; inline;
  13886. procedure setCRCENABLE; inline;
  13887. procedure setDELAYCRC; inline;
  13888. procedure setEXCESSDFR; inline;
  13889. procedure setFULLDPLX; inline;
  13890. procedure setHUGEFRM; inline;
  13891. procedure setLENGTHCK; inline;
  13892. procedure setLONGPRE; inline;
  13893. procedure setNOBKOFF; inline;
  13894. procedure setPADENABLE; inline;
  13895. procedure setPUREPRE; inline;
  13896. procedure setVLANPAD; inline;
  13897. property AUTOPAD : TBits_1 read getAUTOPAD write setAUTOPAD;
  13898. property BPNOBKOFF : TBits_1 read getBPNOBKOFF write setBPNOBKOFF;
  13899. property CRCENABLE : TBits_1 read getCRCENABLE write setCRCENABLE;
  13900. property DELAYCRC : TBits_1 read getDELAYCRC write setDELAYCRC;
  13901. property EXCESSDFR : TBits_1 read getEXCESSDFR write setEXCESSDFR;
  13902. property FULLDPLX : TBits_1 read getFULLDPLX write setFULLDPLX;
  13903. property HUGEFRM : TBits_1 read getHUGEFRM write setHUGEFRM;
  13904. property LENGTHCK : TBits_1 read getLENGTHCK write setLENGTHCK;
  13905. property LONGPRE : TBits_1 read getLONGPRE write setLONGPRE;
  13906. property NOBKOFF : TBits_1 read getNOBKOFF write setNOBKOFF;
  13907. property PADENABLE : TBits_1 read getPADENABLE write setPADENABLE;
  13908. property PUREPRE : TBits_1 read getPUREPRE write setPUREPRE;
  13909. property VLANPAD : TBits_1 read getVLANPAD write setVLANPAD;
  13910. property w : TBits_32 read getw write setw;
  13911. end;
  13912. TETH_EMAC1IPGT = record
  13913. private
  13914. function getB2BIPKTGP : TBits_7; inline;
  13915. function getw : TBits_32; inline;
  13916. procedure setB2BIPKTGP(thebits : TBits_7); inline;
  13917. procedure setw(thebits : TBits_32); inline;
  13918. public
  13919. property B2BIPKTGP : TBits_7 read getB2BIPKTGP write setB2BIPKTGP;
  13920. property w : TBits_32 read getw write setw;
  13921. end;
  13922. TETH_EMACxIPGT = record
  13923. private
  13924. function getB2BIPKTGP : TBits_7; inline;
  13925. function getw : TBits_32; inline;
  13926. procedure setB2BIPKTGP(thebits : TBits_7); inline;
  13927. procedure setw(thebits : TBits_32); inline;
  13928. public
  13929. property B2BIPKTGP : TBits_7 read getB2BIPKTGP write setB2BIPKTGP;
  13930. property w : TBits_32 read getw write setw;
  13931. end;
  13932. TETH_EMAC1IPGR = record
  13933. private
  13934. function getNB2BIPKTGP1 : TBits_7; inline;
  13935. function getNB2BIPKTGP2 : TBits_7; inline;
  13936. function getw : TBits_32; inline;
  13937. procedure setNB2BIPKTGP1(thebits : TBits_7); inline;
  13938. procedure setNB2BIPKTGP2(thebits : TBits_7); inline;
  13939. procedure setw(thebits : TBits_32); inline;
  13940. public
  13941. property NB2BIPKTGP1 : TBits_7 read getNB2BIPKTGP1 write setNB2BIPKTGP1;
  13942. property NB2BIPKTGP2 : TBits_7 read getNB2BIPKTGP2 write setNB2BIPKTGP2;
  13943. property w : TBits_32 read getw write setw;
  13944. end;
  13945. TETH_EMACxIPGR = record
  13946. private
  13947. function getNB2BIPKTGP1 : TBits_7; inline;
  13948. function getNB2BIPKTGP2 : TBits_7; inline;
  13949. function getw : TBits_32; inline;
  13950. procedure setNB2BIPKTGP1(thebits : TBits_7); inline;
  13951. procedure setNB2BIPKTGP2(thebits : TBits_7); inline;
  13952. procedure setw(thebits : TBits_32); inline;
  13953. public
  13954. property NB2BIPKTGP1 : TBits_7 read getNB2BIPKTGP1 write setNB2BIPKTGP1;
  13955. property NB2BIPKTGP2 : TBits_7 read getNB2BIPKTGP2 write setNB2BIPKTGP2;
  13956. property w : TBits_32 read getw write setw;
  13957. end;
  13958. TETH_EMAC1CLRT = record
  13959. private
  13960. function getCWINDOW : TBits_6; inline;
  13961. function getRETX : TBits_4; inline;
  13962. function getw : TBits_32; inline;
  13963. procedure setCWINDOW(thebits : TBits_6); inline;
  13964. procedure setRETX(thebits : TBits_4); inline;
  13965. procedure setw(thebits : TBits_32); inline;
  13966. public
  13967. property CWINDOW : TBits_6 read getCWINDOW write setCWINDOW;
  13968. property RETX : TBits_4 read getRETX write setRETX;
  13969. property w : TBits_32 read getw write setw;
  13970. end;
  13971. TETH_EMACxCLRT = record
  13972. private
  13973. function getCWINDOW : TBits_6; inline;
  13974. function getRETX : TBits_4; inline;
  13975. function getw : TBits_32; inline;
  13976. procedure setCWINDOW(thebits : TBits_6); inline;
  13977. procedure setRETX(thebits : TBits_4); inline;
  13978. procedure setw(thebits : TBits_32); inline;
  13979. public
  13980. property CWINDOW : TBits_6 read getCWINDOW write setCWINDOW;
  13981. property RETX : TBits_4 read getRETX write setRETX;
  13982. property w : TBits_32 read getw write setw;
  13983. end;
  13984. TETH_EMAC1MAXF = record
  13985. private
  13986. function getMACMAXF : TBits_16; inline;
  13987. function getw : TBits_32; inline;
  13988. procedure setMACMAXF(thebits : TBits_16); inline;
  13989. procedure setw(thebits : TBits_32); inline;
  13990. public
  13991. property MACMAXF : TBits_16 read getMACMAXF write setMACMAXF;
  13992. property w : TBits_32 read getw write setw;
  13993. end;
  13994. TETH_EMACxMAXF = record
  13995. private
  13996. function getMACMAXF : TBits_16; inline;
  13997. function getw : TBits_32; inline;
  13998. procedure setMACMAXF(thebits : TBits_16); inline;
  13999. procedure setw(thebits : TBits_32); inline;
  14000. public
  14001. property MACMAXF : TBits_16 read getMACMAXF write setMACMAXF;
  14002. property w : TBits_32 read getw write setw;
  14003. end;
  14004. TETH_EMAC1SUPP = record
  14005. private
  14006. function getRESETRMII : TBits_1; inline;
  14007. function getSPEEDRMII : TBits_1; inline;
  14008. function getw : TBits_32; inline;
  14009. procedure setRESETRMII(thebits : TBits_1); inline;
  14010. procedure setSPEEDRMII(thebits : TBits_1); inline;
  14011. procedure setw(thebits : TBits_32); inline;
  14012. public
  14013. procedure clearRESETRMII; inline;
  14014. procedure clearSPEEDRMII; inline;
  14015. procedure setRESETRMII; inline;
  14016. procedure setSPEEDRMII; inline;
  14017. property RESETRMII : TBits_1 read getRESETRMII write setRESETRMII;
  14018. property SPEEDRMII : TBits_1 read getSPEEDRMII write setSPEEDRMII;
  14019. property w : TBits_32 read getw write setw;
  14020. end;
  14021. TETH_EMACxSUPP = record
  14022. private
  14023. function getRESETRMII : TBits_1; inline;
  14024. function getSPEEDRMII : TBits_1; inline;
  14025. function getw : TBits_32; inline;
  14026. procedure setRESETRMII(thebits : TBits_1); inline;
  14027. procedure setSPEEDRMII(thebits : TBits_1); inline;
  14028. procedure setw(thebits : TBits_32); inline;
  14029. public
  14030. procedure clearRESETRMII; inline;
  14031. procedure clearSPEEDRMII; inline;
  14032. procedure setRESETRMII; inline;
  14033. procedure setSPEEDRMII; inline;
  14034. property RESETRMII : TBits_1 read getRESETRMII write setRESETRMII;
  14035. property SPEEDRMII : TBits_1 read getSPEEDRMII write setSPEEDRMII;
  14036. property w : TBits_32 read getw write setw;
  14037. end;
  14038. TETH_EMAC1TEST = record
  14039. private
  14040. function getSHRTQNTA : TBits_1; inline;
  14041. function getTESTBP : TBits_1; inline;
  14042. function getTESTPAUSE : TBits_1; inline;
  14043. function getw : TBits_32; inline;
  14044. procedure setSHRTQNTA(thebits : TBits_1); inline;
  14045. procedure setTESTBP(thebits : TBits_1); inline;
  14046. procedure setTESTPAUSE(thebits : TBits_1); inline;
  14047. procedure setw(thebits : TBits_32); inline;
  14048. public
  14049. procedure clearSHRTQNTA; inline;
  14050. procedure clearTESTBP; inline;
  14051. procedure clearTESTPAUSE; inline;
  14052. procedure setSHRTQNTA; inline;
  14053. procedure setTESTBP; inline;
  14054. procedure setTESTPAUSE; inline;
  14055. property SHRTQNTA : TBits_1 read getSHRTQNTA write setSHRTQNTA;
  14056. property TESTBP : TBits_1 read getTESTBP write setTESTBP;
  14057. property TESTPAUSE : TBits_1 read getTESTPAUSE write setTESTPAUSE;
  14058. property w : TBits_32 read getw write setw;
  14059. end;
  14060. TETH_EMACxTEST = record
  14061. private
  14062. function getSHRTQNTA : TBits_1; inline;
  14063. function getTESTBP : TBits_1; inline;
  14064. function getTESTPAUSE : TBits_1; inline;
  14065. function getw : TBits_32; inline;
  14066. procedure setSHRTQNTA(thebits : TBits_1); inline;
  14067. procedure setTESTBP(thebits : TBits_1); inline;
  14068. procedure setTESTPAUSE(thebits : TBits_1); inline;
  14069. procedure setw(thebits : TBits_32); inline;
  14070. public
  14071. procedure clearSHRTQNTA; inline;
  14072. procedure clearTESTBP; inline;
  14073. procedure clearTESTPAUSE; inline;
  14074. procedure setSHRTQNTA; inline;
  14075. procedure setTESTBP; inline;
  14076. procedure setTESTPAUSE; inline;
  14077. property SHRTQNTA : TBits_1 read getSHRTQNTA write setSHRTQNTA;
  14078. property TESTBP : TBits_1 read getTESTBP write setTESTBP;
  14079. property TESTPAUSE : TBits_1 read getTESTPAUSE write setTESTPAUSE;
  14080. property w : TBits_32 read getw write setw;
  14081. end;
  14082. TETH_EMAC1MCFG = record
  14083. private
  14084. function getCLKSEL : TBits_4; inline;
  14085. function getNOPRE : TBits_1; inline;
  14086. function getRESETMGMT : TBits_1; inline;
  14087. function getSCANINC : TBits_1; inline;
  14088. function getw : TBits_32; inline;
  14089. procedure setCLKSEL(thebits : TBits_4); inline;
  14090. procedure setNOPRE(thebits : TBits_1); inline;
  14091. procedure setRESETMGMT(thebits : TBits_1); inline;
  14092. procedure setSCANINC(thebits : TBits_1); inline;
  14093. procedure setw(thebits : TBits_32); inline;
  14094. public
  14095. procedure clearNOPRE; inline;
  14096. procedure clearRESETMGMT; inline;
  14097. procedure clearSCANINC; inline;
  14098. procedure setNOPRE; inline;
  14099. procedure setRESETMGMT; inline;
  14100. procedure setSCANINC; inline;
  14101. property CLKSEL : TBits_4 read getCLKSEL write setCLKSEL;
  14102. property NOPRE : TBits_1 read getNOPRE write setNOPRE;
  14103. property RESETMGMT : TBits_1 read getRESETMGMT write setRESETMGMT;
  14104. property SCANINC : TBits_1 read getSCANINC write setSCANINC;
  14105. property w : TBits_32 read getw write setw;
  14106. end;
  14107. TETH_EMACxMCFG = record
  14108. private
  14109. function getCLKSEL : TBits_4; inline;
  14110. function getNOPRE : TBits_1; inline;
  14111. function getRESETMGMT : TBits_1; inline;
  14112. function getSCANINC : TBits_1; inline;
  14113. function getw : TBits_32; inline;
  14114. procedure setCLKSEL(thebits : TBits_4); inline;
  14115. procedure setNOPRE(thebits : TBits_1); inline;
  14116. procedure setRESETMGMT(thebits : TBits_1); inline;
  14117. procedure setSCANINC(thebits : TBits_1); inline;
  14118. procedure setw(thebits : TBits_32); inline;
  14119. public
  14120. procedure clearNOPRE; inline;
  14121. procedure clearRESETMGMT; inline;
  14122. procedure clearSCANINC; inline;
  14123. procedure setNOPRE; inline;
  14124. procedure setRESETMGMT; inline;
  14125. procedure setSCANINC; inline;
  14126. property CLKSEL : TBits_4 read getCLKSEL write setCLKSEL;
  14127. property NOPRE : TBits_1 read getNOPRE write setNOPRE;
  14128. property RESETMGMT : TBits_1 read getRESETMGMT write setRESETMGMT;
  14129. property SCANINC : TBits_1 read getSCANINC write setSCANINC;
  14130. property w : TBits_32 read getw write setw;
  14131. end;
  14132. TETH_EMAC1MCMD = record
  14133. private
  14134. function getREAD : TBits_1; inline;
  14135. function getSCAN : TBits_1; inline;
  14136. function getw : TBits_32; inline;
  14137. procedure setREAD(thebits : TBits_1); inline;
  14138. procedure setSCAN(thebits : TBits_1); inline;
  14139. procedure setw(thebits : TBits_32); inline;
  14140. public
  14141. procedure clearREAD; inline;
  14142. procedure clearSCAN; inline;
  14143. procedure setREAD; inline;
  14144. procedure setSCAN; inline;
  14145. property READ : TBits_1 read getREAD write setREAD;
  14146. property SCAN : TBits_1 read getSCAN write setSCAN;
  14147. property w : TBits_32 read getw write setw;
  14148. end;
  14149. TETH_EMACxMCMD = record
  14150. private
  14151. function getREAD : TBits_1; inline;
  14152. function getSCAN : TBits_1; inline;
  14153. function getw : TBits_32; inline;
  14154. procedure setREAD(thebits : TBits_1); inline;
  14155. procedure setSCAN(thebits : TBits_1); inline;
  14156. procedure setw(thebits : TBits_32); inline;
  14157. public
  14158. procedure clearREAD; inline;
  14159. procedure clearSCAN; inline;
  14160. procedure setREAD; inline;
  14161. procedure setSCAN; inline;
  14162. property READ : TBits_1 read getREAD write setREAD;
  14163. property SCAN : TBits_1 read getSCAN write setSCAN;
  14164. property w : TBits_32 read getw write setw;
  14165. end;
  14166. TETH_EMAC1MADR = record
  14167. private
  14168. function getPHYADDR : TBits_5; inline;
  14169. function getREGADDR : TBits_5; inline;
  14170. function getw : TBits_32; inline;
  14171. procedure setPHYADDR(thebits : TBits_5); inline;
  14172. procedure setREGADDR(thebits : TBits_5); inline;
  14173. procedure setw(thebits : TBits_32); inline;
  14174. public
  14175. property PHYADDR : TBits_5 read getPHYADDR write setPHYADDR;
  14176. property REGADDR : TBits_5 read getREGADDR write setREGADDR;
  14177. property w : TBits_32 read getw write setw;
  14178. end;
  14179. TETH_EMACxMADR = record
  14180. private
  14181. function getPHYADDR : TBits_5; inline;
  14182. function getREGADDR : TBits_5; inline;
  14183. function getw : TBits_32; inline;
  14184. procedure setPHYADDR(thebits : TBits_5); inline;
  14185. procedure setREGADDR(thebits : TBits_5); inline;
  14186. procedure setw(thebits : TBits_32); inline;
  14187. public
  14188. property PHYADDR : TBits_5 read getPHYADDR write setPHYADDR;
  14189. property REGADDR : TBits_5 read getREGADDR write setREGADDR;
  14190. property w : TBits_32 read getw write setw;
  14191. end;
  14192. TETH_EMAC1MWTD = record
  14193. private
  14194. function getMWTD : TBits_16; inline;
  14195. function getw : TBits_32; inline;
  14196. procedure setMWTD(thebits : TBits_16); inline;
  14197. procedure setw(thebits : TBits_32); inline;
  14198. public
  14199. property MWTD : TBits_16 read getMWTD write setMWTD;
  14200. property w : TBits_32 read getw write setw;
  14201. end;
  14202. TETH_EMACxMWTD = record
  14203. private
  14204. function getMWTD : TBits_16; inline;
  14205. function getw : TBits_32; inline;
  14206. procedure setMWTD(thebits : TBits_16); inline;
  14207. procedure setw(thebits : TBits_32); inline;
  14208. public
  14209. property MWTD : TBits_16 read getMWTD write setMWTD;
  14210. property w : TBits_32 read getw write setw;
  14211. end;
  14212. TETH_EMAC1MRDD = record
  14213. private
  14214. function getMRDD : TBits_16; inline;
  14215. function getw : TBits_32; inline;
  14216. procedure setMRDD(thebits : TBits_16); inline;
  14217. procedure setw(thebits : TBits_32); inline;
  14218. public
  14219. property MRDD : TBits_16 read getMRDD write setMRDD;
  14220. property w : TBits_32 read getw write setw;
  14221. end;
  14222. TETH_EMACxMRDD = record
  14223. private
  14224. function getMRDD : TBits_16; inline;
  14225. function getw : TBits_32; inline;
  14226. procedure setMRDD(thebits : TBits_16); inline;
  14227. procedure setw(thebits : TBits_32); inline;
  14228. public
  14229. property MRDD : TBits_16 read getMRDD write setMRDD;
  14230. property w : TBits_32 read getw write setw;
  14231. end;
  14232. TETH_EMAC1MIND = record
  14233. private
  14234. function getLINKFAIL : TBits_1; inline;
  14235. function getMIIMBUSY : TBits_1; inline;
  14236. function getNOTVALID : TBits_1; inline;
  14237. function getSCAN : TBits_1; inline;
  14238. function getw : TBits_32; inline;
  14239. procedure setLINKFAIL(thebits : TBits_1); inline;
  14240. procedure setMIIMBUSY(thebits : TBits_1); inline;
  14241. procedure setNOTVALID(thebits : TBits_1); inline;
  14242. procedure setSCAN(thebits : TBits_1); inline;
  14243. procedure setw(thebits : TBits_32); inline;
  14244. public
  14245. procedure clearLINKFAIL; inline;
  14246. procedure clearMIIMBUSY; inline;
  14247. procedure clearNOTVALID; inline;
  14248. procedure clearSCAN; inline;
  14249. procedure setLINKFAIL; inline;
  14250. procedure setMIIMBUSY; inline;
  14251. procedure setNOTVALID; inline;
  14252. procedure setSCAN; inline;
  14253. property LINKFAIL : TBits_1 read getLINKFAIL write setLINKFAIL;
  14254. property MIIMBUSY : TBits_1 read getMIIMBUSY write setMIIMBUSY;
  14255. property NOTVALID : TBits_1 read getNOTVALID write setNOTVALID;
  14256. property SCAN : TBits_1 read getSCAN write setSCAN;
  14257. property w : TBits_32 read getw write setw;
  14258. end;
  14259. TETH_EMACxMIND = record
  14260. private
  14261. function getLINKFAIL : TBits_1; inline;
  14262. function getMIIMBUSY : TBits_1; inline;
  14263. function getNOTVALID : TBits_1; inline;
  14264. function getSCAN : TBits_1; inline;
  14265. function getw : TBits_32; inline;
  14266. procedure setLINKFAIL(thebits : TBits_1); inline;
  14267. procedure setMIIMBUSY(thebits : TBits_1); inline;
  14268. procedure setNOTVALID(thebits : TBits_1); inline;
  14269. procedure setSCAN(thebits : TBits_1); inline;
  14270. procedure setw(thebits : TBits_32); inline;
  14271. public
  14272. procedure clearLINKFAIL; inline;
  14273. procedure clearMIIMBUSY; inline;
  14274. procedure clearNOTVALID; inline;
  14275. procedure clearSCAN; inline;
  14276. procedure setLINKFAIL; inline;
  14277. procedure setMIIMBUSY; inline;
  14278. procedure setNOTVALID; inline;
  14279. procedure setSCAN; inline;
  14280. property LINKFAIL : TBits_1 read getLINKFAIL write setLINKFAIL;
  14281. property MIIMBUSY : TBits_1 read getMIIMBUSY write setMIIMBUSY;
  14282. property NOTVALID : TBits_1 read getNOTVALID write setNOTVALID;
  14283. property SCAN : TBits_1 read getSCAN write setSCAN;
  14284. property w : TBits_32 read getw write setw;
  14285. end;
  14286. TETH_EMAC1SA0 = record
  14287. private
  14288. function getSTNADDR5 : TBits_8; inline;
  14289. function getSTNADDR6 : TBits_8; inline;
  14290. function getw : TBits_32; inline;
  14291. procedure setSTNADDR5(thebits : TBits_8); inline;
  14292. procedure setSTNADDR6(thebits : TBits_8); inline;
  14293. procedure setw(thebits : TBits_32); inline;
  14294. public
  14295. property STNADDR5 : TBits_8 read getSTNADDR5 write setSTNADDR5;
  14296. property STNADDR6 : TBits_8 read getSTNADDR6 write setSTNADDR6;
  14297. property w : TBits_32 read getw write setw;
  14298. end;
  14299. TETH_EMACxSA0 = record
  14300. private
  14301. function getSTNADDR5 : TBits_8; inline;
  14302. function getSTNADDR6 : TBits_8; inline;
  14303. function getw : TBits_32; inline;
  14304. procedure setSTNADDR5(thebits : TBits_8); inline;
  14305. procedure setSTNADDR6(thebits : TBits_8); inline;
  14306. procedure setw(thebits : TBits_32); inline;
  14307. public
  14308. property STNADDR5 : TBits_8 read getSTNADDR5 write setSTNADDR5;
  14309. property STNADDR6 : TBits_8 read getSTNADDR6 write setSTNADDR6;
  14310. property w : TBits_32 read getw write setw;
  14311. end;
  14312. TETH_EMAC1SA1 = record
  14313. private
  14314. function getSTNADDR3 : TBits_8; inline;
  14315. function getSTNADDR4 : TBits_8; inline;
  14316. function getw : TBits_32; inline;
  14317. procedure setSTNADDR3(thebits : TBits_8); inline;
  14318. procedure setSTNADDR4(thebits : TBits_8); inline;
  14319. procedure setw(thebits : TBits_32); inline;
  14320. public
  14321. property STNADDR3 : TBits_8 read getSTNADDR3 write setSTNADDR3;
  14322. property STNADDR4 : TBits_8 read getSTNADDR4 write setSTNADDR4;
  14323. property w : TBits_32 read getw write setw;
  14324. end;
  14325. TETH_EMACxSA1 = record
  14326. private
  14327. function getSTNADDR3 : TBits_8; inline;
  14328. function getSTNADDR4 : TBits_8; inline;
  14329. function getw : TBits_32; inline;
  14330. procedure setSTNADDR3(thebits : TBits_8); inline;
  14331. procedure setSTNADDR4(thebits : TBits_8); inline;
  14332. procedure setw(thebits : TBits_32); inline;
  14333. public
  14334. property STNADDR3 : TBits_8 read getSTNADDR3 write setSTNADDR3;
  14335. property STNADDR4 : TBits_8 read getSTNADDR4 write setSTNADDR4;
  14336. property w : TBits_32 read getw write setw;
  14337. end;
  14338. TETH_EMAC1SA2 = record
  14339. private
  14340. function getSTNADDR1 : TBits_8; inline;
  14341. function getSTNADDR2 : TBits_8; inline;
  14342. function getw : TBits_32; inline;
  14343. procedure setSTNADDR1(thebits : TBits_8); inline;
  14344. procedure setSTNADDR2(thebits : TBits_8); inline;
  14345. procedure setw(thebits : TBits_32); inline;
  14346. public
  14347. property STNADDR1 : TBits_8 read getSTNADDR1 write setSTNADDR1;
  14348. property STNADDR2 : TBits_8 read getSTNADDR2 write setSTNADDR2;
  14349. property w : TBits_32 read getw write setw;
  14350. end;
  14351. TETH_EMACxSA2 = record
  14352. private
  14353. function getSTNADDR1 : TBits_8; inline;
  14354. function getSTNADDR2 : TBits_8; inline;
  14355. function getw : TBits_32; inline;
  14356. procedure setSTNADDR1(thebits : TBits_8); inline;
  14357. procedure setSTNADDR2(thebits : TBits_8); inline;
  14358. procedure setw(thebits : TBits_32); inline;
  14359. public
  14360. property STNADDR1 : TBits_8 read getSTNADDR1 write setSTNADDR1;
  14361. property STNADDR2 : TBits_8 read getSTNADDR2 write setSTNADDR2;
  14362. property w : TBits_32 read getw write setw;
  14363. end;
  14364. type
  14365. TETHRegisters = record
  14366. ETHCON1bits : TETH_ETHCON1;
  14367. ETHCON1 : longWord;
  14368. ETHCON1CLR : longWord;
  14369. ETHCON1SET : longWord;
  14370. ETHCON1INV : longWord;
  14371. ETHCON2bits : TETH_ETHCON2;
  14372. ETHCON2 : longWord;
  14373. ETHCON2CLR : longWord;
  14374. ETHCON2SET : longWord;
  14375. ETHCON2INV : longWord;
  14376. ETHTXSTbits : TETH_ETHTXST;
  14377. ETHTXST : longWord;
  14378. ETHTXSTCLR : longWord;
  14379. ETHTXSTSET : longWord;
  14380. ETHTXSTINV : longWord;
  14381. ETHRXSTbits : TETH_ETHRXST;
  14382. ETHRXST : longWord;
  14383. ETHRXSTCLR : longWord;
  14384. ETHRXSTSET : longWord;
  14385. ETHRXSTINV : longWord;
  14386. ETHHT0bits : TETH_ETHHT0;
  14387. ETHHT0 : longWord;
  14388. ETHHT0CLR : longWord;
  14389. ETHHT0SET : longWord;
  14390. ETHHT0INV : longWord;
  14391. ETHHT1bits : TETH_ETHHT1;
  14392. ETHHT1 : longWord;
  14393. ETHHT1CLR : longWord;
  14394. ETHHT1SET : longWord;
  14395. ETHHT1INV : longWord;
  14396. ETHPMM0bits : TETH_ETHPMM0;
  14397. ETHPMM0 : longWord;
  14398. ETHPMM0CLR : longWord;
  14399. ETHPMM0SET : longWord;
  14400. ETHPMM0INV : longWord;
  14401. ETHPMM1bits : TETH_ETHPMM1;
  14402. ETHPMM1 : longWord;
  14403. ETHPMM1CLR : longWord;
  14404. ETHPMM1SET : longWord;
  14405. ETHPMM1INV : longWord;
  14406. ETHPMCSbits : TETH_ETHPMCS;
  14407. ETHPMCS : longWord;
  14408. ETHPMCSCLR : longWord;
  14409. ETHPMCSSET : longWord;
  14410. ETHPMCSINV : longWord;
  14411. ETHPMObits : TETH_ETHPMO;
  14412. ETHPMO : longWord;
  14413. ETHPMOCLR : longWord;
  14414. ETHPMOSET : longWord;
  14415. ETHPMOINV : longWord;
  14416. ETHRXFCbits : TETH_ETHRXFC;
  14417. ETHRXFC : longWord;
  14418. ETHRXFCCLR : longWord;
  14419. ETHRXFCSET : longWord;
  14420. ETHRXFCINV : longWord;
  14421. ETHRXWMbits : TETH_ETHRXWM;
  14422. ETHRXWM : longWord;
  14423. ETHRXWMCLR : longWord;
  14424. ETHRXWMSET : longWord;
  14425. ETHRXWMINV : longWord;
  14426. ETHIENbits : TETH_ETHIEN;
  14427. ETHIEN : longWord;
  14428. ETHIENCLR : longWord;
  14429. ETHIENSET : longWord;
  14430. ETHIENINV : longWord;
  14431. ETHIRQbits : TETH_ETHIRQ;
  14432. ETHIRQ : longWord;
  14433. ETHIRQCLR : longWord;
  14434. ETHIRQSET : longWord;
  14435. ETHIRQINV : longWord;
  14436. ETHSTATbits : TETH_ETHSTAT;
  14437. ETHSTAT : longWord;
  14438. ETHSTATCLR : longWord;
  14439. ETHSTATSET : longWord;
  14440. ETHSTATINV : longWord;
  14441. ETHRXOVFLOWbits : TETH_ETHRXOVFLOW;
  14442. ETHRXOVFLOW : longWord;
  14443. ETHRXOVFLOWCLR : longWord;
  14444. ETHRXOVFLOWSET : longWord;
  14445. ETHRXOVFLOWINV : longWord;
  14446. ETHFRMTXOKbits : TETH_ETHFRMTXOK;
  14447. ETHFRMTXOK : longWord;
  14448. ETHFRMTXOKCLR : longWord;
  14449. ETHFRMTXOKSET : longWord;
  14450. ETHFRMTXOKINV : longWord;
  14451. ETHSCOLFRMbits : TETH_ETHSCOLFRM;
  14452. ETHSCOLFRM : longWord;
  14453. ETHSCOLFRMCLR : longWord;
  14454. ETHSCOLFRMSET : longWord;
  14455. ETHSCOLFRMINV : longWord;
  14456. ETHMCOLFRMbits : TETH_ETHMCOLFRM;
  14457. ETHMCOLFRM : longWord;
  14458. ETHMCOLFRMCLR : longWord;
  14459. ETHMCOLFRMSET : longWord;
  14460. ETHMCOLFRMINV : longWord;
  14461. ETHFRMRXOKbits : TETH_ETHFRMRXOK;
  14462. ETHFRMRXOK : longWord;
  14463. ETHFRMRXOKCLR : longWord;
  14464. ETHFRMRXOKSET : longWord;
  14465. ETHFRMRXOKINV : longWord;
  14466. ETHFCSERRbits : TETH_ETHFCSERR;
  14467. ETHFCSERR : longWord;
  14468. ETHFCSERRCLR : longWord;
  14469. ETHFCSERRSET : longWord;
  14470. ETHFCSERRINV : longWord;
  14471. ETHALGNERRbits : TETH_ETHALGNERR;
  14472. ETHALGNERR : longWord;
  14473. ETHALGNERRCLR : longWord;
  14474. ETHALGNERRSET : longWord;
  14475. ETHALGNERRINV : longWord;
  14476. EMAC1CFG1bits : TETH_EMAC1CFG1;
  14477. EMAC1CFG1 : longWord;
  14478. EMACxCFG1bits : TETH_EMACxCFG1;
  14479. EMACxCFG1 : longWord;
  14480. EMAC1CFG1CLR : longWord;
  14481. EMACxCFG1CLR : longWord;
  14482. EMAC1CFG1SET : longWord;
  14483. EMACxCFG1SET : longWord;
  14484. EMAC1CFG1INV : longWord;
  14485. EMACxCFG1INV : longWord;
  14486. EMAC1CFG2bits : TETH_EMAC1CFG2;
  14487. EMAC1CFG2 : longWord;
  14488. EMACxCFG2bits : TETH_EMACxCFG2;
  14489. EMACxCFG2 : longWord;
  14490. EMAC1CFG2CLR : longWord;
  14491. EMACxCFG2CLR : longWord;
  14492. EMAC1CFG2SET : longWord;
  14493. EMACxCFG2SET : longWord;
  14494. EMAC1CFG2INV : longWord;
  14495. EMACxCFG2INV : longWord;
  14496. EMAC1IPGTbits : TETH_EMAC1IPGT;
  14497. EMAC1IPGT : longWord;
  14498. EMACxIPGTbits : TETH_EMACxIPGT;
  14499. EMACxIPGT : longWord;
  14500. EMAC1IPGTCLR : longWord;
  14501. EMACxIPGTCLR : longWord;
  14502. EMAC1IPGTSET : longWord;
  14503. EMACxIPGTSET : longWord;
  14504. EMAC1IPGTINV : longWord;
  14505. EMACxIPGTINV : longWord;
  14506. EMAC1IPGRbits : TETH_EMAC1IPGR;
  14507. EMAC1IPGR : longWord;
  14508. EMACxIPGRbits : TETH_EMACxIPGR;
  14509. EMACxIPGR : longWord;
  14510. EMAC1IPGRCLR : longWord;
  14511. EMACxIPGRCLR : longWord;
  14512. EMAC1IPGRSET : longWord;
  14513. EMACxIPGRSET : longWord;
  14514. EMAC1IPGRINV : longWord;
  14515. EMACxIPGRINV : longWord;
  14516. EMAC1CLRTbits : TETH_EMAC1CLRT;
  14517. EMAC1CLRT : longWord;
  14518. EMACxCLRTbits : TETH_EMACxCLRT;
  14519. EMACxCLRT : longWord;
  14520. EMAC1CLRTCLR : longWord;
  14521. EMACxCLRTCLR : longWord;
  14522. EMAC1CLRTSET : longWord;
  14523. EMACxCLRTSET : longWord;
  14524. EMAC1CLRTINV : longWord;
  14525. EMACxCLRTINV : longWord;
  14526. EMAC1MAXFbits : TETH_EMAC1MAXF;
  14527. EMAC1MAXF : longWord;
  14528. EMACxMAXFbits : TETH_EMACxMAXF;
  14529. EMACxMAXF : longWord;
  14530. EMAC1MAXFCLR : longWord;
  14531. EMACxMAXFCLR : longWord;
  14532. EMAC1MAXFSET : longWord;
  14533. EMACxMAXFSET : longWord;
  14534. EMAC1MAXFINV : longWord;
  14535. EMACxMAXFINV : longWord;
  14536. EMAC1SUPPbits : TETH_EMAC1SUPP;
  14537. EMAC1SUPP : longWord;
  14538. EMACxSUPPbits : TETH_EMACxSUPP;
  14539. EMACxSUPP : longWord;
  14540. EMAC1SUPPCLR : longWord;
  14541. EMACxSUPPCLR : longWord;
  14542. EMAC1SUPPSET : longWord;
  14543. EMACxSUPPSET : longWord;
  14544. EMAC1SUPPINV : longWord;
  14545. EMACxSUPPINV : longWord;
  14546. EMAC1TESTbits : TETH_EMAC1TEST;
  14547. EMAC1TEST : longWord;
  14548. EMACxTESTbits : TETH_EMACxTEST;
  14549. EMACxTEST : longWord;
  14550. EMAC1TESTCLR : longWord;
  14551. EMACxTESTCLR : longWord;
  14552. EMAC1TESTSET : longWord;
  14553. EMACxTESTSET : longWord;
  14554. EMAC1TESTINV : longWord;
  14555. EMACxTESTINV : longWord;
  14556. EMAC1MCFGbits : TETH_EMAC1MCFG;
  14557. EMAC1MCFG : longWord;
  14558. EMACxMCFGbits : TETH_EMACxMCFG;
  14559. EMACxMCFG : longWord;
  14560. EMAC1MCFGCLR : longWord;
  14561. EMACxMCFGCLR : longWord;
  14562. EMAC1MCFGSET : longWord;
  14563. EMACxMCFGSET : longWord;
  14564. EMAC1MCFGINV : longWord;
  14565. EMACxMCFGINV : longWord;
  14566. EMAC1MCMDbits : TETH_EMAC1MCMD;
  14567. EMAC1MCMD : longWord;
  14568. EMACxMCMDbits : TETH_EMACxMCMD;
  14569. EMACxMCMD : longWord;
  14570. EMAC1MCMDCLR : longWord;
  14571. EMACxMCMDCLR : longWord;
  14572. EMAC1MCMDSET : longWord;
  14573. EMACxMCMDSET : longWord;
  14574. EMAC1MCMDINV : longWord;
  14575. EMACxMCMDINV : longWord;
  14576. EMAC1MADRbits : TETH_EMAC1MADR;
  14577. EMAC1MADR : longWord;
  14578. EMACxMADRbits : TETH_EMACxMADR;
  14579. EMACxMADR : longWord;
  14580. EMAC1MADRCLR : longWord;
  14581. EMACxMADRCLR : longWord;
  14582. EMAC1MADRSET : longWord;
  14583. EMACxMADRSET : longWord;
  14584. EMAC1MADRINV : longWord;
  14585. EMACxMADRINV : longWord;
  14586. EMAC1MWTDbits : TETH_EMAC1MWTD;
  14587. EMAC1MWTD : longWord;
  14588. EMACxMWTDbits : TETH_EMACxMWTD;
  14589. EMACxMWTD : longWord;
  14590. EMAC1MWTDCLR : longWord;
  14591. EMACxMWTDCLR : longWord;
  14592. EMAC1MWTDSET : longWord;
  14593. EMACxMWTDSET : longWord;
  14594. EMAC1MWTDINV : longWord;
  14595. EMACxMWTDINV : longWord;
  14596. EMAC1MRDDbits : TETH_EMAC1MRDD;
  14597. EMAC1MRDD : longWord;
  14598. EMACxMRDDbits : TETH_EMACxMRDD;
  14599. EMACxMRDD : longWord;
  14600. EMAC1MRDDCLR : longWord;
  14601. EMACxMRDDCLR : longWord;
  14602. EMAC1MRDDSET : longWord;
  14603. EMACxMRDDSET : longWord;
  14604. EMAC1MRDDINV : longWord;
  14605. EMACxMRDDINV : longWord;
  14606. EMAC1MINDbits : TETH_EMAC1MIND;
  14607. EMAC1MIND : longWord;
  14608. EMACxMINDbits : TETH_EMACxMIND;
  14609. EMACxMIND : longWord;
  14610. EMAC1MINDCLR : longWord;
  14611. EMACxMINDCLR : longWord;
  14612. EMAC1MINDSET : longWord;
  14613. EMACxMINDSET : longWord;
  14614. EMAC1MINDINV : longWord;
  14615. EMACxMINDINV : longWord;
  14616. EMAC1SA0bits : TETH_EMAC1SA0;
  14617. EMAC1SA0 : longWord;
  14618. EMACxSA0bits : TETH_EMACxSA0;
  14619. EMACxSA0 : longWord;
  14620. EMAC1SA0CLR : longWord;
  14621. EMACxSA0CLR : longWord;
  14622. EMAC1SA0SET : longWord;
  14623. EMACxSA0SET : longWord;
  14624. EMAC1SA0INV : longWord;
  14625. EMACxSA0INV : longWord;
  14626. EMAC1SA1bits : TETH_EMAC1SA1;
  14627. EMAC1SA1 : longWord;
  14628. EMACxSA1bits : TETH_EMACxSA1;
  14629. EMACxSA1 : longWord;
  14630. EMAC1SA1CLR : longWord;
  14631. EMACxSA1CLR : longWord;
  14632. EMAC1SA1SET : longWord;
  14633. EMACxSA1SET : longWord;
  14634. EMAC1SA1INV : longWord;
  14635. EMACxSA1INV : longWord;
  14636. EMAC1SA2bits : TETH_EMAC1SA2;
  14637. EMAC1SA2 : longWord;
  14638. EMACxSA2bits : TETH_EMACxSA2;
  14639. EMACxSA2 : longWord;
  14640. EMAC1SA2CLR : longWord;
  14641. EMACxSA2CLR : longWord;
  14642. EMAC1SA2SET : longWord;
  14643. EMACxSA2SET : longWord;
  14644. EMAC1SA2INV : longWord;
  14645. EMACxSA2INV : longWord;
  14646. end;
  14647. TCAN1_C1CON = record
  14648. private
  14649. function getABAT : TBits_1; inline;
  14650. function getCANBUSY : TBits_1; inline;
  14651. function getCANCAP : TBits_1; inline;
  14652. function getDNCNT : TBits_5; inline;
  14653. function getON : TBits_1; inline;
  14654. function getOPMOD : TBits_3; inline;
  14655. function getREQOP : TBits_3; inline;
  14656. function getSIDL : TBits_1; inline;
  14657. function getw : TBits_32; inline;
  14658. procedure setABAT(thebits : TBits_1); inline;
  14659. procedure setCANBUSY(thebits : TBits_1); inline;
  14660. procedure setCANCAP(thebits : TBits_1); inline;
  14661. procedure setDNCNT(thebits : TBits_5); inline;
  14662. procedure setON(thebits : TBits_1); inline;
  14663. procedure setOPMOD(thebits : TBits_3); inline;
  14664. procedure setREQOP(thebits : TBits_3); inline;
  14665. procedure setSIDL(thebits : TBits_1); inline;
  14666. procedure setw(thebits : TBits_32); inline;
  14667. public
  14668. procedure clearABAT; inline;
  14669. procedure clearCANBUSY; inline;
  14670. procedure clearCANCAP; inline;
  14671. procedure clearON; inline;
  14672. procedure clearSIDL; inline;
  14673. procedure setABAT; inline;
  14674. procedure setCANBUSY; inline;
  14675. procedure setCANCAP; inline;
  14676. procedure setON; inline;
  14677. procedure setSIDL; inline;
  14678. property ABAT : TBits_1 read getABAT write setABAT;
  14679. property CANBUSY : TBits_1 read getCANBUSY write setCANBUSY;
  14680. property CANCAP : TBits_1 read getCANCAP write setCANCAP;
  14681. property DNCNT : TBits_5 read getDNCNT write setDNCNT;
  14682. property ON : TBits_1 read getON write setON;
  14683. property OPMOD : TBits_3 read getOPMOD write setOPMOD;
  14684. property REQOP : TBits_3 read getREQOP write setREQOP;
  14685. property SIDL : TBits_1 read getSIDL write setSIDL;
  14686. property w : TBits_32 read getw write setw;
  14687. end;
  14688. TCAN1_C1CFG = record
  14689. private
  14690. function getBRP : TBits_6; inline;
  14691. function getPRSEG : TBits_3; inline;
  14692. function getSAM : TBits_1; inline;
  14693. function getSEG1PH : TBits_3; inline;
  14694. function getSEG2PH : TBits_3; inline;
  14695. function getSEG2PHTS : TBits_1; inline;
  14696. function getSJW : TBits_2; inline;
  14697. function getWAKFIL : TBits_1; inline;
  14698. function getw : TBits_32; inline;
  14699. procedure setBRP(thebits : TBits_6); inline;
  14700. procedure setPRSEG(thebits : TBits_3); inline;
  14701. procedure setSAM(thebits : TBits_1); inline;
  14702. procedure setSEG1PH(thebits : TBits_3); inline;
  14703. procedure setSEG2PH(thebits : TBits_3); inline;
  14704. procedure setSEG2PHTS(thebits : TBits_1); inline;
  14705. procedure setSJW(thebits : TBits_2); inline;
  14706. procedure setWAKFIL(thebits : TBits_1); inline;
  14707. procedure setw(thebits : TBits_32); inline;
  14708. public
  14709. procedure clearSAM; inline;
  14710. procedure clearSEG2PHTS; inline;
  14711. procedure clearWAKFIL; inline;
  14712. procedure setSAM; inline;
  14713. procedure setSEG2PHTS; inline;
  14714. procedure setWAKFIL; inline;
  14715. property BRP : TBits_6 read getBRP write setBRP;
  14716. property PRSEG : TBits_3 read getPRSEG write setPRSEG;
  14717. property SAM : TBits_1 read getSAM write setSAM;
  14718. property SEG1PH : TBits_3 read getSEG1PH write setSEG1PH;
  14719. property SEG2PH : TBits_3 read getSEG2PH write setSEG2PH;
  14720. property SEG2PHTS : TBits_1 read getSEG2PHTS write setSEG2PHTS;
  14721. property SJW : TBits_2 read getSJW write setSJW;
  14722. property WAKFIL : TBits_1 read getWAKFIL write setWAKFIL;
  14723. property w : TBits_32 read getw write setw;
  14724. end;
  14725. TCAN1_C1INT = record
  14726. private
  14727. function getCERRIE : TBits_1; inline;
  14728. function getCERRIF : TBits_1; inline;
  14729. function getCTMRIE : TBits_1; inline;
  14730. function getCTMRIF : TBits_1; inline;
  14731. function getIVRIE : TBits_1; inline;
  14732. function getIVRIF : TBits_1; inline;
  14733. function getMODIE : TBits_1; inline;
  14734. function getMODIF : TBits_1; inline;
  14735. function getRBIE : TBits_1; inline;
  14736. function getRBIF : TBits_1; inline;
  14737. function getRBOVIE : TBits_1; inline;
  14738. function getRBOVIF : TBits_1; inline;
  14739. function getSERRIE : TBits_1; inline;
  14740. function getSERRIF : TBits_1; inline;
  14741. function getTBIE : TBits_1; inline;
  14742. function getTBIF : TBits_1; inline;
  14743. function getWAKIE : TBits_1; inline;
  14744. function getWAKIF : TBits_1; inline;
  14745. function getw : TBits_32; inline;
  14746. procedure setCERRIE(thebits : TBits_1); inline;
  14747. procedure setCERRIF(thebits : TBits_1); inline;
  14748. procedure setCTMRIE(thebits : TBits_1); inline;
  14749. procedure setCTMRIF(thebits : TBits_1); inline;
  14750. procedure setIVRIE(thebits : TBits_1); inline;
  14751. procedure setIVRIF(thebits : TBits_1); inline;
  14752. procedure setMODIE(thebits : TBits_1); inline;
  14753. procedure setMODIF(thebits : TBits_1); inline;
  14754. procedure setRBIE(thebits : TBits_1); inline;
  14755. procedure setRBIF(thebits : TBits_1); inline;
  14756. procedure setRBOVIE(thebits : TBits_1); inline;
  14757. procedure setRBOVIF(thebits : TBits_1); inline;
  14758. procedure setSERRIE(thebits : TBits_1); inline;
  14759. procedure setSERRIF(thebits : TBits_1); inline;
  14760. procedure setTBIE(thebits : TBits_1); inline;
  14761. procedure setTBIF(thebits : TBits_1); inline;
  14762. procedure setWAKIE(thebits : TBits_1); inline;
  14763. procedure setWAKIF(thebits : TBits_1); inline;
  14764. procedure setw(thebits : TBits_32); inline;
  14765. public
  14766. procedure clearCERRIE; inline;
  14767. procedure clearCERRIF; inline;
  14768. procedure clearCTMRIE; inline;
  14769. procedure clearCTMRIF; inline;
  14770. procedure clearIVRIE; inline;
  14771. procedure clearIVRIF; inline;
  14772. procedure clearMODIE; inline;
  14773. procedure clearMODIF; inline;
  14774. procedure clearRBIE; inline;
  14775. procedure clearRBIF; inline;
  14776. procedure clearRBOVIE; inline;
  14777. procedure clearRBOVIF; inline;
  14778. procedure clearSERRIE; inline;
  14779. procedure clearSERRIF; inline;
  14780. procedure clearTBIE; inline;
  14781. procedure clearTBIF; inline;
  14782. procedure clearWAKIE; inline;
  14783. procedure clearWAKIF; inline;
  14784. procedure setCERRIE; inline;
  14785. procedure setCERRIF; inline;
  14786. procedure setCTMRIE; inline;
  14787. procedure setCTMRIF; inline;
  14788. procedure setIVRIE; inline;
  14789. procedure setIVRIF; inline;
  14790. procedure setMODIE; inline;
  14791. procedure setMODIF; inline;
  14792. procedure setRBIE; inline;
  14793. procedure setRBIF; inline;
  14794. procedure setRBOVIE; inline;
  14795. procedure setRBOVIF; inline;
  14796. procedure setSERRIE; inline;
  14797. procedure setSERRIF; inline;
  14798. procedure setTBIE; inline;
  14799. procedure setTBIF; inline;
  14800. procedure setWAKIE; inline;
  14801. procedure setWAKIF; inline;
  14802. property CERRIE : TBits_1 read getCERRIE write setCERRIE;
  14803. property CERRIF : TBits_1 read getCERRIF write setCERRIF;
  14804. property CTMRIE : TBits_1 read getCTMRIE write setCTMRIE;
  14805. property CTMRIF : TBits_1 read getCTMRIF write setCTMRIF;
  14806. property IVRIE : TBits_1 read getIVRIE write setIVRIE;
  14807. property IVRIF : TBits_1 read getIVRIF write setIVRIF;
  14808. property MODIE : TBits_1 read getMODIE write setMODIE;
  14809. property MODIF : TBits_1 read getMODIF write setMODIF;
  14810. property RBIE : TBits_1 read getRBIE write setRBIE;
  14811. property RBIF : TBits_1 read getRBIF write setRBIF;
  14812. property RBOVIE : TBits_1 read getRBOVIE write setRBOVIE;
  14813. property RBOVIF : TBits_1 read getRBOVIF write setRBOVIF;
  14814. property SERRIE : TBits_1 read getSERRIE write setSERRIE;
  14815. property SERRIF : TBits_1 read getSERRIF write setSERRIF;
  14816. property TBIE : TBits_1 read getTBIE write setTBIE;
  14817. property TBIF : TBits_1 read getTBIF write setTBIF;
  14818. property WAKIE : TBits_1 read getWAKIE write setWAKIE;
  14819. property WAKIF : TBits_1 read getWAKIF write setWAKIF;
  14820. property w : TBits_32 read getw write setw;
  14821. end;
  14822. TCAN1_C1VEC = record
  14823. private
  14824. function getFILHIT : TBits_5; inline;
  14825. function getICODE : TBits_7; inline;
  14826. function getw : TBits_32; inline;
  14827. procedure setFILHIT(thebits : TBits_5); inline;
  14828. procedure setICODE(thebits : TBits_7); inline;
  14829. procedure setw(thebits : TBits_32); inline;
  14830. public
  14831. property FILHIT : TBits_5 read getFILHIT write setFILHIT;
  14832. property ICODE : TBits_7 read getICODE write setICODE;
  14833. property w : TBits_32 read getw write setw;
  14834. end;
  14835. TCAN1_C1TREC = record
  14836. private
  14837. function getEWARN : TBits_1; inline;
  14838. function getRERRCNT : TBits_8; inline;
  14839. function getRXBP : TBits_1; inline;
  14840. function getRXWARN : TBits_1; inline;
  14841. function getTERRCNT : TBits_8; inline;
  14842. function getTXBO : TBits_1; inline;
  14843. function getTXBP : TBits_1; inline;
  14844. function getTXWARN : TBits_1; inline;
  14845. function getw : TBits_32; inline;
  14846. procedure setEWARN(thebits : TBits_1); inline;
  14847. procedure setRERRCNT(thebits : TBits_8); inline;
  14848. procedure setRXBP(thebits : TBits_1); inline;
  14849. procedure setRXWARN(thebits : TBits_1); inline;
  14850. procedure setTERRCNT(thebits : TBits_8); inline;
  14851. procedure setTXBO(thebits : TBits_1); inline;
  14852. procedure setTXBP(thebits : TBits_1); inline;
  14853. procedure setTXWARN(thebits : TBits_1); inline;
  14854. procedure setw(thebits : TBits_32); inline;
  14855. public
  14856. procedure clearEWARN; inline;
  14857. procedure clearRXBP; inline;
  14858. procedure clearRXWARN; inline;
  14859. procedure clearTXBO; inline;
  14860. procedure clearTXBP; inline;
  14861. procedure clearTXWARN; inline;
  14862. procedure setEWARN; inline;
  14863. procedure setRXBP; inline;
  14864. procedure setRXWARN; inline;
  14865. procedure setTXBO; inline;
  14866. procedure setTXBP; inline;
  14867. procedure setTXWARN; inline;
  14868. property EWARN : TBits_1 read getEWARN write setEWARN;
  14869. property RERRCNT : TBits_8 read getRERRCNT write setRERRCNT;
  14870. property RXBP : TBits_1 read getRXBP write setRXBP;
  14871. property RXWARN : TBits_1 read getRXWARN write setRXWARN;
  14872. property TERRCNT : TBits_8 read getTERRCNT write setTERRCNT;
  14873. property TXBO : TBits_1 read getTXBO write setTXBO;
  14874. property TXBP : TBits_1 read getTXBP write setTXBP;
  14875. property TXWARN : TBits_1 read getTXWARN write setTXWARN;
  14876. property w : TBits_32 read getw write setw;
  14877. end;
  14878. TCAN1_C1FSTAT = record
  14879. private
  14880. function getFIFOIP : TBits_32; inline;
  14881. function getFIFOIP0 : TBits_1; inline;
  14882. function getFIFOIP1 : TBits_1; inline;
  14883. function getFIFOIP10 : TBits_1; inline;
  14884. function getFIFOIP11 : TBits_1; inline;
  14885. function getFIFOIP12 : TBits_1; inline;
  14886. function getFIFOIP13 : TBits_1; inline;
  14887. function getFIFOIP14 : TBits_1; inline;
  14888. function getFIFOIP15 : TBits_1; inline;
  14889. function getFIFOIP16 : TBits_1; inline;
  14890. function getFIFOIP17 : TBits_1; inline;
  14891. function getFIFOIP18 : TBits_1; inline;
  14892. function getFIFOIP19 : TBits_1; inline;
  14893. function getFIFOIP2 : TBits_1; inline;
  14894. function getFIFOIP20 : TBits_1; inline;
  14895. function getFIFOIP21 : TBits_1; inline;
  14896. function getFIFOIP22 : TBits_1; inline;
  14897. function getFIFOIP23 : TBits_1; inline;
  14898. function getFIFOIP24 : TBits_1; inline;
  14899. function getFIFOIP25 : TBits_1; inline;
  14900. function getFIFOIP26 : TBits_1; inline;
  14901. function getFIFOIP27 : TBits_1; inline;
  14902. function getFIFOIP28 : TBits_1; inline;
  14903. function getFIFOIP29 : TBits_1; inline;
  14904. function getFIFOIP3 : TBits_1; inline;
  14905. function getFIFOIP30 : TBits_1; inline;
  14906. function getFIFOIP31 : TBits_1; inline;
  14907. function getFIFOIP4 : TBits_1; inline;
  14908. function getFIFOIP5 : TBits_1; inline;
  14909. function getFIFOIP6 : TBits_1; inline;
  14910. function getFIFOIP7 : TBits_1; inline;
  14911. function getFIFOIP8 : TBits_1; inline;
  14912. function getFIFOIP9 : TBits_1; inline;
  14913. function getw : TBits_32; inline;
  14914. procedure setFIFOIP(thebits : TBits_32); inline;
  14915. procedure setFIFOIP0(thebits : TBits_1); inline;
  14916. procedure setFIFOIP1(thebits : TBits_1); inline;
  14917. procedure setFIFOIP10(thebits : TBits_1); inline;
  14918. procedure setFIFOIP11(thebits : TBits_1); inline;
  14919. procedure setFIFOIP12(thebits : TBits_1); inline;
  14920. procedure setFIFOIP13(thebits : TBits_1); inline;
  14921. procedure setFIFOIP14(thebits : TBits_1); inline;
  14922. procedure setFIFOIP15(thebits : TBits_1); inline;
  14923. procedure setFIFOIP16(thebits : TBits_1); inline;
  14924. procedure setFIFOIP17(thebits : TBits_1); inline;
  14925. procedure setFIFOIP18(thebits : TBits_1); inline;
  14926. procedure setFIFOIP19(thebits : TBits_1); inline;
  14927. procedure setFIFOIP2(thebits : TBits_1); inline;
  14928. procedure setFIFOIP20(thebits : TBits_1); inline;
  14929. procedure setFIFOIP21(thebits : TBits_1); inline;
  14930. procedure setFIFOIP22(thebits : TBits_1); inline;
  14931. procedure setFIFOIP23(thebits : TBits_1); inline;
  14932. procedure setFIFOIP24(thebits : TBits_1); inline;
  14933. procedure setFIFOIP25(thebits : TBits_1); inline;
  14934. procedure setFIFOIP26(thebits : TBits_1); inline;
  14935. procedure setFIFOIP27(thebits : TBits_1); inline;
  14936. procedure setFIFOIP28(thebits : TBits_1); inline;
  14937. procedure setFIFOIP29(thebits : TBits_1); inline;
  14938. procedure setFIFOIP3(thebits : TBits_1); inline;
  14939. procedure setFIFOIP30(thebits : TBits_1); inline;
  14940. procedure setFIFOIP31(thebits : TBits_1); inline;
  14941. procedure setFIFOIP4(thebits : TBits_1); inline;
  14942. procedure setFIFOIP5(thebits : TBits_1); inline;
  14943. procedure setFIFOIP6(thebits : TBits_1); inline;
  14944. procedure setFIFOIP7(thebits : TBits_1); inline;
  14945. procedure setFIFOIP8(thebits : TBits_1); inline;
  14946. procedure setFIFOIP9(thebits : TBits_1); inline;
  14947. procedure setw(thebits : TBits_32); inline;
  14948. public
  14949. procedure clearFIFOIP0; inline;
  14950. procedure clearFIFOIP10; inline;
  14951. procedure clearFIFOIP11; inline;
  14952. procedure clearFIFOIP12; inline;
  14953. procedure clearFIFOIP13; inline;
  14954. procedure clearFIFOIP14; inline;
  14955. procedure clearFIFOIP15; inline;
  14956. procedure clearFIFOIP16; inline;
  14957. procedure clearFIFOIP17; inline;
  14958. procedure clearFIFOIP18; inline;
  14959. procedure clearFIFOIP19; inline;
  14960. procedure clearFIFOIP1; inline;
  14961. procedure clearFIFOIP20; inline;
  14962. procedure clearFIFOIP21; inline;
  14963. procedure clearFIFOIP22; inline;
  14964. procedure clearFIFOIP23; inline;
  14965. procedure clearFIFOIP24; inline;
  14966. procedure clearFIFOIP25; inline;
  14967. procedure clearFIFOIP26; inline;
  14968. procedure clearFIFOIP27; inline;
  14969. procedure clearFIFOIP28; inline;
  14970. procedure clearFIFOIP29; inline;
  14971. procedure clearFIFOIP2; inline;
  14972. procedure clearFIFOIP30; inline;
  14973. procedure clearFIFOIP31; inline;
  14974. procedure clearFIFOIP3; inline;
  14975. procedure clearFIFOIP4; inline;
  14976. procedure clearFIFOIP5; inline;
  14977. procedure clearFIFOIP6; inline;
  14978. procedure clearFIFOIP7; inline;
  14979. procedure clearFIFOIP8; inline;
  14980. procedure clearFIFOIP9; inline;
  14981. procedure setFIFOIP0; inline;
  14982. procedure setFIFOIP10; inline;
  14983. procedure setFIFOIP11; inline;
  14984. procedure setFIFOIP12; inline;
  14985. procedure setFIFOIP13; inline;
  14986. procedure setFIFOIP14; inline;
  14987. procedure setFIFOIP15; inline;
  14988. procedure setFIFOIP16; inline;
  14989. procedure setFIFOIP17; inline;
  14990. procedure setFIFOIP18; inline;
  14991. procedure setFIFOIP19; inline;
  14992. procedure setFIFOIP1; inline;
  14993. procedure setFIFOIP20; inline;
  14994. procedure setFIFOIP21; inline;
  14995. procedure setFIFOIP22; inline;
  14996. procedure setFIFOIP23; inline;
  14997. procedure setFIFOIP24; inline;
  14998. procedure setFIFOIP25; inline;
  14999. procedure setFIFOIP26; inline;
  15000. procedure setFIFOIP27; inline;
  15001. procedure setFIFOIP28; inline;
  15002. procedure setFIFOIP29; inline;
  15003. procedure setFIFOIP2; inline;
  15004. procedure setFIFOIP30; inline;
  15005. procedure setFIFOIP31; inline;
  15006. procedure setFIFOIP3; inline;
  15007. procedure setFIFOIP4; inline;
  15008. procedure setFIFOIP5; inline;
  15009. procedure setFIFOIP6; inline;
  15010. procedure setFIFOIP7; inline;
  15011. procedure setFIFOIP8; inline;
  15012. procedure setFIFOIP9; inline;
  15013. property FIFOIP : TBits_32 read getFIFOIP write setFIFOIP;
  15014. property FIFOIP0 : TBits_1 read getFIFOIP0 write setFIFOIP0;
  15015. property FIFOIP1 : TBits_1 read getFIFOIP1 write setFIFOIP1;
  15016. property FIFOIP10 : TBits_1 read getFIFOIP10 write setFIFOIP10;
  15017. property FIFOIP11 : TBits_1 read getFIFOIP11 write setFIFOIP11;
  15018. property FIFOIP12 : TBits_1 read getFIFOIP12 write setFIFOIP12;
  15019. property FIFOIP13 : TBits_1 read getFIFOIP13 write setFIFOIP13;
  15020. property FIFOIP14 : TBits_1 read getFIFOIP14 write setFIFOIP14;
  15021. property FIFOIP15 : TBits_1 read getFIFOIP15 write setFIFOIP15;
  15022. property FIFOIP16 : TBits_1 read getFIFOIP16 write setFIFOIP16;
  15023. property FIFOIP17 : TBits_1 read getFIFOIP17 write setFIFOIP17;
  15024. property FIFOIP18 : TBits_1 read getFIFOIP18 write setFIFOIP18;
  15025. property FIFOIP19 : TBits_1 read getFIFOIP19 write setFIFOIP19;
  15026. property FIFOIP2 : TBits_1 read getFIFOIP2 write setFIFOIP2;
  15027. property FIFOIP20 : TBits_1 read getFIFOIP20 write setFIFOIP20;
  15028. property FIFOIP21 : TBits_1 read getFIFOIP21 write setFIFOIP21;
  15029. property FIFOIP22 : TBits_1 read getFIFOIP22 write setFIFOIP22;
  15030. property FIFOIP23 : TBits_1 read getFIFOIP23 write setFIFOIP23;
  15031. property FIFOIP24 : TBits_1 read getFIFOIP24 write setFIFOIP24;
  15032. property FIFOIP25 : TBits_1 read getFIFOIP25 write setFIFOIP25;
  15033. property FIFOIP26 : TBits_1 read getFIFOIP26 write setFIFOIP26;
  15034. property FIFOIP27 : TBits_1 read getFIFOIP27 write setFIFOIP27;
  15035. property FIFOIP28 : TBits_1 read getFIFOIP28 write setFIFOIP28;
  15036. property FIFOIP29 : TBits_1 read getFIFOIP29 write setFIFOIP29;
  15037. property FIFOIP3 : TBits_1 read getFIFOIP3 write setFIFOIP3;
  15038. property FIFOIP30 : TBits_1 read getFIFOIP30 write setFIFOIP30;
  15039. property FIFOIP31 : TBits_1 read getFIFOIP31 write setFIFOIP31;
  15040. property FIFOIP4 : TBits_1 read getFIFOIP4 write setFIFOIP4;
  15041. property FIFOIP5 : TBits_1 read getFIFOIP5 write setFIFOIP5;
  15042. property FIFOIP6 : TBits_1 read getFIFOIP6 write setFIFOIP6;
  15043. property FIFOIP7 : TBits_1 read getFIFOIP7 write setFIFOIP7;
  15044. property FIFOIP8 : TBits_1 read getFIFOIP8 write setFIFOIP8;
  15045. property FIFOIP9 : TBits_1 read getFIFOIP9 write setFIFOIP9;
  15046. property w : TBits_32 read getw write setw;
  15047. end;
  15048. TCAN1_C1RXOVF = record
  15049. private
  15050. function getRXOVF : TBits_32; inline;
  15051. function getRXOVF0 : TBits_1; inline;
  15052. function getRXOVF1 : TBits_1; inline;
  15053. function getRXOVF10 : TBits_1; inline;
  15054. function getRXOVF11 : TBits_1; inline;
  15055. function getRXOVF12 : TBits_1; inline;
  15056. function getRXOVF13 : TBits_1; inline;
  15057. function getRXOVF14 : TBits_1; inline;
  15058. function getRXOVF15 : TBits_1; inline;
  15059. function getRXOVF16 : TBits_1; inline;
  15060. function getRXOVF17 : TBits_1; inline;
  15061. function getRXOVF18 : TBits_1; inline;
  15062. function getRXOVF19 : TBits_1; inline;
  15063. function getRXOVF2 : TBits_1; inline;
  15064. function getRXOVF20 : TBits_1; inline;
  15065. function getRXOVF21 : TBits_1; inline;
  15066. function getRXOVF22 : TBits_1; inline;
  15067. function getRXOVF23 : TBits_1; inline;
  15068. function getRXOVF24 : TBits_1; inline;
  15069. function getRXOVF25 : TBits_1; inline;
  15070. function getRXOVF26 : TBits_1; inline;
  15071. function getRXOVF27 : TBits_1; inline;
  15072. function getRXOVF28 : TBits_1; inline;
  15073. function getRXOVF29 : TBits_1; inline;
  15074. function getRXOVF3 : TBits_1; inline;
  15075. function getRXOVF30 : TBits_1; inline;
  15076. function getRXOVF31 : TBits_1; inline;
  15077. function getRXOVF4 : TBits_1; inline;
  15078. function getRXOVF5 : TBits_1; inline;
  15079. function getRXOVF6 : TBits_1; inline;
  15080. function getRXOVF7 : TBits_1; inline;
  15081. function getRXOVF8 : TBits_1; inline;
  15082. function getRXOVF9 : TBits_1; inline;
  15083. function getw : TBits_32; inline;
  15084. procedure setRXOVF(thebits : TBits_32); inline;
  15085. procedure setRXOVF0(thebits : TBits_1); inline;
  15086. procedure setRXOVF1(thebits : TBits_1); inline;
  15087. procedure setRXOVF10(thebits : TBits_1); inline;
  15088. procedure setRXOVF11(thebits : TBits_1); inline;
  15089. procedure setRXOVF12(thebits : TBits_1); inline;
  15090. procedure setRXOVF13(thebits : TBits_1); inline;
  15091. procedure setRXOVF14(thebits : TBits_1); inline;
  15092. procedure setRXOVF15(thebits : TBits_1); inline;
  15093. procedure setRXOVF16(thebits : TBits_1); inline;
  15094. procedure setRXOVF17(thebits : TBits_1); inline;
  15095. procedure setRXOVF18(thebits : TBits_1); inline;
  15096. procedure setRXOVF19(thebits : TBits_1); inline;
  15097. procedure setRXOVF2(thebits : TBits_1); inline;
  15098. procedure setRXOVF20(thebits : TBits_1); inline;
  15099. procedure setRXOVF21(thebits : TBits_1); inline;
  15100. procedure setRXOVF22(thebits : TBits_1); inline;
  15101. procedure setRXOVF23(thebits : TBits_1); inline;
  15102. procedure setRXOVF24(thebits : TBits_1); inline;
  15103. procedure setRXOVF25(thebits : TBits_1); inline;
  15104. procedure setRXOVF26(thebits : TBits_1); inline;
  15105. procedure setRXOVF27(thebits : TBits_1); inline;
  15106. procedure setRXOVF28(thebits : TBits_1); inline;
  15107. procedure setRXOVF29(thebits : TBits_1); inline;
  15108. procedure setRXOVF3(thebits : TBits_1); inline;
  15109. procedure setRXOVF30(thebits : TBits_1); inline;
  15110. procedure setRXOVF31(thebits : TBits_1); inline;
  15111. procedure setRXOVF4(thebits : TBits_1); inline;
  15112. procedure setRXOVF5(thebits : TBits_1); inline;
  15113. procedure setRXOVF6(thebits : TBits_1); inline;
  15114. procedure setRXOVF7(thebits : TBits_1); inline;
  15115. procedure setRXOVF8(thebits : TBits_1); inline;
  15116. procedure setRXOVF9(thebits : TBits_1); inline;
  15117. procedure setw(thebits : TBits_32); inline;
  15118. public
  15119. procedure clearRXOVF0; inline;
  15120. procedure clearRXOVF10; inline;
  15121. procedure clearRXOVF11; inline;
  15122. procedure clearRXOVF12; inline;
  15123. procedure clearRXOVF13; inline;
  15124. procedure clearRXOVF14; inline;
  15125. procedure clearRXOVF15; inline;
  15126. procedure clearRXOVF16; inline;
  15127. procedure clearRXOVF17; inline;
  15128. procedure clearRXOVF18; inline;
  15129. procedure clearRXOVF19; inline;
  15130. procedure clearRXOVF1; inline;
  15131. procedure clearRXOVF20; inline;
  15132. procedure clearRXOVF21; inline;
  15133. procedure clearRXOVF22; inline;
  15134. procedure clearRXOVF23; inline;
  15135. procedure clearRXOVF24; inline;
  15136. procedure clearRXOVF25; inline;
  15137. procedure clearRXOVF26; inline;
  15138. procedure clearRXOVF27; inline;
  15139. procedure clearRXOVF28; inline;
  15140. procedure clearRXOVF29; inline;
  15141. procedure clearRXOVF2; inline;
  15142. procedure clearRXOVF30; inline;
  15143. procedure clearRXOVF31; inline;
  15144. procedure clearRXOVF3; inline;
  15145. procedure clearRXOVF4; inline;
  15146. procedure clearRXOVF5; inline;
  15147. procedure clearRXOVF6; inline;
  15148. procedure clearRXOVF7; inline;
  15149. procedure clearRXOVF8; inline;
  15150. procedure clearRXOVF9; inline;
  15151. procedure setRXOVF0; inline;
  15152. procedure setRXOVF10; inline;
  15153. procedure setRXOVF11; inline;
  15154. procedure setRXOVF12; inline;
  15155. procedure setRXOVF13; inline;
  15156. procedure setRXOVF14; inline;
  15157. procedure setRXOVF15; inline;
  15158. procedure setRXOVF16; inline;
  15159. procedure setRXOVF17; inline;
  15160. procedure setRXOVF18; inline;
  15161. procedure setRXOVF19; inline;
  15162. procedure setRXOVF1; inline;
  15163. procedure setRXOVF20; inline;
  15164. procedure setRXOVF21; inline;
  15165. procedure setRXOVF22; inline;
  15166. procedure setRXOVF23; inline;
  15167. procedure setRXOVF24; inline;
  15168. procedure setRXOVF25; inline;
  15169. procedure setRXOVF26; inline;
  15170. procedure setRXOVF27; inline;
  15171. procedure setRXOVF28; inline;
  15172. procedure setRXOVF29; inline;
  15173. procedure setRXOVF2; inline;
  15174. procedure setRXOVF30; inline;
  15175. procedure setRXOVF31; inline;
  15176. procedure setRXOVF3; inline;
  15177. procedure setRXOVF4; inline;
  15178. procedure setRXOVF5; inline;
  15179. procedure setRXOVF6; inline;
  15180. procedure setRXOVF7; inline;
  15181. procedure setRXOVF8; inline;
  15182. procedure setRXOVF9; inline;
  15183. property RXOVF : TBits_32 read getRXOVF write setRXOVF;
  15184. property RXOVF0 : TBits_1 read getRXOVF0 write setRXOVF0;
  15185. property RXOVF1 : TBits_1 read getRXOVF1 write setRXOVF1;
  15186. property RXOVF10 : TBits_1 read getRXOVF10 write setRXOVF10;
  15187. property RXOVF11 : TBits_1 read getRXOVF11 write setRXOVF11;
  15188. property RXOVF12 : TBits_1 read getRXOVF12 write setRXOVF12;
  15189. property RXOVF13 : TBits_1 read getRXOVF13 write setRXOVF13;
  15190. property RXOVF14 : TBits_1 read getRXOVF14 write setRXOVF14;
  15191. property RXOVF15 : TBits_1 read getRXOVF15 write setRXOVF15;
  15192. property RXOVF16 : TBits_1 read getRXOVF16 write setRXOVF16;
  15193. property RXOVF17 : TBits_1 read getRXOVF17 write setRXOVF17;
  15194. property RXOVF18 : TBits_1 read getRXOVF18 write setRXOVF18;
  15195. property RXOVF19 : TBits_1 read getRXOVF19 write setRXOVF19;
  15196. property RXOVF2 : TBits_1 read getRXOVF2 write setRXOVF2;
  15197. property RXOVF20 : TBits_1 read getRXOVF20 write setRXOVF20;
  15198. property RXOVF21 : TBits_1 read getRXOVF21 write setRXOVF21;
  15199. property RXOVF22 : TBits_1 read getRXOVF22 write setRXOVF22;
  15200. property RXOVF23 : TBits_1 read getRXOVF23 write setRXOVF23;
  15201. property RXOVF24 : TBits_1 read getRXOVF24 write setRXOVF24;
  15202. property RXOVF25 : TBits_1 read getRXOVF25 write setRXOVF25;
  15203. property RXOVF26 : TBits_1 read getRXOVF26 write setRXOVF26;
  15204. property RXOVF27 : TBits_1 read getRXOVF27 write setRXOVF27;
  15205. property RXOVF28 : TBits_1 read getRXOVF28 write setRXOVF28;
  15206. property RXOVF29 : TBits_1 read getRXOVF29 write setRXOVF29;
  15207. property RXOVF3 : TBits_1 read getRXOVF3 write setRXOVF3;
  15208. property RXOVF30 : TBits_1 read getRXOVF30 write setRXOVF30;
  15209. property RXOVF31 : TBits_1 read getRXOVF31 write setRXOVF31;
  15210. property RXOVF4 : TBits_1 read getRXOVF4 write setRXOVF4;
  15211. property RXOVF5 : TBits_1 read getRXOVF5 write setRXOVF5;
  15212. property RXOVF6 : TBits_1 read getRXOVF6 write setRXOVF6;
  15213. property RXOVF7 : TBits_1 read getRXOVF7 write setRXOVF7;
  15214. property RXOVF8 : TBits_1 read getRXOVF8 write setRXOVF8;
  15215. property RXOVF9 : TBits_1 read getRXOVF9 write setRXOVF9;
  15216. property w : TBits_32 read getw write setw;
  15217. end;
  15218. TCAN1_C1TMR = record
  15219. private
  15220. function getCANTS : TBits_16; inline;
  15221. function getCANTSPRE : TBits_16; inline;
  15222. function getw : TBits_32; inline;
  15223. procedure setCANTS(thebits : TBits_16); inline;
  15224. procedure setCANTSPRE(thebits : TBits_16); inline;
  15225. procedure setw(thebits : TBits_32); inline;
  15226. public
  15227. property CANTS : TBits_16 read getCANTS write setCANTS;
  15228. property CANTSPRE : TBits_16 read getCANTSPRE write setCANTSPRE;
  15229. property w : TBits_32 read getw write setw;
  15230. end;
  15231. TCAN1_C1RXM0 = record
  15232. private
  15233. function getEID : TBits_18; inline;
  15234. function getMIDE : TBits_1; inline;
  15235. function getSID : TBits_11; inline;
  15236. function getw : TBits_32; inline;
  15237. procedure setEID(thebits : TBits_18); inline;
  15238. procedure setMIDE(thebits : TBits_1); inline;
  15239. procedure setSID(thebits : TBits_11); inline;
  15240. procedure setw(thebits : TBits_32); inline;
  15241. public
  15242. procedure clearMIDE; inline;
  15243. procedure setMIDE; inline;
  15244. property EID : TBits_18 read getEID write setEID;
  15245. property MIDE : TBits_1 read getMIDE write setMIDE;
  15246. property SID : TBits_11 read getSID write setSID;
  15247. property w : TBits_32 read getw write setw;
  15248. end;
  15249. TCAN1_C1RXM1 = record
  15250. private
  15251. function getEID : TBits_18; inline;
  15252. function getMIDE : TBits_1; inline;
  15253. function getSID : TBits_11; inline;
  15254. function getw : TBits_32; inline;
  15255. procedure setEID(thebits : TBits_18); inline;
  15256. procedure setMIDE(thebits : TBits_1); inline;
  15257. procedure setSID(thebits : TBits_11); inline;
  15258. procedure setw(thebits : TBits_32); inline;
  15259. public
  15260. procedure clearMIDE; inline;
  15261. procedure setMIDE; inline;
  15262. property EID : TBits_18 read getEID write setEID;
  15263. property MIDE : TBits_1 read getMIDE write setMIDE;
  15264. property SID : TBits_11 read getSID write setSID;
  15265. property w : TBits_32 read getw write setw;
  15266. end;
  15267. TCAN1_C1RXM2 = record
  15268. private
  15269. function getEID : TBits_18; inline;
  15270. function getMIDE : TBits_1; inline;
  15271. function getSID : TBits_11; inline;
  15272. function getw : TBits_32; inline;
  15273. procedure setEID(thebits : TBits_18); inline;
  15274. procedure setMIDE(thebits : TBits_1); inline;
  15275. procedure setSID(thebits : TBits_11); inline;
  15276. procedure setw(thebits : TBits_32); inline;
  15277. public
  15278. procedure clearMIDE; inline;
  15279. procedure setMIDE; inline;
  15280. property EID : TBits_18 read getEID write setEID;
  15281. property MIDE : TBits_1 read getMIDE write setMIDE;
  15282. property SID : TBits_11 read getSID write setSID;
  15283. property w : TBits_32 read getw write setw;
  15284. end;
  15285. TCAN1_C1RXM3 = record
  15286. private
  15287. function getEID : TBits_18; inline;
  15288. function getMIDE : TBits_1; inline;
  15289. function getSID : TBits_11; inline;
  15290. function getw : TBits_32; inline;
  15291. procedure setEID(thebits : TBits_18); inline;
  15292. procedure setMIDE(thebits : TBits_1); inline;
  15293. procedure setSID(thebits : TBits_11); inline;
  15294. procedure setw(thebits : TBits_32); inline;
  15295. public
  15296. procedure clearMIDE; inline;
  15297. procedure setMIDE; inline;
  15298. property EID : TBits_18 read getEID write setEID;
  15299. property MIDE : TBits_1 read getMIDE write setMIDE;
  15300. property SID : TBits_11 read getSID write setSID;
  15301. property w : TBits_32 read getw write setw;
  15302. end;
  15303. TCAN1_C1FLTCON0 = record
  15304. private
  15305. function getFLTEN0 : TBits_1; inline;
  15306. function getFLTEN1 : TBits_1; inline;
  15307. function getFLTEN2 : TBits_1; inline;
  15308. function getFLTEN3 : TBits_1; inline;
  15309. function getFSEL0 : TBits_5; inline;
  15310. function getFSEL1 : TBits_5; inline;
  15311. function getFSEL2 : TBits_5; inline;
  15312. function getFSEL3 : TBits_5; inline;
  15313. function getMSEL0 : TBits_2; inline;
  15314. function getMSEL1 : TBits_2; inline;
  15315. function getMSEL2 : TBits_2; inline;
  15316. function getMSEL3 : TBits_2; inline;
  15317. function getw : TBits_32; inline;
  15318. procedure setFLTEN0(thebits : TBits_1); inline;
  15319. procedure setFLTEN1(thebits : TBits_1); inline;
  15320. procedure setFLTEN2(thebits : TBits_1); inline;
  15321. procedure setFLTEN3(thebits : TBits_1); inline;
  15322. procedure setFSEL0(thebits : TBits_5); inline;
  15323. procedure setFSEL1(thebits : TBits_5); inline;
  15324. procedure setFSEL2(thebits : TBits_5); inline;
  15325. procedure setFSEL3(thebits : TBits_5); inline;
  15326. procedure setMSEL0(thebits : TBits_2); inline;
  15327. procedure setMSEL1(thebits : TBits_2); inline;
  15328. procedure setMSEL2(thebits : TBits_2); inline;
  15329. procedure setMSEL3(thebits : TBits_2); inline;
  15330. procedure setw(thebits : TBits_32); inline;
  15331. public
  15332. procedure clearFLTEN0; inline;
  15333. procedure clearFLTEN1; inline;
  15334. procedure clearFLTEN2; inline;
  15335. procedure clearFLTEN3; inline;
  15336. procedure setFLTEN0; inline;
  15337. procedure setFLTEN1; inline;
  15338. procedure setFLTEN2; inline;
  15339. procedure setFLTEN3; inline;
  15340. property FLTEN0 : TBits_1 read getFLTEN0 write setFLTEN0;
  15341. property FLTEN1 : TBits_1 read getFLTEN1 write setFLTEN1;
  15342. property FLTEN2 : TBits_1 read getFLTEN2 write setFLTEN2;
  15343. property FLTEN3 : TBits_1 read getFLTEN3 write setFLTEN3;
  15344. property FSEL0 : TBits_5 read getFSEL0 write setFSEL0;
  15345. property FSEL1 : TBits_5 read getFSEL1 write setFSEL1;
  15346. property FSEL2 : TBits_5 read getFSEL2 write setFSEL2;
  15347. property FSEL3 : TBits_5 read getFSEL3 write setFSEL3;
  15348. property MSEL0 : TBits_2 read getMSEL0 write setMSEL0;
  15349. property MSEL1 : TBits_2 read getMSEL1 write setMSEL1;
  15350. property MSEL2 : TBits_2 read getMSEL2 write setMSEL2;
  15351. property MSEL3 : TBits_2 read getMSEL3 write setMSEL3;
  15352. property w : TBits_32 read getw write setw;
  15353. end;
  15354. TCAN1_C1FLTCON1 = record
  15355. private
  15356. function getFLTEN4 : TBits_1; inline;
  15357. function getFLTEN5 : TBits_1; inline;
  15358. function getFLTEN6 : TBits_1; inline;
  15359. function getFLTEN7 : TBits_1; inline;
  15360. function getFSEL4 : TBits_5; inline;
  15361. function getFSEL5 : TBits_5; inline;
  15362. function getFSEL6 : TBits_5; inline;
  15363. function getFSEL7 : TBits_5; inline;
  15364. function getMSEL4 : TBits_2; inline;
  15365. function getMSEL5 : TBits_2; inline;
  15366. function getMSEL6 : TBits_2; inline;
  15367. function getMSEL7 : TBits_2; inline;
  15368. function getw : TBits_32; inline;
  15369. procedure setFLTEN4(thebits : TBits_1); inline;
  15370. procedure setFLTEN5(thebits : TBits_1); inline;
  15371. procedure setFLTEN6(thebits : TBits_1); inline;
  15372. procedure setFLTEN7(thebits : TBits_1); inline;
  15373. procedure setFSEL4(thebits : TBits_5); inline;
  15374. procedure setFSEL5(thebits : TBits_5); inline;
  15375. procedure setFSEL6(thebits : TBits_5); inline;
  15376. procedure setFSEL7(thebits : TBits_5); inline;
  15377. procedure setMSEL4(thebits : TBits_2); inline;
  15378. procedure setMSEL5(thebits : TBits_2); inline;
  15379. procedure setMSEL6(thebits : TBits_2); inline;
  15380. procedure setMSEL7(thebits : TBits_2); inline;
  15381. procedure setw(thebits : TBits_32); inline;
  15382. public
  15383. procedure clearFLTEN4; inline;
  15384. procedure clearFLTEN5; inline;
  15385. procedure clearFLTEN6; inline;
  15386. procedure clearFLTEN7; inline;
  15387. procedure setFLTEN4; inline;
  15388. procedure setFLTEN5; inline;
  15389. procedure setFLTEN6; inline;
  15390. procedure setFLTEN7; inline;
  15391. property FLTEN4 : TBits_1 read getFLTEN4 write setFLTEN4;
  15392. property FLTEN5 : TBits_1 read getFLTEN5 write setFLTEN5;
  15393. property FLTEN6 : TBits_1 read getFLTEN6 write setFLTEN6;
  15394. property FLTEN7 : TBits_1 read getFLTEN7 write setFLTEN7;
  15395. property FSEL4 : TBits_5 read getFSEL4 write setFSEL4;
  15396. property FSEL5 : TBits_5 read getFSEL5 write setFSEL5;
  15397. property FSEL6 : TBits_5 read getFSEL6 write setFSEL6;
  15398. property FSEL7 : TBits_5 read getFSEL7 write setFSEL7;
  15399. property MSEL4 : TBits_2 read getMSEL4 write setMSEL4;
  15400. property MSEL5 : TBits_2 read getMSEL5 write setMSEL5;
  15401. property MSEL6 : TBits_2 read getMSEL6 write setMSEL6;
  15402. property MSEL7 : TBits_2 read getMSEL7 write setMSEL7;
  15403. property w : TBits_32 read getw write setw;
  15404. end;
  15405. TCAN1_C1FLTCON2 = record
  15406. private
  15407. function getFLTEN10 : TBits_1; inline;
  15408. function getFLTEN11 : TBits_1; inline;
  15409. function getFLTEN8 : TBits_1; inline;
  15410. function getFLTEN9 : TBits_1; inline;
  15411. function getFSEL10 : TBits_5; inline;
  15412. function getFSEL11 : TBits_5; inline;
  15413. function getFSEL8 : TBits_5; inline;
  15414. function getFSEL9 : TBits_5; inline;
  15415. function getMSEL10 : TBits_2; inline;
  15416. function getMSEL11 : TBits_2; inline;
  15417. function getMSEL8 : TBits_2; inline;
  15418. function getMSEL9 : TBits_2; inline;
  15419. function getw : TBits_32; inline;
  15420. procedure setFLTEN10(thebits : TBits_1); inline;
  15421. procedure setFLTEN11(thebits : TBits_1); inline;
  15422. procedure setFLTEN8(thebits : TBits_1); inline;
  15423. procedure setFLTEN9(thebits : TBits_1); inline;
  15424. procedure setFSEL10(thebits : TBits_5); inline;
  15425. procedure setFSEL11(thebits : TBits_5); inline;
  15426. procedure setFSEL8(thebits : TBits_5); inline;
  15427. procedure setFSEL9(thebits : TBits_5); inline;
  15428. procedure setMSEL10(thebits : TBits_2); inline;
  15429. procedure setMSEL11(thebits : TBits_2); inline;
  15430. procedure setMSEL8(thebits : TBits_2); inline;
  15431. procedure setMSEL9(thebits : TBits_2); inline;
  15432. procedure setw(thebits : TBits_32); inline;
  15433. public
  15434. procedure clearFLTEN10; inline;
  15435. procedure clearFLTEN11; inline;
  15436. procedure clearFLTEN8; inline;
  15437. procedure clearFLTEN9; inline;
  15438. procedure setFLTEN10; inline;
  15439. procedure setFLTEN11; inline;
  15440. procedure setFLTEN8; inline;
  15441. procedure setFLTEN9; inline;
  15442. property FLTEN10 : TBits_1 read getFLTEN10 write setFLTEN10;
  15443. property FLTEN11 : TBits_1 read getFLTEN11 write setFLTEN11;
  15444. property FLTEN8 : TBits_1 read getFLTEN8 write setFLTEN8;
  15445. property FLTEN9 : TBits_1 read getFLTEN9 write setFLTEN9;
  15446. property FSEL10 : TBits_5 read getFSEL10 write setFSEL10;
  15447. property FSEL11 : TBits_5 read getFSEL11 write setFSEL11;
  15448. property FSEL8 : TBits_5 read getFSEL8 write setFSEL8;
  15449. property FSEL9 : TBits_5 read getFSEL9 write setFSEL9;
  15450. property MSEL10 : TBits_2 read getMSEL10 write setMSEL10;
  15451. property MSEL11 : TBits_2 read getMSEL11 write setMSEL11;
  15452. property MSEL8 : TBits_2 read getMSEL8 write setMSEL8;
  15453. property MSEL9 : TBits_2 read getMSEL9 write setMSEL9;
  15454. property w : TBits_32 read getw write setw;
  15455. end;
  15456. TCAN1_C1FLTCON3 = record
  15457. private
  15458. function getFLTEN12 : TBits_1; inline;
  15459. function getFLTEN13 : TBits_1; inline;
  15460. function getFLTEN14 : TBits_1; inline;
  15461. function getFLTEN15 : TBits_1; inline;
  15462. function getFSEL12 : TBits_5; inline;
  15463. function getFSEL13 : TBits_5; inline;
  15464. function getFSEL14 : TBits_5; inline;
  15465. function getFSEL15 : TBits_5; inline;
  15466. function getMSEL12 : TBits_2; inline;
  15467. function getMSEL13 : TBits_2; inline;
  15468. function getMSEL14 : TBits_2; inline;
  15469. function getMSEL15 : TBits_2; inline;
  15470. function getw : TBits_32; inline;
  15471. procedure setFLTEN12(thebits : TBits_1); inline;
  15472. procedure setFLTEN13(thebits : TBits_1); inline;
  15473. procedure setFLTEN14(thebits : TBits_1); inline;
  15474. procedure setFLTEN15(thebits : TBits_1); inline;
  15475. procedure setFSEL12(thebits : TBits_5); inline;
  15476. procedure setFSEL13(thebits : TBits_5); inline;
  15477. procedure setFSEL14(thebits : TBits_5); inline;
  15478. procedure setFSEL15(thebits : TBits_5); inline;
  15479. procedure setMSEL12(thebits : TBits_2); inline;
  15480. procedure setMSEL13(thebits : TBits_2); inline;
  15481. procedure setMSEL14(thebits : TBits_2); inline;
  15482. procedure setMSEL15(thebits : TBits_2); inline;
  15483. procedure setw(thebits : TBits_32); inline;
  15484. public
  15485. procedure clearFLTEN12; inline;
  15486. procedure clearFLTEN13; inline;
  15487. procedure clearFLTEN14; inline;
  15488. procedure clearFLTEN15; inline;
  15489. procedure setFLTEN12; inline;
  15490. procedure setFLTEN13; inline;
  15491. procedure setFLTEN14; inline;
  15492. procedure setFLTEN15; inline;
  15493. property FLTEN12 : TBits_1 read getFLTEN12 write setFLTEN12;
  15494. property FLTEN13 : TBits_1 read getFLTEN13 write setFLTEN13;
  15495. property FLTEN14 : TBits_1 read getFLTEN14 write setFLTEN14;
  15496. property FLTEN15 : TBits_1 read getFLTEN15 write setFLTEN15;
  15497. property FSEL12 : TBits_5 read getFSEL12 write setFSEL12;
  15498. property FSEL13 : TBits_5 read getFSEL13 write setFSEL13;
  15499. property FSEL14 : TBits_5 read getFSEL14 write setFSEL14;
  15500. property FSEL15 : TBits_5 read getFSEL15 write setFSEL15;
  15501. property MSEL12 : TBits_2 read getMSEL12 write setMSEL12;
  15502. property MSEL13 : TBits_2 read getMSEL13 write setMSEL13;
  15503. property MSEL14 : TBits_2 read getMSEL14 write setMSEL14;
  15504. property MSEL15 : TBits_2 read getMSEL15 write setMSEL15;
  15505. property w : TBits_32 read getw write setw;
  15506. end;
  15507. TCAN1_C1FLTCON4 = record
  15508. private
  15509. function getFLTEN16 : TBits_1; inline;
  15510. function getFLTEN17 : TBits_1; inline;
  15511. function getFLTEN18 : TBits_1; inline;
  15512. function getFLTEN19 : TBits_1; inline;
  15513. function getFSEL16 : TBits_5; inline;
  15514. function getFSEL17 : TBits_5; inline;
  15515. function getFSEL18 : TBits_5; inline;
  15516. function getFSEL19 : TBits_5; inline;
  15517. function getMSEL16 : TBits_2; inline;
  15518. function getMSEL17 : TBits_2; inline;
  15519. function getMSEL18 : TBits_2; inline;
  15520. function getMSEL19 : TBits_2; inline;
  15521. function getw : TBits_32; inline;
  15522. procedure setFLTEN16(thebits : TBits_1); inline;
  15523. procedure setFLTEN17(thebits : TBits_1); inline;
  15524. procedure setFLTEN18(thebits : TBits_1); inline;
  15525. procedure setFLTEN19(thebits : TBits_1); inline;
  15526. procedure setFSEL16(thebits : TBits_5); inline;
  15527. procedure setFSEL17(thebits : TBits_5); inline;
  15528. procedure setFSEL18(thebits : TBits_5); inline;
  15529. procedure setFSEL19(thebits : TBits_5); inline;
  15530. procedure setMSEL16(thebits : TBits_2); inline;
  15531. procedure setMSEL17(thebits : TBits_2); inline;
  15532. procedure setMSEL18(thebits : TBits_2); inline;
  15533. procedure setMSEL19(thebits : TBits_2); inline;
  15534. procedure setw(thebits : TBits_32); inline;
  15535. public
  15536. procedure clearFLTEN16; inline;
  15537. procedure clearFLTEN17; inline;
  15538. procedure clearFLTEN18; inline;
  15539. procedure clearFLTEN19; inline;
  15540. procedure setFLTEN16; inline;
  15541. procedure setFLTEN17; inline;
  15542. procedure setFLTEN18; inline;
  15543. procedure setFLTEN19; inline;
  15544. property FLTEN16 : TBits_1 read getFLTEN16 write setFLTEN16;
  15545. property FLTEN17 : TBits_1 read getFLTEN17 write setFLTEN17;
  15546. property FLTEN18 : TBits_1 read getFLTEN18 write setFLTEN18;
  15547. property FLTEN19 : TBits_1 read getFLTEN19 write setFLTEN19;
  15548. property FSEL16 : TBits_5 read getFSEL16 write setFSEL16;
  15549. property FSEL17 : TBits_5 read getFSEL17 write setFSEL17;
  15550. property FSEL18 : TBits_5 read getFSEL18 write setFSEL18;
  15551. property FSEL19 : TBits_5 read getFSEL19 write setFSEL19;
  15552. property MSEL16 : TBits_2 read getMSEL16 write setMSEL16;
  15553. property MSEL17 : TBits_2 read getMSEL17 write setMSEL17;
  15554. property MSEL18 : TBits_2 read getMSEL18 write setMSEL18;
  15555. property MSEL19 : TBits_2 read getMSEL19 write setMSEL19;
  15556. property w : TBits_32 read getw write setw;
  15557. end;
  15558. TCAN1_C1FLTCON5 = record
  15559. private
  15560. function getFLTEN20 : TBits_1; inline;
  15561. function getFLTEN21 : TBits_1; inline;
  15562. function getFLTEN22 : TBits_1; inline;
  15563. function getFLTEN23 : TBits_1; inline;
  15564. function getFSEL20 : TBits_5; inline;
  15565. function getFSEL21 : TBits_5; inline;
  15566. function getFSEL22 : TBits_5; inline;
  15567. function getFSEL23 : TBits_5; inline;
  15568. function getMSEL20 : TBits_2; inline;
  15569. function getMSEL21 : TBits_2; inline;
  15570. function getMSEL22 : TBits_2; inline;
  15571. function getMSEL23 : TBits_2; inline;
  15572. function getw : TBits_32; inline;
  15573. procedure setFLTEN20(thebits : TBits_1); inline;
  15574. procedure setFLTEN21(thebits : TBits_1); inline;
  15575. procedure setFLTEN22(thebits : TBits_1); inline;
  15576. procedure setFLTEN23(thebits : TBits_1); inline;
  15577. procedure setFSEL20(thebits : TBits_5); inline;
  15578. procedure setFSEL21(thebits : TBits_5); inline;
  15579. procedure setFSEL22(thebits : TBits_5); inline;
  15580. procedure setFSEL23(thebits : TBits_5); inline;
  15581. procedure setMSEL20(thebits : TBits_2); inline;
  15582. procedure setMSEL21(thebits : TBits_2); inline;
  15583. procedure setMSEL22(thebits : TBits_2); inline;
  15584. procedure setMSEL23(thebits : TBits_2); inline;
  15585. procedure setw(thebits : TBits_32); inline;
  15586. public
  15587. procedure clearFLTEN20; inline;
  15588. procedure clearFLTEN21; inline;
  15589. procedure clearFLTEN22; inline;
  15590. procedure clearFLTEN23; inline;
  15591. procedure setFLTEN20; inline;
  15592. procedure setFLTEN21; inline;
  15593. procedure setFLTEN22; inline;
  15594. procedure setFLTEN23; inline;
  15595. property FLTEN20 : TBits_1 read getFLTEN20 write setFLTEN20;
  15596. property FLTEN21 : TBits_1 read getFLTEN21 write setFLTEN21;
  15597. property FLTEN22 : TBits_1 read getFLTEN22 write setFLTEN22;
  15598. property FLTEN23 : TBits_1 read getFLTEN23 write setFLTEN23;
  15599. property FSEL20 : TBits_5 read getFSEL20 write setFSEL20;
  15600. property FSEL21 : TBits_5 read getFSEL21 write setFSEL21;
  15601. property FSEL22 : TBits_5 read getFSEL22 write setFSEL22;
  15602. property FSEL23 : TBits_5 read getFSEL23 write setFSEL23;
  15603. property MSEL20 : TBits_2 read getMSEL20 write setMSEL20;
  15604. property MSEL21 : TBits_2 read getMSEL21 write setMSEL21;
  15605. property MSEL22 : TBits_2 read getMSEL22 write setMSEL22;
  15606. property MSEL23 : TBits_2 read getMSEL23 write setMSEL23;
  15607. property w : TBits_32 read getw write setw;
  15608. end;
  15609. TCAN1_C1FLTCON6 = record
  15610. private
  15611. function getFLTEN24 : TBits_1; inline;
  15612. function getFLTEN25 : TBits_1; inline;
  15613. function getFLTEN26 : TBits_1; inline;
  15614. function getFLTEN27 : TBits_1; inline;
  15615. function getFSEL24 : TBits_5; inline;
  15616. function getFSEL25 : TBits_5; inline;
  15617. function getFSEL26 : TBits_5; inline;
  15618. function getFSEL27 : TBits_5; inline;
  15619. function getMSEL24 : TBits_2; inline;
  15620. function getMSEL25 : TBits_2; inline;
  15621. function getMSEL26 : TBits_2; inline;
  15622. function getMSEL27 : TBits_2; inline;
  15623. function getw : TBits_32; inline;
  15624. procedure setFLTEN24(thebits : TBits_1); inline;
  15625. procedure setFLTEN25(thebits : TBits_1); inline;
  15626. procedure setFLTEN26(thebits : TBits_1); inline;
  15627. procedure setFLTEN27(thebits : TBits_1); inline;
  15628. procedure setFSEL24(thebits : TBits_5); inline;
  15629. procedure setFSEL25(thebits : TBits_5); inline;
  15630. procedure setFSEL26(thebits : TBits_5); inline;
  15631. procedure setFSEL27(thebits : TBits_5); inline;
  15632. procedure setMSEL24(thebits : TBits_2); inline;
  15633. procedure setMSEL25(thebits : TBits_2); inline;
  15634. procedure setMSEL26(thebits : TBits_2); inline;
  15635. procedure setMSEL27(thebits : TBits_2); inline;
  15636. procedure setw(thebits : TBits_32); inline;
  15637. public
  15638. procedure clearFLTEN24; inline;
  15639. procedure clearFLTEN25; inline;
  15640. procedure clearFLTEN26; inline;
  15641. procedure clearFLTEN27; inline;
  15642. procedure setFLTEN24; inline;
  15643. procedure setFLTEN25; inline;
  15644. procedure setFLTEN26; inline;
  15645. procedure setFLTEN27; inline;
  15646. property FLTEN24 : TBits_1 read getFLTEN24 write setFLTEN24;
  15647. property FLTEN25 : TBits_1 read getFLTEN25 write setFLTEN25;
  15648. property FLTEN26 : TBits_1 read getFLTEN26 write setFLTEN26;
  15649. property FLTEN27 : TBits_1 read getFLTEN27 write setFLTEN27;
  15650. property FSEL24 : TBits_5 read getFSEL24 write setFSEL24;
  15651. property FSEL25 : TBits_5 read getFSEL25 write setFSEL25;
  15652. property FSEL26 : TBits_5 read getFSEL26 write setFSEL26;
  15653. property FSEL27 : TBits_5 read getFSEL27 write setFSEL27;
  15654. property MSEL24 : TBits_2 read getMSEL24 write setMSEL24;
  15655. property MSEL25 : TBits_2 read getMSEL25 write setMSEL25;
  15656. property MSEL26 : TBits_2 read getMSEL26 write setMSEL26;
  15657. property MSEL27 : TBits_2 read getMSEL27 write setMSEL27;
  15658. property w : TBits_32 read getw write setw;
  15659. end;
  15660. TCAN1_C1FLTCON7 = record
  15661. private
  15662. function getFLTEN28 : TBits_1; inline;
  15663. function getFLTEN29 : TBits_1; inline;
  15664. function getFLTEN30 : TBits_1; inline;
  15665. function getFLTEN31 : TBits_1; inline;
  15666. function getFSEL28 : TBits_5; inline;
  15667. function getFSEL29 : TBits_5; inline;
  15668. function getFSEL30 : TBits_5; inline;
  15669. function getFSEL31 : TBits_5; inline;
  15670. function getMSEL28 : TBits_2; inline;
  15671. function getMSEL29 : TBits_2; inline;
  15672. function getMSEL30 : TBits_2; inline;
  15673. function getMSEL31 : TBits_2; inline;
  15674. function getw : TBits_32; inline;
  15675. procedure setFLTEN28(thebits : TBits_1); inline;
  15676. procedure setFLTEN29(thebits : TBits_1); inline;
  15677. procedure setFLTEN30(thebits : TBits_1); inline;
  15678. procedure setFLTEN31(thebits : TBits_1); inline;
  15679. procedure setFSEL28(thebits : TBits_5); inline;
  15680. procedure setFSEL29(thebits : TBits_5); inline;
  15681. procedure setFSEL30(thebits : TBits_5); inline;
  15682. procedure setFSEL31(thebits : TBits_5); inline;
  15683. procedure setMSEL28(thebits : TBits_2); inline;
  15684. procedure setMSEL29(thebits : TBits_2); inline;
  15685. procedure setMSEL30(thebits : TBits_2); inline;
  15686. procedure setMSEL31(thebits : TBits_2); inline;
  15687. procedure setw(thebits : TBits_32); inline;
  15688. public
  15689. procedure clearFLTEN28; inline;
  15690. procedure clearFLTEN29; inline;
  15691. procedure clearFLTEN30; inline;
  15692. procedure clearFLTEN31; inline;
  15693. procedure setFLTEN28; inline;
  15694. procedure setFLTEN29; inline;
  15695. procedure setFLTEN30; inline;
  15696. procedure setFLTEN31; inline;
  15697. property FLTEN28 : TBits_1 read getFLTEN28 write setFLTEN28;
  15698. property FLTEN29 : TBits_1 read getFLTEN29 write setFLTEN29;
  15699. property FLTEN30 : TBits_1 read getFLTEN30 write setFLTEN30;
  15700. property FLTEN31 : TBits_1 read getFLTEN31 write setFLTEN31;
  15701. property FSEL28 : TBits_5 read getFSEL28 write setFSEL28;
  15702. property FSEL29 : TBits_5 read getFSEL29 write setFSEL29;
  15703. property FSEL30 : TBits_5 read getFSEL30 write setFSEL30;
  15704. property FSEL31 : TBits_5 read getFSEL31 write setFSEL31;
  15705. property MSEL28 : TBits_2 read getMSEL28 write setMSEL28;
  15706. property MSEL29 : TBits_2 read getMSEL29 write setMSEL29;
  15707. property MSEL30 : TBits_2 read getMSEL30 write setMSEL30;
  15708. property MSEL31 : TBits_2 read getMSEL31 write setMSEL31;
  15709. property w : TBits_32 read getw write setw;
  15710. end;
  15711. TCAN1_C1RXF0 = record
  15712. private
  15713. function getEID : TBits_18; inline;
  15714. function getEXID : TBits_1; inline;
  15715. function getSID : TBits_11; inline;
  15716. function getw : TBits_32; inline;
  15717. procedure setEID(thebits : TBits_18); inline;
  15718. procedure setEXID(thebits : TBits_1); inline;
  15719. procedure setSID(thebits : TBits_11); inline;
  15720. procedure setw(thebits : TBits_32); inline;
  15721. public
  15722. procedure clearEXID; inline;
  15723. procedure setEXID; inline;
  15724. property EID : TBits_18 read getEID write setEID;
  15725. property EXID : TBits_1 read getEXID write setEXID;
  15726. property SID : TBits_11 read getSID write setSID;
  15727. property w : TBits_32 read getw write setw;
  15728. end;
  15729. TCAN1_C1RXF1 = record
  15730. private
  15731. function getEID : TBits_18; inline;
  15732. function getEXID : TBits_1; inline;
  15733. function getSID : TBits_11; inline;
  15734. function getw : TBits_32; inline;
  15735. procedure setEID(thebits : TBits_18); inline;
  15736. procedure setEXID(thebits : TBits_1); inline;
  15737. procedure setSID(thebits : TBits_11); inline;
  15738. procedure setw(thebits : TBits_32); inline;
  15739. public
  15740. procedure clearEXID; inline;
  15741. procedure setEXID; inline;
  15742. property EID : TBits_18 read getEID write setEID;
  15743. property EXID : TBits_1 read getEXID write setEXID;
  15744. property SID : TBits_11 read getSID write setSID;
  15745. property w : TBits_32 read getw write setw;
  15746. end;
  15747. TCAN1_C1RXF2 = record
  15748. private
  15749. function getEID : TBits_18; inline;
  15750. function getEXID : TBits_1; inline;
  15751. function getSID : TBits_11; inline;
  15752. function getw : TBits_32; inline;
  15753. procedure setEID(thebits : TBits_18); inline;
  15754. procedure setEXID(thebits : TBits_1); inline;
  15755. procedure setSID(thebits : TBits_11); inline;
  15756. procedure setw(thebits : TBits_32); inline;
  15757. public
  15758. procedure clearEXID; inline;
  15759. procedure setEXID; inline;
  15760. property EID : TBits_18 read getEID write setEID;
  15761. property EXID : TBits_1 read getEXID write setEXID;
  15762. property SID : TBits_11 read getSID write setSID;
  15763. property w : TBits_32 read getw write setw;
  15764. end;
  15765. TCAN1_C1RXF3 = record
  15766. private
  15767. function getEID : TBits_18; inline;
  15768. function getEXID : TBits_1; inline;
  15769. function getSID : TBits_11; inline;
  15770. function getw : TBits_32; inline;
  15771. procedure setEID(thebits : TBits_18); inline;
  15772. procedure setEXID(thebits : TBits_1); inline;
  15773. procedure setSID(thebits : TBits_11); inline;
  15774. procedure setw(thebits : TBits_32); inline;
  15775. public
  15776. procedure clearEXID; inline;
  15777. procedure setEXID; inline;
  15778. property EID : TBits_18 read getEID write setEID;
  15779. property EXID : TBits_1 read getEXID write setEXID;
  15780. property SID : TBits_11 read getSID write setSID;
  15781. property w : TBits_32 read getw write setw;
  15782. end;
  15783. TCAN1_C1RXF4 = record
  15784. private
  15785. function getEID : TBits_18; inline;
  15786. function getEXID : TBits_1; inline;
  15787. function getSID : TBits_11; inline;
  15788. function getw : TBits_32; inline;
  15789. procedure setEID(thebits : TBits_18); inline;
  15790. procedure setEXID(thebits : TBits_1); inline;
  15791. procedure setSID(thebits : TBits_11); inline;
  15792. procedure setw(thebits : TBits_32); inline;
  15793. public
  15794. procedure clearEXID; inline;
  15795. procedure setEXID; inline;
  15796. property EID : TBits_18 read getEID write setEID;
  15797. property EXID : TBits_1 read getEXID write setEXID;
  15798. property SID : TBits_11 read getSID write setSID;
  15799. property w : TBits_32 read getw write setw;
  15800. end;
  15801. TCAN1_C1RXF5 = record
  15802. private
  15803. function getEID : TBits_18; inline;
  15804. function getEXID : TBits_1; inline;
  15805. function getSID : TBits_11; inline;
  15806. function getw : TBits_32; inline;
  15807. procedure setEID(thebits : TBits_18); inline;
  15808. procedure setEXID(thebits : TBits_1); inline;
  15809. procedure setSID(thebits : TBits_11); inline;
  15810. procedure setw(thebits : TBits_32); inline;
  15811. public
  15812. procedure clearEXID; inline;
  15813. procedure setEXID; inline;
  15814. property EID : TBits_18 read getEID write setEID;
  15815. property EXID : TBits_1 read getEXID write setEXID;
  15816. property SID : TBits_11 read getSID write setSID;
  15817. property w : TBits_32 read getw write setw;
  15818. end;
  15819. TCAN1_C1RXF6 = record
  15820. private
  15821. function getEID : TBits_18; inline;
  15822. function getEXID : TBits_1; inline;
  15823. function getSID : TBits_11; inline;
  15824. function getw : TBits_32; inline;
  15825. procedure setEID(thebits : TBits_18); inline;
  15826. procedure setEXID(thebits : TBits_1); inline;
  15827. procedure setSID(thebits : TBits_11); inline;
  15828. procedure setw(thebits : TBits_32); inline;
  15829. public
  15830. procedure clearEXID; inline;
  15831. procedure setEXID; inline;
  15832. property EID : TBits_18 read getEID write setEID;
  15833. property EXID : TBits_1 read getEXID write setEXID;
  15834. property SID : TBits_11 read getSID write setSID;
  15835. property w : TBits_32 read getw write setw;
  15836. end;
  15837. TCAN1_C1RXF7 = record
  15838. private
  15839. function getEID : TBits_18; inline;
  15840. function getEXID : TBits_1; inline;
  15841. function getSID : TBits_11; inline;
  15842. function getw : TBits_32; inline;
  15843. procedure setEID(thebits : TBits_18); inline;
  15844. procedure setEXID(thebits : TBits_1); inline;
  15845. procedure setSID(thebits : TBits_11); inline;
  15846. procedure setw(thebits : TBits_32); inline;
  15847. public
  15848. procedure clearEXID; inline;
  15849. procedure setEXID; inline;
  15850. property EID : TBits_18 read getEID write setEID;
  15851. property EXID : TBits_1 read getEXID write setEXID;
  15852. property SID : TBits_11 read getSID write setSID;
  15853. property w : TBits_32 read getw write setw;
  15854. end;
  15855. TCAN1_C1RXF8 = record
  15856. private
  15857. function getEID : TBits_18; inline;
  15858. function getEXID : TBits_1; inline;
  15859. function getSID : TBits_11; inline;
  15860. function getw : TBits_32; inline;
  15861. procedure setEID(thebits : TBits_18); inline;
  15862. procedure setEXID(thebits : TBits_1); inline;
  15863. procedure setSID(thebits : TBits_11); inline;
  15864. procedure setw(thebits : TBits_32); inline;
  15865. public
  15866. procedure clearEXID; inline;
  15867. procedure setEXID; inline;
  15868. property EID : TBits_18 read getEID write setEID;
  15869. property EXID : TBits_1 read getEXID write setEXID;
  15870. property SID : TBits_11 read getSID write setSID;
  15871. property w : TBits_32 read getw write setw;
  15872. end;
  15873. TCAN1_C1RXF9 = record
  15874. private
  15875. function getEID : TBits_18; inline;
  15876. function getEXID : TBits_1; inline;
  15877. function getSID : TBits_11; inline;
  15878. function getw : TBits_32; inline;
  15879. procedure setEID(thebits : TBits_18); inline;
  15880. procedure setEXID(thebits : TBits_1); inline;
  15881. procedure setSID(thebits : TBits_11); inline;
  15882. procedure setw(thebits : TBits_32); inline;
  15883. public
  15884. procedure clearEXID; inline;
  15885. procedure setEXID; inline;
  15886. property EID : TBits_18 read getEID write setEID;
  15887. property EXID : TBits_1 read getEXID write setEXID;
  15888. property SID : TBits_11 read getSID write setSID;
  15889. property w : TBits_32 read getw write setw;
  15890. end;
  15891. TCAN1_C1RXF10 = record
  15892. private
  15893. function getEID : TBits_18; inline;
  15894. function getEXID : TBits_1; inline;
  15895. function getSID : TBits_11; inline;
  15896. function getw : TBits_32; inline;
  15897. procedure setEID(thebits : TBits_18); inline;
  15898. procedure setEXID(thebits : TBits_1); inline;
  15899. procedure setSID(thebits : TBits_11); inline;
  15900. procedure setw(thebits : TBits_32); inline;
  15901. public
  15902. procedure clearEXID; inline;
  15903. procedure setEXID; inline;
  15904. property EID : TBits_18 read getEID write setEID;
  15905. property EXID : TBits_1 read getEXID write setEXID;
  15906. property SID : TBits_11 read getSID write setSID;
  15907. property w : TBits_32 read getw write setw;
  15908. end;
  15909. TCAN1_C1RXF11 = record
  15910. private
  15911. function getEID : TBits_18; inline;
  15912. function getEXID : TBits_1; inline;
  15913. function getSID : TBits_11; inline;
  15914. function getw : TBits_32; inline;
  15915. procedure setEID(thebits : TBits_18); inline;
  15916. procedure setEXID(thebits : TBits_1); inline;
  15917. procedure setSID(thebits : TBits_11); inline;
  15918. procedure setw(thebits : TBits_32); inline;
  15919. public
  15920. procedure clearEXID; inline;
  15921. procedure setEXID; inline;
  15922. property EID : TBits_18 read getEID write setEID;
  15923. property EXID : TBits_1 read getEXID write setEXID;
  15924. property SID : TBits_11 read getSID write setSID;
  15925. property w : TBits_32 read getw write setw;
  15926. end;
  15927. TCAN1_C1RXF12 = record
  15928. private
  15929. function getEID : TBits_18; inline;
  15930. function getEXID : TBits_1; inline;
  15931. function getSID : TBits_11; inline;
  15932. function getw : TBits_32; inline;
  15933. procedure setEID(thebits : TBits_18); inline;
  15934. procedure setEXID(thebits : TBits_1); inline;
  15935. procedure setSID(thebits : TBits_11); inline;
  15936. procedure setw(thebits : TBits_32); inline;
  15937. public
  15938. procedure clearEXID; inline;
  15939. procedure setEXID; inline;
  15940. property EID : TBits_18 read getEID write setEID;
  15941. property EXID : TBits_1 read getEXID write setEXID;
  15942. property SID : TBits_11 read getSID write setSID;
  15943. property w : TBits_32 read getw write setw;
  15944. end;
  15945. TCAN1_C1RXF13 = record
  15946. private
  15947. function getEID : TBits_18; inline;
  15948. function getEXID : TBits_1; inline;
  15949. function getSID : TBits_11; inline;
  15950. function getw : TBits_32; inline;
  15951. procedure setEID(thebits : TBits_18); inline;
  15952. procedure setEXID(thebits : TBits_1); inline;
  15953. procedure setSID(thebits : TBits_11); inline;
  15954. procedure setw(thebits : TBits_32); inline;
  15955. public
  15956. procedure clearEXID; inline;
  15957. procedure setEXID; inline;
  15958. property EID : TBits_18 read getEID write setEID;
  15959. property EXID : TBits_1 read getEXID write setEXID;
  15960. property SID : TBits_11 read getSID write setSID;
  15961. property w : TBits_32 read getw write setw;
  15962. end;
  15963. TCAN1_C1RXF14 = record
  15964. private
  15965. function getEID : TBits_18; inline;
  15966. function getEXID : TBits_1; inline;
  15967. function getSID : TBits_11; inline;
  15968. function getw : TBits_32; inline;
  15969. procedure setEID(thebits : TBits_18); inline;
  15970. procedure setEXID(thebits : TBits_1); inline;
  15971. procedure setSID(thebits : TBits_11); inline;
  15972. procedure setw(thebits : TBits_32); inline;
  15973. public
  15974. procedure clearEXID; inline;
  15975. procedure setEXID; inline;
  15976. property EID : TBits_18 read getEID write setEID;
  15977. property EXID : TBits_1 read getEXID write setEXID;
  15978. property SID : TBits_11 read getSID write setSID;
  15979. property w : TBits_32 read getw write setw;
  15980. end;
  15981. TCAN1_C1RXF15 = record
  15982. private
  15983. function getEID : TBits_18; inline;
  15984. function getEXID : TBits_1; inline;
  15985. function getSID : TBits_11; inline;
  15986. function getw : TBits_32; inline;
  15987. procedure setEID(thebits : TBits_18); inline;
  15988. procedure setEXID(thebits : TBits_1); inline;
  15989. procedure setSID(thebits : TBits_11); inline;
  15990. procedure setw(thebits : TBits_32); inline;
  15991. public
  15992. procedure clearEXID; inline;
  15993. procedure setEXID; inline;
  15994. property EID : TBits_18 read getEID write setEID;
  15995. property EXID : TBits_1 read getEXID write setEXID;
  15996. property SID : TBits_11 read getSID write setSID;
  15997. property w : TBits_32 read getw write setw;
  15998. end;
  15999. TCAN1_C1RXF16 = record
  16000. private
  16001. function getEID : TBits_18; inline;
  16002. function getEXID : TBits_1; inline;
  16003. function getSID : TBits_11; inline;
  16004. function getw : TBits_32; inline;
  16005. procedure setEID(thebits : TBits_18); inline;
  16006. procedure setEXID(thebits : TBits_1); inline;
  16007. procedure setSID(thebits : TBits_11); inline;
  16008. procedure setw(thebits : TBits_32); inline;
  16009. public
  16010. procedure clearEXID; inline;
  16011. procedure setEXID; inline;
  16012. property EID : TBits_18 read getEID write setEID;
  16013. property EXID : TBits_1 read getEXID write setEXID;
  16014. property SID : TBits_11 read getSID write setSID;
  16015. property w : TBits_32 read getw write setw;
  16016. end;
  16017. TCAN1_C1RXF17 = record
  16018. private
  16019. function getEID : TBits_18; inline;
  16020. function getEXID : TBits_1; inline;
  16021. function getSID : TBits_11; inline;
  16022. function getw : TBits_32; inline;
  16023. procedure setEID(thebits : TBits_18); inline;
  16024. procedure setEXID(thebits : TBits_1); inline;
  16025. procedure setSID(thebits : TBits_11); inline;
  16026. procedure setw(thebits : TBits_32); inline;
  16027. public
  16028. procedure clearEXID; inline;
  16029. procedure setEXID; inline;
  16030. property EID : TBits_18 read getEID write setEID;
  16031. property EXID : TBits_1 read getEXID write setEXID;
  16032. property SID : TBits_11 read getSID write setSID;
  16033. property w : TBits_32 read getw write setw;
  16034. end;
  16035. TCAN1_C1RXF18 = record
  16036. private
  16037. function getEID : TBits_18; inline;
  16038. function getEXID : TBits_1; inline;
  16039. function getSID : TBits_11; inline;
  16040. function getw : TBits_32; inline;
  16041. procedure setEID(thebits : TBits_18); inline;
  16042. procedure setEXID(thebits : TBits_1); inline;
  16043. procedure setSID(thebits : TBits_11); inline;
  16044. procedure setw(thebits : TBits_32); inline;
  16045. public
  16046. procedure clearEXID; inline;
  16047. procedure setEXID; inline;
  16048. property EID : TBits_18 read getEID write setEID;
  16049. property EXID : TBits_1 read getEXID write setEXID;
  16050. property SID : TBits_11 read getSID write setSID;
  16051. property w : TBits_32 read getw write setw;
  16052. end;
  16053. TCAN1_C1RXF19 = record
  16054. private
  16055. function getEID : TBits_18; inline;
  16056. function getEXID : TBits_1; inline;
  16057. function getSID : TBits_11; inline;
  16058. function getw : TBits_32; inline;
  16059. procedure setEID(thebits : TBits_18); inline;
  16060. procedure setEXID(thebits : TBits_1); inline;
  16061. procedure setSID(thebits : TBits_11); inline;
  16062. procedure setw(thebits : TBits_32); inline;
  16063. public
  16064. procedure clearEXID; inline;
  16065. procedure setEXID; inline;
  16066. property EID : TBits_18 read getEID write setEID;
  16067. property EXID : TBits_1 read getEXID write setEXID;
  16068. property SID : TBits_11 read getSID write setSID;
  16069. property w : TBits_32 read getw write setw;
  16070. end;
  16071. TCAN1_C1RXF20 = record
  16072. private
  16073. function getEID : TBits_18; inline;
  16074. function getEXID : TBits_1; inline;
  16075. function getSID : TBits_11; inline;
  16076. function getw : TBits_32; inline;
  16077. procedure setEID(thebits : TBits_18); inline;
  16078. procedure setEXID(thebits : TBits_1); inline;
  16079. procedure setSID(thebits : TBits_11); inline;
  16080. procedure setw(thebits : TBits_32); inline;
  16081. public
  16082. procedure clearEXID; inline;
  16083. procedure setEXID; inline;
  16084. property EID : TBits_18 read getEID write setEID;
  16085. property EXID : TBits_1 read getEXID write setEXID;
  16086. property SID : TBits_11 read getSID write setSID;
  16087. property w : TBits_32 read getw write setw;
  16088. end;
  16089. TCAN1_C1RXF21 = record
  16090. private
  16091. function getEID : TBits_18; inline;
  16092. function getEXID : TBits_1; inline;
  16093. function getSID : TBits_11; inline;
  16094. function getw : TBits_32; inline;
  16095. procedure setEID(thebits : TBits_18); inline;
  16096. procedure setEXID(thebits : TBits_1); inline;
  16097. procedure setSID(thebits : TBits_11); inline;
  16098. procedure setw(thebits : TBits_32); inline;
  16099. public
  16100. procedure clearEXID; inline;
  16101. procedure setEXID; inline;
  16102. property EID : TBits_18 read getEID write setEID;
  16103. property EXID : TBits_1 read getEXID write setEXID;
  16104. property SID : TBits_11 read getSID write setSID;
  16105. property w : TBits_32 read getw write setw;
  16106. end;
  16107. TCAN1_C1RXF22 = record
  16108. private
  16109. function getEID : TBits_18; inline;
  16110. function getEXID : TBits_1; inline;
  16111. function getSID : TBits_11; inline;
  16112. function getw : TBits_32; inline;
  16113. procedure setEID(thebits : TBits_18); inline;
  16114. procedure setEXID(thebits : TBits_1); inline;
  16115. procedure setSID(thebits : TBits_11); inline;
  16116. procedure setw(thebits : TBits_32); inline;
  16117. public
  16118. procedure clearEXID; inline;
  16119. procedure setEXID; inline;
  16120. property EID : TBits_18 read getEID write setEID;
  16121. property EXID : TBits_1 read getEXID write setEXID;
  16122. property SID : TBits_11 read getSID write setSID;
  16123. property w : TBits_32 read getw write setw;
  16124. end;
  16125. TCAN1_C1RXF23 = record
  16126. private
  16127. function getEID : TBits_18; inline;
  16128. function getEXID : TBits_1; inline;
  16129. function getSID : TBits_11; inline;
  16130. function getw : TBits_32; inline;
  16131. procedure setEID(thebits : TBits_18); inline;
  16132. procedure setEXID(thebits : TBits_1); inline;
  16133. procedure setSID(thebits : TBits_11); inline;
  16134. procedure setw(thebits : TBits_32); inline;
  16135. public
  16136. procedure clearEXID; inline;
  16137. procedure setEXID; inline;
  16138. property EID : TBits_18 read getEID write setEID;
  16139. property EXID : TBits_1 read getEXID write setEXID;
  16140. property SID : TBits_11 read getSID write setSID;
  16141. property w : TBits_32 read getw write setw;
  16142. end;
  16143. TCAN1_C1RXF24 = record
  16144. private
  16145. function getEID : TBits_18; inline;
  16146. function getEXID : TBits_1; inline;
  16147. function getSID : TBits_11; inline;
  16148. function getw : TBits_32; inline;
  16149. procedure setEID(thebits : TBits_18); inline;
  16150. procedure setEXID(thebits : TBits_1); inline;
  16151. procedure setSID(thebits : TBits_11); inline;
  16152. procedure setw(thebits : TBits_32); inline;
  16153. public
  16154. procedure clearEXID; inline;
  16155. procedure setEXID; inline;
  16156. property EID : TBits_18 read getEID write setEID;
  16157. property EXID : TBits_1 read getEXID write setEXID;
  16158. property SID : TBits_11 read getSID write setSID;
  16159. property w : TBits_32 read getw write setw;
  16160. end;
  16161. TCAN1_C1RXF25 = record
  16162. private
  16163. function getEID : TBits_18; inline;
  16164. function getEXID : TBits_1; inline;
  16165. function getSID : TBits_11; inline;
  16166. function getw : TBits_32; inline;
  16167. procedure setEID(thebits : TBits_18); inline;
  16168. procedure setEXID(thebits : TBits_1); inline;
  16169. procedure setSID(thebits : TBits_11); inline;
  16170. procedure setw(thebits : TBits_32); inline;
  16171. public
  16172. procedure clearEXID; inline;
  16173. procedure setEXID; inline;
  16174. property EID : TBits_18 read getEID write setEID;
  16175. property EXID : TBits_1 read getEXID write setEXID;
  16176. property SID : TBits_11 read getSID write setSID;
  16177. property w : TBits_32 read getw write setw;
  16178. end;
  16179. TCAN1_C1RXF26 = record
  16180. private
  16181. function getEID : TBits_18; inline;
  16182. function getEXID : TBits_1; inline;
  16183. function getSID : TBits_11; inline;
  16184. function getw : TBits_32; inline;
  16185. procedure setEID(thebits : TBits_18); inline;
  16186. procedure setEXID(thebits : TBits_1); inline;
  16187. procedure setSID(thebits : TBits_11); inline;
  16188. procedure setw(thebits : TBits_32); inline;
  16189. public
  16190. procedure clearEXID; inline;
  16191. procedure setEXID; inline;
  16192. property EID : TBits_18 read getEID write setEID;
  16193. property EXID : TBits_1 read getEXID write setEXID;
  16194. property SID : TBits_11 read getSID write setSID;
  16195. property w : TBits_32 read getw write setw;
  16196. end;
  16197. TCAN1_C1RXF27 = record
  16198. private
  16199. function getEID : TBits_18; inline;
  16200. function getEXID : TBits_1; inline;
  16201. function getSID : TBits_11; inline;
  16202. function getw : TBits_32; inline;
  16203. procedure setEID(thebits : TBits_18); inline;
  16204. procedure setEXID(thebits : TBits_1); inline;
  16205. procedure setSID(thebits : TBits_11); inline;
  16206. procedure setw(thebits : TBits_32); inline;
  16207. public
  16208. procedure clearEXID; inline;
  16209. procedure setEXID; inline;
  16210. property EID : TBits_18 read getEID write setEID;
  16211. property EXID : TBits_1 read getEXID write setEXID;
  16212. property SID : TBits_11 read getSID write setSID;
  16213. property w : TBits_32 read getw write setw;
  16214. end;
  16215. TCAN1_C1RXF28 = record
  16216. private
  16217. function getEID : TBits_18; inline;
  16218. function getEXID : TBits_1; inline;
  16219. function getSID : TBits_11; inline;
  16220. function getw : TBits_32; inline;
  16221. procedure setEID(thebits : TBits_18); inline;
  16222. procedure setEXID(thebits : TBits_1); inline;
  16223. procedure setSID(thebits : TBits_11); inline;
  16224. procedure setw(thebits : TBits_32); inline;
  16225. public
  16226. procedure clearEXID; inline;
  16227. procedure setEXID; inline;
  16228. property EID : TBits_18 read getEID write setEID;
  16229. property EXID : TBits_1 read getEXID write setEXID;
  16230. property SID : TBits_11 read getSID write setSID;
  16231. property w : TBits_32 read getw write setw;
  16232. end;
  16233. TCAN1_C1RXF29 = record
  16234. private
  16235. function getEID : TBits_18; inline;
  16236. function getEXID : TBits_1; inline;
  16237. function getSID : TBits_11; inline;
  16238. function getw : TBits_32; inline;
  16239. procedure setEID(thebits : TBits_18); inline;
  16240. procedure setEXID(thebits : TBits_1); inline;
  16241. procedure setSID(thebits : TBits_11); inline;
  16242. procedure setw(thebits : TBits_32); inline;
  16243. public
  16244. procedure clearEXID; inline;
  16245. procedure setEXID; inline;
  16246. property EID : TBits_18 read getEID write setEID;
  16247. property EXID : TBits_1 read getEXID write setEXID;
  16248. property SID : TBits_11 read getSID write setSID;
  16249. property w : TBits_32 read getw write setw;
  16250. end;
  16251. TCAN1_C1RXF30 = record
  16252. private
  16253. function getEID : TBits_18; inline;
  16254. function getEXID : TBits_1; inline;
  16255. function getSID : TBits_11; inline;
  16256. function getw : TBits_32; inline;
  16257. procedure setEID(thebits : TBits_18); inline;
  16258. procedure setEXID(thebits : TBits_1); inline;
  16259. procedure setSID(thebits : TBits_11); inline;
  16260. procedure setw(thebits : TBits_32); inline;
  16261. public
  16262. procedure clearEXID; inline;
  16263. procedure setEXID; inline;
  16264. property EID : TBits_18 read getEID write setEID;
  16265. property EXID : TBits_1 read getEXID write setEXID;
  16266. property SID : TBits_11 read getSID write setSID;
  16267. property w : TBits_32 read getw write setw;
  16268. end;
  16269. TCAN1_C1RXF31 = record
  16270. private
  16271. function getEID : TBits_18; inline;
  16272. function getEXID : TBits_1; inline;
  16273. function getSID : TBits_11; inline;
  16274. function getw : TBits_32; inline;
  16275. procedure setEID(thebits : TBits_18); inline;
  16276. procedure setEXID(thebits : TBits_1); inline;
  16277. procedure setSID(thebits : TBits_11); inline;
  16278. procedure setw(thebits : TBits_32); inline;
  16279. public
  16280. procedure clearEXID; inline;
  16281. procedure setEXID; inline;
  16282. property EID : TBits_18 read getEID write setEID;
  16283. property EXID : TBits_1 read getEXID write setEXID;
  16284. property SID : TBits_11 read getSID write setSID;
  16285. property w : TBits_32 read getw write setw;
  16286. end;
  16287. TCAN1_C1FIFOCON0 = record
  16288. private
  16289. function getDONLY : TBits_1; inline;
  16290. function getFRESET : TBits_1; inline;
  16291. function getFSIZE : TBits_5; inline;
  16292. function getRTREN : TBits_1; inline;
  16293. function getTXABAT : TBits_1; inline;
  16294. function getTXEN : TBits_1; inline;
  16295. function getTXERR : TBits_1; inline;
  16296. function getTXLARB : TBits_1; inline;
  16297. function getTXPRI : TBits_2; inline;
  16298. function getTXREQ : TBits_1; inline;
  16299. function getUINC : TBits_1; inline;
  16300. function getw : TBits_32; inline;
  16301. procedure setDONLY(thebits : TBits_1); inline;
  16302. procedure setFRESET(thebits : TBits_1); inline;
  16303. procedure setFSIZE(thebits : TBits_5); inline;
  16304. procedure setRTREN(thebits : TBits_1); inline;
  16305. procedure setTXABAT(thebits : TBits_1); inline;
  16306. procedure setTXEN(thebits : TBits_1); inline;
  16307. procedure setTXERR(thebits : TBits_1); inline;
  16308. procedure setTXLARB(thebits : TBits_1); inline;
  16309. procedure setTXPRI(thebits : TBits_2); inline;
  16310. procedure setTXREQ(thebits : TBits_1); inline;
  16311. procedure setUINC(thebits : TBits_1); inline;
  16312. procedure setw(thebits : TBits_32); inline;
  16313. public
  16314. procedure clearDONLY; inline;
  16315. procedure clearFRESET; inline;
  16316. procedure clearRTREN; inline;
  16317. procedure clearTXABAT; inline;
  16318. procedure clearTXEN; inline;
  16319. procedure clearTXERR; inline;
  16320. procedure clearTXLARB; inline;
  16321. procedure clearTXREQ; inline;
  16322. procedure clearUINC; inline;
  16323. procedure setDONLY; inline;
  16324. procedure setFRESET; inline;
  16325. procedure setRTREN; inline;
  16326. procedure setTXABAT; inline;
  16327. procedure setTXEN; inline;
  16328. procedure setTXERR; inline;
  16329. procedure setTXLARB; inline;
  16330. procedure setTXREQ; inline;
  16331. procedure setUINC; inline;
  16332. property DONLY : TBits_1 read getDONLY write setDONLY;
  16333. property FRESET : TBits_1 read getFRESET write setFRESET;
  16334. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16335. property RTREN : TBits_1 read getRTREN write setRTREN;
  16336. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16337. property TXEN : TBits_1 read getTXEN write setTXEN;
  16338. property TXERR : TBits_1 read getTXERR write setTXERR;
  16339. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16340. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16341. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16342. property UINC : TBits_1 read getUINC write setUINC;
  16343. property w : TBits_32 read getw write setw;
  16344. end;
  16345. TCAN1_C1FIFOINT0 = record
  16346. private
  16347. function getRXFULLIE : TBits_1; inline;
  16348. function getRXFULLIF : TBits_1; inline;
  16349. function getRXHALFIE : TBits_1; inline;
  16350. function getRXHALFIF : TBits_1; inline;
  16351. function getRXNEMPTYIE : TBits_1; inline;
  16352. function getRXNEMPTYIF : TBits_1; inline;
  16353. function getRXOVFLIE : TBits_1; inline;
  16354. function getRXOVFLIF : TBits_1; inline;
  16355. function getTXEMPTYIE : TBits_1; inline;
  16356. function getTXEMPTYIF : TBits_1; inline;
  16357. function getTXHALFIE : TBits_1; inline;
  16358. function getTXHALFIF : TBits_1; inline;
  16359. function getTXNFULLIE : TBits_1; inline;
  16360. function getTXNFULLIF : TBits_1; inline;
  16361. function getw : TBits_32; inline;
  16362. procedure setRXFULLIE(thebits : TBits_1); inline;
  16363. procedure setRXFULLIF(thebits : TBits_1); inline;
  16364. procedure setRXHALFIE(thebits : TBits_1); inline;
  16365. procedure setRXHALFIF(thebits : TBits_1); inline;
  16366. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16367. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16368. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16369. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16370. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16371. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16372. procedure setTXHALFIE(thebits : TBits_1); inline;
  16373. procedure setTXHALFIF(thebits : TBits_1); inline;
  16374. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16375. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16376. procedure setw(thebits : TBits_32); inline;
  16377. public
  16378. procedure clearRXFULLIE; inline;
  16379. procedure clearRXFULLIF; inline;
  16380. procedure clearRXHALFIE; inline;
  16381. procedure clearRXHALFIF; inline;
  16382. procedure clearRXNEMPTYIE; inline;
  16383. procedure clearRXNEMPTYIF; inline;
  16384. procedure clearRXOVFLIE; inline;
  16385. procedure clearRXOVFLIF; inline;
  16386. procedure clearTXEMPTYIE; inline;
  16387. procedure clearTXEMPTYIF; inline;
  16388. procedure clearTXHALFIE; inline;
  16389. procedure clearTXHALFIF; inline;
  16390. procedure clearTXNFULLIE; inline;
  16391. procedure clearTXNFULLIF; inline;
  16392. procedure setRXFULLIE; inline;
  16393. procedure setRXFULLIF; inline;
  16394. procedure setRXHALFIE; inline;
  16395. procedure setRXHALFIF; inline;
  16396. procedure setRXNEMPTYIE; inline;
  16397. procedure setRXNEMPTYIF; inline;
  16398. procedure setRXOVFLIE; inline;
  16399. procedure setRXOVFLIF; inline;
  16400. procedure setTXEMPTYIE; inline;
  16401. procedure setTXEMPTYIF; inline;
  16402. procedure setTXHALFIE; inline;
  16403. procedure setTXHALFIF; inline;
  16404. procedure setTXNFULLIE; inline;
  16405. procedure setTXNFULLIF; inline;
  16406. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16407. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16408. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16409. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16410. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16411. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16412. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16413. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16414. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16415. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16416. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16417. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16418. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16419. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16420. property w : TBits_32 read getw write setw;
  16421. end;
  16422. TCAN1_C1FIFOCI0 = record
  16423. private
  16424. function getCFIFOCI : TBits_5; inline;
  16425. function getw : TBits_32; inline;
  16426. procedure setCFIFOCI(thebits : TBits_5); inline;
  16427. procedure setw(thebits : TBits_32); inline;
  16428. public
  16429. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16430. property w : TBits_32 read getw write setw;
  16431. end;
  16432. TCAN1_C1FIFOCON1 = record
  16433. private
  16434. function getDONLY : TBits_1; inline;
  16435. function getFRESET : TBits_1; inline;
  16436. function getFSIZE : TBits_5; inline;
  16437. function getRTREN : TBits_1; inline;
  16438. function getTXABAT : TBits_1; inline;
  16439. function getTXEN : TBits_1; inline;
  16440. function getTXERR : TBits_1; inline;
  16441. function getTXLARB : TBits_1; inline;
  16442. function getTXPRI : TBits_2; inline;
  16443. function getTXREQ : TBits_1; inline;
  16444. function getUINC : TBits_1; inline;
  16445. function getw : TBits_32; inline;
  16446. procedure setDONLY(thebits : TBits_1); inline;
  16447. procedure setFRESET(thebits : TBits_1); inline;
  16448. procedure setFSIZE(thebits : TBits_5); inline;
  16449. procedure setRTREN(thebits : TBits_1); inline;
  16450. procedure setTXABAT(thebits : TBits_1); inline;
  16451. procedure setTXEN(thebits : TBits_1); inline;
  16452. procedure setTXERR(thebits : TBits_1); inline;
  16453. procedure setTXLARB(thebits : TBits_1); inline;
  16454. procedure setTXPRI(thebits : TBits_2); inline;
  16455. procedure setTXREQ(thebits : TBits_1); inline;
  16456. procedure setUINC(thebits : TBits_1); inline;
  16457. procedure setw(thebits : TBits_32); inline;
  16458. public
  16459. procedure clearDONLY; inline;
  16460. procedure clearFRESET; inline;
  16461. procedure clearRTREN; inline;
  16462. procedure clearTXABAT; inline;
  16463. procedure clearTXEN; inline;
  16464. procedure clearTXERR; inline;
  16465. procedure clearTXLARB; inline;
  16466. procedure clearTXREQ; inline;
  16467. procedure clearUINC; inline;
  16468. procedure setDONLY; inline;
  16469. procedure setFRESET; inline;
  16470. procedure setRTREN; inline;
  16471. procedure setTXABAT; inline;
  16472. procedure setTXEN; inline;
  16473. procedure setTXERR; inline;
  16474. procedure setTXLARB; inline;
  16475. procedure setTXREQ; inline;
  16476. procedure setUINC; inline;
  16477. property DONLY : TBits_1 read getDONLY write setDONLY;
  16478. property FRESET : TBits_1 read getFRESET write setFRESET;
  16479. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16480. property RTREN : TBits_1 read getRTREN write setRTREN;
  16481. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16482. property TXEN : TBits_1 read getTXEN write setTXEN;
  16483. property TXERR : TBits_1 read getTXERR write setTXERR;
  16484. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16485. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16486. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16487. property UINC : TBits_1 read getUINC write setUINC;
  16488. property w : TBits_32 read getw write setw;
  16489. end;
  16490. TCAN1_C1FIFOINT1 = record
  16491. private
  16492. function getRXFULLIE : TBits_1; inline;
  16493. function getRXFULLIF : TBits_1; inline;
  16494. function getRXHALFIE : TBits_1; inline;
  16495. function getRXHALFIF : TBits_1; inline;
  16496. function getRXNEMPTYIE : TBits_1; inline;
  16497. function getRXNEMPTYIF : TBits_1; inline;
  16498. function getRXOVFLIE : TBits_1; inline;
  16499. function getRXOVFLIF : TBits_1; inline;
  16500. function getTXEMPTYIE : TBits_1; inline;
  16501. function getTXEMPTYIF : TBits_1; inline;
  16502. function getTXHALFIE : TBits_1; inline;
  16503. function getTXHALFIF : TBits_1; inline;
  16504. function getTXNFULLIE : TBits_1; inline;
  16505. function getTXNFULLIF : TBits_1; inline;
  16506. function getw : TBits_32; inline;
  16507. procedure setRXFULLIE(thebits : TBits_1); inline;
  16508. procedure setRXFULLIF(thebits : TBits_1); inline;
  16509. procedure setRXHALFIE(thebits : TBits_1); inline;
  16510. procedure setRXHALFIF(thebits : TBits_1); inline;
  16511. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16512. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16513. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16514. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16515. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16516. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16517. procedure setTXHALFIE(thebits : TBits_1); inline;
  16518. procedure setTXHALFIF(thebits : TBits_1); inline;
  16519. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16520. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16521. procedure setw(thebits : TBits_32); inline;
  16522. public
  16523. procedure clearRXFULLIE; inline;
  16524. procedure clearRXFULLIF; inline;
  16525. procedure clearRXHALFIE; inline;
  16526. procedure clearRXHALFIF; inline;
  16527. procedure clearRXNEMPTYIE; inline;
  16528. procedure clearRXNEMPTYIF; inline;
  16529. procedure clearRXOVFLIE; inline;
  16530. procedure clearRXOVFLIF; inline;
  16531. procedure clearTXEMPTYIE; inline;
  16532. procedure clearTXEMPTYIF; inline;
  16533. procedure clearTXHALFIE; inline;
  16534. procedure clearTXHALFIF; inline;
  16535. procedure clearTXNFULLIE; inline;
  16536. procedure clearTXNFULLIF; inline;
  16537. procedure setRXFULLIE; inline;
  16538. procedure setRXFULLIF; inline;
  16539. procedure setRXHALFIE; inline;
  16540. procedure setRXHALFIF; inline;
  16541. procedure setRXNEMPTYIE; inline;
  16542. procedure setRXNEMPTYIF; inline;
  16543. procedure setRXOVFLIE; inline;
  16544. procedure setRXOVFLIF; inline;
  16545. procedure setTXEMPTYIE; inline;
  16546. procedure setTXEMPTYIF; inline;
  16547. procedure setTXHALFIE; inline;
  16548. procedure setTXHALFIF; inline;
  16549. procedure setTXNFULLIE; inline;
  16550. procedure setTXNFULLIF; inline;
  16551. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16552. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16553. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16554. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16555. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16556. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16557. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16558. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16559. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16560. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16561. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16562. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16563. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16564. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16565. property w : TBits_32 read getw write setw;
  16566. end;
  16567. TCAN1_C1FIFOCI1 = record
  16568. private
  16569. function getCFIFOCI : TBits_5; inline;
  16570. function getw : TBits_32; inline;
  16571. procedure setCFIFOCI(thebits : TBits_5); inline;
  16572. procedure setw(thebits : TBits_32); inline;
  16573. public
  16574. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16575. property w : TBits_32 read getw write setw;
  16576. end;
  16577. TCAN1_C1FIFOCON2 = record
  16578. private
  16579. function getDONLY : TBits_1; inline;
  16580. function getFRESET : TBits_1; inline;
  16581. function getFSIZE : TBits_5; inline;
  16582. function getRTREN : TBits_1; inline;
  16583. function getTXABAT : TBits_1; inline;
  16584. function getTXEN : TBits_1; inline;
  16585. function getTXERR : TBits_1; inline;
  16586. function getTXLARB : TBits_1; inline;
  16587. function getTXPRI : TBits_2; inline;
  16588. function getTXREQ : TBits_1; inline;
  16589. function getUINC : TBits_1; inline;
  16590. function getw : TBits_32; inline;
  16591. procedure setDONLY(thebits : TBits_1); inline;
  16592. procedure setFRESET(thebits : TBits_1); inline;
  16593. procedure setFSIZE(thebits : TBits_5); inline;
  16594. procedure setRTREN(thebits : TBits_1); inline;
  16595. procedure setTXABAT(thebits : TBits_1); inline;
  16596. procedure setTXEN(thebits : TBits_1); inline;
  16597. procedure setTXERR(thebits : TBits_1); inline;
  16598. procedure setTXLARB(thebits : TBits_1); inline;
  16599. procedure setTXPRI(thebits : TBits_2); inline;
  16600. procedure setTXREQ(thebits : TBits_1); inline;
  16601. procedure setUINC(thebits : TBits_1); inline;
  16602. procedure setw(thebits : TBits_32); inline;
  16603. public
  16604. procedure clearDONLY; inline;
  16605. procedure clearFRESET; inline;
  16606. procedure clearRTREN; inline;
  16607. procedure clearTXABAT; inline;
  16608. procedure clearTXEN; inline;
  16609. procedure clearTXERR; inline;
  16610. procedure clearTXLARB; inline;
  16611. procedure clearTXREQ; inline;
  16612. procedure clearUINC; inline;
  16613. procedure setDONLY; inline;
  16614. procedure setFRESET; inline;
  16615. procedure setRTREN; inline;
  16616. procedure setTXABAT; inline;
  16617. procedure setTXEN; inline;
  16618. procedure setTXERR; inline;
  16619. procedure setTXLARB; inline;
  16620. procedure setTXREQ; inline;
  16621. procedure setUINC; inline;
  16622. property DONLY : TBits_1 read getDONLY write setDONLY;
  16623. property FRESET : TBits_1 read getFRESET write setFRESET;
  16624. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16625. property RTREN : TBits_1 read getRTREN write setRTREN;
  16626. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16627. property TXEN : TBits_1 read getTXEN write setTXEN;
  16628. property TXERR : TBits_1 read getTXERR write setTXERR;
  16629. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16630. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16631. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16632. property UINC : TBits_1 read getUINC write setUINC;
  16633. property w : TBits_32 read getw write setw;
  16634. end;
  16635. TCAN1_C1FIFOINT2 = record
  16636. private
  16637. function getRXFULLIE : TBits_1; inline;
  16638. function getRXFULLIF : TBits_1; inline;
  16639. function getRXHALFIE : TBits_1; inline;
  16640. function getRXHALFIF : TBits_1; inline;
  16641. function getRXNEMPTYIE : TBits_1; inline;
  16642. function getRXNEMPTYIF : TBits_1; inline;
  16643. function getRXOVFLIE : TBits_1; inline;
  16644. function getRXOVFLIF : TBits_1; inline;
  16645. function getTXEMPTYIE : TBits_1; inline;
  16646. function getTXEMPTYIF : TBits_1; inline;
  16647. function getTXHALFIE : TBits_1; inline;
  16648. function getTXHALFIF : TBits_1; inline;
  16649. function getTXNFULLIE : TBits_1; inline;
  16650. function getTXNFULLIF : TBits_1; inline;
  16651. function getw : TBits_32; inline;
  16652. procedure setRXFULLIE(thebits : TBits_1); inline;
  16653. procedure setRXFULLIF(thebits : TBits_1); inline;
  16654. procedure setRXHALFIE(thebits : TBits_1); inline;
  16655. procedure setRXHALFIF(thebits : TBits_1); inline;
  16656. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16657. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16658. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16659. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16660. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16661. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16662. procedure setTXHALFIE(thebits : TBits_1); inline;
  16663. procedure setTXHALFIF(thebits : TBits_1); inline;
  16664. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16665. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16666. procedure setw(thebits : TBits_32); inline;
  16667. public
  16668. procedure clearRXFULLIE; inline;
  16669. procedure clearRXFULLIF; inline;
  16670. procedure clearRXHALFIE; inline;
  16671. procedure clearRXHALFIF; inline;
  16672. procedure clearRXNEMPTYIE; inline;
  16673. procedure clearRXNEMPTYIF; inline;
  16674. procedure clearRXOVFLIE; inline;
  16675. procedure clearRXOVFLIF; inline;
  16676. procedure clearTXEMPTYIE; inline;
  16677. procedure clearTXEMPTYIF; inline;
  16678. procedure clearTXHALFIE; inline;
  16679. procedure clearTXHALFIF; inline;
  16680. procedure clearTXNFULLIE; inline;
  16681. procedure clearTXNFULLIF; inline;
  16682. procedure setRXFULLIE; inline;
  16683. procedure setRXFULLIF; inline;
  16684. procedure setRXHALFIE; inline;
  16685. procedure setRXHALFIF; inline;
  16686. procedure setRXNEMPTYIE; inline;
  16687. procedure setRXNEMPTYIF; inline;
  16688. procedure setRXOVFLIE; inline;
  16689. procedure setRXOVFLIF; inline;
  16690. procedure setTXEMPTYIE; inline;
  16691. procedure setTXEMPTYIF; inline;
  16692. procedure setTXHALFIE; inline;
  16693. procedure setTXHALFIF; inline;
  16694. procedure setTXNFULLIE; inline;
  16695. procedure setTXNFULLIF; inline;
  16696. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16697. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16698. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16699. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16700. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16701. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16702. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16703. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16704. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16705. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16706. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16707. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16708. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16709. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16710. property w : TBits_32 read getw write setw;
  16711. end;
  16712. TCAN1_C1FIFOCI2 = record
  16713. private
  16714. function getCFIFOCI : TBits_5; inline;
  16715. function getw : TBits_32; inline;
  16716. procedure setCFIFOCI(thebits : TBits_5); inline;
  16717. procedure setw(thebits : TBits_32); inline;
  16718. public
  16719. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16720. property w : TBits_32 read getw write setw;
  16721. end;
  16722. TCAN1_C1FIFOCON3 = record
  16723. private
  16724. function getDONLY : TBits_1; inline;
  16725. function getFRESET : TBits_1; inline;
  16726. function getFSIZE : TBits_5; inline;
  16727. function getRTREN : TBits_1; inline;
  16728. function getTXABAT : TBits_1; inline;
  16729. function getTXEN : TBits_1; inline;
  16730. function getTXERR : TBits_1; inline;
  16731. function getTXLARB : TBits_1; inline;
  16732. function getTXPRI : TBits_2; inline;
  16733. function getTXREQ : TBits_1; inline;
  16734. function getUINC : TBits_1; inline;
  16735. function getw : TBits_32; inline;
  16736. procedure setDONLY(thebits : TBits_1); inline;
  16737. procedure setFRESET(thebits : TBits_1); inline;
  16738. procedure setFSIZE(thebits : TBits_5); inline;
  16739. procedure setRTREN(thebits : TBits_1); inline;
  16740. procedure setTXABAT(thebits : TBits_1); inline;
  16741. procedure setTXEN(thebits : TBits_1); inline;
  16742. procedure setTXERR(thebits : TBits_1); inline;
  16743. procedure setTXLARB(thebits : TBits_1); inline;
  16744. procedure setTXPRI(thebits : TBits_2); inline;
  16745. procedure setTXREQ(thebits : TBits_1); inline;
  16746. procedure setUINC(thebits : TBits_1); inline;
  16747. procedure setw(thebits : TBits_32); inline;
  16748. public
  16749. procedure clearDONLY; inline;
  16750. procedure clearFRESET; inline;
  16751. procedure clearRTREN; inline;
  16752. procedure clearTXABAT; inline;
  16753. procedure clearTXEN; inline;
  16754. procedure clearTXERR; inline;
  16755. procedure clearTXLARB; inline;
  16756. procedure clearTXREQ; inline;
  16757. procedure clearUINC; inline;
  16758. procedure setDONLY; inline;
  16759. procedure setFRESET; inline;
  16760. procedure setRTREN; inline;
  16761. procedure setTXABAT; inline;
  16762. procedure setTXEN; inline;
  16763. procedure setTXERR; inline;
  16764. procedure setTXLARB; inline;
  16765. procedure setTXREQ; inline;
  16766. procedure setUINC; inline;
  16767. property DONLY : TBits_1 read getDONLY write setDONLY;
  16768. property FRESET : TBits_1 read getFRESET write setFRESET;
  16769. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16770. property RTREN : TBits_1 read getRTREN write setRTREN;
  16771. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16772. property TXEN : TBits_1 read getTXEN write setTXEN;
  16773. property TXERR : TBits_1 read getTXERR write setTXERR;
  16774. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16775. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16776. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16777. property UINC : TBits_1 read getUINC write setUINC;
  16778. property w : TBits_32 read getw write setw;
  16779. end;
  16780. TCAN1_C1FIFOINT3 = record
  16781. private
  16782. function getRXFULLIE : TBits_1; inline;
  16783. function getRXFULLIF : TBits_1; inline;
  16784. function getRXHALFIE : TBits_1; inline;
  16785. function getRXHALFIF : TBits_1; inline;
  16786. function getRXNEMPTYIE : TBits_1; inline;
  16787. function getRXNEMPTYIF : TBits_1; inline;
  16788. function getRXOVFLIE : TBits_1; inline;
  16789. function getRXOVFLIF : TBits_1; inline;
  16790. function getTXEMPTYIE : TBits_1; inline;
  16791. function getTXEMPTYIF : TBits_1; inline;
  16792. function getTXHALFIE : TBits_1; inline;
  16793. function getTXHALFIF : TBits_1; inline;
  16794. function getTXNFULLIE : TBits_1; inline;
  16795. function getTXNFULLIF : TBits_1; inline;
  16796. function getw : TBits_32; inline;
  16797. procedure setRXFULLIE(thebits : TBits_1); inline;
  16798. procedure setRXFULLIF(thebits : TBits_1); inline;
  16799. procedure setRXHALFIE(thebits : TBits_1); inline;
  16800. procedure setRXHALFIF(thebits : TBits_1); inline;
  16801. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16802. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16803. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16804. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16805. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16806. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16807. procedure setTXHALFIE(thebits : TBits_1); inline;
  16808. procedure setTXHALFIF(thebits : TBits_1); inline;
  16809. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16810. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16811. procedure setw(thebits : TBits_32); inline;
  16812. public
  16813. procedure clearRXFULLIE; inline;
  16814. procedure clearRXFULLIF; inline;
  16815. procedure clearRXHALFIE; inline;
  16816. procedure clearRXHALFIF; inline;
  16817. procedure clearRXNEMPTYIE; inline;
  16818. procedure clearRXNEMPTYIF; inline;
  16819. procedure clearRXOVFLIE; inline;
  16820. procedure clearRXOVFLIF; inline;
  16821. procedure clearTXEMPTYIE; inline;
  16822. procedure clearTXEMPTYIF; inline;
  16823. procedure clearTXHALFIE; inline;
  16824. procedure clearTXHALFIF; inline;
  16825. procedure clearTXNFULLIE; inline;
  16826. procedure clearTXNFULLIF; inline;
  16827. procedure setRXFULLIE; inline;
  16828. procedure setRXFULLIF; inline;
  16829. procedure setRXHALFIE; inline;
  16830. procedure setRXHALFIF; inline;
  16831. procedure setRXNEMPTYIE; inline;
  16832. procedure setRXNEMPTYIF; inline;
  16833. procedure setRXOVFLIE; inline;
  16834. procedure setRXOVFLIF; inline;
  16835. procedure setTXEMPTYIE; inline;
  16836. procedure setTXEMPTYIF; inline;
  16837. procedure setTXHALFIE; inline;
  16838. procedure setTXHALFIF; inline;
  16839. procedure setTXNFULLIE; inline;
  16840. procedure setTXNFULLIF; inline;
  16841. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16842. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16843. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16844. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16845. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16846. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16847. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16848. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16849. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16850. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16851. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16852. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16853. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16854. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16855. property w : TBits_32 read getw write setw;
  16856. end;
  16857. TCAN1_C1FIFOCI3 = record
  16858. private
  16859. function getCFIFOCI : TBits_5; inline;
  16860. function getw : TBits_32; inline;
  16861. procedure setCFIFOCI(thebits : TBits_5); inline;
  16862. procedure setw(thebits : TBits_32); inline;
  16863. public
  16864. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16865. property w : TBits_32 read getw write setw;
  16866. end;
  16867. TCAN1_C1FIFOCON4 = record
  16868. private
  16869. function getDONLY : TBits_1; inline;
  16870. function getFRESET : TBits_1; inline;
  16871. function getFSIZE : TBits_5; inline;
  16872. function getRTREN : TBits_1; inline;
  16873. function getTXABAT : TBits_1; inline;
  16874. function getTXEN : TBits_1; inline;
  16875. function getTXERR : TBits_1; inline;
  16876. function getTXLARB : TBits_1; inline;
  16877. function getTXPRI : TBits_2; inline;
  16878. function getTXREQ : TBits_1; inline;
  16879. function getUINC : TBits_1; inline;
  16880. function getw : TBits_32; inline;
  16881. procedure setDONLY(thebits : TBits_1); inline;
  16882. procedure setFRESET(thebits : TBits_1); inline;
  16883. procedure setFSIZE(thebits : TBits_5); inline;
  16884. procedure setRTREN(thebits : TBits_1); inline;
  16885. procedure setTXABAT(thebits : TBits_1); inline;
  16886. procedure setTXEN(thebits : TBits_1); inline;
  16887. procedure setTXERR(thebits : TBits_1); inline;
  16888. procedure setTXLARB(thebits : TBits_1); inline;
  16889. procedure setTXPRI(thebits : TBits_2); inline;
  16890. procedure setTXREQ(thebits : TBits_1); inline;
  16891. procedure setUINC(thebits : TBits_1); inline;
  16892. procedure setw(thebits : TBits_32); inline;
  16893. public
  16894. procedure clearDONLY; inline;
  16895. procedure clearFRESET; inline;
  16896. procedure clearRTREN; inline;
  16897. procedure clearTXABAT; inline;
  16898. procedure clearTXEN; inline;
  16899. procedure clearTXERR; inline;
  16900. procedure clearTXLARB; inline;
  16901. procedure clearTXREQ; inline;
  16902. procedure clearUINC; inline;
  16903. procedure setDONLY; inline;
  16904. procedure setFRESET; inline;
  16905. procedure setRTREN; inline;
  16906. procedure setTXABAT; inline;
  16907. procedure setTXEN; inline;
  16908. procedure setTXERR; inline;
  16909. procedure setTXLARB; inline;
  16910. procedure setTXREQ; inline;
  16911. procedure setUINC; inline;
  16912. property DONLY : TBits_1 read getDONLY write setDONLY;
  16913. property FRESET : TBits_1 read getFRESET write setFRESET;
  16914. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16915. property RTREN : TBits_1 read getRTREN write setRTREN;
  16916. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16917. property TXEN : TBits_1 read getTXEN write setTXEN;
  16918. property TXERR : TBits_1 read getTXERR write setTXERR;
  16919. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16920. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16921. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16922. property UINC : TBits_1 read getUINC write setUINC;
  16923. property w : TBits_32 read getw write setw;
  16924. end;
  16925. TCAN1_C1FIFOINT4 = record
  16926. private
  16927. function getRXFULLIE : TBits_1; inline;
  16928. function getRXFULLIF : TBits_1; inline;
  16929. function getRXHALFIE : TBits_1; inline;
  16930. function getRXHALFIF : TBits_1; inline;
  16931. function getRXNEMPTYIE : TBits_1; inline;
  16932. function getRXNEMPTYIF : TBits_1; inline;
  16933. function getRXOVFLIE : TBits_1; inline;
  16934. function getRXOVFLIF : TBits_1; inline;
  16935. function getTXEMPTYIE : TBits_1; inline;
  16936. function getTXEMPTYIF : TBits_1; inline;
  16937. function getTXHALFIE : TBits_1; inline;
  16938. function getTXHALFIF : TBits_1; inline;
  16939. function getTXNFULLIE : TBits_1; inline;
  16940. function getTXNFULLIF : TBits_1; inline;
  16941. function getw : TBits_32; inline;
  16942. procedure setRXFULLIE(thebits : TBits_1); inline;
  16943. procedure setRXFULLIF(thebits : TBits_1); inline;
  16944. procedure setRXHALFIE(thebits : TBits_1); inline;
  16945. procedure setRXHALFIF(thebits : TBits_1); inline;
  16946. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16947. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16948. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16949. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16950. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16951. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16952. procedure setTXHALFIE(thebits : TBits_1); inline;
  16953. procedure setTXHALFIF(thebits : TBits_1); inline;
  16954. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16955. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16956. procedure setw(thebits : TBits_32); inline;
  16957. public
  16958. procedure clearRXFULLIE; inline;
  16959. procedure clearRXFULLIF; inline;
  16960. procedure clearRXHALFIE; inline;
  16961. procedure clearRXHALFIF; inline;
  16962. procedure clearRXNEMPTYIE; inline;
  16963. procedure clearRXNEMPTYIF; inline;
  16964. procedure clearRXOVFLIE; inline;
  16965. procedure clearRXOVFLIF; inline;
  16966. procedure clearTXEMPTYIE; inline;
  16967. procedure clearTXEMPTYIF; inline;
  16968. procedure clearTXHALFIE; inline;
  16969. procedure clearTXHALFIF; inline;
  16970. procedure clearTXNFULLIE; inline;
  16971. procedure clearTXNFULLIF; inline;
  16972. procedure setRXFULLIE; inline;
  16973. procedure setRXFULLIF; inline;
  16974. procedure setRXHALFIE; inline;
  16975. procedure setRXHALFIF; inline;
  16976. procedure setRXNEMPTYIE; inline;
  16977. procedure setRXNEMPTYIF; inline;
  16978. procedure setRXOVFLIE; inline;
  16979. procedure setRXOVFLIF; inline;
  16980. procedure setTXEMPTYIE; inline;
  16981. procedure setTXEMPTYIF; inline;
  16982. procedure setTXHALFIE; inline;
  16983. procedure setTXHALFIF; inline;
  16984. procedure setTXNFULLIE; inline;
  16985. procedure setTXNFULLIF; inline;
  16986. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16987. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16988. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16989. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16990. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16991. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16992. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16993. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16994. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16995. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16996. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16997. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16998. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16999. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17000. property w : TBits_32 read getw write setw;
  17001. end;
  17002. TCAN1_C1FIFOCI4 = record
  17003. private
  17004. function getCFIFOCI : TBits_5; inline;
  17005. function getw : TBits_32; inline;
  17006. procedure setCFIFOCI(thebits : TBits_5); inline;
  17007. procedure setw(thebits : TBits_32); inline;
  17008. public
  17009. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17010. property w : TBits_32 read getw write setw;
  17011. end;
  17012. TCAN1_C1FIFOCON5 = record
  17013. private
  17014. function getDONLY : TBits_1; inline;
  17015. function getFRESET : TBits_1; inline;
  17016. function getFSIZE : TBits_5; inline;
  17017. function getRTREN : TBits_1; inline;
  17018. function getTXABAT : TBits_1; inline;
  17019. function getTXEN : TBits_1; inline;
  17020. function getTXERR : TBits_1; inline;
  17021. function getTXLARB : TBits_1; inline;
  17022. function getTXPRI : TBits_2; inline;
  17023. function getTXREQ : TBits_1; inline;
  17024. function getUINC : TBits_1; inline;
  17025. function getw : TBits_32; inline;
  17026. procedure setDONLY(thebits : TBits_1); inline;
  17027. procedure setFRESET(thebits : TBits_1); inline;
  17028. procedure setFSIZE(thebits : TBits_5); inline;
  17029. procedure setRTREN(thebits : TBits_1); inline;
  17030. procedure setTXABAT(thebits : TBits_1); inline;
  17031. procedure setTXEN(thebits : TBits_1); inline;
  17032. procedure setTXERR(thebits : TBits_1); inline;
  17033. procedure setTXLARB(thebits : TBits_1); inline;
  17034. procedure setTXPRI(thebits : TBits_2); inline;
  17035. procedure setTXREQ(thebits : TBits_1); inline;
  17036. procedure setUINC(thebits : TBits_1); inline;
  17037. procedure setw(thebits : TBits_32); inline;
  17038. public
  17039. procedure clearDONLY; inline;
  17040. procedure clearFRESET; inline;
  17041. procedure clearRTREN; inline;
  17042. procedure clearTXABAT; inline;
  17043. procedure clearTXEN; inline;
  17044. procedure clearTXERR; inline;
  17045. procedure clearTXLARB; inline;
  17046. procedure clearTXREQ; inline;
  17047. procedure clearUINC; inline;
  17048. procedure setDONLY; inline;
  17049. procedure setFRESET; inline;
  17050. procedure setRTREN; inline;
  17051. procedure setTXABAT; inline;
  17052. procedure setTXEN; inline;
  17053. procedure setTXERR; inline;
  17054. procedure setTXLARB; inline;
  17055. procedure setTXREQ; inline;
  17056. procedure setUINC; inline;
  17057. property DONLY : TBits_1 read getDONLY write setDONLY;
  17058. property FRESET : TBits_1 read getFRESET write setFRESET;
  17059. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17060. property RTREN : TBits_1 read getRTREN write setRTREN;
  17061. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17062. property TXEN : TBits_1 read getTXEN write setTXEN;
  17063. property TXERR : TBits_1 read getTXERR write setTXERR;
  17064. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17065. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17066. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17067. property UINC : TBits_1 read getUINC write setUINC;
  17068. property w : TBits_32 read getw write setw;
  17069. end;
  17070. TCAN1_C1FIFOINT5 = record
  17071. private
  17072. function getRXFULLIE : TBits_1; inline;
  17073. function getRXFULLIF : TBits_1; inline;
  17074. function getRXHALFIE : TBits_1; inline;
  17075. function getRXHALFIF : TBits_1; inline;
  17076. function getRXNEMPTYIE : TBits_1; inline;
  17077. function getRXNEMPTYIF : TBits_1; inline;
  17078. function getRXOVFLIE : TBits_1; inline;
  17079. function getRXOVFLIF : TBits_1; inline;
  17080. function getTXEMPTYIE : TBits_1; inline;
  17081. function getTXEMPTYIF : TBits_1; inline;
  17082. function getTXHALFIE : TBits_1; inline;
  17083. function getTXHALFIF : TBits_1; inline;
  17084. function getTXNFULLIE : TBits_1; inline;
  17085. function getTXNFULLIF : TBits_1; inline;
  17086. function getw : TBits_32; inline;
  17087. procedure setRXFULLIE(thebits : TBits_1); inline;
  17088. procedure setRXFULLIF(thebits : TBits_1); inline;
  17089. procedure setRXHALFIE(thebits : TBits_1); inline;
  17090. procedure setRXHALFIF(thebits : TBits_1); inline;
  17091. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17092. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17093. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17094. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17095. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17096. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17097. procedure setTXHALFIE(thebits : TBits_1); inline;
  17098. procedure setTXHALFIF(thebits : TBits_1); inline;
  17099. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17100. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17101. procedure setw(thebits : TBits_32); inline;
  17102. public
  17103. procedure clearRXFULLIE; inline;
  17104. procedure clearRXFULLIF; inline;
  17105. procedure clearRXHALFIE; inline;
  17106. procedure clearRXHALFIF; inline;
  17107. procedure clearRXNEMPTYIE; inline;
  17108. procedure clearRXNEMPTYIF; inline;
  17109. procedure clearRXOVFLIE; inline;
  17110. procedure clearRXOVFLIF; inline;
  17111. procedure clearTXEMPTYIE; inline;
  17112. procedure clearTXEMPTYIF; inline;
  17113. procedure clearTXHALFIE; inline;
  17114. procedure clearTXHALFIF; inline;
  17115. procedure clearTXNFULLIE; inline;
  17116. procedure clearTXNFULLIF; inline;
  17117. procedure setRXFULLIE; inline;
  17118. procedure setRXFULLIF; inline;
  17119. procedure setRXHALFIE; inline;
  17120. procedure setRXHALFIF; inline;
  17121. procedure setRXNEMPTYIE; inline;
  17122. procedure setRXNEMPTYIF; inline;
  17123. procedure setRXOVFLIE; inline;
  17124. procedure setRXOVFLIF; inline;
  17125. procedure setTXEMPTYIE; inline;
  17126. procedure setTXEMPTYIF; inline;
  17127. procedure setTXHALFIE; inline;
  17128. procedure setTXHALFIF; inline;
  17129. procedure setTXNFULLIE; inline;
  17130. procedure setTXNFULLIF; inline;
  17131. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17132. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17133. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17134. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17135. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17136. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17137. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17138. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17139. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17140. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17141. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17142. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17143. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17144. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17145. property w : TBits_32 read getw write setw;
  17146. end;
  17147. TCAN1_C1FIFOCI5 = record
  17148. private
  17149. function getCFIFOCI : TBits_5; inline;
  17150. function getw : TBits_32; inline;
  17151. procedure setCFIFOCI(thebits : TBits_5); inline;
  17152. procedure setw(thebits : TBits_32); inline;
  17153. public
  17154. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17155. property w : TBits_32 read getw write setw;
  17156. end;
  17157. TCAN1_C1FIFOCON6 = record
  17158. private
  17159. function getDONLY : TBits_1; inline;
  17160. function getFRESET : TBits_1; inline;
  17161. function getFSIZE : TBits_5; inline;
  17162. function getRTREN : TBits_1; inline;
  17163. function getTXABAT : TBits_1; inline;
  17164. function getTXEN : TBits_1; inline;
  17165. function getTXERR : TBits_1; inline;
  17166. function getTXLARB : TBits_1; inline;
  17167. function getTXPRI : TBits_2; inline;
  17168. function getTXREQ : TBits_1; inline;
  17169. function getUINC : TBits_1; inline;
  17170. function getw : TBits_32; inline;
  17171. procedure setDONLY(thebits : TBits_1); inline;
  17172. procedure setFRESET(thebits : TBits_1); inline;
  17173. procedure setFSIZE(thebits : TBits_5); inline;
  17174. procedure setRTREN(thebits : TBits_1); inline;
  17175. procedure setTXABAT(thebits : TBits_1); inline;
  17176. procedure setTXEN(thebits : TBits_1); inline;
  17177. procedure setTXERR(thebits : TBits_1); inline;
  17178. procedure setTXLARB(thebits : TBits_1); inline;
  17179. procedure setTXPRI(thebits : TBits_2); inline;
  17180. procedure setTXREQ(thebits : TBits_1); inline;
  17181. procedure setUINC(thebits : TBits_1); inline;
  17182. procedure setw(thebits : TBits_32); inline;
  17183. public
  17184. procedure clearDONLY; inline;
  17185. procedure clearFRESET; inline;
  17186. procedure clearRTREN; inline;
  17187. procedure clearTXABAT; inline;
  17188. procedure clearTXEN; inline;
  17189. procedure clearTXERR; inline;
  17190. procedure clearTXLARB; inline;
  17191. procedure clearTXREQ; inline;
  17192. procedure clearUINC; inline;
  17193. procedure setDONLY; inline;
  17194. procedure setFRESET; inline;
  17195. procedure setRTREN; inline;
  17196. procedure setTXABAT; inline;
  17197. procedure setTXEN; inline;
  17198. procedure setTXERR; inline;
  17199. procedure setTXLARB; inline;
  17200. procedure setTXREQ; inline;
  17201. procedure setUINC; inline;
  17202. property DONLY : TBits_1 read getDONLY write setDONLY;
  17203. property FRESET : TBits_1 read getFRESET write setFRESET;
  17204. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17205. property RTREN : TBits_1 read getRTREN write setRTREN;
  17206. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17207. property TXEN : TBits_1 read getTXEN write setTXEN;
  17208. property TXERR : TBits_1 read getTXERR write setTXERR;
  17209. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17210. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17211. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17212. property UINC : TBits_1 read getUINC write setUINC;
  17213. property w : TBits_32 read getw write setw;
  17214. end;
  17215. TCAN1_C1FIFOINT6 = record
  17216. private
  17217. function getRXFULLIE : TBits_1; inline;
  17218. function getRXFULLIF : TBits_1; inline;
  17219. function getRXHALFIE : TBits_1; inline;
  17220. function getRXHALFIF : TBits_1; inline;
  17221. function getRXNEMPTYIE : TBits_1; inline;
  17222. function getRXNEMPTYIF : TBits_1; inline;
  17223. function getRXOVFLIE : TBits_1; inline;
  17224. function getRXOVFLIF : TBits_1; inline;
  17225. function getTXEMPTYIE : TBits_1; inline;
  17226. function getTXEMPTYIF : TBits_1; inline;
  17227. function getTXHALFIE : TBits_1; inline;
  17228. function getTXHALFIF : TBits_1; inline;
  17229. function getTXNFULLIE : TBits_1; inline;
  17230. function getTXNFULLIF : TBits_1; inline;
  17231. function getw : TBits_32; inline;
  17232. procedure setRXFULLIE(thebits : TBits_1); inline;
  17233. procedure setRXFULLIF(thebits : TBits_1); inline;
  17234. procedure setRXHALFIE(thebits : TBits_1); inline;
  17235. procedure setRXHALFIF(thebits : TBits_1); inline;
  17236. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17237. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17238. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17239. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17240. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17241. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17242. procedure setTXHALFIE(thebits : TBits_1); inline;
  17243. procedure setTXHALFIF(thebits : TBits_1); inline;
  17244. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17245. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17246. procedure setw(thebits : TBits_32); inline;
  17247. public
  17248. procedure clearRXFULLIE; inline;
  17249. procedure clearRXFULLIF; inline;
  17250. procedure clearRXHALFIE; inline;
  17251. procedure clearRXHALFIF; inline;
  17252. procedure clearRXNEMPTYIE; inline;
  17253. procedure clearRXNEMPTYIF; inline;
  17254. procedure clearRXOVFLIE; inline;
  17255. procedure clearRXOVFLIF; inline;
  17256. procedure clearTXEMPTYIE; inline;
  17257. procedure clearTXEMPTYIF; inline;
  17258. procedure clearTXHALFIE; inline;
  17259. procedure clearTXHALFIF; inline;
  17260. procedure clearTXNFULLIE; inline;
  17261. procedure clearTXNFULLIF; inline;
  17262. procedure setRXFULLIE; inline;
  17263. procedure setRXFULLIF; inline;
  17264. procedure setRXHALFIE; inline;
  17265. procedure setRXHALFIF; inline;
  17266. procedure setRXNEMPTYIE; inline;
  17267. procedure setRXNEMPTYIF; inline;
  17268. procedure setRXOVFLIE; inline;
  17269. procedure setRXOVFLIF; inline;
  17270. procedure setTXEMPTYIE; inline;
  17271. procedure setTXEMPTYIF; inline;
  17272. procedure setTXHALFIE; inline;
  17273. procedure setTXHALFIF; inline;
  17274. procedure setTXNFULLIE; inline;
  17275. procedure setTXNFULLIF; inline;
  17276. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17277. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17278. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17279. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17280. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17281. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17282. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17283. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17284. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17285. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17286. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17287. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17288. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17289. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17290. property w : TBits_32 read getw write setw;
  17291. end;
  17292. TCAN1_C1FIFOCI6 = record
  17293. private
  17294. function getCFIFOCI : TBits_5; inline;
  17295. function getw : TBits_32; inline;
  17296. procedure setCFIFOCI(thebits : TBits_5); inline;
  17297. procedure setw(thebits : TBits_32); inline;
  17298. public
  17299. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17300. property w : TBits_32 read getw write setw;
  17301. end;
  17302. TCAN1_C1FIFOCON7 = record
  17303. private
  17304. function getDONLY : TBits_1; inline;
  17305. function getFRESET : TBits_1; inline;
  17306. function getFSIZE : TBits_5; inline;
  17307. function getRTREN : TBits_1; inline;
  17308. function getTXABAT : TBits_1; inline;
  17309. function getTXEN : TBits_1; inline;
  17310. function getTXERR : TBits_1; inline;
  17311. function getTXLARB : TBits_1; inline;
  17312. function getTXPRI : TBits_2; inline;
  17313. function getTXREQ : TBits_1; inline;
  17314. function getUINC : TBits_1; inline;
  17315. function getw : TBits_32; inline;
  17316. procedure setDONLY(thebits : TBits_1); inline;
  17317. procedure setFRESET(thebits : TBits_1); inline;
  17318. procedure setFSIZE(thebits : TBits_5); inline;
  17319. procedure setRTREN(thebits : TBits_1); inline;
  17320. procedure setTXABAT(thebits : TBits_1); inline;
  17321. procedure setTXEN(thebits : TBits_1); inline;
  17322. procedure setTXERR(thebits : TBits_1); inline;
  17323. procedure setTXLARB(thebits : TBits_1); inline;
  17324. procedure setTXPRI(thebits : TBits_2); inline;
  17325. procedure setTXREQ(thebits : TBits_1); inline;
  17326. procedure setUINC(thebits : TBits_1); inline;
  17327. procedure setw(thebits : TBits_32); inline;
  17328. public
  17329. procedure clearDONLY; inline;
  17330. procedure clearFRESET; inline;
  17331. procedure clearRTREN; inline;
  17332. procedure clearTXABAT; inline;
  17333. procedure clearTXEN; inline;
  17334. procedure clearTXERR; inline;
  17335. procedure clearTXLARB; inline;
  17336. procedure clearTXREQ; inline;
  17337. procedure clearUINC; inline;
  17338. procedure setDONLY; inline;
  17339. procedure setFRESET; inline;
  17340. procedure setRTREN; inline;
  17341. procedure setTXABAT; inline;
  17342. procedure setTXEN; inline;
  17343. procedure setTXERR; inline;
  17344. procedure setTXLARB; inline;
  17345. procedure setTXREQ; inline;
  17346. procedure setUINC; inline;
  17347. property DONLY : TBits_1 read getDONLY write setDONLY;
  17348. property FRESET : TBits_1 read getFRESET write setFRESET;
  17349. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17350. property RTREN : TBits_1 read getRTREN write setRTREN;
  17351. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17352. property TXEN : TBits_1 read getTXEN write setTXEN;
  17353. property TXERR : TBits_1 read getTXERR write setTXERR;
  17354. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17355. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17356. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17357. property UINC : TBits_1 read getUINC write setUINC;
  17358. property w : TBits_32 read getw write setw;
  17359. end;
  17360. TCAN1_C1FIFOINT7 = record
  17361. private
  17362. function getRXFULLIE : TBits_1; inline;
  17363. function getRXFULLIF : TBits_1; inline;
  17364. function getRXHALFIE : TBits_1; inline;
  17365. function getRXHALFIF : TBits_1; inline;
  17366. function getRXNEMPTYIE : TBits_1; inline;
  17367. function getRXNEMPTYIF : TBits_1; inline;
  17368. function getRXOVFLIE : TBits_1; inline;
  17369. function getRXOVFLIF : TBits_1; inline;
  17370. function getTXEMPTYIE : TBits_1; inline;
  17371. function getTXEMPTYIF : TBits_1; inline;
  17372. function getTXHALFIE : TBits_1; inline;
  17373. function getTXHALFIF : TBits_1; inline;
  17374. function getTXNFULLIE : TBits_1; inline;
  17375. function getTXNFULLIF : TBits_1; inline;
  17376. function getw : TBits_32; inline;
  17377. procedure setRXFULLIE(thebits : TBits_1); inline;
  17378. procedure setRXFULLIF(thebits : TBits_1); inline;
  17379. procedure setRXHALFIE(thebits : TBits_1); inline;
  17380. procedure setRXHALFIF(thebits : TBits_1); inline;
  17381. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17382. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17383. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17384. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17385. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17386. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17387. procedure setTXHALFIE(thebits : TBits_1); inline;
  17388. procedure setTXHALFIF(thebits : TBits_1); inline;
  17389. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17390. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17391. procedure setw(thebits : TBits_32); inline;
  17392. public
  17393. procedure clearRXFULLIE; inline;
  17394. procedure clearRXFULLIF; inline;
  17395. procedure clearRXHALFIE; inline;
  17396. procedure clearRXHALFIF; inline;
  17397. procedure clearRXNEMPTYIE; inline;
  17398. procedure clearRXNEMPTYIF; inline;
  17399. procedure clearRXOVFLIE; inline;
  17400. procedure clearRXOVFLIF; inline;
  17401. procedure clearTXEMPTYIE; inline;
  17402. procedure clearTXEMPTYIF; inline;
  17403. procedure clearTXHALFIE; inline;
  17404. procedure clearTXHALFIF; inline;
  17405. procedure clearTXNFULLIE; inline;
  17406. procedure clearTXNFULLIF; inline;
  17407. procedure setRXFULLIE; inline;
  17408. procedure setRXFULLIF; inline;
  17409. procedure setRXHALFIE; inline;
  17410. procedure setRXHALFIF; inline;
  17411. procedure setRXNEMPTYIE; inline;
  17412. procedure setRXNEMPTYIF; inline;
  17413. procedure setRXOVFLIE; inline;
  17414. procedure setRXOVFLIF; inline;
  17415. procedure setTXEMPTYIE; inline;
  17416. procedure setTXEMPTYIF; inline;
  17417. procedure setTXHALFIE; inline;
  17418. procedure setTXHALFIF; inline;
  17419. procedure setTXNFULLIE; inline;
  17420. procedure setTXNFULLIF; inline;
  17421. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17422. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17423. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17424. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17425. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17426. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17427. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17428. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17429. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17430. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17431. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17432. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17433. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17434. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17435. property w : TBits_32 read getw write setw;
  17436. end;
  17437. TCAN1_C1FIFOCI7 = record
  17438. private
  17439. function getCFIFOCI : TBits_5; inline;
  17440. function getw : TBits_32; inline;
  17441. procedure setCFIFOCI(thebits : TBits_5); inline;
  17442. procedure setw(thebits : TBits_32); inline;
  17443. public
  17444. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17445. property w : TBits_32 read getw write setw;
  17446. end;
  17447. TCAN1_C1FIFOCON8 = record
  17448. private
  17449. function getDONLY : TBits_1; inline;
  17450. function getFRESET : TBits_1; inline;
  17451. function getFSIZE : TBits_5; inline;
  17452. function getRTREN : TBits_1; inline;
  17453. function getTXABAT : TBits_1; inline;
  17454. function getTXEN : TBits_1; inline;
  17455. function getTXERR : TBits_1; inline;
  17456. function getTXLARB : TBits_1; inline;
  17457. function getTXPRI : TBits_2; inline;
  17458. function getTXREQ : TBits_1; inline;
  17459. function getUINC : TBits_1; inline;
  17460. function getw : TBits_32; inline;
  17461. procedure setDONLY(thebits : TBits_1); inline;
  17462. procedure setFRESET(thebits : TBits_1); inline;
  17463. procedure setFSIZE(thebits : TBits_5); inline;
  17464. procedure setRTREN(thebits : TBits_1); inline;
  17465. procedure setTXABAT(thebits : TBits_1); inline;
  17466. procedure setTXEN(thebits : TBits_1); inline;
  17467. procedure setTXERR(thebits : TBits_1); inline;
  17468. procedure setTXLARB(thebits : TBits_1); inline;
  17469. procedure setTXPRI(thebits : TBits_2); inline;
  17470. procedure setTXREQ(thebits : TBits_1); inline;
  17471. procedure setUINC(thebits : TBits_1); inline;
  17472. procedure setw(thebits : TBits_32); inline;
  17473. public
  17474. procedure clearDONLY; inline;
  17475. procedure clearFRESET; inline;
  17476. procedure clearRTREN; inline;
  17477. procedure clearTXABAT; inline;
  17478. procedure clearTXEN; inline;
  17479. procedure clearTXERR; inline;
  17480. procedure clearTXLARB; inline;
  17481. procedure clearTXREQ; inline;
  17482. procedure clearUINC; inline;
  17483. procedure setDONLY; inline;
  17484. procedure setFRESET; inline;
  17485. procedure setRTREN; inline;
  17486. procedure setTXABAT; inline;
  17487. procedure setTXEN; inline;
  17488. procedure setTXERR; inline;
  17489. procedure setTXLARB; inline;
  17490. procedure setTXREQ; inline;
  17491. procedure setUINC; inline;
  17492. property DONLY : TBits_1 read getDONLY write setDONLY;
  17493. property FRESET : TBits_1 read getFRESET write setFRESET;
  17494. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17495. property RTREN : TBits_1 read getRTREN write setRTREN;
  17496. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17497. property TXEN : TBits_1 read getTXEN write setTXEN;
  17498. property TXERR : TBits_1 read getTXERR write setTXERR;
  17499. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17500. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17501. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17502. property UINC : TBits_1 read getUINC write setUINC;
  17503. property w : TBits_32 read getw write setw;
  17504. end;
  17505. TCAN1_C1FIFOINT8 = record
  17506. private
  17507. function getRXFULLIE : TBits_1; inline;
  17508. function getRXFULLIF : TBits_1; inline;
  17509. function getRXHALFIE : TBits_1; inline;
  17510. function getRXHALFIF : TBits_1; inline;
  17511. function getRXNEMPTYIE : TBits_1; inline;
  17512. function getRXNEMPTYIF : TBits_1; inline;
  17513. function getRXOVFLIE : TBits_1; inline;
  17514. function getRXOVFLIF : TBits_1; inline;
  17515. function getTXEMPTYIE : TBits_1; inline;
  17516. function getTXEMPTYIF : TBits_1; inline;
  17517. function getTXHALFIE : TBits_1; inline;
  17518. function getTXHALFIF : TBits_1; inline;
  17519. function getTXNFULLIE : TBits_1; inline;
  17520. function getTXNFULLIF : TBits_1; inline;
  17521. function getw : TBits_32; inline;
  17522. procedure setRXFULLIE(thebits : TBits_1); inline;
  17523. procedure setRXFULLIF(thebits : TBits_1); inline;
  17524. procedure setRXHALFIE(thebits : TBits_1); inline;
  17525. procedure setRXHALFIF(thebits : TBits_1); inline;
  17526. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17527. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17528. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17529. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17530. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17531. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17532. procedure setTXHALFIE(thebits : TBits_1); inline;
  17533. procedure setTXHALFIF(thebits : TBits_1); inline;
  17534. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17535. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17536. procedure setw(thebits : TBits_32); inline;
  17537. public
  17538. procedure clearRXFULLIE; inline;
  17539. procedure clearRXFULLIF; inline;
  17540. procedure clearRXHALFIE; inline;
  17541. procedure clearRXHALFIF; inline;
  17542. procedure clearRXNEMPTYIE; inline;
  17543. procedure clearRXNEMPTYIF; inline;
  17544. procedure clearRXOVFLIE; inline;
  17545. procedure clearRXOVFLIF; inline;
  17546. procedure clearTXEMPTYIE; inline;
  17547. procedure clearTXEMPTYIF; inline;
  17548. procedure clearTXHALFIE; inline;
  17549. procedure clearTXHALFIF; inline;
  17550. procedure clearTXNFULLIE; inline;
  17551. procedure clearTXNFULLIF; inline;
  17552. procedure setRXFULLIE; inline;
  17553. procedure setRXFULLIF; inline;
  17554. procedure setRXHALFIE; inline;
  17555. procedure setRXHALFIF; inline;
  17556. procedure setRXNEMPTYIE; inline;
  17557. procedure setRXNEMPTYIF; inline;
  17558. procedure setRXOVFLIE; inline;
  17559. procedure setRXOVFLIF; inline;
  17560. procedure setTXEMPTYIE; inline;
  17561. procedure setTXEMPTYIF; inline;
  17562. procedure setTXHALFIE; inline;
  17563. procedure setTXHALFIF; inline;
  17564. procedure setTXNFULLIE; inline;
  17565. procedure setTXNFULLIF; inline;
  17566. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17567. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17568. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17569. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17570. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17571. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17572. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17573. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17574. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17575. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17576. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17577. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17578. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17579. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17580. property w : TBits_32 read getw write setw;
  17581. end;
  17582. TCAN1_C1FIFOCI8 = record
  17583. private
  17584. function getCFIFOCI : TBits_5; inline;
  17585. function getw : TBits_32; inline;
  17586. procedure setCFIFOCI(thebits : TBits_5); inline;
  17587. procedure setw(thebits : TBits_32); inline;
  17588. public
  17589. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17590. property w : TBits_32 read getw write setw;
  17591. end;
  17592. TCAN1_C1FIFOCON9 = record
  17593. private
  17594. function getDONLY : TBits_1; inline;
  17595. function getFRESET : TBits_1; inline;
  17596. function getFSIZE : TBits_5; inline;
  17597. function getRTREN : TBits_1; inline;
  17598. function getTXABAT : TBits_1; inline;
  17599. function getTXEN : TBits_1; inline;
  17600. function getTXERR : TBits_1; inline;
  17601. function getTXLARB : TBits_1; inline;
  17602. function getTXPRI : TBits_2; inline;
  17603. function getTXREQ : TBits_1; inline;
  17604. function getUINC : TBits_1; inline;
  17605. function getw : TBits_32; inline;
  17606. procedure setDONLY(thebits : TBits_1); inline;
  17607. procedure setFRESET(thebits : TBits_1); inline;
  17608. procedure setFSIZE(thebits : TBits_5); inline;
  17609. procedure setRTREN(thebits : TBits_1); inline;
  17610. procedure setTXABAT(thebits : TBits_1); inline;
  17611. procedure setTXEN(thebits : TBits_1); inline;
  17612. procedure setTXERR(thebits : TBits_1); inline;
  17613. procedure setTXLARB(thebits : TBits_1); inline;
  17614. procedure setTXPRI(thebits : TBits_2); inline;
  17615. procedure setTXREQ(thebits : TBits_1); inline;
  17616. procedure setUINC(thebits : TBits_1); inline;
  17617. procedure setw(thebits : TBits_32); inline;
  17618. public
  17619. procedure clearDONLY; inline;
  17620. procedure clearFRESET; inline;
  17621. procedure clearRTREN; inline;
  17622. procedure clearTXABAT; inline;
  17623. procedure clearTXEN; inline;
  17624. procedure clearTXERR; inline;
  17625. procedure clearTXLARB; inline;
  17626. procedure clearTXREQ; inline;
  17627. procedure clearUINC; inline;
  17628. procedure setDONLY; inline;
  17629. procedure setFRESET; inline;
  17630. procedure setRTREN; inline;
  17631. procedure setTXABAT; inline;
  17632. procedure setTXEN; inline;
  17633. procedure setTXERR; inline;
  17634. procedure setTXLARB; inline;
  17635. procedure setTXREQ; inline;
  17636. procedure setUINC; inline;
  17637. property DONLY : TBits_1 read getDONLY write setDONLY;
  17638. property FRESET : TBits_1 read getFRESET write setFRESET;
  17639. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17640. property RTREN : TBits_1 read getRTREN write setRTREN;
  17641. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17642. property TXEN : TBits_1 read getTXEN write setTXEN;
  17643. property TXERR : TBits_1 read getTXERR write setTXERR;
  17644. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17645. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17646. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17647. property UINC : TBits_1 read getUINC write setUINC;
  17648. property w : TBits_32 read getw write setw;
  17649. end;
  17650. TCAN1_C1FIFOINT9 = record
  17651. private
  17652. function getRXFULLIE : TBits_1; inline;
  17653. function getRXFULLIF : TBits_1; inline;
  17654. function getRXHALFIE : TBits_1; inline;
  17655. function getRXHALFIF : TBits_1; inline;
  17656. function getRXNEMPTYIE : TBits_1; inline;
  17657. function getRXNEMPTYIF : TBits_1; inline;
  17658. function getRXOVFLIE : TBits_1; inline;
  17659. function getRXOVFLIF : TBits_1; inline;
  17660. function getTXEMPTYIE : TBits_1; inline;
  17661. function getTXEMPTYIF : TBits_1; inline;
  17662. function getTXHALFIE : TBits_1; inline;
  17663. function getTXHALFIF : TBits_1; inline;
  17664. function getTXNFULLIE : TBits_1; inline;
  17665. function getTXNFULLIF : TBits_1; inline;
  17666. function getw : TBits_32; inline;
  17667. procedure setRXFULLIE(thebits : TBits_1); inline;
  17668. procedure setRXFULLIF(thebits : TBits_1); inline;
  17669. procedure setRXHALFIE(thebits : TBits_1); inline;
  17670. procedure setRXHALFIF(thebits : TBits_1); inline;
  17671. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17672. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17673. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17674. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17675. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17676. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17677. procedure setTXHALFIE(thebits : TBits_1); inline;
  17678. procedure setTXHALFIF(thebits : TBits_1); inline;
  17679. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17680. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17681. procedure setw(thebits : TBits_32); inline;
  17682. public
  17683. procedure clearRXFULLIE; inline;
  17684. procedure clearRXFULLIF; inline;
  17685. procedure clearRXHALFIE; inline;
  17686. procedure clearRXHALFIF; inline;
  17687. procedure clearRXNEMPTYIE; inline;
  17688. procedure clearRXNEMPTYIF; inline;
  17689. procedure clearRXOVFLIE; inline;
  17690. procedure clearRXOVFLIF; inline;
  17691. procedure clearTXEMPTYIE; inline;
  17692. procedure clearTXEMPTYIF; inline;
  17693. procedure clearTXHALFIE; inline;
  17694. procedure clearTXHALFIF; inline;
  17695. procedure clearTXNFULLIE; inline;
  17696. procedure clearTXNFULLIF; inline;
  17697. procedure setRXFULLIE; inline;
  17698. procedure setRXFULLIF; inline;
  17699. procedure setRXHALFIE; inline;
  17700. procedure setRXHALFIF; inline;
  17701. procedure setRXNEMPTYIE; inline;
  17702. procedure setRXNEMPTYIF; inline;
  17703. procedure setRXOVFLIE; inline;
  17704. procedure setRXOVFLIF; inline;
  17705. procedure setTXEMPTYIE; inline;
  17706. procedure setTXEMPTYIF; inline;
  17707. procedure setTXHALFIE; inline;
  17708. procedure setTXHALFIF; inline;
  17709. procedure setTXNFULLIE; inline;
  17710. procedure setTXNFULLIF; inline;
  17711. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17712. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17713. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17714. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17715. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17716. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17717. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17718. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17719. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17720. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17721. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17722. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17723. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17724. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17725. property w : TBits_32 read getw write setw;
  17726. end;
  17727. TCAN1_C1FIFOCI9 = record
  17728. private
  17729. function getCFIFOCI : TBits_5; inline;
  17730. function getw : TBits_32; inline;
  17731. procedure setCFIFOCI(thebits : TBits_5); inline;
  17732. procedure setw(thebits : TBits_32); inline;
  17733. public
  17734. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17735. property w : TBits_32 read getw write setw;
  17736. end;
  17737. TCAN1_C1FIFOCON10 = record
  17738. private
  17739. function getDONLY : TBits_1; inline;
  17740. function getFRESET : TBits_1; inline;
  17741. function getFSIZE : TBits_5; inline;
  17742. function getRTREN : TBits_1; inline;
  17743. function getTXABAT : TBits_1; inline;
  17744. function getTXEN : TBits_1; inline;
  17745. function getTXERR : TBits_1; inline;
  17746. function getTXLARB : TBits_1; inline;
  17747. function getTXPRI : TBits_2; inline;
  17748. function getTXREQ : TBits_1; inline;
  17749. function getUINC : TBits_1; inline;
  17750. function getw : TBits_32; inline;
  17751. procedure setDONLY(thebits : TBits_1); inline;
  17752. procedure setFRESET(thebits : TBits_1); inline;
  17753. procedure setFSIZE(thebits : TBits_5); inline;
  17754. procedure setRTREN(thebits : TBits_1); inline;
  17755. procedure setTXABAT(thebits : TBits_1); inline;
  17756. procedure setTXEN(thebits : TBits_1); inline;
  17757. procedure setTXERR(thebits : TBits_1); inline;
  17758. procedure setTXLARB(thebits : TBits_1); inline;
  17759. procedure setTXPRI(thebits : TBits_2); inline;
  17760. procedure setTXREQ(thebits : TBits_1); inline;
  17761. procedure setUINC(thebits : TBits_1); inline;
  17762. procedure setw(thebits : TBits_32); inline;
  17763. public
  17764. procedure clearDONLY; inline;
  17765. procedure clearFRESET; inline;
  17766. procedure clearRTREN; inline;
  17767. procedure clearTXABAT; inline;
  17768. procedure clearTXEN; inline;
  17769. procedure clearTXERR; inline;
  17770. procedure clearTXLARB; inline;
  17771. procedure clearTXREQ; inline;
  17772. procedure clearUINC; inline;
  17773. procedure setDONLY; inline;
  17774. procedure setFRESET; inline;
  17775. procedure setRTREN; inline;
  17776. procedure setTXABAT; inline;
  17777. procedure setTXEN; inline;
  17778. procedure setTXERR; inline;
  17779. procedure setTXLARB; inline;
  17780. procedure setTXREQ; inline;
  17781. procedure setUINC; inline;
  17782. property DONLY : TBits_1 read getDONLY write setDONLY;
  17783. property FRESET : TBits_1 read getFRESET write setFRESET;
  17784. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17785. property RTREN : TBits_1 read getRTREN write setRTREN;
  17786. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17787. property TXEN : TBits_1 read getTXEN write setTXEN;
  17788. property TXERR : TBits_1 read getTXERR write setTXERR;
  17789. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17790. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17791. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17792. property UINC : TBits_1 read getUINC write setUINC;
  17793. property w : TBits_32 read getw write setw;
  17794. end;
  17795. TCAN1_C1FIFOINT10 = record
  17796. private
  17797. function getRXFULLIE : TBits_1; inline;
  17798. function getRXFULLIF : TBits_1; inline;
  17799. function getRXHALFIE : TBits_1; inline;
  17800. function getRXHALFIF : TBits_1; inline;
  17801. function getRXNEMPTYIE : TBits_1; inline;
  17802. function getRXNEMPTYIF : TBits_1; inline;
  17803. function getRXOVFLIE : TBits_1; inline;
  17804. function getRXOVFLIF : TBits_1; inline;
  17805. function getTXEMPTYIE : TBits_1; inline;
  17806. function getTXEMPTYIF : TBits_1; inline;
  17807. function getTXHALFIE : TBits_1; inline;
  17808. function getTXHALFIF : TBits_1; inline;
  17809. function getTXNFULLIE : TBits_1; inline;
  17810. function getTXNFULLIF : TBits_1; inline;
  17811. function getw : TBits_32; inline;
  17812. procedure setRXFULLIE(thebits : TBits_1); inline;
  17813. procedure setRXFULLIF(thebits : TBits_1); inline;
  17814. procedure setRXHALFIE(thebits : TBits_1); inline;
  17815. procedure setRXHALFIF(thebits : TBits_1); inline;
  17816. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17817. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17818. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17819. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17820. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17821. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17822. procedure setTXHALFIE(thebits : TBits_1); inline;
  17823. procedure setTXHALFIF(thebits : TBits_1); inline;
  17824. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17825. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17826. procedure setw(thebits : TBits_32); inline;
  17827. public
  17828. procedure clearRXFULLIE; inline;
  17829. procedure clearRXFULLIF; inline;
  17830. procedure clearRXHALFIE; inline;
  17831. procedure clearRXHALFIF; inline;
  17832. procedure clearRXNEMPTYIE; inline;
  17833. procedure clearRXNEMPTYIF; inline;
  17834. procedure clearRXOVFLIE; inline;
  17835. procedure clearRXOVFLIF; inline;
  17836. procedure clearTXEMPTYIE; inline;
  17837. procedure clearTXEMPTYIF; inline;
  17838. procedure clearTXHALFIE; inline;
  17839. procedure clearTXHALFIF; inline;
  17840. procedure clearTXNFULLIE; inline;
  17841. procedure clearTXNFULLIF; inline;
  17842. procedure setRXFULLIE; inline;
  17843. procedure setRXFULLIF; inline;
  17844. procedure setRXHALFIE; inline;
  17845. procedure setRXHALFIF; inline;
  17846. procedure setRXNEMPTYIE; inline;
  17847. procedure setRXNEMPTYIF; inline;
  17848. procedure setRXOVFLIE; inline;
  17849. procedure setRXOVFLIF; inline;
  17850. procedure setTXEMPTYIE; inline;
  17851. procedure setTXEMPTYIF; inline;
  17852. procedure setTXHALFIE; inline;
  17853. procedure setTXHALFIF; inline;
  17854. procedure setTXNFULLIE; inline;
  17855. procedure setTXNFULLIF; inline;
  17856. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17857. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17858. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17859. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17860. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17861. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17862. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17863. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17864. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17865. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17866. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17867. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17868. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17869. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17870. property w : TBits_32 read getw write setw;
  17871. end;
  17872. TCAN1_C1FIFOCI10 = record
  17873. private
  17874. function getCFIFOCI : TBits_5; inline;
  17875. function getw : TBits_32; inline;
  17876. procedure setCFIFOCI(thebits : TBits_5); inline;
  17877. procedure setw(thebits : TBits_32); inline;
  17878. public
  17879. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17880. property w : TBits_32 read getw write setw;
  17881. end;
  17882. TCAN1_C1FIFOCON11 = record
  17883. private
  17884. function getDONLY : TBits_1; inline;
  17885. function getFRESET : TBits_1; inline;
  17886. function getFSIZE : TBits_5; inline;
  17887. function getRTREN : TBits_1; inline;
  17888. function getTXABAT : TBits_1; inline;
  17889. function getTXEN : TBits_1; inline;
  17890. function getTXERR : TBits_1; inline;
  17891. function getTXLARB : TBits_1; inline;
  17892. function getTXPRI : TBits_2; inline;
  17893. function getTXREQ : TBits_1; inline;
  17894. function getUINC : TBits_1; inline;
  17895. function getw : TBits_32; inline;
  17896. procedure setDONLY(thebits : TBits_1); inline;
  17897. procedure setFRESET(thebits : TBits_1); inline;
  17898. procedure setFSIZE(thebits : TBits_5); inline;
  17899. procedure setRTREN(thebits : TBits_1); inline;
  17900. procedure setTXABAT(thebits : TBits_1); inline;
  17901. procedure setTXEN(thebits : TBits_1); inline;
  17902. procedure setTXERR(thebits : TBits_1); inline;
  17903. procedure setTXLARB(thebits : TBits_1); inline;
  17904. procedure setTXPRI(thebits : TBits_2); inline;
  17905. procedure setTXREQ(thebits : TBits_1); inline;
  17906. procedure setUINC(thebits : TBits_1); inline;
  17907. procedure setw(thebits : TBits_32); inline;
  17908. public
  17909. procedure clearDONLY; inline;
  17910. procedure clearFRESET; inline;
  17911. procedure clearRTREN; inline;
  17912. procedure clearTXABAT; inline;
  17913. procedure clearTXEN; inline;
  17914. procedure clearTXERR; inline;
  17915. procedure clearTXLARB; inline;
  17916. procedure clearTXREQ; inline;
  17917. procedure clearUINC; inline;
  17918. procedure setDONLY; inline;
  17919. procedure setFRESET; inline;
  17920. procedure setRTREN; inline;
  17921. procedure setTXABAT; inline;
  17922. procedure setTXEN; inline;
  17923. procedure setTXERR; inline;
  17924. procedure setTXLARB; inline;
  17925. procedure setTXREQ; inline;
  17926. procedure setUINC; inline;
  17927. property DONLY : TBits_1 read getDONLY write setDONLY;
  17928. property FRESET : TBits_1 read getFRESET write setFRESET;
  17929. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17930. property RTREN : TBits_1 read getRTREN write setRTREN;
  17931. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17932. property TXEN : TBits_1 read getTXEN write setTXEN;
  17933. property TXERR : TBits_1 read getTXERR write setTXERR;
  17934. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17935. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17936. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17937. property UINC : TBits_1 read getUINC write setUINC;
  17938. property w : TBits_32 read getw write setw;
  17939. end;
  17940. TCAN1_C1FIFOINT11 = record
  17941. private
  17942. function getRXFULLIE : TBits_1; inline;
  17943. function getRXFULLIF : TBits_1; inline;
  17944. function getRXHALFIE : TBits_1; inline;
  17945. function getRXHALFIF : TBits_1; inline;
  17946. function getRXNEMPTYIE : TBits_1; inline;
  17947. function getRXNEMPTYIF : TBits_1; inline;
  17948. function getRXOVFLIE : TBits_1; inline;
  17949. function getRXOVFLIF : TBits_1; inline;
  17950. function getTXEMPTYIE : TBits_1; inline;
  17951. function getTXEMPTYIF : TBits_1; inline;
  17952. function getTXHALFIE : TBits_1; inline;
  17953. function getTXHALFIF : TBits_1; inline;
  17954. function getTXNFULLIE : TBits_1; inline;
  17955. function getTXNFULLIF : TBits_1; inline;
  17956. function getw : TBits_32; inline;
  17957. procedure setRXFULLIE(thebits : TBits_1); inline;
  17958. procedure setRXFULLIF(thebits : TBits_1); inline;
  17959. procedure setRXHALFIE(thebits : TBits_1); inline;
  17960. procedure setRXHALFIF(thebits : TBits_1); inline;
  17961. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17962. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17963. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17964. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17965. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17966. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17967. procedure setTXHALFIE(thebits : TBits_1); inline;
  17968. procedure setTXHALFIF(thebits : TBits_1); inline;
  17969. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17970. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17971. procedure setw(thebits : TBits_32); inline;
  17972. public
  17973. procedure clearRXFULLIE; inline;
  17974. procedure clearRXFULLIF; inline;
  17975. procedure clearRXHALFIE; inline;
  17976. procedure clearRXHALFIF; inline;
  17977. procedure clearRXNEMPTYIE; inline;
  17978. procedure clearRXNEMPTYIF; inline;
  17979. procedure clearRXOVFLIE; inline;
  17980. procedure clearRXOVFLIF; inline;
  17981. procedure clearTXEMPTYIE; inline;
  17982. procedure clearTXEMPTYIF; inline;
  17983. procedure clearTXHALFIE; inline;
  17984. procedure clearTXHALFIF; inline;
  17985. procedure clearTXNFULLIE; inline;
  17986. procedure clearTXNFULLIF; inline;
  17987. procedure setRXFULLIE; inline;
  17988. procedure setRXFULLIF; inline;
  17989. procedure setRXHALFIE; inline;
  17990. procedure setRXHALFIF; inline;
  17991. procedure setRXNEMPTYIE; inline;
  17992. procedure setRXNEMPTYIF; inline;
  17993. procedure setRXOVFLIE; inline;
  17994. procedure setRXOVFLIF; inline;
  17995. procedure setTXEMPTYIE; inline;
  17996. procedure setTXEMPTYIF; inline;
  17997. procedure setTXHALFIE; inline;
  17998. procedure setTXHALFIF; inline;
  17999. procedure setTXNFULLIE; inline;
  18000. procedure setTXNFULLIF; inline;
  18001. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18002. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18003. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18004. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18005. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18006. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18007. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18008. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18009. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18010. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18011. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18012. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18013. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18014. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18015. property w : TBits_32 read getw write setw;
  18016. end;
  18017. TCAN1_C1FIFOCI11 = record
  18018. private
  18019. function getCFIFOCI : TBits_5; inline;
  18020. function getw : TBits_32; inline;
  18021. procedure setCFIFOCI(thebits : TBits_5); inline;
  18022. procedure setw(thebits : TBits_32); inline;
  18023. public
  18024. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18025. property w : TBits_32 read getw write setw;
  18026. end;
  18027. TCAN1_C1FIFOCON12 = record
  18028. private
  18029. function getDONLY : TBits_1; inline;
  18030. function getFRESET : TBits_1; inline;
  18031. function getFSIZE : TBits_5; inline;
  18032. function getRTREN : TBits_1; inline;
  18033. function getTXABAT : TBits_1; inline;
  18034. function getTXEN : TBits_1; inline;
  18035. function getTXERR : TBits_1; inline;
  18036. function getTXLARB : TBits_1; inline;
  18037. function getTXPRI : TBits_2; inline;
  18038. function getTXREQ : TBits_1; inline;
  18039. function getUINC : TBits_1; inline;
  18040. function getw : TBits_32; inline;
  18041. procedure setDONLY(thebits : TBits_1); inline;
  18042. procedure setFRESET(thebits : TBits_1); inline;
  18043. procedure setFSIZE(thebits : TBits_5); inline;
  18044. procedure setRTREN(thebits : TBits_1); inline;
  18045. procedure setTXABAT(thebits : TBits_1); inline;
  18046. procedure setTXEN(thebits : TBits_1); inline;
  18047. procedure setTXERR(thebits : TBits_1); inline;
  18048. procedure setTXLARB(thebits : TBits_1); inline;
  18049. procedure setTXPRI(thebits : TBits_2); inline;
  18050. procedure setTXREQ(thebits : TBits_1); inline;
  18051. procedure setUINC(thebits : TBits_1); inline;
  18052. procedure setw(thebits : TBits_32); inline;
  18053. public
  18054. procedure clearDONLY; inline;
  18055. procedure clearFRESET; inline;
  18056. procedure clearRTREN; inline;
  18057. procedure clearTXABAT; inline;
  18058. procedure clearTXEN; inline;
  18059. procedure clearTXERR; inline;
  18060. procedure clearTXLARB; inline;
  18061. procedure clearTXREQ; inline;
  18062. procedure clearUINC; inline;
  18063. procedure setDONLY; inline;
  18064. procedure setFRESET; inline;
  18065. procedure setRTREN; inline;
  18066. procedure setTXABAT; inline;
  18067. procedure setTXEN; inline;
  18068. procedure setTXERR; inline;
  18069. procedure setTXLARB; inline;
  18070. procedure setTXREQ; inline;
  18071. procedure setUINC; inline;
  18072. property DONLY : TBits_1 read getDONLY write setDONLY;
  18073. property FRESET : TBits_1 read getFRESET write setFRESET;
  18074. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18075. property RTREN : TBits_1 read getRTREN write setRTREN;
  18076. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18077. property TXEN : TBits_1 read getTXEN write setTXEN;
  18078. property TXERR : TBits_1 read getTXERR write setTXERR;
  18079. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18080. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18081. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18082. property UINC : TBits_1 read getUINC write setUINC;
  18083. property w : TBits_32 read getw write setw;
  18084. end;
  18085. TCAN1_C1FIFOINT12 = record
  18086. private
  18087. function getRXFULLIE : TBits_1; inline;
  18088. function getRXFULLIF : TBits_1; inline;
  18089. function getRXHALFIE : TBits_1; inline;
  18090. function getRXHALFIF : TBits_1; inline;
  18091. function getRXNEMPTYIE : TBits_1; inline;
  18092. function getRXNEMPTYIF : TBits_1; inline;
  18093. function getRXOVFLIE : TBits_1; inline;
  18094. function getRXOVFLIF : TBits_1; inline;
  18095. function getTXEMPTYIE : TBits_1; inline;
  18096. function getTXEMPTYIF : TBits_1; inline;
  18097. function getTXHALFIE : TBits_1; inline;
  18098. function getTXHALFIF : TBits_1; inline;
  18099. function getTXNFULLIE : TBits_1; inline;
  18100. function getTXNFULLIF : TBits_1; inline;
  18101. function getw : TBits_32; inline;
  18102. procedure setRXFULLIE(thebits : TBits_1); inline;
  18103. procedure setRXFULLIF(thebits : TBits_1); inline;
  18104. procedure setRXHALFIE(thebits : TBits_1); inline;
  18105. procedure setRXHALFIF(thebits : TBits_1); inline;
  18106. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18107. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18108. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18109. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18110. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18111. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18112. procedure setTXHALFIE(thebits : TBits_1); inline;
  18113. procedure setTXHALFIF(thebits : TBits_1); inline;
  18114. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18115. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18116. procedure setw(thebits : TBits_32); inline;
  18117. public
  18118. procedure clearRXFULLIE; inline;
  18119. procedure clearRXFULLIF; inline;
  18120. procedure clearRXHALFIE; inline;
  18121. procedure clearRXHALFIF; inline;
  18122. procedure clearRXNEMPTYIE; inline;
  18123. procedure clearRXNEMPTYIF; inline;
  18124. procedure clearRXOVFLIE; inline;
  18125. procedure clearRXOVFLIF; inline;
  18126. procedure clearTXEMPTYIE; inline;
  18127. procedure clearTXEMPTYIF; inline;
  18128. procedure clearTXHALFIE; inline;
  18129. procedure clearTXHALFIF; inline;
  18130. procedure clearTXNFULLIE; inline;
  18131. procedure clearTXNFULLIF; inline;
  18132. procedure setRXFULLIE; inline;
  18133. procedure setRXFULLIF; inline;
  18134. procedure setRXHALFIE; inline;
  18135. procedure setRXHALFIF; inline;
  18136. procedure setRXNEMPTYIE; inline;
  18137. procedure setRXNEMPTYIF; inline;
  18138. procedure setRXOVFLIE; inline;
  18139. procedure setRXOVFLIF; inline;
  18140. procedure setTXEMPTYIE; inline;
  18141. procedure setTXEMPTYIF; inline;
  18142. procedure setTXHALFIE; inline;
  18143. procedure setTXHALFIF; inline;
  18144. procedure setTXNFULLIE; inline;
  18145. procedure setTXNFULLIF; inline;
  18146. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18147. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18148. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18149. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18150. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18151. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18152. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18153. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18154. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18155. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18156. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18157. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18158. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18159. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18160. property w : TBits_32 read getw write setw;
  18161. end;
  18162. TCAN1_C1FIFOCI12 = record
  18163. private
  18164. function getCFIFOCI : TBits_5; inline;
  18165. function getw : TBits_32; inline;
  18166. procedure setCFIFOCI(thebits : TBits_5); inline;
  18167. procedure setw(thebits : TBits_32); inline;
  18168. public
  18169. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18170. property w : TBits_32 read getw write setw;
  18171. end;
  18172. TCAN1_C1FIFOCON13 = record
  18173. private
  18174. function getDONLY : TBits_1; inline;
  18175. function getFRESET : TBits_1; inline;
  18176. function getFSIZE : TBits_5; inline;
  18177. function getRTREN : TBits_1; inline;
  18178. function getTXABAT : TBits_1; inline;
  18179. function getTXEN : TBits_1; inline;
  18180. function getTXERR : TBits_1; inline;
  18181. function getTXLARB : TBits_1; inline;
  18182. function getTXPRI : TBits_2; inline;
  18183. function getTXREQ : TBits_1; inline;
  18184. function getUINC : TBits_1; inline;
  18185. function getw : TBits_32; inline;
  18186. procedure setDONLY(thebits : TBits_1); inline;
  18187. procedure setFRESET(thebits : TBits_1); inline;
  18188. procedure setFSIZE(thebits : TBits_5); inline;
  18189. procedure setRTREN(thebits : TBits_1); inline;
  18190. procedure setTXABAT(thebits : TBits_1); inline;
  18191. procedure setTXEN(thebits : TBits_1); inline;
  18192. procedure setTXERR(thebits : TBits_1); inline;
  18193. procedure setTXLARB(thebits : TBits_1); inline;
  18194. procedure setTXPRI(thebits : TBits_2); inline;
  18195. procedure setTXREQ(thebits : TBits_1); inline;
  18196. procedure setUINC(thebits : TBits_1); inline;
  18197. procedure setw(thebits : TBits_32); inline;
  18198. public
  18199. procedure clearDONLY; inline;
  18200. procedure clearFRESET; inline;
  18201. procedure clearRTREN; inline;
  18202. procedure clearTXABAT; inline;
  18203. procedure clearTXEN; inline;
  18204. procedure clearTXERR; inline;
  18205. procedure clearTXLARB; inline;
  18206. procedure clearTXREQ; inline;
  18207. procedure clearUINC; inline;
  18208. procedure setDONLY; inline;
  18209. procedure setFRESET; inline;
  18210. procedure setRTREN; inline;
  18211. procedure setTXABAT; inline;
  18212. procedure setTXEN; inline;
  18213. procedure setTXERR; inline;
  18214. procedure setTXLARB; inline;
  18215. procedure setTXREQ; inline;
  18216. procedure setUINC; inline;
  18217. property DONLY : TBits_1 read getDONLY write setDONLY;
  18218. property FRESET : TBits_1 read getFRESET write setFRESET;
  18219. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18220. property RTREN : TBits_1 read getRTREN write setRTREN;
  18221. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18222. property TXEN : TBits_1 read getTXEN write setTXEN;
  18223. property TXERR : TBits_1 read getTXERR write setTXERR;
  18224. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18225. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18226. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18227. property UINC : TBits_1 read getUINC write setUINC;
  18228. property w : TBits_32 read getw write setw;
  18229. end;
  18230. TCAN1_C1FIFOINT13 = record
  18231. private
  18232. function getRXFULLIE : TBits_1; inline;
  18233. function getRXFULLIF : TBits_1; inline;
  18234. function getRXHALFIE : TBits_1; inline;
  18235. function getRXHALFIF : TBits_1; inline;
  18236. function getRXNEMPTYIE : TBits_1; inline;
  18237. function getRXNEMPTYIF : TBits_1; inline;
  18238. function getRXOVFLIE : TBits_1; inline;
  18239. function getRXOVFLIF : TBits_1; inline;
  18240. function getTXEMPTYIE : TBits_1; inline;
  18241. function getTXEMPTYIF : TBits_1; inline;
  18242. function getTXHALFIE : TBits_1; inline;
  18243. function getTXHALFIF : TBits_1; inline;
  18244. function getTXNFULLIE : TBits_1; inline;
  18245. function getTXNFULLIF : TBits_1; inline;
  18246. function getw : TBits_32; inline;
  18247. procedure setRXFULLIE(thebits : TBits_1); inline;
  18248. procedure setRXFULLIF(thebits : TBits_1); inline;
  18249. procedure setRXHALFIE(thebits : TBits_1); inline;
  18250. procedure setRXHALFIF(thebits : TBits_1); inline;
  18251. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18252. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18253. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18254. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18255. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18256. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18257. procedure setTXHALFIE(thebits : TBits_1); inline;
  18258. procedure setTXHALFIF(thebits : TBits_1); inline;
  18259. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18260. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18261. procedure setw(thebits : TBits_32); inline;
  18262. public
  18263. procedure clearRXFULLIE; inline;
  18264. procedure clearRXFULLIF; inline;
  18265. procedure clearRXHALFIE; inline;
  18266. procedure clearRXHALFIF; inline;
  18267. procedure clearRXNEMPTYIE; inline;
  18268. procedure clearRXNEMPTYIF; inline;
  18269. procedure clearRXOVFLIE; inline;
  18270. procedure clearRXOVFLIF; inline;
  18271. procedure clearTXEMPTYIE; inline;
  18272. procedure clearTXEMPTYIF; inline;
  18273. procedure clearTXHALFIE; inline;
  18274. procedure clearTXHALFIF; inline;
  18275. procedure clearTXNFULLIE; inline;
  18276. procedure clearTXNFULLIF; inline;
  18277. procedure setRXFULLIE; inline;
  18278. procedure setRXFULLIF; inline;
  18279. procedure setRXHALFIE; inline;
  18280. procedure setRXHALFIF; inline;
  18281. procedure setRXNEMPTYIE; inline;
  18282. procedure setRXNEMPTYIF; inline;
  18283. procedure setRXOVFLIE; inline;
  18284. procedure setRXOVFLIF; inline;
  18285. procedure setTXEMPTYIE; inline;
  18286. procedure setTXEMPTYIF; inline;
  18287. procedure setTXHALFIE; inline;
  18288. procedure setTXHALFIF; inline;
  18289. procedure setTXNFULLIE; inline;
  18290. procedure setTXNFULLIF; inline;
  18291. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18292. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18293. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18294. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18295. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18296. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18297. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18298. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18299. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18300. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18301. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18302. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18303. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18304. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18305. property w : TBits_32 read getw write setw;
  18306. end;
  18307. TCAN1_C1FIFOCI13 = record
  18308. private
  18309. function getCFIFOCI : TBits_5; inline;
  18310. function getw : TBits_32; inline;
  18311. procedure setCFIFOCI(thebits : TBits_5); inline;
  18312. procedure setw(thebits : TBits_32); inline;
  18313. public
  18314. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18315. property w : TBits_32 read getw write setw;
  18316. end;
  18317. TCAN1_C1FIFOCON14 = record
  18318. private
  18319. function getDONLY : TBits_1; inline;
  18320. function getFRESET : TBits_1; inline;
  18321. function getFSIZE : TBits_5; inline;
  18322. function getRTREN : TBits_1; inline;
  18323. function getTXABAT : TBits_1; inline;
  18324. function getTXEN : TBits_1; inline;
  18325. function getTXERR : TBits_1; inline;
  18326. function getTXLARB : TBits_1; inline;
  18327. function getTXPRI : TBits_2; inline;
  18328. function getTXREQ : TBits_1; inline;
  18329. function getUINC : TBits_1; inline;
  18330. function getw : TBits_32; inline;
  18331. procedure setDONLY(thebits : TBits_1); inline;
  18332. procedure setFRESET(thebits : TBits_1); inline;
  18333. procedure setFSIZE(thebits : TBits_5); inline;
  18334. procedure setRTREN(thebits : TBits_1); inline;
  18335. procedure setTXABAT(thebits : TBits_1); inline;
  18336. procedure setTXEN(thebits : TBits_1); inline;
  18337. procedure setTXERR(thebits : TBits_1); inline;
  18338. procedure setTXLARB(thebits : TBits_1); inline;
  18339. procedure setTXPRI(thebits : TBits_2); inline;
  18340. procedure setTXREQ(thebits : TBits_1); inline;
  18341. procedure setUINC(thebits : TBits_1); inline;
  18342. procedure setw(thebits : TBits_32); inline;
  18343. public
  18344. procedure clearDONLY; inline;
  18345. procedure clearFRESET; inline;
  18346. procedure clearRTREN; inline;
  18347. procedure clearTXABAT; inline;
  18348. procedure clearTXEN; inline;
  18349. procedure clearTXERR; inline;
  18350. procedure clearTXLARB; inline;
  18351. procedure clearTXREQ; inline;
  18352. procedure clearUINC; inline;
  18353. procedure setDONLY; inline;
  18354. procedure setFRESET; inline;
  18355. procedure setRTREN; inline;
  18356. procedure setTXABAT; inline;
  18357. procedure setTXEN; inline;
  18358. procedure setTXERR; inline;
  18359. procedure setTXLARB; inline;
  18360. procedure setTXREQ; inline;
  18361. procedure setUINC; inline;
  18362. property DONLY : TBits_1 read getDONLY write setDONLY;
  18363. property FRESET : TBits_1 read getFRESET write setFRESET;
  18364. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18365. property RTREN : TBits_1 read getRTREN write setRTREN;
  18366. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18367. property TXEN : TBits_1 read getTXEN write setTXEN;
  18368. property TXERR : TBits_1 read getTXERR write setTXERR;
  18369. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18370. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18371. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18372. property UINC : TBits_1 read getUINC write setUINC;
  18373. property w : TBits_32 read getw write setw;
  18374. end;
  18375. TCAN1_C1FIFOINT14 = record
  18376. private
  18377. function getRXFULLIE : TBits_1; inline;
  18378. function getRXFULLIF : TBits_1; inline;
  18379. function getRXHALFIE : TBits_1; inline;
  18380. function getRXHALFIF : TBits_1; inline;
  18381. function getRXNEMPTYIE : TBits_1; inline;
  18382. function getRXNEMPTYIF : TBits_1; inline;
  18383. function getRXOVFLIE : TBits_1; inline;
  18384. function getRXOVFLIF : TBits_1; inline;
  18385. function getTXEMPTYIE : TBits_1; inline;
  18386. function getTXEMPTYIF : TBits_1; inline;
  18387. function getTXHALFIE : TBits_1; inline;
  18388. function getTXHALFIF : TBits_1; inline;
  18389. function getTXNFULLIE : TBits_1; inline;
  18390. function getTXNFULLIF : TBits_1; inline;
  18391. function getw : TBits_32; inline;
  18392. procedure setRXFULLIE(thebits : TBits_1); inline;
  18393. procedure setRXFULLIF(thebits : TBits_1); inline;
  18394. procedure setRXHALFIE(thebits : TBits_1); inline;
  18395. procedure setRXHALFIF(thebits : TBits_1); inline;
  18396. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18397. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18398. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18399. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18400. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18401. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18402. procedure setTXHALFIE(thebits : TBits_1); inline;
  18403. procedure setTXHALFIF(thebits : TBits_1); inline;
  18404. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18405. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18406. procedure setw(thebits : TBits_32); inline;
  18407. public
  18408. procedure clearRXFULLIE; inline;
  18409. procedure clearRXFULLIF; inline;
  18410. procedure clearRXHALFIE; inline;
  18411. procedure clearRXHALFIF; inline;
  18412. procedure clearRXNEMPTYIE; inline;
  18413. procedure clearRXNEMPTYIF; inline;
  18414. procedure clearRXOVFLIE; inline;
  18415. procedure clearRXOVFLIF; inline;
  18416. procedure clearTXEMPTYIE; inline;
  18417. procedure clearTXEMPTYIF; inline;
  18418. procedure clearTXHALFIE; inline;
  18419. procedure clearTXHALFIF; inline;
  18420. procedure clearTXNFULLIE; inline;
  18421. procedure clearTXNFULLIF; inline;
  18422. procedure setRXFULLIE; inline;
  18423. procedure setRXFULLIF; inline;
  18424. procedure setRXHALFIE; inline;
  18425. procedure setRXHALFIF; inline;
  18426. procedure setRXNEMPTYIE; inline;
  18427. procedure setRXNEMPTYIF; inline;
  18428. procedure setRXOVFLIE; inline;
  18429. procedure setRXOVFLIF; inline;
  18430. procedure setTXEMPTYIE; inline;
  18431. procedure setTXEMPTYIF; inline;
  18432. procedure setTXHALFIE; inline;
  18433. procedure setTXHALFIF; inline;
  18434. procedure setTXNFULLIE; inline;
  18435. procedure setTXNFULLIF; inline;
  18436. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18437. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18438. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18439. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18440. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18441. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18442. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18443. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18444. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18445. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18446. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18447. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18448. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18449. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18450. property w : TBits_32 read getw write setw;
  18451. end;
  18452. TCAN1_C1FIFOCI14 = record
  18453. private
  18454. function getCFIFOCI : TBits_5; inline;
  18455. function getw : TBits_32; inline;
  18456. procedure setCFIFOCI(thebits : TBits_5); inline;
  18457. procedure setw(thebits : TBits_32); inline;
  18458. public
  18459. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18460. property w : TBits_32 read getw write setw;
  18461. end;
  18462. TCAN1_C1FIFOCON15 = record
  18463. private
  18464. function getDONLY : TBits_1; inline;
  18465. function getFRESET : TBits_1; inline;
  18466. function getFSIZE : TBits_5; inline;
  18467. function getRTREN : TBits_1; inline;
  18468. function getTXABAT : TBits_1; inline;
  18469. function getTXEN : TBits_1; inline;
  18470. function getTXERR : TBits_1; inline;
  18471. function getTXLARB : TBits_1; inline;
  18472. function getTXPRI : TBits_2; inline;
  18473. function getTXREQ : TBits_1; inline;
  18474. function getUINC : TBits_1; inline;
  18475. function getw : TBits_32; inline;
  18476. procedure setDONLY(thebits : TBits_1); inline;
  18477. procedure setFRESET(thebits : TBits_1); inline;
  18478. procedure setFSIZE(thebits : TBits_5); inline;
  18479. procedure setRTREN(thebits : TBits_1); inline;
  18480. procedure setTXABAT(thebits : TBits_1); inline;
  18481. procedure setTXEN(thebits : TBits_1); inline;
  18482. procedure setTXERR(thebits : TBits_1); inline;
  18483. procedure setTXLARB(thebits : TBits_1); inline;
  18484. procedure setTXPRI(thebits : TBits_2); inline;
  18485. procedure setTXREQ(thebits : TBits_1); inline;
  18486. procedure setUINC(thebits : TBits_1); inline;
  18487. procedure setw(thebits : TBits_32); inline;
  18488. public
  18489. procedure clearDONLY; inline;
  18490. procedure clearFRESET; inline;
  18491. procedure clearRTREN; inline;
  18492. procedure clearTXABAT; inline;
  18493. procedure clearTXEN; inline;
  18494. procedure clearTXERR; inline;
  18495. procedure clearTXLARB; inline;
  18496. procedure clearTXREQ; inline;
  18497. procedure clearUINC; inline;
  18498. procedure setDONLY; inline;
  18499. procedure setFRESET; inline;
  18500. procedure setRTREN; inline;
  18501. procedure setTXABAT; inline;
  18502. procedure setTXEN; inline;
  18503. procedure setTXERR; inline;
  18504. procedure setTXLARB; inline;
  18505. procedure setTXREQ; inline;
  18506. procedure setUINC; inline;
  18507. property DONLY : TBits_1 read getDONLY write setDONLY;
  18508. property FRESET : TBits_1 read getFRESET write setFRESET;
  18509. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18510. property RTREN : TBits_1 read getRTREN write setRTREN;
  18511. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18512. property TXEN : TBits_1 read getTXEN write setTXEN;
  18513. property TXERR : TBits_1 read getTXERR write setTXERR;
  18514. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18515. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18516. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18517. property UINC : TBits_1 read getUINC write setUINC;
  18518. property w : TBits_32 read getw write setw;
  18519. end;
  18520. TCAN1_C1FIFOINT15 = record
  18521. private
  18522. function getRXFULLIE : TBits_1; inline;
  18523. function getRXFULLIF : TBits_1; inline;
  18524. function getRXHALFIE : TBits_1; inline;
  18525. function getRXHALFIF : TBits_1; inline;
  18526. function getRXNEMPTYIE : TBits_1; inline;
  18527. function getRXNEMPTYIF : TBits_1; inline;
  18528. function getRXOVFLIE : TBits_1; inline;
  18529. function getRXOVFLIF : TBits_1; inline;
  18530. function getTXEMPTYIE : TBits_1; inline;
  18531. function getTXEMPTYIF : TBits_1; inline;
  18532. function getTXHALFIE : TBits_1; inline;
  18533. function getTXHALFIF : TBits_1; inline;
  18534. function getTXNFULLIE : TBits_1; inline;
  18535. function getTXNFULLIF : TBits_1; inline;
  18536. function getw : TBits_32; inline;
  18537. procedure setRXFULLIE(thebits : TBits_1); inline;
  18538. procedure setRXFULLIF(thebits : TBits_1); inline;
  18539. procedure setRXHALFIE(thebits : TBits_1); inline;
  18540. procedure setRXHALFIF(thebits : TBits_1); inline;
  18541. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18542. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18543. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18544. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18545. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18546. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18547. procedure setTXHALFIE(thebits : TBits_1); inline;
  18548. procedure setTXHALFIF(thebits : TBits_1); inline;
  18549. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18550. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18551. procedure setw(thebits : TBits_32); inline;
  18552. public
  18553. procedure clearRXFULLIE; inline;
  18554. procedure clearRXFULLIF; inline;
  18555. procedure clearRXHALFIE; inline;
  18556. procedure clearRXHALFIF; inline;
  18557. procedure clearRXNEMPTYIE; inline;
  18558. procedure clearRXNEMPTYIF; inline;
  18559. procedure clearRXOVFLIE; inline;
  18560. procedure clearRXOVFLIF; inline;
  18561. procedure clearTXEMPTYIE; inline;
  18562. procedure clearTXEMPTYIF; inline;
  18563. procedure clearTXHALFIE; inline;
  18564. procedure clearTXHALFIF; inline;
  18565. procedure clearTXNFULLIE; inline;
  18566. procedure clearTXNFULLIF; inline;
  18567. procedure setRXFULLIE; inline;
  18568. procedure setRXFULLIF; inline;
  18569. procedure setRXHALFIE; inline;
  18570. procedure setRXHALFIF; inline;
  18571. procedure setRXNEMPTYIE; inline;
  18572. procedure setRXNEMPTYIF; inline;
  18573. procedure setRXOVFLIE; inline;
  18574. procedure setRXOVFLIF; inline;
  18575. procedure setTXEMPTYIE; inline;
  18576. procedure setTXEMPTYIF; inline;
  18577. procedure setTXHALFIE; inline;
  18578. procedure setTXHALFIF; inline;
  18579. procedure setTXNFULLIE; inline;
  18580. procedure setTXNFULLIF; inline;
  18581. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18582. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18583. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18584. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18585. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18586. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18587. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18588. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18589. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18590. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18591. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18592. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18593. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18594. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18595. property w : TBits_32 read getw write setw;
  18596. end;
  18597. TCAN1_C1FIFOCI15 = record
  18598. private
  18599. function getCFIFOCI : TBits_5; inline;
  18600. function getw : TBits_32; inline;
  18601. procedure setCFIFOCI(thebits : TBits_5); inline;
  18602. procedure setw(thebits : TBits_32); inline;
  18603. public
  18604. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18605. property w : TBits_32 read getw write setw;
  18606. end;
  18607. TCAN1_C1FIFOCON16 = record
  18608. private
  18609. function getDONLY : TBits_1; inline;
  18610. function getFRESET : TBits_1; inline;
  18611. function getFSIZE : TBits_5; inline;
  18612. function getRTREN : TBits_1; inline;
  18613. function getTXABAT : TBits_1; inline;
  18614. function getTXEN : TBits_1; inline;
  18615. function getTXERR : TBits_1; inline;
  18616. function getTXLARB : TBits_1; inline;
  18617. function getTXPRI : TBits_2; inline;
  18618. function getTXREQ : TBits_1; inline;
  18619. function getUINC : TBits_1; inline;
  18620. function getw : TBits_32; inline;
  18621. procedure setDONLY(thebits : TBits_1); inline;
  18622. procedure setFRESET(thebits : TBits_1); inline;
  18623. procedure setFSIZE(thebits : TBits_5); inline;
  18624. procedure setRTREN(thebits : TBits_1); inline;
  18625. procedure setTXABAT(thebits : TBits_1); inline;
  18626. procedure setTXEN(thebits : TBits_1); inline;
  18627. procedure setTXERR(thebits : TBits_1); inline;
  18628. procedure setTXLARB(thebits : TBits_1); inline;
  18629. procedure setTXPRI(thebits : TBits_2); inline;
  18630. procedure setTXREQ(thebits : TBits_1); inline;
  18631. procedure setUINC(thebits : TBits_1); inline;
  18632. procedure setw(thebits : TBits_32); inline;
  18633. public
  18634. procedure clearDONLY; inline;
  18635. procedure clearFRESET; inline;
  18636. procedure clearRTREN; inline;
  18637. procedure clearTXABAT; inline;
  18638. procedure clearTXEN; inline;
  18639. procedure clearTXERR; inline;
  18640. procedure clearTXLARB; inline;
  18641. procedure clearTXREQ; inline;
  18642. procedure clearUINC; inline;
  18643. procedure setDONLY; inline;
  18644. procedure setFRESET; inline;
  18645. procedure setRTREN; inline;
  18646. procedure setTXABAT; inline;
  18647. procedure setTXEN; inline;
  18648. procedure setTXERR; inline;
  18649. procedure setTXLARB; inline;
  18650. procedure setTXREQ; inline;
  18651. procedure setUINC; inline;
  18652. property DONLY : TBits_1 read getDONLY write setDONLY;
  18653. property FRESET : TBits_1 read getFRESET write setFRESET;
  18654. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18655. property RTREN : TBits_1 read getRTREN write setRTREN;
  18656. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18657. property TXEN : TBits_1 read getTXEN write setTXEN;
  18658. property TXERR : TBits_1 read getTXERR write setTXERR;
  18659. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18660. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18661. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18662. property UINC : TBits_1 read getUINC write setUINC;
  18663. property w : TBits_32 read getw write setw;
  18664. end;
  18665. TCAN1_C1FIFOINT16 = record
  18666. private
  18667. function getRXFULLIE : TBits_1; inline;
  18668. function getRXFULLIF : TBits_1; inline;
  18669. function getRXHALFIE : TBits_1; inline;
  18670. function getRXHALFIF : TBits_1; inline;
  18671. function getRXNEMPTYIE : TBits_1; inline;
  18672. function getRXNEMPTYIF : TBits_1; inline;
  18673. function getRXOVFLIE : TBits_1; inline;
  18674. function getRXOVFLIF : TBits_1; inline;
  18675. function getTXEMPTYIE : TBits_1; inline;
  18676. function getTXEMPTYIF : TBits_1; inline;
  18677. function getTXHALFIE : TBits_1; inline;
  18678. function getTXHALFIF : TBits_1; inline;
  18679. function getTXNFULLIE : TBits_1; inline;
  18680. function getTXNFULLIF : TBits_1; inline;
  18681. function getw : TBits_32; inline;
  18682. procedure setRXFULLIE(thebits : TBits_1); inline;
  18683. procedure setRXFULLIF(thebits : TBits_1); inline;
  18684. procedure setRXHALFIE(thebits : TBits_1); inline;
  18685. procedure setRXHALFIF(thebits : TBits_1); inline;
  18686. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18687. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18688. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18689. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18690. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18691. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18692. procedure setTXHALFIE(thebits : TBits_1); inline;
  18693. procedure setTXHALFIF(thebits : TBits_1); inline;
  18694. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18695. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18696. procedure setw(thebits : TBits_32); inline;
  18697. public
  18698. procedure clearRXFULLIE; inline;
  18699. procedure clearRXFULLIF; inline;
  18700. procedure clearRXHALFIE; inline;
  18701. procedure clearRXHALFIF; inline;
  18702. procedure clearRXNEMPTYIE; inline;
  18703. procedure clearRXNEMPTYIF; inline;
  18704. procedure clearRXOVFLIE; inline;
  18705. procedure clearRXOVFLIF; inline;
  18706. procedure clearTXEMPTYIE; inline;
  18707. procedure clearTXEMPTYIF; inline;
  18708. procedure clearTXHALFIE; inline;
  18709. procedure clearTXHALFIF; inline;
  18710. procedure clearTXNFULLIE; inline;
  18711. procedure clearTXNFULLIF; inline;
  18712. procedure setRXFULLIE; inline;
  18713. procedure setRXFULLIF; inline;
  18714. procedure setRXHALFIE; inline;
  18715. procedure setRXHALFIF; inline;
  18716. procedure setRXNEMPTYIE; inline;
  18717. procedure setRXNEMPTYIF; inline;
  18718. procedure setRXOVFLIE; inline;
  18719. procedure setRXOVFLIF; inline;
  18720. procedure setTXEMPTYIE; inline;
  18721. procedure setTXEMPTYIF; inline;
  18722. procedure setTXHALFIE; inline;
  18723. procedure setTXHALFIF; inline;
  18724. procedure setTXNFULLIE; inline;
  18725. procedure setTXNFULLIF; inline;
  18726. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18727. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18728. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18729. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18730. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18731. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18732. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18733. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18734. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18735. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18736. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18737. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18738. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18739. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18740. property w : TBits_32 read getw write setw;
  18741. end;
  18742. TCAN1_C1FIFOCI16 = record
  18743. private
  18744. function getCFIFOCI : TBits_5; inline;
  18745. function getw : TBits_32; inline;
  18746. procedure setCFIFOCI(thebits : TBits_5); inline;
  18747. procedure setw(thebits : TBits_32); inline;
  18748. public
  18749. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18750. property w : TBits_32 read getw write setw;
  18751. end;
  18752. TCAN1_C1FIFOCON17 = record
  18753. private
  18754. function getDONLY : TBits_1; inline;
  18755. function getFRESET : TBits_1; inline;
  18756. function getFSIZE : TBits_5; inline;
  18757. function getRTREN : TBits_1; inline;
  18758. function getTXABAT : TBits_1; inline;
  18759. function getTXEN : TBits_1; inline;
  18760. function getTXERR : TBits_1; inline;
  18761. function getTXLARB : TBits_1; inline;
  18762. function getTXPRI : TBits_2; inline;
  18763. function getTXREQ : TBits_1; inline;
  18764. function getUINC : TBits_1; inline;
  18765. function getw : TBits_32; inline;
  18766. procedure setDONLY(thebits : TBits_1); inline;
  18767. procedure setFRESET(thebits : TBits_1); inline;
  18768. procedure setFSIZE(thebits : TBits_5); inline;
  18769. procedure setRTREN(thebits : TBits_1); inline;
  18770. procedure setTXABAT(thebits : TBits_1); inline;
  18771. procedure setTXEN(thebits : TBits_1); inline;
  18772. procedure setTXERR(thebits : TBits_1); inline;
  18773. procedure setTXLARB(thebits : TBits_1); inline;
  18774. procedure setTXPRI(thebits : TBits_2); inline;
  18775. procedure setTXREQ(thebits : TBits_1); inline;
  18776. procedure setUINC(thebits : TBits_1); inline;
  18777. procedure setw(thebits : TBits_32); inline;
  18778. public
  18779. procedure clearDONLY; inline;
  18780. procedure clearFRESET; inline;
  18781. procedure clearRTREN; inline;
  18782. procedure clearTXABAT; inline;
  18783. procedure clearTXEN; inline;
  18784. procedure clearTXERR; inline;
  18785. procedure clearTXLARB; inline;
  18786. procedure clearTXREQ; inline;
  18787. procedure clearUINC; inline;
  18788. procedure setDONLY; inline;
  18789. procedure setFRESET; inline;
  18790. procedure setRTREN; inline;
  18791. procedure setTXABAT; inline;
  18792. procedure setTXEN; inline;
  18793. procedure setTXERR; inline;
  18794. procedure setTXLARB; inline;
  18795. procedure setTXREQ; inline;
  18796. procedure setUINC; inline;
  18797. property DONLY : TBits_1 read getDONLY write setDONLY;
  18798. property FRESET : TBits_1 read getFRESET write setFRESET;
  18799. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18800. property RTREN : TBits_1 read getRTREN write setRTREN;
  18801. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18802. property TXEN : TBits_1 read getTXEN write setTXEN;
  18803. property TXERR : TBits_1 read getTXERR write setTXERR;
  18804. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18805. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18806. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18807. property UINC : TBits_1 read getUINC write setUINC;
  18808. property w : TBits_32 read getw write setw;
  18809. end;
  18810. TCAN1_C1FIFOINT17 = record
  18811. private
  18812. function getRXFULLIE : TBits_1; inline;
  18813. function getRXFULLIF : TBits_1; inline;
  18814. function getRXHALFIE : TBits_1; inline;
  18815. function getRXHALFIF : TBits_1; inline;
  18816. function getRXNEMPTYIE : TBits_1; inline;
  18817. function getRXNEMPTYIF : TBits_1; inline;
  18818. function getRXOVFLIE : TBits_1; inline;
  18819. function getRXOVFLIF : TBits_1; inline;
  18820. function getTXEMPTYIE : TBits_1; inline;
  18821. function getTXEMPTYIF : TBits_1; inline;
  18822. function getTXHALFIE : TBits_1; inline;
  18823. function getTXHALFIF : TBits_1; inline;
  18824. function getTXNFULLIE : TBits_1; inline;
  18825. function getTXNFULLIF : TBits_1; inline;
  18826. function getw : TBits_32; inline;
  18827. procedure setRXFULLIE(thebits : TBits_1); inline;
  18828. procedure setRXFULLIF(thebits : TBits_1); inline;
  18829. procedure setRXHALFIE(thebits : TBits_1); inline;
  18830. procedure setRXHALFIF(thebits : TBits_1); inline;
  18831. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18832. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18833. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18834. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18835. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18836. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18837. procedure setTXHALFIE(thebits : TBits_1); inline;
  18838. procedure setTXHALFIF(thebits : TBits_1); inline;
  18839. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18840. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18841. procedure setw(thebits : TBits_32); inline;
  18842. public
  18843. procedure clearRXFULLIE; inline;
  18844. procedure clearRXFULLIF; inline;
  18845. procedure clearRXHALFIE; inline;
  18846. procedure clearRXHALFIF; inline;
  18847. procedure clearRXNEMPTYIE; inline;
  18848. procedure clearRXNEMPTYIF; inline;
  18849. procedure clearRXOVFLIE; inline;
  18850. procedure clearRXOVFLIF; inline;
  18851. procedure clearTXEMPTYIE; inline;
  18852. procedure clearTXEMPTYIF; inline;
  18853. procedure clearTXHALFIE; inline;
  18854. procedure clearTXHALFIF; inline;
  18855. procedure clearTXNFULLIE; inline;
  18856. procedure clearTXNFULLIF; inline;
  18857. procedure setRXFULLIE; inline;
  18858. procedure setRXFULLIF; inline;
  18859. procedure setRXHALFIE; inline;
  18860. procedure setRXHALFIF; inline;
  18861. procedure setRXNEMPTYIE; inline;
  18862. procedure setRXNEMPTYIF; inline;
  18863. procedure setRXOVFLIE; inline;
  18864. procedure setRXOVFLIF; inline;
  18865. procedure setTXEMPTYIE; inline;
  18866. procedure setTXEMPTYIF; inline;
  18867. procedure setTXHALFIE; inline;
  18868. procedure setTXHALFIF; inline;
  18869. procedure setTXNFULLIE; inline;
  18870. procedure setTXNFULLIF; inline;
  18871. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18872. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18873. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18874. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18875. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18876. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18877. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18878. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18879. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18880. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18881. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18882. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18883. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18884. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18885. property w : TBits_32 read getw write setw;
  18886. end;
  18887. TCAN1_C1FIFOCI17 = record
  18888. private
  18889. function getCFIFOCI : TBits_5; inline;
  18890. function getw : TBits_32; inline;
  18891. procedure setCFIFOCI(thebits : TBits_5); inline;
  18892. procedure setw(thebits : TBits_32); inline;
  18893. public
  18894. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18895. property w : TBits_32 read getw write setw;
  18896. end;
  18897. TCAN1_C1FIFOCON18 = record
  18898. private
  18899. function getDONLY : TBits_1; inline;
  18900. function getFRESET : TBits_1; inline;
  18901. function getFSIZE : TBits_5; inline;
  18902. function getRTREN : TBits_1; inline;
  18903. function getTXABAT : TBits_1; inline;
  18904. function getTXEN : TBits_1; inline;
  18905. function getTXERR : TBits_1; inline;
  18906. function getTXLARB : TBits_1; inline;
  18907. function getTXPRI : TBits_2; inline;
  18908. function getTXREQ : TBits_1; inline;
  18909. function getUINC : TBits_1; inline;
  18910. function getw : TBits_32; inline;
  18911. procedure setDONLY(thebits : TBits_1); inline;
  18912. procedure setFRESET(thebits : TBits_1); inline;
  18913. procedure setFSIZE(thebits : TBits_5); inline;
  18914. procedure setRTREN(thebits : TBits_1); inline;
  18915. procedure setTXABAT(thebits : TBits_1); inline;
  18916. procedure setTXEN(thebits : TBits_1); inline;
  18917. procedure setTXERR(thebits : TBits_1); inline;
  18918. procedure setTXLARB(thebits : TBits_1); inline;
  18919. procedure setTXPRI(thebits : TBits_2); inline;
  18920. procedure setTXREQ(thebits : TBits_1); inline;
  18921. procedure setUINC(thebits : TBits_1); inline;
  18922. procedure setw(thebits : TBits_32); inline;
  18923. public
  18924. procedure clearDONLY; inline;
  18925. procedure clearFRESET; inline;
  18926. procedure clearRTREN; inline;
  18927. procedure clearTXABAT; inline;
  18928. procedure clearTXEN; inline;
  18929. procedure clearTXERR; inline;
  18930. procedure clearTXLARB; inline;
  18931. procedure clearTXREQ; inline;
  18932. procedure clearUINC; inline;
  18933. procedure setDONLY; inline;
  18934. procedure setFRESET; inline;
  18935. procedure setRTREN; inline;
  18936. procedure setTXABAT; inline;
  18937. procedure setTXEN; inline;
  18938. procedure setTXERR; inline;
  18939. procedure setTXLARB; inline;
  18940. procedure setTXREQ; inline;
  18941. procedure setUINC; inline;
  18942. property DONLY : TBits_1 read getDONLY write setDONLY;
  18943. property FRESET : TBits_1 read getFRESET write setFRESET;
  18944. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18945. property RTREN : TBits_1 read getRTREN write setRTREN;
  18946. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18947. property TXEN : TBits_1 read getTXEN write setTXEN;
  18948. property TXERR : TBits_1 read getTXERR write setTXERR;
  18949. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18950. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18951. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18952. property UINC : TBits_1 read getUINC write setUINC;
  18953. property w : TBits_32 read getw write setw;
  18954. end;
  18955. TCAN1_C1FIFOINT18 = record
  18956. private
  18957. function getRXFULLIE : TBits_1; inline;
  18958. function getRXFULLIF : TBits_1; inline;
  18959. function getRXHALFIE : TBits_1; inline;
  18960. function getRXHALFIF : TBits_1; inline;
  18961. function getRXNEMPTYIE : TBits_1; inline;
  18962. function getRXNEMPTYIF : TBits_1; inline;
  18963. function getRXOVFLIE : TBits_1; inline;
  18964. function getRXOVFLIF : TBits_1; inline;
  18965. function getTXEMPTYIE : TBits_1; inline;
  18966. function getTXEMPTYIF : TBits_1; inline;
  18967. function getTXHALFIE : TBits_1; inline;
  18968. function getTXHALFIF : TBits_1; inline;
  18969. function getTXNFULLIE : TBits_1; inline;
  18970. function getTXNFULLIF : TBits_1; inline;
  18971. function getw : TBits_32; inline;
  18972. procedure setRXFULLIE(thebits : TBits_1); inline;
  18973. procedure setRXFULLIF(thebits : TBits_1); inline;
  18974. procedure setRXHALFIE(thebits : TBits_1); inline;
  18975. procedure setRXHALFIF(thebits : TBits_1); inline;
  18976. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18977. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18978. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18979. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18980. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18981. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18982. procedure setTXHALFIE(thebits : TBits_1); inline;
  18983. procedure setTXHALFIF(thebits : TBits_1); inline;
  18984. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18985. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18986. procedure setw(thebits : TBits_32); inline;
  18987. public
  18988. procedure clearRXFULLIE; inline;
  18989. procedure clearRXFULLIF; inline;
  18990. procedure clearRXHALFIE; inline;
  18991. procedure clearRXHALFIF; inline;
  18992. procedure clearRXNEMPTYIE; inline;
  18993. procedure clearRXNEMPTYIF; inline;
  18994. procedure clearRXOVFLIE; inline;
  18995. procedure clearRXOVFLIF; inline;
  18996. procedure clearTXEMPTYIE; inline;
  18997. procedure clearTXEMPTYIF; inline;
  18998. procedure clearTXHALFIE; inline;
  18999. procedure clearTXHALFIF; inline;
  19000. procedure clearTXNFULLIE; inline;
  19001. procedure clearTXNFULLIF; inline;
  19002. procedure setRXFULLIE; inline;
  19003. procedure setRXFULLIF; inline;
  19004. procedure setRXHALFIE; inline;
  19005. procedure setRXHALFIF; inline;
  19006. procedure setRXNEMPTYIE; inline;
  19007. procedure setRXNEMPTYIF; inline;
  19008. procedure setRXOVFLIE; inline;
  19009. procedure setRXOVFLIF; inline;
  19010. procedure setTXEMPTYIE; inline;
  19011. procedure setTXEMPTYIF; inline;
  19012. procedure setTXHALFIE; inline;
  19013. procedure setTXHALFIF; inline;
  19014. procedure setTXNFULLIE; inline;
  19015. procedure setTXNFULLIF; inline;
  19016. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19017. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19018. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19019. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19020. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19021. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19022. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19023. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19024. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19025. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19026. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19027. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19028. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19029. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19030. property w : TBits_32 read getw write setw;
  19031. end;
  19032. TCAN1_C1FIFOCI18 = record
  19033. private
  19034. function getCFIFOCI : TBits_5; inline;
  19035. function getw : TBits_32; inline;
  19036. procedure setCFIFOCI(thebits : TBits_5); inline;
  19037. procedure setw(thebits : TBits_32); inline;
  19038. public
  19039. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19040. property w : TBits_32 read getw write setw;
  19041. end;
  19042. TCAN1_C1FIFOCON19 = record
  19043. private
  19044. function getDONLY : TBits_1; inline;
  19045. function getFRESET : TBits_1; inline;
  19046. function getFSIZE : TBits_5; inline;
  19047. function getRTREN : TBits_1; inline;
  19048. function getTXABAT : TBits_1; inline;
  19049. function getTXEN : TBits_1; inline;
  19050. function getTXERR : TBits_1; inline;
  19051. function getTXLARB : TBits_1; inline;
  19052. function getTXPRI : TBits_2; inline;
  19053. function getTXREQ : TBits_1; inline;
  19054. function getUINC : TBits_1; inline;
  19055. function getw : TBits_32; inline;
  19056. procedure setDONLY(thebits : TBits_1); inline;
  19057. procedure setFRESET(thebits : TBits_1); inline;
  19058. procedure setFSIZE(thebits : TBits_5); inline;
  19059. procedure setRTREN(thebits : TBits_1); inline;
  19060. procedure setTXABAT(thebits : TBits_1); inline;
  19061. procedure setTXEN(thebits : TBits_1); inline;
  19062. procedure setTXERR(thebits : TBits_1); inline;
  19063. procedure setTXLARB(thebits : TBits_1); inline;
  19064. procedure setTXPRI(thebits : TBits_2); inline;
  19065. procedure setTXREQ(thebits : TBits_1); inline;
  19066. procedure setUINC(thebits : TBits_1); inline;
  19067. procedure setw(thebits : TBits_32); inline;
  19068. public
  19069. procedure clearDONLY; inline;
  19070. procedure clearFRESET; inline;
  19071. procedure clearRTREN; inline;
  19072. procedure clearTXABAT; inline;
  19073. procedure clearTXEN; inline;
  19074. procedure clearTXERR; inline;
  19075. procedure clearTXLARB; inline;
  19076. procedure clearTXREQ; inline;
  19077. procedure clearUINC; inline;
  19078. procedure setDONLY; inline;
  19079. procedure setFRESET; inline;
  19080. procedure setRTREN; inline;
  19081. procedure setTXABAT; inline;
  19082. procedure setTXEN; inline;
  19083. procedure setTXERR; inline;
  19084. procedure setTXLARB; inline;
  19085. procedure setTXREQ; inline;
  19086. procedure setUINC; inline;
  19087. property DONLY : TBits_1 read getDONLY write setDONLY;
  19088. property FRESET : TBits_1 read getFRESET write setFRESET;
  19089. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19090. property RTREN : TBits_1 read getRTREN write setRTREN;
  19091. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19092. property TXEN : TBits_1 read getTXEN write setTXEN;
  19093. property TXERR : TBits_1 read getTXERR write setTXERR;
  19094. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19095. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19096. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19097. property UINC : TBits_1 read getUINC write setUINC;
  19098. property w : TBits_32 read getw write setw;
  19099. end;
  19100. TCAN1_C1FIFOINT19 = record
  19101. private
  19102. function getRXFULLIE : TBits_1; inline;
  19103. function getRXFULLIF : TBits_1; inline;
  19104. function getRXHALFIE : TBits_1; inline;
  19105. function getRXHALFIF : TBits_1; inline;
  19106. function getRXNEMPTYIE : TBits_1; inline;
  19107. function getRXNEMPTYIF : TBits_1; inline;
  19108. function getRXOVFLIE : TBits_1; inline;
  19109. function getRXOVFLIF : TBits_1; inline;
  19110. function getTXEMPTYIE : TBits_1; inline;
  19111. function getTXEMPTYIF : TBits_1; inline;
  19112. function getTXHALFIE : TBits_1; inline;
  19113. function getTXHALFIF : TBits_1; inline;
  19114. function getTXNFULLIE : TBits_1; inline;
  19115. function getTXNFULLIF : TBits_1; inline;
  19116. function getw : TBits_32; inline;
  19117. procedure setRXFULLIE(thebits : TBits_1); inline;
  19118. procedure setRXFULLIF(thebits : TBits_1); inline;
  19119. procedure setRXHALFIE(thebits : TBits_1); inline;
  19120. procedure setRXHALFIF(thebits : TBits_1); inline;
  19121. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19122. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19123. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19124. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19125. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19126. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19127. procedure setTXHALFIE(thebits : TBits_1); inline;
  19128. procedure setTXHALFIF(thebits : TBits_1); inline;
  19129. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19130. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19131. procedure setw(thebits : TBits_32); inline;
  19132. public
  19133. procedure clearRXFULLIE; inline;
  19134. procedure clearRXFULLIF; inline;
  19135. procedure clearRXHALFIE; inline;
  19136. procedure clearRXHALFIF; inline;
  19137. procedure clearRXNEMPTYIE; inline;
  19138. procedure clearRXNEMPTYIF; inline;
  19139. procedure clearRXOVFLIE; inline;
  19140. procedure clearRXOVFLIF; inline;
  19141. procedure clearTXEMPTYIE; inline;
  19142. procedure clearTXEMPTYIF; inline;
  19143. procedure clearTXHALFIE; inline;
  19144. procedure clearTXHALFIF; inline;
  19145. procedure clearTXNFULLIE; inline;
  19146. procedure clearTXNFULLIF; inline;
  19147. procedure setRXFULLIE; inline;
  19148. procedure setRXFULLIF; inline;
  19149. procedure setRXHALFIE; inline;
  19150. procedure setRXHALFIF; inline;
  19151. procedure setRXNEMPTYIE; inline;
  19152. procedure setRXNEMPTYIF; inline;
  19153. procedure setRXOVFLIE; inline;
  19154. procedure setRXOVFLIF; inline;
  19155. procedure setTXEMPTYIE; inline;
  19156. procedure setTXEMPTYIF; inline;
  19157. procedure setTXHALFIE; inline;
  19158. procedure setTXHALFIF; inline;
  19159. procedure setTXNFULLIE; inline;
  19160. procedure setTXNFULLIF; inline;
  19161. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19162. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19163. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19164. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19165. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19166. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19167. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19168. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19169. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19170. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19171. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19172. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19173. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19174. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19175. property w : TBits_32 read getw write setw;
  19176. end;
  19177. TCAN1_C1FIFOCI19 = record
  19178. private
  19179. function getCFIFOCI : TBits_5; inline;
  19180. function getw : TBits_32; inline;
  19181. procedure setCFIFOCI(thebits : TBits_5); inline;
  19182. procedure setw(thebits : TBits_32); inline;
  19183. public
  19184. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19185. property w : TBits_32 read getw write setw;
  19186. end;
  19187. TCAN1_C1FIFOCON20 = record
  19188. private
  19189. function getDONLY : TBits_1; inline;
  19190. function getFRESET : TBits_1; inline;
  19191. function getFSIZE : TBits_5; inline;
  19192. function getRTREN : TBits_1; inline;
  19193. function getTXABAT : TBits_1; inline;
  19194. function getTXEN : TBits_1; inline;
  19195. function getTXERR : TBits_1; inline;
  19196. function getTXLARB : TBits_1; inline;
  19197. function getTXPRI : TBits_2; inline;
  19198. function getTXREQ : TBits_1; inline;
  19199. function getUINC : TBits_1; inline;
  19200. function getw : TBits_32; inline;
  19201. procedure setDONLY(thebits : TBits_1); inline;
  19202. procedure setFRESET(thebits : TBits_1); inline;
  19203. procedure setFSIZE(thebits : TBits_5); inline;
  19204. procedure setRTREN(thebits : TBits_1); inline;
  19205. procedure setTXABAT(thebits : TBits_1); inline;
  19206. procedure setTXEN(thebits : TBits_1); inline;
  19207. procedure setTXERR(thebits : TBits_1); inline;
  19208. procedure setTXLARB(thebits : TBits_1); inline;
  19209. procedure setTXPRI(thebits : TBits_2); inline;
  19210. procedure setTXREQ(thebits : TBits_1); inline;
  19211. procedure setUINC(thebits : TBits_1); inline;
  19212. procedure setw(thebits : TBits_32); inline;
  19213. public
  19214. procedure clearDONLY; inline;
  19215. procedure clearFRESET; inline;
  19216. procedure clearRTREN; inline;
  19217. procedure clearTXABAT; inline;
  19218. procedure clearTXEN; inline;
  19219. procedure clearTXERR; inline;
  19220. procedure clearTXLARB; inline;
  19221. procedure clearTXREQ; inline;
  19222. procedure clearUINC; inline;
  19223. procedure setDONLY; inline;
  19224. procedure setFRESET; inline;
  19225. procedure setRTREN; inline;
  19226. procedure setTXABAT; inline;
  19227. procedure setTXEN; inline;
  19228. procedure setTXERR; inline;
  19229. procedure setTXLARB; inline;
  19230. procedure setTXREQ; inline;
  19231. procedure setUINC; inline;
  19232. property DONLY : TBits_1 read getDONLY write setDONLY;
  19233. property FRESET : TBits_1 read getFRESET write setFRESET;
  19234. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19235. property RTREN : TBits_1 read getRTREN write setRTREN;
  19236. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19237. property TXEN : TBits_1 read getTXEN write setTXEN;
  19238. property TXERR : TBits_1 read getTXERR write setTXERR;
  19239. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19240. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19241. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19242. property UINC : TBits_1 read getUINC write setUINC;
  19243. property w : TBits_32 read getw write setw;
  19244. end;
  19245. TCAN1_C1FIFOINT20 = record
  19246. private
  19247. function getRXFULLIE : TBits_1; inline;
  19248. function getRXFULLIF : TBits_1; inline;
  19249. function getRXHALFIE : TBits_1; inline;
  19250. function getRXHALFIF : TBits_1; inline;
  19251. function getRXNEMPTYIE : TBits_1; inline;
  19252. function getRXNEMPTYIF : TBits_1; inline;
  19253. function getRXOVFLIE : TBits_1; inline;
  19254. function getRXOVFLIF : TBits_1; inline;
  19255. function getTXEMPTYIE : TBits_1; inline;
  19256. function getTXEMPTYIF : TBits_1; inline;
  19257. function getTXHALFIE : TBits_1; inline;
  19258. function getTXHALFIF : TBits_1; inline;
  19259. function getTXNFULLIE : TBits_1; inline;
  19260. function getTXNFULLIF : TBits_1; inline;
  19261. function getw : TBits_32; inline;
  19262. procedure setRXFULLIE(thebits : TBits_1); inline;
  19263. procedure setRXFULLIF(thebits : TBits_1); inline;
  19264. procedure setRXHALFIE(thebits : TBits_1); inline;
  19265. procedure setRXHALFIF(thebits : TBits_1); inline;
  19266. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19267. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19268. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19269. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19270. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19271. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19272. procedure setTXHALFIE(thebits : TBits_1); inline;
  19273. procedure setTXHALFIF(thebits : TBits_1); inline;
  19274. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19275. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19276. procedure setw(thebits : TBits_32); inline;
  19277. public
  19278. procedure clearRXFULLIE; inline;
  19279. procedure clearRXFULLIF; inline;
  19280. procedure clearRXHALFIE; inline;
  19281. procedure clearRXHALFIF; inline;
  19282. procedure clearRXNEMPTYIE; inline;
  19283. procedure clearRXNEMPTYIF; inline;
  19284. procedure clearRXOVFLIE; inline;
  19285. procedure clearRXOVFLIF; inline;
  19286. procedure clearTXEMPTYIE; inline;
  19287. procedure clearTXEMPTYIF; inline;
  19288. procedure clearTXHALFIE; inline;
  19289. procedure clearTXHALFIF; inline;
  19290. procedure clearTXNFULLIE; inline;
  19291. procedure clearTXNFULLIF; inline;
  19292. procedure setRXFULLIE; inline;
  19293. procedure setRXFULLIF; inline;
  19294. procedure setRXHALFIE; inline;
  19295. procedure setRXHALFIF; inline;
  19296. procedure setRXNEMPTYIE; inline;
  19297. procedure setRXNEMPTYIF; inline;
  19298. procedure setRXOVFLIE; inline;
  19299. procedure setRXOVFLIF; inline;
  19300. procedure setTXEMPTYIE; inline;
  19301. procedure setTXEMPTYIF; inline;
  19302. procedure setTXHALFIE; inline;
  19303. procedure setTXHALFIF; inline;
  19304. procedure setTXNFULLIE; inline;
  19305. procedure setTXNFULLIF; inline;
  19306. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19307. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19308. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19309. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19310. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19311. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19312. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19313. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19314. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19315. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19316. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19317. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19318. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19319. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19320. property w : TBits_32 read getw write setw;
  19321. end;
  19322. TCAN1_C1FIFOCI20 = record
  19323. private
  19324. function getCFIFOCI : TBits_5; inline;
  19325. function getw : TBits_32; inline;
  19326. procedure setCFIFOCI(thebits : TBits_5); inline;
  19327. procedure setw(thebits : TBits_32); inline;
  19328. public
  19329. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19330. property w : TBits_32 read getw write setw;
  19331. end;
  19332. TCAN1_C1FIFOCON21 = record
  19333. private
  19334. function getDONLY : TBits_1; inline;
  19335. function getFRESET : TBits_1; inline;
  19336. function getFSIZE : TBits_5; inline;
  19337. function getRTREN : TBits_1; inline;
  19338. function getTXABAT : TBits_1; inline;
  19339. function getTXEN : TBits_1; inline;
  19340. function getTXERR : TBits_1; inline;
  19341. function getTXLARB : TBits_1; inline;
  19342. function getTXPRI : TBits_2; inline;
  19343. function getTXREQ : TBits_1; inline;
  19344. function getUINC : TBits_1; inline;
  19345. function getw : TBits_32; inline;
  19346. procedure setDONLY(thebits : TBits_1); inline;
  19347. procedure setFRESET(thebits : TBits_1); inline;
  19348. procedure setFSIZE(thebits : TBits_5); inline;
  19349. procedure setRTREN(thebits : TBits_1); inline;
  19350. procedure setTXABAT(thebits : TBits_1); inline;
  19351. procedure setTXEN(thebits : TBits_1); inline;
  19352. procedure setTXERR(thebits : TBits_1); inline;
  19353. procedure setTXLARB(thebits : TBits_1); inline;
  19354. procedure setTXPRI(thebits : TBits_2); inline;
  19355. procedure setTXREQ(thebits : TBits_1); inline;
  19356. procedure setUINC(thebits : TBits_1); inline;
  19357. procedure setw(thebits : TBits_32); inline;
  19358. public
  19359. procedure clearDONLY; inline;
  19360. procedure clearFRESET; inline;
  19361. procedure clearRTREN; inline;
  19362. procedure clearTXABAT; inline;
  19363. procedure clearTXEN; inline;
  19364. procedure clearTXERR; inline;
  19365. procedure clearTXLARB; inline;
  19366. procedure clearTXREQ; inline;
  19367. procedure clearUINC; inline;
  19368. procedure setDONLY; inline;
  19369. procedure setFRESET; inline;
  19370. procedure setRTREN; inline;
  19371. procedure setTXABAT; inline;
  19372. procedure setTXEN; inline;
  19373. procedure setTXERR; inline;
  19374. procedure setTXLARB; inline;
  19375. procedure setTXREQ; inline;
  19376. procedure setUINC; inline;
  19377. property DONLY : TBits_1 read getDONLY write setDONLY;
  19378. property FRESET : TBits_1 read getFRESET write setFRESET;
  19379. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19380. property RTREN : TBits_1 read getRTREN write setRTREN;
  19381. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19382. property TXEN : TBits_1 read getTXEN write setTXEN;
  19383. property TXERR : TBits_1 read getTXERR write setTXERR;
  19384. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19385. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19386. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19387. property UINC : TBits_1 read getUINC write setUINC;
  19388. property w : TBits_32 read getw write setw;
  19389. end;
  19390. TCAN1_C1FIFOINT21 = record
  19391. private
  19392. function getRXFULLIE : TBits_1; inline;
  19393. function getRXFULLIF : TBits_1; inline;
  19394. function getRXHALFIE : TBits_1; inline;
  19395. function getRXHALFIF : TBits_1; inline;
  19396. function getRXNEMPTYIE : TBits_1; inline;
  19397. function getRXNEMPTYIF : TBits_1; inline;
  19398. function getRXOVFLIE : TBits_1; inline;
  19399. function getRXOVFLIF : TBits_1; inline;
  19400. function getTXEMPTYIE : TBits_1; inline;
  19401. function getTXEMPTYIF : TBits_1; inline;
  19402. function getTXHALFIE : TBits_1; inline;
  19403. function getTXHALFIF : TBits_1; inline;
  19404. function getTXNFULLIE : TBits_1; inline;
  19405. function getTXNFULLIF : TBits_1; inline;
  19406. function getw : TBits_32; inline;
  19407. procedure setRXFULLIE(thebits : TBits_1); inline;
  19408. procedure setRXFULLIF(thebits : TBits_1); inline;
  19409. procedure setRXHALFIE(thebits : TBits_1); inline;
  19410. procedure setRXHALFIF(thebits : TBits_1); inline;
  19411. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19412. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19413. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19414. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19415. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19416. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19417. procedure setTXHALFIE(thebits : TBits_1); inline;
  19418. procedure setTXHALFIF(thebits : TBits_1); inline;
  19419. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19420. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19421. procedure setw(thebits : TBits_32); inline;
  19422. public
  19423. procedure clearRXFULLIE; inline;
  19424. procedure clearRXFULLIF; inline;
  19425. procedure clearRXHALFIE; inline;
  19426. procedure clearRXHALFIF; inline;
  19427. procedure clearRXNEMPTYIE; inline;
  19428. procedure clearRXNEMPTYIF; inline;
  19429. procedure clearRXOVFLIE; inline;
  19430. procedure clearRXOVFLIF; inline;
  19431. procedure clearTXEMPTYIE; inline;
  19432. procedure clearTXEMPTYIF; inline;
  19433. procedure clearTXHALFIE; inline;
  19434. procedure clearTXHALFIF; inline;
  19435. procedure clearTXNFULLIE; inline;
  19436. procedure clearTXNFULLIF; inline;
  19437. procedure setRXFULLIE; inline;
  19438. procedure setRXFULLIF; inline;
  19439. procedure setRXHALFIE; inline;
  19440. procedure setRXHALFIF; inline;
  19441. procedure setRXNEMPTYIE; inline;
  19442. procedure setRXNEMPTYIF; inline;
  19443. procedure setRXOVFLIE; inline;
  19444. procedure setRXOVFLIF; inline;
  19445. procedure setTXEMPTYIE; inline;
  19446. procedure setTXEMPTYIF; inline;
  19447. procedure setTXHALFIE; inline;
  19448. procedure setTXHALFIF; inline;
  19449. procedure setTXNFULLIE; inline;
  19450. procedure setTXNFULLIF; inline;
  19451. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19452. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19453. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19454. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19455. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19456. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19457. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19458. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19459. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19460. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19461. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19462. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19463. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19464. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19465. property w : TBits_32 read getw write setw;
  19466. end;
  19467. TCAN1_C1FIFOCI21 = record
  19468. private
  19469. function getCFIFOCI : TBits_5; inline;
  19470. function getw : TBits_32; inline;
  19471. procedure setCFIFOCI(thebits : TBits_5); inline;
  19472. procedure setw(thebits : TBits_32); inline;
  19473. public
  19474. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19475. property w : TBits_32 read getw write setw;
  19476. end;
  19477. TCAN1_C1FIFOCON22 = record
  19478. private
  19479. function getDONLY : TBits_1; inline;
  19480. function getFRESET : TBits_1; inline;
  19481. function getFSIZE : TBits_5; inline;
  19482. function getRTREN : TBits_1; inline;
  19483. function getTXABAT : TBits_1; inline;
  19484. function getTXEN : TBits_1; inline;
  19485. function getTXERR : TBits_1; inline;
  19486. function getTXLARB : TBits_1; inline;
  19487. function getTXPRI : TBits_2; inline;
  19488. function getTXREQ : TBits_1; inline;
  19489. function getUINC : TBits_1; inline;
  19490. function getw : TBits_32; inline;
  19491. procedure setDONLY(thebits : TBits_1); inline;
  19492. procedure setFRESET(thebits : TBits_1); inline;
  19493. procedure setFSIZE(thebits : TBits_5); inline;
  19494. procedure setRTREN(thebits : TBits_1); inline;
  19495. procedure setTXABAT(thebits : TBits_1); inline;
  19496. procedure setTXEN(thebits : TBits_1); inline;
  19497. procedure setTXERR(thebits : TBits_1); inline;
  19498. procedure setTXLARB(thebits : TBits_1); inline;
  19499. procedure setTXPRI(thebits : TBits_2); inline;
  19500. procedure setTXREQ(thebits : TBits_1); inline;
  19501. procedure setUINC(thebits : TBits_1); inline;
  19502. procedure setw(thebits : TBits_32); inline;
  19503. public
  19504. procedure clearDONLY; inline;
  19505. procedure clearFRESET; inline;
  19506. procedure clearRTREN; inline;
  19507. procedure clearTXABAT; inline;
  19508. procedure clearTXEN; inline;
  19509. procedure clearTXERR; inline;
  19510. procedure clearTXLARB; inline;
  19511. procedure clearTXREQ; inline;
  19512. procedure clearUINC; inline;
  19513. procedure setDONLY; inline;
  19514. procedure setFRESET; inline;
  19515. procedure setRTREN; inline;
  19516. procedure setTXABAT; inline;
  19517. procedure setTXEN; inline;
  19518. procedure setTXERR; inline;
  19519. procedure setTXLARB; inline;
  19520. procedure setTXREQ; inline;
  19521. procedure setUINC; inline;
  19522. property DONLY : TBits_1 read getDONLY write setDONLY;
  19523. property FRESET : TBits_1 read getFRESET write setFRESET;
  19524. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19525. property RTREN : TBits_1 read getRTREN write setRTREN;
  19526. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19527. property TXEN : TBits_1 read getTXEN write setTXEN;
  19528. property TXERR : TBits_1 read getTXERR write setTXERR;
  19529. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19530. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19531. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19532. property UINC : TBits_1 read getUINC write setUINC;
  19533. property w : TBits_32 read getw write setw;
  19534. end;
  19535. TCAN1_C1FIFOINT22 = record
  19536. private
  19537. function getRXFULLIE : TBits_1; inline;
  19538. function getRXFULLIF : TBits_1; inline;
  19539. function getRXHALFIE : TBits_1; inline;
  19540. function getRXHALFIF : TBits_1; inline;
  19541. function getRXNEMPTYIE : TBits_1; inline;
  19542. function getRXNEMPTYIF : TBits_1; inline;
  19543. function getRXOVFLIE : TBits_1; inline;
  19544. function getRXOVFLIF : TBits_1; inline;
  19545. function getTXEMPTYIE : TBits_1; inline;
  19546. function getTXEMPTYIF : TBits_1; inline;
  19547. function getTXHALFIE : TBits_1; inline;
  19548. function getTXHALFIF : TBits_1; inline;
  19549. function getTXNFULLIE : TBits_1; inline;
  19550. function getTXNFULLIF : TBits_1; inline;
  19551. function getw : TBits_32; inline;
  19552. procedure setRXFULLIE(thebits : TBits_1); inline;
  19553. procedure setRXFULLIF(thebits : TBits_1); inline;
  19554. procedure setRXHALFIE(thebits : TBits_1); inline;
  19555. procedure setRXHALFIF(thebits : TBits_1); inline;
  19556. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19557. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19558. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19559. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19560. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19561. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19562. procedure setTXHALFIE(thebits : TBits_1); inline;
  19563. procedure setTXHALFIF(thebits : TBits_1); inline;
  19564. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19565. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19566. procedure setw(thebits : TBits_32); inline;
  19567. public
  19568. procedure clearRXFULLIE; inline;
  19569. procedure clearRXFULLIF; inline;
  19570. procedure clearRXHALFIE; inline;
  19571. procedure clearRXHALFIF; inline;
  19572. procedure clearRXNEMPTYIE; inline;
  19573. procedure clearRXNEMPTYIF; inline;
  19574. procedure clearRXOVFLIE; inline;
  19575. procedure clearRXOVFLIF; inline;
  19576. procedure clearTXEMPTYIE; inline;
  19577. procedure clearTXEMPTYIF; inline;
  19578. procedure clearTXHALFIE; inline;
  19579. procedure clearTXHALFIF; inline;
  19580. procedure clearTXNFULLIE; inline;
  19581. procedure clearTXNFULLIF; inline;
  19582. procedure setRXFULLIE; inline;
  19583. procedure setRXFULLIF; inline;
  19584. procedure setRXHALFIE; inline;
  19585. procedure setRXHALFIF; inline;
  19586. procedure setRXNEMPTYIE; inline;
  19587. procedure setRXNEMPTYIF; inline;
  19588. procedure setRXOVFLIE; inline;
  19589. procedure setRXOVFLIF; inline;
  19590. procedure setTXEMPTYIE; inline;
  19591. procedure setTXEMPTYIF; inline;
  19592. procedure setTXHALFIE; inline;
  19593. procedure setTXHALFIF; inline;
  19594. procedure setTXNFULLIE; inline;
  19595. procedure setTXNFULLIF; inline;
  19596. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19597. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19598. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19599. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19600. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19601. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19602. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19603. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19604. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19605. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19606. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19607. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19608. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19609. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19610. property w : TBits_32 read getw write setw;
  19611. end;
  19612. TCAN1_C1FIFOCI22 = record
  19613. private
  19614. function getCFIFOCI : TBits_5; inline;
  19615. function getw : TBits_32; inline;
  19616. procedure setCFIFOCI(thebits : TBits_5); inline;
  19617. procedure setw(thebits : TBits_32); inline;
  19618. public
  19619. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19620. property w : TBits_32 read getw write setw;
  19621. end;
  19622. TCAN1_C1FIFOCON23 = record
  19623. private
  19624. function getDONLY : TBits_1; inline;
  19625. function getFRESET : TBits_1; inline;
  19626. function getFSIZE : TBits_5; inline;
  19627. function getRTREN : TBits_1; inline;
  19628. function getTXABAT : TBits_1; inline;
  19629. function getTXEN : TBits_1; inline;
  19630. function getTXERR : TBits_1; inline;
  19631. function getTXLARB : TBits_1; inline;
  19632. function getTXPRI : TBits_2; inline;
  19633. function getTXREQ : TBits_1; inline;
  19634. function getUINC : TBits_1; inline;
  19635. function getw : TBits_32; inline;
  19636. procedure setDONLY(thebits : TBits_1); inline;
  19637. procedure setFRESET(thebits : TBits_1); inline;
  19638. procedure setFSIZE(thebits : TBits_5); inline;
  19639. procedure setRTREN(thebits : TBits_1); inline;
  19640. procedure setTXABAT(thebits : TBits_1); inline;
  19641. procedure setTXEN(thebits : TBits_1); inline;
  19642. procedure setTXERR(thebits : TBits_1); inline;
  19643. procedure setTXLARB(thebits : TBits_1); inline;
  19644. procedure setTXPRI(thebits : TBits_2); inline;
  19645. procedure setTXREQ(thebits : TBits_1); inline;
  19646. procedure setUINC(thebits : TBits_1); inline;
  19647. procedure setw(thebits : TBits_32); inline;
  19648. public
  19649. procedure clearDONLY; inline;
  19650. procedure clearFRESET; inline;
  19651. procedure clearRTREN; inline;
  19652. procedure clearTXABAT; inline;
  19653. procedure clearTXEN; inline;
  19654. procedure clearTXERR; inline;
  19655. procedure clearTXLARB; inline;
  19656. procedure clearTXREQ; inline;
  19657. procedure clearUINC; inline;
  19658. procedure setDONLY; inline;
  19659. procedure setFRESET; inline;
  19660. procedure setRTREN; inline;
  19661. procedure setTXABAT; inline;
  19662. procedure setTXEN; inline;
  19663. procedure setTXERR; inline;
  19664. procedure setTXLARB; inline;
  19665. procedure setTXREQ; inline;
  19666. procedure setUINC; inline;
  19667. property DONLY : TBits_1 read getDONLY write setDONLY;
  19668. property FRESET : TBits_1 read getFRESET write setFRESET;
  19669. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19670. property RTREN : TBits_1 read getRTREN write setRTREN;
  19671. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19672. property TXEN : TBits_1 read getTXEN write setTXEN;
  19673. property TXERR : TBits_1 read getTXERR write setTXERR;
  19674. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19675. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19676. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19677. property UINC : TBits_1 read getUINC write setUINC;
  19678. property w : TBits_32 read getw write setw;
  19679. end;
  19680. TCAN1_C1FIFOINT23 = record
  19681. private
  19682. function getRXFULLIE : TBits_1; inline;
  19683. function getRXFULLIF : TBits_1; inline;
  19684. function getRXHALFIE : TBits_1; inline;
  19685. function getRXHALFIF : TBits_1; inline;
  19686. function getRXNEMPTYIE : TBits_1; inline;
  19687. function getRXNEMPTYIF : TBits_1; inline;
  19688. function getRXOVFLIE : TBits_1; inline;
  19689. function getRXOVFLIF : TBits_1; inline;
  19690. function getTXEMPTYIE : TBits_1; inline;
  19691. function getTXEMPTYIF : TBits_1; inline;
  19692. function getTXHALFIE : TBits_1; inline;
  19693. function getTXHALFIF : TBits_1; inline;
  19694. function getTXNFULLIE : TBits_1; inline;
  19695. function getTXNFULLIF : TBits_1; inline;
  19696. function getw : TBits_32; inline;
  19697. procedure setRXFULLIE(thebits : TBits_1); inline;
  19698. procedure setRXFULLIF(thebits : TBits_1); inline;
  19699. procedure setRXHALFIE(thebits : TBits_1); inline;
  19700. procedure setRXHALFIF(thebits : TBits_1); inline;
  19701. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19702. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19703. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19704. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19705. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19706. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19707. procedure setTXHALFIE(thebits : TBits_1); inline;
  19708. procedure setTXHALFIF(thebits : TBits_1); inline;
  19709. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19710. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19711. procedure setw(thebits : TBits_32); inline;
  19712. public
  19713. procedure clearRXFULLIE; inline;
  19714. procedure clearRXFULLIF; inline;
  19715. procedure clearRXHALFIE; inline;
  19716. procedure clearRXHALFIF; inline;
  19717. procedure clearRXNEMPTYIE; inline;
  19718. procedure clearRXNEMPTYIF; inline;
  19719. procedure clearRXOVFLIE; inline;
  19720. procedure clearRXOVFLIF; inline;
  19721. procedure clearTXEMPTYIE; inline;
  19722. procedure clearTXEMPTYIF; inline;
  19723. procedure clearTXHALFIE; inline;
  19724. procedure clearTXHALFIF; inline;
  19725. procedure clearTXNFULLIE; inline;
  19726. procedure clearTXNFULLIF; inline;
  19727. procedure setRXFULLIE; inline;
  19728. procedure setRXFULLIF; inline;
  19729. procedure setRXHALFIE; inline;
  19730. procedure setRXHALFIF; inline;
  19731. procedure setRXNEMPTYIE; inline;
  19732. procedure setRXNEMPTYIF; inline;
  19733. procedure setRXOVFLIE; inline;
  19734. procedure setRXOVFLIF; inline;
  19735. procedure setTXEMPTYIE; inline;
  19736. procedure setTXEMPTYIF; inline;
  19737. procedure setTXHALFIE; inline;
  19738. procedure setTXHALFIF; inline;
  19739. procedure setTXNFULLIE; inline;
  19740. procedure setTXNFULLIF; inline;
  19741. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19742. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19743. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19744. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19745. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19746. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19747. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19748. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19749. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19750. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19751. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19752. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19753. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19754. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19755. property w : TBits_32 read getw write setw;
  19756. end;
  19757. TCAN1_C1FIFOCI23 = record
  19758. private
  19759. function getCFIFOCI : TBits_5; inline;
  19760. function getw : TBits_32; inline;
  19761. procedure setCFIFOCI(thebits : TBits_5); inline;
  19762. procedure setw(thebits : TBits_32); inline;
  19763. public
  19764. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19765. property w : TBits_32 read getw write setw;
  19766. end;
  19767. TCAN1_C1FIFOCON24 = record
  19768. private
  19769. function getDONLY : TBits_1; inline;
  19770. function getFRESET : TBits_1; inline;
  19771. function getFSIZE : TBits_5; inline;
  19772. function getRTREN : TBits_1; inline;
  19773. function getTXABAT : TBits_1; inline;
  19774. function getTXEN : TBits_1; inline;
  19775. function getTXERR : TBits_1; inline;
  19776. function getTXLARB : TBits_1; inline;
  19777. function getTXPRI : TBits_2; inline;
  19778. function getTXREQ : TBits_1; inline;
  19779. function getUINC : TBits_1; inline;
  19780. function getw : TBits_32; inline;
  19781. procedure setDONLY(thebits : TBits_1); inline;
  19782. procedure setFRESET(thebits : TBits_1); inline;
  19783. procedure setFSIZE(thebits : TBits_5); inline;
  19784. procedure setRTREN(thebits : TBits_1); inline;
  19785. procedure setTXABAT(thebits : TBits_1); inline;
  19786. procedure setTXEN(thebits : TBits_1); inline;
  19787. procedure setTXERR(thebits : TBits_1); inline;
  19788. procedure setTXLARB(thebits : TBits_1); inline;
  19789. procedure setTXPRI(thebits : TBits_2); inline;
  19790. procedure setTXREQ(thebits : TBits_1); inline;
  19791. procedure setUINC(thebits : TBits_1); inline;
  19792. procedure setw(thebits : TBits_32); inline;
  19793. public
  19794. procedure clearDONLY; inline;
  19795. procedure clearFRESET; inline;
  19796. procedure clearRTREN; inline;
  19797. procedure clearTXABAT; inline;
  19798. procedure clearTXEN; inline;
  19799. procedure clearTXERR; inline;
  19800. procedure clearTXLARB; inline;
  19801. procedure clearTXREQ; inline;
  19802. procedure clearUINC; inline;
  19803. procedure setDONLY; inline;
  19804. procedure setFRESET; inline;
  19805. procedure setRTREN; inline;
  19806. procedure setTXABAT; inline;
  19807. procedure setTXEN; inline;
  19808. procedure setTXERR; inline;
  19809. procedure setTXLARB; inline;
  19810. procedure setTXREQ; inline;
  19811. procedure setUINC; inline;
  19812. property DONLY : TBits_1 read getDONLY write setDONLY;
  19813. property FRESET : TBits_1 read getFRESET write setFRESET;
  19814. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19815. property RTREN : TBits_1 read getRTREN write setRTREN;
  19816. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19817. property TXEN : TBits_1 read getTXEN write setTXEN;
  19818. property TXERR : TBits_1 read getTXERR write setTXERR;
  19819. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19820. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19821. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19822. property UINC : TBits_1 read getUINC write setUINC;
  19823. property w : TBits_32 read getw write setw;
  19824. end;
  19825. TCAN1_C1FIFOINT24 = record
  19826. private
  19827. function getRXFULLIE : TBits_1; inline;
  19828. function getRXFULLIF : TBits_1; inline;
  19829. function getRXHALFIE : TBits_1; inline;
  19830. function getRXHALFIF : TBits_1; inline;
  19831. function getRXNEMPTYIE : TBits_1; inline;
  19832. function getRXNEMPTYIF : TBits_1; inline;
  19833. function getRXOVFLIE : TBits_1; inline;
  19834. function getRXOVFLIF : TBits_1; inline;
  19835. function getTXEMPTYIE : TBits_1; inline;
  19836. function getTXEMPTYIF : TBits_1; inline;
  19837. function getTXHALFIE : TBits_1; inline;
  19838. function getTXHALFIF : TBits_1; inline;
  19839. function getTXNFULLIE : TBits_1; inline;
  19840. function getTXNFULLIF : TBits_1; inline;
  19841. function getw : TBits_32; inline;
  19842. procedure setRXFULLIE(thebits : TBits_1); inline;
  19843. procedure setRXFULLIF(thebits : TBits_1); inline;
  19844. procedure setRXHALFIE(thebits : TBits_1); inline;
  19845. procedure setRXHALFIF(thebits : TBits_1); inline;
  19846. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19847. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19848. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19849. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19850. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19851. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19852. procedure setTXHALFIE(thebits : TBits_1); inline;
  19853. procedure setTXHALFIF(thebits : TBits_1); inline;
  19854. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19855. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19856. procedure setw(thebits : TBits_32); inline;
  19857. public
  19858. procedure clearRXFULLIE; inline;
  19859. procedure clearRXFULLIF; inline;
  19860. procedure clearRXHALFIE; inline;
  19861. procedure clearRXHALFIF; inline;
  19862. procedure clearRXNEMPTYIE; inline;
  19863. procedure clearRXNEMPTYIF; inline;
  19864. procedure clearRXOVFLIE; inline;
  19865. procedure clearRXOVFLIF; inline;
  19866. procedure clearTXEMPTYIE; inline;
  19867. procedure clearTXEMPTYIF; inline;
  19868. procedure clearTXHALFIE; inline;
  19869. procedure clearTXHALFIF; inline;
  19870. procedure clearTXNFULLIE; inline;
  19871. procedure clearTXNFULLIF; inline;
  19872. procedure setRXFULLIE; inline;
  19873. procedure setRXFULLIF; inline;
  19874. procedure setRXHALFIE; inline;
  19875. procedure setRXHALFIF; inline;
  19876. procedure setRXNEMPTYIE; inline;
  19877. procedure setRXNEMPTYIF; inline;
  19878. procedure setRXOVFLIE; inline;
  19879. procedure setRXOVFLIF; inline;
  19880. procedure setTXEMPTYIE; inline;
  19881. procedure setTXEMPTYIF; inline;
  19882. procedure setTXHALFIE; inline;
  19883. procedure setTXHALFIF; inline;
  19884. procedure setTXNFULLIE; inline;
  19885. procedure setTXNFULLIF; inline;
  19886. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19887. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19888. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19889. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19890. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19891. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19892. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19893. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19894. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19895. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19896. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19897. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19898. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19899. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19900. property w : TBits_32 read getw write setw;
  19901. end;
  19902. TCAN1_C1FIFOCI24 = record
  19903. private
  19904. function getCFIFOCI : TBits_5; inline;
  19905. function getw : TBits_32; inline;
  19906. procedure setCFIFOCI(thebits : TBits_5); inline;
  19907. procedure setw(thebits : TBits_32); inline;
  19908. public
  19909. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19910. property w : TBits_32 read getw write setw;
  19911. end;
  19912. TCAN1_C1FIFOCON25 = record
  19913. private
  19914. function getDONLY : TBits_1; inline;
  19915. function getFRESET : TBits_1; inline;
  19916. function getFSIZE : TBits_5; inline;
  19917. function getRTREN : TBits_1; inline;
  19918. function getTXABAT : TBits_1; inline;
  19919. function getTXEN : TBits_1; inline;
  19920. function getTXERR : TBits_1; inline;
  19921. function getTXLARB : TBits_1; inline;
  19922. function getTXPRI : TBits_2; inline;
  19923. function getTXREQ : TBits_1; inline;
  19924. function getUINC : TBits_1; inline;
  19925. function getw : TBits_32; inline;
  19926. procedure setDONLY(thebits : TBits_1); inline;
  19927. procedure setFRESET(thebits : TBits_1); inline;
  19928. procedure setFSIZE(thebits : TBits_5); inline;
  19929. procedure setRTREN(thebits : TBits_1); inline;
  19930. procedure setTXABAT(thebits : TBits_1); inline;
  19931. procedure setTXEN(thebits : TBits_1); inline;
  19932. procedure setTXERR(thebits : TBits_1); inline;
  19933. procedure setTXLARB(thebits : TBits_1); inline;
  19934. procedure setTXPRI(thebits : TBits_2); inline;
  19935. procedure setTXREQ(thebits : TBits_1); inline;
  19936. procedure setUINC(thebits : TBits_1); inline;
  19937. procedure setw(thebits : TBits_32); inline;
  19938. public
  19939. procedure clearDONLY; inline;
  19940. procedure clearFRESET; inline;
  19941. procedure clearRTREN; inline;
  19942. procedure clearTXABAT; inline;
  19943. procedure clearTXEN; inline;
  19944. procedure clearTXERR; inline;
  19945. procedure clearTXLARB; inline;
  19946. procedure clearTXREQ; inline;
  19947. procedure clearUINC; inline;
  19948. procedure setDONLY; inline;
  19949. procedure setFRESET; inline;
  19950. procedure setRTREN; inline;
  19951. procedure setTXABAT; inline;
  19952. procedure setTXEN; inline;
  19953. procedure setTXERR; inline;
  19954. procedure setTXLARB; inline;
  19955. procedure setTXREQ; inline;
  19956. procedure setUINC; inline;
  19957. property DONLY : TBits_1 read getDONLY write setDONLY;
  19958. property FRESET : TBits_1 read getFRESET write setFRESET;
  19959. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19960. property RTREN : TBits_1 read getRTREN write setRTREN;
  19961. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19962. property TXEN : TBits_1 read getTXEN write setTXEN;
  19963. property TXERR : TBits_1 read getTXERR write setTXERR;
  19964. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19965. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19966. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19967. property UINC : TBits_1 read getUINC write setUINC;
  19968. property w : TBits_32 read getw write setw;
  19969. end;
  19970. TCAN1_C1FIFOINT25 = record
  19971. private
  19972. function getRXFULLIE : TBits_1; inline;
  19973. function getRXFULLIF : TBits_1; inline;
  19974. function getRXHALFIE : TBits_1; inline;
  19975. function getRXHALFIF : TBits_1; inline;
  19976. function getRXNEMPTYIE : TBits_1; inline;
  19977. function getRXNEMPTYIF : TBits_1; inline;
  19978. function getRXOVFLIE : TBits_1; inline;
  19979. function getRXOVFLIF : TBits_1; inline;
  19980. function getTXEMPTYIE : TBits_1; inline;
  19981. function getTXEMPTYIF : TBits_1; inline;
  19982. function getTXHALFIE : TBits_1; inline;
  19983. function getTXHALFIF : TBits_1; inline;
  19984. function getTXNFULLIE : TBits_1; inline;
  19985. function getTXNFULLIF : TBits_1; inline;
  19986. function getw : TBits_32; inline;
  19987. procedure setRXFULLIE(thebits : TBits_1); inline;
  19988. procedure setRXFULLIF(thebits : TBits_1); inline;
  19989. procedure setRXHALFIE(thebits : TBits_1); inline;
  19990. procedure setRXHALFIF(thebits : TBits_1); inline;
  19991. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19992. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19993. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19994. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19995. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19996. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19997. procedure setTXHALFIE(thebits : TBits_1); inline;
  19998. procedure setTXHALFIF(thebits : TBits_1); inline;
  19999. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20000. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20001. procedure setw(thebits : TBits_32); inline;
  20002. public
  20003. procedure clearRXFULLIE; inline;
  20004. procedure clearRXFULLIF; inline;
  20005. procedure clearRXHALFIE; inline;
  20006. procedure clearRXHALFIF; inline;
  20007. procedure clearRXNEMPTYIE; inline;
  20008. procedure clearRXNEMPTYIF; inline;
  20009. procedure clearRXOVFLIE; inline;
  20010. procedure clearRXOVFLIF; inline;
  20011. procedure clearTXEMPTYIE; inline;
  20012. procedure clearTXEMPTYIF; inline;
  20013. procedure clearTXHALFIE; inline;
  20014. procedure clearTXHALFIF; inline;
  20015. procedure clearTXNFULLIE; inline;
  20016. procedure clearTXNFULLIF; inline;
  20017. procedure setRXFULLIE; inline;
  20018. procedure setRXFULLIF; inline;
  20019. procedure setRXHALFIE; inline;
  20020. procedure setRXHALFIF; inline;
  20021. procedure setRXNEMPTYIE; inline;
  20022. procedure setRXNEMPTYIF; inline;
  20023. procedure setRXOVFLIE; inline;
  20024. procedure setRXOVFLIF; inline;
  20025. procedure setTXEMPTYIE; inline;
  20026. procedure setTXEMPTYIF; inline;
  20027. procedure setTXHALFIE; inline;
  20028. procedure setTXHALFIF; inline;
  20029. procedure setTXNFULLIE; inline;
  20030. procedure setTXNFULLIF; inline;
  20031. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20032. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20033. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20034. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20035. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20036. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20037. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20038. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20039. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20040. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20041. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20042. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20043. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20044. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20045. property w : TBits_32 read getw write setw;
  20046. end;
  20047. TCAN1_C1FIFOCI25 = record
  20048. private
  20049. function getCFIFOCI : TBits_5; inline;
  20050. function getw : TBits_32; inline;
  20051. procedure setCFIFOCI(thebits : TBits_5); inline;
  20052. procedure setw(thebits : TBits_32); inline;
  20053. public
  20054. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20055. property w : TBits_32 read getw write setw;
  20056. end;
  20057. TCAN1_C1FIFOCON26 = record
  20058. private
  20059. function getDONLY : TBits_1; inline;
  20060. function getFRESET : TBits_1; inline;
  20061. function getFSIZE : TBits_5; inline;
  20062. function getRTREN : TBits_1; inline;
  20063. function getTXABAT : TBits_1; inline;
  20064. function getTXEN : TBits_1; inline;
  20065. function getTXERR : TBits_1; inline;
  20066. function getTXLARB : TBits_1; inline;
  20067. function getTXPRI : TBits_2; inline;
  20068. function getTXREQ : TBits_1; inline;
  20069. function getUINC : TBits_1; inline;
  20070. function getw : TBits_32; inline;
  20071. procedure setDONLY(thebits : TBits_1); inline;
  20072. procedure setFRESET(thebits : TBits_1); inline;
  20073. procedure setFSIZE(thebits : TBits_5); inline;
  20074. procedure setRTREN(thebits : TBits_1); inline;
  20075. procedure setTXABAT(thebits : TBits_1); inline;
  20076. procedure setTXEN(thebits : TBits_1); inline;
  20077. procedure setTXERR(thebits : TBits_1); inline;
  20078. procedure setTXLARB(thebits : TBits_1); inline;
  20079. procedure setTXPRI(thebits : TBits_2); inline;
  20080. procedure setTXREQ(thebits : TBits_1); inline;
  20081. procedure setUINC(thebits : TBits_1); inline;
  20082. procedure setw(thebits : TBits_32); inline;
  20083. public
  20084. procedure clearDONLY; inline;
  20085. procedure clearFRESET; inline;
  20086. procedure clearRTREN; inline;
  20087. procedure clearTXABAT; inline;
  20088. procedure clearTXEN; inline;
  20089. procedure clearTXERR; inline;
  20090. procedure clearTXLARB; inline;
  20091. procedure clearTXREQ; inline;
  20092. procedure clearUINC; inline;
  20093. procedure setDONLY; inline;
  20094. procedure setFRESET; inline;
  20095. procedure setRTREN; inline;
  20096. procedure setTXABAT; inline;
  20097. procedure setTXEN; inline;
  20098. procedure setTXERR; inline;
  20099. procedure setTXLARB; inline;
  20100. procedure setTXREQ; inline;
  20101. procedure setUINC; inline;
  20102. property DONLY : TBits_1 read getDONLY write setDONLY;
  20103. property FRESET : TBits_1 read getFRESET write setFRESET;
  20104. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20105. property RTREN : TBits_1 read getRTREN write setRTREN;
  20106. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20107. property TXEN : TBits_1 read getTXEN write setTXEN;
  20108. property TXERR : TBits_1 read getTXERR write setTXERR;
  20109. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20110. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20111. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20112. property UINC : TBits_1 read getUINC write setUINC;
  20113. property w : TBits_32 read getw write setw;
  20114. end;
  20115. TCAN1_C1FIFOINT26 = record
  20116. private
  20117. function getRXFULLIE : TBits_1; inline;
  20118. function getRXFULLIF : TBits_1; inline;
  20119. function getRXHALFIE : TBits_1; inline;
  20120. function getRXHALFIF : TBits_1; inline;
  20121. function getRXNEMPTYIE : TBits_1; inline;
  20122. function getRXNEMPTYIF : TBits_1; inline;
  20123. function getRXOVFLIE : TBits_1; inline;
  20124. function getRXOVFLIF : TBits_1; inline;
  20125. function getTXEMPTYIE : TBits_1; inline;
  20126. function getTXEMPTYIF : TBits_1; inline;
  20127. function getTXHALFIE : TBits_1; inline;
  20128. function getTXHALFIF : TBits_1; inline;
  20129. function getTXNFULLIE : TBits_1; inline;
  20130. function getTXNFULLIF : TBits_1; inline;
  20131. function getw : TBits_32; inline;
  20132. procedure setRXFULLIE(thebits : TBits_1); inline;
  20133. procedure setRXFULLIF(thebits : TBits_1); inline;
  20134. procedure setRXHALFIE(thebits : TBits_1); inline;
  20135. procedure setRXHALFIF(thebits : TBits_1); inline;
  20136. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20137. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20138. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20139. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20140. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20141. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20142. procedure setTXHALFIE(thebits : TBits_1); inline;
  20143. procedure setTXHALFIF(thebits : TBits_1); inline;
  20144. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20145. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20146. procedure setw(thebits : TBits_32); inline;
  20147. public
  20148. procedure clearRXFULLIE; inline;
  20149. procedure clearRXFULLIF; inline;
  20150. procedure clearRXHALFIE; inline;
  20151. procedure clearRXHALFIF; inline;
  20152. procedure clearRXNEMPTYIE; inline;
  20153. procedure clearRXNEMPTYIF; inline;
  20154. procedure clearRXOVFLIE; inline;
  20155. procedure clearRXOVFLIF; inline;
  20156. procedure clearTXEMPTYIE; inline;
  20157. procedure clearTXEMPTYIF; inline;
  20158. procedure clearTXHALFIE; inline;
  20159. procedure clearTXHALFIF; inline;
  20160. procedure clearTXNFULLIE; inline;
  20161. procedure clearTXNFULLIF; inline;
  20162. procedure setRXFULLIE; inline;
  20163. procedure setRXFULLIF; inline;
  20164. procedure setRXHALFIE; inline;
  20165. procedure setRXHALFIF; inline;
  20166. procedure setRXNEMPTYIE; inline;
  20167. procedure setRXNEMPTYIF; inline;
  20168. procedure setRXOVFLIE; inline;
  20169. procedure setRXOVFLIF; inline;
  20170. procedure setTXEMPTYIE; inline;
  20171. procedure setTXEMPTYIF; inline;
  20172. procedure setTXHALFIE; inline;
  20173. procedure setTXHALFIF; inline;
  20174. procedure setTXNFULLIE; inline;
  20175. procedure setTXNFULLIF; inline;
  20176. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20177. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20178. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20179. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20180. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20181. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20182. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20183. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20184. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20185. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20186. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20187. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20188. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20189. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20190. property w : TBits_32 read getw write setw;
  20191. end;
  20192. TCAN1_C1FIFOCI26 = record
  20193. private
  20194. function getCFIFOCI : TBits_5; inline;
  20195. function getw : TBits_32; inline;
  20196. procedure setCFIFOCI(thebits : TBits_5); inline;
  20197. procedure setw(thebits : TBits_32); inline;
  20198. public
  20199. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20200. property w : TBits_32 read getw write setw;
  20201. end;
  20202. TCAN1_C1FIFOCON27 = record
  20203. private
  20204. function getDONLY : TBits_1; inline;
  20205. function getFRESET : TBits_1; inline;
  20206. function getFSIZE : TBits_5; inline;
  20207. function getRTREN : TBits_1; inline;
  20208. function getTXABAT : TBits_1; inline;
  20209. function getTXEN : TBits_1; inline;
  20210. function getTXERR : TBits_1; inline;
  20211. function getTXLARB : TBits_1; inline;
  20212. function getTXPRI : TBits_2; inline;
  20213. function getTXREQ : TBits_1; inline;
  20214. function getUINC : TBits_1; inline;
  20215. function getw : TBits_32; inline;
  20216. procedure setDONLY(thebits : TBits_1); inline;
  20217. procedure setFRESET(thebits : TBits_1); inline;
  20218. procedure setFSIZE(thebits : TBits_5); inline;
  20219. procedure setRTREN(thebits : TBits_1); inline;
  20220. procedure setTXABAT(thebits : TBits_1); inline;
  20221. procedure setTXEN(thebits : TBits_1); inline;
  20222. procedure setTXERR(thebits : TBits_1); inline;
  20223. procedure setTXLARB(thebits : TBits_1); inline;
  20224. procedure setTXPRI(thebits : TBits_2); inline;
  20225. procedure setTXREQ(thebits : TBits_1); inline;
  20226. procedure setUINC(thebits : TBits_1); inline;
  20227. procedure setw(thebits : TBits_32); inline;
  20228. public
  20229. procedure clearDONLY; inline;
  20230. procedure clearFRESET; inline;
  20231. procedure clearRTREN; inline;
  20232. procedure clearTXABAT; inline;
  20233. procedure clearTXEN; inline;
  20234. procedure clearTXERR; inline;
  20235. procedure clearTXLARB; inline;
  20236. procedure clearTXREQ; inline;
  20237. procedure clearUINC; inline;
  20238. procedure setDONLY; inline;
  20239. procedure setFRESET; inline;
  20240. procedure setRTREN; inline;
  20241. procedure setTXABAT; inline;
  20242. procedure setTXEN; inline;
  20243. procedure setTXERR; inline;
  20244. procedure setTXLARB; inline;
  20245. procedure setTXREQ; inline;
  20246. procedure setUINC; inline;
  20247. property DONLY : TBits_1 read getDONLY write setDONLY;
  20248. property FRESET : TBits_1 read getFRESET write setFRESET;
  20249. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20250. property RTREN : TBits_1 read getRTREN write setRTREN;
  20251. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20252. property TXEN : TBits_1 read getTXEN write setTXEN;
  20253. property TXERR : TBits_1 read getTXERR write setTXERR;
  20254. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20255. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20256. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20257. property UINC : TBits_1 read getUINC write setUINC;
  20258. property w : TBits_32 read getw write setw;
  20259. end;
  20260. TCAN1_C1FIFOINT27 = record
  20261. private
  20262. function getRXFULLIE : TBits_1; inline;
  20263. function getRXFULLIF : TBits_1; inline;
  20264. function getRXHALFIE : TBits_1; inline;
  20265. function getRXHALFIF : TBits_1; inline;
  20266. function getRXNEMPTYIE : TBits_1; inline;
  20267. function getRXNEMPTYIF : TBits_1; inline;
  20268. function getRXOVFLIE : TBits_1; inline;
  20269. function getRXOVFLIF : TBits_1; inline;
  20270. function getTXEMPTYIE : TBits_1; inline;
  20271. function getTXEMPTYIF : TBits_1; inline;
  20272. function getTXHALFIE : TBits_1; inline;
  20273. function getTXHALFIF : TBits_1; inline;
  20274. function getTXNFULLIE : TBits_1; inline;
  20275. function getTXNFULLIF : TBits_1; inline;
  20276. function getw : TBits_32; inline;
  20277. procedure setRXFULLIE(thebits : TBits_1); inline;
  20278. procedure setRXFULLIF(thebits : TBits_1); inline;
  20279. procedure setRXHALFIE(thebits : TBits_1); inline;
  20280. procedure setRXHALFIF(thebits : TBits_1); inline;
  20281. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20282. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20283. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20284. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20285. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20286. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20287. procedure setTXHALFIE(thebits : TBits_1); inline;
  20288. procedure setTXHALFIF(thebits : TBits_1); inline;
  20289. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20290. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20291. procedure setw(thebits : TBits_32); inline;
  20292. public
  20293. procedure clearRXFULLIE; inline;
  20294. procedure clearRXFULLIF; inline;
  20295. procedure clearRXHALFIE; inline;
  20296. procedure clearRXHALFIF; inline;
  20297. procedure clearRXNEMPTYIE; inline;
  20298. procedure clearRXNEMPTYIF; inline;
  20299. procedure clearRXOVFLIE; inline;
  20300. procedure clearRXOVFLIF; inline;
  20301. procedure clearTXEMPTYIE; inline;
  20302. procedure clearTXEMPTYIF; inline;
  20303. procedure clearTXHALFIE; inline;
  20304. procedure clearTXHALFIF; inline;
  20305. procedure clearTXNFULLIE; inline;
  20306. procedure clearTXNFULLIF; inline;
  20307. procedure setRXFULLIE; inline;
  20308. procedure setRXFULLIF; inline;
  20309. procedure setRXHALFIE; inline;
  20310. procedure setRXHALFIF; inline;
  20311. procedure setRXNEMPTYIE; inline;
  20312. procedure setRXNEMPTYIF; inline;
  20313. procedure setRXOVFLIE; inline;
  20314. procedure setRXOVFLIF; inline;
  20315. procedure setTXEMPTYIE; inline;
  20316. procedure setTXEMPTYIF; inline;
  20317. procedure setTXHALFIE; inline;
  20318. procedure setTXHALFIF; inline;
  20319. procedure setTXNFULLIE; inline;
  20320. procedure setTXNFULLIF; inline;
  20321. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20322. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20323. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20324. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20325. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20326. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20327. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20328. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20329. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20330. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20331. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20332. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20333. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20334. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20335. property w : TBits_32 read getw write setw;
  20336. end;
  20337. TCAN1_C1FIFOCI27 = record
  20338. private
  20339. function getCFIFOCI : TBits_5; inline;
  20340. function getw : TBits_32; inline;
  20341. procedure setCFIFOCI(thebits : TBits_5); inline;
  20342. procedure setw(thebits : TBits_32); inline;
  20343. public
  20344. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20345. property w : TBits_32 read getw write setw;
  20346. end;
  20347. TCAN1_C1FIFOCON28 = record
  20348. private
  20349. function getDONLY : TBits_1; inline;
  20350. function getFRESET : TBits_1; inline;
  20351. function getFSIZE : TBits_5; inline;
  20352. function getRTREN : TBits_1; inline;
  20353. function getTXABAT : TBits_1; inline;
  20354. function getTXEN : TBits_1; inline;
  20355. function getTXERR : TBits_1; inline;
  20356. function getTXLARB : TBits_1; inline;
  20357. function getTXPRI : TBits_2; inline;
  20358. function getTXREQ : TBits_1; inline;
  20359. function getUINC : TBits_1; inline;
  20360. function getw : TBits_32; inline;
  20361. procedure setDONLY(thebits : TBits_1); inline;
  20362. procedure setFRESET(thebits : TBits_1); inline;
  20363. procedure setFSIZE(thebits : TBits_5); inline;
  20364. procedure setRTREN(thebits : TBits_1); inline;
  20365. procedure setTXABAT(thebits : TBits_1); inline;
  20366. procedure setTXEN(thebits : TBits_1); inline;
  20367. procedure setTXERR(thebits : TBits_1); inline;
  20368. procedure setTXLARB(thebits : TBits_1); inline;
  20369. procedure setTXPRI(thebits : TBits_2); inline;
  20370. procedure setTXREQ(thebits : TBits_1); inline;
  20371. procedure setUINC(thebits : TBits_1); inline;
  20372. procedure setw(thebits : TBits_32); inline;
  20373. public
  20374. procedure clearDONLY; inline;
  20375. procedure clearFRESET; inline;
  20376. procedure clearRTREN; inline;
  20377. procedure clearTXABAT; inline;
  20378. procedure clearTXEN; inline;
  20379. procedure clearTXERR; inline;
  20380. procedure clearTXLARB; inline;
  20381. procedure clearTXREQ; inline;
  20382. procedure clearUINC; inline;
  20383. procedure setDONLY; inline;
  20384. procedure setFRESET; inline;
  20385. procedure setRTREN; inline;
  20386. procedure setTXABAT; inline;
  20387. procedure setTXEN; inline;
  20388. procedure setTXERR; inline;
  20389. procedure setTXLARB; inline;
  20390. procedure setTXREQ; inline;
  20391. procedure setUINC; inline;
  20392. property DONLY : TBits_1 read getDONLY write setDONLY;
  20393. property FRESET : TBits_1 read getFRESET write setFRESET;
  20394. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20395. property RTREN : TBits_1 read getRTREN write setRTREN;
  20396. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20397. property TXEN : TBits_1 read getTXEN write setTXEN;
  20398. property TXERR : TBits_1 read getTXERR write setTXERR;
  20399. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20400. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20401. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20402. property UINC : TBits_1 read getUINC write setUINC;
  20403. property w : TBits_32 read getw write setw;
  20404. end;
  20405. TCAN1_C1FIFOINT28 = record
  20406. private
  20407. function getRXFULLIE : TBits_1; inline;
  20408. function getRXFULLIF : TBits_1; inline;
  20409. function getRXHALFIE : TBits_1; inline;
  20410. function getRXHALFIF : TBits_1; inline;
  20411. function getRXNEMPTYIE : TBits_1; inline;
  20412. function getRXNEMPTYIF : TBits_1; inline;
  20413. function getRXOVFLIE : TBits_1; inline;
  20414. function getRXOVFLIF : TBits_1; inline;
  20415. function getTXEMPTYIE : TBits_1; inline;
  20416. function getTXEMPTYIF : TBits_1; inline;
  20417. function getTXHALFIE : TBits_1; inline;
  20418. function getTXHALFIF : TBits_1; inline;
  20419. function getTXNFULLIE : TBits_1; inline;
  20420. function getTXNFULLIF : TBits_1; inline;
  20421. function getw : TBits_32; inline;
  20422. procedure setRXFULLIE(thebits : TBits_1); inline;
  20423. procedure setRXFULLIF(thebits : TBits_1); inline;
  20424. procedure setRXHALFIE(thebits : TBits_1); inline;
  20425. procedure setRXHALFIF(thebits : TBits_1); inline;
  20426. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20427. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20428. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20429. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20430. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20431. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20432. procedure setTXHALFIE(thebits : TBits_1); inline;
  20433. procedure setTXHALFIF(thebits : TBits_1); inline;
  20434. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20435. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20436. procedure setw(thebits : TBits_32); inline;
  20437. public
  20438. procedure clearRXFULLIE; inline;
  20439. procedure clearRXFULLIF; inline;
  20440. procedure clearRXHALFIE; inline;
  20441. procedure clearRXHALFIF; inline;
  20442. procedure clearRXNEMPTYIE; inline;
  20443. procedure clearRXNEMPTYIF; inline;
  20444. procedure clearRXOVFLIE; inline;
  20445. procedure clearRXOVFLIF; inline;
  20446. procedure clearTXEMPTYIE; inline;
  20447. procedure clearTXEMPTYIF; inline;
  20448. procedure clearTXHALFIE; inline;
  20449. procedure clearTXHALFIF; inline;
  20450. procedure clearTXNFULLIE; inline;
  20451. procedure clearTXNFULLIF; inline;
  20452. procedure setRXFULLIE; inline;
  20453. procedure setRXFULLIF; inline;
  20454. procedure setRXHALFIE; inline;
  20455. procedure setRXHALFIF; inline;
  20456. procedure setRXNEMPTYIE; inline;
  20457. procedure setRXNEMPTYIF; inline;
  20458. procedure setRXOVFLIE; inline;
  20459. procedure setRXOVFLIF; inline;
  20460. procedure setTXEMPTYIE; inline;
  20461. procedure setTXEMPTYIF; inline;
  20462. procedure setTXHALFIE; inline;
  20463. procedure setTXHALFIF; inline;
  20464. procedure setTXNFULLIE; inline;
  20465. procedure setTXNFULLIF; inline;
  20466. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20467. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20468. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20469. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20470. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20471. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20472. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20473. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20474. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20475. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20476. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20477. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20478. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20479. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20480. property w : TBits_32 read getw write setw;
  20481. end;
  20482. TCAN1_C1FIFOCI28 = record
  20483. private
  20484. function getCFIFOCI : TBits_5; inline;
  20485. function getw : TBits_32; inline;
  20486. procedure setCFIFOCI(thebits : TBits_5); inline;
  20487. procedure setw(thebits : TBits_32); inline;
  20488. public
  20489. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20490. property w : TBits_32 read getw write setw;
  20491. end;
  20492. TCAN1_C1FIFOCON29 = record
  20493. private
  20494. function getDONLY : TBits_1; inline;
  20495. function getFRESET : TBits_1; inline;
  20496. function getFSIZE : TBits_5; inline;
  20497. function getRTREN : TBits_1; inline;
  20498. function getTXABAT : TBits_1; inline;
  20499. function getTXEN : TBits_1; inline;
  20500. function getTXERR : TBits_1; inline;
  20501. function getTXLARB : TBits_1; inline;
  20502. function getTXPRI : TBits_2; inline;
  20503. function getTXREQ : TBits_1; inline;
  20504. function getUINC : TBits_1; inline;
  20505. function getw : TBits_32; inline;
  20506. procedure setDONLY(thebits : TBits_1); inline;
  20507. procedure setFRESET(thebits : TBits_1); inline;
  20508. procedure setFSIZE(thebits : TBits_5); inline;
  20509. procedure setRTREN(thebits : TBits_1); inline;
  20510. procedure setTXABAT(thebits : TBits_1); inline;
  20511. procedure setTXEN(thebits : TBits_1); inline;
  20512. procedure setTXERR(thebits : TBits_1); inline;
  20513. procedure setTXLARB(thebits : TBits_1); inline;
  20514. procedure setTXPRI(thebits : TBits_2); inline;
  20515. procedure setTXREQ(thebits : TBits_1); inline;
  20516. procedure setUINC(thebits : TBits_1); inline;
  20517. procedure setw(thebits : TBits_32); inline;
  20518. public
  20519. procedure clearDONLY; inline;
  20520. procedure clearFRESET; inline;
  20521. procedure clearRTREN; inline;
  20522. procedure clearTXABAT; inline;
  20523. procedure clearTXEN; inline;
  20524. procedure clearTXERR; inline;
  20525. procedure clearTXLARB; inline;
  20526. procedure clearTXREQ; inline;
  20527. procedure clearUINC; inline;
  20528. procedure setDONLY; inline;
  20529. procedure setFRESET; inline;
  20530. procedure setRTREN; inline;
  20531. procedure setTXABAT; inline;
  20532. procedure setTXEN; inline;
  20533. procedure setTXERR; inline;
  20534. procedure setTXLARB; inline;
  20535. procedure setTXREQ; inline;
  20536. procedure setUINC; inline;
  20537. property DONLY : TBits_1 read getDONLY write setDONLY;
  20538. property FRESET : TBits_1 read getFRESET write setFRESET;
  20539. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20540. property RTREN : TBits_1 read getRTREN write setRTREN;
  20541. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20542. property TXEN : TBits_1 read getTXEN write setTXEN;
  20543. property TXERR : TBits_1 read getTXERR write setTXERR;
  20544. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20545. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20546. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20547. property UINC : TBits_1 read getUINC write setUINC;
  20548. property w : TBits_32 read getw write setw;
  20549. end;
  20550. TCAN1_C1FIFOINT29 = record
  20551. private
  20552. function getRXFULLIE : TBits_1; inline;
  20553. function getRXFULLIF : TBits_1; inline;
  20554. function getRXHALFIE : TBits_1; inline;
  20555. function getRXHALFIF : TBits_1; inline;
  20556. function getRXNEMPTYIE : TBits_1; inline;
  20557. function getRXNEMPTYIF : TBits_1; inline;
  20558. function getRXOVFLIE : TBits_1; inline;
  20559. function getRXOVFLIF : TBits_1; inline;
  20560. function getTXEMPTYIE : TBits_1; inline;
  20561. function getTXEMPTYIF : TBits_1; inline;
  20562. function getTXHALFIE : TBits_1; inline;
  20563. function getTXHALFIF : TBits_1; inline;
  20564. function getTXNFULLIE : TBits_1; inline;
  20565. function getTXNFULLIF : TBits_1; inline;
  20566. function getw : TBits_32; inline;
  20567. procedure setRXFULLIE(thebits : TBits_1); inline;
  20568. procedure setRXFULLIF(thebits : TBits_1); inline;
  20569. procedure setRXHALFIE(thebits : TBits_1); inline;
  20570. procedure setRXHALFIF(thebits : TBits_1); inline;
  20571. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20572. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20573. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20574. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20575. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20576. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20577. procedure setTXHALFIE(thebits : TBits_1); inline;
  20578. procedure setTXHALFIF(thebits : TBits_1); inline;
  20579. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20580. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20581. procedure setw(thebits : TBits_32); inline;
  20582. public
  20583. procedure clearRXFULLIE; inline;
  20584. procedure clearRXFULLIF; inline;
  20585. procedure clearRXHALFIE; inline;
  20586. procedure clearRXHALFIF; inline;
  20587. procedure clearRXNEMPTYIE; inline;
  20588. procedure clearRXNEMPTYIF; inline;
  20589. procedure clearRXOVFLIE; inline;
  20590. procedure clearRXOVFLIF; inline;
  20591. procedure clearTXEMPTYIE; inline;
  20592. procedure clearTXEMPTYIF; inline;
  20593. procedure clearTXHALFIE; inline;
  20594. procedure clearTXHALFIF; inline;
  20595. procedure clearTXNFULLIE; inline;
  20596. procedure clearTXNFULLIF; inline;
  20597. procedure setRXFULLIE; inline;
  20598. procedure setRXFULLIF; inline;
  20599. procedure setRXHALFIE; inline;
  20600. procedure setRXHALFIF; inline;
  20601. procedure setRXNEMPTYIE; inline;
  20602. procedure setRXNEMPTYIF; inline;
  20603. procedure setRXOVFLIE; inline;
  20604. procedure setRXOVFLIF; inline;
  20605. procedure setTXEMPTYIE; inline;
  20606. procedure setTXEMPTYIF; inline;
  20607. procedure setTXHALFIE; inline;
  20608. procedure setTXHALFIF; inline;
  20609. procedure setTXNFULLIE; inline;
  20610. procedure setTXNFULLIF; inline;
  20611. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20612. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20613. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20614. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20615. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20616. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20617. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20618. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20619. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20620. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20621. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20622. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20623. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20624. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20625. property w : TBits_32 read getw write setw;
  20626. end;
  20627. TCAN1_C1FIFOCI29 = record
  20628. private
  20629. function getCFIFOCI : TBits_5; inline;
  20630. function getw : TBits_32; inline;
  20631. procedure setCFIFOCI(thebits : TBits_5); inline;
  20632. procedure setw(thebits : TBits_32); inline;
  20633. public
  20634. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20635. property w : TBits_32 read getw write setw;
  20636. end;
  20637. TCAN1_C1FIFOCON30 = record
  20638. private
  20639. function getDONLY : TBits_1; inline;
  20640. function getFRESET : TBits_1; inline;
  20641. function getFSIZE : TBits_5; inline;
  20642. function getRTREN : TBits_1; inline;
  20643. function getTXABAT : TBits_1; inline;
  20644. function getTXEN : TBits_1; inline;
  20645. function getTXERR : TBits_1; inline;
  20646. function getTXLARB : TBits_1; inline;
  20647. function getTXPRI : TBits_2; inline;
  20648. function getTXREQ : TBits_1; inline;
  20649. function getUINC : TBits_1; inline;
  20650. function getw : TBits_32; inline;
  20651. procedure setDONLY(thebits : TBits_1); inline;
  20652. procedure setFRESET(thebits : TBits_1); inline;
  20653. procedure setFSIZE(thebits : TBits_5); inline;
  20654. procedure setRTREN(thebits : TBits_1); inline;
  20655. procedure setTXABAT(thebits : TBits_1); inline;
  20656. procedure setTXEN(thebits : TBits_1); inline;
  20657. procedure setTXERR(thebits : TBits_1); inline;
  20658. procedure setTXLARB(thebits : TBits_1); inline;
  20659. procedure setTXPRI(thebits : TBits_2); inline;
  20660. procedure setTXREQ(thebits : TBits_1); inline;
  20661. procedure setUINC(thebits : TBits_1); inline;
  20662. procedure setw(thebits : TBits_32); inline;
  20663. public
  20664. procedure clearDONLY; inline;
  20665. procedure clearFRESET; inline;
  20666. procedure clearRTREN; inline;
  20667. procedure clearTXABAT; inline;
  20668. procedure clearTXEN; inline;
  20669. procedure clearTXERR; inline;
  20670. procedure clearTXLARB; inline;
  20671. procedure clearTXREQ; inline;
  20672. procedure clearUINC; inline;
  20673. procedure setDONLY; inline;
  20674. procedure setFRESET; inline;
  20675. procedure setRTREN; inline;
  20676. procedure setTXABAT; inline;
  20677. procedure setTXEN; inline;
  20678. procedure setTXERR; inline;
  20679. procedure setTXLARB; inline;
  20680. procedure setTXREQ; inline;
  20681. procedure setUINC; inline;
  20682. property DONLY : TBits_1 read getDONLY write setDONLY;
  20683. property FRESET : TBits_1 read getFRESET write setFRESET;
  20684. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20685. property RTREN : TBits_1 read getRTREN write setRTREN;
  20686. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20687. property TXEN : TBits_1 read getTXEN write setTXEN;
  20688. property TXERR : TBits_1 read getTXERR write setTXERR;
  20689. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20690. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20691. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20692. property UINC : TBits_1 read getUINC write setUINC;
  20693. property w : TBits_32 read getw write setw;
  20694. end;
  20695. TCAN1_C1FIFOINT30 = record
  20696. private
  20697. function getRXFULLIE : TBits_1; inline;
  20698. function getRXFULLIF : TBits_1; inline;
  20699. function getRXHALFIE : TBits_1; inline;
  20700. function getRXHALFIF : TBits_1; inline;
  20701. function getRXNEMPTYIE : TBits_1; inline;
  20702. function getRXNEMPTYIF : TBits_1; inline;
  20703. function getRXOVFLIE : TBits_1; inline;
  20704. function getRXOVFLIF : TBits_1; inline;
  20705. function getTXEMPTYIE : TBits_1; inline;
  20706. function getTXEMPTYIF : TBits_1; inline;
  20707. function getTXHALFIE : TBits_1; inline;
  20708. function getTXHALFIF : TBits_1; inline;
  20709. function getTXNFULLIE : TBits_1; inline;
  20710. function getTXNFULLIF : TBits_1; inline;
  20711. function getw : TBits_32; inline;
  20712. procedure setRXFULLIE(thebits : TBits_1); inline;
  20713. procedure setRXFULLIF(thebits : TBits_1); inline;
  20714. procedure setRXHALFIE(thebits : TBits_1); inline;
  20715. procedure setRXHALFIF(thebits : TBits_1); inline;
  20716. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20717. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20718. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20719. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20720. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20721. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20722. procedure setTXHALFIE(thebits : TBits_1); inline;
  20723. procedure setTXHALFIF(thebits : TBits_1); inline;
  20724. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20725. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20726. procedure setw(thebits : TBits_32); inline;
  20727. public
  20728. procedure clearRXFULLIE; inline;
  20729. procedure clearRXFULLIF; inline;
  20730. procedure clearRXHALFIE; inline;
  20731. procedure clearRXHALFIF; inline;
  20732. procedure clearRXNEMPTYIE; inline;
  20733. procedure clearRXNEMPTYIF; inline;
  20734. procedure clearRXOVFLIE; inline;
  20735. procedure clearRXOVFLIF; inline;
  20736. procedure clearTXEMPTYIE; inline;
  20737. procedure clearTXEMPTYIF; inline;
  20738. procedure clearTXHALFIE; inline;
  20739. procedure clearTXHALFIF; inline;
  20740. procedure clearTXNFULLIE; inline;
  20741. procedure clearTXNFULLIF; inline;
  20742. procedure setRXFULLIE; inline;
  20743. procedure setRXFULLIF; inline;
  20744. procedure setRXHALFIE; inline;
  20745. procedure setRXHALFIF; inline;
  20746. procedure setRXNEMPTYIE; inline;
  20747. procedure setRXNEMPTYIF; inline;
  20748. procedure setRXOVFLIE; inline;
  20749. procedure setRXOVFLIF; inline;
  20750. procedure setTXEMPTYIE; inline;
  20751. procedure setTXEMPTYIF; inline;
  20752. procedure setTXHALFIE; inline;
  20753. procedure setTXHALFIF; inline;
  20754. procedure setTXNFULLIE; inline;
  20755. procedure setTXNFULLIF; inline;
  20756. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20757. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20758. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20759. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20760. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20761. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20762. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20763. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20764. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20765. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20766. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20767. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20768. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20769. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20770. property w : TBits_32 read getw write setw;
  20771. end;
  20772. TCAN1_C1FIFOCI30 = record
  20773. private
  20774. function getCFIFOCI : TBits_5; inline;
  20775. function getw : TBits_32; inline;
  20776. procedure setCFIFOCI(thebits : TBits_5); inline;
  20777. procedure setw(thebits : TBits_32); inline;
  20778. public
  20779. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20780. property w : TBits_32 read getw write setw;
  20781. end;
  20782. TCAN1_C1FIFOCON31 = record
  20783. private
  20784. function getDONLY : TBits_1; inline;
  20785. function getFRESET : TBits_1; inline;
  20786. function getFSIZE : TBits_5; inline;
  20787. function getRTREN : TBits_1; inline;
  20788. function getTXABAT : TBits_1; inline;
  20789. function getTXEN : TBits_1; inline;
  20790. function getTXERR : TBits_1; inline;
  20791. function getTXLARB : TBits_1; inline;
  20792. function getTXPRI : TBits_2; inline;
  20793. function getTXREQ : TBits_1; inline;
  20794. function getUINC : TBits_1; inline;
  20795. function getw : TBits_32; inline;
  20796. procedure setDONLY(thebits : TBits_1); inline;
  20797. procedure setFRESET(thebits : TBits_1); inline;
  20798. procedure setFSIZE(thebits : TBits_5); inline;
  20799. procedure setRTREN(thebits : TBits_1); inline;
  20800. procedure setTXABAT(thebits : TBits_1); inline;
  20801. procedure setTXEN(thebits : TBits_1); inline;
  20802. procedure setTXERR(thebits : TBits_1); inline;
  20803. procedure setTXLARB(thebits : TBits_1); inline;
  20804. procedure setTXPRI(thebits : TBits_2); inline;
  20805. procedure setTXREQ(thebits : TBits_1); inline;
  20806. procedure setUINC(thebits : TBits_1); inline;
  20807. procedure setw(thebits : TBits_32); inline;
  20808. public
  20809. procedure clearDONLY; inline;
  20810. procedure clearFRESET; inline;
  20811. procedure clearRTREN; inline;
  20812. procedure clearTXABAT; inline;
  20813. procedure clearTXEN; inline;
  20814. procedure clearTXERR; inline;
  20815. procedure clearTXLARB; inline;
  20816. procedure clearTXREQ; inline;
  20817. procedure clearUINC; inline;
  20818. procedure setDONLY; inline;
  20819. procedure setFRESET; inline;
  20820. procedure setRTREN; inline;
  20821. procedure setTXABAT; inline;
  20822. procedure setTXEN; inline;
  20823. procedure setTXERR; inline;
  20824. procedure setTXLARB; inline;
  20825. procedure setTXREQ; inline;
  20826. procedure setUINC; inline;
  20827. property DONLY : TBits_1 read getDONLY write setDONLY;
  20828. property FRESET : TBits_1 read getFRESET write setFRESET;
  20829. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20830. property RTREN : TBits_1 read getRTREN write setRTREN;
  20831. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20832. property TXEN : TBits_1 read getTXEN write setTXEN;
  20833. property TXERR : TBits_1 read getTXERR write setTXERR;
  20834. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20835. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20836. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20837. property UINC : TBits_1 read getUINC write setUINC;
  20838. property w : TBits_32 read getw write setw;
  20839. end;
  20840. TCAN1_C1FIFOINT31 = record
  20841. private
  20842. function getRXFULLIE : TBits_1; inline;
  20843. function getRXFULLIF : TBits_1; inline;
  20844. function getRXHALFIE : TBits_1; inline;
  20845. function getRXHALFIF : TBits_1; inline;
  20846. function getRXNEMPTYIE : TBits_1; inline;
  20847. function getRXNEMPTYIF : TBits_1; inline;
  20848. function getRXOVFLIE : TBits_1; inline;
  20849. function getRXOVFLIF : TBits_1; inline;
  20850. function getTXEMPTYIE : TBits_1; inline;
  20851. function getTXEMPTYIF : TBits_1; inline;
  20852. function getTXHALFIE : TBits_1; inline;
  20853. function getTXHALFIF : TBits_1; inline;
  20854. function getTXNFULLIE : TBits_1; inline;
  20855. function getTXNFULLIF : TBits_1; inline;
  20856. function getw : TBits_32; inline;
  20857. procedure setRXFULLIE(thebits : TBits_1); inline;
  20858. procedure setRXFULLIF(thebits : TBits_1); inline;
  20859. procedure setRXHALFIE(thebits : TBits_1); inline;
  20860. procedure setRXHALFIF(thebits : TBits_1); inline;
  20861. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20862. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20863. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20864. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20865. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20866. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20867. procedure setTXHALFIE(thebits : TBits_1); inline;
  20868. procedure setTXHALFIF(thebits : TBits_1); inline;
  20869. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20870. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20871. procedure setw(thebits : TBits_32); inline;
  20872. public
  20873. procedure clearRXFULLIE; inline;
  20874. procedure clearRXFULLIF; inline;
  20875. procedure clearRXHALFIE; inline;
  20876. procedure clearRXHALFIF; inline;
  20877. procedure clearRXNEMPTYIE; inline;
  20878. procedure clearRXNEMPTYIF; inline;
  20879. procedure clearRXOVFLIE; inline;
  20880. procedure clearRXOVFLIF; inline;
  20881. procedure clearTXEMPTYIE; inline;
  20882. procedure clearTXEMPTYIF; inline;
  20883. procedure clearTXHALFIE; inline;
  20884. procedure clearTXHALFIF; inline;
  20885. procedure clearTXNFULLIE; inline;
  20886. procedure clearTXNFULLIF; inline;
  20887. procedure setRXFULLIE; inline;
  20888. procedure setRXFULLIF; inline;
  20889. procedure setRXHALFIE; inline;
  20890. procedure setRXHALFIF; inline;
  20891. procedure setRXNEMPTYIE; inline;
  20892. procedure setRXNEMPTYIF; inline;
  20893. procedure setRXOVFLIE; inline;
  20894. procedure setRXOVFLIF; inline;
  20895. procedure setTXEMPTYIE; inline;
  20896. procedure setTXEMPTYIF; inline;
  20897. procedure setTXHALFIE; inline;
  20898. procedure setTXHALFIF; inline;
  20899. procedure setTXNFULLIE; inline;
  20900. procedure setTXNFULLIF; inline;
  20901. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20902. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20903. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20904. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20905. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20906. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20907. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20908. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20909. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20910. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20911. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20912. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20913. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20914. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20915. property w : TBits_32 read getw write setw;
  20916. end;
  20917. TCAN1_C1FIFOCI31 = record
  20918. private
  20919. function getCFIFOCI : TBits_5; inline;
  20920. function getw : TBits_32; inline;
  20921. procedure setCFIFOCI(thebits : TBits_5); inline;
  20922. procedure setw(thebits : TBits_32); inline;
  20923. public
  20924. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20925. property w : TBits_32 read getw write setw;
  20926. end;
  20927. type
  20928. TCAN1Registers = record
  20929. C1CONbits : TCAN1_C1CON;
  20930. C1CON : longWord;
  20931. C1CONCLR : longWord;
  20932. C1CONSET : longWord;
  20933. C1CONINV : longWord;
  20934. C1CFGbits : TCAN1_C1CFG;
  20935. C1CFG : longWord;
  20936. C1CFGCLR : longWord;
  20937. C1CFGSET : longWord;
  20938. C1CFGINV : longWord;
  20939. C1INTbits : TCAN1_C1INT;
  20940. C1INT : longWord;
  20941. C1INTCLR : longWord;
  20942. C1INTSET : longWord;
  20943. C1INTINV : longWord;
  20944. C1VECbits : TCAN1_C1VEC;
  20945. C1VEC : longWord;
  20946. C1VECCLR : longWord;
  20947. C1VECSET : longWord;
  20948. C1VECINV : longWord;
  20949. C1TRECbits : TCAN1_C1TREC;
  20950. C1TREC : longWord;
  20951. C1TRECCLR : longWord;
  20952. C1TRECSET : longWord;
  20953. C1TRECINV : longWord;
  20954. C1FSTATbits : TCAN1_C1FSTAT;
  20955. C1FSTAT : longWord;
  20956. C1FSTATCLR : longWord;
  20957. C1FSTATSET : longWord;
  20958. C1FSTATINV : longWord;
  20959. C1RXOVFbits : TCAN1_C1RXOVF;
  20960. C1RXOVF : longWord;
  20961. C1RXOVFCLR : longWord;
  20962. C1RXOVFSET : longWord;
  20963. C1RXOVFINV : longWord;
  20964. C1TMRbits : TCAN1_C1TMR;
  20965. C1TMR : longWord;
  20966. C1TMRCLR : longWord;
  20967. C1TMRSET : longWord;
  20968. C1TMRINV : longWord;
  20969. C1RXM0bits : TCAN1_C1RXM0;
  20970. C1RXM0 : longWord;
  20971. C1RXM0CLR : longWord;
  20972. C1RXM0SET : longWord;
  20973. C1RXM0INV : longWord;
  20974. C1RXM1bits : TCAN1_C1RXM1;
  20975. C1RXM1 : longWord;
  20976. C1RXM1CLR : longWord;
  20977. C1RXM1SET : longWord;
  20978. C1RXM1INV : longWord;
  20979. C1RXM2bits : TCAN1_C1RXM2;
  20980. C1RXM2 : longWord;
  20981. C1RXM2CLR : longWord;
  20982. C1RXM2SET : longWord;
  20983. C1RXM2INV : longWord;
  20984. C1RXM3bits : TCAN1_C1RXM3;
  20985. C1RXM3 : longWord;
  20986. C1RXM3CLR : longWord;
  20987. C1RXM3SET : longWord;
  20988. C1RXM3INV : longWord;
  20989. C1FLTCON0bits : TCAN1_C1FLTCON0;
  20990. C1FLTCON0 : longWord;
  20991. C1FLTCON0CLR : longWord;
  20992. C1FLTCON0SET : longWord;
  20993. C1FLTCON0INV : longWord;
  20994. C1FLTCON1bits : TCAN1_C1FLTCON1;
  20995. C1FLTCON1 : longWord;
  20996. C1FLTCON1CLR : longWord;
  20997. C1FLTCON1SET : longWord;
  20998. C1FLTCON1INV : longWord;
  20999. C1FLTCON2bits : TCAN1_C1FLTCON2;
  21000. C1FLTCON2 : longWord;
  21001. C1FLTCON2CLR : longWord;
  21002. C1FLTCON2SET : longWord;
  21003. C1FLTCON2INV : longWord;
  21004. C1FLTCON3bits : TCAN1_C1FLTCON3;
  21005. C1FLTCON3 : longWord;
  21006. C1FLTCON3CLR : longWord;
  21007. C1FLTCON3SET : longWord;
  21008. C1FLTCON3INV : longWord;
  21009. C1FLTCON4bits : TCAN1_C1FLTCON4;
  21010. C1FLTCON4 : longWord;
  21011. C1FLTCON4CLR : longWord;
  21012. C1FLTCON4SET : longWord;
  21013. C1FLTCON4INV : longWord;
  21014. C1FLTCON5bits : TCAN1_C1FLTCON5;
  21015. C1FLTCON5 : longWord;
  21016. C1FLTCON5CLR : longWord;
  21017. C1FLTCON5SET : longWord;
  21018. C1FLTCON5INV : longWord;
  21019. C1FLTCON6bits : TCAN1_C1FLTCON6;
  21020. C1FLTCON6 : longWord;
  21021. C1FLTCON6CLR : longWord;
  21022. C1FLTCON6SET : longWord;
  21023. C1FLTCON6INV : longWord;
  21024. C1FLTCON7bits : TCAN1_C1FLTCON7;
  21025. C1FLTCON7 : longWord;
  21026. C1FLTCON7CLR : longWord;
  21027. C1FLTCON7SET : longWord;
  21028. C1FLTCON7INV : longWord;
  21029. C1RXF0bits : TCAN1_C1RXF0;
  21030. C1RXF0 : longWord;
  21031. C1RXF0CLR : longWord;
  21032. C1RXF0SET : longWord;
  21033. C1RXF0INV : longWord;
  21034. C1RXF1bits : TCAN1_C1RXF1;
  21035. C1RXF1 : longWord;
  21036. C1RXF1CLR : longWord;
  21037. C1RXF1SET : longWord;
  21038. C1RXF1INV : longWord;
  21039. C1RXF2bits : TCAN1_C1RXF2;
  21040. C1RXF2 : longWord;
  21041. C1RXF2CLR : longWord;
  21042. C1RXF2SET : longWord;
  21043. C1RXF2INV : longWord;
  21044. C1RXF3bits : TCAN1_C1RXF3;
  21045. C1RXF3 : longWord;
  21046. C1RXF3CLR : longWord;
  21047. C1RXF3SET : longWord;
  21048. C1RXF3INV : longWord;
  21049. C1RXF4bits : TCAN1_C1RXF4;
  21050. C1RXF4 : longWord;
  21051. C1RXF4CLR : longWord;
  21052. C1RXF4SET : longWord;
  21053. C1RXF4INV : longWord;
  21054. C1RXF5bits : TCAN1_C1RXF5;
  21055. C1RXF5 : longWord;
  21056. C1RXF5CLR : longWord;
  21057. C1RXF5SET : longWord;
  21058. C1RXF5INV : longWord;
  21059. C1RXF6bits : TCAN1_C1RXF6;
  21060. C1RXF6 : longWord;
  21061. C1RXF6CLR : longWord;
  21062. C1RXF6SET : longWord;
  21063. C1RXF6INV : longWord;
  21064. C1RXF7bits : TCAN1_C1RXF7;
  21065. C1RXF7 : longWord;
  21066. C1RXF7CLR : longWord;
  21067. C1RXF7SET : longWord;
  21068. C1RXF7INV : longWord;
  21069. C1RXF8bits : TCAN1_C1RXF8;
  21070. C1RXF8 : longWord;
  21071. C1RXF8CLR : longWord;
  21072. C1RXF8SET : longWord;
  21073. C1RXF8INV : longWord;
  21074. C1RXF9bits : TCAN1_C1RXF9;
  21075. C1RXF9 : longWord;
  21076. C1RXF9CLR : longWord;
  21077. C1RXF9SET : longWord;
  21078. C1RXF9INV : longWord;
  21079. C1RXF10bits : TCAN1_C1RXF10;
  21080. C1RXF10 : longWord;
  21081. C1RXF10CLR : longWord;
  21082. C1RXF10SET : longWord;
  21083. C1RXF10INV : longWord;
  21084. C1RXF11bits : TCAN1_C1RXF11;
  21085. C1RXF11 : longWord;
  21086. C1RXF11CLR : longWord;
  21087. C1RXF11SET : longWord;
  21088. C1RXF11INV : longWord;
  21089. C1RXF12bits : TCAN1_C1RXF12;
  21090. C1RXF12 : longWord;
  21091. C1RXF12CLR : longWord;
  21092. C1RXF12SET : longWord;
  21093. C1RXF12INV : longWord;
  21094. C1RXF13bits : TCAN1_C1RXF13;
  21095. C1RXF13 : longWord;
  21096. C1RXF13CLR : longWord;
  21097. C1RXF13SET : longWord;
  21098. C1RXF13INV : longWord;
  21099. C1RXF14bits : TCAN1_C1RXF14;
  21100. C1RXF14 : longWord;
  21101. C1RXF14CLR : longWord;
  21102. C1RXF14SET : longWord;
  21103. C1RXF14INV : longWord;
  21104. C1RXF15bits : TCAN1_C1RXF15;
  21105. C1RXF15 : longWord;
  21106. C1RXF15CLR : longWord;
  21107. C1RXF15SET : longWord;
  21108. C1RXF15INV : longWord;
  21109. C1RXF16bits : TCAN1_C1RXF16;
  21110. C1RXF16 : longWord;
  21111. C1RXF16CLR : longWord;
  21112. C1RXF16SET : longWord;
  21113. C1RXF16INV : longWord;
  21114. C1RXF17bits : TCAN1_C1RXF17;
  21115. C1RXF17 : longWord;
  21116. C1RXF17CLR : longWord;
  21117. C1RXF17SET : longWord;
  21118. C1RXF17INV : longWord;
  21119. C1RXF18bits : TCAN1_C1RXF18;
  21120. C1RXF18 : longWord;
  21121. C1RXF18CLR : longWord;
  21122. C1RXF18SET : longWord;
  21123. C1RXF18INV : longWord;
  21124. C1RXF19bits : TCAN1_C1RXF19;
  21125. C1RXF19 : longWord;
  21126. C1RXF19CLR : longWord;
  21127. C1RXF19SET : longWord;
  21128. C1RXF19INV : longWord;
  21129. C1RXF20bits : TCAN1_C1RXF20;
  21130. C1RXF20 : longWord;
  21131. C1RXF20CLR : longWord;
  21132. C1RXF20SET : longWord;
  21133. C1RXF20INV : longWord;
  21134. C1RXF21bits : TCAN1_C1RXF21;
  21135. C1RXF21 : longWord;
  21136. C1RXF21CLR : longWord;
  21137. C1RXF21SET : longWord;
  21138. C1RXF21INV : longWord;
  21139. C1RXF22bits : TCAN1_C1RXF22;
  21140. C1RXF22 : longWord;
  21141. C1RXF22CLR : longWord;
  21142. C1RXF22SET : longWord;
  21143. C1RXF22INV : longWord;
  21144. C1RXF23bits : TCAN1_C1RXF23;
  21145. C1RXF23 : longWord;
  21146. C1RXF23CLR : longWord;
  21147. C1RXF23SET : longWord;
  21148. C1RXF23INV : longWord;
  21149. C1RXF24bits : TCAN1_C1RXF24;
  21150. C1RXF24 : longWord;
  21151. C1RXF24CLR : longWord;
  21152. C1RXF24SET : longWord;
  21153. C1RXF24INV : longWord;
  21154. C1RXF25bits : TCAN1_C1RXF25;
  21155. C1RXF25 : longWord;
  21156. C1RXF25CLR : longWord;
  21157. C1RXF25SET : longWord;
  21158. C1RXF25INV : longWord;
  21159. C1RXF26bits : TCAN1_C1RXF26;
  21160. C1RXF26 : longWord;
  21161. C1RXF26CLR : longWord;
  21162. C1RXF26SET : longWord;
  21163. C1RXF26INV : longWord;
  21164. C1RXF27bits : TCAN1_C1RXF27;
  21165. C1RXF27 : longWord;
  21166. C1RXF27CLR : longWord;
  21167. C1RXF27SET : longWord;
  21168. C1RXF27INV : longWord;
  21169. C1RXF28bits : TCAN1_C1RXF28;
  21170. C1RXF28 : longWord;
  21171. C1RXF28CLR : longWord;
  21172. C1RXF28SET : longWord;
  21173. C1RXF28INV : longWord;
  21174. C1RXF29bits : TCAN1_C1RXF29;
  21175. C1RXF29 : longWord;
  21176. C1RXF29CLR : longWord;
  21177. C1RXF29SET : longWord;
  21178. C1RXF29INV : longWord;
  21179. C1RXF30bits : TCAN1_C1RXF30;
  21180. C1RXF30 : longWord;
  21181. C1RXF30CLR : longWord;
  21182. C1RXF30SET : longWord;
  21183. C1RXF30INV : longWord;
  21184. C1RXF31bits : TCAN1_C1RXF31;
  21185. C1RXF31 : longWord;
  21186. C1RXF31CLR : longWord;
  21187. C1RXF31SET : longWord;
  21188. C1RXF31INV : longWord;
  21189. C1FIFOBA : longWord;
  21190. C1FIFOBACLR : longWord;
  21191. C1FIFOBASET : longWord;
  21192. C1FIFOBAINV : longWord;
  21193. C1FIFOCON0bits : TCAN1_C1FIFOCON0;
  21194. C1FIFOCON0 : longWord;
  21195. C1FIFOCON0CLR : longWord;
  21196. C1FIFOCON0SET : longWord;
  21197. C1FIFOCON0INV : longWord;
  21198. C1FIFOINT0bits : TCAN1_C1FIFOINT0;
  21199. C1FIFOINT0 : longWord;
  21200. C1FIFOINT0CLR : longWord;
  21201. C1FIFOINT0SET : longWord;
  21202. C1FIFOINT0INV : longWord;
  21203. C1FIFOUA0 : longWord;
  21204. C1FIFOUA0CLR : longWord;
  21205. C1FIFOUA0SET : longWord;
  21206. C1FIFOUA0INV : longWord;
  21207. C1FIFOCI0bits : TCAN1_C1FIFOCI0;
  21208. C1FIFOCI0 : longWord;
  21209. C1FIFOCI0CLR : longWord;
  21210. C1FIFOCI0SET : longWord;
  21211. C1FIFOCI0INV : longWord;
  21212. C1FIFOCON1bits : TCAN1_C1FIFOCON1;
  21213. C1FIFOCON1 : longWord;
  21214. C1FIFOCON1CLR : longWord;
  21215. C1FIFOCON1SET : longWord;
  21216. C1FIFOCON1INV : longWord;
  21217. C1FIFOINT1bits : TCAN1_C1FIFOINT1;
  21218. C1FIFOINT1 : longWord;
  21219. C1FIFOINT1CLR : longWord;
  21220. C1FIFOINT1SET : longWord;
  21221. C1FIFOINT1INV : longWord;
  21222. C1FIFOUA1 : longWord;
  21223. C1FIFOUA1CLR : longWord;
  21224. C1FIFOUA1SET : longWord;
  21225. C1FIFOUA1INV : longWord;
  21226. C1FIFOCI1bits : TCAN1_C1FIFOCI1;
  21227. C1FIFOCI1 : longWord;
  21228. C1FIFOCI1CLR : longWord;
  21229. C1FIFOCI1SET : longWord;
  21230. C1FIFOCI1INV : longWord;
  21231. C1FIFOCON2bits : TCAN1_C1FIFOCON2;
  21232. C1FIFOCON2 : longWord;
  21233. C1FIFOCON2CLR : longWord;
  21234. C1FIFOCON2SET : longWord;
  21235. C1FIFOCON2INV : longWord;
  21236. C1FIFOINT2bits : TCAN1_C1FIFOINT2;
  21237. C1FIFOINT2 : longWord;
  21238. C1FIFOINT2CLR : longWord;
  21239. C1FIFOINT2SET : longWord;
  21240. C1FIFOINT2INV : longWord;
  21241. C1FIFOUA2 : longWord;
  21242. C1FIFOUA2CLR : longWord;
  21243. C1FIFOUA2SET : longWord;
  21244. C1FIFOUA2INV : longWord;
  21245. C1FIFOCI2bits : TCAN1_C1FIFOCI2;
  21246. C1FIFOCI2 : longWord;
  21247. C1FIFOCI2CLR : longWord;
  21248. C1FIFOCI2SET : longWord;
  21249. C1FIFOCI2INV : longWord;
  21250. C1FIFOCON3bits : TCAN1_C1FIFOCON3;
  21251. C1FIFOCON3 : longWord;
  21252. C1FIFOCON3CLR : longWord;
  21253. C1FIFOCON3SET : longWord;
  21254. C1FIFOCON3INV : longWord;
  21255. C1FIFOINT3bits : TCAN1_C1FIFOINT3;
  21256. C1FIFOINT3 : longWord;
  21257. C1FIFOINT3CLR : longWord;
  21258. C1FIFOINT3SET : longWord;
  21259. C1FIFOINT3INV : longWord;
  21260. C1FIFOUA3 : longWord;
  21261. C1FIFOUA3CLR : longWord;
  21262. C1FIFOUA3SET : longWord;
  21263. C1FIFOUA3INV : longWord;
  21264. C1FIFOCI3bits : TCAN1_C1FIFOCI3;
  21265. C1FIFOCI3 : longWord;
  21266. C1FIFOCI3CLR : longWord;
  21267. C1FIFOCI3SET : longWord;
  21268. C1FIFOCI3INV : longWord;
  21269. C1FIFOCON4bits : TCAN1_C1FIFOCON4;
  21270. C1FIFOCON4 : longWord;
  21271. C1FIFOCON4CLR : longWord;
  21272. C1FIFOCON4SET : longWord;
  21273. C1FIFOCON4INV : longWord;
  21274. C1FIFOINT4bits : TCAN1_C1FIFOINT4;
  21275. C1FIFOINT4 : longWord;
  21276. C1FIFOINT4CLR : longWord;
  21277. C1FIFOINT4SET : longWord;
  21278. C1FIFOINT4INV : longWord;
  21279. C1FIFOUA4 : longWord;
  21280. C1FIFOUA4CLR : longWord;
  21281. C1FIFOUA4SET : longWord;
  21282. C1FIFOUA4INV : longWord;
  21283. C1FIFOCI4bits : TCAN1_C1FIFOCI4;
  21284. C1FIFOCI4 : longWord;
  21285. C1FIFOCI4CLR : longWord;
  21286. C1FIFOCI4SET : longWord;
  21287. C1FIFOCI4INV : longWord;
  21288. C1FIFOCON5bits : TCAN1_C1FIFOCON5;
  21289. C1FIFOCON5 : longWord;
  21290. C1FIFOCON5CLR : longWord;
  21291. C1FIFOCON5SET : longWord;
  21292. C1FIFOCON5INV : longWord;
  21293. C1FIFOINT5bits : TCAN1_C1FIFOINT5;
  21294. C1FIFOINT5 : longWord;
  21295. C1FIFOINT5CLR : longWord;
  21296. C1FIFOINT5SET : longWord;
  21297. C1FIFOINT5INV : longWord;
  21298. C1FIFOUA5 : longWord;
  21299. C1FIFOUA5CLR : longWord;
  21300. C1FIFOUA5SET : longWord;
  21301. C1FIFOUA5INV : longWord;
  21302. C1FIFOCI5bits : TCAN1_C1FIFOCI5;
  21303. C1FIFOCI5 : longWord;
  21304. C1FIFOCI5CLR : longWord;
  21305. C1FIFOCI5SET : longWord;
  21306. C1FIFOCI5INV : longWord;
  21307. C1FIFOCON6bits : TCAN1_C1FIFOCON6;
  21308. C1FIFOCON6 : longWord;
  21309. C1FIFOCON6CLR : longWord;
  21310. C1FIFOCON6SET : longWord;
  21311. C1FIFOCON6INV : longWord;
  21312. C1FIFOINT6bits : TCAN1_C1FIFOINT6;
  21313. C1FIFOINT6 : longWord;
  21314. C1FIFOINT6CLR : longWord;
  21315. C1FIFOINT6SET : longWord;
  21316. C1FIFOINT6INV : longWord;
  21317. C1FIFOUA6 : longWord;
  21318. C1FIFOUA6CLR : longWord;
  21319. C1FIFOUA6SET : longWord;
  21320. C1FIFOUA6INV : longWord;
  21321. C1FIFOCI6bits : TCAN1_C1FIFOCI6;
  21322. C1FIFOCI6 : longWord;
  21323. C1FIFOCI6CLR : longWord;
  21324. C1FIFOCI6SET : longWord;
  21325. C1FIFOCI6INV : longWord;
  21326. C1FIFOCON7bits : TCAN1_C1FIFOCON7;
  21327. C1FIFOCON7 : longWord;
  21328. C1FIFOCON7CLR : longWord;
  21329. C1FIFOCON7SET : longWord;
  21330. C1FIFOCON7INV : longWord;
  21331. C1FIFOINT7bits : TCAN1_C1FIFOINT7;
  21332. C1FIFOINT7 : longWord;
  21333. C1FIFOINT7CLR : longWord;
  21334. C1FIFOINT7SET : longWord;
  21335. C1FIFOINT7INV : longWord;
  21336. C1FIFOUA7 : longWord;
  21337. C1FIFOUA7CLR : longWord;
  21338. C1FIFOUA7SET : longWord;
  21339. C1FIFOUA7INV : longWord;
  21340. C1FIFOCI7bits : TCAN1_C1FIFOCI7;
  21341. C1FIFOCI7 : longWord;
  21342. C1FIFOCI7CLR : longWord;
  21343. C1FIFOCI7SET : longWord;
  21344. C1FIFOCI7INV : longWord;
  21345. C1FIFOCON8bits : TCAN1_C1FIFOCON8;
  21346. C1FIFOCON8 : longWord;
  21347. C1FIFOCON8CLR : longWord;
  21348. C1FIFOCON8SET : longWord;
  21349. C1FIFOCON8INV : longWord;
  21350. C1FIFOINT8bits : TCAN1_C1FIFOINT8;
  21351. C1FIFOINT8 : longWord;
  21352. C1FIFOINT8CLR : longWord;
  21353. C1FIFOINT8SET : longWord;
  21354. C1FIFOINT8INV : longWord;
  21355. C1FIFOUA8 : longWord;
  21356. C1FIFOUA8CLR : longWord;
  21357. C1FIFOUA8SET : longWord;
  21358. C1FIFOUA8INV : longWord;
  21359. C1FIFOCI8bits : TCAN1_C1FIFOCI8;
  21360. C1FIFOCI8 : longWord;
  21361. C1FIFOCI8CLR : longWord;
  21362. C1FIFOCI8SET : longWord;
  21363. C1FIFOCI8INV : longWord;
  21364. C1FIFOCON9bits : TCAN1_C1FIFOCON9;
  21365. C1FIFOCON9 : longWord;
  21366. C1FIFOCON9CLR : longWord;
  21367. C1FIFOCON9SET : longWord;
  21368. C1FIFOCON9INV : longWord;
  21369. C1FIFOINT9bits : TCAN1_C1FIFOINT9;
  21370. C1FIFOINT9 : longWord;
  21371. C1FIFOINT9CLR : longWord;
  21372. C1FIFOINT9SET : longWord;
  21373. C1FIFOINT9INV : longWord;
  21374. C1FIFOUA9 : longWord;
  21375. C1FIFOUA9CLR : longWord;
  21376. C1FIFOUA9SET : longWord;
  21377. C1FIFOUA9INV : longWord;
  21378. C1FIFOCI9bits : TCAN1_C1FIFOCI9;
  21379. C1FIFOCI9 : longWord;
  21380. C1FIFOCI9CLR : longWord;
  21381. C1FIFOCI9SET : longWord;
  21382. C1FIFOCI9INV : longWord;
  21383. C1FIFOCON10bits : TCAN1_C1FIFOCON10;
  21384. C1FIFOCON10 : longWord;
  21385. C1FIFOCON10CLR : longWord;
  21386. C1FIFOCON10SET : longWord;
  21387. C1FIFOCON10INV : longWord;
  21388. C1FIFOINT10bits : TCAN1_C1FIFOINT10;
  21389. C1FIFOINT10 : longWord;
  21390. C1FIFOINT10CLR : longWord;
  21391. C1FIFOINT10SET : longWord;
  21392. C1FIFOINT10INV : longWord;
  21393. C1FIFOUA10 : longWord;
  21394. C1FIFOUA10CLR : longWord;
  21395. C1FIFOUA10SET : longWord;
  21396. C1FIFOUA10INV : longWord;
  21397. C1FIFOCI10bits : TCAN1_C1FIFOCI10;
  21398. C1FIFOCI10 : longWord;
  21399. C1FIFOCI10CLR : longWord;
  21400. C1FIFOCI10SET : longWord;
  21401. C1FIFOCI10INV : longWord;
  21402. C1FIFOCON11bits : TCAN1_C1FIFOCON11;
  21403. C1FIFOCON11 : longWord;
  21404. C1FIFOCON11CLR : longWord;
  21405. C1FIFOCON11SET : longWord;
  21406. C1FIFOCON11INV : longWord;
  21407. C1FIFOINT11bits : TCAN1_C1FIFOINT11;
  21408. C1FIFOINT11 : longWord;
  21409. C1FIFOINT11CLR : longWord;
  21410. C1FIFOINT11SET : longWord;
  21411. C1FIFOINT11INV : longWord;
  21412. C1FIFOUA11 : longWord;
  21413. C1FIFOUA11CLR : longWord;
  21414. C1FIFOUA11SET : longWord;
  21415. C1FIFOUA11INV : longWord;
  21416. C1FIFOCI11bits : TCAN1_C1FIFOCI11;
  21417. C1FIFOCI11 : longWord;
  21418. C1FIFOCI11CLR : longWord;
  21419. C1FIFOCI11SET : longWord;
  21420. C1FIFOCI11INV : longWord;
  21421. C1FIFOCON12bits : TCAN1_C1FIFOCON12;
  21422. C1FIFOCON12 : longWord;
  21423. C1FIFOCON12CLR : longWord;
  21424. C1FIFOCON12SET : longWord;
  21425. C1FIFOCON12INV : longWord;
  21426. C1FIFOINT12bits : TCAN1_C1FIFOINT12;
  21427. C1FIFOINT12 : longWord;
  21428. C1FIFOINT12CLR : longWord;
  21429. C1FIFOINT12SET : longWord;
  21430. C1FIFOINT12INV : longWord;
  21431. C1FIFOUA12 : longWord;
  21432. C1FIFOUA12CLR : longWord;
  21433. C1FIFOUA12SET : longWord;
  21434. C1FIFOUA12INV : longWord;
  21435. C1FIFOCI12bits : TCAN1_C1FIFOCI12;
  21436. C1FIFOCI12 : longWord;
  21437. C1FIFOCI12CLR : longWord;
  21438. C1FIFOCI12SET : longWord;
  21439. C1FIFOCI12INV : longWord;
  21440. C1FIFOCON13bits : TCAN1_C1FIFOCON13;
  21441. C1FIFOCON13 : longWord;
  21442. C1FIFOCON13CLR : longWord;
  21443. C1FIFOCON13SET : longWord;
  21444. C1FIFOCON13INV : longWord;
  21445. C1FIFOINT13bits : TCAN1_C1FIFOINT13;
  21446. C1FIFOINT13 : longWord;
  21447. C1FIFOINT13CLR : longWord;
  21448. C1FIFOINT13SET : longWord;
  21449. C1FIFOINT13INV : longWord;
  21450. C1FIFOUA13 : longWord;
  21451. C1FIFOUA13CLR : longWord;
  21452. C1FIFOUA13SET : longWord;
  21453. C1FIFOUA13INV : longWord;
  21454. C1FIFOCI13bits : TCAN1_C1FIFOCI13;
  21455. C1FIFOCI13 : longWord;
  21456. C1FIFOCI13CLR : longWord;
  21457. C1FIFOCI13SET : longWord;
  21458. C1FIFOCI13INV : longWord;
  21459. C1FIFOCON14bits : TCAN1_C1FIFOCON14;
  21460. C1FIFOCON14 : longWord;
  21461. C1FIFOCON14CLR : longWord;
  21462. C1FIFOCON14SET : longWord;
  21463. C1FIFOCON14INV : longWord;
  21464. C1FIFOINT14bits : TCAN1_C1FIFOINT14;
  21465. C1FIFOINT14 : longWord;
  21466. C1FIFOINT14CLR : longWord;
  21467. C1FIFOINT14SET : longWord;
  21468. C1FIFOINT14INV : longWord;
  21469. C1FIFOUA14 : longWord;
  21470. C1FIFOUA14CLR : longWord;
  21471. C1FIFOUA14SET : longWord;
  21472. C1FIFOUA14INV : longWord;
  21473. C1FIFOCI14bits : TCAN1_C1FIFOCI14;
  21474. C1FIFOCI14 : longWord;
  21475. C1FIFOCI14CLR : longWord;
  21476. C1FIFOCI14SET : longWord;
  21477. C1FIFOCI14INV : longWord;
  21478. C1FIFOCON15bits : TCAN1_C1FIFOCON15;
  21479. C1FIFOCON15 : longWord;
  21480. C1FIFOCON15CLR : longWord;
  21481. C1FIFOCON15SET : longWord;
  21482. C1FIFOCON15INV : longWord;
  21483. C1FIFOINT15bits : TCAN1_C1FIFOINT15;
  21484. C1FIFOINT15 : longWord;
  21485. C1FIFOINT15CLR : longWord;
  21486. C1FIFOINT15SET : longWord;
  21487. C1FIFOINT15INV : longWord;
  21488. C1FIFOUA15 : longWord;
  21489. C1FIFOUA15CLR : longWord;
  21490. C1FIFOUA15SET : longWord;
  21491. C1FIFOUA15INV : longWord;
  21492. C1FIFOCI15bits : TCAN1_C1FIFOCI15;
  21493. C1FIFOCI15 : longWord;
  21494. C1FIFOCI15CLR : longWord;
  21495. C1FIFOCI15SET : longWord;
  21496. C1FIFOCI15INV : longWord;
  21497. C1FIFOCON16bits : TCAN1_C1FIFOCON16;
  21498. C1FIFOCON16 : longWord;
  21499. C1FIFOCON16CLR : longWord;
  21500. C1FIFOCON16SET : longWord;
  21501. C1FIFOCON16INV : longWord;
  21502. C1FIFOINT16bits : TCAN1_C1FIFOINT16;
  21503. C1FIFOINT16 : longWord;
  21504. C1FIFOINT16CLR : longWord;
  21505. C1FIFOINT16SET : longWord;
  21506. C1FIFOINT16INV : longWord;
  21507. C1FIFOUA16 : longWord;
  21508. C1FIFOUA16CLR : longWord;
  21509. C1FIFOUA16SET : longWord;
  21510. C1FIFOUA16INV : longWord;
  21511. C1FIFOCI16bits : TCAN1_C1FIFOCI16;
  21512. C1FIFOCI16 : longWord;
  21513. C1FIFOCI16CLR : longWord;
  21514. C1FIFOCI16SET : longWord;
  21515. C1FIFOCI16INV : longWord;
  21516. C1FIFOCON17bits : TCAN1_C1FIFOCON17;
  21517. C1FIFOCON17 : longWord;
  21518. C1FIFOCON17CLR : longWord;
  21519. C1FIFOCON17SET : longWord;
  21520. C1FIFOCON17INV : longWord;
  21521. C1FIFOINT17bits : TCAN1_C1FIFOINT17;
  21522. C1FIFOINT17 : longWord;
  21523. C1FIFOINT17CLR : longWord;
  21524. C1FIFOINT17SET : longWord;
  21525. C1FIFOINT17INV : longWord;
  21526. C1FIFOUA17 : longWord;
  21527. C1FIFOUA17CLR : longWord;
  21528. C1FIFOUA17SET : longWord;
  21529. C1FIFOUA17INV : longWord;
  21530. C1FIFOCI17bits : TCAN1_C1FIFOCI17;
  21531. C1FIFOCI17 : longWord;
  21532. C1FIFOCI17CLR : longWord;
  21533. C1FIFOCI17SET : longWord;
  21534. C1FIFOCI17INV : longWord;
  21535. C1FIFOCON18bits : TCAN1_C1FIFOCON18;
  21536. C1FIFOCON18 : longWord;
  21537. C1FIFOCON18CLR : longWord;
  21538. C1FIFOCON18SET : longWord;
  21539. C1FIFOCON18INV : longWord;
  21540. C1FIFOINT18bits : TCAN1_C1FIFOINT18;
  21541. C1FIFOINT18 : longWord;
  21542. C1FIFOINT18CLR : longWord;
  21543. C1FIFOINT18SET : longWord;
  21544. C1FIFOINT18INV : longWord;
  21545. C1FIFOUA18 : longWord;
  21546. C1FIFOUA18CLR : longWord;
  21547. C1FIFOUA18SET : longWord;
  21548. C1FIFOUA18INV : longWord;
  21549. C1FIFOCI18bits : TCAN1_C1FIFOCI18;
  21550. C1FIFOCI18 : longWord;
  21551. C1FIFOCI18CLR : longWord;
  21552. C1FIFOCI18SET : longWord;
  21553. C1FIFOCI18INV : longWord;
  21554. C1FIFOCON19bits : TCAN1_C1FIFOCON19;
  21555. C1FIFOCON19 : longWord;
  21556. C1FIFOCON19CLR : longWord;
  21557. C1FIFOCON19SET : longWord;
  21558. C1FIFOCON19INV : longWord;
  21559. C1FIFOINT19bits : TCAN1_C1FIFOINT19;
  21560. C1FIFOINT19 : longWord;
  21561. C1FIFOINT19CLR : longWord;
  21562. C1FIFOINT19SET : longWord;
  21563. C1FIFOINT19INV : longWord;
  21564. C1FIFOUA19 : longWord;
  21565. C1FIFOUA19CLR : longWord;
  21566. C1FIFOUA19SET : longWord;
  21567. C1FIFOUA19INV : longWord;
  21568. C1FIFOCI19bits : TCAN1_C1FIFOCI19;
  21569. C1FIFOCI19 : longWord;
  21570. C1FIFOCI19CLR : longWord;
  21571. C1FIFOCI19SET : longWord;
  21572. C1FIFOCI19INV : longWord;
  21573. C1FIFOCON20bits : TCAN1_C1FIFOCON20;
  21574. C1FIFOCON20 : longWord;
  21575. C1FIFOCON20CLR : longWord;
  21576. C1FIFOCON20SET : longWord;
  21577. C1FIFOCON20INV : longWord;
  21578. C1FIFOINT20bits : TCAN1_C1FIFOINT20;
  21579. C1FIFOINT20 : longWord;
  21580. C1FIFOINT20CLR : longWord;
  21581. C1FIFOINT20SET : longWord;
  21582. C1FIFOINT20INV : longWord;
  21583. C1FIFOUA20 : longWord;
  21584. C1FIFOUA20CLR : longWord;
  21585. C1FIFOUA20SET : longWord;
  21586. C1FIFOUA20INV : longWord;
  21587. C1FIFOCI20bits : TCAN1_C1FIFOCI20;
  21588. C1FIFOCI20 : longWord;
  21589. C1FIFOCI20CLR : longWord;
  21590. C1FIFOCI20SET : longWord;
  21591. C1FIFOCI20INV : longWord;
  21592. C1FIFOCON21bits : TCAN1_C1FIFOCON21;
  21593. C1FIFOCON21 : longWord;
  21594. C1FIFOCON21CLR : longWord;
  21595. C1FIFOCON21SET : longWord;
  21596. C1FIFOCON21INV : longWord;
  21597. C1FIFOINT21bits : TCAN1_C1FIFOINT21;
  21598. C1FIFOINT21 : longWord;
  21599. C1FIFOINT21CLR : longWord;
  21600. C1FIFOINT21SET : longWord;
  21601. C1FIFOINT21INV : longWord;
  21602. C1FIFOUA21 : longWord;
  21603. C1FIFOUA21CLR : longWord;
  21604. C1FIFOUA21SET : longWord;
  21605. C1FIFOUA21INV : longWord;
  21606. C1FIFOCI21bits : TCAN1_C1FIFOCI21;
  21607. C1FIFOCI21 : longWord;
  21608. C1FIFOCI21CLR : longWord;
  21609. C1FIFOCI21SET : longWord;
  21610. C1FIFOCI21INV : longWord;
  21611. C1FIFOCON22bits : TCAN1_C1FIFOCON22;
  21612. C1FIFOCON22 : longWord;
  21613. C1FIFOCON22CLR : longWord;
  21614. C1FIFOCON22SET : longWord;
  21615. C1FIFOCON22INV : longWord;
  21616. C1FIFOINT22bits : TCAN1_C1FIFOINT22;
  21617. C1FIFOINT22 : longWord;
  21618. C1FIFOINT22CLR : longWord;
  21619. C1FIFOINT22SET : longWord;
  21620. C1FIFOINT22INV : longWord;
  21621. C1FIFOUA22 : longWord;
  21622. C1FIFOUA22CLR : longWord;
  21623. C1FIFOUA22SET : longWord;
  21624. C1FIFOUA22INV : longWord;
  21625. C1FIFOCI22bits : TCAN1_C1FIFOCI22;
  21626. C1FIFOCI22 : longWord;
  21627. C1FIFOCI22CLR : longWord;
  21628. C1FIFOCI22SET : longWord;
  21629. C1FIFOCI22INV : longWord;
  21630. C1FIFOCON23bits : TCAN1_C1FIFOCON23;
  21631. C1FIFOCON23 : longWord;
  21632. C1FIFOCON23CLR : longWord;
  21633. C1FIFOCON23SET : longWord;
  21634. C1FIFOCON23INV : longWord;
  21635. C1FIFOINT23bits : TCAN1_C1FIFOINT23;
  21636. C1FIFOINT23 : longWord;
  21637. C1FIFOINT23CLR : longWord;
  21638. C1FIFOINT23SET : longWord;
  21639. C1FIFOINT23INV : longWord;
  21640. C1FIFOUA23 : longWord;
  21641. C1FIFOUA23CLR : longWord;
  21642. C1FIFOUA23SET : longWord;
  21643. C1FIFOUA23INV : longWord;
  21644. C1FIFOCI23bits : TCAN1_C1FIFOCI23;
  21645. C1FIFOCI23 : longWord;
  21646. C1FIFOCI23CLR : longWord;
  21647. C1FIFOCI23SET : longWord;
  21648. C1FIFOCI23INV : longWord;
  21649. C1FIFOCON24bits : TCAN1_C1FIFOCON24;
  21650. C1FIFOCON24 : longWord;
  21651. C1FIFOCON24CLR : longWord;
  21652. C1FIFOCON24SET : longWord;
  21653. C1FIFOCON24INV : longWord;
  21654. C1FIFOINT24bits : TCAN1_C1FIFOINT24;
  21655. C1FIFOINT24 : longWord;
  21656. C1FIFOINT24CLR : longWord;
  21657. C1FIFOINT24SET : longWord;
  21658. C1FIFOINT24INV : longWord;
  21659. C1FIFOUA24 : longWord;
  21660. C1FIFOUA24CLR : longWord;
  21661. C1FIFOUA24SET : longWord;
  21662. C1FIFOUA24INV : longWord;
  21663. C1FIFOCI24bits : TCAN1_C1FIFOCI24;
  21664. C1FIFOCI24 : longWord;
  21665. C1FIFOCI24CLR : longWord;
  21666. C1FIFOCI24SET : longWord;
  21667. C1FIFOCI24INV : longWord;
  21668. C1FIFOCON25bits : TCAN1_C1FIFOCON25;
  21669. C1FIFOCON25 : longWord;
  21670. C1FIFOCON25CLR : longWord;
  21671. C1FIFOCON25SET : longWord;
  21672. C1FIFOCON25INV : longWord;
  21673. C1FIFOINT25bits : TCAN1_C1FIFOINT25;
  21674. C1FIFOINT25 : longWord;
  21675. C1FIFOINT25CLR : longWord;
  21676. C1FIFOINT25SET : longWord;
  21677. C1FIFOINT25INV : longWord;
  21678. C1FIFOUA25 : longWord;
  21679. C1FIFOUA25CLR : longWord;
  21680. C1FIFOUA25SET : longWord;
  21681. C1FIFOUA25INV : longWord;
  21682. C1FIFOCI25bits : TCAN1_C1FIFOCI25;
  21683. C1FIFOCI25 : longWord;
  21684. C1FIFOCI25CLR : longWord;
  21685. C1FIFOCI25SET : longWord;
  21686. C1FIFOCI25INV : longWord;
  21687. C1FIFOCON26bits : TCAN1_C1FIFOCON26;
  21688. C1FIFOCON26 : longWord;
  21689. C1FIFOCON26CLR : longWord;
  21690. C1FIFOCON26SET : longWord;
  21691. C1FIFOCON26INV : longWord;
  21692. C1FIFOINT26bits : TCAN1_C1FIFOINT26;
  21693. C1FIFOINT26 : longWord;
  21694. C1FIFOINT26CLR : longWord;
  21695. C1FIFOINT26SET : longWord;
  21696. C1FIFOINT26INV : longWord;
  21697. C1FIFOUA26 : longWord;
  21698. C1FIFOUA26CLR : longWord;
  21699. C1FIFOUA26SET : longWord;
  21700. C1FIFOUA26INV : longWord;
  21701. C1FIFOCI26bits : TCAN1_C1FIFOCI26;
  21702. C1FIFOCI26 : longWord;
  21703. C1FIFOCI26CLR : longWord;
  21704. C1FIFOCI26SET : longWord;
  21705. C1FIFOCI26INV : longWord;
  21706. C1FIFOCON27bits : TCAN1_C1FIFOCON27;
  21707. C1FIFOCON27 : longWord;
  21708. C1FIFOCON27CLR : longWord;
  21709. C1FIFOCON27SET : longWord;
  21710. C1FIFOCON27INV : longWord;
  21711. C1FIFOINT27bits : TCAN1_C1FIFOINT27;
  21712. C1FIFOINT27 : longWord;
  21713. C1FIFOINT27CLR : longWord;
  21714. C1FIFOINT27SET : longWord;
  21715. C1FIFOINT27INV : longWord;
  21716. C1FIFOUA27 : longWord;
  21717. C1FIFOUA27CLR : longWord;
  21718. C1FIFOUA27SET : longWord;
  21719. C1FIFOUA27INV : longWord;
  21720. C1FIFOCI27bits : TCAN1_C1FIFOCI27;
  21721. C1FIFOCI27 : longWord;
  21722. C1FIFOCI27CLR : longWord;
  21723. C1FIFOCI27SET : longWord;
  21724. C1FIFOCI27INV : longWord;
  21725. C1FIFOCON28bits : TCAN1_C1FIFOCON28;
  21726. C1FIFOCON28 : longWord;
  21727. C1FIFOCON28CLR : longWord;
  21728. C1FIFOCON28SET : longWord;
  21729. C1FIFOCON28INV : longWord;
  21730. C1FIFOINT28bits : TCAN1_C1FIFOINT28;
  21731. C1FIFOINT28 : longWord;
  21732. C1FIFOINT28CLR : longWord;
  21733. C1FIFOINT28SET : longWord;
  21734. C1FIFOINT28INV : longWord;
  21735. C1FIFOUA28 : longWord;
  21736. C1FIFOUA28CLR : longWord;
  21737. C1FIFOUA28SET : longWord;
  21738. C1FIFOUA28INV : longWord;
  21739. C1FIFOCI28bits : TCAN1_C1FIFOCI28;
  21740. C1FIFOCI28 : longWord;
  21741. C1FIFOCI28CLR : longWord;
  21742. C1FIFOCI28SET : longWord;
  21743. C1FIFOCI28INV : longWord;
  21744. C1FIFOCON29bits : TCAN1_C1FIFOCON29;
  21745. C1FIFOCON29 : longWord;
  21746. C1FIFOCON29CLR : longWord;
  21747. C1FIFOCON29SET : longWord;
  21748. C1FIFOCON29INV : longWord;
  21749. C1FIFOINT29bits : TCAN1_C1FIFOINT29;
  21750. C1FIFOINT29 : longWord;
  21751. C1FIFOINT29CLR : longWord;
  21752. C1FIFOINT29SET : longWord;
  21753. C1FIFOINT29INV : longWord;
  21754. C1FIFOUA29 : longWord;
  21755. C1FIFOUA29CLR : longWord;
  21756. C1FIFOUA29SET : longWord;
  21757. C1FIFOUA29INV : longWord;
  21758. C1FIFOCI29bits : TCAN1_C1FIFOCI29;
  21759. C1FIFOCI29 : longWord;
  21760. C1FIFOCI29CLR : longWord;
  21761. C1FIFOCI29SET : longWord;
  21762. C1FIFOCI29INV : longWord;
  21763. C1FIFOCON30bits : TCAN1_C1FIFOCON30;
  21764. C1FIFOCON30 : longWord;
  21765. C1FIFOCON30CLR : longWord;
  21766. C1FIFOCON30SET : longWord;
  21767. C1FIFOCON30INV : longWord;
  21768. C1FIFOINT30bits : TCAN1_C1FIFOINT30;
  21769. C1FIFOINT30 : longWord;
  21770. C1FIFOINT30CLR : longWord;
  21771. C1FIFOINT30SET : longWord;
  21772. C1FIFOINT30INV : longWord;
  21773. C1FIFOUA30 : longWord;
  21774. C1FIFOUA30CLR : longWord;
  21775. C1FIFOUA30SET : longWord;
  21776. C1FIFOUA30INV : longWord;
  21777. C1FIFOCI30bits : TCAN1_C1FIFOCI30;
  21778. C1FIFOCI30 : longWord;
  21779. C1FIFOCI30CLR : longWord;
  21780. C1FIFOCI30SET : longWord;
  21781. C1FIFOCI30INV : longWord;
  21782. C1FIFOCON31bits : TCAN1_C1FIFOCON31;
  21783. C1FIFOCON31 : longWord;
  21784. C1FIFOCON31CLR : longWord;
  21785. C1FIFOCON31SET : longWord;
  21786. C1FIFOCON31INV : longWord;
  21787. C1FIFOINT31bits : TCAN1_C1FIFOINT31;
  21788. C1FIFOINT31 : longWord;
  21789. C1FIFOINT31CLR : longWord;
  21790. C1FIFOINT31SET : longWord;
  21791. C1FIFOINT31INV : longWord;
  21792. C1FIFOUA31 : longWord;
  21793. C1FIFOUA31CLR : longWord;
  21794. C1FIFOUA31SET : longWord;
  21795. C1FIFOUA31INV : longWord;
  21796. C1FIFOCI31bits : TCAN1_C1FIFOCI31;
  21797. C1FIFOCI31 : longWord;
  21798. C1FIFOCI31CLR : longWord;
  21799. C1FIFOCI31SET : longWord;
  21800. C1FIFOCI31INV : longWord;
  21801. end;
  21802. TDEVCFG_DEVCFG3 = record
  21803. private
  21804. function getFCANIO : TBits_1; inline;
  21805. function getFETHIO : TBits_1; inline;
  21806. function getFMIIEN : TBits_1; inline;
  21807. function getFSRSSEL : TBits_3; inline;
  21808. function getFUSBIDIO : TBits_1; inline;
  21809. function getFVBUSONIO : TBits_1; inline;
  21810. function getUSERID : TBits_16; inline;
  21811. function getw : TBits_32; inline;
  21812. procedure setFCANIO(thebits : TBits_1); inline;
  21813. procedure setFETHIO(thebits : TBits_1); inline;
  21814. procedure setFMIIEN(thebits : TBits_1); inline;
  21815. procedure setFSRSSEL(thebits : TBits_3); inline;
  21816. procedure setFUSBIDIO(thebits : TBits_1); inline;
  21817. procedure setFVBUSONIO(thebits : TBits_1); inline;
  21818. procedure setUSERID(thebits : TBits_16); inline;
  21819. procedure setw(thebits : TBits_32); inline;
  21820. public
  21821. procedure clearFCANIO; inline;
  21822. procedure clearFETHIO; inline;
  21823. procedure clearFMIIEN; inline;
  21824. procedure clearFUSBIDIO; inline;
  21825. procedure clearFVBUSONIO; inline;
  21826. procedure setFCANIO; inline;
  21827. procedure setFETHIO; inline;
  21828. procedure setFMIIEN; inline;
  21829. procedure setFUSBIDIO; inline;
  21830. procedure setFVBUSONIO; inline;
  21831. property FCANIO : TBits_1 read getFCANIO write setFCANIO;
  21832. property FETHIO : TBits_1 read getFETHIO write setFETHIO;
  21833. property FMIIEN : TBits_1 read getFMIIEN write setFMIIEN;
  21834. property FSRSSEL : TBits_3 read getFSRSSEL write setFSRSSEL;
  21835. property FUSBIDIO : TBits_1 read getFUSBIDIO write setFUSBIDIO;
  21836. property FVBUSONIO : TBits_1 read getFVBUSONIO write setFVBUSONIO;
  21837. property USERID : TBits_16 read getUSERID write setUSERID;
  21838. property w : TBits_32 read getw write setw;
  21839. end;
  21840. TDEVCFG_DEVCFG2 = record
  21841. private
  21842. function getFPLLIDIV : TBits_3; inline;
  21843. function getFPLLMUL : TBits_3; inline;
  21844. function getFPLLODIV : TBits_3; inline;
  21845. function getUPLLEN : TBits_1; inline;
  21846. function getUPLLIDIV : TBits_3; inline;
  21847. function getw : TBits_32; inline;
  21848. procedure setFPLLIDIV(thebits : TBits_3); inline;
  21849. procedure setFPLLMUL(thebits : TBits_3); inline;
  21850. procedure setFPLLODIV(thebits : TBits_3); inline;
  21851. procedure setUPLLEN(thebits : TBits_1); inline;
  21852. procedure setUPLLIDIV(thebits : TBits_3); inline;
  21853. procedure setw(thebits : TBits_32); inline;
  21854. public
  21855. procedure clearUPLLEN; inline;
  21856. procedure setUPLLEN; inline;
  21857. property FPLLIDIV : TBits_3 read getFPLLIDIV write setFPLLIDIV;
  21858. property FPLLMUL : TBits_3 read getFPLLMUL write setFPLLMUL;
  21859. property FPLLODIV : TBits_3 read getFPLLODIV write setFPLLODIV;
  21860. property UPLLEN : TBits_1 read getUPLLEN write setUPLLEN;
  21861. property UPLLIDIV : TBits_3 read getUPLLIDIV write setUPLLIDIV;
  21862. property w : TBits_32 read getw write setw;
  21863. end;
  21864. TDEVCFG_DEVCFG1 = record
  21865. private
  21866. function getFCKSM : TBits_2; inline;
  21867. function getFNOSC : TBits_3; inline;
  21868. function getFPBDIV : TBits_2; inline;
  21869. function getFSOSCEN : TBits_1; inline;
  21870. function getFWDTEN : TBits_1; inline;
  21871. function getIESO : TBits_1; inline;
  21872. function getOSCIOFNC : TBits_1; inline;
  21873. function getPOSCMOD : TBits_2; inline;
  21874. function getWDTPS : TBits_5; inline;
  21875. function getw : TBits_32; inline;
  21876. procedure setFCKSM(thebits : TBits_2); inline;
  21877. procedure setFNOSC(thebits : TBits_3); inline;
  21878. procedure setFPBDIV(thebits : TBits_2); inline;
  21879. procedure setFSOSCEN(thebits : TBits_1); inline;
  21880. procedure setFWDTEN(thebits : TBits_1); inline;
  21881. procedure setIESO(thebits : TBits_1); inline;
  21882. procedure setOSCIOFNC(thebits : TBits_1); inline;
  21883. procedure setPOSCMOD(thebits : TBits_2); inline;
  21884. procedure setWDTPS(thebits : TBits_5); inline;
  21885. procedure setw(thebits : TBits_32); inline;
  21886. public
  21887. procedure clearFSOSCEN; inline;
  21888. procedure clearFWDTEN; inline;
  21889. procedure clearIESO; inline;
  21890. procedure clearOSCIOFNC; inline;
  21891. procedure setFSOSCEN; inline;
  21892. procedure setFWDTEN; inline;
  21893. procedure setIESO; inline;
  21894. procedure setOSCIOFNC; inline;
  21895. property FCKSM : TBits_2 read getFCKSM write setFCKSM;
  21896. property FNOSC : TBits_3 read getFNOSC write setFNOSC;
  21897. property FPBDIV : TBits_2 read getFPBDIV write setFPBDIV;
  21898. property FSOSCEN : TBits_1 read getFSOSCEN write setFSOSCEN;
  21899. property FWDTEN : TBits_1 read getFWDTEN write setFWDTEN;
  21900. property IESO : TBits_1 read getIESO write setIESO;
  21901. property OSCIOFNC : TBits_1 read getOSCIOFNC write setOSCIOFNC;
  21902. property POSCMOD : TBits_2 read getPOSCMOD write setPOSCMOD;
  21903. property WDTPS : TBits_5 read getWDTPS write setWDTPS;
  21904. property w : TBits_32 read getw write setw;
  21905. end;
  21906. TDEVCFG_DEVCFG0 = record
  21907. private
  21908. function getBWP : TBits_1; inline;
  21909. function getCP : TBits_1; inline;
  21910. function getDEBUG : TBits_2; inline;
  21911. function getFDEBUG : TBits_2; inline;
  21912. function getICESEL : TBits_1; inline;
  21913. function getPWP : TBits_8; inline;
  21914. function getw : TBits_32; inline;
  21915. procedure setBWP(thebits : TBits_1); inline;
  21916. procedure setCP(thebits : TBits_1); inline;
  21917. procedure setDEBUG(thebits : TBits_2); inline;
  21918. procedure setFDEBUG(thebits : TBits_2); inline;
  21919. procedure setICESEL(thebits : TBits_1); inline;
  21920. procedure setPWP(thebits : TBits_8); inline;
  21921. procedure setw(thebits : TBits_32); inline;
  21922. public
  21923. procedure clearBWP; inline;
  21924. procedure clearCP; inline;
  21925. procedure clearICESEL; inline;
  21926. procedure setBWP; inline;
  21927. procedure setCP; inline;
  21928. procedure setICESEL; inline;
  21929. property BWP : TBits_1 read getBWP write setBWP;
  21930. property CP : TBits_1 read getCP write setCP;
  21931. property DEBUG : TBits_2 read getDEBUG write setDEBUG;
  21932. property FDEBUG : TBits_2 read getFDEBUG write setFDEBUG;
  21933. property ICESEL : TBits_1 read getICESEL write setICESEL;
  21934. property PWP : TBits_8 read getPWP write setPWP;
  21935. property w : TBits_32 read getw write setw;
  21936. end;
  21937. const
  21938. _CORE_TIMER_IRQ = 0;
  21939. _CORE_SOFTWARE_0_IRQ = 1;
  21940. _CORE_SOFTWARE_1_IRQ = 2;
  21941. _EXTERNAL_0_IRQ = 3;
  21942. _TIMER_1_IRQ = 4;
  21943. _INPUT_CAPTURE_1_IRQ = 5;
  21944. _OUTPUT_COMPARE_1_IRQ = 6;
  21945. _EXTERNAL_1_IRQ = 7;
  21946. _TIMER_2_IRQ = 8;
  21947. _INPUT_CAPTURE_2_IRQ = 9;
  21948. _OUTPUT_COMPARE_2_IRQ = 10;
  21949. _EXTERNAL_2_IRQ = 11;
  21950. _TIMER_3_IRQ = 12;
  21951. _INPUT_CAPTURE_3_IRQ = 13;
  21952. _OUTPUT_COMPARE_3_IRQ = 14;
  21953. _EXTERNAL_3_IRQ = 15;
  21954. _TIMER_4_IRQ = 16;
  21955. _INPUT_CAPTURE_4_IRQ = 17;
  21956. _OUTPUT_COMPARE_4_IRQ = 18;
  21957. _EXTERNAL_4_IRQ = 19;
  21958. _TIMER_5_IRQ = 20;
  21959. _INPUT_CAPTURE_5_IRQ = 21;
  21960. _OUTPUT_COMPARE_5_IRQ = 22;
  21961. _I2C1A_ERR_IRQ = 26;
  21962. _I2C3_BUS_IRQ = 26;
  21963. _SPI1A_ERR_IRQ = 26;
  21964. _SPI3_ERR_IRQ = 26;
  21965. _UART1A_ERR_IRQ = 26;
  21966. _UART1_ERR_IRQ = 26;
  21967. _I2C1A_RX_IRQ = 27;
  21968. _I2C3_SLAVE_IRQ = 27;
  21969. _SPI1A_RX_IRQ = 27;
  21970. _SPI3_RX_IRQ = 27;
  21971. _UART1A_RX_IRQ = 27;
  21972. _UART1_RX_IRQ = 27;
  21973. _I2C1A_TX_IRQ = 28;
  21974. _I2C3_MASTER_IRQ = 28;
  21975. _SPI1A_TX_IRQ = 28;
  21976. _SPI3_TX_IRQ = 28;
  21977. _UART1A_TX_IRQ = 28;
  21978. _UART1_TX_IRQ = 28;
  21979. _I2C1_BUS_IRQ = 29;
  21980. _I2C1_SLAVE_IRQ = 30;
  21981. _I2C1_MASTER_IRQ = 31;
  21982. _CHANGE_NOTICE_IRQ = 32;
  21983. _ADC_IRQ = 33;
  21984. _PMP_IRQ = 34;
  21985. _COMPARATOR_1_IRQ = 35;
  21986. _COMPARATOR_2_IRQ = 36;
  21987. _I2C2A_ERR_IRQ = 37;
  21988. _I2C4_BUS_IRQ = 37;
  21989. _SPI2_ERR_IRQ = 37;
  21990. _SPI2A_ERR_IRQ = 37;
  21991. _UART2A_ERR_IRQ = 37;
  21992. _UART3_ERR_IRQ = 37;
  21993. _I2C2A_RX_IRQ = 38;
  21994. _I2C4_SLAVE_IRQ = 38;
  21995. _SPI2_RX_IRQ = 38;
  21996. _SPI2A_RX_IRQ = 38;
  21997. _UART2A_RX_IRQ = 38;
  21998. _UART3_RX_IRQ = 38;
  21999. _I2C2A_TX_IRQ = 39;
  22000. _I2C4_MASTER_IRQ = 39;
  22001. _SPI2A_TX_IRQ = 39;
  22002. _SPI2_TX_IRQ = 39;
  22003. _UART2A_TX_IRQ = 39;
  22004. _UART3_TX_IRQ = 39;
  22005. _I2C3A_ERR_IRQ = 40;
  22006. _I2C5_BUS_IRQ = 40;
  22007. _SPI3A_ERR_IRQ = 40;
  22008. _SPI4_ERR_IRQ = 40;
  22009. _UART2_ERR_IRQ = 40;
  22010. _UART3A_ERR_IRQ = 40;
  22011. _I2C3A_RX_IRQ = 41;
  22012. _I2C5_SLAVE_IRQ = 41;
  22013. _SPI3A_RX_IRQ = 41;
  22014. _SPI4_RX_IRQ = 41;
  22015. _UART2_RX_IRQ = 41;
  22016. _UART3A_RX_IRQ = 41;
  22017. _I2C3A_TX_IRQ = 42;
  22018. _I2C5_MASTER_IRQ = 42;
  22019. _SPI3A_TX_IRQ = 42;
  22020. _SPI4_TX_IRQ = 42;
  22021. _UART2_TX_IRQ = 42;
  22022. _UART3A_TX_IRQ = 42;
  22023. _FAIL_SAFE_MONITOR_IRQ = 46;
  22024. _RTCC_IRQ = 47;
  22025. _DMA0_IRQ = 48;
  22026. _DMA1_IRQ = 49;
  22027. _DMA2_IRQ = 50;
  22028. _DMA3_IRQ = 51;
  22029. _FLASH_CONTROL_IRQ = 56;
  22030. _USB_IRQ = 57;
  22031. _CAN1_IRQ = 58;
  22032. _ETHERNET_IRQ = 60;
  22033. _INPUT_CAPTURE_ERROR_1_IRQ = 61;
  22034. _INPUT_CAPTURE_ERROR_2_IRQ = 62;
  22035. _INPUT_CAPTURE_ERROR_3_IRQ = 63;
  22036. _INPUT_CAPTURE_ERROR_4_IRQ = 64;
  22037. _INPUT_CAPTURE_ERROR_5_IRQ = 65;
  22038. _PMP_ERROR_IRQ = 66;
  22039. _UART1B_ERR_IRQ = 67;
  22040. _UART4_ERR_IRQ = 67;
  22041. _UART1B_RX_IRQ = 68;
  22042. _UART4_RX_IRQ = 68;
  22043. _UART1B_TX_IRQ = 69;
  22044. _UART4_TX_IRQ = 69;
  22045. _UART2B_ERR_IRQ = 70;
  22046. _UART6_ERR_IRQ = 70;
  22047. _UART2B_RX_IRQ = 71;
  22048. _UART6_RX_IRQ = 71;
  22049. _UART2B_TX_IRQ = 72;
  22050. _UART6_TX_IRQ = 72;
  22051. _UART3B_ERR_IRQ = 73;
  22052. _UART5_ERR_IRQ = 73;
  22053. _UART3B_RX_IRQ = 74;
  22054. _UART5_RX_IRQ = 74;
  22055. _UART3B_TX_IRQ = 75;
  22056. _UART5_TX_IRQ = 75;
  22057. const
  22058. ADC10_BASE_ADDRESS = $BF809000;
  22059. var
  22060. ADC10 : TADC10Registers absolute ADC10_BASE_ADDRESS;
  22061. const
  22062. BMX_BASE_ADDRESS = $BF882000;
  22063. var
  22064. BMX : TBMXRegisters absolute BMX_BASE_ADDRESS;
  22065. const
  22066. CAN1_BASE_ADDRESS = $BF88B000;
  22067. var
  22068. CAN1 : TCAN1Registers absolute CAN1_BASE_ADDRESS;
  22069. const
  22070. CFG_BASE_ADDRESS = $BF80F200;
  22071. var
  22072. CFG : TCFGRegisters absolute CFG_BASE_ADDRESS;
  22073. const
  22074. CMP_BASE_ADDRESS = $BF80A000;
  22075. var
  22076. CMP : TCMPRegisters absolute CMP_BASE_ADDRESS;
  22077. const
  22078. CVR_BASE_ADDRESS = $BF809800;
  22079. var
  22080. CVR : TCVRRegisters absolute CVR_BASE_ADDRESS;
  22081. const
  22082. DMAC_BASE_ADDRESS = $BF883000;
  22083. var
  22084. DMAC : TDMACRegisters absolute DMAC_BASE_ADDRESS;
  22085. const
  22086. DMAC0_BASE_ADDRESS = $BF883060;
  22087. var
  22088. DMAC0 : TDMAC0Registers absolute DMAC0_BASE_ADDRESS;
  22089. const
  22090. DMAC1_BASE_ADDRESS = $BF883120;
  22091. var
  22092. DMAC1 : TDMAC1Registers absolute DMAC1_BASE_ADDRESS;
  22093. const
  22094. DMAC2_BASE_ADDRESS = $BF8831E0;
  22095. var
  22096. DMAC2 : TDMAC2Registers absolute DMAC2_BASE_ADDRESS;
  22097. const
  22098. DMAC3_BASE_ADDRESS = $BF8832A0;
  22099. var
  22100. DMAC3 : TDMAC3Registers absolute DMAC3_BASE_ADDRESS;
  22101. const
  22102. ETH_BASE_ADDRESS = $BF889000;
  22103. var
  22104. ETH : TETHRegisters absolute ETH_BASE_ADDRESS;
  22105. const
  22106. I2C1_BASE_ADDRESS = $BF805300;
  22107. var
  22108. I2C1 : TI2C1Registers absolute I2C1_BASE_ADDRESS;
  22109. const
  22110. I2C1A_BASE_ADDRESS = $BF805000;
  22111. var
  22112. I2C1A : TI2C1ARegisters absolute I2C1A_BASE_ADDRESS;
  22113. const
  22114. I2C2A_BASE_ADDRESS = $BF805100;
  22115. var
  22116. I2C2A : TI2C2ARegisters absolute I2C2A_BASE_ADDRESS;
  22117. const
  22118. I2C5_BASE_ADDRESS = $BF805200;
  22119. var
  22120. I2C5 : TI2C5Registers absolute I2C5_BASE_ADDRESS;
  22121. const
  22122. ICAP1_BASE_ADDRESS = $BF802000;
  22123. var
  22124. ICAP1 : TICAP1Registers absolute ICAP1_BASE_ADDRESS;
  22125. const
  22126. ICAP2_BASE_ADDRESS = $BF802200;
  22127. var
  22128. ICAP2 : TICAP2Registers absolute ICAP2_BASE_ADDRESS;
  22129. const
  22130. ICAP3_BASE_ADDRESS = $BF802400;
  22131. var
  22132. ICAP3 : TICAP3Registers absolute ICAP3_BASE_ADDRESS;
  22133. const
  22134. ICAP4_BASE_ADDRESS = $BF802600;
  22135. var
  22136. ICAP4 : TICAP4Registers absolute ICAP4_BASE_ADDRESS;
  22137. const
  22138. ICAP5_BASE_ADDRESS = $BF802800;
  22139. var
  22140. ICAP5 : TICAP5Registers absolute ICAP5_BASE_ADDRESS;
  22141. const
  22142. INT_BASE_ADDRESS = $BF881000;
  22143. var
  22144. INT : TINTRegisters absolute INT_BASE_ADDRESS;
  22145. const
  22146. NVM_BASE_ADDRESS = $BF80F400;
  22147. var
  22148. NVM : TNVMRegisters absolute NVM_BASE_ADDRESS;
  22149. const
  22150. OCMP1_BASE_ADDRESS = $BF803000;
  22151. var
  22152. OCMP1 : TOCMP1Registers absolute OCMP1_BASE_ADDRESS;
  22153. const
  22154. OCMP2_BASE_ADDRESS = $BF803200;
  22155. var
  22156. OCMP2 : TOCMP2Registers absolute OCMP2_BASE_ADDRESS;
  22157. const
  22158. OCMP3_BASE_ADDRESS = $BF803400;
  22159. var
  22160. OCMP3 : TOCMP3Registers absolute OCMP3_BASE_ADDRESS;
  22161. const
  22162. OCMP4_BASE_ADDRESS = $BF803600;
  22163. var
  22164. OCMP4 : TOCMP4Registers absolute OCMP4_BASE_ADDRESS;
  22165. const
  22166. OCMP5_BASE_ADDRESS = $BF803800;
  22167. var
  22168. OCMP5 : TOCMP5Registers absolute OCMP5_BASE_ADDRESS;
  22169. const
  22170. OSC_BASE_ADDRESS = $BF80F000;
  22171. var
  22172. OSC : TOSCRegisters absolute OSC_BASE_ADDRESS;
  22173. const
  22174. PCACHE_BASE_ADDRESS = $BF884000;
  22175. var
  22176. PCACHE : TPCACHERegisters absolute PCACHE_BASE_ADDRESS;
  22177. const
  22178. PMP_BASE_ADDRESS = $BF807000;
  22179. var
  22180. PMP : TPMPRegisters absolute PMP_BASE_ADDRESS;
  22181. const
  22182. PORTB_BASE_ADDRESS = $BF886040;
  22183. var
  22184. PORTB : TPORTBRegisters absolute PORTB_BASE_ADDRESS;
  22185. const
  22186. PORTC_BASE_ADDRESS = $BF886080;
  22187. var
  22188. PORTC : TPORTCRegisters absolute PORTC_BASE_ADDRESS;
  22189. const
  22190. PORTD_BASE_ADDRESS = $BF8860C0;
  22191. var
  22192. PORTD : TPORTDRegisters absolute PORTD_BASE_ADDRESS;
  22193. const
  22194. PORTE_BASE_ADDRESS = $BF886100;
  22195. var
  22196. PORTE : TPORTERegisters absolute PORTE_BASE_ADDRESS;
  22197. const
  22198. PORTF_BASE_ADDRESS = $BF886140;
  22199. var
  22200. PORTF : TPORTFRegisters absolute PORTF_BASE_ADDRESS;
  22201. const
  22202. PORTG_BASE_ADDRESS = $BF886180;
  22203. var
  22204. PORTG : TPORTGRegisters absolute PORTG_BASE_ADDRESS;
  22205. const
  22206. RCON_BASE_ADDRESS = $BF80F600;
  22207. var
  22208. RCON : TRCONRegisters absolute RCON_BASE_ADDRESS;
  22209. const
  22210. RTCC_BASE_ADDRESS = $BF800200;
  22211. var
  22212. RTCC : TRTCCRegisters absolute RTCC_BASE_ADDRESS;
  22213. const
  22214. SPI2A_BASE_ADDRESS = $BF805A00;
  22215. var
  22216. SPI2A : TSPI2ARegisters absolute SPI2A_BASE_ADDRESS;
  22217. const
  22218. SPI3_BASE_ADDRESS = $BF805800;
  22219. var
  22220. SPI3 : TSPI3Registers absolute SPI3_BASE_ADDRESS;
  22221. const
  22222. SPI4_BASE_ADDRESS = $BF805C00;
  22223. var
  22224. SPI4 : TSPI4Registers absolute SPI4_BASE_ADDRESS;
  22225. const
  22226. TMR1_BASE_ADDRESS = $BF800600;
  22227. var
  22228. TMR1 : TTMR1Registers absolute TMR1_BASE_ADDRESS;
  22229. const
  22230. TMR2_BASE_ADDRESS = $BF800800;
  22231. var
  22232. TMR2 : TTMR2Registers absolute TMR2_BASE_ADDRESS;
  22233. const
  22234. TMR3_BASE_ADDRESS = $BF800A00;
  22235. var
  22236. TMR3 : TTMR3Registers absolute TMR3_BASE_ADDRESS;
  22237. const
  22238. TMR4_BASE_ADDRESS = $BF800C00;
  22239. var
  22240. TMR4 : TTMR4Registers absolute TMR4_BASE_ADDRESS;
  22241. const
  22242. TMR5_BASE_ADDRESS = $BF800E00;
  22243. var
  22244. TMR5 : TTMR5Registers absolute TMR5_BASE_ADDRESS;
  22245. const
  22246. UART1A_BASE_ADDRESS = $BF806000;
  22247. var
  22248. UART1A : TUART1ARegisters absolute UART1A_BASE_ADDRESS;
  22249. const
  22250. UART1B_BASE_ADDRESS = $BF806200;
  22251. var
  22252. UART1B : TUART1BRegisters absolute UART1B_BASE_ADDRESS;
  22253. const
  22254. UART2A_BASE_ADDRESS = $BF806400;
  22255. var
  22256. UART2A : TUART2ARegisters absolute UART2A_BASE_ADDRESS;
  22257. const
  22258. UART2B_BASE_ADDRESS = $BF806600;
  22259. var
  22260. UART2B : TUART2BRegisters absolute UART2B_BASE_ADDRESS;
  22261. const
  22262. UART3A_BASE_ADDRESS = $BF806800;
  22263. var
  22264. UART3A : TUART3ARegisters absolute UART3A_BASE_ADDRESS;
  22265. const
  22266. UART3B_BASE_ADDRESS = $BF806A00;
  22267. var
  22268. UART3B : TUART3BRegisters absolute UART3B_BASE_ADDRESS;
  22269. const
  22270. USB_BASE_ADDRESS = $BF885040;
  22271. var
  22272. USB : TUSBRegisters absolute USB_BASE_ADDRESS;
  22273. const
  22274. WDT_BASE_ADDRESS = $BF800000;
  22275. var
  22276. WDT : TWDTRegisters absolute WDT_BASE_ADDRESS;
  22277. const
  22278. _APPI_BASE_ADDRESS = $BF880190;
  22279. var
  22280. _APPI : T_APPIRegisters absolute _APPI_BASE_ADDRESS;
  22281. const
  22282. _APPO_BASE_ADDRESS = $BF880180;
  22283. var
  22284. _APPO : T_APPORegisters absolute _APPO_BASE_ADDRESS;
  22285. const
  22286. _DDPSTAT_BASE_ADDRESS = $BF880140;
  22287. var
  22288. _DDPSTAT : T_DDPSTATRegisters absolute _DDPSTAT_BASE_ADDRESS;
  22289. const
  22290. _STRO_BASE_ADDRESS = $BF880170;
  22291. var
  22292. _STRO : T_STRORegisters absolute _STRO_BASE_ADDRESS;
  22293. implementation
  22294. type
  22295. TDefRegMap = record
  22296. val : longWord;
  22297. clr : longWord;
  22298. &set : longWord;
  22299. inv : longWord;
  22300. end;
  22301. pTDefRegMap = ^TDefRegMap;
  22302. procedure TWDT_WDTCON.setWDTCLR; inline;
  22303. begin
  22304. pTDefRegMap(@Self)^.&set := $00000001;
  22305. end;
  22306. procedure TWDT_WDTCON.clearWDTCLR; inline;
  22307. begin
  22308. pTDefRegMap(@Self)^.clr := $00000001;
  22309. end;
  22310. procedure TWDT_WDTCON.setWDTCLR(thebits : TBits_1); inline;
  22311. begin
  22312. if thebits = 0 then
  22313. pTDefRegMap(@Self)^.clr := $00000001
  22314. else
  22315. pTDefRegMap(@Self)^.&set := $00000001;
  22316. end;
  22317. function TWDT_WDTCON.getWDTCLR : TBits_1; inline;
  22318. begin
  22319. getWDTCLR := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  22320. end;
  22321. procedure TWDT_WDTCON.setSWDTPS(thebits : TBits_5); inline;
  22322. begin
  22323. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  22324. end;
  22325. function TWDT_WDTCON.getSWDTPS : TBits_5; inline;
  22326. begin
  22327. getSWDTPS := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  22328. end;
  22329. procedure TWDT_WDTCON.setON; inline;
  22330. begin
  22331. pTDefRegMap(@Self)^.&set := $00008000;
  22332. end;
  22333. procedure TWDT_WDTCON.clearON; inline;
  22334. begin
  22335. pTDefRegMap(@Self)^.clr := $00008000;
  22336. end;
  22337. procedure TWDT_WDTCON.setON(thebits : TBits_1); inline;
  22338. begin
  22339. if thebits = 0 then
  22340. pTDefRegMap(@Self)^.clr := $00008000
  22341. else
  22342. pTDefRegMap(@Self)^.&set := $00008000;
  22343. end;
  22344. function TWDT_WDTCON.getON : TBits_1; inline;
  22345. begin
  22346. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22347. end;
  22348. procedure TWDT_WDTCON.setSWDTPS0; inline;
  22349. begin
  22350. pTDefRegMap(@Self)^.&set := $00000004;
  22351. end;
  22352. procedure TWDT_WDTCON.clearSWDTPS0; inline;
  22353. begin
  22354. pTDefRegMap(@Self)^.clr := $00000004;
  22355. end;
  22356. procedure TWDT_WDTCON.setSWDTPS0(thebits : TBits_1); inline;
  22357. begin
  22358. if thebits = 0 then
  22359. pTDefRegMap(@Self)^.clr := $00000004
  22360. else
  22361. pTDefRegMap(@Self)^.&set := $00000004;
  22362. end;
  22363. function TWDT_WDTCON.getSWDTPS0 : TBits_1; inline;
  22364. begin
  22365. getSWDTPS0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  22366. end;
  22367. procedure TWDT_WDTCON.setSWDTPS1; inline;
  22368. begin
  22369. pTDefRegMap(@Self)^.&set := $00000008;
  22370. end;
  22371. procedure TWDT_WDTCON.clearSWDTPS1; inline;
  22372. begin
  22373. pTDefRegMap(@Self)^.clr := $00000008;
  22374. end;
  22375. procedure TWDT_WDTCON.setSWDTPS1(thebits : TBits_1); inline;
  22376. begin
  22377. if thebits = 0 then
  22378. pTDefRegMap(@Self)^.clr := $00000008
  22379. else
  22380. pTDefRegMap(@Self)^.&set := $00000008;
  22381. end;
  22382. function TWDT_WDTCON.getSWDTPS1 : TBits_1; inline;
  22383. begin
  22384. getSWDTPS1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  22385. end;
  22386. procedure TWDT_WDTCON.setSWDTPS2; inline;
  22387. begin
  22388. pTDefRegMap(@Self)^.&set := $00000010;
  22389. end;
  22390. procedure TWDT_WDTCON.clearSWDTPS2; inline;
  22391. begin
  22392. pTDefRegMap(@Self)^.clr := $00000010;
  22393. end;
  22394. procedure TWDT_WDTCON.setSWDTPS2(thebits : TBits_1); inline;
  22395. begin
  22396. if thebits = 0 then
  22397. pTDefRegMap(@Self)^.clr := $00000010
  22398. else
  22399. pTDefRegMap(@Self)^.&set := $00000010;
  22400. end;
  22401. function TWDT_WDTCON.getSWDTPS2 : TBits_1; inline;
  22402. begin
  22403. getSWDTPS2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  22404. end;
  22405. procedure TWDT_WDTCON.setSWDTPS3; inline;
  22406. begin
  22407. pTDefRegMap(@Self)^.&set := $00000020;
  22408. end;
  22409. procedure TWDT_WDTCON.clearSWDTPS3; inline;
  22410. begin
  22411. pTDefRegMap(@Self)^.clr := $00000020;
  22412. end;
  22413. procedure TWDT_WDTCON.setSWDTPS3(thebits : TBits_1); inline;
  22414. begin
  22415. if thebits = 0 then
  22416. pTDefRegMap(@Self)^.clr := $00000020
  22417. else
  22418. pTDefRegMap(@Self)^.&set := $00000020;
  22419. end;
  22420. function TWDT_WDTCON.getSWDTPS3 : TBits_1; inline;
  22421. begin
  22422. getSWDTPS3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  22423. end;
  22424. procedure TWDT_WDTCON.setSWDTPS4; inline;
  22425. begin
  22426. pTDefRegMap(@Self)^.&set := $00000040;
  22427. end;
  22428. procedure TWDT_WDTCON.clearSWDTPS4; inline;
  22429. begin
  22430. pTDefRegMap(@Self)^.clr := $00000040;
  22431. end;
  22432. procedure TWDT_WDTCON.setSWDTPS4(thebits : TBits_1); inline;
  22433. begin
  22434. if thebits = 0 then
  22435. pTDefRegMap(@Self)^.clr := $00000040
  22436. else
  22437. pTDefRegMap(@Self)^.&set := $00000040;
  22438. end;
  22439. function TWDT_WDTCON.getSWDTPS4 : TBits_1; inline;
  22440. begin
  22441. getSWDTPS4 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  22442. end;
  22443. procedure TWDT_WDTCON.setWDTPSTA(thebits : TBits_5); inline;
  22444. begin
  22445. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  22446. end;
  22447. function TWDT_WDTCON.getWDTPSTA : TBits_5; inline;
  22448. begin
  22449. getWDTPSTA := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  22450. end;
  22451. procedure TWDT_WDTCON.setWDTPS(thebits : TBits_5); inline;
  22452. begin
  22453. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  22454. end;
  22455. function TWDT_WDTCON.getWDTPS : TBits_5; inline;
  22456. begin
  22457. getWDTPS := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  22458. end;
  22459. procedure TWDT_WDTCON.setw(thebits : TBits_32); inline;
  22460. begin
  22461. pTDefRegMap(@Self)^.val := thebits;
  22462. end;
  22463. function TWDT_WDTCON.getw : TBits_32; inline;
  22464. begin
  22465. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22466. end;
  22467. procedure TRTCC_RTCCON.setRTCOE; inline;
  22468. begin
  22469. pTDefRegMap(@Self)^.&set := $00000001;
  22470. end;
  22471. procedure TRTCC_RTCCON.clearRTCOE; inline;
  22472. begin
  22473. pTDefRegMap(@Self)^.clr := $00000001;
  22474. end;
  22475. procedure TRTCC_RTCCON.setRTCOE(thebits : TBits_1); inline;
  22476. begin
  22477. if thebits = 0 then
  22478. pTDefRegMap(@Self)^.clr := $00000001
  22479. else
  22480. pTDefRegMap(@Self)^.&set := $00000001;
  22481. end;
  22482. function TRTCC_RTCCON.getRTCOE : TBits_1; inline;
  22483. begin
  22484. getRTCOE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  22485. end;
  22486. procedure TRTCC_RTCCON.setHALFSEC; inline;
  22487. begin
  22488. pTDefRegMap(@Self)^.&set := $00000002;
  22489. end;
  22490. procedure TRTCC_RTCCON.clearHALFSEC; inline;
  22491. begin
  22492. pTDefRegMap(@Self)^.clr := $00000002;
  22493. end;
  22494. procedure TRTCC_RTCCON.setHALFSEC(thebits : TBits_1); inline;
  22495. begin
  22496. if thebits = 0 then
  22497. pTDefRegMap(@Self)^.clr := $00000002
  22498. else
  22499. pTDefRegMap(@Self)^.&set := $00000002;
  22500. end;
  22501. function TRTCC_RTCCON.getHALFSEC : TBits_1; inline;
  22502. begin
  22503. getHALFSEC := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  22504. end;
  22505. procedure TRTCC_RTCCON.setRTCSYNC; inline;
  22506. begin
  22507. pTDefRegMap(@Self)^.&set := $00000004;
  22508. end;
  22509. procedure TRTCC_RTCCON.clearRTCSYNC; inline;
  22510. begin
  22511. pTDefRegMap(@Self)^.clr := $00000004;
  22512. end;
  22513. procedure TRTCC_RTCCON.setRTCSYNC(thebits : TBits_1); inline;
  22514. begin
  22515. if thebits = 0 then
  22516. pTDefRegMap(@Self)^.clr := $00000004
  22517. else
  22518. pTDefRegMap(@Self)^.&set := $00000004;
  22519. end;
  22520. function TRTCC_RTCCON.getRTCSYNC : TBits_1; inline;
  22521. begin
  22522. getRTCSYNC := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  22523. end;
  22524. procedure TRTCC_RTCCON.setRTCWREN; inline;
  22525. begin
  22526. pTDefRegMap(@Self)^.&set := $00000008;
  22527. end;
  22528. procedure TRTCC_RTCCON.clearRTCWREN; inline;
  22529. begin
  22530. pTDefRegMap(@Self)^.clr := $00000008;
  22531. end;
  22532. procedure TRTCC_RTCCON.setRTCWREN(thebits : TBits_1); inline;
  22533. begin
  22534. if thebits = 0 then
  22535. pTDefRegMap(@Self)^.clr := $00000008
  22536. else
  22537. pTDefRegMap(@Self)^.&set := $00000008;
  22538. end;
  22539. function TRTCC_RTCCON.getRTCWREN : TBits_1; inline;
  22540. begin
  22541. getRTCWREN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  22542. end;
  22543. procedure TRTCC_RTCCON.setRTCCLKON; inline;
  22544. begin
  22545. pTDefRegMap(@Self)^.&set := $00000040;
  22546. end;
  22547. procedure TRTCC_RTCCON.clearRTCCLKON; inline;
  22548. begin
  22549. pTDefRegMap(@Self)^.clr := $00000040;
  22550. end;
  22551. procedure TRTCC_RTCCON.setRTCCLKON(thebits : TBits_1); inline;
  22552. begin
  22553. if thebits = 0 then
  22554. pTDefRegMap(@Self)^.clr := $00000040
  22555. else
  22556. pTDefRegMap(@Self)^.&set := $00000040;
  22557. end;
  22558. function TRTCC_RTCCON.getRTCCLKON : TBits_1; inline;
  22559. begin
  22560. getRTCCLKON := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  22561. end;
  22562. procedure TRTCC_RTCCON.setRTSECSEL; inline;
  22563. begin
  22564. pTDefRegMap(@Self)^.&set := $00000080;
  22565. end;
  22566. procedure TRTCC_RTCCON.clearRTSECSEL; inline;
  22567. begin
  22568. pTDefRegMap(@Self)^.clr := $00000080;
  22569. end;
  22570. procedure TRTCC_RTCCON.setRTSECSEL(thebits : TBits_1); inline;
  22571. begin
  22572. if thebits = 0 then
  22573. pTDefRegMap(@Self)^.clr := $00000080
  22574. else
  22575. pTDefRegMap(@Self)^.&set := $00000080;
  22576. end;
  22577. function TRTCC_RTCCON.getRTSECSEL : TBits_1; inline;
  22578. begin
  22579. getRTSECSEL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  22580. end;
  22581. procedure TRTCC_RTCCON.setSIDL; inline;
  22582. begin
  22583. pTDefRegMap(@Self)^.&set := $00002000;
  22584. end;
  22585. procedure TRTCC_RTCCON.clearSIDL; inline;
  22586. begin
  22587. pTDefRegMap(@Self)^.clr := $00002000;
  22588. end;
  22589. procedure TRTCC_RTCCON.setSIDL(thebits : TBits_1); inline;
  22590. begin
  22591. if thebits = 0 then
  22592. pTDefRegMap(@Self)^.clr := $00002000
  22593. else
  22594. pTDefRegMap(@Self)^.&set := $00002000;
  22595. end;
  22596. function TRTCC_RTCCON.getSIDL : TBits_1; inline;
  22597. begin
  22598. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22599. end;
  22600. procedure TRTCC_RTCCON.setON; inline;
  22601. begin
  22602. pTDefRegMap(@Self)^.&set := $00008000;
  22603. end;
  22604. procedure TRTCC_RTCCON.clearON; inline;
  22605. begin
  22606. pTDefRegMap(@Self)^.clr := $00008000;
  22607. end;
  22608. procedure TRTCC_RTCCON.setON(thebits : TBits_1); inline;
  22609. begin
  22610. if thebits = 0 then
  22611. pTDefRegMap(@Self)^.clr := $00008000
  22612. else
  22613. pTDefRegMap(@Self)^.&set := $00008000;
  22614. end;
  22615. function TRTCC_RTCCON.getON : TBits_1; inline;
  22616. begin
  22617. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22618. end;
  22619. procedure TRTCC_RTCCON.setCAL(thebits : TBits_10); inline;
  22620. begin
  22621. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FC00FFFF or ( thebits shl 16 );
  22622. end;
  22623. function TRTCC_RTCCON.getCAL : TBits_10; inline;
  22624. begin
  22625. getCAL := (pTDefRegMap(@Self)^.val and $03FF0000) shr 16;
  22626. end;
  22627. procedure TRTCC_RTCCON.setw(thebits : TBits_32); inline;
  22628. begin
  22629. pTDefRegMap(@Self)^.val := thebits;
  22630. end;
  22631. function TRTCC_RTCCON.getw : TBits_32; inline;
  22632. begin
  22633. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22634. end;
  22635. procedure TRTCC_RTCALRM.setARPT(thebits : TBits_8); inline;
  22636. begin
  22637. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  22638. end;
  22639. function TRTCC_RTCALRM.getARPT : TBits_8; inline;
  22640. begin
  22641. getARPT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  22642. end;
  22643. procedure TRTCC_RTCALRM.setAMASK(thebits : TBits_4); inline;
  22644. begin
  22645. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  22646. end;
  22647. function TRTCC_RTCALRM.getAMASK : TBits_4; inline;
  22648. begin
  22649. getAMASK := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  22650. end;
  22651. procedure TRTCC_RTCALRM.setALRMSYNC; inline;
  22652. begin
  22653. pTDefRegMap(@Self)^.&set := $00001000;
  22654. end;
  22655. procedure TRTCC_RTCALRM.clearALRMSYNC; inline;
  22656. begin
  22657. pTDefRegMap(@Self)^.clr := $00001000;
  22658. end;
  22659. procedure TRTCC_RTCALRM.setALRMSYNC(thebits : TBits_1); inline;
  22660. begin
  22661. if thebits = 0 then
  22662. pTDefRegMap(@Self)^.clr := $00001000
  22663. else
  22664. pTDefRegMap(@Self)^.&set := $00001000;
  22665. end;
  22666. function TRTCC_RTCALRM.getALRMSYNC : TBits_1; inline;
  22667. begin
  22668. getALRMSYNC := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  22669. end;
  22670. procedure TRTCC_RTCALRM.setPIV; inline;
  22671. begin
  22672. pTDefRegMap(@Self)^.&set := $00002000;
  22673. end;
  22674. procedure TRTCC_RTCALRM.clearPIV; inline;
  22675. begin
  22676. pTDefRegMap(@Self)^.clr := $00002000;
  22677. end;
  22678. procedure TRTCC_RTCALRM.setPIV(thebits : TBits_1); inline;
  22679. begin
  22680. if thebits = 0 then
  22681. pTDefRegMap(@Self)^.clr := $00002000
  22682. else
  22683. pTDefRegMap(@Self)^.&set := $00002000;
  22684. end;
  22685. function TRTCC_RTCALRM.getPIV : TBits_1; inline;
  22686. begin
  22687. getPIV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22688. end;
  22689. procedure TRTCC_RTCALRM.setCHIME; inline;
  22690. begin
  22691. pTDefRegMap(@Self)^.&set := $00004000;
  22692. end;
  22693. procedure TRTCC_RTCALRM.clearCHIME; inline;
  22694. begin
  22695. pTDefRegMap(@Self)^.clr := $00004000;
  22696. end;
  22697. procedure TRTCC_RTCALRM.setCHIME(thebits : TBits_1); inline;
  22698. begin
  22699. if thebits = 0 then
  22700. pTDefRegMap(@Self)^.clr := $00004000
  22701. else
  22702. pTDefRegMap(@Self)^.&set := $00004000;
  22703. end;
  22704. function TRTCC_RTCALRM.getCHIME : TBits_1; inline;
  22705. begin
  22706. getCHIME := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  22707. end;
  22708. procedure TRTCC_RTCALRM.setALRMEN; inline;
  22709. begin
  22710. pTDefRegMap(@Self)^.&set := $00008000;
  22711. end;
  22712. procedure TRTCC_RTCALRM.clearALRMEN; inline;
  22713. begin
  22714. pTDefRegMap(@Self)^.clr := $00008000;
  22715. end;
  22716. procedure TRTCC_RTCALRM.setALRMEN(thebits : TBits_1); inline;
  22717. begin
  22718. if thebits = 0 then
  22719. pTDefRegMap(@Self)^.clr := $00008000
  22720. else
  22721. pTDefRegMap(@Self)^.&set := $00008000;
  22722. end;
  22723. function TRTCC_RTCALRM.getALRMEN : TBits_1; inline;
  22724. begin
  22725. getALRMEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22726. end;
  22727. procedure TRTCC_RTCALRM.setw(thebits : TBits_32); inline;
  22728. begin
  22729. pTDefRegMap(@Self)^.val := thebits;
  22730. end;
  22731. function TRTCC_RTCALRM.getw : TBits_32; inline;
  22732. begin
  22733. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22734. end;
  22735. procedure TRTCC_RTCTIME.setSEC01(thebits : TBits_4); inline;
  22736. begin
  22737. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  22738. end;
  22739. function TRTCC_RTCTIME.getSEC01 : TBits_4; inline;
  22740. begin
  22741. getSEC01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  22742. end;
  22743. procedure TRTCC_RTCTIME.setSEC10(thebits : TBits_4); inline;
  22744. begin
  22745. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  22746. end;
  22747. function TRTCC_RTCTIME.getSEC10 : TBits_4; inline;
  22748. begin
  22749. getSEC10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  22750. end;
  22751. procedure TRTCC_RTCTIME.setMIN01(thebits : TBits_4); inline;
  22752. begin
  22753. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  22754. end;
  22755. function TRTCC_RTCTIME.getMIN01 : TBits_4; inline;
  22756. begin
  22757. getMIN01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  22758. end;
  22759. procedure TRTCC_RTCTIME.setMIN10(thebits : TBits_4); inline;
  22760. begin
  22761. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  22762. end;
  22763. function TRTCC_RTCTIME.getMIN10 : TBits_4; inline;
  22764. begin
  22765. getMIN10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  22766. end;
  22767. procedure TRTCC_RTCTIME.setHR01(thebits : TBits_4); inline;
  22768. begin
  22769. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  22770. end;
  22771. function TRTCC_RTCTIME.getHR01 : TBits_4; inline;
  22772. begin
  22773. getHR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  22774. end;
  22775. procedure TRTCC_RTCTIME.setHR10(thebits : TBits_4); inline;
  22776. begin
  22777. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  22778. end;
  22779. function TRTCC_RTCTIME.getHR10 : TBits_4; inline;
  22780. begin
  22781. getHR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  22782. end;
  22783. procedure TRTCC_RTCTIME.setw(thebits : TBits_32); inline;
  22784. begin
  22785. pTDefRegMap(@Self)^.val := thebits;
  22786. end;
  22787. function TRTCC_RTCTIME.getw : TBits_32; inline;
  22788. begin
  22789. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22790. end;
  22791. procedure TRTCC_RTCDATE.setWDAY01(thebits : TBits_4); inline;
  22792. begin
  22793. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  22794. end;
  22795. function TRTCC_RTCDATE.getWDAY01 : TBits_4; inline;
  22796. begin
  22797. getWDAY01 := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  22798. end;
  22799. procedure TRTCC_RTCDATE.setDAY01(thebits : TBits_4); inline;
  22800. begin
  22801. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  22802. end;
  22803. function TRTCC_RTCDATE.getDAY01 : TBits_4; inline;
  22804. begin
  22805. getDAY01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  22806. end;
  22807. procedure TRTCC_RTCDATE.setDAY10(thebits : TBits_4); inline;
  22808. begin
  22809. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  22810. end;
  22811. function TRTCC_RTCDATE.getDAY10 : TBits_4; inline;
  22812. begin
  22813. getDAY10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  22814. end;
  22815. procedure TRTCC_RTCDATE.setMONTH01(thebits : TBits_4); inline;
  22816. begin
  22817. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  22818. end;
  22819. function TRTCC_RTCDATE.getMONTH01 : TBits_4; inline;
  22820. begin
  22821. getMONTH01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  22822. end;
  22823. procedure TRTCC_RTCDATE.setMONTH10(thebits : TBits_4); inline;
  22824. begin
  22825. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  22826. end;
  22827. function TRTCC_RTCDATE.getMONTH10 : TBits_4; inline;
  22828. begin
  22829. getMONTH10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  22830. end;
  22831. procedure TRTCC_RTCDATE.setYEAR01(thebits : TBits_4); inline;
  22832. begin
  22833. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  22834. end;
  22835. function TRTCC_RTCDATE.getYEAR01 : TBits_4; inline;
  22836. begin
  22837. getYEAR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  22838. end;
  22839. procedure TRTCC_RTCDATE.setYEAR10(thebits : TBits_4); inline;
  22840. begin
  22841. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  22842. end;
  22843. function TRTCC_RTCDATE.getYEAR10 : TBits_4; inline;
  22844. begin
  22845. getYEAR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  22846. end;
  22847. procedure TRTCC_RTCDATE.setw(thebits : TBits_32); inline;
  22848. begin
  22849. pTDefRegMap(@Self)^.val := thebits;
  22850. end;
  22851. function TRTCC_RTCDATE.getw : TBits_32; inline;
  22852. begin
  22853. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22854. end;
  22855. procedure TRTCC_ALRMTIME.setSEC01(thebits : TBits_4); inline;
  22856. begin
  22857. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  22858. end;
  22859. function TRTCC_ALRMTIME.getSEC01 : TBits_4; inline;
  22860. begin
  22861. getSEC01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  22862. end;
  22863. procedure TRTCC_ALRMTIME.setSEC10(thebits : TBits_4); inline;
  22864. begin
  22865. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  22866. end;
  22867. function TRTCC_ALRMTIME.getSEC10 : TBits_4; inline;
  22868. begin
  22869. getSEC10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  22870. end;
  22871. procedure TRTCC_ALRMTIME.setMIN01(thebits : TBits_4); inline;
  22872. begin
  22873. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  22874. end;
  22875. function TRTCC_ALRMTIME.getMIN01 : TBits_4; inline;
  22876. begin
  22877. getMIN01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  22878. end;
  22879. procedure TRTCC_ALRMTIME.setMIN10(thebits : TBits_4); inline;
  22880. begin
  22881. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  22882. end;
  22883. function TRTCC_ALRMTIME.getMIN10 : TBits_4; inline;
  22884. begin
  22885. getMIN10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  22886. end;
  22887. procedure TRTCC_ALRMTIME.setHR01(thebits : TBits_4); inline;
  22888. begin
  22889. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  22890. end;
  22891. function TRTCC_ALRMTIME.getHR01 : TBits_4; inline;
  22892. begin
  22893. getHR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  22894. end;
  22895. procedure TRTCC_ALRMTIME.setHR10(thebits : TBits_4); inline;
  22896. begin
  22897. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  22898. end;
  22899. function TRTCC_ALRMTIME.getHR10 : TBits_4; inline;
  22900. begin
  22901. getHR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  22902. end;
  22903. procedure TRTCC_ALRMTIME.setw(thebits : TBits_32); inline;
  22904. begin
  22905. pTDefRegMap(@Self)^.val := thebits;
  22906. end;
  22907. function TRTCC_ALRMTIME.getw : TBits_32; inline;
  22908. begin
  22909. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22910. end;
  22911. procedure TRTCC_ALRMDATE.setWDAY01(thebits : TBits_4); inline;
  22912. begin
  22913. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  22914. end;
  22915. function TRTCC_ALRMDATE.getWDAY01 : TBits_4; inline;
  22916. begin
  22917. getWDAY01 := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  22918. end;
  22919. procedure TRTCC_ALRMDATE.setDAY01(thebits : TBits_4); inline;
  22920. begin
  22921. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  22922. end;
  22923. function TRTCC_ALRMDATE.getDAY01 : TBits_4; inline;
  22924. begin
  22925. getDAY01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  22926. end;
  22927. procedure TRTCC_ALRMDATE.setDAY10(thebits : TBits_4); inline;
  22928. begin
  22929. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  22930. end;
  22931. function TRTCC_ALRMDATE.getDAY10 : TBits_4; inline;
  22932. begin
  22933. getDAY10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  22934. end;
  22935. procedure TRTCC_ALRMDATE.setMONTH01(thebits : TBits_4); inline;
  22936. begin
  22937. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  22938. end;
  22939. function TRTCC_ALRMDATE.getMONTH01 : TBits_4; inline;
  22940. begin
  22941. getMONTH01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  22942. end;
  22943. procedure TRTCC_ALRMDATE.setMONTH10(thebits : TBits_4); inline;
  22944. begin
  22945. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  22946. end;
  22947. function TRTCC_ALRMDATE.getMONTH10 : TBits_4; inline;
  22948. begin
  22949. getMONTH10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  22950. end;
  22951. procedure TRTCC_ALRMDATE.setw(thebits : TBits_32); inline;
  22952. begin
  22953. pTDefRegMap(@Self)^.val := thebits;
  22954. end;
  22955. function TRTCC_ALRMDATE.getw : TBits_32; inline;
  22956. begin
  22957. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22958. end;
  22959. procedure TTMR1_T1CON.setTCS; inline;
  22960. begin
  22961. pTDefRegMap(@Self)^.&set := $00000002;
  22962. end;
  22963. procedure TTMR1_T1CON.clearTCS; inline;
  22964. begin
  22965. pTDefRegMap(@Self)^.clr := $00000002;
  22966. end;
  22967. procedure TTMR1_T1CON.setTCS(thebits : TBits_1); inline;
  22968. begin
  22969. if thebits = 0 then
  22970. pTDefRegMap(@Self)^.clr := $00000002
  22971. else
  22972. pTDefRegMap(@Self)^.&set := $00000002;
  22973. end;
  22974. function TTMR1_T1CON.getTCS : TBits_1; inline;
  22975. begin
  22976. getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  22977. end;
  22978. procedure TTMR1_T1CON.setTSYNC; inline;
  22979. begin
  22980. pTDefRegMap(@Self)^.&set := $00000004;
  22981. end;
  22982. procedure TTMR1_T1CON.clearTSYNC; inline;
  22983. begin
  22984. pTDefRegMap(@Self)^.clr := $00000004;
  22985. end;
  22986. procedure TTMR1_T1CON.setTSYNC(thebits : TBits_1); inline;
  22987. begin
  22988. if thebits = 0 then
  22989. pTDefRegMap(@Self)^.clr := $00000004
  22990. else
  22991. pTDefRegMap(@Self)^.&set := $00000004;
  22992. end;
  22993. function TTMR1_T1CON.getTSYNC : TBits_1; inline;
  22994. begin
  22995. getTSYNC := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  22996. end;
  22997. procedure TTMR1_T1CON.setTCKPS(thebits : TBits_2); inline;
  22998. begin
  22999. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFCF or ( thebits shl 4 );
  23000. end;
  23001. function TTMR1_T1CON.getTCKPS : TBits_2; inline;
  23002. begin
  23003. getTCKPS := (pTDefRegMap(@Self)^.val and $00000030) shr 4;
  23004. end;
  23005. procedure TTMR1_T1CON.setTGATE; inline;
  23006. begin
  23007. pTDefRegMap(@Self)^.&set := $00000080;
  23008. end;
  23009. procedure TTMR1_T1CON.clearTGATE; inline;
  23010. begin
  23011. pTDefRegMap(@Self)^.clr := $00000080;
  23012. end;
  23013. procedure TTMR1_T1CON.setTGATE(thebits : TBits_1); inline;
  23014. begin
  23015. if thebits = 0 then
  23016. pTDefRegMap(@Self)^.clr := $00000080
  23017. else
  23018. pTDefRegMap(@Self)^.&set := $00000080;
  23019. end;
  23020. function TTMR1_T1CON.getTGATE : TBits_1; inline;
  23021. begin
  23022. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23023. end;
  23024. procedure TTMR1_T1CON.setTWIP; inline;
  23025. begin
  23026. pTDefRegMap(@Self)^.&set := $00000800;
  23027. end;
  23028. procedure TTMR1_T1CON.clearTWIP; inline;
  23029. begin
  23030. pTDefRegMap(@Self)^.clr := $00000800;
  23031. end;
  23032. procedure TTMR1_T1CON.setTWIP(thebits : TBits_1); inline;
  23033. begin
  23034. if thebits = 0 then
  23035. pTDefRegMap(@Self)^.clr := $00000800
  23036. else
  23037. pTDefRegMap(@Self)^.&set := $00000800;
  23038. end;
  23039. function TTMR1_T1CON.getTWIP : TBits_1; inline;
  23040. begin
  23041. getTWIP := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  23042. end;
  23043. procedure TTMR1_T1CON.setTWDIS; inline;
  23044. begin
  23045. pTDefRegMap(@Self)^.&set := $00001000;
  23046. end;
  23047. procedure TTMR1_T1CON.clearTWDIS; inline;
  23048. begin
  23049. pTDefRegMap(@Self)^.clr := $00001000;
  23050. end;
  23051. procedure TTMR1_T1CON.setTWDIS(thebits : TBits_1); inline;
  23052. begin
  23053. if thebits = 0 then
  23054. pTDefRegMap(@Self)^.clr := $00001000
  23055. else
  23056. pTDefRegMap(@Self)^.&set := $00001000;
  23057. end;
  23058. function TTMR1_T1CON.getTWDIS : TBits_1; inline;
  23059. begin
  23060. getTWDIS := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  23061. end;
  23062. procedure TTMR1_T1CON.setSIDL; inline;
  23063. begin
  23064. pTDefRegMap(@Self)^.&set := $00002000;
  23065. end;
  23066. procedure TTMR1_T1CON.clearSIDL; inline;
  23067. begin
  23068. pTDefRegMap(@Self)^.clr := $00002000;
  23069. end;
  23070. procedure TTMR1_T1CON.setSIDL(thebits : TBits_1); inline;
  23071. begin
  23072. if thebits = 0 then
  23073. pTDefRegMap(@Self)^.clr := $00002000
  23074. else
  23075. pTDefRegMap(@Self)^.&set := $00002000;
  23076. end;
  23077. function TTMR1_T1CON.getSIDL : TBits_1; inline;
  23078. begin
  23079. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23080. end;
  23081. procedure TTMR1_T1CON.setON; inline;
  23082. begin
  23083. pTDefRegMap(@Self)^.&set := $00008000;
  23084. end;
  23085. procedure TTMR1_T1CON.clearON; inline;
  23086. begin
  23087. pTDefRegMap(@Self)^.clr := $00008000;
  23088. end;
  23089. procedure TTMR1_T1CON.setON(thebits : TBits_1); inline;
  23090. begin
  23091. if thebits = 0 then
  23092. pTDefRegMap(@Self)^.clr := $00008000
  23093. else
  23094. pTDefRegMap(@Self)^.&set := $00008000;
  23095. end;
  23096. function TTMR1_T1CON.getON : TBits_1; inline;
  23097. begin
  23098. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23099. end;
  23100. procedure TTMR1_T1CON.setTCKPS0; inline;
  23101. begin
  23102. pTDefRegMap(@Self)^.&set := $00000010;
  23103. end;
  23104. procedure TTMR1_T1CON.clearTCKPS0; inline;
  23105. begin
  23106. pTDefRegMap(@Self)^.clr := $00000010;
  23107. end;
  23108. procedure TTMR1_T1CON.setTCKPS0(thebits : TBits_1); inline;
  23109. begin
  23110. if thebits = 0 then
  23111. pTDefRegMap(@Self)^.clr := $00000010
  23112. else
  23113. pTDefRegMap(@Self)^.&set := $00000010;
  23114. end;
  23115. function TTMR1_T1CON.getTCKPS0 : TBits_1; inline;
  23116. begin
  23117. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23118. end;
  23119. procedure TTMR1_T1CON.setTCKPS1; inline;
  23120. begin
  23121. pTDefRegMap(@Self)^.&set := $00000020;
  23122. end;
  23123. procedure TTMR1_T1CON.clearTCKPS1; inline;
  23124. begin
  23125. pTDefRegMap(@Self)^.clr := $00000020;
  23126. end;
  23127. procedure TTMR1_T1CON.setTCKPS1(thebits : TBits_1); inline;
  23128. begin
  23129. if thebits = 0 then
  23130. pTDefRegMap(@Self)^.clr := $00000020
  23131. else
  23132. pTDefRegMap(@Self)^.&set := $00000020;
  23133. end;
  23134. function TTMR1_T1CON.getTCKPS1 : TBits_1; inline;
  23135. begin
  23136. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23137. end;
  23138. procedure TTMR1_T1CON.setTSIDL; inline;
  23139. begin
  23140. pTDefRegMap(@Self)^.&set := $00002000;
  23141. end;
  23142. procedure TTMR1_T1CON.clearTSIDL; inline;
  23143. begin
  23144. pTDefRegMap(@Self)^.clr := $00002000;
  23145. end;
  23146. procedure TTMR1_T1CON.setTSIDL(thebits : TBits_1); inline;
  23147. begin
  23148. if thebits = 0 then
  23149. pTDefRegMap(@Self)^.clr := $00002000
  23150. else
  23151. pTDefRegMap(@Self)^.&set := $00002000;
  23152. end;
  23153. function TTMR1_T1CON.getTSIDL : TBits_1; inline;
  23154. begin
  23155. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23156. end;
  23157. procedure TTMR1_T1CON.setTON; inline;
  23158. begin
  23159. pTDefRegMap(@Self)^.&set := $00008000;
  23160. end;
  23161. procedure TTMR1_T1CON.clearTON; inline;
  23162. begin
  23163. pTDefRegMap(@Self)^.clr := $00008000;
  23164. end;
  23165. procedure TTMR1_T1CON.setTON(thebits : TBits_1); inline;
  23166. begin
  23167. if thebits = 0 then
  23168. pTDefRegMap(@Self)^.clr := $00008000
  23169. else
  23170. pTDefRegMap(@Self)^.&set := $00008000;
  23171. end;
  23172. function TTMR1_T1CON.getTON : TBits_1; inline;
  23173. begin
  23174. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23175. end;
  23176. procedure TTMR1_T1CON.setw(thebits : TBits_32); inline;
  23177. begin
  23178. pTDefRegMap(@Self)^.val := thebits;
  23179. end;
  23180. function TTMR1_T1CON.getw : TBits_32; inline;
  23181. begin
  23182. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23183. end;
  23184. procedure TTMR2_T2CON.setT32; inline;
  23185. begin
  23186. pTDefRegMap(@Self)^.&set := $00000008;
  23187. end;
  23188. procedure TTMR2_T2CON.clearT32; inline;
  23189. begin
  23190. pTDefRegMap(@Self)^.clr := $00000008;
  23191. end;
  23192. procedure TTMR2_T2CON.setT32(thebits : TBits_1); inline;
  23193. begin
  23194. if thebits = 0 then
  23195. pTDefRegMap(@Self)^.clr := $00000008
  23196. else
  23197. pTDefRegMap(@Self)^.&set := $00000008;
  23198. end;
  23199. function TTMR2_T2CON.getT32 : TBits_1; inline;
  23200. begin
  23201. getT32 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  23202. end;
  23203. procedure TTMR2_T2CON.setTCKPS(thebits : TBits_3); inline;
  23204. begin
  23205. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  23206. end;
  23207. function TTMR2_T2CON.getTCKPS : TBits_3; inline;
  23208. begin
  23209. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  23210. end;
  23211. procedure TTMR2_T2CON.setTGATE; inline;
  23212. begin
  23213. pTDefRegMap(@Self)^.&set := $00000080;
  23214. end;
  23215. procedure TTMR2_T2CON.clearTGATE; inline;
  23216. begin
  23217. pTDefRegMap(@Self)^.clr := $00000080;
  23218. end;
  23219. procedure TTMR2_T2CON.setTGATE(thebits : TBits_1); inline;
  23220. begin
  23221. if thebits = 0 then
  23222. pTDefRegMap(@Self)^.clr := $00000080
  23223. else
  23224. pTDefRegMap(@Self)^.&set := $00000080;
  23225. end;
  23226. function TTMR2_T2CON.getTGATE : TBits_1; inline;
  23227. begin
  23228. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23229. end;
  23230. procedure TTMR2_T2CON.setSIDL; inline;
  23231. begin
  23232. pTDefRegMap(@Self)^.&set := $00002000;
  23233. end;
  23234. procedure TTMR2_T2CON.clearSIDL; inline;
  23235. begin
  23236. pTDefRegMap(@Self)^.clr := $00002000;
  23237. end;
  23238. procedure TTMR2_T2CON.setSIDL(thebits : TBits_1); inline;
  23239. begin
  23240. if thebits = 0 then
  23241. pTDefRegMap(@Self)^.clr := $00002000
  23242. else
  23243. pTDefRegMap(@Self)^.&set := $00002000;
  23244. end;
  23245. function TTMR2_T2CON.getSIDL : TBits_1; inline;
  23246. begin
  23247. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23248. end;
  23249. procedure TTMR2_T2CON.setON; inline;
  23250. begin
  23251. pTDefRegMap(@Self)^.&set := $00008000;
  23252. end;
  23253. procedure TTMR2_T2CON.clearON; inline;
  23254. begin
  23255. pTDefRegMap(@Self)^.clr := $00008000;
  23256. end;
  23257. procedure TTMR2_T2CON.setON(thebits : TBits_1); inline;
  23258. begin
  23259. if thebits = 0 then
  23260. pTDefRegMap(@Self)^.clr := $00008000
  23261. else
  23262. pTDefRegMap(@Self)^.&set := $00008000;
  23263. end;
  23264. function TTMR2_T2CON.getON : TBits_1; inline;
  23265. begin
  23266. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23267. end;
  23268. procedure TTMR2_T2CON.setTCKPS0; inline;
  23269. begin
  23270. pTDefRegMap(@Self)^.&set := $00000010;
  23271. end;
  23272. procedure TTMR2_T2CON.clearTCKPS0; inline;
  23273. begin
  23274. pTDefRegMap(@Self)^.clr := $00000010;
  23275. end;
  23276. procedure TTMR2_T2CON.setTCKPS0(thebits : TBits_1); inline;
  23277. begin
  23278. if thebits = 0 then
  23279. pTDefRegMap(@Self)^.clr := $00000010
  23280. else
  23281. pTDefRegMap(@Self)^.&set := $00000010;
  23282. end;
  23283. function TTMR2_T2CON.getTCKPS0 : TBits_1; inline;
  23284. begin
  23285. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23286. end;
  23287. procedure TTMR2_T2CON.setTCKPS1; inline;
  23288. begin
  23289. pTDefRegMap(@Self)^.&set := $00000020;
  23290. end;
  23291. procedure TTMR2_T2CON.clearTCKPS1; inline;
  23292. begin
  23293. pTDefRegMap(@Self)^.clr := $00000020;
  23294. end;
  23295. procedure TTMR2_T2CON.setTCKPS1(thebits : TBits_1); inline;
  23296. begin
  23297. if thebits = 0 then
  23298. pTDefRegMap(@Self)^.clr := $00000020
  23299. else
  23300. pTDefRegMap(@Self)^.&set := $00000020;
  23301. end;
  23302. function TTMR2_T2CON.getTCKPS1 : TBits_1; inline;
  23303. begin
  23304. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23305. end;
  23306. procedure TTMR2_T2CON.setTCKPS2; inline;
  23307. begin
  23308. pTDefRegMap(@Self)^.&set := $00000040;
  23309. end;
  23310. procedure TTMR2_T2CON.clearTCKPS2; inline;
  23311. begin
  23312. pTDefRegMap(@Self)^.clr := $00000040;
  23313. end;
  23314. procedure TTMR2_T2CON.setTCKPS2(thebits : TBits_1); inline;
  23315. begin
  23316. if thebits = 0 then
  23317. pTDefRegMap(@Self)^.clr := $00000040
  23318. else
  23319. pTDefRegMap(@Self)^.&set := $00000040;
  23320. end;
  23321. function TTMR2_T2CON.getTCKPS2 : TBits_1; inline;
  23322. begin
  23323. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  23324. end;
  23325. procedure TTMR2_T2CON.setTSIDL; inline;
  23326. begin
  23327. pTDefRegMap(@Self)^.&set := $00002000;
  23328. end;
  23329. procedure TTMR2_T2CON.clearTSIDL; inline;
  23330. begin
  23331. pTDefRegMap(@Self)^.clr := $00002000;
  23332. end;
  23333. procedure TTMR2_T2CON.setTSIDL(thebits : TBits_1); inline;
  23334. begin
  23335. if thebits = 0 then
  23336. pTDefRegMap(@Self)^.clr := $00002000
  23337. else
  23338. pTDefRegMap(@Self)^.&set := $00002000;
  23339. end;
  23340. function TTMR2_T2CON.getTSIDL : TBits_1; inline;
  23341. begin
  23342. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23343. end;
  23344. procedure TTMR2_T2CON.setTON; inline;
  23345. begin
  23346. pTDefRegMap(@Self)^.&set := $00008000;
  23347. end;
  23348. procedure TTMR2_T2CON.clearTON; inline;
  23349. begin
  23350. pTDefRegMap(@Self)^.clr := $00008000;
  23351. end;
  23352. procedure TTMR2_T2CON.setTON(thebits : TBits_1); inline;
  23353. begin
  23354. if thebits = 0 then
  23355. pTDefRegMap(@Self)^.clr := $00008000
  23356. else
  23357. pTDefRegMap(@Self)^.&set := $00008000;
  23358. end;
  23359. function TTMR2_T2CON.getTON : TBits_1; inline;
  23360. begin
  23361. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23362. end;
  23363. procedure TTMR2_T2CON.setw(thebits : TBits_32); inline;
  23364. begin
  23365. pTDefRegMap(@Self)^.val := thebits;
  23366. end;
  23367. function TTMR2_T2CON.getw : TBits_32; inline;
  23368. begin
  23369. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23370. end;
  23371. procedure TTMR3_T3CON.setTCKPS(thebits : TBits_3); inline;
  23372. begin
  23373. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  23374. end;
  23375. function TTMR3_T3CON.getTCKPS : TBits_3; inline;
  23376. begin
  23377. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  23378. end;
  23379. procedure TTMR3_T3CON.setTGATE; inline;
  23380. begin
  23381. pTDefRegMap(@Self)^.&set := $00000080;
  23382. end;
  23383. procedure TTMR3_T3CON.clearTGATE; inline;
  23384. begin
  23385. pTDefRegMap(@Self)^.clr := $00000080;
  23386. end;
  23387. procedure TTMR3_T3CON.setTGATE(thebits : TBits_1); inline;
  23388. begin
  23389. if thebits = 0 then
  23390. pTDefRegMap(@Self)^.clr := $00000080
  23391. else
  23392. pTDefRegMap(@Self)^.&set := $00000080;
  23393. end;
  23394. function TTMR3_T3CON.getTGATE : TBits_1; inline;
  23395. begin
  23396. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23397. end;
  23398. procedure TTMR3_T3CON.setSIDL; inline;
  23399. begin
  23400. pTDefRegMap(@Self)^.&set := $00002000;
  23401. end;
  23402. procedure TTMR3_T3CON.clearSIDL; inline;
  23403. begin
  23404. pTDefRegMap(@Self)^.clr := $00002000;
  23405. end;
  23406. procedure TTMR3_T3CON.setSIDL(thebits : TBits_1); inline;
  23407. begin
  23408. if thebits = 0 then
  23409. pTDefRegMap(@Self)^.clr := $00002000
  23410. else
  23411. pTDefRegMap(@Self)^.&set := $00002000;
  23412. end;
  23413. function TTMR3_T3CON.getSIDL : TBits_1; inline;
  23414. begin
  23415. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23416. end;
  23417. procedure TTMR3_T3CON.setON; inline;
  23418. begin
  23419. pTDefRegMap(@Self)^.&set := $00008000;
  23420. end;
  23421. procedure TTMR3_T3CON.clearON; inline;
  23422. begin
  23423. pTDefRegMap(@Self)^.clr := $00008000;
  23424. end;
  23425. procedure TTMR3_T3CON.setON(thebits : TBits_1); inline;
  23426. begin
  23427. if thebits = 0 then
  23428. pTDefRegMap(@Self)^.clr := $00008000
  23429. else
  23430. pTDefRegMap(@Self)^.&set := $00008000;
  23431. end;
  23432. function TTMR3_T3CON.getON : TBits_1; inline;
  23433. begin
  23434. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23435. end;
  23436. procedure TTMR3_T3CON.setTCKPS0; inline;
  23437. begin
  23438. pTDefRegMap(@Self)^.&set := $00000010;
  23439. end;
  23440. procedure TTMR3_T3CON.clearTCKPS0; inline;
  23441. begin
  23442. pTDefRegMap(@Self)^.clr := $00000010;
  23443. end;
  23444. procedure TTMR3_T3CON.setTCKPS0(thebits : TBits_1); inline;
  23445. begin
  23446. if thebits = 0 then
  23447. pTDefRegMap(@Self)^.clr := $00000010
  23448. else
  23449. pTDefRegMap(@Self)^.&set := $00000010;
  23450. end;
  23451. function TTMR3_T3CON.getTCKPS0 : TBits_1; inline;
  23452. begin
  23453. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23454. end;
  23455. procedure TTMR3_T3CON.setTCKPS1; inline;
  23456. begin
  23457. pTDefRegMap(@Self)^.&set := $00000020;
  23458. end;
  23459. procedure TTMR3_T3CON.clearTCKPS1; inline;
  23460. begin
  23461. pTDefRegMap(@Self)^.clr := $00000020;
  23462. end;
  23463. procedure TTMR3_T3CON.setTCKPS1(thebits : TBits_1); inline;
  23464. begin
  23465. if thebits = 0 then
  23466. pTDefRegMap(@Self)^.clr := $00000020
  23467. else
  23468. pTDefRegMap(@Self)^.&set := $00000020;
  23469. end;
  23470. function TTMR3_T3CON.getTCKPS1 : TBits_1; inline;
  23471. begin
  23472. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23473. end;
  23474. procedure TTMR3_T3CON.setTCKPS2; inline;
  23475. begin
  23476. pTDefRegMap(@Self)^.&set := $00000040;
  23477. end;
  23478. procedure TTMR3_T3CON.clearTCKPS2; inline;
  23479. begin
  23480. pTDefRegMap(@Self)^.clr := $00000040;
  23481. end;
  23482. procedure TTMR3_T3CON.setTCKPS2(thebits : TBits_1); inline;
  23483. begin
  23484. if thebits = 0 then
  23485. pTDefRegMap(@Self)^.clr := $00000040
  23486. else
  23487. pTDefRegMap(@Self)^.&set := $00000040;
  23488. end;
  23489. function TTMR3_T3CON.getTCKPS2 : TBits_1; inline;
  23490. begin
  23491. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  23492. end;
  23493. procedure TTMR3_T3CON.setTSIDL; inline;
  23494. begin
  23495. pTDefRegMap(@Self)^.&set := $00002000;
  23496. end;
  23497. procedure TTMR3_T3CON.clearTSIDL; inline;
  23498. begin
  23499. pTDefRegMap(@Self)^.clr := $00002000;
  23500. end;
  23501. procedure TTMR3_T3CON.setTSIDL(thebits : TBits_1); inline;
  23502. begin
  23503. if thebits = 0 then
  23504. pTDefRegMap(@Self)^.clr := $00002000
  23505. else
  23506. pTDefRegMap(@Self)^.&set := $00002000;
  23507. end;
  23508. function TTMR3_T3CON.getTSIDL : TBits_1; inline;
  23509. begin
  23510. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23511. end;
  23512. procedure TTMR3_T3CON.setTON; inline;
  23513. begin
  23514. pTDefRegMap(@Self)^.&set := $00008000;
  23515. end;
  23516. procedure TTMR3_T3CON.clearTON; inline;
  23517. begin
  23518. pTDefRegMap(@Self)^.clr := $00008000;
  23519. end;
  23520. procedure TTMR3_T3CON.setTON(thebits : TBits_1); inline;
  23521. begin
  23522. if thebits = 0 then
  23523. pTDefRegMap(@Self)^.clr := $00008000
  23524. else
  23525. pTDefRegMap(@Self)^.&set := $00008000;
  23526. end;
  23527. function TTMR3_T3CON.getTON : TBits_1; inline;
  23528. begin
  23529. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23530. end;
  23531. procedure TTMR3_T3CON.setw(thebits : TBits_32); inline;
  23532. begin
  23533. pTDefRegMap(@Self)^.val := thebits;
  23534. end;
  23535. function TTMR3_T3CON.getw : TBits_32; inline;
  23536. begin
  23537. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23538. end;
  23539. procedure TTMR4_T4CON.setT32; inline;
  23540. begin
  23541. pTDefRegMap(@Self)^.&set := $00000008;
  23542. end;
  23543. procedure TTMR4_T4CON.clearT32; inline;
  23544. begin
  23545. pTDefRegMap(@Self)^.clr := $00000008;
  23546. end;
  23547. procedure TTMR4_T4CON.setT32(thebits : TBits_1); inline;
  23548. begin
  23549. if thebits = 0 then
  23550. pTDefRegMap(@Self)^.clr := $00000008
  23551. else
  23552. pTDefRegMap(@Self)^.&set := $00000008;
  23553. end;
  23554. function TTMR4_T4CON.getT32 : TBits_1; inline;
  23555. begin
  23556. getT32 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  23557. end;
  23558. procedure TTMR4_T4CON.setTCKPS(thebits : TBits_3); inline;
  23559. begin
  23560. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  23561. end;
  23562. function TTMR4_T4CON.getTCKPS : TBits_3; inline;
  23563. begin
  23564. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  23565. end;
  23566. procedure TTMR4_T4CON.setTGATE; inline;
  23567. begin
  23568. pTDefRegMap(@Self)^.&set := $00000080;
  23569. end;
  23570. procedure TTMR4_T4CON.clearTGATE; inline;
  23571. begin
  23572. pTDefRegMap(@Self)^.clr := $00000080;
  23573. end;
  23574. procedure TTMR4_T4CON.setTGATE(thebits : TBits_1); inline;
  23575. begin
  23576. if thebits = 0 then
  23577. pTDefRegMap(@Self)^.clr := $00000080
  23578. else
  23579. pTDefRegMap(@Self)^.&set := $00000080;
  23580. end;
  23581. function TTMR4_T4CON.getTGATE : TBits_1; inline;
  23582. begin
  23583. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23584. end;
  23585. procedure TTMR4_T4CON.setSIDL; inline;
  23586. begin
  23587. pTDefRegMap(@Self)^.&set := $00002000;
  23588. end;
  23589. procedure TTMR4_T4CON.clearSIDL; inline;
  23590. begin
  23591. pTDefRegMap(@Self)^.clr := $00002000;
  23592. end;
  23593. procedure TTMR4_T4CON.setSIDL(thebits : TBits_1); inline;
  23594. begin
  23595. if thebits = 0 then
  23596. pTDefRegMap(@Self)^.clr := $00002000
  23597. else
  23598. pTDefRegMap(@Self)^.&set := $00002000;
  23599. end;
  23600. function TTMR4_T4CON.getSIDL : TBits_1; inline;
  23601. begin
  23602. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23603. end;
  23604. procedure TTMR4_T4CON.setON; inline;
  23605. begin
  23606. pTDefRegMap(@Self)^.&set := $00008000;
  23607. end;
  23608. procedure TTMR4_T4CON.clearON; inline;
  23609. begin
  23610. pTDefRegMap(@Self)^.clr := $00008000;
  23611. end;
  23612. procedure TTMR4_T4CON.setON(thebits : TBits_1); inline;
  23613. begin
  23614. if thebits = 0 then
  23615. pTDefRegMap(@Self)^.clr := $00008000
  23616. else
  23617. pTDefRegMap(@Self)^.&set := $00008000;
  23618. end;
  23619. function TTMR4_T4CON.getON : TBits_1; inline;
  23620. begin
  23621. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23622. end;
  23623. procedure TTMR4_T4CON.setTCKPS0; inline;
  23624. begin
  23625. pTDefRegMap(@Self)^.&set := $00000010;
  23626. end;
  23627. procedure TTMR4_T4CON.clearTCKPS0; inline;
  23628. begin
  23629. pTDefRegMap(@Self)^.clr := $00000010;
  23630. end;
  23631. procedure TTMR4_T4CON.setTCKPS0(thebits : TBits_1); inline;
  23632. begin
  23633. if thebits = 0 then
  23634. pTDefRegMap(@Self)^.clr := $00000010
  23635. else
  23636. pTDefRegMap(@Self)^.&set := $00000010;
  23637. end;
  23638. function TTMR4_T4CON.getTCKPS0 : TBits_1; inline;
  23639. begin
  23640. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23641. end;
  23642. procedure TTMR4_T4CON.setTCKPS1; inline;
  23643. begin
  23644. pTDefRegMap(@Self)^.&set := $00000020;
  23645. end;
  23646. procedure TTMR4_T4CON.clearTCKPS1; inline;
  23647. begin
  23648. pTDefRegMap(@Self)^.clr := $00000020;
  23649. end;
  23650. procedure TTMR4_T4CON.setTCKPS1(thebits : TBits_1); inline;
  23651. begin
  23652. if thebits = 0 then
  23653. pTDefRegMap(@Self)^.clr := $00000020
  23654. else
  23655. pTDefRegMap(@Self)^.&set := $00000020;
  23656. end;
  23657. function TTMR4_T4CON.getTCKPS1 : TBits_1; inline;
  23658. begin
  23659. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23660. end;
  23661. procedure TTMR4_T4CON.setTCKPS2; inline;
  23662. begin
  23663. pTDefRegMap(@Self)^.&set := $00000040;
  23664. end;
  23665. procedure TTMR4_T4CON.clearTCKPS2; inline;
  23666. begin
  23667. pTDefRegMap(@Self)^.clr := $00000040;
  23668. end;
  23669. procedure TTMR4_T4CON.setTCKPS2(thebits : TBits_1); inline;
  23670. begin
  23671. if thebits = 0 then
  23672. pTDefRegMap(@Self)^.clr := $00000040
  23673. else
  23674. pTDefRegMap(@Self)^.&set := $00000040;
  23675. end;
  23676. function TTMR4_T4CON.getTCKPS2 : TBits_1; inline;
  23677. begin
  23678. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  23679. end;
  23680. procedure TTMR4_T4CON.setTSIDL; inline;
  23681. begin
  23682. pTDefRegMap(@Self)^.&set := $00002000;
  23683. end;
  23684. procedure TTMR4_T4CON.clearTSIDL; inline;
  23685. begin
  23686. pTDefRegMap(@Self)^.clr := $00002000;
  23687. end;
  23688. procedure TTMR4_T4CON.setTSIDL(thebits : TBits_1); inline;
  23689. begin
  23690. if thebits = 0 then
  23691. pTDefRegMap(@Self)^.clr := $00002000
  23692. else
  23693. pTDefRegMap(@Self)^.&set := $00002000;
  23694. end;
  23695. function TTMR4_T4CON.getTSIDL : TBits_1; inline;
  23696. begin
  23697. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23698. end;
  23699. procedure TTMR4_T4CON.setTON; inline;
  23700. begin
  23701. pTDefRegMap(@Self)^.&set := $00008000;
  23702. end;
  23703. procedure TTMR4_T4CON.clearTON; inline;
  23704. begin
  23705. pTDefRegMap(@Self)^.clr := $00008000;
  23706. end;
  23707. procedure TTMR4_T4CON.setTON(thebits : TBits_1); inline;
  23708. begin
  23709. if thebits = 0 then
  23710. pTDefRegMap(@Self)^.clr := $00008000
  23711. else
  23712. pTDefRegMap(@Self)^.&set := $00008000;
  23713. end;
  23714. function TTMR4_T4CON.getTON : TBits_1; inline;
  23715. begin
  23716. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23717. end;
  23718. procedure TTMR4_T4CON.setw(thebits : TBits_32); inline;
  23719. begin
  23720. pTDefRegMap(@Self)^.val := thebits;
  23721. end;
  23722. function TTMR4_T4CON.getw : TBits_32; inline;
  23723. begin
  23724. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23725. end;
  23726. procedure TTMR5_T5CON.setTCKPS(thebits : TBits_3); inline;
  23727. begin
  23728. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  23729. end;
  23730. function TTMR5_T5CON.getTCKPS : TBits_3; inline;
  23731. begin
  23732. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  23733. end;
  23734. procedure TTMR5_T5CON.setTGATE; inline;
  23735. begin
  23736. pTDefRegMap(@Self)^.&set := $00000080;
  23737. end;
  23738. procedure TTMR5_T5CON.clearTGATE; inline;
  23739. begin
  23740. pTDefRegMap(@Self)^.clr := $00000080;
  23741. end;
  23742. procedure TTMR5_T5CON.setTGATE(thebits : TBits_1); inline;
  23743. begin
  23744. if thebits = 0 then
  23745. pTDefRegMap(@Self)^.clr := $00000080
  23746. else
  23747. pTDefRegMap(@Self)^.&set := $00000080;
  23748. end;
  23749. function TTMR5_T5CON.getTGATE : TBits_1; inline;
  23750. begin
  23751. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23752. end;
  23753. procedure TTMR5_T5CON.setSIDL; inline;
  23754. begin
  23755. pTDefRegMap(@Self)^.&set := $00002000;
  23756. end;
  23757. procedure TTMR5_T5CON.clearSIDL; inline;
  23758. begin
  23759. pTDefRegMap(@Self)^.clr := $00002000;
  23760. end;
  23761. procedure TTMR5_T5CON.setSIDL(thebits : TBits_1); inline;
  23762. begin
  23763. if thebits = 0 then
  23764. pTDefRegMap(@Self)^.clr := $00002000
  23765. else
  23766. pTDefRegMap(@Self)^.&set := $00002000;
  23767. end;
  23768. function TTMR5_T5CON.getSIDL : TBits_1; inline;
  23769. begin
  23770. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23771. end;
  23772. procedure TTMR5_T5CON.setON; inline;
  23773. begin
  23774. pTDefRegMap(@Self)^.&set := $00008000;
  23775. end;
  23776. procedure TTMR5_T5CON.clearON; inline;
  23777. begin
  23778. pTDefRegMap(@Self)^.clr := $00008000;
  23779. end;
  23780. procedure TTMR5_T5CON.setON(thebits : TBits_1); inline;
  23781. begin
  23782. if thebits = 0 then
  23783. pTDefRegMap(@Self)^.clr := $00008000
  23784. else
  23785. pTDefRegMap(@Self)^.&set := $00008000;
  23786. end;
  23787. function TTMR5_T5CON.getON : TBits_1; inline;
  23788. begin
  23789. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23790. end;
  23791. procedure TTMR5_T5CON.setTCKPS0; inline;
  23792. begin
  23793. pTDefRegMap(@Self)^.&set := $00000010;
  23794. end;
  23795. procedure TTMR5_T5CON.clearTCKPS0; inline;
  23796. begin
  23797. pTDefRegMap(@Self)^.clr := $00000010;
  23798. end;
  23799. procedure TTMR5_T5CON.setTCKPS0(thebits : TBits_1); inline;
  23800. begin
  23801. if thebits = 0 then
  23802. pTDefRegMap(@Self)^.clr := $00000010
  23803. else
  23804. pTDefRegMap(@Self)^.&set := $00000010;
  23805. end;
  23806. function TTMR5_T5CON.getTCKPS0 : TBits_1; inline;
  23807. begin
  23808. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23809. end;
  23810. procedure TTMR5_T5CON.setTCKPS1; inline;
  23811. begin
  23812. pTDefRegMap(@Self)^.&set := $00000020;
  23813. end;
  23814. procedure TTMR5_T5CON.clearTCKPS1; inline;
  23815. begin
  23816. pTDefRegMap(@Self)^.clr := $00000020;
  23817. end;
  23818. procedure TTMR5_T5CON.setTCKPS1(thebits : TBits_1); inline;
  23819. begin
  23820. if thebits = 0 then
  23821. pTDefRegMap(@Self)^.clr := $00000020
  23822. else
  23823. pTDefRegMap(@Self)^.&set := $00000020;
  23824. end;
  23825. function TTMR5_T5CON.getTCKPS1 : TBits_1; inline;
  23826. begin
  23827. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23828. end;
  23829. procedure TTMR5_T5CON.setTCKPS2; inline;
  23830. begin
  23831. pTDefRegMap(@Self)^.&set := $00000040;
  23832. end;
  23833. procedure TTMR5_T5CON.clearTCKPS2; inline;
  23834. begin
  23835. pTDefRegMap(@Self)^.clr := $00000040;
  23836. end;
  23837. procedure TTMR5_T5CON.setTCKPS2(thebits : TBits_1); inline;
  23838. begin
  23839. if thebits = 0 then
  23840. pTDefRegMap(@Self)^.clr := $00000040
  23841. else
  23842. pTDefRegMap(@Self)^.&set := $00000040;
  23843. end;
  23844. function TTMR5_T5CON.getTCKPS2 : TBits_1; inline;
  23845. begin
  23846. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  23847. end;
  23848. procedure TTMR5_T5CON.setTSIDL; inline;
  23849. begin
  23850. pTDefRegMap(@Self)^.&set := $00002000;
  23851. end;
  23852. procedure TTMR5_T5CON.clearTSIDL; inline;
  23853. begin
  23854. pTDefRegMap(@Self)^.clr := $00002000;
  23855. end;
  23856. procedure TTMR5_T5CON.setTSIDL(thebits : TBits_1); inline;
  23857. begin
  23858. if thebits = 0 then
  23859. pTDefRegMap(@Self)^.clr := $00002000
  23860. else
  23861. pTDefRegMap(@Self)^.&set := $00002000;
  23862. end;
  23863. function TTMR5_T5CON.getTSIDL : TBits_1; inline;
  23864. begin
  23865. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23866. end;
  23867. procedure TTMR5_T5CON.setTON; inline;
  23868. begin
  23869. pTDefRegMap(@Self)^.&set := $00008000;
  23870. end;
  23871. procedure TTMR5_T5CON.clearTON; inline;
  23872. begin
  23873. pTDefRegMap(@Self)^.clr := $00008000;
  23874. end;
  23875. procedure TTMR5_T5CON.setTON(thebits : TBits_1); inline;
  23876. begin
  23877. if thebits = 0 then
  23878. pTDefRegMap(@Self)^.clr := $00008000
  23879. else
  23880. pTDefRegMap(@Self)^.&set := $00008000;
  23881. end;
  23882. function TTMR5_T5CON.getTON : TBits_1; inline;
  23883. begin
  23884. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23885. end;
  23886. procedure TTMR5_T5CON.setw(thebits : TBits_32); inline;
  23887. begin
  23888. pTDefRegMap(@Self)^.val := thebits;
  23889. end;
  23890. function TTMR5_T5CON.getw : TBits_32; inline;
  23891. begin
  23892. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23893. end;
  23894. procedure TICAP1_IC1CON.setICM(thebits : TBits_3); inline;
  23895. begin
  23896. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  23897. end;
  23898. function TICAP1_IC1CON.getICM : TBits_3; inline;
  23899. begin
  23900. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  23901. end;
  23902. procedure TICAP1_IC1CON.setICBNE; inline;
  23903. begin
  23904. pTDefRegMap(@Self)^.&set := $00000008;
  23905. end;
  23906. procedure TICAP1_IC1CON.clearICBNE; inline;
  23907. begin
  23908. pTDefRegMap(@Self)^.clr := $00000008;
  23909. end;
  23910. procedure TICAP1_IC1CON.setICBNE(thebits : TBits_1); inline;
  23911. begin
  23912. if thebits = 0 then
  23913. pTDefRegMap(@Self)^.clr := $00000008
  23914. else
  23915. pTDefRegMap(@Self)^.&set := $00000008;
  23916. end;
  23917. function TICAP1_IC1CON.getICBNE : TBits_1; inline;
  23918. begin
  23919. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  23920. end;
  23921. procedure TICAP1_IC1CON.setICOV; inline;
  23922. begin
  23923. pTDefRegMap(@Self)^.&set := $00000010;
  23924. end;
  23925. procedure TICAP1_IC1CON.clearICOV; inline;
  23926. begin
  23927. pTDefRegMap(@Self)^.clr := $00000010;
  23928. end;
  23929. procedure TICAP1_IC1CON.setICOV(thebits : TBits_1); inline;
  23930. begin
  23931. if thebits = 0 then
  23932. pTDefRegMap(@Self)^.clr := $00000010
  23933. else
  23934. pTDefRegMap(@Self)^.&set := $00000010;
  23935. end;
  23936. function TICAP1_IC1CON.getICOV : TBits_1; inline;
  23937. begin
  23938. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23939. end;
  23940. procedure TICAP1_IC1CON.setICI(thebits : TBits_2); inline;
  23941. begin
  23942. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  23943. end;
  23944. function TICAP1_IC1CON.getICI : TBits_2; inline;
  23945. begin
  23946. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  23947. end;
  23948. procedure TICAP1_IC1CON.setICTMR; inline;
  23949. begin
  23950. pTDefRegMap(@Self)^.&set := $00000080;
  23951. end;
  23952. procedure TICAP1_IC1CON.clearICTMR; inline;
  23953. begin
  23954. pTDefRegMap(@Self)^.clr := $00000080;
  23955. end;
  23956. procedure TICAP1_IC1CON.setICTMR(thebits : TBits_1); inline;
  23957. begin
  23958. if thebits = 0 then
  23959. pTDefRegMap(@Self)^.clr := $00000080
  23960. else
  23961. pTDefRegMap(@Self)^.&set := $00000080;
  23962. end;
  23963. function TICAP1_IC1CON.getICTMR : TBits_1; inline;
  23964. begin
  23965. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23966. end;
  23967. procedure TICAP1_IC1CON.setC32; inline;
  23968. begin
  23969. pTDefRegMap(@Self)^.&set := $00000100;
  23970. end;
  23971. procedure TICAP1_IC1CON.clearC32; inline;
  23972. begin
  23973. pTDefRegMap(@Self)^.clr := $00000100;
  23974. end;
  23975. procedure TICAP1_IC1CON.setC32(thebits : TBits_1); inline;
  23976. begin
  23977. if thebits = 0 then
  23978. pTDefRegMap(@Self)^.clr := $00000100
  23979. else
  23980. pTDefRegMap(@Self)^.&set := $00000100;
  23981. end;
  23982. function TICAP1_IC1CON.getC32 : TBits_1; inline;
  23983. begin
  23984. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  23985. end;
  23986. procedure TICAP1_IC1CON.setFEDGE; inline;
  23987. begin
  23988. pTDefRegMap(@Self)^.&set := $00000200;
  23989. end;
  23990. procedure TICAP1_IC1CON.clearFEDGE; inline;
  23991. begin
  23992. pTDefRegMap(@Self)^.clr := $00000200;
  23993. end;
  23994. procedure TICAP1_IC1CON.setFEDGE(thebits : TBits_1); inline;
  23995. begin
  23996. if thebits = 0 then
  23997. pTDefRegMap(@Self)^.clr := $00000200
  23998. else
  23999. pTDefRegMap(@Self)^.&set := $00000200;
  24000. end;
  24001. function TICAP1_IC1CON.getFEDGE : TBits_1; inline;
  24002. begin
  24003. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  24004. end;
  24005. procedure TICAP1_IC1CON.setSIDL; inline;
  24006. begin
  24007. pTDefRegMap(@Self)^.&set := $00002000;
  24008. end;
  24009. procedure TICAP1_IC1CON.clearSIDL; inline;
  24010. begin
  24011. pTDefRegMap(@Self)^.clr := $00002000;
  24012. end;
  24013. procedure TICAP1_IC1CON.setSIDL(thebits : TBits_1); inline;
  24014. begin
  24015. if thebits = 0 then
  24016. pTDefRegMap(@Self)^.clr := $00002000
  24017. else
  24018. pTDefRegMap(@Self)^.&set := $00002000;
  24019. end;
  24020. function TICAP1_IC1CON.getSIDL : TBits_1; inline;
  24021. begin
  24022. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24023. end;
  24024. procedure TICAP1_IC1CON.setON; inline;
  24025. begin
  24026. pTDefRegMap(@Self)^.&set := $00008000;
  24027. end;
  24028. procedure TICAP1_IC1CON.clearON; inline;
  24029. begin
  24030. pTDefRegMap(@Self)^.clr := $00008000;
  24031. end;
  24032. procedure TICAP1_IC1CON.setON(thebits : TBits_1); inline;
  24033. begin
  24034. if thebits = 0 then
  24035. pTDefRegMap(@Self)^.clr := $00008000
  24036. else
  24037. pTDefRegMap(@Self)^.&set := $00008000;
  24038. end;
  24039. function TICAP1_IC1CON.getON : TBits_1; inline;
  24040. begin
  24041. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24042. end;
  24043. procedure TICAP1_IC1CON.setICM0; inline;
  24044. begin
  24045. pTDefRegMap(@Self)^.&set := $00000001;
  24046. end;
  24047. procedure TICAP1_IC1CON.clearICM0; inline;
  24048. begin
  24049. pTDefRegMap(@Self)^.clr := $00000001;
  24050. end;
  24051. procedure TICAP1_IC1CON.setICM0(thebits : TBits_1); inline;
  24052. begin
  24053. if thebits = 0 then
  24054. pTDefRegMap(@Self)^.clr := $00000001
  24055. else
  24056. pTDefRegMap(@Self)^.&set := $00000001;
  24057. end;
  24058. function TICAP1_IC1CON.getICM0 : TBits_1; inline;
  24059. begin
  24060. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24061. end;
  24062. procedure TICAP1_IC1CON.setICM1; inline;
  24063. begin
  24064. pTDefRegMap(@Self)^.&set := $00000002;
  24065. end;
  24066. procedure TICAP1_IC1CON.clearICM1; inline;
  24067. begin
  24068. pTDefRegMap(@Self)^.clr := $00000002;
  24069. end;
  24070. procedure TICAP1_IC1CON.setICM1(thebits : TBits_1); inline;
  24071. begin
  24072. if thebits = 0 then
  24073. pTDefRegMap(@Self)^.clr := $00000002
  24074. else
  24075. pTDefRegMap(@Self)^.&set := $00000002;
  24076. end;
  24077. function TICAP1_IC1CON.getICM1 : TBits_1; inline;
  24078. begin
  24079. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24080. end;
  24081. procedure TICAP1_IC1CON.setICM2; inline;
  24082. begin
  24083. pTDefRegMap(@Self)^.&set := $00000004;
  24084. end;
  24085. procedure TICAP1_IC1CON.clearICM2; inline;
  24086. begin
  24087. pTDefRegMap(@Self)^.clr := $00000004;
  24088. end;
  24089. procedure TICAP1_IC1CON.setICM2(thebits : TBits_1); inline;
  24090. begin
  24091. if thebits = 0 then
  24092. pTDefRegMap(@Self)^.clr := $00000004
  24093. else
  24094. pTDefRegMap(@Self)^.&set := $00000004;
  24095. end;
  24096. function TICAP1_IC1CON.getICM2 : TBits_1; inline;
  24097. begin
  24098. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24099. end;
  24100. procedure TICAP1_IC1CON.setICI0; inline;
  24101. begin
  24102. pTDefRegMap(@Self)^.&set := $00000020;
  24103. end;
  24104. procedure TICAP1_IC1CON.clearICI0; inline;
  24105. begin
  24106. pTDefRegMap(@Self)^.clr := $00000020;
  24107. end;
  24108. procedure TICAP1_IC1CON.setICI0(thebits : TBits_1); inline;
  24109. begin
  24110. if thebits = 0 then
  24111. pTDefRegMap(@Self)^.clr := $00000020
  24112. else
  24113. pTDefRegMap(@Self)^.&set := $00000020;
  24114. end;
  24115. function TICAP1_IC1CON.getICI0 : TBits_1; inline;
  24116. begin
  24117. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24118. end;
  24119. procedure TICAP1_IC1CON.setICI1; inline;
  24120. begin
  24121. pTDefRegMap(@Self)^.&set := $00000040;
  24122. end;
  24123. procedure TICAP1_IC1CON.clearICI1; inline;
  24124. begin
  24125. pTDefRegMap(@Self)^.clr := $00000040;
  24126. end;
  24127. procedure TICAP1_IC1CON.setICI1(thebits : TBits_1); inline;
  24128. begin
  24129. if thebits = 0 then
  24130. pTDefRegMap(@Self)^.clr := $00000040
  24131. else
  24132. pTDefRegMap(@Self)^.&set := $00000040;
  24133. end;
  24134. function TICAP1_IC1CON.getICI1 : TBits_1; inline;
  24135. begin
  24136. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  24137. end;
  24138. procedure TICAP1_IC1CON.setICSIDL; inline;
  24139. begin
  24140. pTDefRegMap(@Self)^.&set := $00002000;
  24141. end;
  24142. procedure TICAP1_IC1CON.clearICSIDL; inline;
  24143. begin
  24144. pTDefRegMap(@Self)^.clr := $00002000;
  24145. end;
  24146. procedure TICAP1_IC1CON.setICSIDL(thebits : TBits_1); inline;
  24147. begin
  24148. if thebits = 0 then
  24149. pTDefRegMap(@Self)^.clr := $00002000
  24150. else
  24151. pTDefRegMap(@Self)^.&set := $00002000;
  24152. end;
  24153. function TICAP1_IC1CON.getICSIDL : TBits_1; inline;
  24154. begin
  24155. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24156. end;
  24157. procedure TICAP1_IC1CON.setw(thebits : TBits_32); inline;
  24158. begin
  24159. pTDefRegMap(@Self)^.val := thebits;
  24160. end;
  24161. function TICAP1_IC1CON.getw : TBits_32; inline;
  24162. begin
  24163. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  24164. end;
  24165. procedure TICAP2_IC2CON.setICM(thebits : TBits_3); inline;
  24166. begin
  24167. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  24168. end;
  24169. function TICAP2_IC2CON.getICM : TBits_3; inline;
  24170. begin
  24171. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  24172. end;
  24173. procedure TICAP2_IC2CON.setICBNE; inline;
  24174. begin
  24175. pTDefRegMap(@Self)^.&set := $00000008;
  24176. end;
  24177. procedure TICAP2_IC2CON.clearICBNE; inline;
  24178. begin
  24179. pTDefRegMap(@Self)^.clr := $00000008;
  24180. end;
  24181. procedure TICAP2_IC2CON.setICBNE(thebits : TBits_1); inline;
  24182. begin
  24183. if thebits = 0 then
  24184. pTDefRegMap(@Self)^.clr := $00000008
  24185. else
  24186. pTDefRegMap(@Self)^.&set := $00000008;
  24187. end;
  24188. function TICAP2_IC2CON.getICBNE : TBits_1; inline;
  24189. begin
  24190. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  24191. end;
  24192. procedure TICAP2_IC2CON.setICOV; inline;
  24193. begin
  24194. pTDefRegMap(@Self)^.&set := $00000010;
  24195. end;
  24196. procedure TICAP2_IC2CON.clearICOV; inline;
  24197. begin
  24198. pTDefRegMap(@Self)^.clr := $00000010;
  24199. end;
  24200. procedure TICAP2_IC2CON.setICOV(thebits : TBits_1); inline;
  24201. begin
  24202. if thebits = 0 then
  24203. pTDefRegMap(@Self)^.clr := $00000010
  24204. else
  24205. pTDefRegMap(@Self)^.&set := $00000010;
  24206. end;
  24207. function TICAP2_IC2CON.getICOV : TBits_1; inline;
  24208. begin
  24209. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  24210. end;
  24211. procedure TICAP2_IC2CON.setICI(thebits : TBits_2); inline;
  24212. begin
  24213. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  24214. end;
  24215. function TICAP2_IC2CON.getICI : TBits_2; inline;
  24216. begin
  24217. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  24218. end;
  24219. procedure TICAP2_IC2CON.setICTMR; inline;
  24220. begin
  24221. pTDefRegMap(@Self)^.&set := $00000080;
  24222. end;
  24223. procedure TICAP2_IC2CON.clearICTMR; inline;
  24224. begin
  24225. pTDefRegMap(@Self)^.clr := $00000080;
  24226. end;
  24227. procedure TICAP2_IC2CON.setICTMR(thebits : TBits_1); inline;
  24228. begin
  24229. if thebits = 0 then
  24230. pTDefRegMap(@Self)^.clr := $00000080
  24231. else
  24232. pTDefRegMap(@Self)^.&set := $00000080;
  24233. end;
  24234. function TICAP2_IC2CON.getICTMR : TBits_1; inline;
  24235. begin
  24236. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  24237. end;
  24238. procedure TICAP2_IC2CON.setC32; inline;
  24239. begin
  24240. pTDefRegMap(@Self)^.&set := $00000100;
  24241. end;
  24242. procedure TICAP2_IC2CON.clearC32; inline;
  24243. begin
  24244. pTDefRegMap(@Self)^.clr := $00000100;
  24245. end;
  24246. procedure TICAP2_IC2CON.setC32(thebits : TBits_1); inline;
  24247. begin
  24248. if thebits = 0 then
  24249. pTDefRegMap(@Self)^.clr := $00000100
  24250. else
  24251. pTDefRegMap(@Self)^.&set := $00000100;
  24252. end;
  24253. function TICAP2_IC2CON.getC32 : TBits_1; inline;
  24254. begin
  24255. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  24256. end;
  24257. procedure TICAP2_IC2CON.setFEDGE; inline;
  24258. begin
  24259. pTDefRegMap(@Self)^.&set := $00000200;
  24260. end;
  24261. procedure TICAP2_IC2CON.clearFEDGE; inline;
  24262. begin
  24263. pTDefRegMap(@Self)^.clr := $00000200;
  24264. end;
  24265. procedure TICAP2_IC2CON.setFEDGE(thebits : TBits_1); inline;
  24266. begin
  24267. if thebits = 0 then
  24268. pTDefRegMap(@Self)^.clr := $00000200
  24269. else
  24270. pTDefRegMap(@Self)^.&set := $00000200;
  24271. end;
  24272. function TICAP2_IC2CON.getFEDGE : TBits_1; inline;
  24273. begin
  24274. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  24275. end;
  24276. procedure TICAP2_IC2CON.setSIDL; inline;
  24277. begin
  24278. pTDefRegMap(@Self)^.&set := $00002000;
  24279. end;
  24280. procedure TICAP2_IC2CON.clearSIDL; inline;
  24281. begin
  24282. pTDefRegMap(@Self)^.clr := $00002000;
  24283. end;
  24284. procedure TICAP2_IC2CON.setSIDL(thebits : TBits_1); inline;
  24285. begin
  24286. if thebits = 0 then
  24287. pTDefRegMap(@Self)^.clr := $00002000
  24288. else
  24289. pTDefRegMap(@Self)^.&set := $00002000;
  24290. end;
  24291. function TICAP2_IC2CON.getSIDL : TBits_1; inline;
  24292. begin
  24293. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24294. end;
  24295. procedure TICAP2_IC2CON.setON; inline;
  24296. begin
  24297. pTDefRegMap(@Self)^.&set := $00008000;
  24298. end;
  24299. procedure TICAP2_IC2CON.clearON; inline;
  24300. begin
  24301. pTDefRegMap(@Self)^.clr := $00008000;
  24302. end;
  24303. procedure TICAP2_IC2CON.setON(thebits : TBits_1); inline;
  24304. begin
  24305. if thebits = 0 then
  24306. pTDefRegMap(@Self)^.clr := $00008000
  24307. else
  24308. pTDefRegMap(@Self)^.&set := $00008000;
  24309. end;
  24310. function TICAP2_IC2CON.getON : TBits_1; inline;
  24311. begin
  24312. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24313. end;
  24314. procedure TICAP2_IC2CON.setICM0; inline;
  24315. begin
  24316. pTDefRegMap(@Self)^.&set := $00000001;
  24317. end;
  24318. procedure TICAP2_IC2CON.clearICM0; inline;
  24319. begin
  24320. pTDefRegMap(@Self)^.clr := $00000001;
  24321. end;
  24322. procedure TICAP2_IC2CON.setICM0(thebits : TBits_1); inline;
  24323. begin
  24324. if thebits = 0 then
  24325. pTDefRegMap(@Self)^.clr := $00000001
  24326. else
  24327. pTDefRegMap(@Self)^.&set := $00000001;
  24328. end;
  24329. function TICAP2_IC2CON.getICM0 : TBits_1; inline;
  24330. begin
  24331. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24332. end;
  24333. procedure TICAP2_IC2CON.setICM1; inline;
  24334. begin
  24335. pTDefRegMap(@Self)^.&set := $00000002;
  24336. end;
  24337. procedure TICAP2_IC2CON.clearICM1; inline;
  24338. begin
  24339. pTDefRegMap(@Self)^.clr := $00000002;
  24340. end;
  24341. procedure TICAP2_IC2CON.setICM1(thebits : TBits_1); inline;
  24342. begin
  24343. if thebits = 0 then
  24344. pTDefRegMap(@Self)^.clr := $00000002
  24345. else
  24346. pTDefRegMap(@Self)^.&set := $00000002;
  24347. end;
  24348. function TICAP2_IC2CON.getICM1 : TBits_1; inline;
  24349. begin
  24350. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24351. end;
  24352. procedure TICAP2_IC2CON.setICM2; inline;
  24353. begin
  24354. pTDefRegMap(@Self)^.&set := $00000004;
  24355. end;
  24356. procedure TICAP2_IC2CON.clearICM2; inline;
  24357. begin
  24358. pTDefRegMap(@Self)^.clr := $00000004;
  24359. end;
  24360. procedure TICAP2_IC2CON.setICM2(thebits : TBits_1); inline;
  24361. begin
  24362. if thebits = 0 then
  24363. pTDefRegMap(@Self)^.clr := $00000004
  24364. else
  24365. pTDefRegMap(@Self)^.&set := $00000004;
  24366. end;
  24367. function TICAP2_IC2CON.getICM2 : TBits_1; inline;
  24368. begin
  24369. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24370. end;
  24371. procedure TICAP2_IC2CON.setICI0; inline;
  24372. begin
  24373. pTDefRegMap(@Self)^.&set := $00000020;
  24374. end;
  24375. procedure TICAP2_IC2CON.clearICI0; inline;
  24376. begin
  24377. pTDefRegMap(@Self)^.clr := $00000020;
  24378. end;
  24379. procedure TICAP2_IC2CON.setICI0(thebits : TBits_1); inline;
  24380. begin
  24381. if thebits = 0 then
  24382. pTDefRegMap(@Self)^.clr := $00000020
  24383. else
  24384. pTDefRegMap(@Self)^.&set := $00000020;
  24385. end;
  24386. function TICAP2_IC2CON.getICI0 : TBits_1; inline;
  24387. begin
  24388. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24389. end;
  24390. procedure TICAP2_IC2CON.setICI1; inline;
  24391. begin
  24392. pTDefRegMap(@Self)^.&set := $00000040;
  24393. end;
  24394. procedure TICAP2_IC2CON.clearICI1; inline;
  24395. begin
  24396. pTDefRegMap(@Self)^.clr := $00000040;
  24397. end;
  24398. procedure TICAP2_IC2CON.setICI1(thebits : TBits_1); inline;
  24399. begin
  24400. if thebits = 0 then
  24401. pTDefRegMap(@Self)^.clr := $00000040
  24402. else
  24403. pTDefRegMap(@Self)^.&set := $00000040;
  24404. end;
  24405. function TICAP2_IC2CON.getICI1 : TBits_1; inline;
  24406. begin
  24407. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  24408. end;
  24409. procedure TICAP2_IC2CON.setICSIDL; inline;
  24410. begin
  24411. pTDefRegMap(@Self)^.&set := $00002000;
  24412. end;
  24413. procedure TICAP2_IC2CON.clearICSIDL; inline;
  24414. begin
  24415. pTDefRegMap(@Self)^.clr := $00002000;
  24416. end;
  24417. procedure TICAP2_IC2CON.setICSIDL(thebits : TBits_1); inline;
  24418. begin
  24419. if thebits = 0 then
  24420. pTDefRegMap(@Self)^.clr := $00002000
  24421. else
  24422. pTDefRegMap(@Self)^.&set := $00002000;
  24423. end;
  24424. function TICAP2_IC2CON.getICSIDL : TBits_1; inline;
  24425. begin
  24426. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24427. end;
  24428. procedure TICAP2_IC2CON.setw(thebits : TBits_32); inline;
  24429. begin
  24430. pTDefRegMap(@Self)^.val := thebits;
  24431. end;
  24432. function TICAP2_IC2CON.getw : TBits_32; inline;
  24433. begin
  24434. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  24435. end;
  24436. procedure TICAP3_IC3CON.setICM(thebits : TBits_3); inline;
  24437. begin
  24438. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  24439. end;
  24440. function TICAP3_IC3CON.getICM : TBits_3; inline;
  24441. begin
  24442. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  24443. end;
  24444. procedure TICAP3_IC3CON.setICBNE; inline;
  24445. begin
  24446. pTDefRegMap(@Self)^.&set := $00000008;
  24447. end;
  24448. procedure TICAP3_IC3CON.clearICBNE; inline;
  24449. begin
  24450. pTDefRegMap(@Self)^.clr := $00000008;
  24451. end;
  24452. procedure TICAP3_IC3CON.setICBNE(thebits : TBits_1); inline;
  24453. begin
  24454. if thebits = 0 then
  24455. pTDefRegMap(@Self)^.clr := $00000008
  24456. else
  24457. pTDefRegMap(@Self)^.&set := $00000008;
  24458. end;
  24459. function TICAP3_IC3CON.getICBNE : TBits_1; inline;
  24460. begin
  24461. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  24462. end;
  24463. procedure TICAP3_IC3CON.setICOV; inline;
  24464. begin
  24465. pTDefRegMap(@Self)^.&set := $00000010;
  24466. end;
  24467. procedure TICAP3_IC3CON.clearICOV; inline;
  24468. begin
  24469. pTDefRegMap(@Self)^.clr := $00000010;
  24470. end;
  24471. procedure TICAP3_IC3CON.setICOV(thebits : TBits_1); inline;
  24472. begin
  24473. if thebits = 0 then
  24474. pTDefRegMap(@Self)^.clr := $00000010
  24475. else
  24476. pTDefRegMap(@Self)^.&set := $00000010;
  24477. end;
  24478. function TICAP3_IC3CON.getICOV : TBits_1; inline;
  24479. begin
  24480. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  24481. end;
  24482. procedure TICAP3_IC3CON.setICI(thebits : TBits_2); inline;
  24483. begin
  24484. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  24485. end;
  24486. function TICAP3_IC3CON.getICI : TBits_2; inline;
  24487. begin
  24488. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  24489. end;
  24490. procedure TICAP3_IC3CON.setICTMR; inline;
  24491. begin
  24492. pTDefRegMap(@Self)^.&set := $00000080;
  24493. end;
  24494. procedure TICAP3_IC3CON.clearICTMR; inline;
  24495. begin
  24496. pTDefRegMap(@Self)^.clr := $00000080;
  24497. end;
  24498. procedure TICAP3_IC3CON.setICTMR(thebits : TBits_1); inline;
  24499. begin
  24500. if thebits = 0 then
  24501. pTDefRegMap(@Self)^.clr := $00000080
  24502. else
  24503. pTDefRegMap(@Self)^.&set := $00000080;
  24504. end;
  24505. function TICAP3_IC3CON.getICTMR : TBits_1; inline;
  24506. begin
  24507. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  24508. end;
  24509. procedure TICAP3_IC3CON.setC32; inline;
  24510. begin
  24511. pTDefRegMap(@Self)^.&set := $00000100;
  24512. end;
  24513. procedure TICAP3_IC3CON.clearC32; inline;
  24514. begin
  24515. pTDefRegMap(@Self)^.clr := $00000100;
  24516. end;
  24517. procedure TICAP3_IC3CON.setC32(thebits : TBits_1); inline;
  24518. begin
  24519. if thebits = 0 then
  24520. pTDefRegMap(@Self)^.clr := $00000100
  24521. else
  24522. pTDefRegMap(@Self)^.&set := $00000100;
  24523. end;
  24524. function TICAP3_IC3CON.getC32 : TBits_1; inline;
  24525. begin
  24526. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  24527. end;
  24528. procedure TICAP3_IC3CON.setFEDGE; inline;
  24529. begin
  24530. pTDefRegMap(@Self)^.&set := $00000200;
  24531. end;
  24532. procedure TICAP3_IC3CON.clearFEDGE; inline;
  24533. begin
  24534. pTDefRegMap(@Self)^.clr := $00000200;
  24535. end;
  24536. procedure TICAP3_IC3CON.setFEDGE(thebits : TBits_1); inline;
  24537. begin
  24538. if thebits = 0 then
  24539. pTDefRegMap(@Self)^.clr := $00000200
  24540. else
  24541. pTDefRegMap(@Self)^.&set := $00000200;
  24542. end;
  24543. function TICAP3_IC3CON.getFEDGE : TBits_1; inline;
  24544. begin
  24545. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  24546. end;
  24547. procedure TICAP3_IC3CON.setSIDL; inline;
  24548. begin
  24549. pTDefRegMap(@Self)^.&set := $00002000;
  24550. end;
  24551. procedure TICAP3_IC3CON.clearSIDL; inline;
  24552. begin
  24553. pTDefRegMap(@Self)^.clr := $00002000;
  24554. end;
  24555. procedure TICAP3_IC3CON.setSIDL(thebits : TBits_1); inline;
  24556. begin
  24557. if thebits = 0 then
  24558. pTDefRegMap(@Self)^.clr := $00002000
  24559. else
  24560. pTDefRegMap(@Self)^.&set := $00002000;
  24561. end;
  24562. function TICAP3_IC3CON.getSIDL : TBits_1; inline;
  24563. begin
  24564. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24565. end;
  24566. procedure TICAP3_IC3CON.setON; inline;
  24567. begin
  24568. pTDefRegMap(@Self)^.&set := $00008000;
  24569. end;
  24570. procedure TICAP3_IC3CON.clearON; inline;
  24571. begin
  24572. pTDefRegMap(@Self)^.clr := $00008000;
  24573. end;
  24574. procedure TICAP3_IC3CON.setON(thebits : TBits_1); inline;
  24575. begin
  24576. if thebits = 0 then
  24577. pTDefRegMap(@Self)^.clr := $00008000
  24578. else
  24579. pTDefRegMap(@Self)^.&set := $00008000;
  24580. end;
  24581. function TICAP3_IC3CON.getON : TBits_1; inline;
  24582. begin
  24583. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24584. end;
  24585. procedure TICAP3_IC3CON.setICM0; inline;
  24586. begin
  24587. pTDefRegMap(@Self)^.&set := $00000001;
  24588. end;
  24589. procedure TICAP3_IC3CON.clearICM0; inline;
  24590. begin
  24591. pTDefRegMap(@Self)^.clr := $00000001;
  24592. end;
  24593. procedure TICAP3_IC3CON.setICM0(thebits : TBits_1); inline;
  24594. begin
  24595. if thebits = 0 then
  24596. pTDefRegMap(@Self)^.clr := $00000001
  24597. else
  24598. pTDefRegMap(@Self)^.&set := $00000001;
  24599. end;
  24600. function TICAP3_IC3CON.getICM0 : TBits_1; inline;
  24601. begin
  24602. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24603. end;
  24604. procedure TICAP3_IC3CON.setICM1; inline;
  24605. begin
  24606. pTDefRegMap(@Self)^.&set := $00000002;
  24607. end;
  24608. procedure TICAP3_IC3CON.clearICM1; inline;
  24609. begin
  24610. pTDefRegMap(@Self)^.clr := $00000002;
  24611. end;
  24612. procedure TICAP3_IC3CON.setICM1(thebits : TBits_1); inline;
  24613. begin
  24614. if thebits = 0 then
  24615. pTDefRegMap(@Self)^.clr := $00000002
  24616. else
  24617. pTDefRegMap(@Self)^.&set := $00000002;
  24618. end;
  24619. function TICAP3_IC3CON.getICM1 : TBits_1; inline;
  24620. begin
  24621. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24622. end;
  24623. procedure TICAP3_IC3CON.setICM2; inline;
  24624. begin
  24625. pTDefRegMap(@Self)^.&set := $00000004;
  24626. end;
  24627. procedure TICAP3_IC3CON.clearICM2; inline;
  24628. begin
  24629. pTDefRegMap(@Self)^.clr := $00000004;
  24630. end;
  24631. procedure TICAP3_IC3CON.setICM2(thebits : TBits_1); inline;
  24632. begin
  24633. if thebits = 0 then
  24634. pTDefRegMap(@Self)^.clr := $00000004
  24635. else
  24636. pTDefRegMap(@Self)^.&set := $00000004;
  24637. end;
  24638. function TICAP3_IC3CON.getICM2 : TBits_1; inline;
  24639. begin
  24640. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24641. end;
  24642. procedure TICAP3_IC3CON.setICI0; inline;
  24643. begin
  24644. pTDefRegMap(@Self)^.&set := $00000020;
  24645. end;
  24646. procedure TICAP3_IC3CON.clearICI0; inline;
  24647. begin
  24648. pTDefRegMap(@Self)^.clr := $00000020;
  24649. end;
  24650. procedure TICAP3_IC3CON.setICI0(thebits : TBits_1); inline;
  24651. begin
  24652. if thebits = 0 then
  24653. pTDefRegMap(@Self)^.clr := $00000020
  24654. else
  24655. pTDefRegMap(@Self)^.&set := $00000020;
  24656. end;
  24657. function TICAP3_IC3CON.getICI0 : TBits_1; inline;
  24658. begin
  24659. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24660. end;
  24661. procedure TICAP3_IC3CON.setICI1; inline;
  24662. begin
  24663. pTDefRegMap(@Self)^.&set := $00000040;
  24664. end;
  24665. procedure TICAP3_IC3CON.clearICI1; inline;
  24666. begin
  24667. pTDefRegMap(@Self)^.clr := $00000040;
  24668. end;
  24669. procedure TICAP3_IC3CON.setICI1(thebits : TBits_1); inline;
  24670. begin
  24671. if thebits = 0 then
  24672. pTDefRegMap(@Self)^.clr := $00000040
  24673. else
  24674. pTDefRegMap(@Self)^.&set := $00000040;
  24675. end;
  24676. function TICAP3_IC3CON.getICI1 : TBits_1; inline;
  24677. begin
  24678. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  24679. end;
  24680. procedure TICAP3_IC3CON.setICSIDL; inline;
  24681. begin
  24682. pTDefRegMap(@Self)^.&set := $00002000;
  24683. end;
  24684. procedure TICAP3_IC3CON.clearICSIDL; inline;
  24685. begin
  24686. pTDefRegMap(@Self)^.clr := $00002000;
  24687. end;
  24688. procedure TICAP3_IC3CON.setICSIDL(thebits : TBits_1); inline;
  24689. begin
  24690. if thebits = 0 then
  24691. pTDefRegMap(@Self)^.clr := $00002000
  24692. else
  24693. pTDefRegMap(@Self)^.&set := $00002000;
  24694. end;
  24695. function TICAP3_IC3CON.getICSIDL : TBits_1; inline;
  24696. begin
  24697. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24698. end;
  24699. procedure TICAP3_IC3CON.setw(thebits : TBits_32); inline;
  24700. begin
  24701. pTDefRegMap(@Self)^.val := thebits;
  24702. end;
  24703. function TICAP3_IC3CON.getw : TBits_32; inline;
  24704. begin
  24705. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  24706. end;
  24707. procedure TICAP4_IC4CON.setICM(thebits : TBits_3); inline;
  24708. begin
  24709. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  24710. end;
  24711. function TICAP4_IC4CON.getICM : TBits_3; inline;
  24712. begin
  24713. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  24714. end;
  24715. procedure TICAP4_IC4CON.setICBNE; inline;
  24716. begin
  24717. pTDefRegMap(@Self)^.&set := $00000008;
  24718. end;
  24719. procedure TICAP4_IC4CON.clearICBNE; inline;
  24720. begin
  24721. pTDefRegMap(@Self)^.clr := $00000008;
  24722. end;
  24723. procedure TICAP4_IC4CON.setICBNE(thebits : TBits_1); inline;
  24724. begin
  24725. if thebits = 0 then
  24726. pTDefRegMap(@Self)^.clr := $00000008
  24727. else
  24728. pTDefRegMap(@Self)^.&set := $00000008;
  24729. end;
  24730. function TICAP4_IC4CON.getICBNE : TBits_1; inline;
  24731. begin
  24732. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  24733. end;
  24734. procedure TICAP4_IC4CON.setICOV; inline;
  24735. begin
  24736. pTDefRegMap(@Self)^.&set := $00000010;
  24737. end;
  24738. procedure TICAP4_IC4CON.clearICOV; inline;
  24739. begin
  24740. pTDefRegMap(@Self)^.clr := $00000010;
  24741. end;
  24742. procedure TICAP4_IC4CON.setICOV(thebits : TBits_1); inline;
  24743. begin
  24744. if thebits = 0 then
  24745. pTDefRegMap(@Self)^.clr := $00000010
  24746. else
  24747. pTDefRegMap(@Self)^.&set := $00000010;
  24748. end;
  24749. function TICAP4_IC4CON.getICOV : TBits_1; inline;
  24750. begin
  24751. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  24752. end;
  24753. procedure TICAP4_IC4CON.setICI(thebits : TBits_2); inline;
  24754. begin
  24755. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  24756. end;
  24757. function TICAP4_IC4CON.getICI : TBits_2; inline;
  24758. begin
  24759. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  24760. end;
  24761. procedure TICAP4_IC4CON.setICTMR; inline;
  24762. begin
  24763. pTDefRegMap(@Self)^.&set := $00000080;
  24764. end;
  24765. procedure TICAP4_IC4CON.clearICTMR; inline;
  24766. begin
  24767. pTDefRegMap(@Self)^.clr := $00000080;
  24768. end;
  24769. procedure TICAP4_IC4CON.setICTMR(thebits : TBits_1); inline;
  24770. begin
  24771. if thebits = 0 then
  24772. pTDefRegMap(@Self)^.clr := $00000080
  24773. else
  24774. pTDefRegMap(@Self)^.&set := $00000080;
  24775. end;
  24776. function TICAP4_IC4CON.getICTMR : TBits_1; inline;
  24777. begin
  24778. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  24779. end;
  24780. procedure TICAP4_IC4CON.setC32; inline;
  24781. begin
  24782. pTDefRegMap(@Self)^.&set := $00000100;
  24783. end;
  24784. procedure TICAP4_IC4CON.clearC32; inline;
  24785. begin
  24786. pTDefRegMap(@Self)^.clr := $00000100;
  24787. end;
  24788. procedure TICAP4_IC4CON.setC32(thebits : TBits_1); inline;
  24789. begin
  24790. if thebits = 0 then
  24791. pTDefRegMap(@Self)^.clr := $00000100
  24792. else
  24793. pTDefRegMap(@Self)^.&set := $00000100;
  24794. end;
  24795. function TICAP4_IC4CON.getC32 : TBits_1; inline;
  24796. begin
  24797. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  24798. end;
  24799. procedure TICAP4_IC4CON.setFEDGE; inline;
  24800. begin
  24801. pTDefRegMap(@Self)^.&set := $00000200;
  24802. end;
  24803. procedure TICAP4_IC4CON.clearFEDGE; inline;
  24804. begin
  24805. pTDefRegMap(@Self)^.clr := $00000200;
  24806. end;
  24807. procedure TICAP4_IC4CON.setFEDGE(thebits : TBits_1); inline;
  24808. begin
  24809. if thebits = 0 then
  24810. pTDefRegMap(@Self)^.clr := $00000200
  24811. else
  24812. pTDefRegMap(@Self)^.&set := $00000200;
  24813. end;
  24814. function TICAP4_IC4CON.getFEDGE : TBits_1; inline;
  24815. begin
  24816. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  24817. end;
  24818. procedure TICAP4_IC4CON.setSIDL; inline;
  24819. begin
  24820. pTDefRegMap(@Self)^.&set := $00002000;
  24821. end;
  24822. procedure TICAP4_IC4CON.clearSIDL; inline;
  24823. begin
  24824. pTDefRegMap(@Self)^.clr := $00002000;
  24825. end;
  24826. procedure TICAP4_IC4CON.setSIDL(thebits : TBits_1); inline;
  24827. begin
  24828. if thebits = 0 then
  24829. pTDefRegMap(@Self)^.clr := $00002000
  24830. else
  24831. pTDefRegMap(@Self)^.&set := $00002000;
  24832. end;
  24833. function TICAP4_IC4CON.getSIDL : TBits_1; inline;
  24834. begin
  24835. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24836. end;
  24837. procedure TICAP4_IC4CON.setON; inline;
  24838. begin
  24839. pTDefRegMap(@Self)^.&set := $00008000;
  24840. end;
  24841. procedure TICAP4_IC4CON.clearON; inline;
  24842. begin
  24843. pTDefRegMap(@Self)^.clr := $00008000;
  24844. end;
  24845. procedure TICAP4_IC4CON.setON(thebits : TBits_1); inline;
  24846. begin
  24847. if thebits = 0 then
  24848. pTDefRegMap(@Self)^.clr := $00008000
  24849. else
  24850. pTDefRegMap(@Self)^.&set := $00008000;
  24851. end;
  24852. function TICAP4_IC4CON.getON : TBits_1; inline;
  24853. begin
  24854. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24855. end;
  24856. procedure TICAP4_IC4CON.setICM0; inline;
  24857. begin
  24858. pTDefRegMap(@Self)^.&set := $00000001;
  24859. end;
  24860. procedure TICAP4_IC4CON.clearICM0; inline;
  24861. begin
  24862. pTDefRegMap(@Self)^.clr := $00000001;
  24863. end;
  24864. procedure TICAP4_IC4CON.setICM0(thebits : TBits_1); inline;
  24865. begin
  24866. if thebits = 0 then
  24867. pTDefRegMap(@Self)^.clr := $00000001
  24868. else
  24869. pTDefRegMap(@Self)^.&set := $00000001;
  24870. end;
  24871. function TICAP4_IC4CON.getICM0 : TBits_1; inline;
  24872. begin
  24873. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24874. end;
  24875. procedure TICAP4_IC4CON.setICM1; inline;
  24876. begin
  24877. pTDefRegMap(@Self)^.&set := $00000002;
  24878. end;
  24879. procedure TICAP4_IC4CON.clearICM1; inline;
  24880. begin
  24881. pTDefRegMap(@Self)^.clr := $00000002;
  24882. end;
  24883. procedure TICAP4_IC4CON.setICM1(thebits : TBits_1); inline;
  24884. begin
  24885. if thebits = 0 then
  24886. pTDefRegMap(@Self)^.clr := $00000002
  24887. else
  24888. pTDefRegMap(@Self)^.&set := $00000002;
  24889. end;
  24890. function TICAP4_IC4CON.getICM1 : TBits_1; inline;
  24891. begin
  24892. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24893. end;
  24894. procedure TICAP4_IC4CON.setICM2; inline;
  24895. begin
  24896. pTDefRegMap(@Self)^.&set := $00000004;
  24897. end;
  24898. procedure TICAP4_IC4CON.clearICM2; inline;
  24899. begin
  24900. pTDefRegMap(@Self)^.clr := $00000004;
  24901. end;
  24902. procedure TICAP4_IC4CON.setICM2(thebits : TBits_1); inline;
  24903. begin
  24904. if thebits = 0 then
  24905. pTDefRegMap(@Self)^.clr := $00000004
  24906. else
  24907. pTDefRegMap(@Self)^.&set := $00000004;
  24908. end;
  24909. function TICAP4_IC4CON.getICM2 : TBits_1; inline;
  24910. begin
  24911. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24912. end;
  24913. procedure TICAP4_IC4CON.setICI0; inline;
  24914. begin
  24915. pTDefRegMap(@Self)^.&set := $00000020;
  24916. end;
  24917. procedure TICAP4_IC4CON.clearICI0; inline;
  24918. begin
  24919. pTDefRegMap(@Self)^.clr := $00000020;
  24920. end;
  24921. procedure TICAP4_IC4CON.setICI0(thebits : TBits_1); inline;
  24922. begin
  24923. if thebits = 0 then
  24924. pTDefRegMap(@Self)^.clr := $00000020
  24925. else
  24926. pTDefRegMap(@Self)^.&set := $00000020;
  24927. end;
  24928. function TICAP4_IC4CON.getICI0 : TBits_1; inline;
  24929. begin
  24930. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24931. end;
  24932. procedure TICAP4_IC4CON.setICI1; inline;
  24933. begin
  24934. pTDefRegMap(@Self)^.&set := $00000040;
  24935. end;
  24936. procedure TICAP4_IC4CON.clearICI1; inline;
  24937. begin
  24938. pTDefRegMap(@Self)^.clr := $00000040;
  24939. end;
  24940. procedure TICAP4_IC4CON.setICI1(thebits : TBits_1); inline;
  24941. begin
  24942. if thebits = 0 then
  24943. pTDefRegMap(@Self)^.clr := $00000040
  24944. else
  24945. pTDefRegMap(@Self)^.&set := $00000040;
  24946. end;
  24947. function TICAP4_IC4CON.getICI1 : TBits_1; inline;
  24948. begin
  24949. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  24950. end;
  24951. procedure TICAP4_IC4CON.setICSIDL; inline;
  24952. begin
  24953. pTDefRegMap(@Self)^.&set := $00002000;
  24954. end;
  24955. procedure TICAP4_IC4CON.clearICSIDL; inline;
  24956. begin
  24957. pTDefRegMap(@Self)^.clr := $00002000;
  24958. end;
  24959. procedure TICAP4_IC4CON.setICSIDL(thebits : TBits_1); inline;
  24960. begin
  24961. if thebits = 0 then
  24962. pTDefRegMap(@Self)^.clr := $00002000
  24963. else
  24964. pTDefRegMap(@Self)^.&set := $00002000;
  24965. end;
  24966. function TICAP4_IC4CON.getICSIDL : TBits_1; inline;
  24967. begin
  24968. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24969. end;
  24970. procedure TICAP4_IC4CON.setw(thebits : TBits_32); inline;
  24971. begin
  24972. pTDefRegMap(@Self)^.val := thebits;
  24973. end;
  24974. function TICAP4_IC4CON.getw : TBits_32; inline;
  24975. begin
  24976. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  24977. end;
  24978. procedure TICAP5_IC5CON.setICM(thebits : TBits_3); inline;
  24979. begin
  24980. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  24981. end;
  24982. function TICAP5_IC5CON.getICM : TBits_3; inline;
  24983. begin
  24984. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  24985. end;
  24986. procedure TICAP5_IC5CON.setICBNE; inline;
  24987. begin
  24988. pTDefRegMap(@Self)^.&set := $00000008;
  24989. end;
  24990. procedure TICAP5_IC5CON.clearICBNE; inline;
  24991. begin
  24992. pTDefRegMap(@Self)^.clr := $00000008;
  24993. end;
  24994. procedure TICAP5_IC5CON.setICBNE(thebits : TBits_1); inline;
  24995. begin
  24996. if thebits = 0 then
  24997. pTDefRegMap(@Self)^.clr := $00000008
  24998. else
  24999. pTDefRegMap(@Self)^.&set := $00000008;
  25000. end;
  25001. function TICAP5_IC5CON.getICBNE : TBits_1; inline;
  25002. begin
  25003. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  25004. end;
  25005. procedure TICAP5_IC5CON.setICOV; inline;
  25006. begin
  25007. pTDefRegMap(@Self)^.&set := $00000010;
  25008. end;
  25009. procedure TICAP5_IC5CON.clearICOV; inline;
  25010. begin
  25011. pTDefRegMap(@Self)^.clr := $00000010;
  25012. end;
  25013. procedure TICAP5_IC5CON.setICOV(thebits : TBits_1); inline;
  25014. begin
  25015. if thebits = 0 then
  25016. pTDefRegMap(@Self)^.clr := $00000010
  25017. else
  25018. pTDefRegMap(@Self)^.&set := $00000010;
  25019. end;
  25020. function TICAP5_IC5CON.getICOV : TBits_1; inline;
  25021. begin
  25022. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  25023. end;
  25024. procedure TICAP5_IC5CON.setICI(thebits : TBits_2); inline;
  25025. begin
  25026. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  25027. end;
  25028. function TICAP5_IC5CON.getICI : TBits_2; inline;
  25029. begin
  25030. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  25031. end;
  25032. procedure TICAP5_IC5CON.setICTMR; inline;
  25033. begin
  25034. pTDefRegMap(@Self)^.&set := $00000080;
  25035. end;
  25036. procedure TICAP5_IC5CON.clearICTMR; inline;
  25037. begin
  25038. pTDefRegMap(@Self)^.clr := $00000080;
  25039. end;
  25040. procedure TICAP5_IC5CON.setICTMR(thebits : TBits_1); inline;
  25041. begin
  25042. if thebits = 0 then
  25043. pTDefRegMap(@Self)^.clr := $00000080
  25044. else
  25045. pTDefRegMap(@Self)^.&set := $00000080;
  25046. end;
  25047. function TICAP5_IC5CON.getICTMR : TBits_1; inline;
  25048. begin
  25049. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  25050. end;
  25051. procedure TICAP5_IC5CON.setC32; inline;
  25052. begin
  25053. pTDefRegMap(@Self)^.&set := $00000100;
  25054. end;
  25055. procedure TICAP5_IC5CON.clearC32; inline;
  25056. begin
  25057. pTDefRegMap(@Self)^.clr := $00000100;
  25058. end;
  25059. procedure TICAP5_IC5CON.setC32(thebits : TBits_1); inline;
  25060. begin
  25061. if thebits = 0 then
  25062. pTDefRegMap(@Self)^.clr := $00000100
  25063. else
  25064. pTDefRegMap(@Self)^.&set := $00000100;
  25065. end;
  25066. function TICAP5_IC5CON.getC32 : TBits_1; inline;
  25067. begin
  25068. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  25069. end;
  25070. procedure TICAP5_IC5CON.setFEDGE; inline;
  25071. begin
  25072. pTDefRegMap(@Self)^.&set := $00000200;
  25073. end;
  25074. procedure TICAP5_IC5CON.clearFEDGE; inline;
  25075. begin
  25076. pTDefRegMap(@Self)^.clr := $00000200;
  25077. end;
  25078. procedure TICAP5_IC5CON.setFEDGE(thebits : TBits_1); inline;
  25079. begin
  25080. if thebits = 0 then
  25081. pTDefRegMap(@Self)^.clr := $00000200
  25082. else
  25083. pTDefRegMap(@Self)^.&set := $00000200;
  25084. end;
  25085. function TICAP5_IC5CON.getFEDGE : TBits_1; inline;
  25086. begin
  25087. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  25088. end;
  25089. procedure TICAP5_IC5CON.setSIDL; inline;
  25090. begin
  25091. pTDefRegMap(@Self)^.&set := $00002000;
  25092. end;
  25093. procedure TICAP5_IC5CON.clearSIDL; inline;
  25094. begin
  25095. pTDefRegMap(@Self)^.clr := $00002000;
  25096. end;
  25097. procedure TICAP5_IC5CON.setSIDL(thebits : TBits_1); inline;
  25098. begin
  25099. if thebits = 0 then
  25100. pTDefRegMap(@Self)^.clr := $00002000
  25101. else
  25102. pTDefRegMap(@Self)^.&set := $00002000;
  25103. end;
  25104. function TICAP5_IC5CON.getSIDL : TBits_1; inline;
  25105. begin
  25106. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25107. end;
  25108. procedure TICAP5_IC5CON.setON; inline;
  25109. begin
  25110. pTDefRegMap(@Self)^.&set := $00008000;
  25111. end;
  25112. procedure TICAP5_IC5CON.clearON; inline;
  25113. begin
  25114. pTDefRegMap(@Self)^.clr := $00008000;
  25115. end;
  25116. procedure TICAP5_IC5CON.setON(thebits : TBits_1); inline;
  25117. begin
  25118. if thebits = 0 then
  25119. pTDefRegMap(@Self)^.clr := $00008000
  25120. else
  25121. pTDefRegMap(@Self)^.&set := $00008000;
  25122. end;
  25123. function TICAP5_IC5CON.getON : TBits_1; inline;
  25124. begin
  25125. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25126. end;
  25127. procedure TICAP5_IC5CON.setICM0; inline;
  25128. begin
  25129. pTDefRegMap(@Self)^.&set := $00000001;
  25130. end;
  25131. procedure TICAP5_IC5CON.clearICM0; inline;
  25132. begin
  25133. pTDefRegMap(@Self)^.clr := $00000001;
  25134. end;
  25135. procedure TICAP5_IC5CON.setICM0(thebits : TBits_1); inline;
  25136. begin
  25137. if thebits = 0 then
  25138. pTDefRegMap(@Self)^.clr := $00000001
  25139. else
  25140. pTDefRegMap(@Self)^.&set := $00000001;
  25141. end;
  25142. function TICAP5_IC5CON.getICM0 : TBits_1; inline;
  25143. begin
  25144. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25145. end;
  25146. procedure TICAP5_IC5CON.setICM1; inline;
  25147. begin
  25148. pTDefRegMap(@Self)^.&set := $00000002;
  25149. end;
  25150. procedure TICAP5_IC5CON.clearICM1; inline;
  25151. begin
  25152. pTDefRegMap(@Self)^.clr := $00000002;
  25153. end;
  25154. procedure TICAP5_IC5CON.setICM1(thebits : TBits_1); inline;
  25155. begin
  25156. if thebits = 0 then
  25157. pTDefRegMap(@Self)^.clr := $00000002
  25158. else
  25159. pTDefRegMap(@Self)^.&set := $00000002;
  25160. end;
  25161. function TICAP5_IC5CON.getICM1 : TBits_1; inline;
  25162. begin
  25163. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25164. end;
  25165. procedure TICAP5_IC5CON.setICM2; inline;
  25166. begin
  25167. pTDefRegMap(@Self)^.&set := $00000004;
  25168. end;
  25169. procedure TICAP5_IC5CON.clearICM2; inline;
  25170. begin
  25171. pTDefRegMap(@Self)^.clr := $00000004;
  25172. end;
  25173. procedure TICAP5_IC5CON.setICM2(thebits : TBits_1); inline;
  25174. begin
  25175. if thebits = 0 then
  25176. pTDefRegMap(@Self)^.clr := $00000004
  25177. else
  25178. pTDefRegMap(@Self)^.&set := $00000004;
  25179. end;
  25180. function TICAP5_IC5CON.getICM2 : TBits_1; inline;
  25181. begin
  25182. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25183. end;
  25184. procedure TICAP5_IC5CON.setICI0; inline;
  25185. begin
  25186. pTDefRegMap(@Self)^.&set := $00000020;
  25187. end;
  25188. procedure TICAP5_IC5CON.clearICI0; inline;
  25189. begin
  25190. pTDefRegMap(@Self)^.clr := $00000020;
  25191. end;
  25192. procedure TICAP5_IC5CON.setICI0(thebits : TBits_1); inline;
  25193. begin
  25194. if thebits = 0 then
  25195. pTDefRegMap(@Self)^.clr := $00000020
  25196. else
  25197. pTDefRegMap(@Self)^.&set := $00000020;
  25198. end;
  25199. function TICAP5_IC5CON.getICI0 : TBits_1; inline;
  25200. begin
  25201. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  25202. end;
  25203. procedure TICAP5_IC5CON.setICI1; inline;
  25204. begin
  25205. pTDefRegMap(@Self)^.&set := $00000040;
  25206. end;
  25207. procedure TICAP5_IC5CON.clearICI1; inline;
  25208. begin
  25209. pTDefRegMap(@Self)^.clr := $00000040;
  25210. end;
  25211. procedure TICAP5_IC5CON.setICI1(thebits : TBits_1); inline;
  25212. begin
  25213. if thebits = 0 then
  25214. pTDefRegMap(@Self)^.clr := $00000040
  25215. else
  25216. pTDefRegMap(@Self)^.&set := $00000040;
  25217. end;
  25218. function TICAP5_IC5CON.getICI1 : TBits_1; inline;
  25219. begin
  25220. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  25221. end;
  25222. procedure TICAP5_IC5CON.setICSIDL; inline;
  25223. begin
  25224. pTDefRegMap(@Self)^.&set := $00002000;
  25225. end;
  25226. procedure TICAP5_IC5CON.clearICSIDL; inline;
  25227. begin
  25228. pTDefRegMap(@Self)^.clr := $00002000;
  25229. end;
  25230. procedure TICAP5_IC5CON.setICSIDL(thebits : TBits_1); inline;
  25231. begin
  25232. if thebits = 0 then
  25233. pTDefRegMap(@Self)^.clr := $00002000
  25234. else
  25235. pTDefRegMap(@Self)^.&set := $00002000;
  25236. end;
  25237. function TICAP5_IC5CON.getICSIDL : TBits_1; inline;
  25238. begin
  25239. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25240. end;
  25241. procedure TICAP5_IC5CON.setw(thebits : TBits_32); inline;
  25242. begin
  25243. pTDefRegMap(@Self)^.val := thebits;
  25244. end;
  25245. function TICAP5_IC5CON.getw : TBits_32; inline;
  25246. begin
  25247. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25248. end;
  25249. procedure TOCMP1_OC1CON.setOCM(thebits : TBits_3); inline;
  25250. begin
  25251. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  25252. end;
  25253. function TOCMP1_OC1CON.getOCM : TBits_3; inline;
  25254. begin
  25255. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  25256. end;
  25257. procedure TOCMP1_OC1CON.setOCTSEL; inline;
  25258. begin
  25259. pTDefRegMap(@Self)^.&set := $00000008;
  25260. end;
  25261. procedure TOCMP1_OC1CON.clearOCTSEL; inline;
  25262. begin
  25263. pTDefRegMap(@Self)^.clr := $00000008;
  25264. end;
  25265. procedure TOCMP1_OC1CON.setOCTSEL(thebits : TBits_1); inline;
  25266. begin
  25267. if thebits = 0 then
  25268. pTDefRegMap(@Self)^.clr := $00000008
  25269. else
  25270. pTDefRegMap(@Self)^.&set := $00000008;
  25271. end;
  25272. function TOCMP1_OC1CON.getOCTSEL : TBits_1; inline;
  25273. begin
  25274. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  25275. end;
  25276. procedure TOCMP1_OC1CON.setOCFLT; inline;
  25277. begin
  25278. pTDefRegMap(@Self)^.&set := $00000010;
  25279. end;
  25280. procedure TOCMP1_OC1CON.clearOCFLT; inline;
  25281. begin
  25282. pTDefRegMap(@Self)^.clr := $00000010;
  25283. end;
  25284. procedure TOCMP1_OC1CON.setOCFLT(thebits : TBits_1); inline;
  25285. begin
  25286. if thebits = 0 then
  25287. pTDefRegMap(@Self)^.clr := $00000010
  25288. else
  25289. pTDefRegMap(@Self)^.&set := $00000010;
  25290. end;
  25291. function TOCMP1_OC1CON.getOCFLT : TBits_1; inline;
  25292. begin
  25293. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  25294. end;
  25295. procedure TOCMP1_OC1CON.setOC32; inline;
  25296. begin
  25297. pTDefRegMap(@Self)^.&set := $00000020;
  25298. end;
  25299. procedure TOCMP1_OC1CON.clearOC32; inline;
  25300. begin
  25301. pTDefRegMap(@Self)^.clr := $00000020;
  25302. end;
  25303. procedure TOCMP1_OC1CON.setOC32(thebits : TBits_1); inline;
  25304. begin
  25305. if thebits = 0 then
  25306. pTDefRegMap(@Self)^.clr := $00000020
  25307. else
  25308. pTDefRegMap(@Self)^.&set := $00000020;
  25309. end;
  25310. function TOCMP1_OC1CON.getOC32 : TBits_1; inline;
  25311. begin
  25312. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  25313. end;
  25314. procedure TOCMP1_OC1CON.setSIDL; inline;
  25315. begin
  25316. pTDefRegMap(@Self)^.&set := $00002000;
  25317. end;
  25318. procedure TOCMP1_OC1CON.clearSIDL; inline;
  25319. begin
  25320. pTDefRegMap(@Self)^.clr := $00002000;
  25321. end;
  25322. procedure TOCMP1_OC1CON.setSIDL(thebits : TBits_1); inline;
  25323. begin
  25324. if thebits = 0 then
  25325. pTDefRegMap(@Self)^.clr := $00002000
  25326. else
  25327. pTDefRegMap(@Self)^.&set := $00002000;
  25328. end;
  25329. function TOCMP1_OC1CON.getSIDL : TBits_1; inline;
  25330. begin
  25331. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25332. end;
  25333. procedure TOCMP1_OC1CON.setON; inline;
  25334. begin
  25335. pTDefRegMap(@Self)^.&set := $00008000;
  25336. end;
  25337. procedure TOCMP1_OC1CON.clearON; inline;
  25338. begin
  25339. pTDefRegMap(@Self)^.clr := $00008000;
  25340. end;
  25341. procedure TOCMP1_OC1CON.setON(thebits : TBits_1); inline;
  25342. begin
  25343. if thebits = 0 then
  25344. pTDefRegMap(@Self)^.clr := $00008000
  25345. else
  25346. pTDefRegMap(@Self)^.&set := $00008000;
  25347. end;
  25348. function TOCMP1_OC1CON.getON : TBits_1; inline;
  25349. begin
  25350. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25351. end;
  25352. procedure TOCMP1_OC1CON.setOCM0; inline;
  25353. begin
  25354. pTDefRegMap(@Self)^.&set := $00000001;
  25355. end;
  25356. procedure TOCMP1_OC1CON.clearOCM0; inline;
  25357. begin
  25358. pTDefRegMap(@Self)^.clr := $00000001;
  25359. end;
  25360. procedure TOCMP1_OC1CON.setOCM0(thebits : TBits_1); inline;
  25361. begin
  25362. if thebits = 0 then
  25363. pTDefRegMap(@Self)^.clr := $00000001
  25364. else
  25365. pTDefRegMap(@Self)^.&set := $00000001;
  25366. end;
  25367. function TOCMP1_OC1CON.getOCM0 : TBits_1; inline;
  25368. begin
  25369. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25370. end;
  25371. procedure TOCMP1_OC1CON.setOCM1; inline;
  25372. begin
  25373. pTDefRegMap(@Self)^.&set := $00000002;
  25374. end;
  25375. procedure TOCMP1_OC1CON.clearOCM1; inline;
  25376. begin
  25377. pTDefRegMap(@Self)^.clr := $00000002;
  25378. end;
  25379. procedure TOCMP1_OC1CON.setOCM1(thebits : TBits_1); inline;
  25380. begin
  25381. if thebits = 0 then
  25382. pTDefRegMap(@Self)^.clr := $00000002
  25383. else
  25384. pTDefRegMap(@Self)^.&set := $00000002;
  25385. end;
  25386. function TOCMP1_OC1CON.getOCM1 : TBits_1; inline;
  25387. begin
  25388. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25389. end;
  25390. procedure TOCMP1_OC1CON.setOCM2; inline;
  25391. begin
  25392. pTDefRegMap(@Self)^.&set := $00000004;
  25393. end;
  25394. procedure TOCMP1_OC1CON.clearOCM2; inline;
  25395. begin
  25396. pTDefRegMap(@Self)^.clr := $00000004;
  25397. end;
  25398. procedure TOCMP1_OC1CON.setOCM2(thebits : TBits_1); inline;
  25399. begin
  25400. if thebits = 0 then
  25401. pTDefRegMap(@Self)^.clr := $00000004
  25402. else
  25403. pTDefRegMap(@Self)^.&set := $00000004;
  25404. end;
  25405. function TOCMP1_OC1CON.getOCM2 : TBits_1; inline;
  25406. begin
  25407. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25408. end;
  25409. procedure TOCMP1_OC1CON.setOCSIDL; inline;
  25410. begin
  25411. pTDefRegMap(@Self)^.&set := $00002000;
  25412. end;
  25413. procedure TOCMP1_OC1CON.clearOCSIDL; inline;
  25414. begin
  25415. pTDefRegMap(@Self)^.clr := $00002000;
  25416. end;
  25417. procedure TOCMP1_OC1CON.setOCSIDL(thebits : TBits_1); inline;
  25418. begin
  25419. if thebits = 0 then
  25420. pTDefRegMap(@Self)^.clr := $00002000
  25421. else
  25422. pTDefRegMap(@Self)^.&set := $00002000;
  25423. end;
  25424. function TOCMP1_OC1CON.getOCSIDL : TBits_1; inline;
  25425. begin
  25426. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25427. end;
  25428. procedure TOCMP1_OC1CON.setw(thebits : TBits_32); inline;
  25429. begin
  25430. pTDefRegMap(@Self)^.val := thebits;
  25431. end;
  25432. function TOCMP1_OC1CON.getw : TBits_32; inline;
  25433. begin
  25434. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25435. end;
  25436. procedure TOCMP2_OC2CON.setOCM(thebits : TBits_3); inline;
  25437. begin
  25438. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  25439. end;
  25440. function TOCMP2_OC2CON.getOCM : TBits_3; inline;
  25441. begin
  25442. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  25443. end;
  25444. procedure TOCMP2_OC2CON.setOCTSEL; inline;
  25445. begin
  25446. pTDefRegMap(@Self)^.&set := $00000008;
  25447. end;
  25448. procedure TOCMP2_OC2CON.clearOCTSEL; inline;
  25449. begin
  25450. pTDefRegMap(@Self)^.clr := $00000008;
  25451. end;
  25452. procedure TOCMP2_OC2CON.setOCTSEL(thebits : TBits_1); inline;
  25453. begin
  25454. if thebits = 0 then
  25455. pTDefRegMap(@Self)^.clr := $00000008
  25456. else
  25457. pTDefRegMap(@Self)^.&set := $00000008;
  25458. end;
  25459. function TOCMP2_OC2CON.getOCTSEL : TBits_1; inline;
  25460. begin
  25461. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  25462. end;
  25463. procedure TOCMP2_OC2CON.setOCFLT; inline;
  25464. begin
  25465. pTDefRegMap(@Self)^.&set := $00000010;
  25466. end;
  25467. procedure TOCMP2_OC2CON.clearOCFLT; inline;
  25468. begin
  25469. pTDefRegMap(@Self)^.clr := $00000010;
  25470. end;
  25471. procedure TOCMP2_OC2CON.setOCFLT(thebits : TBits_1); inline;
  25472. begin
  25473. if thebits = 0 then
  25474. pTDefRegMap(@Self)^.clr := $00000010
  25475. else
  25476. pTDefRegMap(@Self)^.&set := $00000010;
  25477. end;
  25478. function TOCMP2_OC2CON.getOCFLT : TBits_1; inline;
  25479. begin
  25480. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  25481. end;
  25482. procedure TOCMP2_OC2CON.setOC32; inline;
  25483. begin
  25484. pTDefRegMap(@Self)^.&set := $00000020;
  25485. end;
  25486. procedure TOCMP2_OC2CON.clearOC32; inline;
  25487. begin
  25488. pTDefRegMap(@Self)^.clr := $00000020;
  25489. end;
  25490. procedure TOCMP2_OC2CON.setOC32(thebits : TBits_1); inline;
  25491. begin
  25492. if thebits = 0 then
  25493. pTDefRegMap(@Self)^.clr := $00000020
  25494. else
  25495. pTDefRegMap(@Self)^.&set := $00000020;
  25496. end;
  25497. function TOCMP2_OC2CON.getOC32 : TBits_1; inline;
  25498. begin
  25499. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  25500. end;
  25501. procedure TOCMP2_OC2CON.setSIDL; inline;
  25502. begin
  25503. pTDefRegMap(@Self)^.&set := $00002000;
  25504. end;
  25505. procedure TOCMP2_OC2CON.clearSIDL; inline;
  25506. begin
  25507. pTDefRegMap(@Self)^.clr := $00002000;
  25508. end;
  25509. procedure TOCMP2_OC2CON.setSIDL(thebits : TBits_1); inline;
  25510. begin
  25511. if thebits = 0 then
  25512. pTDefRegMap(@Self)^.clr := $00002000
  25513. else
  25514. pTDefRegMap(@Self)^.&set := $00002000;
  25515. end;
  25516. function TOCMP2_OC2CON.getSIDL : TBits_1; inline;
  25517. begin
  25518. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25519. end;
  25520. procedure TOCMP2_OC2CON.setON; inline;
  25521. begin
  25522. pTDefRegMap(@Self)^.&set := $00008000;
  25523. end;
  25524. procedure TOCMP2_OC2CON.clearON; inline;
  25525. begin
  25526. pTDefRegMap(@Self)^.clr := $00008000;
  25527. end;
  25528. procedure TOCMP2_OC2CON.setON(thebits : TBits_1); inline;
  25529. begin
  25530. if thebits = 0 then
  25531. pTDefRegMap(@Self)^.clr := $00008000
  25532. else
  25533. pTDefRegMap(@Self)^.&set := $00008000;
  25534. end;
  25535. function TOCMP2_OC2CON.getON : TBits_1; inline;
  25536. begin
  25537. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25538. end;
  25539. procedure TOCMP2_OC2CON.setOCM0; inline;
  25540. begin
  25541. pTDefRegMap(@Self)^.&set := $00000001;
  25542. end;
  25543. procedure TOCMP2_OC2CON.clearOCM0; inline;
  25544. begin
  25545. pTDefRegMap(@Self)^.clr := $00000001;
  25546. end;
  25547. procedure TOCMP2_OC2CON.setOCM0(thebits : TBits_1); inline;
  25548. begin
  25549. if thebits = 0 then
  25550. pTDefRegMap(@Self)^.clr := $00000001
  25551. else
  25552. pTDefRegMap(@Self)^.&set := $00000001;
  25553. end;
  25554. function TOCMP2_OC2CON.getOCM0 : TBits_1; inline;
  25555. begin
  25556. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25557. end;
  25558. procedure TOCMP2_OC2CON.setOCM1; inline;
  25559. begin
  25560. pTDefRegMap(@Self)^.&set := $00000002;
  25561. end;
  25562. procedure TOCMP2_OC2CON.clearOCM1; inline;
  25563. begin
  25564. pTDefRegMap(@Self)^.clr := $00000002;
  25565. end;
  25566. procedure TOCMP2_OC2CON.setOCM1(thebits : TBits_1); inline;
  25567. begin
  25568. if thebits = 0 then
  25569. pTDefRegMap(@Self)^.clr := $00000002
  25570. else
  25571. pTDefRegMap(@Self)^.&set := $00000002;
  25572. end;
  25573. function TOCMP2_OC2CON.getOCM1 : TBits_1; inline;
  25574. begin
  25575. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25576. end;
  25577. procedure TOCMP2_OC2CON.setOCM2; inline;
  25578. begin
  25579. pTDefRegMap(@Self)^.&set := $00000004;
  25580. end;
  25581. procedure TOCMP2_OC2CON.clearOCM2; inline;
  25582. begin
  25583. pTDefRegMap(@Self)^.clr := $00000004;
  25584. end;
  25585. procedure TOCMP2_OC2CON.setOCM2(thebits : TBits_1); inline;
  25586. begin
  25587. if thebits = 0 then
  25588. pTDefRegMap(@Self)^.clr := $00000004
  25589. else
  25590. pTDefRegMap(@Self)^.&set := $00000004;
  25591. end;
  25592. function TOCMP2_OC2CON.getOCM2 : TBits_1; inline;
  25593. begin
  25594. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25595. end;
  25596. procedure TOCMP2_OC2CON.setOCSIDL; inline;
  25597. begin
  25598. pTDefRegMap(@Self)^.&set := $00002000;
  25599. end;
  25600. procedure TOCMP2_OC2CON.clearOCSIDL; inline;
  25601. begin
  25602. pTDefRegMap(@Self)^.clr := $00002000;
  25603. end;
  25604. procedure TOCMP2_OC2CON.setOCSIDL(thebits : TBits_1); inline;
  25605. begin
  25606. if thebits = 0 then
  25607. pTDefRegMap(@Self)^.clr := $00002000
  25608. else
  25609. pTDefRegMap(@Self)^.&set := $00002000;
  25610. end;
  25611. function TOCMP2_OC2CON.getOCSIDL : TBits_1; inline;
  25612. begin
  25613. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25614. end;
  25615. procedure TOCMP2_OC2CON.setw(thebits : TBits_32); inline;
  25616. begin
  25617. pTDefRegMap(@Self)^.val := thebits;
  25618. end;
  25619. function TOCMP2_OC2CON.getw : TBits_32; inline;
  25620. begin
  25621. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25622. end;
  25623. procedure TOCMP3_OC3CON.setOCM(thebits : TBits_3); inline;
  25624. begin
  25625. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  25626. end;
  25627. function TOCMP3_OC3CON.getOCM : TBits_3; inline;
  25628. begin
  25629. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  25630. end;
  25631. procedure TOCMP3_OC3CON.setOCTSEL; inline;
  25632. begin
  25633. pTDefRegMap(@Self)^.&set := $00000008;
  25634. end;
  25635. procedure TOCMP3_OC3CON.clearOCTSEL; inline;
  25636. begin
  25637. pTDefRegMap(@Self)^.clr := $00000008;
  25638. end;
  25639. procedure TOCMP3_OC3CON.setOCTSEL(thebits : TBits_1); inline;
  25640. begin
  25641. if thebits = 0 then
  25642. pTDefRegMap(@Self)^.clr := $00000008
  25643. else
  25644. pTDefRegMap(@Self)^.&set := $00000008;
  25645. end;
  25646. function TOCMP3_OC3CON.getOCTSEL : TBits_1; inline;
  25647. begin
  25648. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  25649. end;
  25650. procedure TOCMP3_OC3CON.setOCFLT; inline;
  25651. begin
  25652. pTDefRegMap(@Self)^.&set := $00000010;
  25653. end;
  25654. procedure TOCMP3_OC3CON.clearOCFLT; inline;
  25655. begin
  25656. pTDefRegMap(@Self)^.clr := $00000010;
  25657. end;
  25658. procedure TOCMP3_OC3CON.setOCFLT(thebits : TBits_1); inline;
  25659. begin
  25660. if thebits = 0 then
  25661. pTDefRegMap(@Self)^.clr := $00000010
  25662. else
  25663. pTDefRegMap(@Self)^.&set := $00000010;
  25664. end;
  25665. function TOCMP3_OC3CON.getOCFLT : TBits_1; inline;
  25666. begin
  25667. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  25668. end;
  25669. procedure TOCMP3_OC3CON.setOC32; inline;
  25670. begin
  25671. pTDefRegMap(@Self)^.&set := $00000020;
  25672. end;
  25673. procedure TOCMP3_OC3CON.clearOC32; inline;
  25674. begin
  25675. pTDefRegMap(@Self)^.clr := $00000020;
  25676. end;
  25677. procedure TOCMP3_OC3CON.setOC32(thebits : TBits_1); inline;
  25678. begin
  25679. if thebits = 0 then
  25680. pTDefRegMap(@Self)^.clr := $00000020
  25681. else
  25682. pTDefRegMap(@Self)^.&set := $00000020;
  25683. end;
  25684. function TOCMP3_OC3CON.getOC32 : TBits_1; inline;
  25685. begin
  25686. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  25687. end;
  25688. procedure TOCMP3_OC3CON.setSIDL; inline;
  25689. begin
  25690. pTDefRegMap(@Self)^.&set := $00002000;
  25691. end;
  25692. procedure TOCMP3_OC3CON.clearSIDL; inline;
  25693. begin
  25694. pTDefRegMap(@Self)^.clr := $00002000;
  25695. end;
  25696. procedure TOCMP3_OC3CON.setSIDL(thebits : TBits_1); inline;
  25697. begin
  25698. if thebits = 0 then
  25699. pTDefRegMap(@Self)^.clr := $00002000
  25700. else
  25701. pTDefRegMap(@Self)^.&set := $00002000;
  25702. end;
  25703. function TOCMP3_OC3CON.getSIDL : TBits_1; inline;
  25704. begin
  25705. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25706. end;
  25707. procedure TOCMP3_OC3CON.setON; inline;
  25708. begin
  25709. pTDefRegMap(@Self)^.&set := $00008000;
  25710. end;
  25711. procedure TOCMP3_OC3CON.clearON; inline;
  25712. begin
  25713. pTDefRegMap(@Self)^.clr := $00008000;
  25714. end;
  25715. procedure TOCMP3_OC3CON.setON(thebits : TBits_1); inline;
  25716. begin
  25717. if thebits = 0 then
  25718. pTDefRegMap(@Self)^.clr := $00008000
  25719. else
  25720. pTDefRegMap(@Self)^.&set := $00008000;
  25721. end;
  25722. function TOCMP3_OC3CON.getON : TBits_1; inline;
  25723. begin
  25724. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25725. end;
  25726. procedure TOCMP3_OC3CON.setOCM0; inline;
  25727. begin
  25728. pTDefRegMap(@Self)^.&set := $00000001;
  25729. end;
  25730. procedure TOCMP3_OC3CON.clearOCM0; inline;
  25731. begin
  25732. pTDefRegMap(@Self)^.clr := $00000001;
  25733. end;
  25734. procedure TOCMP3_OC3CON.setOCM0(thebits : TBits_1); inline;
  25735. begin
  25736. if thebits = 0 then
  25737. pTDefRegMap(@Self)^.clr := $00000001
  25738. else
  25739. pTDefRegMap(@Self)^.&set := $00000001;
  25740. end;
  25741. function TOCMP3_OC3CON.getOCM0 : TBits_1; inline;
  25742. begin
  25743. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25744. end;
  25745. procedure TOCMP3_OC3CON.setOCM1; inline;
  25746. begin
  25747. pTDefRegMap(@Self)^.&set := $00000002;
  25748. end;
  25749. procedure TOCMP3_OC3CON.clearOCM1; inline;
  25750. begin
  25751. pTDefRegMap(@Self)^.clr := $00000002;
  25752. end;
  25753. procedure TOCMP3_OC3CON.setOCM1(thebits : TBits_1); inline;
  25754. begin
  25755. if thebits = 0 then
  25756. pTDefRegMap(@Self)^.clr := $00000002
  25757. else
  25758. pTDefRegMap(@Self)^.&set := $00000002;
  25759. end;
  25760. function TOCMP3_OC3CON.getOCM1 : TBits_1; inline;
  25761. begin
  25762. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25763. end;
  25764. procedure TOCMP3_OC3CON.setOCM2; inline;
  25765. begin
  25766. pTDefRegMap(@Self)^.&set := $00000004;
  25767. end;
  25768. procedure TOCMP3_OC3CON.clearOCM2; inline;
  25769. begin
  25770. pTDefRegMap(@Self)^.clr := $00000004;
  25771. end;
  25772. procedure TOCMP3_OC3CON.setOCM2(thebits : TBits_1); inline;
  25773. begin
  25774. if thebits = 0 then
  25775. pTDefRegMap(@Self)^.clr := $00000004
  25776. else
  25777. pTDefRegMap(@Self)^.&set := $00000004;
  25778. end;
  25779. function TOCMP3_OC3CON.getOCM2 : TBits_1; inline;
  25780. begin
  25781. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25782. end;
  25783. procedure TOCMP3_OC3CON.setOCSIDL; inline;
  25784. begin
  25785. pTDefRegMap(@Self)^.&set := $00002000;
  25786. end;
  25787. procedure TOCMP3_OC3CON.clearOCSIDL; inline;
  25788. begin
  25789. pTDefRegMap(@Self)^.clr := $00002000;
  25790. end;
  25791. procedure TOCMP3_OC3CON.setOCSIDL(thebits : TBits_1); inline;
  25792. begin
  25793. if thebits = 0 then
  25794. pTDefRegMap(@Self)^.clr := $00002000
  25795. else
  25796. pTDefRegMap(@Self)^.&set := $00002000;
  25797. end;
  25798. function TOCMP3_OC3CON.getOCSIDL : TBits_1; inline;
  25799. begin
  25800. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25801. end;
  25802. procedure TOCMP3_OC3CON.setw(thebits : TBits_32); inline;
  25803. begin
  25804. pTDefRegMap(@Self)^.val := thebits;
  25805. end;
  25806. function TOCMP3_OC3CON.getw : TBits_32; inline;
  25807. begin
  25808. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25809. end;
  25810. procedure TOCMP4_OC4CON.setOCM(thebits : TBits_3); inline;
  25811. begin
  25812. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  25813. end;
  25814. function TOCMP4_OC4CON.getOCM : TBits_3; inline;
  25815. begin
  25816. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  25817. end;
  25818. procedure TOCMP4_OC4CON.setOCTSEL; inline;
  25819. begin
  25820. pTDefRegMap(@Self)^.&set := $00000008;
  25821. end;
  25822. procedure TOCMP4_OC4CON.clearOCTSEL; inline;
  25823. begin
  25824. pTDefRegMap(@Self)^.clr := $00000008;
  25825. end;
  25826. procedure TOCMP4_OC4CON.setOCTSEL(thebits : TBits_1); inline;
  25827. begin
  25828. if thebits = 0 then
  25829. pTDefRegMap(@Self)^.clr := $00000008
  25830. else
  25831. pTDefRegMap(@Self)^.&set := $00000008;
  25832. end;
  25833. function TOCMP4_OC4CON.getOCTSEL : TBits_1; inline;
  25834. begin
  25835. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  25836. end;
  25837. procedure TOCMP4_OC4CON.setOCFLT; inline;
  25838. begin
  25839. pTDefRegMap(@Self)^.&set := $00000010;
  25840. end;
  25841. procedure TOCMP4_OC4CON.clearOCFLT; inline;
  25842. begin
  25843. pTDefRegMap(@Self)^.clr := $00000010;
  25844. end;
  25845. procedure TOCMP4_OC4CON.setOCFLT(thebits : TBits_1); inline;
  25846. begin
  25847. if thebits = 0 then
  25848. pTDefRegMap(@Self)^.clr := $00000010
  25849. else
  25850. pTDefRegMap(@Self)^.&set := $00000010;
  25851. end;
  25852. function TOCMP4_OC4CON.getOCFLT : TBits_1; inline;
  25853. begin
  25854. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  25855. end;
  25856. procedure TOCMP4_OC4CON.setOC32; inline;
  25857. begin
  25858. pTDefRegMap(@Self)^.&set := $00000020;
  25859. end;
  25860. procedure TOCMP4_OC4CON.clearOC32; inline;
  25861. begin
  25862. pTDefRegMap(@Self)^.clr := $00000020;
  25863. end;
  25864. procedure TOCMP4_OC4CON.setOC32(thebits : TBits_1); inline;
  25865. begin
  25866. if thebits = 0 then
  25867. pTDefRegMap(@Self)^.clr := $00000020
  25868. else
  25869. pTDefRegMap(@Self)^.&set := $00000020;
  25870. end;
  25871. function TOCMP4_OC4CON.getOC32 : TBits_1; inline;
  25872. begin
  25873. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  25874. end;
  25875. procedure TOCMP4_OC4CON.setSIDL; inline;
  25876. begin
  25877. pTDefRegMap(@Self)^.&set := $00002000;
  25878. end;
  25879. procedure TOCMP4_OC4CON.clearSIDL; inline;
  25880. begin
  25881. pTDefRegMap(@Self)^.clr := $00002000;
  25882. end;
  25883. procedure TOCMP4_OC4CON.setSIDL(thebits : TBits_1); inline;
  25884. begin
  25885. if thebits = 0 then
  25886. pTDefRegMap(@Self)^.clr := $00002000
  25887. else
  25888. pTDefRegMap(@Self)^.&set := $00002000;
  25889. end;
  25890. function TOCMP4_OC4CON.getSIDL : TBits_1; inline;
  25891. begin
  25892. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25893. end;
  25894. procedure TOCMP4_OC4CON.setON; inline;
  25895. begin
  25896. pTDefRegMap(@Self)^.&set := $00008000;
  25897. end;
  25898. procedure TOCMP4_OC4CON.clearON; inline;
  25899. begin
  25900. pTDefRegMap(@Self)^.clr := $00008000;
  25901. end;
  25902. procedure TOCMP4_OC4CON.setON(thebits : TBits_1); inline;
  25903. begin
  25904. if thebits = 0 then
  25905. pTDefRegMap(@Self)^.clr := $00008000
  25906. else
  25907. pTDefRegMap(@Self)^.&set := $00008000;
  25908. end;
  25909. function TOCMP4_OC4CON.getON : TBits_1; inline;
  25910. begin
  25911. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25912. end;
  25913. procedure TOCMP4_OC4CON.setOCM0; inline;
  25914. begin
  25915. pTDefRegMap(@Self)^.&set := $00000001;
  25916. end;
  25917. procedure TOCMP4_OC4CON.clearOCM0; inline;
  25918. begin
  25919. pTDefRegMap(@Self)^.clr := $00000001;
  25920. end;
  25921. procedure TOCMP4_OC4CON.setOCM0(thebits : TBits_1); inline;
  25922. begin
  25923. if thebits = 0 then
  25924. pTDefRegMap(@Self)^.clr := $00000001
  25925. else
  25926. pTDefRegMap(@Self)^.&set := $00000001;
  25927. end;
  25928. function TOCMP4_OC4CON.getOCM0 : TBits_1; inline;
  25929. begin
  25930. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25931. end;
  25932. procedure TOCMP4_OC4CON.setOCM1; inline;
  25933. begin
  25934. pTDefRegMap(@Self)^.&set := $00000002;
  25935. end;
  25936. procedure TOCMP4_OC4CON.clearOCM1; inline;
  25937. begin
  25938. pTDefRegMap(@Self)^.clr := $00000002;
  25939. end;
  25940. procedure TOCMP4_OC4CON.setOCM1(thebits : TBits_1); inline;
  25941. begin
  25942. if thebits = 0 then
  25943. pTDefRegMap(@Self)^.clr := $00000002
  25944. else
  25945. pTDefRegMap(@Self)^.&set := $00000002;
  25946. end;
  25947. function TOCMP4_OC4CON.getOCM1 : TBits_1; inline;
  25948. begin
  25949. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25950. end;
  25951. procedure TOCMP4_OC4CON.setOCM2; inline;
  25952. begin
  25953. pTDefRegMap(@Self)^.&set := $00000004;
  25954. end;
  25955. procedure TOCMP4_OC4CON.clearOCM2; inline;
  25956. begin
  25957. pTDefRegMap(@Self)^.clr := $00000004;
  25958. end;
  25959. procedure TOCMP4_OC4CON.setOCM2(thebits : TBits_1); inline;
  25960. begin
  25961. if thebits = 0 then
  25962. pTDefRegMap(@Self)^.clr := $00000004
  25963. else
  25964. pTDefRegMap(@Self)^.&set := $00000004;
  25965. end;
  25966. function TOCMP4_OC4CON.getOCM2 : TBits_1; inline;
  25967. begin
  25968. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25969. end;
  25970. procedure TOCMP4_OC4CON.setOCSIDL; inline;
  25971. begin
  25972. pTDefRegMap(@Self)^.&set := $00002000;
  25973. end;
  25974. procedure TOCMP4_OC4CON.clearOCSIDL; inline;
  25975. begin
  25976. pTDefRegMap(@Self)^.clr := $00002000;
  25977. end;
  25978. procedure TOCMP4_OC4CON.setOCSIDL(thebits : TBits_1); inline;
  25979. begin
  25980. if thebits = 0 then
  25981. pTDefRegMap(@Self)^.clr := $00002000
  25982. else
  25983. pTDefRegMap(@Self)^.&set := $00002000;
  25984. end;
  25985. function TOCMP4_OC4CON.getOCSIDL : TBits_1; inline;
  25986. begin
  25987. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25988. end;
  25989. procedure TOCMP4_OC4CON.setw(thebits : TBits_32); inline;
  25990. begin
  25991. pTDefRegMap(@Self)^.val := thebits;
  25992. end;
  25993. function TOCMP4_OC4CON.getw : TBits_32; inline;
  25994. begin
  25995. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25996. end;
  25997. procedure TOCMP5_OC5CON.setOCM(thebits : TBits_3); inline;
  25998. begin
  25999. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  26000. end;
  26001. function TOCMP5_OC5CON.getOCM : TBits_3; inline;
  26002. begin
  26003. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  26004. end;
  26005. procedure TOCMP5_OC5CON.setOCTSEL; inline;
  26006. begin
  26007. pTDefRegMap(@Self)^.&set := $00000008;
  26008. end;
  26009. procedure TOCMP5_OC5CON.clearOCTSEL; inline;
  26010. begin
  26011. pTDefRegMap(@Self)^.clr := $00000008;
  26012. end;
  26013. procedure TOCMP5_OC5CON.setOCTSEL(thebits : TBits_1); inline;
  26014. begin
  26015. if thebits = 0 then
  26016. pTDefRegMap(@Self)^.clr := $00000008
  26017. else
  26018. pTDefRegMap(@Self)^.&set := $00000008;
  26019. end;
  26020. function TOCMP5_OC5CON.getOCTSEL : TBits_1; inline;
  26021. begin
  26022. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  26023. end;
  26024. procedure TOCMP5_OC5CON.setOCFLT; inline;
  26025. begin
  26026. pTDefRegMap(@Self)^.&set := $00000010;
  26027. end;
  26028. procedure TOCMP5_OC5CON.clearOCFLT; inline;
  26029. begin
  26030. pTDefRegMap(@Self)^.clr := $00000010;
  26031. end;
  26032. procedure TOCMP5_OC5CON.setOCFLT(thebits : TBits_1); inline;
  26033. begin
  26034. if thebits = 0 then
  26035. pTDefRegMap(@Self)^.clr := $00000010
  26036. else
  26037. pTDefRegMap(@Self)^.&set := $00000010;
  26038. end;
  26039. function TOCMP5_OC5CON.getOCFLT : TBits_1; inline;
  26040. begin
  26041. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  26042. end;
  26043. procedure TOCMP5_OC5CON.setOC32; inline;
  26044. begin
  26045. pTDefRegMap(@Self)^.&set := $00000020;
  26046. end;
  26047. procedure TOCMP5_OC5CON.clearOC32; inline;
  26048. begin
  26049. pTDefRegMap(@Self)^.clr := $00000020;
  26050. end;
  26051. procedure TOCMP5_OC5CON.setOC32(thebits : TBits_1); inline;
  26052. begin
  26053. if thebits = 0 then
  26054. pTDefRegMap(@Self)^.clr := $00000020
  26055. else
  26056. pTDefRegMap(@Self)^.&set := $00000020;
  26057. end;
  26058. function TOCMP5_OC5CON.getOC32 : TBits_1; inline;
  26059. begin
  26060. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  26061. end;
  26062. procedure TOCMP5_OC5CON.setSIDL; inline;
  26063. begin
  26064. pTDefRegMap(@Self)^.&set := $00002000;
  26065. end;
  26066. procedure TOCMP5_OC5CON.clearSIDL; inline;
  26067. begin
  26068. pTDefRegMap(@Self)^.clr := $00002000;
  26069. end;
  26070. procedure TOCMP5_OC5CON.setSIDL(thebits : TBits_1); inline;
  26071. begin
  26072. if thebits = 0 then
  26073. pTDefRegMap(@Self)^.clr := $00002000
  26074. else
  26075. pTDefRegMap(@Self)^.&set := $00002000;
  26076. end;
  26077. function TOCMP5_OC5CON.getSIDL : TBits_1; inline;
  26078. begin
  26079. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26080. end;
  26081. procedure TOCMP5_OC5CON.setON; inline;
  26082. begin
  26083. pTDefRegMap(@Self)^.&set := $00008000;
  26084. end;
  26085. procedure TOCMP5_OC5CON.clearON; inline;
  26086. begin
  26087. pTDefRegMap(@Self)^.clr := $00008000;
  26088. end;
  26089. procedure TOCMP5_OC5CON.setON(thebits : TBits_1); inline;
  26090. begin
  26091. if thebits = 0 then
  26092. pTDefRegMap(@Self)^.clr := $00008000
  26093. else
  26094. pTDefRegMap(@Self)^.&set := $00008000;
  26095. end;
  26096. function TOCMP5_OC5CON.getON : TBits_1; inline;
  26097. begin
  26098. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26099. end;
  26100. procedure TOCMP5_OC5CON.setOCM0; inline;
  26101. begin
  26102. pTDefRegMap(@Self)^.&set := $00000001;
  26103. end;
  26104. procedure TOCMP5_OC5CON.clearOCM0; inline;
  26105. begin
  26106. pTDefRegMap(@Self)^.clr := $00000001;
  26107. end;
  26108. procedure TOCMP5_OC5CON.setOCM0(thebits : TBits_1); inline;
  26109. begin
  26110. if thebits = 0 then
  26111. pTDefRegMap(@Self)^.clr := $00000001
  26112. else
  26113. pTDefRegMap(@Self)^.&set := $00000001;
  26114. end;
  26115. function TOCMP5_OC5CON.getOCM0 : TBits_1; inline;
  26116. begin
  26117. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  26118. end;
  26119. procedure TOCMP5_OC5CON.setOCM1; inline;
  26120. begin
  26121. pTDefRegMap(@Self)^.&set := $00000002;
  26122. end;
  26123. procedure TOCMP5_OC5CON.clearOCM1; inline;
  26124. begin
  26125. pTDefRegMap(@Self)^.clr := $00000002;
  26126. end;
  26127. procedure TOCMP5_OC5CON.setOCM1(thebits : TBits_1); inline;
  26128. begin
  26129. if thebits = 0 then
  26130. pTDefRegMap(@Self)^.clr := $00000002
  26131. else
  26132. pTDefRegMap(@Self)^.&set := $00000002;
  26133. end;
  26134. function TOCMP5_OC5CON.getOCM1 : TBits_1; inline;
  26135. begin
  26136. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  26137. end;
  26138. procedure TOCMP5_OC5CON.setOCM2; inline;
  26139. begin
  26140. pTDefRegMap(@Self)^.&set := $00000004;
  26141. end;
  26142. procedure TOCMP5_OC5CON.clearOCM2; inline;
  26143. begin
  26144. pTDefRegMap(@Self)^.clr := $00000004;
  26145. end;
  26146. procedure TOCMP5_OC5CON.setOCM2(thebits : TBits_1); inline;
  26147. begin
  26148. if thebits = 0 then
  26149. pTDefRegMap(@Self)^.clr := $00000004
  26150. else
  26151. pTDefRegMap(@Self)^.&set := $00000004;
  26152. end;
  26153. function TOCMP5_OC5CON.getOCM2 : TBits_1; inline;
  26154. begin
  26155. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  26156. end;
  26157. procedure TOCMP5_OC5CON.setOCSIDL; inline;
  26158. begin
  26159. pTDefRegMap(@Self)^.&set := $00002000;
  26160. end;
  26161. procedure TOCMP5_OC5CON.clearOCSIDL; inline;
  26162. begin
  26163. pTDefRegMap(@Self)^.clr := $00002000;
  26164. end;
  26165. procedure TOCMP5_OC5CON.setOCSIDL(thebits : TBits_1); inline;
  26166. begin
  26167. if thebits = 0 then
  26168. pTDefRegMap(@Self)^.clr := $00002000
  26169. else
  26170. pTDefRegMap(@Self)^.&set := $00002000;
  26171. end;
  26172. function TOCMP5_OC5CON.getOCSIDL : TBits_1; inline;
  26173. begin
  26174. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26175. end;
  26176. procedure TOCMP5_OC5CON.setw(thebits : TBits_32); inline;
  26177. begin
  26178. pTDefRegMap(@Self)^.val := thebits;
  26179. end;
  26180. function TOCMP5_OC5CON.getw : TBits_32; inline;
  26181. begin
  26182. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  26183. end;
  26184. procedure TI2C1A_I2C1ACON.setSEN; inline;
  26185. begin
  26186. pTDefRegMap(@Self)^.&set := $00000001;
  26187. end;
  26188. procedure TI2C1A_I2C1ACON.clearSEN; inline;
  26189. begin
  26190. pTDefRegMap(@Self)^.clr := $00000001;
  26191. end;
  26192. procedure TI2C1A_I2C1ACON.setSEN(thebits : TBits_1); inline;
  26193. begin
  26194. if thebits = 0 then
  26195. pTDefRegMap(@Self)^.clr := $00000001
  26196. else
  26197. pTDefRegMap(@Self)^.&set := $00000001;
  26198. end;
  26199. function TI2C1A_I2C1ACON.getSEN : TBits_1; inline;
  26200. begin
  26201. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  26202. end;
  26203. procedure TI2C1A_I2C1ACON.setRSEN; inline;
  26204. begin
  26205. pTDefRegMap(@Self)^.&set := $00000002;
  26206. end;
  26207. procedure TI2C1A_I2C1ACON.clearRSEN; inline;
  26208. begin
  26209. pTDefRegMap(@Self)^.clr := $00000002;
  26210. end;
  26211. procedure TI2C1A_I2C1ACON.setRSEN(thebits : TBits_1); inline;
  26212. begin
  26213. if thebits = 0 then
  26214. pTDefRegMap(@Self)^.clr := $00000002
  26215. else
  26216. pTDefRegMap(@Self)^.&set := $00000002;
  26217. end;
  26218. function TI2C1A_I2C1ACON.getRSEN : TBits_1; inline;
  26219. begin
  26220. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  26221. end;
  26222. procedure TI2C1A_I2C1ACON.setPEN; inline;
  26223. begin
  26224. pTDefRegMap(@Self)^.&set := $00000004;
  26225. end;
  26226. procedure TI2C1A_I2C1ACON.clearPEN; inline;
  26227. begin
  26228. pTDefRegMap(@Self)^.clr := $00000004;
  26229. end;
  26230. procedure TI2C1A_I2C1ACON.setPEN(thebits : TBits_1); inline;
  26231. begin
  26232. if thebits = 0 then
  26233. pTDefRegMap(@Self)^.clr := $00000004
  26234. else
  26235. pTDefRegMap(@Self)^.&set := $00000004;
  26236. end;
  26237. function TI2C1A_I2C1ACON.getPEN : TBits_1; inline;
  26238. begin
  26239. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  26240. end;
  26241. procedure TI2C1A_I2C1ACON.setRCEN; inline;
  26242. begin
  26243. pTDefRegMap(@Self)^.&set := $00000008;
  26244. end;
  26245. procedure TI2C1A_I2C1ACON.clearRCEN; inline;
  26246. begin
  26247. pTDefRegMap(@Self)^.clr := $00000008;
  26248. end;
  26249. procedure TI2C1A_I2C1ACON.setRCEN(thebits : TBits_1); inline;
  26250. begin
  26251. if thebits = 0 then
  26252. pTDefRegMap(@Self)^.clr := $00000008
  26253. else
  26254. pTDefRegMap(@Self)^.&set := $00000008;
  26255. end;
  26256. function TI2C1A_I2C1ACON.getRCEN : TBits_1; inline;
  26257. begin
  26258. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  26259. end;
  26260. procedure TI2C1A_I2C1ACON.setACKEN; inline;
  26261. begin
  26262. pTDefRegMap(@Self)^.&set := $00000010;
  26263. end;
  26264. procedure TI2C1A_I2C1ACON.clearACKEN; inline;
  26265. begin
  26266. pTDefRegMap(@Self)^.clr := $00000010;
  26267. end;
  26268. procedure TI2C1A_I2C1ACON.setACKEN(thebits : TBits_1); inline;
  26269. begin
  26270. if thebits = 0 then
  26271. pTDefRegMap(@Self)^.clr := $00000010
  26272. else
  26273. pTDefRegMap(@Self)^.&set := $00000010;
  26274. end;
  26275. function TI2C1A_I2C1ACON.getACKEN : TBits_1; inline;
  26276. begin
  26277. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  26278. end;
  26279. procedure TI2C1A_I2C1ACON.setACKDT; inline;
  26280. begin
  26281. pTDefRegMap(@Self)^.&set := $00000020;
  26282. end;
  26283. procedure TI2C1A_I2C1ACON.clearACKDT; inline;
  26284. begin
  26285. pTDefRegMap(@Self)^.clr := $00000020;
  26286. end;
  26287. procedure TI2C1A_I2C1ACON.setACKDT(thebits : TBits_1); inline;
  26288. begin
  26289. if thebits = 0 then
  26290. pTDefRegMap(@Self)^.clr := $00000020
  26291. else
  26292. pTDefRegMap(@Self)^.&set := $00000020;
  26293. end;
  26294. function TI2C1A_I2C1ACON.getACKDT : TBits_1; inline;
  26295. begin
  26296. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  26297. end;
  26298. procedure TI2C1A_I2C1ACON.setSTREN; inline;
  26299. begin
  26300. pTDefRegMap(@Self)^.&set := $00000040;
  26301. end;
  26302. procedure TI2C1A_I2C1ACON.clearSTREN; inline;
  26303. begin
  26304. pTDefRegMap(@Self)^.clr := $00000040;
  26305. end;
  26306. procedure TI2C1A_I2C1ACON.setSTREN(thebits : TBits_1); inline;
  26307. begin
  26308. if thebits = 0 then
  26309. pTDefRegMap(@Self)^.clr := $00000040
  26310. else
  26311. pTDefRegMap(@Self)^.&set := $00000040;
  26312. end;
  26313. function TI2C1A_I2C1ACON.getSTREN : TBits_1; inline;
  26314. begin
  26315. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  26316. end;
  26317. procedure TI2C1A_I2C1ACON.setGCEN; inline;
  26318. begin
  26319. pTDefRegMap(@Self)^.&set := $00000080;
  26320. end;
  26321. procedure TI2C1A_I2C1ACON.clearGCEN; inline;
  26322. begin
  26323. pTDefRegMap(@Self)^.clr := $00000080;
  26324. end;
  26325. procedure TI2C1A_I2C1ACON.setGCEN(thebits : TBits_1); inline;
  26326. begin
  26327. if thebits = 0 then
  26328. pTDefRegMap(@Self)^.clr := $00000080
  26329. else
  26330. pTDefRegMap(@Self)^.&set := $00000080;
  26331. end;
  26332. function TI2C1A_I2C1ACON.getGCEN : TBits_1; inline;
  26333. begin
  26334. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  26335. end;
  26336. procedure TI2C1A_I2C1ACON.setSMEN; inline;
  26337. begin
  26338. pTDefRegMap(@Self)^.&set := $00000100;
  26339. end;
  26340. procedure TI2C1A_I2C1ACON.clearSMEN; inline;
  26341. begin
  26342. pTDefRegMap(@Self)^.clr := $00000100;
  26343. end;
  26344. procedure TI2C1A_I2C1ACON.setSMEN(thebits : TBits_1); inline;
  26345. begin
  26346. if thebits = 0 then
  26347. pTDefRegMap(@Self)^.clr := $00000100
  26348. else
  26349. pTDefRegMap(@Self)^.&set := $00000100;
  26350. end;
  26351. function TI2C1A_I2C1ACON.getSMEN : TBits_1; inline;
  26352. begin
  26353. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  26354. end;
  26355. procedure TI2C1A_I2C1ACON.setDISSLW; inline;
  26356. begin
  26357. pTDefRegMap(@Self)^.&set := $00000200;
  26358. end;
  26359. procedure TI2C1A_I2C1ACON.clearDISSLW; inline;
  26360. begin
  26361. pTDefRegMap(@Self)^.clr := $00000200;
  26362. end;
  26363. procedure TI2C1A_I2C1ACON.setDISSLW(thebits : TBits_1); inline;
  26364. begin
  26365. if thebits = 0 then
  26366. pTDefRegMap(@Self)^.clr := $00000200
  26367. else
  26368. pTDefRegMap(@Self)^.&set := $00000200;
  26369. end;
  26370. function TI2C1A_I2C1ACON.getDISSLW : TBits_1; inline;
  26371. begin
  26372. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  26373. end;
  26374. procedure TI2C1A_I2C1ACON.setA10M; inline;
  26375. begin
  26376. pTDefRegMap(@Self)^.&set := $00000400;
  26377. end;
  26378. procedure TI2C1A_I2C1ACON.clearA10M; inline;
  26379. begin
  26380. pTDefRegMap(@Self)^.clr := $00000400;
  26381. end;
  26382. procedure TI2C1A_I2C1ACON.setA10M(thebits : TBits_1); inline;
  26383. begin
  26384. if thebits = 0 then
  26385. pTDefRegMap(@Self)^.clr := $00000400
  26386. else
  26387. pTDefRegMap(@Self)^.&set := $00000400;
  26388. end;
  26389. function TI2C1A_I2C1ACON.getA10M : TBits_1; inline;
  26390. begin
  26391. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  26392. end;
  26393. procedure TI2C1A_I2C1ACON.setSTRICT; inline;
  26394. begin
  26395. pTDefRegMap(@Self)^.&set := $00000800;
  26396. end;
  26397. procedure TI2C1A_I2C1ACON.clearSTRICT; inline;
  26398. begin
  26399. pTDefRegMap(@Self)^.clr := $00000800;
  26400. end;
  26401. procedure TI2C1A_I2C1ACON.setSTRICT(thebits : TBits_1); inline;
  26402. begin
  26403. if thebits = 0 then
  26404. pTDefRegMap(@Self)^.clr := $00000800
  26405. else
  26406. pTDefRegMap(@Self)^.&set := $00000800;
  26407. end;
  26408. function TI2C1A_I2C1ACON.getSTRICT : TBits_1; inline;
  26409. begin
  26410. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  26411. end;
  26412. procedure TI2C1A_I2C1ACON.setSCLREL; inline;
  26413. begin
  26414. pTDefRegMap(@Self)^.&set := $00001000;
  26415. end;
  26416. procedure TI2C1A_I2C1ACON.clearSCLREL; inline;
  26417. begin
  26418. pTDefRegMap(@Self)^.clr := $00001000;
  26419. end;
  26420. procedure TI2C1A_I2C1ACON.setSCLREL(thebits : TBits_1); inline;
  26421. begin
  26422. if thebits = 0 then
  26423. pTDefRegMap(@Self)^.clr := $00001000
  26424. else
  26425. pTDefRegMap(@Self)^.&set := $00001000;
  26426. end;
  26427. function TI2C1A_I2C1ACON.getSCLREL : TBits_1; inline;
  26428. begin
  26429. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  26430. end;
  26431. procedure TI2C1A_I2C1ACON.setSIDL; inline;
  26432. begin
  26433. pTDefRegMap(@Self)^.&set := $00002000;
  26434. end;
  26435. procedure TI2C1A_I2C1ACON.clearSIDL; inline;
  26436. begin
  26437. pTDefRegMap(@Self)^.clr := $00002000;
  26438. end;
  26439. procedure TI2C1A_I2C1ACON.setSIDL(thebits : TBits_1); inline;
  26440. begin
  26441. if thebits = 0 then
  26442. pTDefRegMap(@Self)^.clr := $00002000
  26443. else
  26444. pTDefRegMap(@Self)^.&set := $00002000;
  26445. end;
  26446. function TI2C1A_I2C1ACON.getSIDL : TBits_1; inline;
  26447. begin
  26448. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26449. end;
  26450. procedure TI2C1A_I2C1ACON.setON; inline;
  26451. begin
  26452. pTDefRegMap(@Self)^.&set := $00008000;
  26453. end;
  26454. procedure TI2C1A_I2C1ACON.clearON; inline;
  26455. begin
  26456. pTDefRegMap(@Self)^.clr := $00008000;
  26457. end;
  26458. procedure TI2C1A_I2C1ACON.setON(thebits : TBits_1); inline;
  26459. begin
  26460. if thebits = 0 then
  26461. pTDefRegMap(@Self)^.clr := $00008000
  26462. else
  26463. pTDefRegMap(@Self)^.&set := $00008000;
  26464. end;
  26465. function TI2C1A_I2C1ACON.getON : TBits_1; inline;
  26466. begin
  26467. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26468. end;
  26469. procedure TI2C1A_I2C1ACON.setIPMIEN; inline;
  26470. begin
  26471. pTDefRegMap(@Self)^.&set := $00000800;
  26472. end;
  26473. procedure TI2C1A_I2C1ACON.clearIPMIEN; inline;
  26474. begin
  26475. pTDefRegMap(@Self)^.clr := $00000800;
  26476. end;
  26477. procedure TI2C1A_I2C1ACON.setIPMIEN(thebits : TBits_1); inline;
  26478. begin
  26479. if thebits = 0 then
  26480. pTDefRegMap(@Self)^.clr := $00000800
  26481. else
  26482. pTDefRegMap(@Self)^.&set := $00000800;
  26483. end;
  26484. function TI2C1A_I2C1ACON.getIPMIEN : TBits_1; inline;
  26485. begin
  26486. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  26487. end;
  26488. procedure TI2C1A_I2C1ACON.setI2CSIDL; inline;
  26489. begin
  26490. pTDefRegMap(@Self)^.&set := $00002000;
  26491. end;
  26492. procedure TI2C1A_I2C1ACON.clearI2CSIDL; inline;
  26493. begin
  26494. pTDefRegMap(@Self)^.clr := $00002000;
  26495. end;
  26496. procedure TI2C1A_I2C1ACON.setI2CSIDL(thebits : TBits_1); inline;
  26497. begin
  26498. if thebits = 0 then
  26499. pTDefRegMap(@Self)^.clr := $00002000
  26500. else
  26501. pTDefRegMap(@Self)^.&set := $00002000;
  26502. end;
  26503. function TI2C1A_I2C1ACON.getI2CSIDL : TBits_1; inline;
  26504. begin
  26505. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26506. end;
  26507. procedure TI2C1A_I2C1ACON.setI2CEN; inline;
  26508. begin
  26509. pTDefRegMap(@Self)^.&set := $00008000;
  26510. end;
  26511. procedure TI2C1A_I2C1ACON.clearI2CEN; inline;
  26512. begin
  26513. pTDefRegMap(@Self)^.clr := $00008000;
  26514. end;
  26515. procedure TI2C1A_I2C1ACON.setI2CEN(thebits : TBits_1); inline;
  26516. begin
  26517. if thebits = 0 then
  26518. pTDefRegMap(@Self)^.clr := $00008000
  26519. else
  26520. pTDefRegMap(@Self)^.&set := $00008000;
  26521. end;
  26522. function TI2C1A_I2C1ACON.getI2CEN : TBits_1; inline;
  26523. begin
  26524. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26525. end;
  26526. procedure TI2C1A_I2C1ACON.setw(thebits : TBits_32); inline;
  26527. begin
  26528. pTDefRegMap(@Self)^.val := thebits;
  26529. end;
  26530. function TI2C1A_I2C1ACON.getw : TBits_32; inline;
  26531. begin
  26532. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  26533. end;
  26534. procedure TI2C1A_I2C3CON.setSEN; inline;
  26535. begin
  26536. pTDefRegMap(@Self)^.&set := $00000001;
  26537. end;
  26538. procedure TI2C1A_I2C3CON.clearSEN; inline;
  26539. begin
  26540. pTDefRegMap(@Self)^.clr := $00000001;
  26541. end;
  26542. procedure TI2C1A_I2C3CON.setSEN(thebits : TBits_1); inline;
  26543. begin
  26544. if thebits = 0 then
  26545. pTDefRegMap(@Self)^.clr := $00000001
  26546. else
  26547. pTDefRegMap(@Self)^.&set := $00000001;
  26548. end;
  26549. function TI2C1A_I2C3CON.getSEN : TBits_1; inline;
  26550. begin
  26551. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  26552. end;
  26553. procedure TI2C1A_I2C3CON.setRSEN; inline;
  26554. begin
  26555. pTDefRegMap(@Self)^.&set := $00000002;
  26556. end;
  26557. procedure TI2C1A_I2C3CON.clearRSEN; inline;
  26558. begin
  26559. pTDefRegMap(@Self)^.clr := $00000002;
  26560. end;
  26561. procedure TI2C1A_I2C3CON.setRSEN(thebits : TBits_1); inline;
  26562. begin
  26563. if thebits = 0 then
  26564. pTDefRegMap(@Self)^.clr := $00000002
  26565. else
  26566. pTDefRegMap(@Self)^.&set := $00000002;
  26567. end;
  26568. function TI2C1A_I2C3CON.getRSEN : TBits_1; inline;
  26569. begin
  26570. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  26571. end;
  26572. procedure TI2C1A_I2C3CON.setPEN; inline;
  26573. begin
  26574. pTDefRegMap(@Self)^.&set := $00000004;
  26575. end;
  26576. procedure TI2C1A_I2C3CON.clearPEN; inline;
  26577. begin
  26578. pTDefRegMap(@Self)^.clr := $00000004;
  26579. end;
  26580. procedure TI2C1A_I2C3CON.setPEN(thebits : TBits_1); inline;
  26581. begin
  26582. if thebits = 0 then
  26583. pTDefRegMap(@Self)^.clr := $00000004
  26584. else
  26585. pTDefRegMap(@Self)^.&set := $00000004;
  26586. end;
  26587. function TI2C1A_I2C3CON.getPEN : TBits_1; inline;
  26588. begin
  26589. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  26590. end;
  26591. procedure TI2C1A_I2C3CON.setRCEN; inline;
  26592. begin
  26593. pTDefRegMap(@Self)^.&set := $00000008;
  26594. end;
  26595. procedure TI2C1A_I2C3CON.clearRCEN; inline;
  26596. begin
  26597. pTDefRegMap(@Self)^.clr := $00000008;
  26598. end;
  26599. procedure TI2C1A_I2C3CON.setRCEN(thebits : TBits_1); inline;
  26600. begin
  26601. if thebits = 0 then
  26602. pTDefRegMap(@Self)^.clr := $00000008
  26603. else
  26604. pTDefRegMap(@Self)^.&set := $00000008;
  26605. end;
  26606. function TI2C1A_I2C3CON.getRCEN : TBits_1; inline;
  26607. begin
  26608. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  26609. end;
  26610. procedure TI2C1A_I2C3CON.setACKEN; inline;
  26611. begin
  26612. pTDefRegMap(@Self)^.&set := $00000010;
  26613. end;
  26614. procedure TI2C1A_I2C3CON.clearACKEN; inline;
  26615. begin
  26616. pTDefRegMap(@Self)^.clr := $00000010;
  26617. end;
  26618. procedure TI2C1A_I2C3CON.setACKEN(thebits : TBits_1); inline;
  26619. begin
  26620. if thebits = 0 then
  26621. pTDefRegMap(@Self)^.clr := $00000010
  26622. else
  26623. pTDefRegMap(@Self)^.&set := $00000010;
  26624. end;
  26625. function TI2C1A_I2C3CON.getACKEN : TBits_1; inline;
  26626. begin
  26627. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  26628. end;
  26629. procedure TI2C1A_I2C3CON.setACKDT; inline;
  26630. begin
  26631. pTDefRegMap(@Self)^.&set := $00000020;
  26632. end;
  26633. procedure TI2C1A_I2C3CON.clearACKDT; inline;
  26634. begin
  26635. pTDefRegMap(@Self)^.clr := $00000020;
  26636. end;
  26637. procedure TI2C1A_I2C3CON.setACKDT(thebits : TBits_1); inline;
  26638. begin
  26639. if thebits = 0 then
  26640. pTDefRegMap(@Self)^.clr := $00000020
  26641. else
  26642. pTDefRegMap(@Self)^.&set := $00000020;
  26643. end;
  26644. function TI2C1A_I2C3CON.getACKDT : TBits_1; inline;
  26645. begin
  26646. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  26647. end;
  26648. procedure TI2C1A_I2C3CON.setSTREN; inline;
  26649. begin
  26650. pTDefRegMap(@Self)^.&set := $00000040;
  26651. end;
  26652. procedure TI2C1A_I2C3CON.clearSTREN; inline;
  26653. begin
  26654. pTDefRegMap(@Self)^.clr := $00000040;
  26655. end;
  26656. procedure TI2C1A_I2C3CON.setSTREN(thebits : TBits_1); inline;
  26657. begin
  26658. if thebits = 0 then
  26659. pTDefRegMap(@Self)^.clr := $00000040
  26660. else
  26661. pTDefRegMap(@Self)^.&set := $00000040;
  26662. end;
  26663. function TI2C1A_I2C3CON.getSTREN : TBits_1; inline;
  26664. begin
  26665. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  26666. end;
  26667. procedure TI2C1A_I2C3CON.setGCEN; inline;
  26668. begin
  26669. pTDefRegMap(@Self)^.&set := $00000080;
  26670. end;
  26671. procedure TI2C1A_I2C3CON.clearGCEN; inline;
  26672. begin
  26673. pTDefRegMap(@Self)^.clr := $00000080;
  26674. end;
  26675. procedure TI2C1A_I2C3CON.setGCEN(thebits : TBits_1); inline;
  26676. begin
  26677. if thebits = 0 then
  26678. pTDefRegMap(@Self)^.clr := $00000080
  26679. else
  26680. pTDefRegMap(@Self)^.&set := $00000080;
  26681. end;
  26682. function TI2C1A_I2C3CON.getGCEN : TBits_1; inline;
  26683. begin
  26684. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  26685. end;
  26686. procedure TI2C1A_I2C3CON.setSMEN; inline;
  26687. begin
  26688. pTDefRegMap(@Self)^.&set := $00000100;
  26689. end;
  26690. procedure TI2C1A_I2C3CON.clearSMEN; inline;
  26691. begin
  26692. pTDefRegMap(@Self)^.clr := $00000100;
  26693. end;
  26694. procedure TI2C1A_I2C3CON.setSMEN(thebits : TBits_1); inline;
  26695. begin
  26696. if thebits = 0 then
  26697. pTDefRegMap(@Self)^.clr := $00000100
  26698. else
  26699. pTDefRegMap(@Self)^.&set := $00000100;
  26700. end;
  26701. function TI2C1A_I2C3CON.getSMEN : TBits_1; inline;
  26702. begin
  26703. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  26704. end;
  26705. procedure TI2C1A_I2C3CON.setDISSLW; inline;
  26706. begin
  26707. pTDefRegMap(@Self)^.&set := $00000200;
  26708. end;
  26709. procedure TI2C1A_I2C3CON.clearDISSLW; inline;
  26710. begin
  26711. pTDefRegMap(@Self)^.clr := $00000200;
  26712. end;
  26713. procedure TI2C1A_I2C3CON.setDISSLW(thebits : TBits_1); inline;
  26714. begin
  26715. if thebits = 0 then
  26716. pTDefRegMap(@Self)^.clr := $00000200
  26717. else
  26718. pTDefRegMap(@Self)^.&set := $00000200;
  26719. end;
  26720. function TI2C1A_I2C3CON.getDISSLW : TBits_1; inline;
  26721. begin
  26722. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  26723. end;
  26724. procedure TI2C1A_I2C3CON.setA10M; inline;
  26725. begin
  26726. pTDefRegMap(@Self)^.&set := $00000400;
  26727. end;
  26728. procedure TI2C1A_I2C3CON.clearA10M; inline;
  26729. begin
  26730. pTDefRegMap(@Self)^.clr := $00000400;
  26731. end;
  26732. procedure TI2C1A_I2C3CON.setA10M(thebits : TBits_1); inline;
  26733. begin
  26734. if thebits = 0 then
  26735. pTDefRegMap(@Self)^.clr := $00000400
  26736. else
  26737. pTDefRegMap(@Self)^.&set := $00000400;
  26738. end;
  26739. function TI2C1A_I2C3CON.getA10M : TBits_1; inline;
  26740. begin
  26741. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  26742. end;
  26743. procedure TI2C1A_I2C3CON.setSTRICT; inline;
  26744. begin
  26745. pTDefRegMap(@Self)^.&set := $00000800;
  26746. end;
  26747. procedure TI2C1A_I2C3CON.clearSTRICT; inline;
  26748. begin
  26749. pTDefRegMap(@Self)^.clr := $00000800;
  26750. end;
  26751. procedure TI2C1A_I2C3CON.setSTRICT(thebits : TBits_1); inline;
  26752. begin
  26753. if thebits = 0 then
  26754. pTDefRegMap(@Self)^.clr := $00000800
  26755. else
  26756. pTDefRegMap(@Self)^.&set := $00000800;
  26757. end;
  26758. function TI2C1A_I2C3CON.getSTRICT : TBits_1; inline;
  26759. begin
  26760. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  26761. end;
  26762. procedure TI2C1A_I2C3CON.setSCLREL; inline;
  26763. begin
  26764. pTDefRegMap(@Self)^.&set := $00001000;
  26765. end;
  26766. procedure TI2C1A_I2C3CON.clearSCLREL; inline;
  26767. begin
  26768. pTDefRegMap(@Self)^.clr := $00001000;
  26769. end;
  26770. procedure TI2C1A_I2C3CON.setSCLREL(thebits : TBits_1); inline;
  26771. begin
  26772. if thebits = 0 then
  26773. pTDefRegMap(@Self)^.clr := $00001000
  26774. else
  26775. pTDefRegMap(@Self)^.&set := $00001000;
  26776. end;
  26777. function TI2C1A_I2C3CON.getSCLREL : TBits_1; inline;
  26778. begin
  26779. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  26780. end;
  26781. procedure TI2C1A_I2C3CON.setSIDL; inline;
  26782. begin
  26783. pTDefRegMap(@Self)^.&set := $00002000;
  26784. end;
  26785. procedure TI2C1A_I2C3CON.clearSIDL; inline;
  26786. begin
  26787. pTDefRegMap(@Self)^.clr := $00002000;
  26788. end;
  26789. procedure TI2C1A_I2C3CON.setSIDL(thebits : TBits_1); inline;
  26790. begin
  26791. if thebits = 0 then
  26792. pTDefRegMap(@Self)^.clr := $00002000
  26793. else
  26794. pTDefRegMap(@Self)^.&set := $00002000;
  26795. end;
  26796. function TI2C1A_I2C3CON.getSIDL : TBits_1; inline;
  26797. begin
  26798. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26799. end;
  26800. procedure TI2C1A_I2C3CON.setON; inline;
  26801. begin
  26802. pTDefRegMap(@Self)^.&set := $00008000;
  26803. end;
  26804. procedure TI2C1A_I2C3CON.clearON; inline;
  26805. begin
  26806. pTDefRegMap(@Self)^.clr := $00008000;
  26807. end;
  26808. procedure TI2C1A_I2C3CON.setON(thebits : TBits_1); inline;
  26809. begin
  26810. if thebits = 0 then
  26811. pTDefRegMap(@Self)^.clr := $00008000
  26812. else
  26813. pTDefRegMap(@Self)^.&set := $00008000;
  26814. end;
  26815. function TI2C1A_I2C3CON.getON : TBits_1; inline;
  26816. begin
  26817. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26818. end;
  26819. procedure TI2C1A_I2C3CON.setIPMIEN; inline;
  26820. begin
  26821. pTDefRegMap(@Self)^.&set := $00000800;
  26822. end;
  26823. procedure TI2C1A_I2C3CON.clearIPMIEN; inline;
  26824. begin
  26825. pTDefRegMap(@Self)^.clr := $00000800;
  26826. end;
  26827. procedure TI2C1A_I2C3CON.setIPMIEN(thebits : TBits_1); inline;
  26828. begin
  26829. if thebits = 0 then
  26830. pTDefRegMap(@Self)^.clr := $00000800
  26831. else
  26832. pTDefRegMap(@Self)^.&set := $00000800;
  26833. end;
  26834. function TI2C1A_I2C3CON.getIPMIEN : TBits_1; inline;
  26835. begin
  26836. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  26837. end;
  26838. procedure TI2C1A_I2C3CON.setI2CSIDL; inline;
  26839. begin
  26840. pTDefRegMap(@Self)^.&set := $00002000;
  26841. end;
  26842. procedure TI2C1A_I2C3CON.clearI2CSIDL; inline;
  26843. begin
  26844. pTDefRegMap(@Self)^.clr := $00002000;
  26845. end;
  26846. procedure TI2C1A_I2C3CON.setI2CSIDL(thebits : TBits_1); inline;
  26847. begin
  26848. if thebits = 0 then
  26849. pTDefRegMap(@Self)^.clr := $00002000
  26850. else
  26851. pTDefRegMap(@Self)^.&set := $00002000;
  26852. end;
  26853. function TI2C1A_I2C3CON.getI2CSIDL : TBits_1; inline;
  26854. begin
  26855. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26856. end;
  26857. procedure TI2C1A_I2C3CON.setI2CEN; inline;
  26858. begin
  26859. pTDefRegMap(@Self)^.&set := $00008000;
  26860. end;
  26861. procedure TI2C1A_I2C3CON.clearI2CEN; inline;
  26862. begin
  26863. pTDefRegMap(@Self)^.clr := $00008000;
  26864. end;
  26865. procedure TI2C1A_I2C3CON.setI2CEN(thebits : TBits_1); inline;
  26866. begin
  26867. if thebits = 0 then
  26868. pTDefRegMap(@Self)^.clr := $00008000
  26869. else
  26870. pTDefRegMap(@Self)^.&set := $00008000;
  26871. end;
  26872. function TI2C1A_I2C3CON.getI2CEN : TBits_1; inline;
  26873. begin
  26874. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26875. end;
  26876. procedure TI2C1A_I2C3CON.setw(thebits : TBits_32); inline;
  26877. begin
  26878. pTDefRegMap(@Self)^.val := thebits;
  26879. end;
  26880. function TI2C1A_I2C3CON.getw : TBits_32; inline;
  26881. begin
  26882. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  26883. end;
  26884. procedure TI2C1A_I2C1ASTAT.setTBF; inline;
  26885. begin
  26886. pTDefRegMap(@Self)^.&set := $00000001;
  26887. end;
  26888. procedure TI2C1A_I2C1ASTAT.clearTBF; inline;
  26889. begin
  26890. pTDefRegMap(@Self)^.clr := $00000001;
  26891. end;
  26892. procedure TI2C1A_I2C1ASTAT.setTBF(thebits : TBits_1); inline;
  26893. begin
  26894. if thebits = 0 then
  26895. pTDefRegMap(@Self)^.clr := $00000001
  26896. else
  26897. pTDefRegMap(@Self)^.&set := $00000001;
  26898. end;
  26899. function TI2C1A_I2C1ASTAT.getTBF : TBits_1; inline;
  26900. begin
  26901. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  26902. end;
  26903. procedure TI2C1A_I2C1ASTAT.setRBF; inline;
  26904. begin
  26905. pTDefRegMap(@Self)^.&set := $00000002;
  26906. end;
  26907. procedure TI2C1A_I2C1ASTAT.clearRBF; inline;
  26908. begin
  26909. pTDefRegMap(@Self)^.clr := $00000002;
  26910. end;
  26911. procedure TI2C1A_I2C1ASTAT.setRBF(thebits : TBits_1); inline;
  26912. begin
  26913. if thebits = 0 then
  26914. pTDefRegMap(@Self)^.clr := $00000002
  26915. else
  26916. pTDefRegMap(@Self)^.&set := $00000002;
  26917. end;
  26918. function TI2C1A_I2C1ASTAT.getRBF : TBits_1; inline;
  26919. begin
  26920. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  26921. end;
  26922. procedure TI2C1A_I2C1ASTAT.setR_W; inline;
  26923. begin
  26924. pTDefRegMap(@Self)^.&set := $00000004;
  26925. end;
  26926. procedure TI2C1A_I2C1ASTAT.clearR_W; inline;
  26927. begin
  26928. pTDefRegMap(@Self)^.clr := $00000004;
  26929. end;
  26930. procedure TI2C1A_I2C1ASTAT.setR_W(thebits : TBits_1); inline;
  26931. begin
  26932. if thebits = 0 then
  26933. pTDefRegMap(@Self)^.clr := $00000004
  26934. else
  26935. pTDefRegMap(@Self)^.&set := $00000004;
  26936. end;
  26937. function TI2C1A_I2C1ASTAT.getR_W : TBits_1; inline;
  26938. begin
  26939. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  26940. end;
  26941. procedure TI2C1A_I2C1ASTAT.setS; inline;
  26942. begin
  26943. pTDefRegMap(@Self)^.&set := $00000008;
  26944. end;
  26945. procedure TI2C1A_I2C1ASTAT.clearS; inline;
  26946. begin
  26947. pTDefRegMap(@Self)^.clr := $00000008;
  26948. end;
  26949. procedure TI2C1A_I2C1ASTAT.setS(thebits : TBits_1); inline;
  26950. begin
  26951. if thebits = 0 then
  26952. pTDefRegMap(@Self)^.clr := $00000008
  26953. else
  26954. pTDefRegMap(@Self)^.&set := $00000008;
  26955. end;
  26956. function TI2C1A_I2C1ASTAT.getS : TBits_1; inline;
  26957. begin
  26958. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  26959. end;
  26960. procedure TI2C1A_I2C1ASTAT.setP; inline;
  26961. begin
  26962. pTDefRegMap(@Self)^.&set := $00000010;
  26963. end;
  26964. procedure TI2C1A_I2C1ASTAT.clearP; inline;
  26965. begin
  26966. pTDefRegMap(@Self)^.clr := $00000010;
  26967. end;
  26968. procedure TI2C1A_I2C1ASTAT.setP(thebits : TBits_1); inline;
  26969. begin
  26970. if thebits = 0 then
  26971. pTDefRegMap(@Self)^.clr := $00000010
  26972. else
  26973. pTDefRegMap(@Self)^.&set := $00000010;
  26974. end;
  26975. function TI2C1A_I2C1ASTAT.getP : TBits_1; inline;
  26976. begin
  26977. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  26978. end;
  26979. procedure TI2C1A_I2C1ASTAT.setD_A; inline;
  26980. begin
  26981. pTDefRegMap(@Self)^.&set := $00000020;
  26982. end;
  26983. procedure TI2C1A_I2C1ASTAT.clearD_A; inline;
  26984. begin
  26985. pTDefRegMap(@Self)^.clr := $00000020;
  26986. end;
  26987. procedure TI2C1A_I2C1ASTAT.setD_A(thebits : TBits_1); inline;
  26988. begin
  26989. if thebits = 0 then
  26990. pTDefRegMap(@Self)^.clr := $00000020
  26991. else
  26992. pTDefRegMap(@Self)^.&set := $00000020;
  26993. end;
  26994. function TI2C1A_I2C1ASTAT.getD_A : TBits_1; inline;
  26995. begin
  26996. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  26997. end;
  26998. procedure TI2C1A_I2C1ASTAT.setI2COV; inline;
  26999. begin
  27000. pTDefRegMap(@Self)^.&set := $00000040;
  27001. end;
  27002. procedure TI2C1A_I2C1ASTAT.clearI2COV; inline;
  27003. begin
  27004. pTDefRegMap(@Self)^.clr := $00000040;
  27005. end;
  27006. procedure TI2C1A_I2C1ASTAT.setI2COV(thebits : TBits_1); inline;
  27007. begin
  27008. if thebits = 0 then
  27009. pTDefRegMap(@Self)^.clr := $00000040
  27010. else
  27011. pTDefRegMap(@Self)^.&set := $00000040;
  27012. end;
  27013. function TI2C1A_I2C1ASTAT.getI2COV : TBits_1; inline;
  27014. begin
  27015. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27016. end;
  27017. procedure TI2C1A_I2C1ASTAT.setIWCOL; inline;
  27018. begin
  27019. pTDefRegMap(@Self)^.&set := $00000080;
  27020. end;
  27021. procedure TI2C1A_I2C1ASTAT.clearIWCOL; inline;
  27022. begin
  27023. pTDefRegMap(@Self)^.clr := $00000080;
  27024. end;
  27025. procedure TI2C1A_I2C1ASTAT.setIWCOL(thebits : TBits_1); inline;
  27026. begin
  27027. if thebits = 0 then
  27028. pTDefRegMap(@Self)^.clr := $00000080
  27029. else
  27030. pTDefRegMap(@Self)^.&set := $00000080;
  27031. end;
  27032. function TI2C1A_I2C1ASTAT.getIWCOL : TBits_1; inline;
  27033. begin
  27034. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  27035. end;
  27036. procedure TI2C1A_I2C1ASTAT.setADD10; inline;
  27037. begin
  27038. pTDefRegMap(@Self)^.&set := $00000100;
  27039. end;
  27040. procedure TI2C1A_I2C1ASTAT.clearADD10; inline;
  27041. begin
  27042. pTDefRegMap(@Self)^.clr := $00000100;
  27043. end;
  27044. procedure TI2C1A_I2C1ASTAT.setADD10(thebits : TBits_1); inline;
  27045. begin
  27046. if thebits = 0 then
  27047. pTDefRegMap(@Self)^.clr := $00000100
  27048. else
  27049. pTDefRegMap(@Self)^.&set := $00000100;
  27050. end;
  27051. function TI2C1A_I2C1ASTAT.getADD10 : TBits_1; inline;
  27052. begin
  27053. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  27054. end;
  27055. procedure TI2C1A_I2C1ASTAT.setGCSTAT; inline;
  27056. begin
  27057. pTDefRegMap(@Self)^.&set := $00000200;
  27058. end;
  27059. procedure TI2C1A_I2C1ASTAT.clearGCSTAT; inline;
  27060. begin
  27061. pTDefRegMap(@Self)^.clr := $00000200;
  27062. end;
  27063. procedure TI2C1A_I2C1ASTAT.setGCSTAT(thebits : TBits_1); inline;
  27064. begin
  27065. if thebits = 0 then
  27066. pTDefRegMap(@Self)^.clr := $00000200
  27067. else
  27068. pTDefRegMap(@Self)^.&set := $00000200;
  27069. end;
  27070. function TI2C1A_I2C1ASTAT.getGCSTAT : TBits_1; inline;
  27071. begin
  27072. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  27073. end;
  27074. procedure TI2C1A_I2C1ASTAT.setBCL; inline;
  27075. begin
  27076. pTDefRegMap(@Self)^.&set := $00000400;
  27077. end;
  27078. procedure TI2C1A_I2C1ASTAT.clearBCL; inline;
  27079. begin
  27080. pTDefRegMap(@Self)^.clr := $00000400;
  27081. end;
  27082. procedure TI2C1A_I2C1ASTAT.setBCL(thebits : TBits_1); inline;
  27083. begin
  27084. if thebits = 0 then
  27085. pTDefRegMap(@Self)^.clr := $00000400
  27086. else
  27087. pTDefRegMap(@Self)^.&set := $00000400;
  27088. end;
  27089. function TI2C1A_I2C1ASTAT.getBCL : TBits_1; inline;
  27090. begin
  27091. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  27092. end;
  27093. procedure TI2C1A_I2C1ASTAT.setTRSTAT; inline;
  27094. begin
  27095. pTDefRegMap(@Self)^.&set := $00004000;
  27096. end;
  27097. procedure TI2C1A_I2C1ASTAT.clearTRSTAT; inline;
  27098. begin
  27099. pTDefRegMap(@Self)^.clr := $00004000;
  27100. end;
  27101. procedure TI2C1A_I2C1ASTAT.setTRSTAT(thebits : TBits_1); inline;
  27102. begin
  27103. if thebits = 0 then
  27104. pTDefRegMap(@Self)^.clr := $00004000
  27105. else
  27106. pTDefRegMap(@Self)^.&set := $00004000;
  27107. end;
  27108. function TI2C1A_I2C1ASTAT.getTRSTAT : TBits_1; inline;
  27109. begin
  27110. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  27111. end;
  27112. procedure TI2C1A_I2C1ASTAT.setACKSTAT; inline;
  27113. begin
  27114. pTDefRegMap(@Self)^.&set := $00008000;
  27115. end;
  27116. procedure TI2C1A_I2C1ASTAT.clearACKSTAT; inline;
  27117. begin
  27118. pTDefRegMap(@Self)^.clr := $00008000;
  27119. end;
  27120. procedure TI2C1A_I2C1ASTAT.setACKSTAT(thebits : TBits_1); inline;
  27121. begin
  27122. if thebits = 0 then
  27123. pTDefRegMap(@Self)^.clr := $00008000
  27124. else
  27125. pTDefRegMap(@Self)^.&set := $00008000;
  27126. end;
  27127. function TI2C1A_I2C1ASTAT.getACKSTAT : TBits_1; inline;
  27128. begin
  27129. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27130. end;
  27131. procedure TI2C1A_I2C1ASTAT.setI2CPOV; inline;
  27132. begin
  27133. pTDefRegMap(@Self)^.&set := $00000040;
  27134. end;
  27135. procedure TI2C1A_I2C1ASTAT.clearI2CPOV; inline;
  27136. begin
  27137. pTDefRegMap(@Self)^.clr := $00000040;
  27138. end;
  27139. procedure TI2C1A_I2C1ASTAT.setI2CPOV(thebits : TBits_1); inline;
  27140. begin
  27141. if thebits = 0 then
  27142. pTDefRegMap(@Self)^.clr := $00000040
  27143. else
  27144. pTDefRegMap(@Self)^.&set := $00000040;
  27145. end;
  27146. function TI2C1A_I2C1ASTAT.getI2CPOV : TBits_1; inline;
  27147. begin
  27148. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27149. end;
  27150. procedure TI2C1A_I2C1ASTAT.setw(thebits : TBits_32); inline;
  27151. begin
  27152. pTDefRegMap(@Self)^.val := thebits;
  27153. end;
  27154. function TI2C1A_I2C1ASTAT.getw : TBits_32; inline;
  27155. begin
  27156. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  27157. end;
  27158. procedure TI2C1A_I2C3STAT.setTBF; inline;
  27159. begin
  27160. pTDefRegMap(@Self)^.&set := $00000001;
  27161. end;
  27162. procedure TI2C1A_I2C3STAT.clearTBF; inline;
  27163. begin
  27164. pTDefRegMap(@Self)^.clr := $00000001;
  27165. end;
  27166. procedure TI2C1A_I2C3STAT.setTBF(thebits : TBits_1); inline;
  27167. begin
  27168. if thebits = 0 then
  27169. pTDefRegMap(@Self)^.clr := $00000001
  27170. else
  27171. pTDefRegMap(@Self)^.&set := $00000001;
  27172. end;
  27173. function TI2C1A_I2C3STAT.getTBF : TBits_1; inline;
  27174. begin
  27175. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  27176. end;
  27177. procedure TI2C1A_I2C3STAT.setRBF; inline;
  27178. begin
  27179. pTDefRegMap(@Self)^.&set := $00000002;
  27180. end;
  27181. procedure TI2C1A_I2C3STAT.clearRBF; inline;
  27182. begin
  27183. pTDefRegMap(@Self)^.clr := $00000002;
  27184. end;
  27185. procedure TI2C1A_I2C3STAT.setRBF(thebits : TBits_1); inline;
  27186. begin
  27187. if thebits = 0 then
  27188. pTDefRegMap(@Self)^.clr := $00000002
  27189. else
  27190. pTDefRegMap(@Self)^.&set := $00000002;
  27191. end;
  27192. function TI2C1A_I2C3STAT.getRBF : TBits_1; inline;
  27193. begin
  27194. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  27195. end;
  27196. procedure TI2C1A_I2C3STAT.setR_W; inline;
  27197. begin
  27198. pTDefRegMap(@Self)^.&set := $00000004;
  27199. end;
  27200. procedure TI2C1A_I2C3STAT.clearR_W; inline;
  27201. begin
  27202. pTDefRegMap(@Self)^.clr := $00000004;
  27203. end;
  27204. procedure TI2C1A_I2C3STAT.setR_W(thebits : TBits_1); inline;
  27205. begin
  27206. if thebits = 0 then
  27207. pTDefRegMap(@Self)^.clr := $00000004
  27208. else
  27209. pTDefRegMap(@Self)^.&set := $00000004;
  27210. end;
  27211. function TI2C1A_I2C3STAT.getR_W : TBits_1; inline;
  27212. begin
  27213. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  27214. end;
  27215. procedure TI2C1A_I2C3STAT.setS; inline;
  27216. begin
  27217. pTDefRegMap(@Self)^.&set := $00000008;
  27218. end;
  27219. procedure TI2C1A_I2C3STAT.clearS; inline;
  27220. begin
  27221. pTDefRegMap(@Self)^.clr := $00000008;
  27222. end;
  27223. procedure TI2C1A_I2C3STAT.setS(thebits : TBits_1); inline;
  27224. begin
  27225. if thebits = 0 then
  27226. pTDefRegMap(@Self)^.clr := $00000008
  27227. else
  27228. pTDefRegMap(@Self)^.&set := $00000008;
  27229. end;
  27230. function TI2C1A_I2C3STAT.getS : TBits_1; inline;
  27231. begin
  27232. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  27233. end;
  27234. procedure TI2C1A_I2C3STAT.setP; inline;
  27235. begin
  27236. pTDefRegMap(@Self)^.&set := $00000010;
  27237. end;
  27238. procedure TI2C1A_I2C3STAT.clearP; inline;
  27239. begin
  27240. pTDefRegMap(@Self)^.clr := $00000010;
  27241. end;
  27242. procedure TI2C1A_I2C3STAT.setP(thebits : TBits_1); inline;
  27243. begin
  27244. if thebits = 0 then
  27245. pTDefRegMap(@Self)^.clr := $00000010
  27246. else
  27247. pTDefRegMap(@Self)^.&set := $00000010;
  27248. end;
  27249. function TI2C1A_I2C3STAT.getP : TBits_1; inline;
  27250. begin
  27251. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  27252. end;
  27253. procedure TI2C1A_I2C3STAT.setD_A; inline;
  27254. begin
  27255. pTDefRegMap(@Self)^.&set := $00000020;
  27256. end;
  27257. procedure TI2C1A_I2C3STAT.clearD_A; inline;
  27258. begin
  27259. pTDefRegMap(@Self)^.clr := $00000020;
  27260. end;
  27261. procedure TI2C1A_I2C3STAT.setD_A(thebits : TBits_1); inline;
  27262. begin
  27263. if thebits = 0 then
  27264. pTDefRegMap(@Self)^.clr := $00000020
  27265. else
  27266. pTDefRegMap(@Self)^.&set := $00000020;
  27267. end;
  27268. function TI2C1A_I2C3STAT.getD_A : TBits_1; inline;
  27269. begin
  27270. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  27271. end;
  27272. procedure TI2C1A_I2C3STAT.setI2COV; inline;
  27273. begin
  27274. pTDefRegMap(@Self)^.&set := $00000040;
  27275. end;
  27276. procedure TI2C1A_I2C3STAT.clearI2COV; inline;
  27277. begin
  27278. pTDefRegMap(@Self)^.clr := $00000040;
  27279. end;
  27280. procedure TI2C1A_I2C3STAT.setI2COV(thebits : TBits_1); inline;
  27281. begin
  27282. if thebits = 0 then
  27283. pTDefRegMap(@Self)^.clr := $00000040
  27284. else
  27285. pTDefRegMap(@Self)^.&set := $00000040;
  27286. end;
  27287. function TI2C1A_I2C3STAT.getI2COV : TBits_1; inline;
  27288. begin
  27289. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27290. end;
  27291. procedure TI2C1A_I2C3STAT.setIWCOL; inline;
  27292. begin
  27293. pTDefRegMap(@Self)^.&set := $00000080;
  27294. end;
  27295. procedure TI2C1A_I2C3STAT.clearIWCOL; inline;
  27296. begin
  27297. pTDefRegMap(@Self)^.clr := $00000080;
  27298. end;
  27299. procedure TI2C1A_I2C3STAT.setIWCOL(thebits : TBits_1); inline;
  27300. begin
  27301. if thebits = 0 then
  27302. pTDefRegMap(@Self)^.clr := $00000080
  27303. else
  27304. pTDefRegMap(@Self)^.&set := $00000080;
  27305. end;
  27306. function TI2C1A_I2C3STAT.getIWCOL : TBits_1; inline;
  27307. begin
  27308. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  27309. end;
  27310. procedure TI2C1A_I2C3STAT.setADD10; inline;
  27311. begin
  27312. pTDefRegMap(@Self)^.&set := $00000100;
  27313. end;
  27314. procedure TI2C1A_I2C3STAT.clearADD10; inline;
  27315. begin
  27316. pTDefRegMap(@Self)^.clr := $00000100;
  27317. end;
  27318. procedure TI2C1A_I2C3STAT.setADD10(thebits : TBits_1); inline;
  27319. begin
  27320. if thebits = 0 then
  27321. pTDefRegMap(@Self)^.clr := $00000100
  27322. else
  27323. pTDefRegMap(@Self)^.&set := $00000100;
  27324. end;
  27325. function TI2C1A_I2C3STAT.getADD10 : TBits_1; inline;
  27326. begin
  27327. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  27328. end;
  27329. procedure TI2C1A_I2C3STAT.setGCSTAT; inline;
  27330. begin
  27331. pTDefRegMap(@Self)^.&set := $00000200;
  27332. end;
  27333. procedure TI2C1A_I2C3STAT.clearGCSTAT; inline;
  27334. begin
  27335. pTDefRegMap(@Self)^.clr := $00000200;
  27336. end;
  27337. procedure TI2C1A_I2C3STAT.setGCSTAT(thebits : TBits_1); inline;
  27338. begin
  27339. if thebits = 0 then
  27340. pTDefRegMap(@Self)^.clr := $00000200
  27341. else
  27342. pTDefRegMap(@Self)^.&set := $00000200;
  27343. end;
  27344. function TI2C1A_I2C3STAT.getGCSTAT : TBits_1; inline;
  27345. begin
  27346. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  27347. end;
  27348. procedure TI2C1A_I2C3STAT.setBCL; inline;
  27349. begin
  27350. pTDefRegMap(@Self)^.&set := $00000400;
  27351. end;
  27352. procedure TI2C1A_I2C3STAT.clearBCL; inline;
  27353. begin
  27354. pTDefRegMap(@Self)^.clr := $00000400;
  27355. end;
  27356. procedure TI2C1A_I2C3STAT.setBCL(thebits : TBits_1); inline;
  27357. begin
  27358. if thebits = 0 then
  27359. pTDefRegMap(@Self)^.clr := $00000400
  27360. else
  27361. pTDefRegMap(@Self)^.&set := $00000400;
  27362. end;
  27363. function TI2C1A_I2C3STAT.getBCL : TBits_1; inline;
  27364. begin
  27365. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  27366. end;
  27367. procedure TI2C1A_I2C3STAT.setTRSTAT; inline;
  27368. begin
  27369. pTDefRegMap(@Self)^.&set := $00004000;
  27370. end;
  27371. procedure TI2C1A_I2C3STAT.clearTRSTAT; inline;
  27372. begin
  27373. pTDefRegMap(@Self)^.clr := $00004000;
  27374. end;
  27375. procedure TI2C1A_I2C3STAT.setTRSTAT(thebits : TBits_1); inline;
  27376. begin
  27377. if thebits = 0 then
  27378. pTDefRegMap(@Self)^.clr := $00004000
  27379. else
  27380. pTDefRegMap(@Self)^.&set := $00004000;
  27381. end;
  27382. function TI2C1A_I2C3STAT.getTRSTAT : TBits_1; inline;
  27383. begin
  27384. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  27385. end;
  27386. procedure TI2C1A_I2C3STAT.setACKSTAT; inline;
  27387. begin
  27388. pTDefRegMap(@Self)^.&set := $00008000;
  27389. end;
  27390. procedure TI2C1A_I2C3STAT.clearACKSTAT; inline;
  27391. begin
  27392. pTDefRegMap(@Self)^.clr := $00008000;
  27393. end;
  27394. procedure TI2C1A_I2C3STAT.setACKSTAT(thebits : TBits_1); inline;
  27395. begin
  27396. if thebits = 0 then
  27397. pTDefRegMap(@Self)^.clr := $00008000
  27398. else
  27399. pTDefRegMap(@Self)^.&set := $00008000;
  27400. end;
  27401. function TI2C1A_I2C3STAT.getACKSTAT : TBits_1; inline;
  27402. begin
  27403. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27404. end;
  27405. procedure TI2C1A_I2C3STAT.setI2CPOV; inline;
  27406. begin
  27407. pTDefRegMap(@Self)^.&set := $00000040;
  27408. end;
  27409. procedure TI2C1A_I2C3STAT.clearI2CPOV; inline;
  27410. begin
  27411. pTDefRegMap(@Self)^.clr := $00000040;
  27412. end;
  27413. procedure TI2C1A_I2C3STAT.setI2CPOV(thebits : TBits_1); inline;
  27414. begin
  27415. if thebits = 0 then
  27416. pTDefRegMap(@Self)^.clr := $00000040
  27417. else
  27418. pTDefRegMap(@Self)^.&set := $00000040;
  27419. end;
  27420. function TI2C1A_I2C3STAT.getI2CPOV : TBits_1; inline;
  27421. begin
  27422. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27423. end;
  27424. procedure TI2C1A_I2C3STAT.setw(thebits : TBits_32); inline;
  27425. begin
  27426. pTDefRegMap(@Self)^.val := thebits;
  27427. end;
  27428. function TI2C1A_I2C3STAT.getw : TBits_32; inline;
  27429. begin
  27430. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  27431. end;
  27432. procedure TI2C2A_I2C2ACON.setSEN; inline;
  27433. begin
  27434. pTDefRegMap(@Self)^.&set := $00000001;
  27435. end;
  27436. procedure TI2C2A_I2C2ACON.clearSEN; inline;
  27437. begin
  27438. pTDefRegMap(@Self)^.clr := $00000001;
  27439. end;
  27440. procedure TI2C2A_I2C2ACON.setSEN(thebits : TBits_1); inline;
  27441. begin
  27442. if thebits = 0 then
  27443. pTDefRegMap(@Self)^.clr := $00000001
  27444. else
  27445. pTDefRegMap(@Self)^.&set := $00000001;
  27446. end;
  27447. function TI2C2A_I2C2ACON.getSEN : TBits_1; inline;
  27448. begin
  27449. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  27450. end;
  27451. procedure TI2C2A_I2C2ACON.setRSEN; inline;
  27452. begin
  27453. pTDefRegMap(@Self)^.&set := $00000002;
  27454. end;
  27455. procedure TI2C2A_I2C2ACON.clearRSEN; inline;
  27456. begin
  27457. pTDefRegMap(@Self)^.clr := $00000002;
  27458. end;
  27459. procedure TI2C2A_I2C2ACON.setRSEN(thebits : TBits_1); inline;
  27460. begin
  27461. if thebits = 0 then
  27462. pTDefRegMap(@Self)^.clr := $00000002
  27463. else
  27464. pTDefRegMap(@Self)^.&set := $00000002;
  27465. end;
  27466. function TI2C2A_I2C2ACON.getRSEN : TBits_1; inline;
  27467. begin
  27468. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  27469. end;
  27470. procedure TI2C2A_I2C2ACON.setPEN; inline;
  27471. begin
  27472. pTDefRegMap(@Self)^.&set := $00000004;
  27473. end;
  27474. procedure TI2C2A_I2C2ACON.clearPEN; inline;
  27475. begin
  27476. pTDefRegMap(@Self)^.clr := $00000004;
  27477. end;
  27478. procedure TI2C2A_I2C2ACON.setPEN(thebits : TBits_1); inline;
  27479. begin
  27480. if thebits = 0 then
  27481. pTDefRegMap(@Self)^.clr := $00000004
  27482. else
  27483. pTDefRegMap(@Self)^.&set := $00000004;
  27484. end;
  27485. function TI2C2A_I2C2ACON.getPEN : TBits_1; inline;
  27486. begin
  27487. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  27488. end;
  27489. procedure TI2C2A_I2C2ACON.setRCEN; inline;
  27490. begin
  27491. pTDefRegMap(@Self)^.&set := $00000008;
  27492. end;
  27493. procedure TI2C2A_I2C2ACON.clearRCEN; inline;
  27494. begin
  27495. pTDefRegMap(@Self)^.clr := $00000008;
  27496. end;
  27497. procedure TI2C2A_I2C2ACON.setRCEN(thebits : TBits_1); inline;
  27498. begin
  27499. if thebits = 0 then
  27500. pTDefRegMap(@Self)^.clr := $00000008
  27501. else
  27502. pTDefRegMap(@Self)^.&set := $00000008;
  27503. end;
  27504. function TI2C2A_I2C2ACON.getRCEN : TBits_1; inline;
  27505. begin
  27506. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  27507. end;
  27508. procedure TI2C2A_I2C2ACON.setACKEN; inline;
  27509. begin
  27510. pTDefRegMap(@Self)^.&set := $00000010;
  27511. end;
  27512. procedure TI2C2A_I2C2ACON.clearACKEN; inline;
  27513. begin
  27514. pTDefRegMap(@Self)^.clr := $00000010;
  27515. end;
  27516. procedure TI2C2A_I2C2ACON.setACKEN(thebits : TBits_1); inline;
  27517. begin
  27518. if thebits = 0 then
  27519. pTDefRegMap(@Self)^.clr := $00000010
  27520. else
  27521. pTDefRegMap(@Self)^.&set := $00000010;
  27522. end;
  27523. function TI2C2A_I2C2ACON.getACKEN : TBits_1; inline;
  27524. begin
  27525. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  27526. end;
  27527. procedure TI2C2A_I2C2ACON.setACKDT; inline;
  27528. begin
  27529. pTDefRegMap(@Self)^.&set := $00000020;
  27530. end;
  27531. procedure TI2C2A_I2C2ACON.clearACKDT; inline;
  27532. begin
  27533. pTDefRegMap(@Self)^.clr := $00000020;
  27534. end;
  27535. procedure TI2C2A_I2C2ACON.setACKDT(thebits : TBits_1); inline;
  27536. begin
  27537. if thebits = 0 then
  27538. pTDefRegMap(@Self)^.clr := $00000020
  27539. else
  27540. pTDefRegMap(@Self)^.&set := $00000020;
  27541. end;
  27542. function TI2C2A_I2C2ACON.getACKDT : TBits_1; inline;
  27543. begin
  27544. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  27545. end;
  27546. procedure TI2C2A_I2C2ACON.setSTREN; inline;
  27547. begin
  27548. pTDefRegMap(@Self)^.&set := $00000040;
  27549. end;
  27550. procedure TI2C2A_I2C2ACON.clearSTREN; inline;
  27551. begin
  27552. pTDefRegMap(@Self)^.clr := $00000040;
  27553. end;
  27554. procedure TI2C2A_I2C2ACON.setSTREN(thebits : TBits_1); inline;
  27555. begin
  27556. if thebits = 0 then
  27557. pTDefRegMap(@Self)^.clr := $00000040
  27558. else
  27559. pTDefRegMap(@Self)^.&set := $00000040;
  27560. end;
  27561. function TI2C2A_I2C2ACON.getSTREN : TBits_1; inline;
  27562. begin
  27563. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27564. end;
  27565. procedure TI2C2A_I2C2ACON.setGCEN; inline;
  27566. begin
  27567. pTDefRegMap(@Self)^.&set := $00000080;
  27568. end;
  27569. procedure TI2C2A_I2C2ACON.clearGCEN; inline;
  27570. begin
  27571. pTDefRegMap(@Self)^.clr := $00000080;
  27572. end;
  27573. procedure TI2C2A_I2C2ACON.setGCEN(thebits : TBits_1); inline;
  27574. begin
  27575. if thebits = 0 then
  27576. pTDefRegMap(@Self)^.clr := $00000080
  27577. else
  27578. pTDefRegMap(@Self)^.&set := $00000080;
  27579. end;
  27580. function TI2C2A_I2C2ACON.getGCEN : TBits_1; inline;
  27581. begin
  27582. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  27583. end;
  27584. procedure TI2C2A_I2C2ACON.setSMEN; inline;
  27585. begin
  27586. pTDefRegMap(@Self)^.&set := $00000100;
  27587. end;
  27588. procedure TI2C2A_I2C2ACON.clearSMEN; inline;
  27589. begin
  27590. pTDefRegMap(@Self)^.clr := $00000100;
  27591. end;
  27592. procedure TI2C2A_I2C2ACON.setSMEN(thebits : TBits_1); inline;
  27593. begin
  27594. if thebits = 0 then
  27595. pTDefRegMap(@Self)^.clr := $00000100
  27596. else
  27597. pTDefRegMap(@Self)^.&set := $00000100;
  27598. end;
  27599. function TI2C2A_I2C2ACON.getSMEN : TBits_1; inline;
  27600. begin
  27601. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  27602. end;
  27603. procedure TI2C2A_I2C2ACON.setDISSLW; inline;
  27604. begin
  27605. pTDefRegMap(@Self)^.&set := $00000200;
  27606. end;
  27607. procedure TI2C2A_I2C2ACON.clearDISSLW; inline;
  27608. begin
  27609. pTDefRegMap(@Self)^.clr := $00000200;
  27610. end;
  27611. procedure TI2C2A_I2C2ACON.setDISSLW(thebits : TBits_1); inline;
  27612. begin
  27613. if thebits = 0 then
  27614. pTDefRegMap(@Self)^.clr := $00000200
  27615. else
  27616. pTDefRegMap(@Self)^.&set := $00000200;
  27617. end;
  27618. function TI2C2A_I2C2ACON.getDISSLW : TBits_1; inline;
  27619. begin
  27620. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  27621. end;
  27622. procedure TI2C2A_I2C2ACON.setA10M; inline;
  27623. begin
  27624. pTDefRegMap(@Self)^.&set := $00000400;
  27625. end;
  27626. procedure TI2C2A_I2C2ACON.clearA10M; inline;
  27627. begin
  27628. pTDefRegMap(@Self)^.clr := $00000400;
  27629. end;
  27630. procedure TI2C2A_I2C2ACON.setA10M(thebits : TBits_1); inline;
  27631. begin
  27632. if thebits = 0 then
  27633. pTDefRegMap(@Self)^.clr := $00000400
  27634. else
  27635. pTDefRegMap(@Self)^.&set := $00000400;
  27636. end;
  27637. function TI2C2A_I2C2ACON.getA10M : TBits_1; inline;
  27638. begin
  27639. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  27640. end;
  27641. procedure TI2C2A_I2C2ACON.setSTRICT; inline;
  27642. begin
  27643. pTDefRegMap(@Self)^.&set := $00000800;
  27644. end;
  27645. procedure TI2C2A_I2C2ACON.clearSTRICT; inline;
  27646. begin
  27647. pTDefRegMap(@Self)^.clr := $00000800;
  27648. end;
  27649. procedure TI2C2A_I2C2ACON.setSTRICT(thebits : TBits_1); inline;
  27650. begin
  27651. if thebits = 0 then
  27652. pTDefRegMap(@Self)^.clr := $00000800
  27653. else
  27654. pTDefRegMap(@Self)^.&set := $00000800;
  27655. end;
  27656. function TI2C2A_I2C2ACON.getSTRICT : TBits_1; inline;
  27657. begin
  27658. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  27659. end;
  27660. procedure TI2C2A_I2C2ACON.setSCLREL; inline;
  27661. begin
  27662. pTDefRegMap(@Self)^.&set := $00001000;
  27663. end;
  27664. procedure TI2C2A_I2C2ACON.clearSCLREL; inline;
  27665. begin
  27666. pTDefRegMap(@Self)^.clr := $00001000;
  27667. end;
  27668. procedure TI2C2A_I2C2ACON.setSCLREL(thebits : TBits_1); inline;
  27669. begin
  27670. if thebits = 0 then
  27671. pTDefRegMap(@Self)^.clr := $00001000
  27672. else
  27673. pTDefRegMap(@Self)^.&set := $00001000;
  27674. end;
  27675. function TI2C2A_I2C2ACON.getSCLREL : TBits_1; inline;
  27676. begin
  27677. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  27678. end;
  27679. procedure TI2C2A_I2C2ACON.setSIDL; inline;
  27680. begin
  27681. pTDefRegMap(@Self)^.&set := $00002000;
  27682. end;
  27683. procedure TI2C2A_I2C2ACON.clearSIDL; inline;
  27684. begin
  27685. pTDefRegMap(@Self)^.clr := $00002000;
  27686. end;
  27687. procedure TI2C2A_I2C2ACON.setSIDL(thebits : TBits_1); inline;
  27688. begin
  27689. if thebits = 0 then
  27690. pTDefRegMap(@Self)^.clr := $00002000
  27691. else
  27692. pTDefRegMap(@Self)^.&set := $00002000;
  27693. end;
  27694. function TI2C2A_I2C2ACON.getSIDL : TBits_1; inline;
  27695. begin
  27696. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  27697. end;
  27698. procedure TI2C2A_I2C2ACON.setON; inline;
  27699. begin
  27700. pTDefRegMap(@Self)^.&set := $00008000;
  27701. end;
  27702. procedure TI2C2A_I2C2ACON.clearON; inline;
  27703. begin
  27704. pTDefRegMap(@Self)^.clr := $00008000;
  27705. end;
  27706. procedure TI2C2A_I2C2ACON.setON(thebits : TBits_1); inline;
  27707. begin
  27708. if thebits = 0 then
  27709. pTDefRegMap(@Self)^.clr := $00008000
  27710. else
  27711. pTDefRegMap(@Self)^.&set := $00008000;
  27712. end;
  27713. function TI2C2A_I2C2ACON.getON : TBits_1; inline;
  27714. begin
  27715. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27716. end;
  27717. procedure TI2C2A_I2C2ACON.setIPMIEN; inline;
  27718. begin
  27719. pTDefRegMap(@Self)^.&set := $00000800;
  27720. end;
  27721. procedure TI2C2A_I2C2ACON.clearIPMIEN; inline;
  27722. begin
  27723. pTDefRegMap(@Self)^.clr := $00000800;
  27724. end;
  27725. procedure TI2C2A_I2C2ACON.setIPMIEN(thebits : TBits_1); inline;
  27726. begin
  27727. if thebits = 0 then
  27728. pTDefRegMap(@Self)^.clr := $00000800
  27729. else
  27730. pTDefRegMap(@Self)^.&set := $00000800;
  27731. end;
  27732. function TI2C2A_I2C2ACON.getIPMIEN : TBits_1; inline;
  27733. begin
  27734. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  27735. end;
  27736. procedure TI2C2A_I2C2ACON.setI2CSIDL; inline;
  27737. begin
  27738. pTDefRegMap(@Self)^.&set := $00002000;
  27739. end;
  27740. procedure TI2C2A_I2C2ACON.clearI2CSIDL; inline;
  27741. begin
  27742. pTDefRegMap(@Self)^.clr := $00002000;
  27743. end;
  27744. procedure TI2C2A_I2C2ACON.setI2CSIDL(thebits : TBits_1); inline;
  27745. begin
  27746. if thebits = 0 then
  27747. pTDefRegMap(@Self)^.clr := $00002000
  27748. else
  27749. pTDefRegMap(@Self)^.&set := $00002000;
  27750. end;
  27751. function TI2C2A_I2C2ACON.getI2CSIDL : TBits_1; inline;
  27752. begin
  27753. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  27754. end;
  27755. procedure TI2C2A_I2C2ACON.setI2CEN; inline;
  27756. begin
  27757. pTDefRegMap(@Self)^.&set := $00008000;
  27758. end;
  27759. procedure TI2C2A_I2C2ACON.clearI2CEN; inline;
  27760. begin
  27761. pTDefRegMap(@Self)^.clr := $00008000;
  27762. end;
  27763. procedure TI2C2A_I2C2ACON.setI2CEN(thebits : TBits_1); inline;
  27764. begin
  27765. if thebits = 0 then
  27766. pTDefRegMap(@Self)^.clr := $00008000
  27767. else
  27768. pTDefRegMap(@Self)^.&set := $00008000;
  27769. end;
  27770. function TI2C2A_I2C2ACON.getI2CEN : TBits_1; inline;
  27771. begin
  27772. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27773. end;
  27774. procedure TI2C2A_I2C2ACON.setw(thebits : TBits_32); inline;
  27775. begin
  27776. pTDefRegMap(@Self)^.val := thebits;
  27777. end;
  27778. function TI2C2A_I2C2ACON.getw : TBits_32; inline;
  27779. begin
  27780. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  27781. end;
  27782. procedure TI2C2A_I2C4CON.setSEN; inline;
  27783. begin
  27784. pTDefRegMap(@Self)^.&set := $00000001;
  27785. end;
  27786. procedure TI2C2A_I2C4CON.clearSEN; inline;
  27787. begin
  27788. pTDefRegMap(@Self)^.clr := $00000001;
  27789. end;
  27790. procedure TI2C2A_I2C4CON.setSEN(thebits : TBits_1); inline;
  27791. begin
  27792. if thebits = 0 then
  27793. pTDefRegMap(@Self)^.clr := $00000001
  27794. else
  27795. pTDefRegMap(@Self)^.&set := $00000001;
  27796. end;
  27797. function TI2C2A_I2C4CON.getSEN : TBits_1; inline;
  27798. begin
  27799. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  27800. end;
  27801. procedure TI2C2A_I2C4CON.setRSEN; inline;
  27802. begin
  27803. pTDefRegMap(@Self)^.&set := $00000002;
  27804. end;
  27805. procedure TI2C2A_I2C4CON.clearRSEN; inline;
  27806. begin
  27807. pTDefRegMap(@Self)^.clr := $00000002;
  27808. end;
  27809. procedure TI2C2A_I2C4CON.setRSEN(thebits : TBits_1); inline;
  27810. begin
  27811. if thebits = 0 then
  27812. pTDefRegMap(@Self)^.clr := $00000002
  27813. else
  27814. pTDefRegMap(@Self)^.&set := $00000002;
  27815. end;
  27816. function TI2C2A_I2C4CON.getRSEN : TBits_1; inline;
  27817. begin
  27818. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  27819. end;
  27820. procedure TI2C2A_I2C4CON.setPEN; inline;
  27821. begin
  27822. pTDefRegMap(@Self)^.&set := $00000004;
  27823. end;
  27824. procedure TI2C2A_I2C4CON.clearPEN; inline;
  27825. begin
  27826. pTDefRegMap(@Self)^.clr := $00000004;
  27827. end;
  27828. procedure TI2C2A_I2C4CON.setPEN(thebits : TBits_1); inline;
  27829. begin
  27830. if thebits = 0 then
  27831. pTDefRegMap(@Self)^.clr := $00000004
  27832. else
  27833. pTDefRegMap(@Self)^.&set := $00000004;
  27834. end;
  27835. function TI2C2A_I2C4CON.getPEN : TBits_1; inline;
  27836. begin
  27837. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  27838. end;
  27839. procedure TI2C2A_I2C4CON.setRCEN; inline;
  27840. begin
  27841. pTDefRegMap(@Self)^.&set := $00000008;
  27842. end;
  27843. procedure TI2C2A_I2C4CON.clearRCEN; inline;
  27844. begin
  27845. pTDefRegMap(@Self)^.clr := $00000008;
  27846. end;
  27847. procedure TI2C2A_I2C4CON.setRCEN(thebits : TBits_1); inline;
  27848. begin
  27849. if thebits = 0 then
  27850. pTDefRegMap(@Self)^.clr := $00000008
  27851. else
  27852. pTDefRegMap(@Self)^.&set := $00000008;
  27853. end;
  27854. function TI2C2A_I2C4CON.getRCEN : TBits_1; inline;
  27855. begin
  27856. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  27857. end;
  27858. procedure TI2C2A_I2C4CON.setACKEN; inline;
  27859. begin
  27860. pTDefRegMap(@Self)^.&set := $00000010;
  27861. end;
  27862. procedure TI2C2A_I2C4CON.clearACKEN; inline;
  27863. begin
  27864. pTDefRegMap(@Self)^.clr := $00000010;
  27865. end;
  27866. procedure TI2C2A_I2C4CON.setACKEN(thebits : TBits_1); inline;
  27867. begin
  27868. if thebits = 0 then
  27869. pTDefRegMap(@Self)^.clr := $00000010
  27870. else
  27871. pTDefRegMap(@Self)^.&set := $00000010;
  27872. end;
  27873. function TI2C2A_I2C4CON.getACKEN : TBits_1; inline;
  27874. begin
  27875. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  27876. end;
  27877. procedure TI2C2A_I2C4CON.setACKDT; inline;
  27878. begin
  27879. pTDefRegMap(@Self)^.&set := $00000020;
  27880. end;
  27881. procedure TI2C2A_I2C4CON.clearACKDT; inline;
  27882. begin
  27883. pTDefRegMap(@Self)^.clr := $00000020;
  27884. end;
  27885. procedure TI2C2A_I2C4CON.setACKDT(thebits : TBits_1); inline;
  27886. begin
  27887. if thebits = 0 then
  27888. pTDefRegMap(@Self)^.clr := $00000020
  27889. else
  27890. pTDefRegMap(@Self)^.&set := $00000020;
  27891. end;
  27892. function TI2C2A_I2C4CON.getACKDT : TBits_1; inline;
  27893. begin
  27894. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  27895. end;
  27896. procedure TI2C2A_I2C4CON.setSTREN; inline;
  27897. begin
  27898. pTDefRegMap(@Self)^.&set := $00000040;
  27899. end;
  27900. procedure TI2C2A_I2C4CON.clearSTREN; inline;
  27901. begin
  27902. pTDefRegMap(@Self)^.clr := $00000040;
  27903. end;
  27904. procedure TI2C2A_I2C4CON.setSTREN(thebits : TBits_1); inline;
  27905. begin
  27906. if thebits = 0 then
  27907. pTDefRegMap(@Self)^.clr := $00000040
  27908. else
  27909. pTDefRegMap(@Self)^.&set := $00000040;
  27910. end;
  27911. function TI2C2A_I2C4CON.getSTREN : TBits_1; inline;
  27912. begin
  27913. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27914. end;
  27915. procedure TI2C2A_I2C4CON.setGCEN; inline;
  27916. begin
  27917. pTDefRegMap(@Self)^.&set := $00000080;
  27918. end;
  27919. procedure TI2C2A_I2C4CON.clearGCEN; inline;
  27920. begin
  27921. pTDefRegMap(@Self)^.clr := $00000080;
  27922. end;
  27923. procedure TI2C2A_I2C4CON.setGCEN(thebits : TBits_1); inline;
  27924. begin
  27925. if thebits = 0 then
  27926. pTDefRegMap(@Self)^.clr := $00000080
  27927. else
  27928. pTDefRegMap(@Self)^.&set := $00000080;
  27929. end;
  27930. function TI2C2A_I2C4CON.getGCEN : TBits_1; inline;
  27931. begin
  27932. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  27933. end;
  27934. procedure TI2C2A_I2C4CON.setSMEN; inline;
  27935. begin
  27936. pTDefRegMap(@Self)^.&set := $00000100;
  27937. end;
  27938. procedure TI2C2A_I2C4CON.clearSMEN; inline;
  27939. begin
  27940. pTDefRegMap(@Self)^.clr := $00000100;
  27941. end;
  27942. procedure TI2C2A_I2C4CON.setSMEN(thebits : TBits_1); inline;
  27943. begin
  27944. if thebits = 0 then
  27945. pTDefRegMap(@Self)^.clr := $00000100
  27946. else
  27947. pTDefRegMap(@Self)^.&set := $00000100;
  27948. end;
  27949. function TI2C2A_I2C4CON.getSMEN : TBits_1; inline;
  27950. begin
  27951. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  27952. end;
  27953. procedure TI2C2A_I2C4CON.setDISSLW; inline;
  27954. begin
  27955. pTDefRegMap(@Self)^.&set := $00000200;
  27956. end;
  27957. procedure TI2C2A_I2C4CON.clearDISSLW; inline;
  27958. begin
  27959. pTDefRegMap(@Self)^.clr := $00000200;
  27960. end;
  27961. procedure TI2C2A_I2C4CON.setDISSLW(thebits : TBits_1); inline;
  27962. begin
  27963. if thebits = 0 then
  27964. pTDefRegMap(@Self)^.clr := $00000200
  27965. else
  27966. pTDefRegMap(@Self)^.&set := $00000200;
  27967. end;
  27968. function TI2C2A_I2C4CON.getDISSLW : TBits_1; inline;
  27969. begin
  27970. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  27971. end;
  27972. procedure TI2C2A_I2C4CON.setA10M; inline;
  27973. begin
  27974. pTDefRegMap(@Self)^.&set := $00000400;
  27975. end;
  27976. procedure TI2C2A_I2C4CON.clearA10M; inline;
  27977. begin
  27978. pTDefRegMap(@Self)^.clr := $00000400;
  27979. end;
  27980. procedure TI2C2A_I2C4CON.setA10M(thebits : TBits_1); inline;
  27981. begin
  27982. if thebits = 0 then
  27983. pTDefRegMap(@Self)^.clr := $00000400
  27984. else
  27985. pTDefRegMap(@Self)^.&set := $00000400;
  27986. end;
  27987. function TI2C2A_I2C4CON.getA10M : TBits_1; inline;
  27988. begin
  27989. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  27990. end;
  27991. procedure TI2C2A_I2C4CON.setSTRICT; inline;
  27992. begin
  27993. pTDefRegMap(@Self)^.&set := $00000800;
  27994. end;
  27995. procedure TI2C2A_I2C4CON.clearSTRICT; inline;
  27996. begin
  27997. pTDefRegMap(@Self)^.clr := $00000800;
  27998. end;
  27999. procedure TI2C2A_I2C4CON.setSTRICT(thebits : TBits_1); inline;
  28000. begin
  28001. if thebits = 0 then
  28002. pTDefRegMap(@Self)^.clr := $00000800
  28003. else
  28004. pTDefRegMap(@Self)^.&set := $00000800;
  28005. end;
  28006. function TI2C2A_I2C4CON.getSTRICT : TBits_1; inline;
  28007. begin
  28008. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  28009. end;
  28010. procedure TI2C2A_I2C4CON.setSCLREL; inline;
  28011. begin
  28012. pTDefRegMap(@Self)^.&set := $00001000;
  28013. end;
  28014. procedure TI2C2A_I2C4CON.clearSCLREL; inline;
  28015. begin
  28016. pTDefRegMap(@Self)^.clr := $00001000;
  28017. end;
  28018. procedure TI2C2A_I2C4CON.setSCLREL(thebits : TBits_1); inline;
  28019. begin
  28020. if thebits = 0 then
  28021. pTDefRegMap(@Self)^.clr := $00001000
  28022. else
  28023. pTDefRegMap(@Self)^.&set := $00001000;
  28024. end;
  28025. function TI2C2A_I2C4CON.getSCLREL : TBits_1; inline;
  28026. begin
  28027. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  28028. end;
  28029. procedure TI2C2A_I2C4CON.setSIDL; inline;
  28030. begin
  28031. pTDefRegMap(@Self)^.&set := $00002000;
  28032. end;
  28033. procedure TI2C2A_I2C4CON.clearSIDL; inline;
  28034. begin
  28035. pTDefRegMap(@Self)^.clr := $00002000;
  28036. end;
  28037. procedure TI2C2A_I2C4CON.setSIDL(thebits : TBits_1); inline;
  28038. begin
  28039. if thebits = 0 then
  28040. pTDefRegMap(@Self)^.clr := $00002000
  28041. else
  28042. pTDefRegMap(@Self)^.&set := $00002000;
  28043. end;
  28044. function TI2C2A_I2C4CON.getSIDL : TBits_1; inline;
  28045. begin
  28046. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  28047. end;
  28048. procedure TI2C2A_I2C4CON.setON; inline;
  28049. begin
  28050. pTDefRegMap(@Self)^.&set := $00008000;
  28051. end;
  28052. procedure TI2C2A_I2C4CON.clearON; inline;
  28053. begin
  28054. pTDefRegMap(@Self)^.clr := $00008000;
  28055. end;
  28056. procedure TI2C2A_I2C4CON.setON(thebits : TBits_1); inline;
  28057. begin
  28058. if thebits = 0 then
  28059. pTDefRegMap(@Self)^.clr := $00008000
  28060. else
  28061. pTDefRegMap(@Self)^.&set := $00008000;
  28062. end;
  28063. function TI2C2A_I2C4CON.getON : TBits_1; inline;
  28064. begin
  28065. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28066. end;
  28067. procedure TI2C2A_I2C4CON.setIPMIEN; inline;
  28068. begin
  28069. pTDefRegMap(@Self)^.&set := $00000800;
  28070. end;
  28071. procedure TI2C2A_I2C4CON.clearIPMIEN; inline;
  28072. begin
  28073. pTDefRegMap(@Self)^.clr := $00000800;
  28074. end;
  28075. procedure TI2C2A_I2C4CON.setIPMIEN(thebits : TBits_1); inline;
  28076. begin
  28077. if thebits = 0 then
  28078. pTDefRegMap(@Self)^.clr := $00000800
  28079. else
  28080. pTDefRegMap(@Self)^.&set := $00000800;
  28081. end;
  28082. function TI2C2A_I2C4CON.getIPMIEN : TBits_1; inline;
  28083. begin
  28084. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  28085. end;
  28086. procedure TI2C2A_I2C4CON.setI2CSIDL; inline;
  28087. begin
  28088. pTDefRegMap(@Self)^.&set := $00002000;
  28089. end;
  28090. procedure TI2C2A_I2C4CON.clearI2CSIDL; inline;
  28091. begin
  28092. pTDefRegMap(@Self)^.clr := $00002000;
  28093. end;
  28094. procedure TI2C2A_I2C4CON.setI2CSIDL(thebits : TBits_1); inline;
  28095. begin
  28096. if thebits = 0 then
  28097. pTDefRegMap(@Self)^.clr := $00002000
  28098. else
  28099. pTDefRegMap(@Self)^.&set := $00002000;
  28100. end;
  28101. function TI2C2A_I2C4CON.getI2CSIDL : TBits_1; inline;
  28102. begin
  28103. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  28104. end;
  28105. procedure TI2C2A_I2C4CON.setI2CEN; inline;
  28106. begin
  28107. pTDefRegMap(@Self)^.&set := $00008000;
  28108. end;
  28109. procedure TI2C2A_I2C4CON.clearI2CEN; inline;
  28110. begin
  28111. pTDefRegMap(@Self)^.clr := $00008000;
  28112. end;
  28113. procedure TI2C2A_I2C4CON.setI2CEN(thebits : TBits_1); inline;
  28114. begin
  28115. if thebits = 0 then
  28116. pTDefRegMap(@Self)^.clr := $00008000
  28117. else
  28118. pTDefRegMap(@Self)^.&set := $00008000;
  28119. end;
  28120. function TI2C2A_I2C4CON.getI2CEN : TBits_1; inline;
  28121. begin
  28122. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28123. end;
  28124. procedure TI2C2A_I2C4CON.setw(thebits : TBits_32); inline;
  28125. begin
  28126. pTDefRegMap(@Self)^.val := thebits;
  28127. end;
  28128. function TI2C2A_I2C4CON.getw : TBits_32; inline;
  28129. begin
  28130. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  28131. end;
  28132. procedure TI2C2A_I2C2ASTAT.setTBF; inline;
  28133. begin
  28134. pTDefRegMap(@Self)^.&set := $00000001;
  28135. end;
  28136. procedure TI2C2A_I2C2ASTAT.clearTBF; inline;
  28137. begin
  28138. pTDefRegMap(@Self)^.clr := $00000001;
  28139. end;
  28140. procedure TI2C2A_I2C2ASTAT.setTBF(thebits : TBits_1); inline;
  28141. begin
  28142. if thebits = 0 then
  28143. pTDefRegMap(@Self)^.clr := $00000001
  28144. else
  28145. pTDefRegMap(@Self)^.&set := $00000001;
  28146. end;
  28147. function TI2C2A_I2C2ASTAT.getTBF : TBits_1; inline;
  28148. begin
  28149. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  28150. end;
  28151. procedure TI2C2A_I2C2ASTAT.setRBF; inline;
  28152. begin
  28153. pTDefRegMap(@Self)^.&set := $00000002;
  28154. end;
  28155. procedure TI2C2A_I2C2ASTAT.clearRBF; inline;
  28156. begin
  28157. pTDefRegMap(@Self)^.clr := $00000002;
  28158. end;
  28159. procedure TI2C2A_I2C2ASTAT.setRBF(thebits : TBits_1); inline;
  28160. begin
  28161. if thebits = 0 then
  28162. pTDefRegMap(@Self)^.clr := $00000002
  28163. else
  28164. pTDefRegMap(@Self)^.&set := $00000002;
  28165. end;
  28166. function TI2C2A_I2C2ASTAT.getRBF : TBits_1; inline;
  28167. begin
  28168. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  28169. end;
  28170. procedure TI2C2A_I2C2ASTAT.setR_W; inline;
  28171. begin
  28172. pTDefRegMap(@Self)^.&set := $00000004;
  28173. end;
  28174. procedure TI2C2A_I2C2ASTAT.clearR_W; inline;
  28175. begin
  28176. pTDefRegMap(@Self)^.clr := $00000004;
  28177. end;
  28178. procedure TI2C2A_I2C2ASTAT.setR_W(thebits : TBits_1); inline;
  28179. begin
  28180. if thebits = 0 then
  28181. pTDefRegMap(@Self)^.clr := $00000004
  28182. else
  28183. pTDefRegMap(@Self)^.&set := $00000004;
  28184. end;
  28185. function TI2C2A_I2C2ASTAT.getR_W : TBits_1; inline;
  28186. begin
  28187. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  28188. end;
  28189. procedure TI2C2A_I2C2ASTAT.setS; inline;
  28190. begin
  28191. pTDefRegMap(@Self)^.&set := $00000008;
  28192. end;
  28193. procedure TI2C2A_I2C2ASTAT.clearS; inline;
  28194. begin
  28195. pTDefRegMap(@Self)^.clr := $00000008;
  28196. end;
  28197. procedure TI2C2A_I2C2ASTAT.setS(thebits : TBits_1); inline;
  28198. begin
  28199. if thebits = 0 then
  28200. pTDefRegMap(@Self)^.clr := $00000008
  28201. else
  28202. pTDefRegMap(@Self)^.&set := $00000008;
  28203. end;
  28204. function TI2C2A_I2C2ASTAT.getS : TBits_1; inline;
  28205. begin
  28206. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  28207. end;
  28208. procedure TI2C2A_I2C2ASTAT.setP; inline;
  28209. begin
  28210. pTDefRegMap(@Self)^.&set := $00000010;
  28211. end;
  28212. procedure TI2C2A_I2C2ASTAT.clearP; inline;
  28213. begin
  28214. pTDefRegMap(@Self)^.clr := $00000010;
  28215. end;
  28216. procedure TI2C2A_I2C2ASTAT.setP(thebits : TBits_1); inline;
  28217. begin
  28218. if thebits = 0 then
  28219. pTDefRegMap(@Self)^.clr := $00000010
  28220. else
  28221. pTDefRegMap(@Self)^.&set := $00000010;
  28222. end;
  28223. function TI2C2A_I2C2ASTAT.getP : TBits_1; inline;
  28224. begin
  28225. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  28226. end;
  28227. procedure TI2C2A_I2C2ASTAT.setD_A; inline;
  28228. begin
  28229. pTDefRegMap(@Self)^.&set := $00000020;
  28230. end;
  28231. procedure TI2C2A_I2C2ASTAT.clearD_A; inline;
  28232. begin
  28233. pTDefRegMap(@Self)^.clr := $00000020;
  28234. end;
  28235. procedure TI2C2A_I2C2ASTAT.setD_A(thebits : TBits_1); inline;
  28236. begin
  28237. if thebits = 0 then
  28238. pTDefRegMap(@Self)^.clr := $00000020
  28239. else
  28240. pTDefRegMap(@Self)^.&set := $00000020;
  28241. end;
  28242. function TI2C2A_I2C2ASTAT.getD_A : TBits_1; inline;
  28243. begin
  28244. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  28245. end;
  28246. procedure TI2C2A_I2C2ASTAT.setI2COV; inline;
  28247. begin
  28248. pTDefRegMap(@Self)^.&set := $00000040;
  28249. end;
  28250. procedure TI2C2A_I2C2ASTAT.clearI2COV; inline;
  28251. begin
  28252. pTDefRegMap(@Self)^.clr := $00000040;
  28253. end;
  28254. procedure TI2C2A_I2C2ASTAT.setI2COV(thebits : TBits_1); inline;
  28255. begin
  28256. if thebits = 0 then
  28257. pTDefRegMap(@Self)^.clr := $00000040
  28258. else
  28259. pTDefRegMap(@Self)^.&set := $00000040;
  28260. end;
  28261. function TI2C2A_I2C2ASTAT.getI2COV : TBits_1; inline;
  28262. begin
  28263. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28264. end;
  28265. procedure TI2C2A_I2C2ASTAT.setIWCOL; inline;
  28266. begin
  28267. pTDefRegMap(@Self)^.&set := $00000080;
  28268. end;
  28269. procedure TI2C2A_I2C2ASTAT.clearIWCOL; inline;
  28270. begin
  28271. pTDefRegMap(@Self)^.clr := $00000080;
  28272. end;
  28273. procedure TI2C2A_I2C2ASTAT.setIWCOL(thebits : TBits_1); inline;
  28274. begin
  28275. if thebits = 0 then
  28276. pTDefRegMap(@Self)^.clr := $00000080
  28277. else
  28278. pTDefRegMap(@Self)^.&set := $00000080;
  28279. end;
  28280. function TI2C2A_I2C2ASTAT.getIWCOL : TBits_1; inline;
  28281. begin
  28282. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  28283. end;
  28284. procedure TI2C2A_I2C2ASTAT.setADD10; inline;
  28285. begin
  28286. pTDefRegMap(@Self)^.&set := $00000100;
  28287. end;
  28288. procedure TI2C2A_I2C2ASTAT.clearADD10; inline;
  28289. begin
  28290. pTDefRegMap(@Self)^.clr := $00000100;
  28291. end;
  28292. procedure TI2C2A_I2C2ASTAT.setADD10(thebits : TBits_1); inline;
  28293. begin
  28294. if thebits = 0 then
  28295. pTDefRegMap(@Self)^.clr := $00000100
  28296. else
  28297. pTDefRegMap(@Self)^.&set := $00000100;
  28298. end;
  28299. function TI2C2A_I2C2ASTAT.getADD10 : TBits_1; inline;
  28300. begin
  28301. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  28302. end;
  28303. procedure TI2C2A_I2C2ASTAT.setGCSTAT; inline;
  28304. begin
  28305. pTDefRegMap(@Self)^.&set := $00000200;
  28306. end;
  28307. procedure TI2C2A_I2C2ASTAT.clearGCSTAT; inline;
  28308. begin
  28309. pTDefRegMap(@Self)^.clr := $00000200;
  28310. end;
  28311. procedure TI2C2A_I2C2ASTAT.setGCSTAT(thebits : TBits_1); inline;
  28312. begin
  28313. if thebits = 0 then
  28314. pTDefRegMap(@Self)^.clr := $00000200
  28315. else
  28316. pTDefRegMap(@Self)^.&set := $00000200;
  28317. end;
  28318. function TI2C2A_I2C2ASTAT.getGCSTAT : TBits_1; inline;
  28319. begin
  28320. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  28321. end;
  28322. procedure TI2C2A_I2C2ASTAT.setBCL; inline;
  28323. begin
  28324. pTDefRegMap(@Self)^.&set := $00000400;
  28325. end;
  28326. procedure TI2C2A_I2C2ASTAT.clearBCL; inline;
  28327. begin
  28328. pTDefRegMap(@Self)^.clr := $00000400;
  28329. end;
  28330. procedure TI2C2A_I2C2ASTAT.setBCL(thebits : TBits_1); inline;
  28331. begin
  28332. if thebits = 0 then
  28333. pTDefRegMap(@Self)^.clr := $00000400
  28334. else
  28335. pTDefRegMap(@Self)^.&set := $00000400;
  28336. end;
  28337. function TI2C2A_I2C2ASTAT.getBCL : TBits_1; inline;
  28338. begin
  28339. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  28340. end;
  28341. procedure TI2C2A_I2C2ASTAT.setTRSTAT; inline;
  28342. begin
  28343. pTDefRegMap(@Self)^.&set := $00004000;
  28344. end;
  28345. procedure TI2C2A_I2C2ASTAT.clearTRSTAT; inline;
  28346. begin
  28347. pTDefRegMap(@Self)^.clr := $00004000;
  28348. end;
  28349. procedure TI2C2A_I2C2ASTAT.setTRSTAT(thebits : TBits_1); inline;
  28350. begin
  28351. if thebits = 0 then
  28352. pTDefRegMap(@Self)^.clr := $00004000
  28353. else
  28354. pTDefRegMap(@Self)^.&set := $00004000;
  28355. end;
  28356. function TI2C2A_I2C2ASTAT.getTRSTAT : TBits_1; inline;
  28357. begin
  28358. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  28359. end;
  28360. procedure TI2C2A_I2C2ASTAT.setACKSTAT; inline;
  28361. begin
  28362. pTDefRegMap(@Self)^.&set := $00008000;
  28363. end;
  28364. procedure TI2C2A_I2C2ASTAT.clearACKSTAT; inline;
  28365. begin
  28366. pTDefRegMap(@Self)^.clr := $00008000;
  28367. end;
  28368. procedure TI2C2A_I2C2ASTAT.setACKSTAT(thebits : TBits_1); inline;
  28369. begin
  28370. if thebits = 0 then
  28371. pTDefRegMap(@Self)^.clr := $00008000
  28372. else
  28373. pTDefRegMap(@Self)^.&set := $00008000;
  28374. end;
  28375. function TI2C2A_I2C2ASTAT.getACKSTAT : TBits_1; inline;
  28376. begin
  28377. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28378. end;
  28379. procedure TI2C2A_I2C2ASTAT.setI2CPOV; inline;
  28380. begin
  28381. pTDefRegMap(@Self)^.&set := $00000040;
  28382. end;
  28383. procedure TI2C2A_I2C2ASTAT.clearI2CPOV; inline;
  28384. begin
  28385. pTDefRegMap(@Self)^.clr := $00000040;
  28386. end;
  28387. procedure TI2C2A_I2C2ASTAT.setI2CPOV(thebits : TBits_1); inline;
  28388. begin
  28389. if thebits = 0 then
  28390. pTDefRegMap(@Self)^.clr := $00000040
  28391. else
  28392. pTDefRegMap(@Self)^.&set := $00000040;
  28393. end;
  28394. function TI2C2A_I2C2ASTAT.getI2CPOV : TBits_1; inline;
  28395. begin
  28396. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28397. end;
  28398. procedure TI2C2A_I2C2ASTAT.setw(thebits : TBits_32); inline;
  28399. begin
  28400. pTDefRegMap(@Self)^.val := thebits;
  28401. end;
  28402. function TI2C2A_I2C2ASTAT.getw : TBits_32; inline;
  28403. begin
  28404. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  28405. end;
  28406. procedure TI2C2A_I2C4STAT.setTBF; inline;
  28407. begin
  28408. pTDefRegMap(@Self)^.&set := $00000001;
  28409. end;
  28410. procedure TI2C2A_I2C4STAT.clearTBF; inline;
  28411. begin
  28412. pTDefRegMap(@Self)^.clr := $00000001;
  28413. end;
  28414. procedure TI2C2A_I2C4STAT.setTBF(thebits : TBits_1); inline;
  28415. begin
  28416. if thebits = 0 then
  28417. pTDefRegMap(@Self)^.clr := $00000001
  28418. else
  28419. pTDefRegMap(@Self)^.&set := $00000001;
  28420. end;
  28421. function TI2C2A_I2C4STAT.getTBF : TBits_1; inline;
  28422. begin
  28423. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  28424. end;
  28425. procedure TI2C2A_I2C4STAT.setRBF; inline;
  28426. begin
  28427. pTDefRegMap(@Self)^.&set := $00000002;
  28428. end;
  28429. procedure TI2C2A_I2C4STAT.clearRBF; inline;
  28430. begin
  28431. pTDefRegMap(@Self)^.clr := $00000002;
  28432. end;
  28433. procedure TI2C2A_I2C4STAT.setRBF(thebits : TBits_1); inline;
  28434. begin
  28435. if thebits = 0 then
  28436. pTDefRegMap(@Self)^.clr := $00000002
  28437. else
  28438. pTDefRegMap(@Self)^.&set := $00000002;
  28439. end;
  28440. function TI2C2A_I2C4STAT.getRBF : TBits_1; inline;
  28441. begin
  28442. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  28443. end;
  28444. procedure TI2C2A_I2C4STAT.setR_W; inline;
  28445. begin
  28446. pTDefRegMap(@Self)^.&set := $00000004;
  28447. end;
  28448. procedure TI2C2A_I2C4STAT.clearR_W; inline;
  28449. begin
  28450. pTDefRegMap(@Self)^.clr := $00000004;
  28451. end;
  28452. procedure TI2C2A_I2C4STAT.setR_W(thebits : TBits_1); inline;
  28453. begin
  28454. if thebits = 0 then
  28455. pTDefRegMap(@Self)^.clr := $00000004
  28456. else
  28457. pTDefRegMap(@Self)^.&set := $00000004;
  28458. end;
  28459. function TI2C2A_I2C4STAT.getR_W : TBits_1; inline;
  28460. begin
  28461. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  28462. end;
  28463. procedure TI2C2A_I2C4STAT.setS; inline;
  28464. begin
  28465. pTDefRegMap(@Self)^.&set := $00000008;
  28466. end;
  28467. procedure TI2C2A_I2C4STAT.clearS; inline;
  28468. begin
  28469. pTDefRegMap(@Self)^.clr := $00000008;
  28470. end;
  28471. procedure TI2C2A_I2C4STAT.setS(thebits : TBits_1); inline;
  28472. begin
  28473. if thebits = 0 then
  28474. pTDefRegMap(@Self)^.clr := $00000008
  28475. else
  28476. pTDefRegMap(@Self)^.&set := $00000008;
  28477. end;
  28478. function TI2C2A_I2C4STAT.getS : TBits_1; inline;
  28479. begin
  28480. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  28481. end;
  28482. procedure TI2C2A_I2C4STAT.setP; inline;
  28483. begin
  28484. pTDefRegMap(@Self)^.&set := $00000010;
  28485. end;
  28486. procedure TI2C2A_I2C4STAT.clearP; inline;
  28487. begin
  28488. pTDefRegMap(@Self)^.clr := $00000010;
  28489. end;
  28490. procedure TI2C2A_I2C4STAT.setP(thebits : TBits_1); inline;
  28491. begin
  28492. if thebits = 0 then
  28493. pTDefRegMap(@Self)^.clr := $00000010
  28494. else
  28495. pTDefRegMap(@Self)^.&set := $00000010;
  28496. end;
  28497. function TI2C2A_I2C4STAT.getP : TBits_1; inline;
  28498. begin
  28499. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  28500. end;
  28501. procedure TI2C2A_I2C4STAT.setD_A; inline;
  28502. begin
  28503. pTDefRegMap(@Self)^.&set := $00000020;
  28504. end;
  28505. procedure TI2C2A_I2C4STAT.clearD_A; inline;
  28506. begin
  28507. pTDefRegMap(@Self)^.clr := $00000020;
  28508. end;
  28509. procedure TI2C2A_I2C4STAT.setD_A(thebits : TBits_1); inline;
  28510. begin
  28511. if thebits = 0 then
  28512. pTDefRegMap(@Self)^.clr := $00000020
  28513. else
  28514. pTDefRegMap(@Self)^.&set := $00000020;
  28515. end;
  28516. function TI2C2A_I2C4STAT.getD_A : TBits_1; inline;
  28517. begin
  28518. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  28519. end;
  28520. procedure TI2C2A_I2C4STAT.setI2COV; inline;
  28521. begin
  28522. pTDefRegMap(@Self)^.&set := $00000040;
  28523. end;
  28524. procedure TI2C2A_I2C4STAT.clearI2COV; inline;
  28525. begin
  28526. pTDefRegMap(@Self)^.clr := $00000040;
  28527. end;
  28528. procedure TI2C2A_I2C4STAT.setI2COV(thebits : TBits_1); inline;
  28529. begin
  28530. if thebits = 0 then
  28531. pTDefRegMap(@Self)^.clr := $00000040
  28532. else
  28533. pTDefRegMap(@Self)^.&set := $00000040;
  28534. end;
  28535. function TI2C2A_I2C4STAT.getI2COV : TBits_1; inline;
  28536. begin
  28537. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28538. end;
  28539. procedure TI2C2A_I2C4STAT.setIWCOL; inline;
  28540. begin
  28541. pTDefRegMap(@Self)^.&set := $00000080;
  28542. end;
  28543. procedure TI2C2A_I2C4STAT.clearIWCOL; inline;
  28544. begin
  28545. pTDefRegMap(@Self)^.clr := $00000080;
  28546. end;
  28547. procedure TI2C2A_I2C4STAT.setIWCOL(thebits : TBits_1); inline;
  28548. begin
  28549. if thebits = 0 then
  28550. pTDefRegMap(@Self)^.clr := $00000080
  28551. else
  28552. pTDefRegMap(@Self)^.&set := $00000080;
  28553. end;
  28554. function TI2C2A_I2C4STAT.getIWCOL : TBits_1; inline;
  28555. begin
  28556. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  28557. end;
  28558. procedure TI2C2A_I2C4STAT.setADD10; inline;
  28559. begin
  28560. pTDefRegMap(@Self)^.&set := $00000100;
  28561. end;
  28562. procedure TI2C2A_I2C4STAT.clearADD10; inline;
  28563. begin
  28564. pTDefRegMap(@Self)^.clr := $00000100;
  28565. end;
  28566. procedure TI2C2A_I2C4STAT.setADD10(thebits : TBits_1); inline;
  28567. begin
  28568. if thebits = 0 then
  28569. pTDefRegMap(@Self)^.clr := $00000100
  28570. else
  28571. pTDefRegMap(@Self)^.&set := $00000100;
  28572. end;
  28573. function TI2C2A_I2C4STAT.getADD10 : TBits_1; inline;
  28574. begin
  28575. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  28576. end;
  28577. procedure TI2C2A_I2C4STAT.setGCSTAT; inline;
  28578. begin
  28579. pTDefRegMap(@Self)^.&set := $00000200;
  28580. end;
  28581. procedure TI2C2A_I2C4STAT.clearGCSTAT; inline;
  28582. begin
  28583. pTDefRegMap(@Self)^.clr := $00000200;
  28584. end;
  28585. procedure TI2C2A_I2C4STAT.setGCSTAT(thebits : TBits_1); inline;
  28586. begin
  28587. if thebits = 0 then
  28588. pTDefRegMap(@Self)^.clr := $00000200
  28589. else
  28590. pTDefRegMap(@Self)^.&set := $00000200;
  28591. end;
  28592. function TI2C2A_I2C4STAT.getGCSTAT : TBits_1; inline;
  28593. begin
  28594. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  28595. end;
  28596. procedure TI2C2A_I2C4STAT.setBCL; inline;
  28597. begin
  28598. pTDefRegMap(@Self)^.&set := $00000400;
  28599. end;
  28600. procedure TI2C2A_I2C4STAT.clearBCL; inline;
  28601. begin
  28602. pTDefRegMap(@Self)^.clr := $00000400;
  28603. end;
  28604. procedure TI2C2A_I2C4STAT.setBCL(thebits : TBits_1); inline;
  28605. begin
  28606. if thebits = 0 then
  28607. pTDefRegMap(@Self)^.clr := $00000400
  28608. else
  28609. pTDefRegMap(@Self)^.&set := $00000400;
  28610. end;
  28611. function TI2C2A_I2C4STAT.getBCL : TBits_1; inline;
  28612. begin
  28613. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  28614. end;
  28615. procedure TI2C2A_I2C4STAT.setTRSTAT; inline;
  28616. begin
  28617. pTDefRegMap(@Self)^.&set := $00004000;
  28618. end;
  28619. procedure TI2C2A_I2C4STAT.clearTRSTAT; inline;
  28620. begin
  28621. pTDefRegMap(@Self)^.clr := $00004000;
  28622. end;
  28623. procedure TI2C2A_I2C4STAT.setTRSTAT(thebits : TBits_1); inline;
  28624. begin
  28625. if thebits = 0 then
  28626. pTDefRegMap(@Self)^.clr := $00004000
  28627. else
  28628. pTDefRegMap(@Self)^.&set := $00004000;
  28629. end;
  28630. function TI2C2A_I2C4STAT.getTRSTAT : TBits_1; inline;
  28631. begin
  28632. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  28633. end;
  28634. procedure TI2C2A_I2C4STAT.setACKSTAT; inline;
  28635. begin
  28636. pTDefRegMap(@Self)^.&set := $00008000;
  28637. end;
  28638. procedure TI2C2A_I2C4STAT.clearACKSTAT; inline;
  28639. begin
  28640. pTDefRegMap(@Self)^.clr := $00008000;
  28641. end;
  28642. procedure TI2C2A_I2C4STAT.setACKSTAT(thebits : TBits_1); inline;
  28643. begin
  28644. if thebits = 0 then
  28645. pTDefRegMap(@Self)^.clr := $00008000
  28646. else
  28647. pTDefRegMap(@Self)^.&set := $00008000;
  28648. end;
  28649. function TI2C2A_I2C4STAT.getACKSTAT : TBits_1; inline;
  28650. begin
  28651. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28652. end;
  28653. procedure TI2C2A_I2C4STAT.setI2CPOV; inline;
  28654. begin
  28655. pTDefRegMap(@Self)^.&set := $00000040;
  28656. end;
  28657. procedure TI2C2A_I2C4STAT.clearI2CPOV; inline;
  28658. begin
  28659. pTDefRegMap(@Self)^.clr := $00000040;
  28660. end;
  28661. procedure TI2C2A_I2C4STAT.setI2CPOV(thebits : TBits_1); inline;
  28662. begin
  28663. if thebits = 0 then
  28664. pTDefRegMap(@Self)^.clr := $00000040
  28665. else
  28666. pTDefRegMap(@Self)^.&set := $00000040;
  28667. end;
  28668. function TI2C2A_I2C4STAT.getI2CPOV : TBits_1; inline;
  28669. begin
  28670. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28671. end;
  28672. procedure TI2C2A_I2C4STAT.setw(thebits : TBits_32); inline;
  28673. begin
  28674. pTDefRegMap(@Self)^.val := thebits;
  28675. end;
  28676. function TI2C2A_I2C4STAT.getw : TBits_32; inline;
  28677. begin
  28678. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  28679. end;
  28680. procedure TI2C5_I2C3ACON.setSEN; inline;
  28681. begin
  28682. pTDefRegMap(@Self)^.&set := $00000001;
  28683. end;
  28684. procedure TI2C5_I2C3ACON.clearSEN; inline;
  28685. begin
  28686. pTDefRegMap(@Self)^.clr := $00000001;
  28687. end;
  28688. procedure TI2C5_I2C3ACON.setSEN(thebits : TBits_1); inline;
  28689. begin
  28690. if thebits = 0 then
  28691. pTDefRegMap(@Self)^.clr := $00000001
  28692. else
  28693. pTDefRegMap(@Self)^.&set := $00000001;
  28694. end;
  28695. function TI2C5_I2C3ACON.getSEN : TBits_1; inline;
  28696. begin
  28697. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  28698. end;
  28699. procedure TI2C5_I2C3ACON.setRSEN; inline;
  28700. begin
  28701. pTDefRegMap(@Self)^.&set := $00000002;
  28702. end;
  28703. procedure TI2C5_I2C3ACON.clearRSEN; inline;
  28704. begin
  28705. pTDefRegMap(@Self)^.clr := $00000002;
  28706. end;
  28707. procedure TI2C5_I2C3ACON.setRSEN(thebits : TBits_1); inline;
  28708. begin
  28709. if thebits = 0 then
  28710. pTDefRegMap(@Self)^.clr := $00000002
  28711. else
  28712. pTDefRegMap(@Self)^.&set := $00000002;
  28713. end;
  28714. function TI2C5_I2C3ACON.getRSEN : TBits_1; inline;
  28715. begin
  28716. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  28717. end;
  28718. procedure TI2C5_I2C3ACON.setPEN; inline;
  28719. begin
  28720. pTDefRegMap(@Self)^.&set := $00000004;
  28721. end;
  28722. procedure TI2C5_I2C3ACON.clearPEN; inline;
  28723. begin
  28724. pTDefRegMap(@Self)^.clr := $00000004;
  28725. end;
  28726. procedure TI2C5_I2C3ACON.setPEN(thebits : TBits_1); inline;
  28727. begin
  28728. if thebits = 0 then
  28729. pTDefRegMap(@Self)^.clr := $00000004
  28730. else
  28731. pTDefRegMap(@Self)^.&set := $00000004;
  28732. end;
  28733. function TI2C5_I2C3ACON.getPEN : TBits_1; inline;
  28734. begin
  28735. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  28736. end;
  28737. procedure TI2C5_I2C3ACON.setRCEN; inline;
  28738. begin
  28739. pTDefRegMap(@Self)^.&set := $00000008;
  28740. end;
  28741. procedure TI2C5_I2C3ACON.clearRCEN; inline;
  28742. begin
  28743. pTDefRegMap(@Self)^.clr := $00000008;
  28744. end;
  28745. procedure TI2C5_I2C3ACON.setRCEN(thebits : TBits_1); inline;
  28746. begin
  28747. if thebits = 0 then
  28748. pTDefRegMap(@Self)^.clr := $00000008
  28749. else
  28750. pTDefRegMap(@Self)^.&set := $00000008;
  28751. end;
  28752. function TI2C5_I2C3ACON.getRCEN : TBits_1; inline;
  28753. begin
  28754. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  28755. end;
  28756. procedure TI2C5_I2C3ACON.setACKEN; inline;
  28757. begin
  28758. pTDefRegMap(@Self)^.&set := $00000010;
  28759. end;
  28760. procedure TI2C5_I2C3ACON.clearACKEN; inline;
  28761. begin
  28762. pTDefRegMap(@Self)^.clr := $00000010;
  28763. end;
  28764. procedure TI2C5_I2C3ACON.setACKEN(thebits : TBits_1); inline;
  28765. begin
  28766. if thebits = 0 then
  28767. pTDefRegMap(@Self)^.clr := $00000010
  28768. else
  28769. pTDefRegMap(@Self)^.&set := $00000010;
  28770. end;
  28771. function TI2C5_I2C3ACON.getACKEN : TBits_1; inline;
  28772. begin
  28773. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  28774. end;
  28775. procedure TI2C5_I2C3ACON.setACKDT; inline;
  28776. begin
  28777. pTDefRegMap(@Self)^.&set := $00000020;
  28778. end;
  28779. procedure TI2C5_I2C3ACON.clearACKDT; inline;
  28780. begin
  28781. pTDefRegMap(@Self)^.clr := $00000020;
  28782. end;
  28783. procedure TI2C5_I2C3ACON.setACKDT(thebits : TBits_1); inline;
  28784. begin
  28785. if thebits = 0 then
  28786. pTDefRegMap(@Self)^.clr := $00000020
  28787. else
  28788. pTDefRegMap(@Self)^.&set := $00000020;
  28789. end;
  28790. function TI2C5_I2C3ACON.getACKDT : TBits_1; inline;
  28791. begin
  28792. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  28793. end;
  28794. procedure TI2C5_I2C3ACON.setSTREN; inline;
  28795. begin
  28796. pTDefRegMap(@Self)^.&set := $00000040;
  28797. end;
  28798. procedure TI2C5_I2C3ACON.clearSTREN; inline;
  28799. begin
  28800. pTDefRegMap(@Self)^.clr := $00000040;
  28801. end;
  28802. procedure TI2C5_I2C3ACON.setSTREN(thebits : TBits_1); inline;
  28803. begin
  28804. if thebits = 0 then
  28805. pTDefRegMap(@Self)^.clr := $00000040
  28806. else
  28807. pTDefRegMap(@Self)^.&set := $00000040;
  28808. end;
  28809. function TI2C5_I2C3ACON.getSTREN : TBits_1; inline;
  28810. begin
  28811. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28812. end;
  28813. procedure TI2C5_I2C3ACON.setGCEN; inline;
  28814. begin
  28815. pTDefRegMap(@Self)^.&set := $00000080;
  28816. end;
  28817. procedure TI2C5_I2C3ACON.clearGCEN; inline;
  28818. begin
  28819. pTDefRegMap(@Self)^.clr := $00000080;
  28820. end;
  28821. procedure TI2C5_I2C3ACON.setGCEN(thebits : TBits_1); inline;
  28822. begin
  28823. if thebits = 0 then
  28824. pTDefRegMap(@Self)^.clr := $00000080
  28825. else
  28826. pTDefRegMap(@Self)^.&set := $00000080;
  28827. end;
  28828. function TI2C5_I2C3ACON.getGCEN : TBits_1; inline;
  28829. begin
  28830. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  28831. end;
  28832. procedure TI2C5_I2C3ACON.setSMEN; inline;
  28833. begin
  28834. pTDefRegMap(@Self)^.&set := $00000100;
  28835. end;
  28836. procedure TI2C5_I2C3ACON.clearSMEN; inline;
  28837. begin
  28838. pTDefRegMap(@Self)^.clr := $00000100;
  28839. end;
  28840. procedure TI2C5_I2C3ACON.setSMEN(thebits : TBits_1); inline;
  28841. begin
  28842. if thebits = 0 then
  28843. pTDefRegMap(@Self)^.clr := $00000100
  28844. else
  28845. pTDefRegMap(@Self)^.&set := $00000100;
  28846. end;
  28847. function TI2C5_I2C3ACON.getSMEN : TBits_1; inline;
  28848. begin
  28849. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  28850. end;
  28851. procedure TI2C5_I2C3ACON.setDISSLW; inline;
  28852. begin
  28853. pTDefRegMap(@Self)^.&set := $00000200;
  28854. end;
  28855. procedure TI2C5_I2C3ACON.clearDISSLW; inline;
  28856. begin
  28857. pTDefRegMap(@Self)^.clr := $00000200;
  28858. end;
  28859. procedure TI2C5_I2C3ACON.setDISSLW(thebits : TBits_1); inline;
  28860. begin
  28861. if thebits = 0 then
  28862. pTDefRegMap(@Self)^.clr := $00000200
  28863. else
  28864. pTDefRegMap(@Self)^.&set := $00000200;
  28865. end;
  28866. function TI2C5_I2C3ACON.getDISSLW : TBits_1; inline;
  28867. begin
  28868. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  28869. end;
  28870. procedure TI2C5_I2C3ACON.setA10M; inline;
  28871. begin
  28872. pTDefRegMap(@Self)^.&set := $00000400;
  28873. end;
  28874. procedure TI2C5_I2C3ACON.clearA10M; inline;
  28875. begin
  28876. pTDefRegMap(@Self)^.clr := $00000400;
  28877. end;
  28878. procedure TI2C5_I2C3ACON.setA10M(thebits : TBits_1); inline;
  28879. begin
  28880. if thebits = 0 then
  28881. pTDefRegMap(@Self)^.clr := $00000400
  28882. else
  28883. pTDefRegMap(@Self)^.&set := $00000400;
  28884. end;
  28885. function TI2C5_I2C3ACON.getA10M : TBits_1; inline;
  28886. begin
  28887. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  28888. end;
  28889. procedure TI2C5_I2C3ACON.setSTRICT; inline;
  28890. begin
  28891. pTDefRegMap(@Self)^.&set := $00000800;
  28892. end;
  28893. procedure TI2C5_I2C3ACON.clearSTRICT; inline;
  28894. begin
  28895. pTDefRegMap(@Self)^.clr := $00000800;
  28896. end;
  28897. procedure TI2C5_I2C3ACON.setSTRICT(thebits : TBits_1); inline;
  28898. begin
  28899. if thebits = 0 then
  28900. pTDefRegMap(@Self)^.clr := $00000800
  28901. else
  28902. pTDefRegMap(@Self)^.&set := $00000800;
  28903. end;
  28904. function TI2C5_I2C3ACON.getSTRICT : TBits_1; inline;
  28905. begin
  28906. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  28907. end;
  28908. procedure TI2C5_I2C3ACON.setSCLREL; inline;
  28909. begin
  28910. pTDefRegMap(@Self)^.&set := $00001000;
  28911. end;
  28912. procedure TI2C5_I2C3ACON.clearSCLREL; inline;
  28913. begin
  28914. pTDefRegMap(@Self)^.clr := $00001000;
  28915. end;
  28916. procedure TI2C5_I2C3ACON.setSCLREL(thebits : TBits_1); inline;
  28917. begin
  28918. if thebits = 0 then
  28919. pTDefRegMap(@Self)^.clr := $00001000
  28920. else
  28921. pTDefRegMap(@Self)^.&set := $00001000;
  28922. end;
  28923. function TI2C5_I2C3ACON.getSCLREL : TBits_1; inline;
  28924. begin
  28925. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  28926. end;
  28927. procedure TI2C5_I2C3ACON.setSIDL; inline;
  28928. begin
  28929. pTDefRegMap(@Self)^.&set := $00002000;
  28930. end;
  28931. procedure TI2C5_I2C3ACON.clearSIDL; inline;
  28932. begin
  28933. pTDefRegMap(@Self)^.clr := $00002000;
  28934. end;
  28935. procedure TI2C5_I2C3ACON.setSIDL(thebits : TBits_1); inline;
  28936. begin
  28937. if thebits = 0 then
  28938. pTDefRegMap(@Self)^.clr := $00002000
  28939. else
  28940. pTDefRegMap(@Self)^.&set := $00002000;
  28941. end;
  28942. function TI2C5_I2C3ACON.getSIDL : TBits_1; inline;
  28943. begin
  28944. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  28945. end;
  28946. procedure TI2C5_I2C3ACON.setON; inline;
  28947. begin
  28948. pTDefRegMap(@Self)^.&set := $00008000;
  28949. end;
  28950. procedure TI2C5_I2C3ACON.clearON; inline;
  28951. begin
  28952. pTDefRegMap(@Self)^.clr := $00008000;
  28953. end;
  28954. procedure TI2C5_I2C3ACON.setON(thebits : TBits_1); inline;
  28955. begin
  28956. if thebits = 0 then
  28957. pTDefRegMap(@Self)^.clr := $00008000
  28958. else
  28959. pTDefRegMap(@Self)^.&set := $00008000;
  28960. end;
  28961. function TI2C5_I2C3ACON.getON : TBits_1; inline;
  28962. begin
  28963. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28964. end;
  28965. procedure TI2C5_I2C3ACON.setIPMIEN; inline;
  28966. begin
  28967. pTDefRegMap(@Self)^.&set := $00000800;
  28968. end;
  28969. procedure TI2C5_I2C3ACON.clearIPMIEN; inline;
  28970. begin
  28971. pTDefRegMap(@Self)^.clr := $00000800;
  28972. end;
  28973. procedure TI2C5_I2C3ACON.setIPMIEN(thebits : TBits_1); inline;
  28974. begin
  28975. if thebits = 0 then
  28976. pTDefRegMap(@Self)^.clr := $00000800
  28977. else
  28978. pTDefRegMap(@Self)^.&set := $00000800;
  28979. end;
  28980. function TI2C5_I2C3ACON.getIPMIEN : TBits_1; inline;
  28981. begin
  28982. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  28983. end;
  28984. procedure TI2C5_I2C3ACON.setI2CSIDL; inline;
  28985. begin
  28986. pTDefRegMap(@Self)^.&set := $00002000;
  28987. end;
  28988. procedure TI2C5_I2C3ACON.clearI2CSIDL; inline;
  28989. begin
  28990. pTDefRegMap(@Self)^.clr := $00002000;
  28991. end;
  28992. procedure TI2C5_I2C3ACON.setI2CSIDL(thebits : TBits_1); inline;
  28993. begin
  28994. if thebits = 0 then
  28995. pTDefRegMap(@Self)^.clr := $00002000
  28996. else
  28997. pTDefRegMap(@Self)^.&set := $00002000;
  28998. end;
  28999. function TI2C5_I2C3ACON.getI2CSIDL : TBits_1; inline;
  29000. begin
  29001. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  29002. end;
  29003. procedure TI2C5_I2C3ACON.setI2CEN; inline;
  29004. begin
  29005. pTDefRegMap(@Self)^.&set := $00008000;
  29006. end;
  29007. procedure TI2C5_I2C3ACON.clearI2CEN; inline;
  29008. begin
  29009. pTDefRegMap(@Self)^.clr := $00008000;
  29010. end;
  29011. procedure TI2C5_I2C3ACON.setI2CEN(thebits : TBits_1); inline;
  29012. begin
  29013. if thebits = 0 then
  29014. pTDefRegMap(@Self)^.clr := $00008000
  29015. else
  29016. pTDefRegMap(@Self)^.&set := $00008000;
  29017. end;
  29018. function TI2C5_I2C3ACON.getI2CEN : TBits_1; inline;
  29019. begin
  29020. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  29021. end;
  29022. procedure TI2C5_I2C3ACON.setw(thebits : TBits_32); inline;
  29023. begin
  29024. pTDefRegMap(@Self)^.val := thebits;
  29025. end;
  29026. function TI2C5_I2C3ACON.getw : TBits_32; inline;
  29027. begin
  29028. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  29029. end;
  29030. procedure TI2C5_I2C5CON.setSEN; inline;
  29031. begin
  29032. pTDefRegMap(@Self)^.&set := $00000001;
  29033. end;
  29034. procedure TI2C5_I2C5CON.clearSEN; inline;
  29035. begin
  29036. pTDefRegMap(@Self)^.clr := $00000001;
  29037. end;
  29038. procedure TI2C5_I2C5CON.setSEN(thebits : TBits_1); inline;
  29039. begin
  29040. if thebits = 0 then
  29041. pTDefRegMap(@Self)^.clr := $00000001
  29042. else
  29043. pTDefRegMap(@Self)^.&set := $00000001;
  29044. end;
  29045. function TI2C5_I2C5CON.getSEN : TBits_1; inline;
  29046. begin
  29047. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  29048. end;
  29049. procedure TI2C5_I2C5CON.setRSEN; inline;
  29050. begin
  29051. pTDefRegMap(@Self)^.&set := $00000002;
  29052. end;
  29053. procedure TI2C5_I2C5CON.clearRSEN; inline;
  29054. begin
  29055. pTDefRegMap(@Self)^.clr := $00000002;
  29056. end;
  29057. procedure TI2C5_I2C5CON.setRSEN(thebits : TBits_1); inline;
  29058. begin
  29059. if thebits = 0 then
  29060. pTDefRegMap(@Self)^.clr := $00000002
  29061. else
  29062. pTDefRegMap(@Self)^.&set := $00000002;
  29063. end;
  29064. function TI2C5_I2C5CON.getRSEN : TBits_1; inline;
  29065. begin
  29066. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  29067. end;
  29068. procedure TI2C5_I2C5CON.setPEN; inline;
  29069. begin
  29070. pTDefRegMap(@Self)^.&set := $00000004;
  29071. end;
  29072. procedure TI2C5_I2C5CON.clearPEN; inline;
  29073. begin
  29074. pTDefRegMap(@Self)^.clr := $00000004;
  29075. end;
  29076. procedure TI2C5_I2C5CON.setPEN(thebits : TBits_1); inline;
  29077. begin
  29078. if thebits = 0 then
  29079. pTDefRegMap(@Self)^.clr := $00000004
  29080. else
  29081. pTDefRegMap(@Self)^.&set := $00000004;
  29082. end;
  29083. function TI2C5_I2C5CON.getPEN : TBits_1; inline;
  29084. begin
  29085. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  29086. end;
  29087. procedure TI2C5_I2C5CON.setRCEN; inline;
  29088. begin
  29089. pTDefRegMap(@Self)^.&set := $00000008;
  29090. end;
  29091. procedure TI2C5_I2C5CON.clearRCEN; inline;
  29092. begin
  29093. pTDefRegMap(@Self)^.clr := $00000008;
  29094. end;
  29095. procedure TI2C5_I2C5CON.setRCEN(thebits : TBits_1); inline;
  29096. begin
  29097. if thebits = 0 then
  29098. pTDefRegMap(@Self)^.clr := $00000008
  29099. else
  29100. pTDefRegMap(@Self)^.&set := $00000008;
  29101. end;
  29102. function TI2C5_I2C5CON.getRCEN : TBits_1; inline;
  29103. begin
  29104. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  29105. end;
  29106. procedure TI2C5_I2C5CON.setACKEN; inline;
  29107. begin
  29108. pTDefRegMap(@Self)^.&set := $00000010;
  29109. end;
  29110. procedure TI2C5_I2C5CON.clearACKEN; inline;
  29111. begin
  29112. pTDefRegMap(@Self)^.clr := $00000010;
  29113. end;
  29114. procedure TI2C5_I2C5CON.setACKEN(thebits : TBits_1); inline;
  29115. begin
  29116. if thebits = 0 then
  29117. pTDefRegMap(@Self)^.clr := $00000010
  29118. else
  29119. pTDefRegMap(@Self)^.&set := $00000010;
  29120. end;
  29121. function TI2C5_I2C5CON.getACKEN : TBits_1; inline;
  29122. begin
  29123. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  29124. end;
  29125. procedure TI2C5_I2C5CON.setACKDT; inline;
  29126. begin
  29127. pTDefRegMap(@Self)^.&set := $00000020;
  29128. end;
  29129. procedure TI2C5_I2C5CON.clearACKDT; inline;
  29130. begin
  29131. pTDefRegMap(@Self)^.clr := $00000020;
  29132. end;
  29133. procedure TI2C5_I2C5CON.setACKDT(thebits : TBits_1); inline;
  29134. begin
  29135. if thebits = 0 then
  29136. pTDefRegMap(@Self)^.clr := $00000020
  29137. else
  29138. pTDefRegMap(@Self)^.&set := $00000020;
  29139. end;
  29140. function TI2C5_I2C5CON.getACKDT : TBits_1; inline;
  29141. begin
  29142. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  29143. end;
  29144. procedure TI2C5_I2C5CON.setSTREN; inline;
  29145. begin
  29146. pTDefRegMap(@Self)^.&set := $00000040;
  29147. end;
  29148. procedure TI2C5_I2C5CON.clearSTREN; inline;
  29149. begin
  29150. pTDefRegMap(@Self)^.clr := $00000040;
  29151. end;
  29152. procedure TI2C5_I2C5CON.setSTREN(thebits : TBits_1); inline;
  29153. begin
  29154. if thebits = 0 then
  29155. pTDefRegMap(@Self)^.clr := $00000040
  29156. else
  29157. pTDefRegMap(@Self)^.&set := $00000040;
  29158. end;
  29159. function TI2C5_I2C5CON.getSTREN : TBits_1; inline;
  29160. begin
  29161. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29162. end;
  29163. procedure TI2C5_I2C5CON.setGCEN; inline;
  29164. begin
  29165. pTDefRegMap(@Self)^.&set := $00000080;
  29166. end;
  29167. procedure TI2C5_I2C5CON.clearGCEN; inline;
  29168. begin
  29169. pTDefRegMap(@Self)^.clr := $00000080;
  29170. end;
  29171. procedure TI2C5_I2C5CON.setGCEN(thebits : TBits_1); inline;
  29172. begin
  29173. if thebits = 0 then
  29174. pTDefRegMap(@Self)^.clr := $00000080
  29175. else
  29176. pTDefRegMap(@Self)^.&set := $00000080;
  29177. end;
  29178. function TI2C5_I2C5CON.getGCEN : TBits_1; inline;
  29179. begin
  29180. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  29181. end;
  29182. procedure TI2C5_I2C5CON.setSMEN; inline;
  29183. begin
  29184. pTDefRegMap(@Self)^.&set := $00000100;
  29185. end;
  29186. procedure TI2C5_I2C5CON.clearSMEN; inline;
  29187. begin
  29188. pTDefRegMap(@Self)^.clr := $00000100;
  29189. end;
  29190. procedure TI2C5_I2C5CON.setSMEN(thebits : TBits_1); inline;
  29191. begin
  29192. if thebits = 0 then
  29193. pTDefRegMap(@Self)^.clr := $00000100
  29194. else
  29195. pTDefRegMap(@Self)^.&set := $00000100;
  29196. end;
  29197. function TI2C5_I2C5CON.getSMEN : TBits_1; inline;
  29198. begin
  29199. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  29200. end;
  29201. procedure TI2C5_I2C5CON.setDISSLW; inline;
  29202. begin
  29203. pTDefRegMap(@Self)^.&set := $00000200;
  29204. end;
  29205. procedure TI2C5_I2C5CON.clearDISSLW; inline;
  29206. begin
  29207. pTDefRegMap(@Self)^.clr := $00000200;
  29208. end;
  29209. procedure TI2C5_I2C5CON.setDISSLW(thebits : TBits_1); inline;
  29210. begin
  29211. if thebits = 0 then
  29212. pTDefRegMap(@Self)^.clr := $00000200
  29213. else
  29214. pTDefRegMap(@Self)^.&set := $00000200;
  29215. end;
  29216. function TI2C5_I2C5CON.getDISSLW : TBits_1; inline;
  29217. begin
  29218. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  29219. end;
  29220. procedure TI2C5_I2C5CON.setA10M; inline;
  29221. begin
  29222. pTDefRegMap(@Self)^.&set := $00000400;
  29223. end;
  29224. procedure TI2C5_I2C5CON.clearA10M; inline;
  29225. begin
  29226. pTDefRegMap(@Self)^.clr := $00000400;
  29227. end;
  29228. procedure TI2C5_I2C5CON.setA10M(thebits : TBits_1); inline;
  29229. begin
  29230. if thebits = 0 then
  29231. pTDefRegMap(@Self)^.clr := $00000400
  29232. else
  29233. pTDefRegMap(@Self)^.&set := $00000400;
  29234. end;
  29235. function TI2C5_I2C5CON.getA10M : TBits_1; inline;
  29236. begin
  29237. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  29238. end;
  29239. procedure TI2C5_I2C5CON.setSTRICT; inline;
  29240. begin
  29241. pTDefRegMap(@Self)^.&set := $00000800;
  29242. end;
  29243. procedure TI2C5_I2C5CON.clearSTRICT; inline;
  29244. begin
  29245. pTDefRegMap(@Self)^.clr := $00000800;
  29246. end;
  29247. procedure TI2C5_I2C5CON.setSTRICT(thebits : TBits_1); inline;
  29248. begin
  29249. if thebits = 0 then
  29250. pTDefRegMap(@Self)^.clr := $00000800
  29251. else
  29252. pTDefRegMap(@Self)^.&set := $00000800;
  29253. end;
  29254. function TI2C5_I2C5CON.getSTRICT : TBits_1; inline;
  29255. begin
  29256. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  29257. end;
  29258. procedure TI2C5_I2C5CON.setSCLREL; inline;
  29259. begin
  29260. pTDefRegMap(@Self)^.&set := $00001000;
  29261. end;
  29262. procedure TI2C5_I2C5CON.clearSCLREL; inline;
  29263. begin
  29264. pTDefRegMap(@Self)^.clr := $00001000;
  29265. end;
  29266. procedure TI2C5_I2C5CON.setSCLREL(thebits : TBits_1); inline;
  29267. begin
  29268. if thebits = 0 then
  29269. pTDefRegMap(@Self)^.clr := $00001000
  29270. else
  29271. pTDefRegMap(@Self)^.&set := $00001000;
  29272. end;
  29273. function TI2C5_I2C5CON.getSCLREL : TBits_1; inline;
  29274. begin
  29275. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  29276. end;
  29277. procedure TI2C5_I2C5CON.setSIDL; inline;
  29278. begin
  29279. pTDefRegMap(@Self)^.&set := $00002000;
  29280. end;
  29281. procedure TI2C5_I2C5CON.clearSIDL; inline;
  29282. begin
  29283. pTDefRegMap(@Self)^.clr := $00002000;
  29284. end;
  29285. procedure TI2C5_I2C5CON.setSIDL(thebits : TBits_1); inline;
  29286. begin
  29287. if thebits = 0 then
  29288. pTDefRegMap(@Self)^.clr := $00002000
  29289. else
  29290. pTDefRegMap(@Self)^.&set := $00002000;
  29291. end;
  29292. function TI2C5_I2C5CON.getSIDL : TBits_1; inline;
  29293. begin
  29294. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  29295. end;
  29296. procedure TI2C5_I2C5CON.setON; inline;
  29297. begin
  29298. pTDefRegMap(@Self)^.&set := $00008000;
  29299. end;
  29300. procedure TI2C5_I2C5CON.clearON; inline;
  29301. begin
  29302. pTDefRegMap(@Self)^.clr := $00008000;
  29303. end;
  29304. procedure TI2C5_I2C5CON.setON(thebits : TBits_1); inline;
  29305. begin
  29306. if thebits = 0 then
  29307. pTDefRegMap(@Self)^.clr := $00008000
  29308. else
  29309. pTDefRegMap(@Self)^.&set := $00008000;
  29310. end;
  29311. function TI2C5_I2C5CON.getON : TBits_1; inline;
  29312. begin
  29313. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  29314. end;
  29315. procedure TI2C5_I2C5CON.setIPMIEN; inline;
  29316. begin
  29317. pTDefRegMap(@Self)^.&set := $00000800;
  29318. end;
  29319. procedure TI2C5_I2C5CON.clearIPMIEN; inline;
  29320. begin
  29321. pTDefRegMap(@Self)^.clr := $00000800;
  29322. end;
  29323. procedure TI2C5_I2C5CON.setIPMIEN(thebits : TBits_1); inline;
  29324. begin
  29325. if thebits = 0 then
  29326. pTDefRegMap(@Self)^.clr := $00000800
  29327. else
  29328. pTDefRegMap(@Self)^.&set := $00000800;
  29329. end;
  29330. function TI2C5_I2C5CON.getIPMIEN : TBits_1; inline;
  29331. begin
  29332. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  29333. end;
  29334. procedure TI2C5_I2C5CON.setI2CSIDL; inline;
  29335. begin
  29336. pTDefRegMap(@Self)^.&set := $00002000;
  29337. end;
  29338. procedure TI2C5_I2C5CON.clearI2CSIDL; inline;
  29339. begin
  29340. pTDefRegMap(@Self)^.clr := $00002000;
  29341. end;
  29342. procedure TI2C5_I2C5CON.setI2CSIDL(thebits : TBits_1); inline;
  29343. begin
  29344. if thebits = 0 then
  29345. pTDefRegMap(@Self)^.clr := $00002000
  29346. else
  29347. pTDefRegMap(@Self)^.&set := $00002000;
  29348. end;
  29349. function TI2C5_I2C5CON.getI2CSIDL : TBits_1; inline;
  29350. begin
  29351. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  29352. end;
  29353. procedure TI2C5_I2C5CON.setI2CEN; inline;
  29354. begin
  29355. pTDefRegMap(@Self)^.&set := $00008000;
  29356. end;
  29357. procedure TI2C5_I2C5CON.clearI2CEN; inline;
  29358. begin
  29359. pTDefRegMap(@Self)^.clr := $00008000;
  29360. end;
  29361. procedure TI2C5_I2C5CON.setI2CEN(thebits : TBits_1); inline;
  29362. begin
  29363. if thebits = 0 then
  29364. pTDefRegMap(@Self)^.clr := $00008000
  29365. else
  29366. pTDefRegMap(@Self)^.&set := $00008000;
  29367. end;
  29368. function TI2C5_I2C5CON.getI2CEN : TBits_1; inline;
  29369. begin
  29370. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  29371. end;
  29372. procedure TI2C5_I2C5CON.setw(thebits : TBits_32); inline;
  29373. begin
  29374. pTDefRegMap(@Self)^.val := thebits;
  29375. end;
  29376. function TI2C5_I2C5CON.getw : TBits_32; inline;
  29377. begin
  29378. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  29379. end;
  29380. procedure TI2C5_I2C3ASTAT.setTBF; inline;
  29381. begin
  29382. pTDefRegMap(@Self)^.&set := $00000001;
  29383. end;
  29384. procedure TI2C5_I2C3ASTAT.clearTBF; inline;
  29385. begin
  29386. pTDefRegMap(@Self)^.clr := $00000001;
  29387. end;
  29388. procedure TI2C5_I2C3ASTAT.setTBF(thebits : TBits_1); inline;
  29389. begin
  29390. if thebits = 0 then
  29391. pTDefRegMap(@Self)^.clr := $00000001
  29392. else
  29393. pTDefRegMap(@Self)^.&set := $00000001;
  29394. end;
  29395. function TI2C5_I2C3ASTAT.getTBF : TBits_1; inline;
  29396. begin
  29397. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  29398. end;
  29399. procedure TI2C5_I2C3ASTAT.setRBF; inline;
  29400. begin
  29401. pTDefRegMap(@Self)^.&set := $00000002;
  29402. end;
  29403. procedure TI2C5_I2C3ASTAT.clearRBF; inline;
  29404. begin
  29405. pTDefRegMap(@Self)^.clr := $00000002;
  29406. end;
  29407. procedure TI2C5_I2C3ASTAT.setRBF(thebits : TBits_1); inline;
  29408. begin
  29409. if thebits = 0 then
  29410. pTDefRegMap(@Self)^.clr := $00000002
  29411. else
  29412. pTDefRegMap(@Self)^.&set := $00000002;
  29413. end;
  29414. function TI2C5_I2C3ASTAT.getRBF : TBits_1; inline;
  29415. begin
  29416. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  29417. end;
  29418. procedure TI2C5_I2C3ASTAT.setR_W; inline;
  29419. begin
  29420. pTDefRegMap(@Self)^.&set := $00000004;
  29421. end;
  29422. procedure TI2C5_I2C3ASTAT.clearR_W; inline;
  29423. begin
  29424. pTDefRegMap(@Self)^.clr := $00000004;
  29425. end;
  29426. procedure TI2C5_I2C3ASTAT.setR_W(thebits : TBits_1); inline;
  29427. begin
  29428. if thebits = 0 then
  29429. pTDefRegMap(@Self)^.clr := $00000004
  29430. else
  29431. pTDefRegMap(@Self)^.&set := $00000004;
  29432. end;
  29433. function TI2C5_I2C3ASTAT.getR_W : TBits_1; inline;
  29434. begin
  29435. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  29436. end;
  29437. procedure TI2C5_I2C3ASTAT.setS; inline;
  29438. begin
  29439. pTDefRegMap(@Self)^.&set := $00000008;
  29440. end;
  29441. procedure TI2C5_I2C3ASTAT.clearS; inline;
  29442. begin
  29443. pTDefRegMap(@Self)^.clr := $00000008;
  29444. end;
  29445. procedure TI2C5_I2C3ASTAT.setS(thebits : TBits_1); inline;
  29446. begin
  29447. if thebits = 0 then
  29448. pTDefRegMap(@Self)^.clr := $00000008
  29449. else
  29450. pTDefRegMap(@Self)^.&set := $00000008;
  29451. end;
  29452. function TI2C5_I2C3ASTAT.getS : TBits_1; inline;
  29453. begin
  29454. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  29455. end;
  29456. procedure TI2C5_I2C3ASTAT.setP; inline;
  29457. begin
  29458. pTDefRegMap(@Self)^.&set := $00000010;
  29459. end;
  29460. procedure TI2C5_I2C3ASTAT.clearP; inline;
  29461. begin
  29462. pTDefRegMap(@Self)^.clr := $00000010;
  29463. end;
  29464. procedure TI2C5_I2C3ASTAT.setP(thebits : TBits_1); inline;
  29465. begin
  29466. if thebits = 0 then
  29467. pTDefRegMap(@Self)^.clr := $00000010
  29468. else
  29469. pTDefRegMap(@Self)^.&set := $00000010;
  29470. end;
  29471. function TI2C5_I2C3ASTAT.getP : TBits_1; inline;
  29472. begin
  29473. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  29474. end;
  29475. procedure TI2C5_I2C3ASTAT.setD_A; inline;
  29476. begin
  29477. pTDefRegMap(@Self)^.&set := $00000020;
  29478. end;
  29479. procedure TI2C5_I2C3ASTAT.clearD_A; inline;
  29480. begin
  29481. pTDefRegMap(@Self)^.clr := $00000020;
  29482. end;
  29483. procedure TI2C5_I2C3ASTAT.setD_A(thebits : TBits_1); inline;
  29484. begin
  29485. if thebits = 0 then
  29486. pTDefRegMap(@Self)^.clr := $00000020
  29487. else
  29488. pTDefRegMap(@Self)^.&set := $00000020;
  29489. end;
  29490. function TI2C5_I2C3ASTAT.getD_A : TBits_1; inline;
  29491. begin
  29492. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  29493. end;
  29494. procedure TI2C5_I2C3ASTAT.setI2COV; inline;
  29495. begin
  29496. pTDefRegMap(@Self)^.&set := $00000040;
  29497. end;
  29498. procedure TI2C5_I2C3ASTAT.clearI2COV; inline;
  29499. begin
  29500. pTDefRegMap(@Self)^.clr := $00000040;
  29501. end;
  29502. procedure TI2C5_I2C3ASTAT.setI2COV(thebits : TBits_1); inline;
  29503. begin
  29504. if thebits = 0 then
  29505. pTDefRegMap(@Self)^.clr := $00000040
  29506. else
  29507. pTDefRegMap(@Self)^.&set := $00000040;
  29508. end;
  29509. function TI2C5_I2C3ASTAT.getI2COV : TBits_1; inline;
  29510. begin
  29511. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29512. end;
  29513. procedure TI2C5_I2C3ASTAT.setIWCOL; inline;
  29514. begin
  29515. pTDefRegMap(@Self)^.&set := $00000080;
  29516. end;
  29517. procedure TI2C5_I2C3ASTAT.clearIWCOL; inline;
  29518. begin
  29519. pTDefRegMap(@Self)^.clr := $00000080;
  29520. end;
  29521. procedure TI2C5_I2C3ASTAT.setIWCOL(thebits : TBits_1); inline;
  29522. begin
  29523. if thebits = 0 then
  29524. pTDefRegMap(@Self)^.clr := $00000080
  29525. else
  29526. pTDefRegMap(@Self)^.&set := $00000080;
  29527. end;
  29528. function TI2C5_I2C3ASTAT.getIWCOL : TBits_1; inline;
  29529. begin
  29530. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  29531. end;
  29532. procedure TI2C5_I2C3ASTAT.setADD10; inline;
  29533. begin
  29534. pTDefRegMap(@Self)^.&set := $00000100;
  29535. end;
  29536. procedure TI2C5_I2C3ASTAT.clearADD10; inline;
  29537. begin
  29538. pTDefRegMap(@Self)^.clr := $00000100;
  29539. end;
  29540. procedure TI2C5_I2C3ASTAT.setADD10(thebits : TBits_1); inline;
  29541. begin
  29542. if thebits = 0 then
  29543. pTDefRegMap(@Self)^.clr := $00000100
  29544. else
  29545. pTDefRegMap(@Self)^.&set := $00000100;
  29546. end;
  29547. function TI2C5_I2C3ASTAT.getADD10 : TBits_1; inline;
  29548. begin
  29549. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  29550. end;
  29551. procedure TI2C5_I2C3ASTAT.setGCSTAT; inline;
  29552. begin
  29553. pTDefRegMap(@Self)^.&set := $00000200;
  29554. end;
  29555. procedure TI2C5_I2C3ASTAT.clearGCSTAT; inline;
  29556. begin
  29557. pTDefRegMap(@Self)^.clr := $00000200;
  29558. end;
  29559. procedure TI2C5_I2C3ASTAT.setGCSTAT(thebits : TBits_1); inline;
  29560. begin
  29561. if thebits = 0 then
  29562. pTDefRegMap(@Self)^.clr := $00000200
  29563. else
  29564. pTDefRegMap(@Self)^.&set := $00000200;
  29565. end;
  29566. function TI2C5_I2C3ASTAT.getGCSTAT : TBits_1; inline;
  29567. begin
  29568. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  29569. end;
  29570. procedure TI2C5_I2C3ASTAT.setBCL; inline;
  29571. begin
  29572. pTDefRegMap(@Self)^.&set := $00000400;
  29573. end;
  29574. procedure TI2C5_I2C3ASTAT.clearBCL; inline;
  29575. begin
  29576. pTDefRegMap(@Self)^.clr := $00000400;
  29577. end;
  29578. procedure TI2C5_I2C3ASTAT.setBCL(thebits : TBits_1); inline;
  29579. begin
  29580. if thebits = 0 then
  29581. pTDefRegMap(@Self)^.clr := $00000400
  29582. else
  29583. pTDefRegMap(@Self)^.&set := $00000400;
  29584. end;
  29585. function TI2C5_I2C3ASTAT.getBCL : TBits_1; inline;
  29586. begin
  29587. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  29588. end;
  29589. procedure TI2C5_I2C3ASTAT.setTRSTAT; inline;
  29590. begin
  29591. pTDefRegMap(@Self)^.&set := $00004000;
  29592. end;
  29593. procedure TI2C5_I2C3ASTAT.clearTRSTAT; inline;
  29594. begin
  29595. pTDefRegMap(@Self)^.clr := $00004000;
  29596. end;
  29597. procedure TI2C5_I2C3ASTAT.setTRSTAT(thebits : TBits_1); inline;
  29598. begin
  29599. if thebits = 0 then
  29600. pTDefRegMap(@Self)^.clr := $00004000
  29601. else
  29602. pTDefRegMap(@Self)^.&set := $00004000;
  29603. end;
  29604. function TI2C5_I2C3ASTAT.getTRSTAT : TBits_1; inline;
  29605. begin
  29606. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  29607. end;
  29608. procedure TI2C5_I2C3ASTAT.setACKSTAT; inline;
  29609. begin
  29610. pTDefRegMap(@Self)^.&set := $00008000;
  29611. end;
  29612. procedure TI2C5_I2C3ASTAT.clearACKSTAT; inline;
  29613. begin
  29614. pTDefRegMap(@Self)^.clr := $00008000;
  29615. end;
  29616. procedure TI2C5_I2C3ASTAT.setACKSTAT(thebits : TBits_1); inline;
  29617. begin
  29618. if thebits = 0 then
  29619. pTDefRegMap(@Self)^.clr := $00008000
  29620. else
  29621. pTDefRegMap(@Self)^.&set := $00008000;
  29622. end;
  29623. function TI2C5_I2C3ASTAT.getACKSTAT : TBits_1; inline;
  29624. begin
  29625. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  29626. end;
  29627. procedure TI2C5_I2C3ASTAT.setI2CPOV; inline;
  29628. begin
  29629. pTDefRegMap(@Self)^.&set := $00000040;
  29630. end;
  29631. procedure TI2C5_I2C3ASTAT.clearI2CPOV; inline;
  29632. begin
  29633. pTDefRegMap(@Self)^.clr := $00000040;
  29634. end;
  29635. procedure TI2C5_I2C3ASTAT.setI2CPOV(thebits : TBits_1); inline;
  29636. begin
  29637. if thebits = 0 then
  29638. pTDefRegMap(@Self)^.clr := $00000040
  29639. else
  29640. pTDefRegMap(@Self)^.&set := $00000040;
  29641. end;
  29642. function TI2C5_I2C3ASTAT.getI2CPOV : TBits_1; inline;
  29643. begin
  29644. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29645. end;
  29646. procedure TI2C5_I2C3ASTAT.setw(thebits : TBits_32); inline;
  29647. begin
  29648. pTDefRegMap(@Self)^.val := thebits;
  29649. end;
  29650. function TI2C5_I2C3ASTAT.getw : TBits_32; inline;
  29651. begin
  29652. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  29653. end;
  29654. procedure TI2C5_I2C5STAT.setTBF; inline;
  29655. begin
  29656. pTDefRegMap(@Self)^.&set := $00000001;
  29657. end;
  29658. procedure TI2C5_I2C5STAT.clearTBF; inline;
  29659. begin
  29660. pTDefRegMap(@Self)^.clr := $00000001;
  29661. end;
  29662. procedure TI2C5_I2C5STAT.setTBF(thebits : TBits_1); inline;
  29663. begin
  29664. if thebits = 0 then
  29665. pTDefRegMap(@Self)^.clr := $00000001
  29666. else
  29667. pTDefRegMap(@Self)^.&set := $00000001;
  29668. end;
  29669. function TI2C5_I2C5STAT.getTBF : TBits_1; inline;
  29670. begin
  29671. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  29672. end;
  29673. procedure TI2C5_I2C5STAT.setRBF; inline;
  29674. begin
  29675. pTDefRegMap(@Self)^.&set := $00000002;
  29676. end;
  29677. procedure TI2C5_I2C5STAT.clearRBF; inline;
  29678. begin
  29679. pTDefRegMap(@Self)^.clr := $00000002;
  29680. end;
  29681. procedure TI2C5_I2C5STAT.setRBF(thebits : TBits_1); inline;
  29682. begin
  29683. if thebits = 0 then
  29684. pTDefRegMap(@Self)^.clr := $00000002
  29685. else
  29686. pTDefRegMap(@Self)^.&set := $00000002;
  29687. end;
  29688. function TI2C5_I2C5STAT.getRBF : TBits_1; inline;
  29689. begin
  29690. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  29691. end;
  29692. procedure TI2C5_I2C5STAT.setR_W; inline;
  29693. begin
  29694. pTDefRegMap(@Self)^.&set := $00000004;
  29695. end;
  29696. procedure TI2C5_I2C5STAT.clearR_W; inline;
  29697. begin
  29698. pTDefRegMap(@Self)^.clr := $00000004;
  29699. end;
  29700. procedure TI2C5_I2C5STAT.setR_W(thebits : TBits_1); inline;
  29701. begin
  29702. if thebits = 0 then
  29703. pTDefRegMap(@Self)^.clr := $00000004
  29704. else
  29705. pTDefRegMap(@Self)^.&set := $00000004;
  29706. end;
  29707. function TI2C5_I2C5STAT.getR_W : TBits_1; inline;
  29708. begin
  29709. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  29710. end;
  29711. procedure TI2C5_I2C5STAT.setS; inline;
  29712. begin
  29713. pTDefRegMap(@Self)^.&set := $00000008;
  29714. end;
  29715. procedure TI2C5_I2C5STAT.clearS; inline;
  29716. begin
  29717. pTDefRegMap(@Self)^.clr := $00000008;
  29718. end;
  29719. procedure TI2C5_I2C5STAT.setS(thebits : TBits_1); inline;
  29720. begin
  29721. if thebits = 0 then
  29722. pTDefRegMap(@Self)^.clr := $00000008
  29723. else
  29724. pTDefRegMap(@Self)^.&set := $00000008;
  29725. end;
  29726. function TI2C5_I2C5STAT.getS : TBits_1; inline;
  29727. begin
  29728. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  29729. end;
  29730. procedure TI2C5_I2C5STAT.setP; inline;
  29731. begin
  29732. pTDefRegMap(@Self)^.&set := $00000010;
  29733. end;
  29734. procedure TI2C5_I2C5STAT.clearP; inline;
  29735. begin
  29736. pTDefRegMap(@Self)^.clr := $00000010;
  29737. end;
  29738. procedure TI2C5_I2C5STAT.setP(thebits : TBits_1); inline;
  29739. begin
  29740. if thebits = 0 then
  29741. pTDefRegMap(@Self)^.clr := $00000010
  29742. else
  29743. pTDefRegMap(@Self)^.&set := $00000010;
  29744. end;
  29745. function TI2C5_I2C5STAT.getP : TBits_1; inline;
  29746. begin
  29747. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  29748. end;
  29749. procedure TI2C5_I2C5STAT.setD_A; inline;
  29750. begin
  29751. pTDefRegMap(@Self)^.&set := $00000020;
  29752. end;
  29753. procedure TI2C5_I2C5STAT.clearD_A; inline;
  29754. begin
  29755. pTDefRegMap(@Self)^.clr := $00000020;
  29756. end;
  29757. procedure TI2C5_I2C5STAT.setD_A(thebits : TBits_1); inline;
  29758. begin
  29759. if thebits = 0 then
  29760. pTDefRegMap(@Self)^.clr := $00000020
  29761. else
  29762. pTDefRegMap(@Self)^.&set := $00000020;
  29763. end;
  29764. function TI2C5_I2C5STAT.getD_A : TBits_1; inline;
  29765. begin
  29766. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  29767. end;
  29768. procedure TI2C5_I2C5STAT.setI2COV; inline;
  29769. begin
  29770. pTDefRegMap(@Self)^.&set := $00000040;
  29771. end;
  29772. procedure TI2C5_I2C5STAT.clearI2COV; inline;
  29773. begin
  29774. pTDefRegMap(@Self)^.clr := $00000040;
  29775. end;
  29776. procedure TI2C5_I2C5STAT.setI2COV(thebits : TBits_1); inline;
  29777. begin
  29778. if thebits = 0 then
  29779. pTDefRegMap(@Self)^.clr := $00000040
  29780. else
  29781. pTDefRegMap(@Self)^.&set := $00000040;
  29782. end;
  29783. function TI2C5_I2C5STAT.getI2COV : TBits_1; inline;
  29784. begin
  29785. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29786. end;
  29787. procedure TI2C5_I2C5STAT.setIWCOL; inline;
  29788. begin
  29789. pTDefRegMap(@Self)^.&set := $00000080;
  29790. end;
  29791. procedure TI2C5_I2C5STAT.clearIWCOL; inline;
  29792. begin
  29793. pTDefRegMap(@Self)^.clr := $00000080;
  29794. end;
  29795. procedure TI2C5_I2C5STAT.setIWCOL(thebits : TBits_1); inline;
  29796. begin
  29797. if thebits = 0 then
  29798. pTDefRegMap(@Self)^.clr := $00000080
  29799. else
  29800. pTDefRegMap(@Self)^.&set := $00000080;
  29801. end;
  29802. function TI2C5_I2C5STAT.getIWCOL : TBits_1; inline;
  29803. begin
  29804. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  29805. end;
  29806. procedure TI2C5_I2C5STAT.setADD10; inline;
  29807. begin
  29808. pTDefRegMap(@Self)^.&set := $00000100;
  29809. end;
  29810. procedure TI2C5_I2C5STAT.clearADD10; inline;
  29811. begin
  29812. pTDefRegMap(@Self)^.clr := $00000100;
  29813. end;
  29814. procedure TI2C5_I2C5STAT.setADD10(thebits : TBits_1); inline;
  29815. begin
  29816. if thebits = 0 then
  29817. pTDefRegMap(@Self)^.clr := $00000100
  29818. else
  29819. pTDefRegMap(@Self)^.&set := $00000100;
  29820. end;
  29821. function TI2C5_I2C5STAT.getADD10 : TBits_1; inline;
  29822. begin
  29823. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  29824. end;
  29825. procedure TI2C5_I2C5STAT.setGCSTAT; inline;
  29826. begin
  29827. pTDefRegMap(@Self)^.&set := $00000200;
  29828. end;
  29829. procedure TI2C5_I2C5STAT.clearGCSTAT; inline;
  29830. begin
  29831. pTDefRegMap(@Self)^.clr := $00000200;
  29832. end;
  29833. procedure TI2C5_I2C5STAT.setGCSTAT(thebits : TBits_1); inline;
  29834. begin
  29835. if thebits = 0 then
  29836. pTDefRegMap(@Self)^.clr := $00000200
  29837. else
  29838. pTDefRegMap(@Self)^.&set := $00000200;
  29839. end;
  29840. function TI2C5_I2C5STAT.getGCSTAT : TBits_1; inline;
  29841. begin
  29842. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  29843. end;
  29844. procedure TI2C5_I2C5STAT.setBCL; inline;
  29845. begin
  29846. pTDefRegMap(@Self)^.&set := $00000400;
  29847. end;
  29848. procedure TI2C5_I2C5STAT.clearBCL; inline;
  29849. begin
  29850. pTDefRegMap(@Self)^.clr := $00000400;
  29851. end;
  29852. procedure TI2C5_I2C5STAT.setBCL(thebits : TBits_1); inline;
  29853. begin
  29854. if thebits = 0 then
  29855. pTDefRegMap(@Self)^.clr := $00000400
  29856. else
  29857. pTDefRegMap(@Self)^.&set := $00000400;
  29858. end;
  29859. function TI2C5_I2C5STAT.getBCL : TBits_1; inline;
  29860. begin
  29861. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  29862. end;
  29863. procedure TI2C5_I2C5STAT.setTRSTAT; inline;
  29864. begin
  29865. pTDefRegMap(@Self)^.&set := $00004000;
  29866. end;
  29867. procedure TI2C5_I2C5STAT.clearTRSTAT; inline;
  29868. begin
  29869. pTDefRegMap(@Self)^.clr := $00004000;
  29870. end;
  29871. procedure TI2C5_I2C5STAT.setTRSTAT(thebits : TBits_1); inline;
  29872. begin
  29873. if thebits = 0 then
  29874. pTDefRegMap(@Self)^.clr := $00004000
  29875. else
  29876. pTDefRegMap(@Self)^.&set := $00004000;
  29877. end;
  29878. function TI2C5_I2C5STAT.getTRSTAT : TBits_1; inline;
  29879. begin
  29880. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  29881. end;
  29882. procedure TI2C5_I2C5STAT.setACKSTAT; inline;
  29883. begin
  29884. pTDefRegMap(@Self)^.&set := $00008000;
  29885. end;
  29886. procedure TI2C5_I2C5STAT.clearACKSTAT; inline;
  29887. begin
  29888. pTDefRegMap(@Self)^.clr := $00008000;
  29889. end;
  29890. procedure TI2C5_I2C5STAT.setACKSTAT(thebits : TBits_1); inline;
  29891. begin
  29892. if thebits = 0 then
  29893. pTDefRegMap(@Self)^.clr := $00008000
  29894. else
  29895. pTDefRegMap(@Self)^.&set := $00008000;
  29896. end;
  29897. function TI2C5_I2C5STAT.getACKSTAT : TBits_1; inline;
  29898. begin
  29899. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  29900. end;
  29901. procedure TI2C5_I2C5STAT.setI2CPOV; inline;
  29902. begin
  29903. pTDefRegMap(@Self)^.&set := $00000040;
  29904. end;
  29905. procedure TI2C5_I2C5STAT.clearI2CPOV; inline;
  29906. begin
  29907. pTDefRegMap(@Self)^.clr := $00000040;
  29908. end;
  29909. procedure TI2C5_I2C5STAT.setI2CPOV(thebits : TBits_1); inline;
  29910. begin
  29911. if thebits = 0 then
  29912. pTDefRegMap(@Self)^.clr := $00000040
  29913. else
  29914. pTDefRegMap(@Self)^.&set := $00000040;
  29915. end;
  29916. function TI2C5_I2C5STAT.getI2CPOV : TBits_1; inline;
  29917. begin
  29918. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29919. end;
  29920. procedure TI2C5_I2C5STAT.setw(thebits : TBits_32); inline;
  29921. begin
  29922. pTDefRegMap(@Self)^.val := thebits;
  29923. end;
  29924. function TI2C5_I2C5STAT.getw : TBits_32; inline;
  29925. begin
  29926. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  29927. end;
  29928. procedure TI2C1_I2C1CON.setSEN; inline;
  29929. begin
  29930. pTDefRegMap(@Self)^.&set := $00000001;
  29931. end;
  29932. procedure TI2C1_I2C1CON.clearSEN; inline;
  29933. begin
  29934. pTDefRegMap(@Self)^.clr := $00000001;
  29935. end;
  29936. procedure TI2C1_I2C1CON.setSEN(thebits : TBits_1); inline;
  29937. begin
  29938. if thebits = 0 then
  29939. pTDefRegMap(@Self)^.clr := $00000001
  29940. else
  29941. pTDefRegMap(@Self)^.&set := $00000001;
  29942. end;
  29943. function TI2C1_I2C1CON.getSEN : TBits_1; inline;
  29944. begin
  29945. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  29946. end;
  29947. procedure TI2C1_I2C1CON.setRSEN; inline;
  29948. begin
  29949. pTDefRegMap(@Self)^.&set := $00000002;
  29950. end;
  29951. procedure TI2C1_I2C1CON.clearRSEN; inline;
  29952. begin
  29953. pTDefRegMap(@Self)^.clr := $00000002;
  29954. end;
  29955. procedure TI2C1_I2C1CON.setRSEN(thebits : TBits_1); inline;
  29956. begin
  29957. if thebits = 0 then
  29958. pTDefRegMap(@Self)^.clr := $00000002
  29959. else
  29960. pTDefRegMap(@Self)^.&set := $00000002;
  29961. end;
  29962. function TI2C1_I2C1CON.getRSEN : TBits_1; inline;
  29963. begin
  29964. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  29965. end;
  29966. procedure TI2C1_I2C1CON.setPEN; inline;
  29967. begin
  29968. pTDefRegMap(@Self)^.&set := $00000004;
  29969. end;
  29970. procedure TI2C1_I2C1CON.clearPEN; inline;
  29971. begin
  29972. pTDefRegMap(@Self)^.clr := $00000004;
  29973. end;
  29974. procedure TI2C1_I2C1CON.setPEN(thebits : TBits_1); inline;
  29975. begin
  29976. if thebits = 0 then
  29977. pTDefRegMap(@Self)^.clr := $00000004
  29978. else
  29979. pTDefRegMap(@Self)^.&set := $00000004;
  29980. end;
  29981. function TI2C1_I2C1CON.getPEN : TBits_1; inline;
  29982. begin
  29983. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  29984. end;
  29985. procedure TI2C1_I2C1CON.setRCEN; inline;
  29986. begin
  29987. pTDefRegMap(@Self)^.&set := $00000008;
  29988. end;
  29989. procedure TI2C1_I2C1CON.clearRCEN; inline;
  29990. begin
  29991. pTDefRegMap(@Self)^.clr := $00000008;
  29992. end;
  29993. procedure TI2C1_I2C1CON.setRCEN(thebits : TBits_1); inline;
  29994. begin
  29995. if thebits = 0 then
  29996. pTDefRegMap(@Self)^.clr := $00000008
  29997. else
  29998. pTDefRegMap(@Self)^.&set := $00000008;
  29999. end;
  30000. function TI2C1_I2C1CON.getRCEN : TBits_1; inline;
  30001. begin
  30002. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  30003. end;
  30004. procedure TI2C1_I2C1CON.setACKEN; inline;
  30005. begin
  30006. pTDefRegMap(@Self)^.&set := $00000010;
  30007. end;
  30008. procedure TI2C1_I2C1CON.clearACKEN; inline;
  30009. begin
  30010. pTDefRegMap(@Self)^.clr := $00000010;
  30011. end;
  30012. procedure TI2C1_I2C1CON.setACKEN(thebits : TBits_1); inline;
  30013. begin
  30014. if thebits = 0 then
  30015. pTDefRegMap(@Self)^.clr := $00000010
  30016. else
  30017. pTDefRegMap(@Self)^.&set := $00000010;
  30018. end;
  30019. function TI2C1_I2C1CON.getACKEN : TBits_1; inline;
  30020. begin
  30021. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  30022. end;
  30023. procedure TI2C1_I2C1CON.setACKDT; inline;
  30024. begin
  30025. pTDefRegMap(@Self)^.&set := $00000020;
  30026. end;
  30027. procedure TI2C1_I2C1CON.clearACKDT; inline;
  30028. begin
  30029. pTDefRegMap(@Self)^.clr := $00000020;
  30030. end;
  30031. procedure TI2C1_I2C1CON.setACKDT(thebits : TBits_1); inline;
  30032. begin
  30033. if thebits = 0 then
  30034. pTDefRegMap(@Self)^.clr := $00000020
  30035. else
  30036. pTDefRegMap(@Self)^.&set := $00000020;
  30037. end;
  30038. function TI2C1_I2C1CON.getACKDT : TBits_1; inline;
  30039. begin
  30040. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  30041. end;
  30042. procedure TI2C1_I2C1CON.setSTREN; inline;
  30043. begin
  30044. pTDefRegMap(@Self)^.&set := $00000040;
  30045. end;
  30046. procedure TI2C1_I2C1CON.clearSTREN; inline;
  30047. begin
  30048. pTDefRegMap(@Self)^.clr := $00000040;
  30049. end;
  30050. procedure TI2C1_I2C1CON.setSTREN(thebits : TBits_1); inline;
  30051. begin
  30052. if thebits = 0 then
  30053. pTDefRegMap(@Self)^.clr := $00000040
  30054. else
  30055. pTDefRegMap(@Self)^.&set := $00000040;
  30056. end;
  30057. function TI2C1_I2C1CON.getSTREN : TBits_1; inline;
  30058. begin
  30059. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30060. end;
  30061. procedure TI2C1_I2C1CON.setGCEN; inline;
  30062. begin
  30063. pTDefRegMap(@Self)^.&set := $00000080;
  30064. end;
  30065. procedure TI2C1_I2C1CON.clearGCEN; inline;
  30066. begin
  30067. pTDefRegMap(@Self)^.clr := $00000080;
  30068. end;
  30069. procedure TI2C1_I2C1CON.setGCEN(thebits : TBits_1); inline;
  30070. begin
  30071. if thebits = 0 then
  30072. pTDefRegMap(@Self)^.clr := $00000080
  30073. else
  30074. pTDefRegMap(@Self)^.&set := $00000080;
  30075. end;
  30076. function TI2C1_I2C1CON.getGCEN : TBits_1; inline;
  30077. begin
  30078. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  30079. end;
  30080. procedure TI2C1_I2C1CON.setSMEN; inline;
  30081. begin
  30082. pTDefRegMap(@Self)^.&set := $00000100;
  30083. end;
  30084. procedure TI2C1_I2C1CON.clearSMEN; inline;
  30085. begin
  30086. pTDefRegMap(@Self)^.clr := $00000100;
  30087. end;
  30088. procedure TI2C1_I2C1CON.setSMEN(thebits : TBits_1); inline;
  30089. begin
  30090. if thebits = 0 then
  30091. pTDefRegMap(@Self)^.clr := $00000100
  30092. else
  30093. pTDefRegMap(@Self)^.&set := $00000100;
  30094. end;
  30095. function TI2C1_I2C1CON.getSMEN : TBits_1; inline;
  30096. begin
  30097. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  30098. end;
  30099. procedure TI2C1_I2C1CON.setDISSLW; inline;
  30100. begin
  30101. pTDefRegMap(@Self)^.&set := $00000200;
  30102. end;
  30103. procedure TI2C1_I2C1CON.clearDISSLW; inline;
  30104. begin
  30105. pTDefRegMap(@Self)^.clr := $00000200;
  30106. end;
  30107. procedure TI2C1_I2C1CON.setDISSLW(thebits : TBits_1); inline;
  30108. begin
  30109. if thebits = 0 then
  30110. pTDefRegMap(@Self)^.clr := $00000200
  30111. else
  30112. pTDefRegMap(@Self)^.&set := $00000200;
  30113. end;
  30114. function TI2C1_I2C1CON.getDISSLW : TBits_1; inline;
  30115. begin
  30116. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  30117. end;
  30118. procedure TI2C1_I2C1CON.setA10M; inline;
  30119. begin
  30120. pTDefRegMap(@Self)^.&set := $00000400;
  30121. end;
  30122. procedure TI2C1_I2C1CON.clearA10M; inline;
  30123. begin
  30124. pTDefRegMap(@Self)^.clr := $00000400;
  30125. end;
  30126. procedure TI2C1_I2C1CON.setA10M(thebits : TBits_1); inline;
  30127. begin
  30128. if thebits = 0 then
  30129. pTDefRegMap(@Self)^.clr := $00000400
  30130. else
  30131. pTDefRegMap(@Self)^.&set := $00000400;
  30132. end;
  30133. function TI2C1_I2C1CON.getA10M : TBits_1; inline;
  30134. begin
  30135. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  30136. end;
  30137. procedure TI2C1_I2C1CON.setSTRICT; inline;
  30138. begin
  30139. pTDefRegMap(@Self)^.&set := $00000800;
  30140. end;
  30141. procedure TI2C1_I2C1CON.clearSTRICT; inline;
  30142. begin
  30143. pTDefRegMap(@Self)^.clr := $00000800;
  30144. end;
  30145. procedure TI2C1_I2C1CON.setSTRICT(thebits : TBits_1); inline;
  30146. begin
  30147. if thebits = 0 then
  30148. pTDefRegMap(@Self)^.clr := $00000800
  30149. else
  30150. pTDefRegMap(@Self)^.&set := $00000800;
  30151. end;
  30152. function TI2C1_I2C1CON.getSTRICT : TBits_1; inline;
  30153. begin
  30154. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  30155. end;
  30156. procedure TI2C1_I2C1CON.setSCLREL; inline;
  30157. begin
  30158. pTDefRegMap(@Self)^.&set := $00001000;
  30159. end;
  30160. procedure TI2C1_I2C1CON.clearSCLREL; inline;
  30161. begin
  30162. pTDefRegMap(@Self)^.clr := $00001000;
  30163. end;
  30164. procedure TI2C1_I2C1CON.setSCLREL(thebits : TBits_1); inline;
  30165. begin
  30166. if thebits = 0 then
  30167. pTDefRegMap(@Self)^.clr := $00001000
  30168. else
  30169. pTDefRegMap(@Self)^.&set := $00001000;
  30170. end;
  30171. function TI2C1_I2C1CON.getSCLREL : TBits_1; inline;
  30172. begin
  30173. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  30174. end;
  30175. procedure TI2C1_I2C1CON.setSIDL; inline;
  30176. begin
  30177. pTDefRegMap(@Self)^.&set := $00002000;
  30178. end;
  30179. procedure TI2C1_I2C1CON.clearSIDL; inline;
  30180. begin
  30181. pTDefRegMap(@Self)^.clr := $00002000;
  30182. end;
  30183. procedure TI2C1_I2C1CON.setSIDL(thebits : TBits_1); inline;
  30184. begin
  30185. if thebits = 0 then
  30186. pTDefRegMap(@Self)^.clr := $00002000
  30187. else
  30188. pTDefRegMap(@Self)^.&set := $00002000;
  30189. end;
  30190. function TI2C1_I2C1CON.getSIDL : TBits_1; inline;
  30191. begin
  30192. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  30193. end;
  30194. procedure TI2C1_I2C1CON.setON; inline;
  30195. begin
  30196. pTDefRegMap(@Self)^.&set := $00008000;
  30197. end;
  30198. procedure TI2C1_I2C1CON.clearON; inline;
  30199. begin
  30200. pTDefRegMap(@Self)^.clr := $00008000;
  30201. end;
  30202. procedure TI2C1_I2C1CON.setON(thebits : TBits_1); inline;
  30203. begin
  30204. if thebits = 0 then
  30205. pTDefRegMap(@Self)^.clr := $00008000
  30206. else
  30207. pTDefRegMap(@Self)^.&set := $00008000;
  30208. end;
  30209. function TI2C1_I2C1CON.getON : TBits_1; inline;
  30210. begin
  30211. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  30212. end;
  30213. procedure TI2C1_I2C1CON.setIPMIEN; inline;
  30214. begin
  30215. pTDefRegMap(@Self)^.&set := $00000800;
  30216. end;
  30217. procedure TI2C1_I2C1CON.clearIPMIEN; inline;
  30218. begin
  30219. pTDefRegMap(@Self)^.clr := $00000800;
  30220. end;
  30221. procedure TI2C1_I2C1CON.setIPMIEN(thebits : TBits_1); inline;
  30222. begin
  30223. if thebits = 0 then
  30224. pTDefRegMap(@Self)^.clr := $00000800
  30225. else
  30226. pTDefRegMap(@Self)^.&set := $00000800;
  30227. end;
  30228. function TI2C1_I2C1CON.getIPMIEN : TBits_1; inline;
  30229. begin
  30230. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  30231. end;
  30232. procedure TI2C1_I2C1CON.setI2CSIDL; inline;
  30233. begin
  30234. pTDefRegMap(@Self)^.&set := $00002000;
  30235. end;
  30236. procedure TI2C1_I2C1CON.clearI2CSIDL; inline;
  30237. begin
  30238. pTDefRegMap(@Self)^.clr := $00002000;
  30239. end;
  30240. procedure TI2C1_I2C1CON.setI2CSIDL(thebits : TBits_1); inline;
  30241. begin
  30242. if thebits = 0 then
  30243. pTDefRegMap(@Self)^.clr := $00002000
  30244. else
  30245. pTDefRegMap(@Self)^.&set := $00002000;
  30246. end;
  30247. function TI2C1_I2C1CON.getI2CSIDL : TBits_1; inline;
  30248. begin
  30249. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  30250. end;
  30251. procedure TI2C1_I2C1CON.setI2CEN; inline;
  30252. begin
  30253. pTDefRegMap(@Self)^.&set := $00008000;
  30254. end;
  30255. procedure TI2C1_I2C1CON.clearI2CEN; inline;
  30256. begin
  30257. pTDefRegMap(@Self)^.clr := $00008000;
  30258. end;
  30259. procedure TI2C1_I2C1CON.setI2CEN(thebits : TBits_1); inline;
  30260. begin
  30261. if thebits = 0 then
  30262. pTDefRegMap(@Self)^.clr := $00008000
  30263. else
  30264. pTDefRegMap(@Self)^.&set := $00008000;
  30265. end;
  30266. function TI2C1_I2C1CON.getI2CEN : TBits_1; inline;
  30267. begin
  30268. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  30269. end;
  30270. procedure TI2C1_I2C1CON.setw(thebits : TBits_32); inline;
  30271. begin
  30272. pTDefRegMap(@Self)^.val := thebits;
  30273. end;
  30274. function TI2C1_I2C1CON.getw : TBits_32; inline;
  30275. begin
  30276. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30277. end;
  30278. procedure TI2C1_I2C1STAT.setTBF; inline;
  30279. begin
  30280. pTDefRegMap(@Self)^.&set := $00000001;
  30281. end;
  30282. procedure TI2C1_I2C1STAT.clearTBF; inline;
  30283. begin
  30284. pTDefRegMap(@Self)^.clr := $00000001;
  30285. end;
  30286. procedure TI2C1_I2C1STAT.setTBF(thebits : TBits_1); inline;
  30287. begin
  30288. if thebits = 0 then
  30289. pTDefRegMap(@Self)^.clr := $00000001
  30290. else
  30291. pTDefRegMap(@Self)^.&set := $00000001;
  30292. end;
  30293. function TI2C1_I2C1STAT.getTBF : TBits_1; inline;
  30294. begin
  30295. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  30296. end;
  30297. procedure TI2C1_I2C1STAT.setRBF; inline;
  30298. begin
  30299. pTDefRegMap(@Self)^.&set := $00000002;
  30300. end;
  30301. procedure TI2C1_I2C1STAT.clearRBF; inline;
  30302. begin
  30303. pTDefRegMap(@Self)^.clr := $00000002;
  30304. end;
  30305. procedure TI2C1_I2C1STAT.setRBF(thebits : TBits_1); inline;
  30306. begin
  30307. if thebits = 0 then
  30308. pTDefRegMap(@Self)^.clr := $00000002
  30309. else
  30310. pTDefRegMap(@Self)^.&set := $00000002;
  30311. end;
  30312. function TI2C1_I2C1STAT.getRBF : TBits_1; inline;
  30313. begin
  30314. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  30315. end;
  30316. procedure TI2C1_I2C1STAT.setR_W; inline;
  30317. begin
  30318. pTDefRegMap(@Self)^.&set := $00000004;
  30319. end;
  30320. procedure TI2C1_I2C1STAT.clearR_W; inline;
  30321. begin
  30322. pTDefRegMap(@Self)^.clr := $00000004;
  30323. end;
  30324. procedure TI2C1_I2C1STAT.setR_W(thebits : TBits_1); inline;
  30325. begin
  30326. if thebits = 0 then
  30327. pTDefRegMap(@Self)^.clr := $00000004
  30328. else
  30329. pTDefRegMap(@Self)^.&set := $00000004;
  30330. end;
  30331. function TI2C1_I2C1STAT.getR_W : TBits_1; inline;
  30332. begin
  30333. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  30334. end;
  30335. procedure TI2C1_I2C1STAT.setS; inline;
  30336. begin
  30337. pTDefRegMap(@Self)^.&set := $00000008;
  30338. end;
  30339. procedure TI2C1_I2C1STAT.clearS; inline;
  30340. begin
  30341. pTDefRegMap(@Self)^.clr := $00000008;
  30342. end;
  30343. procedure TI2C1_I2C1STAT.setS(thebits : TBits_1); inline;
  30344. begin
  30345. if thebits = 0 then
  30346. pTDefRegMap(@Self)^.clr := $00000008
  30347. else
  30348. pTDefRegMap(@Self)^.&set := $00000008;
  30349. end;
  30350. function TI2C1_I2C1STAT.getS : TBits_1; inline;
  30351. begin
  30352. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  30353. end;
  30354. procedure TI2C1_I2C1STAT.setP; inline;
  30355. begin
  30356. pTDefRegMap(@Self)^.&set := $00000010;
  30357. end;
  30358. procedure TI2C1_I2C1STAT.clearP; inline;
  30359. begin
  30360. pTDefRegMap(@Self)^.clr := $00000010;
  30361. end;
  30362. procedure TI2C1_I2C1STAT.setP(thebits : TBits_1); inline;
  30363. begin
  30364. if thebits = 0 then
  30365. pTDefRegMap(@Self)^.clr := $00000010
  30366. else
  30367. pTDefRegMap(@Self)^.&set := $00000010;
  30368. end;
  30369. function TI2C1_I2C1STAT.getP : TBits_1; inline;
  30370. begin
  30371. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  30372. end;
  30373. procedure TI2C1_I2C1STAT.setD_A; inline;
  30374. begin
  30375. pTDefRegMap(@Self)^.&set := $00000020;
  30376. end;
  30377. procedure TI2C1_I2C1STAT.clearD_A; inline;
  30378. begin
  30379. pTDefRegMap(@Self)^.clr := $00000020;
  30380. end;
  30381. procedure TI2C1_I2C1STAT.setD_A(thebits : TBits_1); inline;
  30382. begin
  30383. if thebits = 0 then
  30384. pTDefRegMap(@Self)^.clr := $00000020
  30385. else
  30386. pTDefRegMap(@Self)^.&set := $00000020;
  30387. end;
  30388. function TI2C1_I2C1STAT.getD_A : TBits_1; inline;
  30389. begin
  30390. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  30391. end;
  30392. procedure TI2C1_I2C1STAT.setI2COV; inline;
  30393. begin
  30394. pTDefRegMap(@Self)^.&set := $00000040;
  30395. end;
  30396. procedure TI2C1_I2C1STAT.clearI2COV; inline;
  30397. begin
  30398. pTDefRegMap(@Self)^.clr := $00000040;
  30399. end;
  30400. procedure TI2C1_I2C1STAT.setI2COV(thebits : TBits_1); inline;
  30401. begin
  30402. if thebits = 0 then
  30403. pTDefRegMap(@Self)^.clr := $00000040
  30404. else
  30405. pTDefRegMap(@Self)^.&set := $00000040;
  30406. end;
  30407. function TI2C1_I2C1STAT.getI2COV : TBits_1; inline;
  30408. begin
  30409. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30410. end;
  30411. procedure TI2C1_I2C1STAT.setIWCOL; inline;
  30412. begin
  30413. pTDefRegMap(@Self)^.&set := $00000080;
  30414. end;
  30415. procedure TI2C1_I2C1STAT.clearIWCOL; inline;
  30416. begin
  30417. pTDefRegMap(@Self)^.clr := $00000080;
  30418. end;
  30419. procedure TI2C1_I2C1STAT.setIWCOL(thebits : TBits_1); inline;
  30420. begin
  30421. if thebits = 0 then
  30422. pTDefRegMap(@Self)^.clr := $00000080
  30423. else
  30424. pTDefRegMap(@Self)^.&set := $00000080;
  30425. end;
  30426. function TI2C1_I2C1STAT.getIWCOL : TBits_1; inline;
  30427. begin
  30428. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  30429. end;
  30430. procedure TI2C1_I2C1STAT.setADD10; inline;
  30431. begin
  30432. pTDefRegMap(@Self)^.&set := $00000100;
  30433. end;
  30434. procedure TI2C1_I2C1STAT.clearADD10; inline;
  30435. begin
  30436. pTDefRegMap(@Self)^.clr := $00000100;
  30437. end;
  30438. procedure TI2C1_I2C1STAT.setADD10(thebits : TBits_1); inline;
  30439. begin
  30440. if thebits = 0 then
  30441. pTDefRegMap(@Self)^.clr := $00000100
  30442. else
  30443. pTDefRegMap(@Self)^.&set := $00000100;
  30444. end;
  30445. function TI2C1_I2C1STAT.getADD10 : TBits_1; inline;
  30446. begin
  30447. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  30448. end;
  30449. procedure TI2C1_I2C1STAT.setGCSTAT; inline;
  30450. begin
  30451. pTDefRegMap(@Self)^.&set := $00000200;
  30452. end;
  30453. procedure TI2C1_I2C1STAT.clearGCSTAT; inline;
  30454. begin
  30455. pTDefRegMap(@Self)^.clr := $00000200;
  30456. end;
  30457. procedure TI2C1_I2C1STAT.setGCSTAT(thebits : TBits_1); inline;
  30458. begin
  30459. if thebits = 0 then
  30460. pTDefRegMap(@Self)^.clr := $00000200
  30461. else
  30462. pTDefRegMap(@Self)^.&set := $00000200;
  30463. end;
  30464. function TI2C1_I2C1STAT.getGCSTAT : TBits_1; inline;
  30465. begin
  30466. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  30467. end;
  30468. procedure TI2C1_I2C1STAT.setBCL; inline;
  30469. begin
  30470. pTDefRegMap(@Self)^.&set := $00000400;
  30471. end;
  30472. procedure TI2C1_I2C1STAT.clearBCL; inline;
  30473. begin
  30474. pTDefRegMap(@Self)^.clr := $00000400;
  30475. end;
  30476. procedure TI2C1_I2C1STAT.setBCL(thebits : TBits_1); inline;
  30477. begin
  30478. if thebits = 0 then
  30479. pTDefRegMap(@Self)^.clr := $00000400
  30480. else
  30481. pTDefRegMap(@Self)^.&set := $00000400;
  30482. end;
  30483. function TI2C1_I2C1STAT.getBCL : TBits_1; inline;
  30484. begin
  30485. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  30486. end;
  30487. procedure TI2C1_I2C1STAT.setTRSTAT; inline;
  30488. begin
  30489. pTDefRegMap(@Self)^.&set := $00004000;
  30490. end;
  30491. procedure TI2C1_I2C1STAT.clearTRSTAT; inline;
  30492. begin
  30493. pTDefRegMap(@Self)^.clr := $00004000;
  30494. end;
  30495. procedure TI2C1_I2C1STAT.setTRSTAT(thebits : TBits_1); inline;
  30496. begin
  30497. if thebits = 0 then
  30498. pTDefRegMap(@Self)^.clr := $00004000
  30499. else
  30500. pTDefRegMap(@Self)^.&set := $00004000;
  30501. end;
  30502. function TI2C1_I2C1STAT.getTRSTAT : TBits_1; inline;
  30503. begin
  30504. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  30505. end;
  30506. procedure TI2C1_I2C1STAT.setACKSTAT; inline;
  30507. begin
  30508. pTDefRegMap(@Self)^.&set := $00008000;
  30509. end;
  30510. procedure TI2C1_I2C1STAT.clearACKSTAT; inline;
  30511. begin
  30512. pTDefRegMap(@Self)^.clr := $00008000;
  30513. end;
  30514. procedure TI2C1_I2C1STAT.setACKSTAT(thebits : TBits_1); inline;
  30515. begin
  30516. if thebits = 0 then
  30517. pTDefRegMap(@Self)^.clr := $00008000
  30518. else
  30519. pTDefRegMap(@Self)^.&set := $00008000;
  30520. end;
  30521. function TI2C1_I2C1STAT.getACKSTAT : TBits_1; inline;
  30522. begin
  30523. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  30524. end;
  30525. procedure TI2C1_I2C1STAT.setI2CPOV; inline;
  30526. begin
  30527. pTDefRegMap(@Self)^.&set := $00000040;
  30528. end;
  30529. procedure TI2C1_I2C1STAT.clearI2CPOV; inline;
  30530. begin
  30531. pTDefRegMap(@Self)^.clr := $00000040;
  30532. end;
  30533. procedure TI2C1_I2C1STAT.setI2CPOV(thebits : TBits_1); inline;
  30534. begin
  30535. if thebits = 0 then
  30536. pTDefRegMap(@Self)^.clr := $00000040
  30537. else
  30538. pTDefRegMap(@Self)^.&set := $00000040;
  30539. end;
  30540. function TI2C1_I2C1STAT.getI2CPOV : TBits_1; inline;
  30541. begin
  30542. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30543. end;
  30544. procedure TI2C1_I2C1STAT.setw(thebits : TBits_32); inline;
  30545. begin
  30546. pTDefRegMap(@Self)^.val := thebits;
  30547. end;
  30548. function TI2C1_I2C1STAT.getw : TBits_32; inline;
  30549. begin
  30550. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30551. end;
  30552. procedure TSPI3_SPI1ACON.setSRXISEL(thebits : TBits_2); inline;
  30553. begin
  30554. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  30555. end;
  30556. function TSPI3_SPI1ACON.getSRXISEL : TBits_2; inline;
  30557. begin
  30558. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  30559. end;
  30560. procedure TSPI3_SPI1ACON.setSTXISEL(thebits : TBits_2); inline;
  30561. begin
  30562. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  30563. end;
  30564. function TSPI3_SPI1ACON.getSTXISEL : TBits_2; inline;
  30565. begin
  30566. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  30567. end;
  30568. procedure TSPI3_SPI1ACON.setMSTEN; inline;
  30569. begin
  30570. pTDefRegMap(@Self)^.&set := $00000020;
  30571. end;
  30572. procedure TSPI3_SPI1ACON.clearMSTEN; inline;
  30573. begin
  30574. pTDefRegMap(@Self)^.clr := $00000020;
  30575. end;
  30576. procedure TSPI3_SPI1ACON.setMSTEN(thebits : TBits_1); inline;
  30577. begin
  30578. if thebits = 0 then
  30579. pTDefRegMap(@Self)^.clr := $00000020
  30580. else
  30581. pTDefRegMap(@Self)^.&set := $00000020;
  30582. end;
  30583. function TSPI3_SPI1ACON.getMSTEN : TBits_1; inline;
  30584. begin
  30585. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  30586. end;
  30587. procedure TSPI3_SPI1ACON.setCKP; inline;
  30588. begin
  30589. pTDefRegMap(@Self)^.&set := $00000040;
  30590. end;
  30591. procedure TSPI3_SPI1ACON.clearCKP; inline;
  30592. begin
  30593. pTDefRegMap(@Self)^.clr := $00000040;
  30594. end;
  30595. procedure TSPI3_SPI1ACON.setCKP(thebits : TBits_1); inline;
  30596. begin
  30597. if thebits = 0 then
  30598. pTDefRegMap(@Self)^.clr := $00000040
  30599. else
  30600. pTDefRegMap(@Self)^.&set := $00000040;
  30601. end;
  30602. function TSPI3_SPI1ACON.getCKP : TBits_1; inline;
  30603. begin
  30604. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30605. end;
  30606. procedure TSPI3_SPI1ACON.setSSEN; inline;
  30607. begin
  30608. pTDefRegMap(@Self)^.&set := $00000080;
  30609. end;
  30610. procedure TSPI3_SPI1ACON.clearSSEN; inline;
  30611. begin
  30612. pTDefRegMap(@Self)^.clr := $00000080;
  30613. end;
  30614. procedure TSPI3_SPI1ACON.setSSEN(thebits : TBits_1); inline;
  30615. begin
  30616. if thebits = 0 then
  30617. pTDefRegMap(@Self)^.clr := $00000080
  30618. else
  30619. pTDefRegMap(@Self)^.&set := $00000080;
  30620. end;
  30621. function TSPI3_SPI1ACON.getSSEN : TBits_1; inline;
  30622. begin
  30623. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  30624. end;
  30625. procedure TSPI3_SPI1ACON.setCKE; inline;
  30626. begin
  30627. pTDefRegMap(@Self)^.&set := $00000100;
  30628. end;
  30629. procedure TSPI3_SPI1ACON.clearCKE; inline;
  30630. begin
  30631. pTDefRegMap(@Self)^.clr := $00000100;
  30632. end;
  30633. procedure TSPI3_SPI1ACON.setCKE(thebits : TBits_1); inline;
  30634. begin
  30635. if thebits = 0 then
  30636. pTDefRegMap(@Self)^.clr := $00000100
  30637. else
  30638. pTDefRegMap(@Self)^.&set := $00000100;
  30639. end;
  30640. function TSPI3_SPI1ACON.getCKE : TBits_1; inline;
  30641. begin
  30642. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  30643. end;
  30644. procedure TSPI3_SPI1ACON.setSMP; inline;
  30645. begin
  30646. pTDefRegMap(@Self)^.&set := $00000200;
  30647. end;
  30648. procedure TSPI3_SPI1ACON.clearSMP; inline;
  30649. begin
  30650. pTDefRegMap(@Self)^.clr := $00000200;
  30651. end;
  30652. procedure TSPI3_SPI1ACON.setSMP(thebits : TBits_1); inline;
  30653. begin
  30654. if thebits = 0 then
  30655. pTDefRegMap(@Self)^.clr := $00000200
  30656. else
  30657. pTDefRegMap(@Self)^.&set := $00000200;
  30658. end;
  30659. function TSPI3_SPI1ACON.getSMP : TBits_1; inline;
  30660. begin
  30661. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  30662. end;
  30663. procedure TSPI3_SPI1ACON.setMODE16; inline;
  30664. begin
  30665. pTDefRegMap(@Self)^.&set := $00000400;
  30666. end;
  30667. procedure TSPI3_SPI1ACON.clearMODE16; inline;
  30668. begin
  30669. pTDefRegMap(@Self)^.clr := $00000400;
  30670. end;
  30671. procedure TSPI3_SPI1ACON.setMODE16(thebits : TBits_1); inline;
  30672. begin
  30673. if thebits = 0 then
  30674. pTDefRegMap(@Self)^.clr := $00000400
  30675. else
  30676. pTDefRegMap(@Self)^.&set := $00000400;
  30677. end;
  30678. function TSPI3_SPI1ACON.getMODE16 : TBits_1; inline;
  30679. begin
  30680. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  30681. end;
  30682. procedure TSPI3_SPI1ACON.setMODE32; inline;
  30683. begin
  30684. pTDefRegMap(@Self)^.&set := $00000800;
  30685. end;
  30686. procedure TSPI3_SPI1ACON.clearMODE32; inline;
  30687. begin
  30688. pTDefRegMap(@Self)^.clr := $00000800;
  30689. end;
  30690. procedure TSPI3_SPI1ACON.setMODE32(thebits : TBits_1); inline;
  30691. begin
  30692. if thebits = 0 then
  30693. pTDefRegMap(@Self)^.clr := $00000800
  30694. else
  30695. pTDefRegMap(@Self)^.&set := $00000800;
  30696. end;
  30697. function TSPI3_SPI1ACON.getMODE32 : TBits_1; inline;
  30698. begin
  30699. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  30700. end;
  30701. procedure TSPI3_SPI1ACON.setDISSDO; inline;
  30702. begin
  30703. pTDefRegMap(@Self)^.&set := $00001000;
  30704. end;
  30705. procedure TSPI3_SPI1ACON.clearDISSDO; inline;
  30706. begin
  30707. pTDefRegMap(@Self)^.clr := $00001000;
  30708. end;
  30709. procedure TSPI3_SPI1ACON.setDISSDO(thebits : TBits_1); inline;
  30710. begin
  30711. if thebits = 0 then
  30712. pTDefRegMap(@Self)^.clr := $00001000
  30713. else
  30714. pTDefRegMap(@Self)^.&set := $00001000;
  30715. end;
  30716. function TSPI3_SPI1ACON.getDISSDO : TBits_1; inline;
  30717. begin
  30718. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  30719. end;
  30720. procedure TSPI3_SPI1ACON.setSIDL; inline;
  30721. begin
  30722. pTDefRegMap(@Self)^.&set := $00002000;
  30723. end;
  30724. procedure TSPI3_SPI1ACON.clearSIDL; inline;
  30725. begin
  30726. pTDefRegMap(@Self)^.clr := $00002000;
  30727. end;
  30728. procedure TSPI3_SPI1ACON.setSIDL(thebits : TBits_1); inline;
  30729. begin
  30730. if thebits = 0 then
  30731. pTDefRegMap(@Self)^.clr := $00002000
  30732. else
  30733. pTDefRegMap(@Self)^.&set := $00002000;
  30734. end;
  30735. function TSPI3_SPI1ACON.getSIDL : TBits_1; inline;
  30736. begin
  30737. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  30738. end;
  30739. procedure TSPI3_SPI1ACON.setON; inline;
  30740. begin
  30741. pTDefRegMap(@Self)^.&set := $00008000;
  30742. end;
  30743. procedure TSPI3_SPI1ACON.clearON; inline;
  30744. begin
  30745. pTDefRegMap(@Self)^.clr := $00008000;
  30746. end;
  30747. procedure TSPI3_SPI1ACON.setON(thebits : TBits_1); inline;
  30748. begin
  30749. if thebits = 0 then
  30750. pTDefRegMap(@Self)^.clr := $00008000
  30751. else
  30752. pTDefRegMap(@Self)^.&set := $00008000;
  30753. end;
  30754. function TSPI3_SPI1ACON.getON : TBits_1; inline;
  30755. begin
  30756. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  30757. end;
  30758. procedure TSPI3_SPI1ACON.setENHBUF; inline;
  30759. begin
  30760. pTDefRegMap(@Self)^.&set := $00010000;
  30761. end;
  30762. procedure TSPI3_SPI1ACON.clearENHBUF; inline;
  30763. begin
  30764. pTDefRegMap(@Self)^.clr := $00010000;
  30765. end;
  30766. procedure TSPI3_SPI1ACON.setENHBUF(thebits : TBits_1); inline;
  30767. begin
  30768. if thebits = 0 then
  30769. pTDefRegMap(@Self)^.clr := $00010000
  30770. else
  30771. pTDefRegMap(@Self)^.&set := $00010000;
  30772. end;
  30773. function TSPI3_SPI1ACON.getENHBUF : TBits_1; inline;
  30774. begin
  30775. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  30776. end;
  30777. procedure TSPI3_SPI1ACON.setSPIFE; inline;
  30778. begin
  30779. pTDefRegMap(@Self)^.&set := $00020000;
  30780. end;
  30781. procedure TSPI3_SPI1ACON.clearSPIFE; inline;
  30782. begin
  30783. pTDefRegMap(@Self)^.clr := $00020000;
  30784. end;
  30785. procedure TSPI3_SPI1ACON.setSPIFE(thebits : TBits_1); inline;
  30786. begin
  30787. if thebits = 0 then
  30788. pTDefRegMap(@Self)^.clr := $00020000
  30789. else
  30790. pTDefRegMap(@Self)^.&set := $00020000;
  30791. end;
  30792. function TSPI3_SPI1ACON.getSPIFE : TBits_1; inline;
  30793. begin
  30794. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  30795. end;
  30796. procedure TSPI3_SPI1ACON.setFRMCNT(thebits : TBits_3); inline;
  30797. begin
  30798. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  30799. end;
  30800. function TSPI3_SPI1ACON.getFRMCNT : TBits_3; inline;
  30801. begin
  30802. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  30803. end;
  30804. procedure TSPI3_SPI1ACON.setFRMSYPW; inline;
  30805. begin
  30806. pTDefRegMap(@Self)^.&set := $08000000;
  30807. end;
  30808. procedure TSPI3_SPI1ACON.clearFRMSYPW; inline;
  30809. begin
  30810. pTDefRegMap(@Self)^.clr := $08000000;
  30811. end;
  30812. procedure TSPI3_SPI1ACON.setFRMSYPW(thebits : TBits_1); inline;
  30813. begin
  30814. if thebits = 0 then
  30815. pTDefRegMap(@Self)^.clr := $08000000
  30816. else
  30817. pTDefRegMap(@Self)^.&set := $08000000;
  30818. end;
  30819. function TSPI3_SPI1ACON.getFRMSYPW : TBits_1; inline;
  30820. begin
  30821. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  30822. end;
  30823. procedure TSPI3_SPI1ACON.setMSSEN; inline;
  30824. begin
  30825. pTDefRegMap(@Self)^.&set := $10000000;
  30826. end;
  30827. procedure TSPI3_SPI1ACON.clearMSSEN; inline;
  30828. begin
  30829. pTDefRegMap(@Self)^.clr := $10000000;
  30830. end;
  30831. procedure TSPI3_SPI1ACON.setMSSEN(thebits : TBits_1); inline;
  30832. begin
  30833. if thebits = 0 then
  30834. pTDefRegMap(@Self)^.clr := $10000000
  30835. else
  30836. pTDefRegMap(@Self)^.&set := $10000000;
  30837. end;
  30838. function TSPI3_SPI1ACON.getMSSEN : TBits_1; inline;
  30839. begin
  30840. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  30841. end;
  30842. procedure TSPI3_SPI1ACON.setFRMPOL; inline;
  30843. begin
  30844. pTDefRegMap(@Self)^.&set := $20000000;
  30845. end;
  30846. procedure TSPI3_SPI1ACON.clearFRMPOL; inline;
  30847. begin
  30848. pTDefRegMap(@Self)^.clr := $20000000;
  30849. end;
  30850. procedure TSPI3_SPI1ACON.setFRMPOL(thebits : TBits_1); inline;
  30851. begin
  30852. if thebits = 0 then
  30853. pTDefRegMap(@Self)^.clr := $20000000
  30854. else
  30855. pTDefRegMap(@Self)^.&set := $20000000;
  30856. end;
  30857. function TSPI3_SPI1ACON.getFRMPOL : TBits_1; inline;
  30858. begin
  30859. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  30860. end;
  30861. procedure TSPI3_SPI1ACON.setFRMSYNC; inline;
  30862. begin
  30863. pTDefRegMap(@Self)^.&set := $40000000;
  30864. end;
  30865. procedure TSPI3_SPI1ACON.clearFRMSYNC; inline;
  30866. begin
  30867. pTDefRegMap(@Self)^.clr := $40000000;
  30868. end;
  30869. procedure TSPI3_SPI1ACON.setFRMSYNC(thebits : TBits_1); inline;
  30870. begin
  30871. if thebits = 0 then
  30872. pTDefRegMap(@Self)^.clr := $40000000
  30873. else
  30874. pTDefRegMap(@Self)^.&set := $40000000;
  30875. end;
  30876. function TSPI3_SPI1ACON.getFRMSYNC : TBits_1; inline;
  30877. begin
  30878. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  30879. end;
  30880. procedure TSPI3_SPI1ACON.setFRMEN; inline;
  30881. begin
  30882. pTDefRegMap(@Self)^.&set := $80000000;
  30883. end;
  30884. procedure TSPI3_SPI1ACON.clearFRMEN; inline;
  30885. begin
  30886. pTDefRegMap(@Self)^.clr := $80000000;
  30887. end;
  30888. procedure TSPI3_SPI1ACON.setFRMEN(thebits : TBits_1); inline;
  30889. begin
  30890. if thebits = 0 then
  30891. pTDefRegMap(@Self)^.clr := $80000000
  30892. else
  30893. pTDefRegMap(@Self)^.&set := $80000000;
  30894. end;
  30895. function TSPI3_SPI1ACON.getFRMEN : TBits_1; inline;
  30896. begin
  30897. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  30898. end;
  30899. procedure TSPI3_SPI1ACON.setw(thebits : TBits_32); inline;
  30900. begin
  30901. pTDefRegMap(@Self)^.val := thebits;
  30902. end;
  30903. function TSPI3_SPI1ACON.getw : TBits_32; inline;
  30904. begin
  30905. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30906. end;
  30907. procedure TSPI3_SPI3CON.setSRXISEL(thebits : TBits_2); inline;
  30908. begin
  30909. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  30910. end;
  30911. function TSPI3_SPI3CON.getSRXISEL : TBits_2; inline;
  30912. begin
  30913. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  30914. end;
  30915. procedure TSPI3_SPI3CON.setSTXISEL(thebits : TBits_2); inline;
  30916. begin
  30917. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  30918. end;
  30919. function TSPI3_SPI3CON.getSTXISEL : TBits_2; inline;
  30920. begin
  30921. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  30922. end;
  30923. procedure TSPI3_SPI3CON.setMSTEN; inline;
  30924. begin
  30925. pTDefRegMap(@Self)^.&set := $00000020;
  30926. end;
  30927. procedure TSPI3_SPI3CON.clearMSTEN; inline;
  30928. begin
  30929. pTDefRegMap(@Self)^.clr := $00000020;
  30930. end;
  30931. procedure TSPI3_SPI3CON.setMSTEN(thebits : TBits_1); inline;
  30932. begin
  30933. if thebits = 0 then
  30934. pTDefRegMap(@Self)^.clr := $00000020
  30935. else
  30936. pTDefRegMap(@Self)^.&set := $00000020;
  30937. end;
  30938. function TSPI3_SPI3CON.getMSTEN : TBits_1; inline;
  30939. begin
  30940. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  30941. end;
  30942. procedure TSPI3_SPI3CON.setCKP; inline;
  30943. begin
  30944. pTDefRegMap(@Self)^.&set := $00000040;
  30945. end;
  30946. procedure TSPI3_SPI3CON.clearCKP; inline;
  30947. begin
  30948. pTDefRegMap(@Self)^.clr := $00000040;
  30949. end;
  30950. procedure TSPI3_SPI3CON.setCKP(thebits : TBits_1); inline;
  30951. begin
  30952. if thebits = 0 then
  30953. pTDefRegMap(@Self)^.clr := $00000040
  30954. else
  30955. pTDefRegMap(@Self)^.&set := $00000040;
  30956. end;
  30957. function TSPI3_SPI3CON.getCKP : TBits_1; inline;
  30958. begin
  30959. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30960. end;
  30961. procedure TSPI3_SPI3CON.setSSEN; inline;
  30962. begin
  30963. pTDefRegMap(@Self)^.&set := $00000080;
  30964. end;
  30965. procedure TSPI3_SPI3CON.clearSSEN; inline;
  30966. begin
  30967. pTDefRegMap(@Self)^.clr := $00000080;
  30968. end;
  30969. procedure TSPI3_SPI3CON.setSSEN(thebits : TBits_1); inline;
  30970. begin
  30971. if thebits = 0 then
  30972. pTDefRegMap(@Self)^.clr := $00000080
  30973. else
  30974. pTDefRegMap(@Self)^.&set := $00000080;
  30975. end;
  30976. function TSPI3_SPI3CON.getSSEN : TBits_1; inline;
  30977. begin
  30978. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  30979. end;
  30980. procedure TSPI3_SPI3CON.setCKE; inline;
  30981. begin
  30982. pTDefRegMap(@Self)^.&set := $00000100;
  30983. end;
  30984. procedure TSPI3_SPI3CON.clearCKE; inline;
  30985. begin
  30986. pTDefRegMap(@Self)^.clr := $00000100;
  30987. end;
  30988. procedure TSPI3_SPI3CON.setCKE(thebits : TBits_1); inline;
  30989. begin
  30990. if thebits = 0 then
  30991. pTDefRegMap(@Self)^.clr := $00000100
  30992. else
  30993. pTDefRegMap(@Self)^.&set := $00000100;
  30994. end;
  30995. function TSPI3_SPI3CON.getCKE : TBits_1; inline;
  30996. begin
  30997. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  30998. end;
  30999. procedure TSPI3_SPI3CON.setSMP; inline;
  31000. begin
  31001. pTDefRegMap(@Self)^.&set := $00000200;
  31002. end;
  31003. procedure TSPI3_SPI3CON.clearSMP; inline;
  31004. begin
  31005. pTDefRegMap(@Self)^.clr := $00000200;
  31006. end;
  31007. procedure TSPI3_SPI3CON.setSMP(thebits : TBits_1); inline;
  31008. begin
  31009. if thebits = 0 then
  31010. pTDefRegMap(@Self)^.clr := $00000200
  31011. else
  31012. pTDefRegMap(@Self)^.&set := $00000200;
  31013. end;
  31014. function TSPI3_SPI3CON.getSMP : TBits_1; inline;
  31015. begin
  31016. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  31017. end;
  31018. procedure TSPI3_SPI3CON.setMODE16; inline;
  31019. begin
  31020. pTDefRegMap(@Self)^.&set := $00000400;
  31021. end;
  31022. procedure TSPI3_SPI3CON.clearMODE16; inline;
  31023. begin
  31024. pTDefRegMap(@Self)^.clr := $00000400;
  31025. end;
  31026. procedure TSPI3_SPI3CON.setMODE16(thebits : TBits_1); inline;
  31027. begin
  31028. if thebits = 0 then
  31029. pTDefRegMap(@Self)^.clr := $00000400
  31030. else
  31031. pTDefRegMap(@Self)^.&set := $00000400;
  31032. end;
  31033. function TSPI3_SPI3CON.getMODE16 : TBits_1; inline;
  31034. begin
  31035. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  31036. end;
  31037. procedure TSPI3_SPI3CON.setMODE32; inline;
  31038. begin
  31039. pTDefRegMap(@Self)^.&set := $00000800;
  31040. end;
  31041. procedure TSPI3_SPI3CON.clearMODE32; inline;
  31042. begin
  31043. pTDefRegMap(@Self)^.clr := $00000800;
  31044. end;
  31045. procedure TSPI3_SPI3CON.setMODE32(thebits : TBits_1); inline;
  31046. begin
  31047. if thebits = 0 then
  31048. pTDefRegMap(@Self)^.clr := $00000800
  31049. else
  31050. pTDefRegMap(@Self)^.&set := $00000800;
  31051. end;
  31052. function TSPI3_SPI3CON.getMODE32 : TBits_1; inline;
  31053. begin
  31054. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31055. end;
  31056. procedure TSPI3_SPI3CON.setDISSDO; inline;
  31057. begin
  31058. pTDefRegMap(@Self)^.&set := $00001000;
  31059. end;
  31060. procedure TSPI3_SPI3CON.clearDISSDO; inline;
  31061. begin
  31062. pTDefRegMap(@Self)^.clr := $00001000;
  31063. end;
  31064. procedure TSPI3_SPI3CON.setDISSDO(thebits : TBits_1); inline;
  31065. begin
  31066. if thebits = 0 then
  31067. pTDefRegMap(@Self)^.clr := $00001000
  31068. else
  31069. pTDefRegMap(@Self)^.&set := $00001000;
  31070. end;
  31071. function TSPI3_SPI3CON.getDISSDO : TBits_1; inline;
  31072. begin
  31073. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  31074. end;
  31075. procedure TSPI3_SPI3CON.setSIDL; inline;
  31076. begin
  31077. pTDefRegMap(@Self)^.&set := $00002000;
  31078. end;
  31079. procedure TSPI3_SPI3CON.clearSIDL; inline;
  31080. begin
  31081. pTDefRegMap(@Self)^.clr := $00002000;
  31082. end;
  31083. procedure TSPI3_SPI3CON.setSIDL(thebits : TBits_1); inline;
  31084. begin
  31085. if thebits = 0 then
  31086. pTDefRegMap(@Self)^.clr := $00002000
  31087. else
  31088. pTDefRegMap(@Self)^.&set := $00002000;
  31089. end;
  31090. function TSPI3_SPI3CON.getSIDL : TBits_1; inline;
  31091. begin
  31092. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31093. end;
  31094. procedure TSPI3_SPI3CON.setON; inline;
  31095. begin
  31096. pTDefRegMap(@Self)^.&set := $00008000;
  31097. end;
  31098. procedure TSPI3_SPI3CON.clearON; inline;
  31099. begin
  31100. pTDefRegMap(@Self)^.clr := $00008000;
  31101. end;
  31102. procedure TSPI3_SPI3CON.setON(thebits : TBits_1); inline;
  31103. begin
  31104. if thebits = 0 then
  31105. pTDefRegMap(@Self)^.clr := $00008000
  31106. else
  31107. pTDefRegMap(@Self)^.&set := $00008000;
  31108. end;
  31109. function TSPI3_SPI3CON.getON : TBits_1; inline;
  31110. begin
  31111. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31112. end;
  31113. procedure TSPI3_SPI3CON.setENHBUF; inline;
  31114. begin
  31115. pTDefRegMap(@Self)^.&set := $00010000;
  31116. end;
  31117. procedure TSPI3_SPI3CON.clearENHBUF; inline;
  31118. begin
  31119. pTDefRegMap(@Self)^.clr := $00010000;
  31120. end;
  31121. procedure TSPI3_SPI3CON.setENHBUF(thebits : TBits_1); inline;
  31122. begin
  31123. if thebits = 0 then
  31124. pTDefRegMap(@Self)^.clr := $00010000
  31125. else
  31126. pTDefRegMap(@Self)^.&set := $00010000;
  31127. end;
  31128. function TSPI3_SPI3CON.getENHBUF : TBits_1; inline;
  31129. begin
  31130. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  31131. end;
  31132. procedure TSPI3_SPI3CON.setSPIFE; inline;
  31133. begin
  31134. pTDefRegMap(@Self)^.&set := $00020000;
  31135. end;
  31136. procedure TSPI3_SPI3CON.clearSPIFE; inline;
  31137. begin
  31138. pTDefRegMap(@Self)^.clr := $00020000;
  31139. end;
  31140. procedure TSPI3_SPI3CON.setSPIFE(thebits : TBits_1); inline;
  31141. begin
  31142. if thebits = 0 then
  31143. pTDefRegMap(@Self)^.clr := $00020000
  31144. else
  31145. pTDefRegMap(@Self)^.&set := $00020000;
  31146. end;
  31147. function TSPI3_SPI3CON.getSPIFE : TBits_1; inline;
  31148. begin
  31149. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  31150. end;
  31151. procedure TSPI3_SPI3CON.setFRMCNT(thebits : TBits_3); inline;
  31152. begin
  31153. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  31154. end;
  31155. function TSPI3_SPI3CON.getFRMCNT : TBits_3; inline;
  31156. begin
  31157. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  31158. end;
  31159. procedure TSPI3_SPI3CON.setFRMSYPW; inline;
  31160. begin
  31161. pTDefRegMap(@Self)^.&set := $08000000;
  31162. end;
  31163. procedure TSPI3_SPI3CON.clearFRMSYPW; inline;
  31164. begin
  31165. pTDefRegMap(@Self)^.clr := $08000000;
  31166. end;
  31167. procedure TSPI3_SPI3CON.setFRMSYPW(thebits : TBits_1); inline;
  31168. begin
  31169. if thebits = 0 then
  31170. pTDefRegMap(@Self)^.clr := $08000000
  31171. else
  31172. pTDefRegMap(@Self)^.&set := $08000000;
  31173. end;
  31174. function TSPI3_SPI3CON.getFRMSYPW : TBits_1; inline;
  31175. begin
  31176. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  31177. end;
  31178. procedure TSPI3_SPI3CON.setMSSEN; inline;
  31179. begin
  31180. pTDefRegMap(@Self)^.&set := $10000000;
  31181. end;
  31182. procedure TSPI3_SPI3CON.clearMSSEN; inline;
  31183. begin
  31184. pTDefRegMap(@Self)^.clr := $10000000;
  31185. end;
  31186. procedure TSPI3_SPI3CON.setMSSEN(thebits : TBits_1); inline;
  31187. begin
  31188. if thebits = 0 then
  31189. pTDefRegMap(@Self)^.clr := $10000000
  31190. else
  31191. pTDefRegMap(@Self)^.&set := $10000000;
  31192. end;
  31193. function TSPI3_SPI3CON.getMSSEN : TBits_1; inline;
  31194. begin
  31195. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  31196. end;
  31197. procedure TSPI3_SPI3CON.setFRMPOL; inline;
  31198. begin
  31199. pTDefRegMap(@Self)^.&set := $20000000;
  31200. end;
  31201. procedure TSPI3_SPI3CON.clearFRMPOL; inline;
  31202. begin
  31203. pTDefRegMap(@Self)^.clr := $20000000;
  31204. end;
  31205. procedure TSPI3_SPI3CON.setFRMPOL(thebits : TBits_1); inline;
  31206. begin
  31207. if thebits = 0 then
  31208. pTDefRegMap(@Self)^.clr := $20000000
  31209. else
  31210. pTDefRegMap(@Self)^.&set := $20000000;
  31211. end;
  31212. function TSPI3_SPI3CON.getFRMPOL : TBits_1; inline;
  31213. begin
  31214. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  31215. end;
  31216. procedure TSPI3_SPI3CON.setFRMSYNC; inline;
  31217. begin
  31218. pTDefRegMap(@Self)^.&set := $40000000;
  31219. end;
  31220. procedure TSPI3_SPI3CON.clearFRMSYNC; inline;
  31221. begin
  31222. pTDefRegMap(@Self)^.clr := $40000000;
  31223. end;
  31224. procedure TSPI3_SPI3CON.setFRMSYNC(thebits : TBits_1); inline;
  31225. begin
  31226. if thebits = 0 then
  31227. pTDefRegMap(@Self)^.clr := $40000000
  31228. else
  31229. pTDefRegMap(@Self)^.&set := $40000000;
  31230. end;
  31231. function TSPI3_SPI3CON.getFRMSYNC : TBits_1; inline;
  31232. begin
  31233. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  31234. end;
  31235. procedure TSPI3_SPI3CON.setFRMEN; inline;
  31236. begin
  31237. pTDefRegMap(@Self)^.&set := $80000000;
  31238. end;
  31239. procedure TSPI3_SPI3CON.clearFRMEN; inline;
  31240. begin
  31241. pTDefRegMap(@Self)^.clr := $80000000;
  31242. end;
  31243. procedure TSPI3_SPI3CON.setFRMEN(thebits : TBits_1); inline;
  31244. begin
  31245. if thebits = 0 then
  31246. pTDefRegMap(@Self)^.clr := $80000000
  31247. else
  31248. pTDefRegMap(@Self)^.&set := $80000000;
  31249. end;
  31250. function TSPI3_SPI3CON.getFRMEN : TBits_1; inline;
  31251. begin
  31252. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  31253. end;
  31254. procedure TSPI3_SPI3CON.setw(thebits : TBits_32); inline;
  31255. begin
  31256. pTDefRegMap(@Self)^.val := thebits;
  31257. end;
  31258. function TSPI3_SPI3CON.getw : TBits_32; inline;
  31259. begin
  31260. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31261. end;
  31262. procedure TSPI3_SPI1ASTAT.setSPIRBF; inline;
  31263. begin
  31264. pTDefRegMap(@Self)^.&set := $00000001;
  31265. end;
  31266. procedure TSPI3_SPI1ASTAT.clearSPIRBF; inline;
  31267. begin
  31268. pTDefRegMap(@Self)^.clr := $00000001;
  31269. end;
  31270. procedure TSPI3_SPI1ASTAT.setSPIRBF(thebits : TBits_1); inline;
  31271. begin
  31272. if thebits = 0 then
  31273. pTDefRegMap(@Self)^.clr := $00000001
  31274. else
  31275. pTDefRegMap(@Self)^.&set := $00000001;
  31276. end;
  31277. function TSPI3_SPI1ASTAT.getSPIRBF : TBits_1; inline;
  31278. begin
  31279. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  31280. end;
  31281. procedure TSPI3_SPI1ASTAT.setSPITBF; inline;
  31282. begin
  31283. pTDefRegMap(@Self)^.&set := $00000002;
  31284. end;
  31285. procedure TSPI3_SPI1ASTAT.clearSPITBF; inline;
  31286. begin
  31287. pTDefRegMap(@Self)^.clr := $00000002;
  31288. end;
  31289. procedure TSPI3_SPI1ASTAT.setSPITBF(thebits : TBits_1); inline;
  31290. begin
  31291. if thebits = 0 then
  31292. pTDefRegMap(@Self)^.clr := $00000002
  31293. else
  31294. pTDefRegMap(@Self)^.&set := $00000002;
  31295. end;
  31296. function TSPI3_SPI1ASTAT.getSPITBF : TBits_1; inline;
  31297. begin
  31298. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  31299. end;
  31300. procedure TSPI3_SPI1ASTAT.setSPITBE; inline;
  31301. begin
  31302. pTDefRegMap(@Self)^.&set := $00000008;
  31303. end;
  31304. procedure TSPI3_SPI1ASTAT.clearSPITBE; inline;
  31305. begin
  31306. pTDefRegMap(@Self)^.clr := $00000008;
  31307. end;
  31308. procedure TSPI3_SPI1ASTAT.setSPITBE(thebits : TBits_1); inline;
  31309. begin
  31310. if thebits = 0 then
  31311. pTDefRegMap(@Self)^.clr := $00000008
  31312. else
  31313. pTDefRegMap(@Self)^.&set := $00000008;
  31314. end;
  31315. function TSPI3_SPI1ASTAT.getSPITBE : TBits_1; inline;
  31316. begin
  31317. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  31318. end;
  31319. procedure TSPI3_SPI1ASTAT.setSPIRBE; inline;
  31320. begin
  31321. pTDefRegMap(@Self)^.&set := $00000020;
  31322. end;
  31323. procedure TSPI3_SPI1ASTAT.clearSPIRBE; inline;
  31324. begin
  31325. pTDefRegMap(@Self)^.clr := $00000020;
  31326. end;
  31327. procedure TSPI3_SPI1ASTAT.setSPIRBE(thebits : TBits_1); inline;
  31328. begin
  31329. if thebits = 0 then
  31330. pTDefRegMap(@Self)^.clr := $00000020
  31331. else
  31332. pTDefRegMap(@Self)^.&set := $00000020;
  31333. end;
  31334. function TSPI3_SPI1ASTAT.getSPIRBE : TBits_1; inline;
  31335. begin
  31336. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31337. end;
  31338. procedure TSPI3_SPI1ASTAT.setSPIROV; inline;
  31339. begin
  31340. pTDefRegMap(@Self)^.&set := $00000040;
  31341. end;
  31342. procedure TSPI3_SPI1ASTAT.clearSPIROV; inline;
  31343. begin
  31344. pTDefRegMap(@Self)^.clr := $00000040;
  31345. end;
  31346. procedure TSPI3_SPI1ASTAT.setSPIROV(thebits : TBits_1); inline;
  31347. begin
  31348. if thebits = 0 then
  31349. pTDefRegMap(@Self)^.clr := $00000040
  31350. else
  31351. pTDefRegMap(@Self)^.&set := $00000040;
  31352. end;
  31353. function TSPI3_SPI1ASTAT.getSPIROV : TBits_1; inline;
  31354. begin
  31355. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31356. end;
  31357. procedure TSPI3_SPI1ASTAT.setSRMT; inline;
  31358. begin
  31359. pTDefRegMap(@Self)^.&set := $00000080;
  31360. end;
  31361. procedure TSPI3_SPI1ASTAT.clearSRMT; inline;
  31362. begin
  31363. pTDefRegMap(@Self)^.clr := $00000080;
  31364. end;
  31365. procedure TSPI3_SPI1ASTAT.setSRMT(thebits : TBits_1); inline;
  31366. begin
  31367. if thebits = 0 then
  31368. pTDefRegMap(@Self)^.clr := $00000080
  31369. else
  31370. pTDefRegMap(@Self)^.&set := $00000080;
  31371. end;
  31372. function TSPI3_SPI1ASTAT.getSRMT : TBits_1; inline;
  31373. begin
  31374. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31375. end;
  31376. procedure TSPI3_SPI1ASTAT.setSPITUR; inline;
  31377. begin
  31378. pTDefRegMap(@Self)^.&set := $00000100;
  31379. end;
  31380. procedure TSPI3_SPI1ASTAT.clearSPITUR; inline;
  31381. begin
  31382. pTDefRegMap(@Self)^.clr := $00000100;
  31383. end;
  31384. procedure TSPI3_SPI1ASTAT.setSPITUR(thebits : TBits_1); inline;
  31385. begin
  31386. if thebits = 0 then
  31387. pTDefRegMap(@Self)^.clr := $00000100
  31388. else
  31389. pTDefRegMap(@Self)^.&set := $00000100;
  31390. end;
  31391. function TSPI3_SPI1ASTAT.getSPITUR : TBits_1; inline;
  31392. begin
  31393. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  31394. end;
  31395. procedure TSPI3_SPI1ASTAT.setSPIBUSY; inline;
  31396. begin
  31397. pTDefRegMap(@Self)^.&set := $00000800;
  31398. end;
  31399. procedure TSPI3_SPI1ASTAT.clearSPIBUSY; inline;
  31400. begin
  31401. pTDefRegMap(@Self)^.clr := $00000800;
  31402. end;
  31403. procedure TSPI3_SPI1ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  31404. begin
  31405. if thebits = 0 then
  31406. pTDefRegMap(@Self)^.clr := $00000800
  31407. else
  31408. pTDefRegMap(@Self)^.&set := $00000800;
  31409. end;
  31410. function TSPI3_SPI1ASTAT.getSPIBUSY : TBits_1; inline;
  31411. begin
  31412. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31413. end;
  31414. procedure TSPI3_SPI1ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  31415. begin
  31416. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  31417. end;
  31418. function TSPI3_SPI1ASTAT.getTXBUFELM : TBits_5; inline;
  31419. begin
  31420. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  31421. end;
  31422. procedure TSPI3_SPI1ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  31423. begin
  31424. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  31425. end;
  31426. function TSPI3_SPI1ASTAT.getRXBUFELM : TBits_5; inline;
  31427. begin
  31428. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  31429. end;
  31430. procedure TSPI3_SPI1ASTAT.setw(thebits : TBits_32); inline;
  31431. begin
  31432. pTDefRegMap(@Self)^.val := thebits;
  31433. end;
  31434. function TSPI3_SPI1ASTAT.getw : TBits_32; inline;
  31435. begin
  31436. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31437. end;
  31438. procedure TSPI3_SPI3STAT.setSPIRBF; inline;
  31439. begin
  31440. pTDefRegMap(@Self)^.&set := $00000001;
  31441. end;
  31442. procedure TSPI3_SPI3STAT.clearSPIRBF; inline;
  31443. begin
  31444. pTDefRegMap(@Self)^.clr := $00000001;
  31445. end;
  31446. procedure TSPI3_SPI3STAT.setSPIRBF(thebits : TBits_1); inline;
  31447. begin
  31448. if thebits = 0 then
  31449. pTDefRegMap(@Self)^.clr := $00000001
  31450. else
  31451. pTDefRegMap(@Self)^.&set := $00000001;
  31452. end;
  31453. function TSPI3_SPI3STAT.getSPIRBF : TBits_1; inline;
  31454. begin
  31455. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  31456. end;
  31457. procedure TSPI3_SPI3STAT.setSPITBF; inline;
  31458. begin
  31459. pTDefRegMap(@Self)^.&set := $00000002;
  31460. end;
  31461. procedure TSPI3_SPI3STAT.clearSPITBF; inline;
  31462. begin
  31463. pTDefRegMap(@Self)^.clr := $00000002;
  31464. end;
  31465. procedure TSPI3_SPI3STAT.setSPITBF(thebits : TBits_1); inline;
  31466. begin
  31467. if thebits = 0 then
  31468. pTDefRegMap(@Self)^.clr := $00000002
  31469. else
  31470. pTDefRegMap(@Self)^.&set := $00000002;
  31471. end;
  31472. function TSPI3_SPI3STAT.getSPITBF : TBits_1; inline;
  31473. begin
  31474. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  31475. end;
  31476. procedure TSPI3_SPI3STAT.setSPITBE; inline;
  31477. begin
  31478. pTDefRegMap(@Self)^.&set := $00000008;
  31479. end;
  31480. procedure TSPI3_SPI3STAT.clearSPITBE; inline;
  31481. begin
  31482. pTDefRegMap(@Self)^.clr := $00000008;
  31483. end;
  31484. procedure TSPI3_SPI3STAT.setSPITBE(thebits : TBits_1); inline;
  31485. begin
  31486. if thebits = 0 then
  31487. pTDefRegMap(@Self)^.clr := $00000008
  31488. else
  31489. pTDefRegMap(@Self)^.&set := $00000008;
  31490. end;
  31491. function TSPI3_SPI3STAT.getSPITBE : TBits_1; inline;
  31492. begin
  31493. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  31494. end;
  31495. procedure TSPI3_SPI3STAT.setSPIRBE; inline;
  31496. begin
  31497. pTDefRegMap(@Self)^.&set := $00000020;
  31498. end;
  31499. procedure TSPI3_SPI3STAT.clearSPIRBE; inline;
  31500. begin
  31501. pTDefRegMap(@Self)^.clr := $00000020;
  31502. end;
  31503. procedure TSPI3_SPI3STAT.setSPIRBE(thebits : TBits_1); inline;
  31504. begin
  31505. if thebits = 0 then
  31506. pTDefRegMap(@Self)^.clr := $00000020
  31507. else
  31508. pTDefRegMap(@Self)^.&set := $00000020;
  31509. end;
  31510. function TSPI3_SPI3STAT.getSPIRBE : TBits_1; inline;
  31511. begin
  31512. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31513. end;
  31514. procedure TSPI3_SPI3STAT.setSPIROV; inline;
  31515. begin
  31516. pTDefRegMap(@Self)^.&set := $00000040;
  31517. end;
  31518. procedure TSPI3_SPI3STAT.clearSPIROV; inline;
  31519. begin
  31520. pTDefRegMap(@Self)^.clr := $00000040;
  31521. end;
  31522. procedure TSPI3_SPI3STAT.setSPIROV(thebits : TBits_1); inline;
  31523. begin
  31524. if thebits = 0 then
  31525. pTDefRegMap(@Self)^.clr := $00000040
  31526. else
  31527. pTDefRegMap(@Self)^.&set := $00000040;
  31528. end;
  31529. function TSPI3_SPI3STAT.getSPIROV : TBits_1; inline;
  31530. begin
  31531. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31532. end;
  31533. procedure TSPI3_SPI3STAT.setSRMT; inline;
  31534. begin
  31535. pTDefRegMap(@Self)^.&set := $00000080;
  31536. end;
  31537. procedure TSPI3_SPI3STAT.clearSRMT; inline;
  31538. begin
  31539. pTDefRegMap(@Self)^.clr := $00000080;
  31540. end;
  31541. procedure TSPI3_SPI3STAT.setSRMT(thebits : TBits_1); inline;
  31542. begin
  31543. if thebits = 0 then
  31544. pTDefRegMap(@Self)^.clr := $00000080
  31545. else
  31546. pTDefRegMap(@Self)^.&set := $00000080;
  31547. end;
  31548. function TSPI3_SPI3STAT.getSRMT : TBits_1; inline;
  31549. begin
  31550. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31551. end;
  31552. procedure TSPI3_SPI3STAT.setSPITUR; inline;
  31553. begin
  31554. pTDefRegMap(@Self)^.&set := $00000100;
  31555. end;
  31556. procedure TSPI3_SPI3STAT.clearSPITUR; inline;
  31557. begin
  31558. pTDefRegMap(@Self)^.clr := $00000100;
  31559. end;
  31560. procedure TSPI3_SPI3STAT.setSPITUR(thebits : TBits_1); inline;
  31561. begin
  31562. if thebits = 0 then
  31563. pTDefRegMap(@Self)^.clr := $00000100
  31564. else
  31565. pTDefRegMap(@Self)^.&set := $00000100;
  31566. end;
  31567. function TSPI3_SPI3STAT.getSPITUR : TBits_1; inline;
  31568. begin
  31569. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  31570. end;
  31571. procedure TSPI3_SPI3STAT.setSPIBUSY; inline;
  31572. begin
  31573. pTDefRegMap(@Self)^.&set := $00000800;
  31574. end;
  31575. procedure TSPI3_SPI3STAT.clearSPIBUSY; inline;
  31576. begin
  31577. pTDefRegMap(@Self)^.clr := $00000800;
  31578. end;
  31579. procedure TSPI3_SPI3STAT.setSPIBUSY(thebits : TBits_1); inline;
  31580. begin
  31581. if thebits = 0 then
  31582. pTDefRegMap(@Self)^.clr := $00000800
  31583. else
  31584. pTDefRegMap(@Self)^.&set := $00000800;
  31585. end;
  31586. function TSPI3_SPI3STAT.getSPIBUSY : TBits_1; inline;
  31587. begin
  31588. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31589. end;
  31590. procedure TSPI3_SPI3STAT.setTXBUFELM(thebits : TBits_5); inline;
  31591. begin
  31592. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  31593. end;
  31594. function TSPI3_SPI3STAT.getTXBUFELM : TBits_5; inline;
  31595. begin
  31596. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  31597. end;
  31598. procedure TSPI3_SPI3STAT.setRXBUFELM(thebits : TBits_5); inline;
  31599. begin
  31600. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  31601. end;
  31602. function TSPI3_SPI3STAT.getRXBUFELM : TBits_5; inline;
  31603. begin
  31604. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  31605. end;
  31606. procedure TSPI3_SPI3STAT.setw(thebits : TBits_32); inline;
  31607. begin
  31608. pTDefRegMap(@Self)^.val := thebits;
  31609. end;
  31610. function TSPI3_SPI3STAT.getw : TBits_32; inline;
  31611. begin
  31612. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31613. end;
  31614. procedure TSPI2A_SPI2ACON.setSRXISEL(thebits : TBits_2); inline;
  31615. begin
  31616. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  31617. end;
  31618. function TSPI2A_SPI2ACON.getSRXISEL : TBits_2; inline;
  31619. begin
  31620. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  31621. end;
  31622. procedure TSPI2A_SPI2ACON.setSTXISEL(thebits : TBits_2); inline;
  31623. begin
  31624. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  31625. end;
  31626. function TSPI2A_SPI2ACON.getSTXISEL : TBits_2; inline;
  31627. begin
  31628. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  31629. end;
  31630. procedure TSPI2A_SPI2ACON.setMSTEN; inline;
  31631. begin
  31632. pTDefRegMap(@Self)^.&set := $00000020;
  31633. end;
  31634. procedure TSPI2A_SPI2ACON.clearMSTEN; inline;
  31635. begin
  31636. pTDefRegMap(@Self)^.clr := $00000020;
  31637. end;
  31638. procedure TSPI2A_SPI2ACON.setMSTEN(thebits : TBits_1); inline;
  31639. begin
  31640. if thebits = 0 then
  31641. pTDefRegMap(@Self)^.clr := $00000020
  31642. else
  31643. pTDefRegMap(@Self)^.&set := $00000020;
  31644. end;
  31645. function TSPI2A_SPI2ACON.getMSTEN : TBits_1; inline;
  31646. begin
  31647. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31648. end;
  31649. procedure TSPI2A_SPI2ACON.setCKP; inline;
  31650. begin
  31651. pTDefRegMap(@Self)^.&set := $00000040;
  31652. end;
  31653. procedure TSPI2A_SPI2ACON.clearCKP; inline;
  31654. begin
  31655. pTDefRegMap(@Self)^.clr := $00000040;
  31656. end;
  31657. procedure TSPI2A_SPI2ACON.setCKP(thebits : TBits_1); inline;
  31658. begin
  31659. if thebits = 0 then
  31660. pTDefRegMap(@Self)^.clr := $00000040
  31661. else
  31662. pTDefRegMap(@Self)^.&set := $00000040;
  31663. end;
  31664. function TSPI2A_SPI2ACON.getCKP : TBits_1; inline;
  31665. begin
  31666. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31667. end;
  31668. procedure TSPI2A_SPI2ACON.setSSEN; inline;
  31669. begin
  31670. pTDefRegMap(@Self)^.&set := $00000080;
  31671. end;
  31672. procedure TSPI2A_SPI2ACON.clearSSEN; inline;
  31673. begin
  31674. pTDefRegMap(@Self)^.clr := $00000080;
  31675. end;
  31676. procedure TSPI2A_SPI2ACON.setSSEN(thebits : TBits_1); inline;
  31677. begin
  31678. if thebits = 0 then
  31679. pTDefRegMap(@Self)^.clr := $00000080
  31680. else
  31681. pTDefRegMap(@Self)^.&set := $00000080;
  31682. end;
  31683. function TSPI2A_SPI2ACON.getSSEN : TBits_1; inline;
  31684. begin
  31685. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31686. end;
  31687. procedure TSPI2A_SPI2ACON.setCKE; inline;
  31688. begin
  31689. pTDefRegMap(@Self)^.&set := $00000100;
  31690. end;
  31691. procedure TSPI2A_SPI2ACON.clearCKE; inline;
  31692. begin
  31693. pTDefRegMap(@Self)^.clr := $00000100;
  31694. end;
  31695. procedure TSPI2A_SPI2ACON.setCKE(thebits : TBits_1); inline;
  31696. begin
  31697. if thebits = 0 then
  31698. pTDefRegMap(@Self)^.clr := $00000100
  31699. else
  31700. pTDefRegMap(@Self)^.&set := $00000100;
  31701. end;
  31702. function TSPI2A_SPI2ACON.getCKE : TBits_1; inline;
  31703. begin
  31704. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  31705. end;
  31706. procedure TSPI2A_SPI2ACON.setSMP; inline;
  31707. begin
  31708. pTDefRegMap(@Self)^.&set := $00000200;
  31709. end;
  31710. procedure TSPI2A_SPI2ACON.clearSMP; inline;
  31711. begin
  31712. pTDefRegMap(@Self)^.clr := $00000200;
  31713. end;
  31714. procedure TSPI2A_SPI2ACON.setSMP(thebits : TBits_1); inline;
  31715. begin
  31716. if thebits = 0 then
  31717. pTDefRegMap(@Self)^.clr := $00000200
  31718. else
  31719. pTDefRegMap(@Self)^.&set := $00000200;
  31720. end;
  31721. function TSPI2A_SPI2ACON.getSMP : TBits_1; inline;
  31722. begin
  31723. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  31724. end;
  31725. procedure TSPI2A_SPI2ACON.setMODE16; inline;
  31726. begin
  31727. pTDefRegMap(@Self)^.&set := $00000400;
  31728. end;
  31729. procedure TSPI2A_SPI2ACON.clearMODE16; inline;
  31730. begin
  31731. pTDefRegMap(@Self)^.clr := $00000400;
  31732. end;
  31733. procedure TSPI2A_SPI2ACON.setMODE16(thebits : TBits_1); inline;
  31734. begin
  31735. if thebits = 0 then
  31736. pTDefRegMap(@Self)^.clr := $00000400
  31737. else
  31738. pTDefRegMap(@Self)^.&set := $00000400;
  31739. end;
  31740. function TSPI2A_SPI2ACON.getMODE16 : TBits_1; inline;
  31741. begin
  31742. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  31743. end;
  31744. procedure TSPI2A_SPI2ACON.setMODE32; inline;
  31745. begin
  31746. pTDefRegMap(@Self)^.&set := $00000800;
  31747. end;
  31748. procedure TSPI2A_SPI2ACON.clearMODE32; inline;
  31749. begin
  31750. pTDefRegMap(@Self)^.clr := $00000800;
  31751. end;
  31752. procedure TSPI2A_SPI2ACON.setMODE32(thebits : TBits_1); inline;
  31753. begin
  31754. if thebits = 0 then
  31755. pTDefRegMap(@Self)^.clr := $00000800
  31756. else
  31757. pTDefRegMap(@Self)^.&set := $00000800;
  31758. end;
  31759. function TSPI2A_SPI2ACON.getMODE32 : TBits_1; inline;
  31760. begin
  31761. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31762. end;
  31763. procedure TSPI2A_SPI2ACON.setDISSDO; inline;
  31764. begin
  31765. pTDefRegMap(@Self)^.&set := $00001000;
  31766. end;
  31767. procedure TSPI2A_SPI2ACON.clearDISSDO; inline;
  31768. begin
  31769. pTDefRegMap(@Self)^.clr := $00001000;
  31770. end;
  31771. procedure TSPI2A_SPI2ACON.setDISSDO(thebits : TBits_1); inline;
  31772. begin
  31773. if thebits = 0 then
  31774. pTDefRegMap(@Self)^.clr := $00001000
  31775. else
  31776. pTDefRegMap(@Self)^.&set := $00001000;
  31777. end;
  31778. function TSPI2A_SPI2ACON.getDISSDO : TBits_1; inline;
  31779. begin
  31780. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  31781. end;
  31782. procedure TSPI2A_SPI2ACON.setSIDL; inline;
  31783. begin
  31784. pTDefRegMap(@Self)^.&set := $00002000;
  31785. end;
  31786. procedure TSPI2A_SPI2ACON.clearSIDL; inline;
  31787. begin
  31788. pTDefRegMap(@Self)^.clr := $00002000;
  31789. end;
  31790. procedure TSPI2A_SPI2ACON.setSIDL(thebits : TBits_1); inline;
  31791. begin
  31792. if thebits = 0 then
  31793. pTDefRegMap(@Self)^.clr := $00002000
  31794. else
  31795. pTDefRegMap(@Self)^.&set := $00002000;
  31796. end;
  31797. function TSPI2A_SPI2ACON.getSIDL : TBits_1; inline;
  31798. begin
  31799. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31800. end;
  31801. procedure TSPI2A_SPI2ACON.setON; inline;
  31802. begin
  31803. pTDefRegMap(@Self)^.&set := $00008000;
  31804. end;
  31805. procedure TSPI2A_SPI2ACON.clearON; inline;
  31806. begin
  31807. pTDefRegMap(@Self)^.clr := $00008000;
  31808. end;
  31809. procedure TSPI2A_SPI2ACON.setON(thebits : TBits_1); inline;
  31810. begin
  31811. if thebits = 0 then
  31812. pTDefRegMap(@Self)^.clr := $00008000
  31813. else
  31814. pTDefRegMap(@Self)^.&set := $00008000;
  31815. end;
  31816. function TSPI2A_SPI2ACON.getON : TBits_1; inline;
  31817. begin
  31818. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31819. end;
  31820. procedure TSPI2A_SPI2ACON.setENHBUF; inline;
  31821. begin
  31822. pTDefRegMap(@Self)^.&set := $00010000;
  31823. end;
  31824. procedure TSPI2A_SPI2ACON.clearENHBUF; inline;
  31825. begin
  31826. pTDefRegMap(@Self)^.clr := $00010000;
  31827. end;
  31828. procedure TSPI2A_SPI2ACON.setENHBUF(thebits : TBits_1); inline;
  31829. begin
  31830. if thebits = 0 then
  31831. pTDefRegMap(@Self)^.clr := $00010000
  31832. else
  31833. pTDefRegMap(@Self)^.&set := $00010000;
  31834. end;
  31835. function TSPI2A_SPI2ACON.getENHBUF : TBits_1; inline;
  31836. begin
  31837. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  31838. end;
  31839. procedure TSPI2A_SPI2ACON.setSPIFE; inline;
  31840. begin
  31841. pTDefRegMap(@Self)^.&set := $00020000;
  31842. end;
  31843. procedure TSPI2A_SPI2ACON.clearSPIFE; inline;
  31844. begin
  31845. pTDefRegMap(@Self)^.clr := $00020000;
  31846. end;
  31847. procedure TSPI2A_SPI2ACON.setSPIFE(thebits : TBits_1); inline;
  31848. begin
  31849. if thebits = 0 then
  31850. pTDefRegMap(@Self)^.clr := $00020000
  31851. else
  31852. pTDefRegMap(@Self)^.&set := $00020000;
  31853. end;
  31854. function TSPI2A_SPI2ACON.getSPIFE : TBits_1; inline;
  31855. begin
  31856. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  31857. end;
  31858. procedure TSPI2A_SPI2ACON.setFRMCNT(thebits : TBits_3); inline;
  31859. begin
  31860. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  31861. end;
  31862. function TSPI2A_SPI2ACON.getFRMCNT : TBits_3; inline;
  31863. begin
  31864. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  31865. end;
  31866. procedure TSPI2A_SPI2ACON.setFRMSYPW; inline;
  31867. begin
  31868. pTDefRegMap(@Self)^.&set := $08000000;
  31869. end;
  31870. procedure TSPI2A_SPI2ACON.clearFRMSYPW; inline;
  31871. begin
  31872. pTDefRegMap(@Self)^.clr := $08000000;
  31873. end;
  31874. procedure TSPI2A_SPI2ACON.setFRMSYPW(thebits : TBits_1); inline;
  31875. begin
  31876. if thebits = 0 then
  31877. pTDefRegMap(@Self)^.clr := $08000000
  31878. else
  31879. pTDefRegMap(@Self)^.&set := $08000000;
  31880. end;
  31881. function TSPI2A_SPI2ACON.getFRMSYPW : TBits_1; inline;
  31882. begin
  31883. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  31884. end;
  31885. procedure TSPI2A_SPI2ACON.setMSSEN; inline;
  31886. begin
  31887. pTDefRegMap(@Self)^.&set := $10000000;
  31888. end;
  31889. procedure TSPI2A_SPI2ACON.clearMSSEN; inline;
  31890. begin
  31891. pTDefRegMap(@Self)^.clr := $10000000;
  31892. end;
  31893. procedure TSPI2A_SPI2ACON.setMSSEN(thebits : TBits_1); inline;
  31894. begin
  31895. if thebits = 0 then
  31896. pTDefRegMap(@Self)^.clr := $10000000
  31897. else
  31898. pTDefRegMap(@Self)^.&set := $10000000;
  31899. end;
  31900. function TSPI2A_SPI2ACON.getMSSEN : TBits_1; inline;
  31901. begin
  31902. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  31903. end;
  31904. procedure TSPI2A_SPI2ACON.setFRMPOL; inline;
  31905. begin
  31906. pTDefRegMap(@Self)^.&set := $20000000;
  31907. end;
  31908. procedure TSPI2A_SPI2ACON.clearFRMPOL; inline;
  31909. begin
  31910. pTDefRegMap(@Self)^.clr := $20000000;
  31911. end;
  31912. procedure TSPI2A_SPI2ACON.setFRMPOL(thebits : TBits_1); inline;
  31913. begin
  31914. if thebits = 0 then
  31915. pTDefRegMap(@Self)^.clr := $20000000
  31916. else
  31917. pTDefRegMap(@Self)^.&set := $20000000;
  31918. end;
  31919. function TSPI2A_SPI2ACON.getFRMPOL : TBits_1; inline;
  31920. begin
  31921. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  31922. end;
  31923. procedure TSPI2A_SPI2ACON.setFRMSYNC; inline;
  31924. begin
  31925. pTDefRegMap(@Self)^.&set := $40000000;
  31926. end;
  31927. procedure TSPI2A_SPI2ACON.clearFRMSYNC; inline;
  31928. begin
  31929. pTDefRegMap(@Self)^.clr := $40000000;
  31930. end;
  31931. procedure TSPI2A_SPI2ACON.setFRMSYNC(thebits : TBits_1); inline;
  31932. begin
  31933. if thebits = 0 then
  31934. pTDefRegMap(@Self)^.clr := $40000000
  31935. else
  31936. pTDefRegMap(@Self)^.&set := $40000000;
  31937. end;
  31938. function TSPI2A_SPI2ACON.getFRMSYNC : TBits_1; inline;
  31939. begin
  31940. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  31941. end;
  31942. procedure TSPI2A_SPI2ACON.setFRMEN; inline;
  31943. begin
  31944. pTDefRegMap(@Self)^.&set := $80000000;
  31945. end;
  31946. procedure TSPI2A_SPI2ACON.clearFRMEN; inline;
  31947. begin
  31948. pTDefRegMap(@Self)^.clr := $80000000;
  31949. end;
  31950. procedure TSPI2A_SPI2ACON.setFRMEN(thebits : TBits_1); inline;
  31951. begin
  31952. if thebits = 0 then
  31953. pTDefRegMap(@Self)^.clr := $80000000
  31954. else
  31955. pTDefRegMap(@Self)^.&set := $80000000;
  31956. end;
  31957. function TSPI2A_SPI2ACON.getFRMEN : TBits_1; inline;
  31958. begin
  31959. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  31960. end;
  31961. procedure TSPI2A_SPI2ACON.setw(thebits : TBits_32); inline;
  31962. begin
  31963. pTDefRegMap(@Self)^.val := thebits;
  31964. end;
  31965. function TSPI2A_SPI2ACON.getw : TBits_32; inline;
  31966. begin
  31967. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31968. end;
  31969. procedure TSPI2A_SPI2CON.setSRXISEL(thebits : TBits_2); inline;
  31970. begin
  31971. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  31972. end;
  31973. function TSPI2A_SPI2CON.getSRXISEL : TBits_2; inline;
  31974. begin
  31975. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  31976. end;
  31977. procedure TSPI2A_SPI2CON.setSTXISEL(thebits : TBits_2); inline;
  31978. begin
  31979. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  31980. end;
  31981. function TSPI2A_SPI2CON.getSTXISEL : TBits_2; inline;
  31982. begin
  31983. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  31984. end;
  31985. procedure TSPI2A_SPI2CON.setMSTEN; inline;
  31986. begin
  31987. pTDefRegMap(@Self)^.&set := $00000020;
  31988. end;
  31989. procedure TSPI2A_SPI2CON.clearMSTEN; inline;
  31990. begin
  31991. pTDefRegMap(@Self)^.clr := $00000020;
  31992. end;
  31993. procedure TSPI2A_SPI2CON.setMSTEN(thebits : TBits_1); inline;
  31994. begin
  31995. if thebits = 0 then
  31996. pTDefRegMap(@Self)^.clr := $00000020
  31997. else
  31998. pTDefRegMap(@Self)^.&set := $00000020;
  31999. end;
  32000. function TSPI2A_SPI2CON.getMSTEN : TBits_1; inline;
  32001. begin
  32002. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32003. end;
  32004. procedure TSPI2A_SPI2CON.setCKP; inline;
  32005. begin
  32006. pTDefRegMap(@Self)^.&set := $00000040;
  32007. end;
  32008. procedure TSPI2A_SPI2CON.clearCKP; inline;
  32009. begin
  32010. pTDefRegMap(@Self)^.clr := $00000040;
  32011. end;
  32012. procedure TSPI2A_SPI2CON.setCKP(thebits : TBits_1); inline;
  32013. begin
  32014. if thebits = 0 then
  32015. pTDefRegMap(@Self)^.clr := $00000040
  32016. else
  32017. pTDefRegMap(@Self)^.&set := $00000040;
  32018. end;
  32019. function TSPI2A_SPI2CON.getCKP : TBits_1; inline;
  32020. begin
  32021. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32022. end;
  32023. procedure TSPI2A_SPI2CON.setSSEN; inline;
  32024. begin
  32025. pTDefRegMap(@Self)^.&set := $00000080;
  32026. end;
  32027. procedure TSPI2A_SPI2CON.clearSSEN; inline;
  32028. begin
  32029. pTDefRegMap(@Self)^.clr := $00000080;
  32030. end;
  32031. procedure TSPI2A_SPI2CON.setSSEN(thebits : TBits_1); inline;
  32032. begin
  32033. if thebits = 0 then
  32034. pTDefRegMap(@Self)^.clr := $00000080
  32035. else
  32036. pTDefRegMap(@Self)^.&set := $00000080;
  32037. end;
  32038. function TSPI2A_SPI2CON.getSSEN : TBits_1; inline;
  32039. begin
  32040. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32041. end;
  32042. procedure TSPI2A_SPI2CON.setCKE; inline;
  32043. begin
  32044. pTDefRegMap(@Self)^.&set := $00000100;
  32045. end;
  32046. procedure TSPI2A_SPI2CON.clearCKE; inline;
  32047. begin
  32048. pTDefRegMap(@Self)^.clr := $00000100;
  32049. end;
  32050. procedure TSPI2A_SPI2CON.setCKE(thebits : TBits_1); inline;
  32051. begin
  32052. if thebits = 0 then
  32053. pTDefRegMap(@Self)^.clr := $00000100
  32054. else
  32055. pTDefRegMap(@Self)^.&set := $00000100;
  32056. end;
  32057. function TSPI2A_SPI2CON.getCKE : TBits_1; inline;
  32058. begin
  32059. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32060. end;
  32061. procedure TSPI2A_SPI2CON.setSMP; inline;
  32062. begin
  32063. pTDefRegMap(@Self)^.&set := $00000200;
  32064. end;
  32065. procedure TSPI2A_SPI2CON.clearSMP; inline;
  32066. begin
  32067. pTDefRegMap(@Self)^.clr := $00000200;
  32068. end;
  32069. procedure TSPI2A_SPI2CON.setSMP(thebits : TBits_1); inline;
  32070. begin
  32071. if thebits = 0 then
  32072. pTDefRegMap(@Self)^.clr := $00000200
  32073. else
  32074. pTDefRegMap(@Self)^.&set := $00000200;
  32075. end;
  32076. function TSPI2A_SPI2CON.getSMP : TBits_1; inline;
  32077. begin
  32078. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  32079. end;
  32080. procedure TSPI2A_SPI2CON.setMODE16; inline;
  32081. begin
  32082. pTDefRegMap(@Self)^.&set := $00000400;
  32083. end;
  32084. procedure TSPI2A_SPI2CON.clearMODE16; inline;
  32085. begin
  32086. pTDefRegMap(@Self)^.clr := $00000400;
  32087. end;
  32088. procedure TSPI2A_SPI2CON.setMODE16(thebits : TBits_1); inline;
  32089. begin
  32090. if thebits = 0 then
  32091. pTDefRegMap(@Self)^.clr := $00000400
  32092. else
  32093. pTDefRegMap(@Self)^.&set := $00000400;
  32094. end;
  32095. function TSPI2A_SPI2CON.getMODE16 : TBits_1; inline;
  32096. begin
  32097. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  32098. end;
  32099. procedure TSPI2A_SPI2CON.setMODE32; inline;
  32100. begin
  32101. pTDefRegMap(@Self)^.&set := $00000800;
  32102. end;
  32103. procedure TSPI2A_SPI2CON.clearMODE32; inline;
  32104. begin
  32105. pTDefRegMap(@Self)^.clr := $00000800;
  32106. end;
  32107. procedure TSPI2A_SPI2CON.setMODE32(thebits : TBits_1); inline;
  32108. begin
  32109. if thebits = 0 then
  32110. pTDefRegMap(@Self)^.clr := $00000800
  32111. else
  32112. pTDefRegMap(@Self)^.&set := $00000800;
  32113. end;
  32114. function TSPI2A_SPI2CON.getMODE32 : TBits_1; inline;
  32115. begin
  32116. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  32117. end;
  32118. procedure TSPI2A_SPI2CON.setDISSDO; inline;
  32119. begin
  32120. pTDefRegMap(@Self)^.&set := $00001000;
  32121. end;
  32122. procedure TSPI2A_SPI2CON.clearDISSDO; inline;
  32123. begin
  32124. pTDefRegMap(@Self)^.clr := $00001000;
  32125. end;
  32126. procedure TSPI2A_SPI2CON.setDISSDO(thebits : TBits_1); inline;
  32127. begin
  32128. if thebits = 0 then
  32129. pTDefRegMap(@Self)^.clr := $00001000
  32130. else
  32131. pTDefRegMap(@Self)^.&set := $00001000;
  32132. end;
  32133. function TSPI2A_SPI2CON.getDISSDO : TBits_1; inline;
  32134. begin
  32135. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  32136. end;
  32137. procedure TSPI2A_SPI2CON.setSIDL; inline;
  32138. begin
  32139. pTDefRegMap(@Self)^.&set := $00002000;
  32140. end;
  32141. procedure TSPI2A_SPI2CON.clearSIDL; inline;
  32142. begin
  32143. pTDefRegMap(@Self)^.clr := $00002000;
  32144. end;
  32145. procedure TSPI2A_SPI2CON.setSIDL(thebits : TBits_1); inline;
  32146. begin
  32147. if thebits = 0 then
  32148. pTDefRegMap(@Self)^.clr := $00002000
  32149. else
  32150. pTDefRegMap(@Self)^.&set := $00002000;
  32151. end;
  32152. function TSPI2A_SPI2CON.getSIDL : TBits_1; inline;
  32153. begin
  32154. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32155. end;
  32156. procedure TSPI2A_SPI2CON.setON; inline;
  32157. begin
  32158. pTDefRegMap(@Self)^.&set := $00008000;
  32159. end;
  32160. procedure TSPI2A_SPI2CON.clearON; inline;
  32161. begin
  32162. pTDefRegMap(@Self)^.clr := $00008000;
  32163. end;
  32164. procedure TSPI2A_SPI2CON.setON(thebits : TBits_1); inline;
  32165. begin
  32166. if thebits = 0 then
  32167. pTDefRegMap(@Self)^.clr := $00008000
  32168. else
  32169. pTDefRegMap(@Self)^.&set := $00008000;
  32170. end;
  32171. function TSPI2A_SPI2CON.getON : TBits_1; inline;
  32172. begin
  32173. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32174. end;
  32175. procedure TSPI2A_SPI2CON.setENHBUF; inline;
  32176. begin
  32177. pTDefRegMap(@Self)^.&set := $00010000;
  32178. end;
  32179. procedure TSPI2A_SPI2CON.clearENHBUF; inline;
  32180. begin
  32181. pTDefRegMap(@Self)^.clr := $00010000;
  32182. end;
  32183. procedure TSPI2A_SPI2CON.setENHBUF(thebits : TBits_1); inline;
  32184. begin
  32185. if thebits = 0 then
  32186. pTDefRegMap(@Self)^.clr := $00010000
  32187. else
  32188. pTDefRegMap(@Self)^.&set := $00010000;
  32189. end;
  32190. function TSPI2A_SPI2CON.getENHBUF : TBits_1; inline;
  32191. begin
  32192. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  32193. end;
  32194. procedure TSPI2A_SPI2CON.setSPIFE; inline;
  32195. begin
  32196. pTDefRegMap(@Self)^.&set := $00020000;
  32197. end;
  32198. procedure TSPI2A_SPI2CON.clearSPIFE; inline;
  32199. begin
  32200. pTDefRegMap(@Self)^.clr := $00020000;
  32201. end;
  32202. procedure TSPI2A_SPI2CON.setSPIFE(thebits : TBits_1); inline;
  32203. begin
  32204. if thebits = 0 then
  32205. pTDefRegMap(@Self)^.clr := $00020000
  32206. else
  32207. pTDefRegMap(@Self)^.&set := $00020000;
  32208. end;
  32209. function TSPI2A_SPI2CON.getSPIFE : TBits_1; inline;
  32210. begin
  32211. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  32212. end;
  32213. procedure TSPI2A_SPI2CON.setFRMCNT(thebits : TBits_3); inline;
  32214. begin
  32215. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  32216. end;
  32217. function TSPI2A_SPI2CON.getFRMCNT : TBits_3; inline;
  32218. begin
  32219. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  32220. end;
  32221. procedure TSPI2A_SPI2CON.setFRMSYPW; inline;
  32222. begin
  32223. pTDefRegMap(@Self)^.&set := $08000000;
  32224. end;
  32225. procedure TSPI2A_SPI2CON.clearFRMSYPW; inline;
  32226. begin
  32227. pTDefRegMap(@Self)^.clr := $08000000;
  32228. end;
  32229. procedure TSPI2A_SPI2CON.setFRMSYPW(thebits : TBits_1); inline;
  32230. begin
  32231. if thebits = 0 then
  32232. pTDefRegMap(@Self)^.clr := $08000000
  32233. else
  32234. pTDefRegMap(@Self)^.&set := $08000000;
  32235. end;
  32236. function TSPI2A_SPI2CON.getFRMSYPW : TBits_1; inline;
  32237. begin
  32238. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  32239. end;
  32240. procedure TSPI2A_SPI2CON.setMSSEN; inline;
  32241. begin
  32242. pTDefRegMap(@Self)^.&set := $10000000;
  32243. end;
  32244. procedure TSPI2A_SPI2CON.clearMSSEN; inline;
  32245. begin
  32246. pTDefRegMap(@Self)^.clr := $10000000;
  32247. end;
  32248. procedure TSPI2A_SPI2CON.setMSSEN(thebits : TBits_1); inline;
  32249. begin
  32250. if thebits = 0 then
  32251. pTDefRegMap(@Self)^.clr := $10000000
  32252. else
  32253. pTDefRegMap(@Self)^.&set := $10000000;
  32254. end;
  32255. function TSPI2A_SPI2CON.getMSSEN : TBits_1; inline;
  32256. begin
  32257. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  32258. end;
  32259. procedure TSPI2A_SPI2CON.setFRMPOL; inline;
  32260. begin
  32261. pTDefRegMap(@Self)^.&set := $20000000;
  32262. end;
  32263. procedure TSPI2A_SPI2CON.clearFRMPOL; inline;
  32264. begin
  32265. pTDefRegMap(@Self)^.clr := $20000000;
  32266. end;
  32267. procedure TSPI2A_SPI2CON.setFRMPOL(thebits : TBits_1); inline;
  32268. begin
  32269. if thebits = 0 then
  32270. pTDefRegMap(@Self)^.clr := $20000000
  32271. else
  32272. pTDefRegMap(@Self)^.&set := $20000000;
  32273. end;
  32274. function TSPI2A_SPI2CON.getFRMPOL : TBits_1; inline;
  32275. begin
  32276. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  32277. end;
  32278. procedure TSPI2A_SPI2CON.setFRMSYNC; inline;
  32279. begin
  32280. pTDefRegMap(@Self)^.&set := $40000000;
  32281. end;
  32282. procedure TSPI2A_SPI2CON.clearFRMSYNC; inline;
  32283. begin
  32284. pTDefRegMap(@Self)^.clr := $40000000;
  32285. end;
  32286. procedure TSPI2A_SPI2CON.setFRMSYNC(thebits : TBits_1); inline;
  32287. begin
  32288. if thebits = 0 then
  32289. pTDefRegMap(@Self)^.clr := $40000000
  32290. else
  32291. pTDefRegMap(@Self)^.&set := $40000000;
  32292. end;
  32293. function TSPI2A_SPI2CON.getFRMSYNC : TBits_1; inline;
  32294. begin
  32295. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  32296. end;
  32297. procedure TSPI2A_SPI2CON.setFRMEN; inline;
  32298. begin
  32299. pTDefRegMap(@Self)^.&set := $80000000;
  32300. end;
  32301. procedure TSPI2A_SPI2CON.clearFRMEN; inline;
  32302. begin
  32303. pTDefRegMap(@Self)^.clr := $80000000;
  32304. end;
  32305. procedure TSPI2A_SPI2CON.setFRMEN(thebits : TBits_1); inline;
  32306. begin
  32307. if thebits = 0 then
  32308. pTDefRegMap(@Self)^.clr := $80000000
  32309. else
  32310. pTDefRegMap(@Self)^.&set := $80000000;
  32311. end;
  32312. function TSPI2A_SPI2CON.getFRMEN : TBits_1; inline;
  32313. begin
  32314. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  32315. end;
  32316. procedure TSPI2A_SPI2CON.setw(thebits : TBits_32); inline;
  32317. begin
  32318. pTDefRegMap(@Self)^.val := thebits;
  32319. end;
  32320. function TSPI2A_SPI2CON.getw : TBits_32; inline;
  32321. begin
  32322. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32323. end;
  32324. procedure TSPI2A_SPI2ASTAT.setSPIRBF; inline;
  32325. begin
  32326. pTDefRegMap(@Self)^.&set := $00000001;
  32327. end;
  32328. procedure TSPI2A_SPI2ASTAT.clearSPIRBF; inline;
  32329. begin
  32330. pTDefRegMap(@Self)^.clr := $00000001;
  32331. end;
  32332. procedure TSPI2A_SPI2ASTAT.setSPIRBF(thebits : TBits_1); inline;
  32333. begin
  32334. if thebits = 0 then
  32335. pTDefRegMap(@Self)^.clr := $00000001
  32336. else
  32337. pTDefRegMap(@Self)^.&set := $00000001;
  32338. end;
  32339. function TSPI2A_SPI2ASTAT.getSPIRBF : TBits_1; inline;
  32340. begin
  32341. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  32342. end;
  32343. procedure TSPI2A_SPI2ASTAT.setSPITBF; inline;
  32344. begin
  32345. pTDefRegMap(@Self)^.&set := $00000002;
  32346. end;
  32347. procedure TSPI2A_SPI2ASTAT.clearSPITBF; inline;
  32348. begin
  32349. pTDefRegMap(@Self)^.clr := $00000002;
  32350. end;
  32351. procedure TSPI2A_SPI2ASTAT.setSPITBF(thebits : TBits_1); inline;
  32352. begin
  32353. if thebits = 0 then
  32354. pTDefRegMap(@Self)^.clr := $00000002
  32355. else
  32356. pTDefRegMap(@Self)^.&set := $00000002;
  32357. end;
  32358. function TSPI2A_SPI2ASTAT.getSPITBF : TBits_1; inline;
  32359. begin
  32360. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32361. end;
  32362. procedure TSPI2A_SPI2ASTAT.setSPITBE; inline;
  32363. begin
  32364. pTDefRegMap(@Self)^.&set := $00000008;
  32365. end;
  32366. procedure TSPI2A_SPI2ASTAT.clearSPITBE; inline;
  32367. begin
  32368. pTDefRegMap(@Self)^.clr := $00000008;
  32369. end;
  32370. procedure TSPI2A_SPI2ASTAT.setSPITBE(thebits : TBits_1); inline;
  32371. begin
  32372. if thebits = 0 then
  32373. pTDefRegMap(@Self)^.clr := $00000008
  32374. else
  32375. pTDefRegMap(@Self)^.&set := $00000008;
  32376. end;
  32377. function TSPI2A_SPI2ASTAT.getSPITBE : TBits_1; inline;
  32378. begin
  32379. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32380. end;
  32381. procedure TSPI2A_SPI2ASTAT.setSPIRBE; inline;
  32382. begin
  32383. pTDefRegMap(@Self)^.&set := $00000020;
  32384. end;
  32385. procedure TSPI2A_SPI2ASTAT.clearSPIRBE; inline;
  32386. begin
  32387. pTDefRegMap(@Self)^.clr := $00000020;
  32388. end;
  32389. procedure TSPI2A_SPI2ASTAT.setSPIRBE(thebits : TBits_1); inline;
  32390. begin
  32391. if thebits = 0 then
  32392. pTDefRegMap(@Self)^.clr := $00000020
  32393. else
  32394. pTDefRegMap(@Self)^.&set := $00000020;
  32395. end;
  32396. function TSPI2A_SPI2ASTAT.getSPIRBE : TBits_1; inline;
  32397. begin
  32398. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32399. end;
  32400. procedure TSPI2A_SPI2ASTAT.setSPIROV; inline;
  32401. begin
  32402. pTDefRegMap(@Self)^.&set := $00000040;
  32403. end;
  32404. procedure TSPI2A_SPI2ASTAT.clearSPIROV; inline;
  32405. begin
  32406. pTDefRegMap(@Self)^.clr := $00000040;
  32407. end;
  32408. procedure TSPI2A_SPI2ASTAT.setSPIROV(thebits : TBits_1); inline;
  32409. begin
  32410. if thebits = 0 then
  32411. pTDefRegMap(@Self)^.clr := $00000040
  32412. else
  32413. pTDefRegMap(@Self)^.&set := $00000040;
  32414. end;
  32415. function TSPI2A_SPI2ASTAT.getSPIROV : TBits_1; inline;
  32416. begin
  32417. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32418. end;
  32419. procedure TSPI2A_SPI2ASTAT.setSRMT; inline;
  32420. begin
  32421. pTDefRegMap(@Self)^.&set := $00000080;
  32422. end;
  32423. procedure TSPI2A_SPI2ASTAT.clearSRMT; inline;
  32424. begin
  32425. pTDefRegMap(@Self)^.clr := $00000080;
  32426. end;
  32427. procedure TSPI2A_SPI2ASTAT.setSRMT(thebits : TBits_1); inline;
  32428. begin
  32429. if thebits = 0 then
  32430. pTDefRegMap(@Self)^.clr := $00000080
  32431. else
  32432. pTDefRegMap(@Self)^.&set := $00000080;
  32433. end;
  32434. function TSPI2A_SPI2ASTAT.getSRMT : TBits_1; inline;
  32435. begin
  32436. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32437. end;
  32438. procedure TSPI2A_SPI2ASTAT.setSPITUR; inline;
  32439. begin
  32440. pTDefRegMap(@Self)^.&set := $00000100;
  32441. end;
  32442. procedure TSPI2A_SPI2ASTAT.clearSPITUR; inline;
  32443. begin
  32444. pTDefRegMap(@Self)^.clr := $00000100;
  32445. end;
  32446. procedure TSPI2A_SPI2ASTAT.setSPITUR(thebits : TBits_1); inline;
  32447. begin
  32448. if thebits = 0 then
  32449. pTDefRegMap(@Self)^.clr := $00000100
  32450. else
  32451. pTDefRegMap(@Self)^.&set := $00000100;
  32452. end;
  32453. function TSPI2A_SPI2ASTAT.getSPITUR : TBits_1; inline;
  32454. begin
  32455. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32456. end;
  32457. procedure TSPI2A_SPI2ASTAT.setSPIBUSY; inline;
  32458. begin
  32459. pTDefRegMap(@Self)^.&set := $00000800;
  32460. end;
  32461. procedure TSPI2A_SPI2ASTAT.clearSPIBUSY; inline;
  32462. begin
  32463. pTDefRegMap(@Self)^.clr := $00000800;
  32464. end;
  32465. procedure TSPI2A_SPI2ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  32466. begin
  32467. if thebits = 0 then
  32468. pTDefRegMap(@Self)^.clr := $00000800
  32469. else
  32470. pTDefRegMap(@Self)^.&set := $00000800;
  32471. end;
  32472. function TSPI2A_SPI2ASTAT.getSPIBUSY : TBits_1; inline;
  32473. begin
  32474. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  32475. end;
  32476. procedure TSPI2A_SPI2ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  32477. begin
  32478. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  32479. end;
  32480. function TSPI2A_SPI2ASTAT.getTXBUFELM : TBits_5; inline;
  32481. begin
  32482. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  32483. end;
  32484. procedure TSPI2A_SPI2ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  32485. begin
  32486. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  32487. end;
  32488. function TSPI2A_SPI2ASTAT.getRXBUFELM : TBits_5; inline;
  32489. begin
  32490. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  32491. end;
  32492. procedure TSPI2A_SPI2ASTAT.setw(thebits : TBits_32); inline;
  32493. begin
  32494. pTDefRegMap(@Self)^.val := thebits;
  32495. end;
  32496. function TSPI2A_SPI2ASTAT.getw : TBits_32; inline;
  32497. begin
  32498. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32499. end;
  32500. procedure TSPI2A_SPI2STAT.setSPIRBF; inline;
  32501. begin
  32502. pTDefRegMap(@Self)^.&set := $00000001;
  32503. end;
  32504. procedure TSPI2A_SPI2STAT.clearSPIRBF; inline;
  32505. begin
  32506. pTDefRegMap(@Self)^.clr := $00000001;
  32507. end;
  32508. procedure TSPI2A_SPI2STAT.setSPIRBF(thebits : TBits_1); inline;
  32509. begin
  32510. if thebits = 0 then
  32511. pTDefRegMap(@Self)^.clr := $00000001
  32512. else
  32513. pTDefRegMap(@Self)^.&set := $00000001;
  32514. end;
  32515. function TSPI2A_SPI2STAT.getSPIRBF : TBits_1; inline;
  32516. begin
  32517. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  32518. end;
  32519. procedure TSPI2A_SPI2STAT.setSPITBF; inline;
  32520. begin
  32521. pTDefRegMap(@Self)^.&set := $00000002;
  32522. end;
  32523. procedure TSPI2A_SPI2STAT.clearSPITBF; inline;
  32524. begin
  32525. pTDefRegMap(@Self)^.clr := $00000002;
  32526. end;
  32527. procedure TSPI2A_SPI2STAT.setSPITBF(thebits : TBits_1); inline;
  32528. begin
  32529. if thebits = 0 then
  32530. pTDefRegMap(@Self)^.clr := $00000002
  32531. else
  32532. pTDefRegMap(@Self)^.&set := $00000002;
  32533. end;
  32534. function TSPI2A_SPI2STAT.getSPITBF : TBits_1; inline;
  32535. begin
  32536. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32537. end;
  32538. procedure TSPI2A_SPI2STAT.setSPITBE; inline;
  32539. begin
  32540. pTDefRegMap(@Self)^.&set := $00000008;
  32541. end;
  32542. procedure TSPI2A_SPI2STAT.clearSPITBE; inline;
  32543. begin
  32544. pTDefRegMap(@Self)^.clr := $00000008;
  32545. end;
  32546. procedure TSPI2A_SPI2STAT.setSPITBE(thebits : TBits_1); inline;
  32547. begin
  32548. if thebits = 0 then
  32549. pTDefRegMap(@Self)^.clr := $00000008
  32550. else
  32551. pTDefRegMap(@Self)^.&set := $00000008;
  32552. end;
  32553. function TSPI2A_SPI2STAT.getSPITBE : TBits_1; inline;
  32554. begin
  32555. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32556. end;
  32557. procedure TSPI2A_SPI2STAT.setSPIRBE; inline;
  32558. begin
  32559. pTDefRegMap(@Self)^.&set := $00000020;
  32560. end;
  32561. procedure TSPI2A_SPI2STAT.clearSPIRBE; inline;
  32562. begin
  32563. pTDefRegMap(@Self)^.clr := $00000020;
  32564. end;
  32565. procedure TSPI2A_SPI2STAT.setSPIRBE(thebits : TBits_1); inline;
  32566. begin
  32567. if thebits = 0 then
  32568. pTDefRegMap(@Self)^.clr := $00000020
  32569. else
  32570. pTDefRegMap(@Self)^.&set := $00000020;
  32571. end;
  32572. function TSPI2A_SPI2STAT.getSPIRBE : TBits_1; inline;
  32573. begin
  32574. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32575. end;
  32576. procedure TSPI2A_SPI2STAT.setSPIROV; inline;
  32577. begin
  32578. pTDefRegMap(@Self)^.&set := $00000040;
  32579. end;
  32580. procedure TSPI2A_SPI2STAT.clearSPIROV; inline;
  32581. begin
  32582. pTDefRegMap(@Self)^.clr := $00000040;
  32583. end;
  32584. procedure TSPI2A_SPI2STAT.setSPIROV(thebits : TBits_1); inline;
  32585. begin
  32586. if thebits = 0 then
  32587. pTDefRegMap(@Self)^.clr := $00000040
  32588. else
  32589. pTDefRegMap(@Self)^.&set := $00000040;
  32590. end;
  32591. function TSPI2A_SPI2STAT.getSPIROV : TBits_1; inline;
  32592. begin
  32593. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32594. end;
  32595. procedure TSPI2A_SPI2STAT.setSRMT; inline;
  32596. begin
  32597. pTDefRegMap(@Self)^.&set := $00000080;
  32598. end;
  32599. procedure TSPI2A_SPI2STAT.clearSRMT; inline;
  32600. begin
  32601. pTDefRegMap(@Self)^.clr := $00000080;
  32602. end;
  32603. procedure TSPI2A_SPI2STAT.setSRMT(thebits : TBits_1); inline;
  32604. begin
  32605. if thebits = 0 then
  32606. pTDefRegMap(@Self)^.clr := $00000080
  32607. else
  32608. pTDefRegMap(@Self)^.&set := $00000080;
  32609. end;
  32610. function TSPI2A_SPI2STAT.getSRMT : TBits_1; inline;
  32611. begin
  32612. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32613. end;
  32614. procedure TSPI2A_SPI2STAT.setSPITUR; inline;
  32615. begin
  32616. pTDefRegMap(@Self)^.&set := $00000100;
  32617. end;
  32618. procedure TSPI2A_SPI2STAT.clearSPITUR; inline;
  32619. begin
  32620. pTDefRegMap(@Self)^.clr := $00000100;
  32621. end;
  32622. procedure TSPI2A_SPI2STAT.setSPITUR(thebits : TBits_1); inline;
  32623. begin
  32624. if thebits = 0 then
  32625. pTDefRegMap(@Self)^.clr := $00000100
  32626. else
  32627. pTDefRegMap(@Self)^.&set := $00000100;
  32628. end;
  32629. function TSPI2A_SPI2STAT.getSPITUR : TBits_1; inline;
  32630. begin
  32631. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32632. end;
  32633. procedure TSPI2A_SPI2STAT.setSPIBUSY; inline;
  32634. begin
  32635. pTDefRegMap(@Self)^.&set := $00000800;
  32636. end;
  32637. procedure TSPI2A_SPI2STAT.clearSPIBUSY; inline;
  32638. begin
  32639. pTDefRegMap(@Self)^.clr := $00000800;
  32640. end;
  32641. procedure TSPI2A_SPI2STAT.setSPIBUSY(thebits : TBits_1); inline;
  32642. begin
  32643. if thebits = 0 then
  32644. pTDefRegMap(@Self)^.clr := $00000800
  32645. else
  32646. pTDefRegMap(@Self)^.&set := $00000800;
  32647. end;
  32648. function TSPI2A_SPI2STAT.getSPIBUSY : TBits_1; inline;
  32649. begin
  32650. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  32651. end;
  32652. procedure TSPI2A_SPI2STAT.setTXBUFELM(thebits : TBits_5); inline;
  32653. begin
  32654. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  32655. end;
  32656. function TSPI2A_SPI2STAT.getTXBUFELM : TBits_5; inline;
  32657. begin
  32658. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  32659. end;
  32660. procedure TSPI2A_SPI2STAT.setRXBUFELM(thebits : TBits_5); inline;
  32661. begin
  32662. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  32663. end;
  32664. function TSPI2A_SPI2STAT.getRXBUFELM : TBits_5; inline;
  32665. begin
  32666. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  32667. end;
  32668. procedure TSPI2A_SPI2STAT.setw(thebits : TBits_32); inline;
  32669. begin
  32670. pTDefRegMap(@Self)^.val := thebits;
  32671. end;
  32672. function TSPI2A_SPI2STAT.getw : TBits_32; inline;
  32673. begin
  32674. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32675. end;
  32676. procedure TSPI4_SPI3ACON.setSRXISEL(thebits : TBits_2); inline;
  32677. begin
  32678. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  32679. end;
  32680. function TSPI4_SPI3ACON.getSRXISEL : TBits_2; inline;
  32681. begin
  32682. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  32683. end;
  32684. procedure TSPI4_SPI3ACON.setSTXISEL(thebits : TBits_2); inline;
  32685. begin
  32686. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  32687. end;
  32688. function TSPI4_SPI3ACON.getSTXISEL : TBits_2; inline;
  32689. begin
  32690. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  32691. end;
  32692. procedure TSPI4_SPI3ACON.setMSTEN; inline;
  32693. begin
  32694. pTDefRegMap(@Self)^.&set := $00000020;
  32695. end;
  32696. procedure TSPI4_SPI3ACON.clearMSTEN; inline;
  32697. begin
  32698. pTDefRegMap(@Self)^.clr := $00000020;
  32699. end;
  32700. procedure TSPI4_SPI3ACON.setMSTEN(thebits : TBits_1); inline;
  32701. begin
  32702. if thebits = 0 then
  32703. pTDefRegMap(@Self)^.clr := $00000020
  32704. else
  32705. pTDefRegMap(@Self)^.&set := $00000020;
  32706. end;
  32707. function TSPI4_SPI3ACON.getMSTEN : TBits_1; inline;
  32708. begin
  32709. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32710. end;
  32711. procedure TSPI4_SPI3ACON.setCKP; inline;
  32712. begin
  32713. pTDefRegMap(@Self)^.&set := $00000040;
  32714. end;
  32715. procedure TSPI4_SPI3ACON.clearCKP; inline;
  32716. begin
  32717. pTDefRegMap(@Self)^.clr := $00000040;
  32718. end;
  32719. procedure TSPI4_SPI3ACON.setCKP(thebits : TBits_1); inline;
  32720. begin
  32721. if thebits = 0 then
  32722. pTDefRegMap(@Self)^.clr := $00000040
  32723. else
  32724. pTDefRegMap(@Self)^.&set := $00000040;
  32725. end;
  32726. function TSPI4_SPI3ACON.getCKP : TBits_1; inline;
  32727. begin
  32728. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32729. end;
  32730. procedure TSPI4_SPI3ACON.setSSEN; inline;
  32731. begin
  32732. pTDefRegMap(@Self)^.&set := $00000080;
  32733. end;
  32734. procedure TSPI4_SPI3ACON.clearSSEN; inline;
  32735. begin
  32736. pTDefRegMap(@Self)^.clr := $00000080;
  32737. end;
  32738. procedure TSPI4_SPI3ACON.setSSEN(thebits : TBits_1); inline;
  32739. begin
  32740. if thebits = 0 then
  32741. pTDefRegMap(@Self)^.clr := $00000080
  32742. else
  32743. pTDefRegMap(@Self)^.&set := $00000080;
  32744. end;
  32745. function TSPI4_SPI3ACON.getSSEN : TBits_1; inline;
  32746. begin
  32747. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32748. end;
  32749. procedure TSPI4_SPI3ACON.setCKE; inline;
  32750. begin
  32751. pTDefRegMap(@Self)^.&set := $00000100;
  32752. end;
  32753. procedure TSPI4_SPI3ACON.clearCKE; inline;
  32754. begin
  32755. pTDefRegMap(@Self)^.clr := $00000100;
  32756. end;
  32757. procedure TSPI4_SPI3ACON.setCKE(thebits : TBits_1); inline;
  32758. begin
  32759. if thebits = 0 then
  32760. pTDefRegMap(@Self)^.clr := $00000100
  32761. else
  32762. pTDefRegMap(@Self)^.&set := $00000100;
  32763. end;
  32764. function TSPI4_SPI3ACON.getCKE : TBits_1; inline;
  32765. begin
  32766. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32767. end;
  32768. procedure TSPI4_SPI3ACON.setSMP; inline;
  32769. begin
  32770. pTDefRegMap(@Self)^.&set := $00000200;
  32771. end;
  32772. procedure TSPI4_SPI3ACON.clearSMP; inline;
  32773. begin
  32774. pTDefRegMap(@Self)^.clr := $00000200;
  32775. end;
  32776. procedure TSPI4_SPI3ACON.setSMP(thebits : TBits_1); inline;
  32777. begin
  32778. if thebits = 0 then
  32779. pTDefRegMap(@Self)^.clr := $00000200
  32780. else
  32781. pTDefRegMap(@Self)^.&set := $00000200;
  32782. end;
  32783. function TSPI4_SPI3ACON.getSMP : TBits_1; inline;
  32784. begin
  32785. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  32786. end;
  32787. procedure TSPI4_SPI3ACON.setMODE16; inline;
  32788. begin
  32789. pTDefRegMap(@Self)^.&set := $00000400;
  32790. end;
  32791. procedure TSPI4_SPI3ACON.clearMODE16; inline;
  32792. begin
  32793. pTDefRegMap(@Self)^.clr := $00000400;
  32794. end;
  32795. procedure TSPI4_SPI3ACON.setMODE16(thebits : TBits_1); inline;
  32796. begin
  32797. if thebits = 0 then
  32798. pTDefRegMap(@Self)^.clr := $00000400
  32799. else
  32800. pTDefRegMap(@Self)^.&set := $00000400;
  32801. end;
  32802. function TSPI4_SPI3ACON.getMODE16 : TBits_1; inline;
  32803. begin
  32804. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  32805. end;
  32806. procedure TSPI4_SPI3ACON.setMODE32; inline;
  32807. begin
  32808. pTDefRegMap(@Self)^.&set := $00000800;
  32809. end;
  32810. procedure TSPI4_SPI3ACON.clearMODE32; inline;
  32811. begin
  32812. pTDefRegMap(@Self)^.clr := $00000800;
  32813. end;
  32814. procedure TSPI4_SPI3ACON.setMODE32(thebits : TBits_1); inline;
  32815. begin
  32816. if thebits = 0 then
  32817. pTDefRegMap(@Self)^.clr := $00000800
  32818. else
  32819. pTDefRegMap(@Self)^.&set := $00000800;
  32820. end;
  32821. function TSPI4_SPI3ACON.getMODE32 : TBits_1; inline;
  32822. begin
  32823. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  32824. end;
  32825. procedure TSPI4_SPI3ACON.setDISSDO; inline;
  32826. begin
  32827. pTDefRegMap(@Self)^.&set := $00001000;
  32828. end;
  32829. procedure TSPI4_SPI3ACON.clearDISSDO; inline;
  32830. begin
  32831. pTDefRegMap(@Self)^.clr := $00001000;
  32832. end;
  32833. procedure TSPI4_SPI3ACON.setDISSDO(thebits : TBits_1); inline;
  32834. begin
  32835. if thebits = 0 then
  32836. pTDefRegMap(@Self)^.clr := $00001000
  32837. else
  32838. pTDefRegMap(@Self)^.&set := $00001000;
  32839. end;
  32840. function TSPI4_SPI3ACON.getDISSDO : TBits_1; inline;
  32841. begin
  32842. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  32843. end;
  32844. procedure TSPI4_SPI3ACON.setSIDL; inline;
  32845. begin
  32846. pTDefRegMap(@Self)^.&set := $00002000;
  32847. end;
  32848. procedure TSPI4_SPI3ACON.clearSIDL; inline;
  32849. begin
  32850. pTDefRegMap(@Self)^.clr := $00002000;
  32851. end;
  32852. procedure TSPI4_SPI3ACON.setSIDL(thebits : TBits_1); inline;
  32853. begin
  32854. if thebits = 0 then
  32855. pTDefRegMap(@Self)^.clr := $00002000
  32856. else
  32857. pTDefRegMap(@Self)^.&set := $00002000;
  32858. end;
  32859. function TSPI4_SPI3ACON.getSIDL : TBits_1; inline;
  32860. begin
  32861. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32862. end;
  32863. procedure TSPI4_SPI3ACON.setON; inline;
  32864. begin
  32865. pTDefRegMap(@Self)^.&set := $00008000;
  32866. end;
  32867. procedure TSPI4_SPI3ACON.clearON; inline;
  32868. begin
  32869. pTDefRegMap(@Self)^.clr := $00008000;
  32870. end;
  32871. procedure TSPI4_SPI3ACON.setON(thebits : TBits_1); inline;
  32872. begin
  32873. if thebits = 0 then
  32874. pTDefRegMap(@Self)^.clr := $00008000
  32875. else
  32876. pTDefRegMap(@Self)^.&set := $00008000;
  32877. end;
  32878. function TSPI4_SPI3ACON.getON : TBits_1; inline;
  32879. begin
  32880. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32881. end;
  32882. procedure TSPI4_SPI3ACON.setENHBUF; inline;
  32883. begin
  32884. pTDefRegMap(@Self)^.&set := $00010000;
  32885. end;
  32886. procedure TSPI4_SPI3ACON.clearENHBUF; inline;
  32887. begin
  32888. pTDefRegMap(@Self)^.clr := $00010000;
  32889. end;
  32890. procedure TSPI4_SPI3ACON.setENHBUF(thebits : TBits_1); inline;
  32891. begin
  32892. if thebits = 0 then
  32893. pTDefRegMap(@Self)^.clr := $00010000
  32894. else
  32895. pTDefRegMap(@Self)^.&set := $00010000;
  32896. end;
  32897. function TSPI4_SPI3ACON.getENHBUF : TBits_1; inline;
  32898. begin
  32899. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  32900. end;
  32901. procedure TSPI4_SPI3ACON.setSPIFE; inline;
  32902. begin
  32903. pTDefRegMap(@Self)^.&set := $00020000;
  32904. end;
  32905. procedure TSPI4_SPI3ACON.clearSPIFE; inline;
  32906. begin
  32907. pTDefRegMap(@Self)^.clr := $00020000;
  32908. end;
  32909. procedure TSPI4_SPI3ACON.setSPIFE(thebits : TBits_1); inline;
  32910. begin
  32911. if thebits = 0 then
  32912. pTDefRegMap(@Self)^.clr := $00020000
  32913. else
  32914. pTDefRegMap(@Self)^.&set := $00020000;
  32915. end;
  32916. function TSPI4_SPI3ACON.getSPIFE : TBits_1; inline;
  32917. begin
  32918. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  32919. end;
  32920. procedure TSPI4_SPI3ACON.setFRMCNT(thebits : TBits_3); inline;
  32921. begin
  32922. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  32923. end;
  32924. function TSPI4_SPI3ACON.getFRMCNT : TBits_3; inline;
  32925. begin
  32926. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  32927. end;
  32928. procedure TSPI4_SPI3ACON.setFRMSYPW; inline;
  32929. begin
  32930. pTDefRegMap(@Self)^.&set := $08000000;
  32931. end;
  32932. procedure TSPI4_SPI3ACON.clearFRMSYPW; inline;
  32933. begin
  32934. pTDefRegMap(@Self)^.clr := $08000000;
  32935. end;
  32936. procedure TSPI4_SPI3ACON.setFRMSYPW(thebits : TBits_1); inline;
  32937. begin
  32938. if thebits = 0 then
  32939. pTDefRegMap(@Self)^.clr := $08000000
  32940. else
  32941. pTDefRegMap(@Self)^.&set := $08000000;
  32942. end;
  32943. function TSPI4_SPI3ACON.getFRMSYPW : TBits_1; inline;
  32944. begin
  32945. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  32946. end;
  32947. procedure TSPI4_SPI3ACON.setMSSEN; inline;
  32948. begin
  32949. pTDefRegMap(@Self)^.&set := $10000000;
  32950. end;
  32951. procedure TSPI4_SPI3ACON.clearMSSEN; inline;
  32952. begin
  32953. pTDefRegMap(@Self)^.clr := $10000000;
  32954. end;
  32955. procedure TSPI4_SPI3ACON.setMSSEN(thebits : TBits_1); inline;
  32956. begin
  32957. if thebits = 0 then
  32958. pTDefRegMap(@Self)^.clr := $10000000
  32959. else
  32960. pTDefRegMap(@Self)^.&set := $10000000;
  32961. end;
  32962. function TSPI4_SPI3ACON.getMSSEN : TBits_1; inline;
  32963. begin
  32964. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  32965. end;
  32966. procedure TSPI4_SPI3ACON.setFRMPOL; inline;
  32967. begin
  32968. pTDefRegMap(@Self)^.&set := $20000000;
  32969. end;
  32970. procedure TSPI4_SPI3ACON.clearFRMPOL; inline;
  32971. begin
  32972. pTDefRegMap(@Self)^.clr := $20000000;
  32973. end;
  32974. procedure TSPI4_SPI3ACON.setFRMPOL(thebits : TBits_1); inline;
  32975. begin
  32976. if thebits = 0 then
  32977. pTDefRegMap(@Self)^.clr := $20000000
  32978. else
  32979. pTDefRegMap(@Self)^.&set := $20000000;
  32980. end;
  32981. function TSPI4_SPI3ACON.getFRMPOL : TBits_1; inline;
  32982. begin
  32983. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  32984. end;
  32985. procedure TSPI4_SPI3ACON.setFRMSYNC; inline;
  32986. begin
  32987. pTDefRegMap(@Self)^.&set := $40000000;
  32988. end;
  32989. procedure TSPI4_SPI3ACON.clearFRMSYNC; inline;
  32990. begin
  32991. pTDefRegMap(@Self)^.clr := $40000000;
  32992. end;
  32993. procedure TSPI4_SPI3ACON.setFRMSYNC(thebits : TBits_1); inline;
  32994. begin
  32995. if thebits = 0 then
  32996. pTDefRegMap(@Self)^.clr := $40000000
  32997. else
  32998. pTDefRegMap(@Self)^.&set := $40000000;
  32999. end;
  33000. function TSPI4_SPI3ACON.getFRMSYNC : TBits_1; inline;
  33001. begin
  33002. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  33003. end;
  33004. procedure TSPI4_SPI3ACON.setFRMEN; inline;
  33005. begin
  33006. pTDefRegMap(@Self)^.&set := $80000000;
  33007. end;
  33008. procedure TSPI4_SPI3ACON.clearFRMEN; inline;
  33009. begin
  33010. pTDefRegMap(@Self)^.clr := $80000000;
  33011. end;
  33012. procedure TSPI4_SPI3ACON.setFRMEN(thebits : TBits_1); inline;
  33013. begin
  33014. if thebits = 0 then
  33015. pTDefRegMap(@Self)^.clr := $80000000
  33016. else
  33017. pTDefRegMap(@Self)^.&set := $80000000;
  33018. end;
  33019. function TSPI4_SPI3ACON.getFRMEN : TBits_1; inline;
  33020. begin
  33021. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  33022. end;
  33023. procedure TSPI4_SPI3ACON.setw(thebits : TBits_32); inline;
  33024. begin
  33025. pTDefRegMap(@Self)^.val := thebits;
  33026. end;
  33027. function TSPI4_SPI3ACON.getw : TBits_32; inline;
  33028. begin
  33029. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33030. end;
  33031. procedure TSPI4_SPI4CON.setSRXISEL(thebits : TBits_2); inline;
  33032. begin
  33033. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  33034. end;
  33035. function TSPI4_SPI4CON.getSRXISEL : TBits_2; inline;
  33036. begin
  33037. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  33038. end;
  33039. procedure TSPI4_SPI4CON.setSTXISEL(thebits : TBits_2); inline;
  33040. begin
  33041. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  33042. end;
  33043. function TSPI4_SPI4CON.getSTXISEL : TBits_2; inline;
  33044. begin
  33045. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  33046. end;
  33047. procedure TSPI4_SPI4CON.setMSTEN; inline;
  33048. begin
  33049. pTDefRegMap(@Self)^.&set := $00000020;
  33050. end;
  33051. procedure TSPI4_SPI4CON.clearMSTEN; inline;
  33052. begin
  33053. pTDefRegMap(@Self)^.clr := $00000020;
  33054. end;
  33055. procedure TSPI4_SPI4CON.setMSTEN(thebits : TBits_1); inline;
  33056. begin
  33057. if thebits = 0 then
  33058. pTDefRegMap(@Self)^.clr := $00000020
  33059. else
  33060. pTDefRegMap(@Self)^.&set := $00000020;
  33061. end;
  33062. function TSPI4_SPI4CON.getMSTEN : TBits_1; inline;
  33063. begin
  33064. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33065. end;
  33066. procedure TSPI4_SPI4CON.setCKP; inline;
  33067. begin
  33068. pTDefRegMap(@Self)^.&set := $00000040;
  33069. end;
  33070. procedure TSPI4_SPI4CON.clearCKP; inline;
  33071. begin
  33072. pTDefRegMap(@Self)^.clr := $00000040;
  33073. end;
  33074. procedure TSPI4_SPI4CON.setCKP(thebits : TBits_1); inline;
  33075. begin
  33076. if thebits = 0 then
  33077. pTDefRegMap(@Self)^.clr := $00000040
  33078. else
  33079. pTDefRegMap(@Self)^.&set := $00000040;
  33080. end;
  33081. function TSPI4_SPI4CON.getCKP : TBits_1; inline;
  33082. begin
  33083. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33084. end;
  33085. procedure TSPI4_SPI4CON.setSSEN; inline;
  33086. begin
  33087. pTDefRegMap(@Self)^.&set := $00000080;
  33088. end;
  33089. procedure TSPI4_SPI4CON.clearSSEN; inline;
  33090. begin
  33091. pTDefRegMap(@Self)^.clr := $00000080;
  33092. end;
  33093. procedure TSPI4_SPI4CON.setSSEN(thebits : TBits_1); inline;
  33094. begin
  33095. if thebits = 0 then
  33096. pTDefRegMap(@Self)^.clr := $00000080
  33097. else
  33098. pTDefRegMap(@Self)^.&set := $00000080;
  33099. end;
  33100. function TSPI4_SPI4CON.getSSEN : TBits_1; inline;
  33101. begin
  33102. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33103. end;
  33104. procedure TSPI4_SPI4CON.setCKE; inline;
  33105. begin
  33106. pTDefRegMap(@Self)^.&set := $00000100;
  33107. end;
  33108. procedure TSPI4_SPI4CON.clearCKE; inline;
  33109. begin
  33110. pTDefRegMap(@Self)^.clr := $00000100;
  33111. end;
  33112. procedure TSPI4_SPI4CON.setCKE(thebits : TBits_1); inline;
  33113. begin
  33114. if thebits = 0 then
  33115. pTDefRegMap(@Self)^.clr := $00000100
  33116. else
  33117. pTDefRegMap(@Self)^.&set := $00000100;
  33118. end;
  33119. function TSPI4_SPI4CON.getCKE : TBits_1; inline;
  33120. begin
  33121. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33122. end;
  33123. procedure TSPI4_SPI4CON.setSMP; inline;
  33124. begin
  33125. pTDefRegMap(@Self)^.&set := $00000200;
  33126. end;
  33127. procedure TSPI4_SPI4CON.clearSMP; inline;
  33128. begin
  33129. pTDefRegMap(@Self)^.clr := $00000200;
  33130. end;
  33131. procedure TSPI4_SPI4CON.setSMP(thebits : TBits_1); inline;
  33132. begin
  33133. if thebits = 0 then
  33134. pTDefRegMap(@Self)^.clr := $00000200
  33135. else
  33136. pTDefRegMap(@Self)^.&set := $00000200;
  33137. end;
  33138. function TSPI4_SPI4CON.getSMP : TBits_1; inline;
  33139. begin
  33140. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  33141. end;
  33142. procedure TSPI4_SPI4CON.setMODE16; inline;
  33143. begin
  33144. pTDefRegMap(@Self)^.&set := $00000400;
  33145. end;
  33146. procedure TSPI4_SPI4CON.clearMODE16; inline;
  33147. begin
  33148. pTDefRegMap(@Self)^.clr := $00000400;
  33149. end;
  33150. procedure TSPI4_SPI4CON.setMODE16(thebits : TBits_1); inline;
  33151. begin
  33152. if thebits = 0 then
  33153. pTDefRegMap(@Self)^.clr := $00000400
  33154. else
  33155. pTDefRegMap(@Self)^.&set := $00000400;
  33156. end;
  33157. function TSPI4_SPI4CON.getMODE16 : TBits_1; inline;
  33158. begin
  33159. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  33160. end;
  33161. procedure TSPI4_SPI4CON.setMODE32; inline;
  33162. begin
  33163. pTDefRegMap(@Self)^.&set := $00000800;
  33164. end;
  33165. procedure TSPI4_SPI4CON.clearMODE32; inline;
  33166. begin
  33167. pTDefRegMap(@Self)^.clr := $00000800;
  33168. end;
  33169. procedure TSPI4_SPI4CON.setMODE32(thebits : TBits_1); inline;
  33170. begin
  33171. if thebits = 0 then
  33172. pTDefRegMap(@Self)^.clr := $00000800
  33173. else
  33174. pTDefRegMap(@Self)^.&set := $00000800;
  33175. end;
  33176. function TSPI4_SPI4CON.getMODE32 : TBits_1; inline;
  33177. begin
  33178. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  33179. end;
  33180. procedure TSPI4_SPI4CON.setDISSDO; inline;
  33181. begin
  33182. pTDefRegMap(@Self)^.&set := $00001000;
  33183. end;
  33184. procedure TSPI4_SPI4CON.clearDISSDO; inline;
  33185. begin
  33186. pTDefRegMap(@Self)^.clr := $00001000;
  33187. end;
  33188. procedure TSPI4_SPI4CON.setDISSDO(thebits : TBits_1); inline;
  33189. begin
  33190. if thebits = 0 then
  33191. pTDefRegMap(@Self)^.clr := $00001000
  33192. else
  33193. pTDefRegMap(@Self)^.&set := $00001000;
  33194. end;
  33195. function TSPI4_SPI4CON.getDISSDO : TBits_1; inline;
  33196. begin
  33197. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  33198. end;
  33199. procedure TSPI4_SPI4CON.setSIDL; inline;
  33200. begin
  33201. pTDefRegMap(@Self)^.&set := $00002000;
  33202. end;
  33203. procedure TSPI4_SPI4CON.clearSIDL; inline;
  33204. begin
  33205. pTDefRegMap(@Self)^.clr := $00002000;
  33206. end;
  33207. procedure TSPI4_SPI4CON.setSIDL(thebits : TBits_1); inline;
  33208. begin
  33209. if thebits = 0 then
  33210. pTDefRegMap(@Self)^.clr := $00002000
  33211. else
  33212. pTDefRegMap(@Self)^.&set := $00002000;
  33213. end;
  33214. function TSPI4_SPI4CON.getSIDL : TBits_1; inline;
  33215. begin
  33216. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33217. end;
  33218. procedure TSPI4_SPI4CON.setON; inline;
  33219. begin
  33220. pTDefRegMap(@Self)^.&set := $00008000;
  33221. end;
  33222. procedure TSPI4_SPI4CON.clearON; inline;
  33223. begin
  33224. pTDefRegMap(@Self)^.clr := $00008000;
  33225. end;
  33226. procedure TSPI4_SPI4CON.setON(thebits : TBits_1); inline;
  33227. begin
  33228. if thebits = 0 then
  33229. pTDefRegMap(@Self)^.clr := $00008000
  33230. else
  33231. pTDefRegMap(@Self)^.&set := $00008000;
  33232. end;
  33233. function TSPI4_SPI4CON.getON : TBits_1; inline;
  33234. begin
  33235. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33236. end;
  33237. procedure TSPI4_SPI4CON.setENHBUF; inline;
  33238. begin
  33239. pTDefRegMap(@Self)^.&set := $00010000;
  33240. end;
  33241. procedure TSPI4_SPI4CON.clearENHBUF; inline;
  33242. begin
  33243. pTDefRegMap(@Self)^.clr := $00010000;
  33244. end;
  33245. procedure TSPI4_SPI4CON.setENHBUF(thebits : TBits_1); inline;
  33246. begin
  33247. if thebits = 0 then
  33248. pTDefRegMap(@Self)^.clr := $00010000
  33249. else
  33250. pTDefRegMap(@Self)^.&set := $00010000;
  33251. end;
  33252. function TSPI4_SPI4CON.getENHBUF : TBits_1; inline;
  33253. begin
  33254. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  33255. end;
  33256. procedure TSPI4_SPI4CON.setSPIFE; inline;
  33257. begin
  33258. pTDefRegMap(@Self)^.&set := $00020000;
  33259. end;
  33260. procedure TSPI4_SPI4CON.clearSPIFE; inline;
  33261. begin
  33262. pTDefRegMap(@Self)^.clr := $00020000;
  33263. end;
  33264. procedure TSPI4_SPI4CON.setSPIFE(thebits : TBits_1); inline;
  33265. begin
  33266. if thebits = 0 then
  33267. pTDefRegMap(@Self)^.clr := $00020000
  33268. else
  33269. pTDefRegMap(@Self)^.&set := $00020000;
  33270. end;
  33271. function TSPI4_SPI4CON.getSPIFE : TBits_1; inline;
  33272. begin
  33273. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  33274. end;
  33275. procedure TSPI4_SPI4CON.setFRMCNT(thebits : TBits_3); inline;
  33276. begin
  33277. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  33278. end;
  33279. function TSPI4_SPI4CON.getFRMCNT : TBits_3; inline;
  33280. begin
  33281. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  33282. end;
  33283. procedure TSPI4_SPI4CON.setFRMSYPW; inline;
  33284. begin
  33285. pTDefRegMap(@Self)^.&set := $08000000;
  33286. end;
  33287. procedure TSPI4_SPI4CON.clearFRMSYPW; inline;
  33288. begin
  33289. pTDefRegMap(@Self)^.clr := $08000000;
  33290. end;
  33291. procedure TSPI4_SPI4CON.setFRMSYPW(thebits : TBits_1); inline;
  33292. begin
  33293. if thebits = 0 then
  33294. pTDefRegMap(@Self)^.clr := $08000000
  33295. else
  33296. pTDefRegMap(@Self)^.&set := $08000000;
  33297. end;
  33298. function TSPI4_SPI4CON.getFRMSYPW : TBits_1; inline;
  33299. begin
  33300. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  33301. end;
  33302. procedure TSPI4_SPI4CON.setMSSEN; inline;
  33303. begin
  33304. pTDefRegMap(@Self)^.&set := $10000000;
  33305. end;
  33306. procedure TSPI4_SPI4CON.clearMSSEN; inline;
  33307. begin
  33308. pTDefRegMap(@Self)^.clr := $10000000;
  33309. end;
  33310. procedure TSPI4_SPI4CON.setMSSEN(thebits : TBits_1); inline;
  33311. begin
  33312. if thebits = 0 then
  33313. pTDefRegMap(@Self)^.clr := $10000000
  33314. else
  33315. pTDefRegMap(@Self)^.&set := $10000000;
  33316. end;
  33317. function TSPI4_SPI4CON.getMSSEN : TBits_1; inline;
  33318. begin
  33319. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  33320. end;
  33321. procedure TSPI4_SPI4CON.setFRMPOL; inline;
  33322. begin
  33323. pTDefRegMap(@Self)^.&set := $20000000;
  33324. end;
  33325. procedure TSPI4_SPI4CON.clearFRMPOL; inline;
  33326. begin
  33327. pTDefRegMap(@Self)^.clr := $20000000;
  33328. end;
  33329. procedure TSPI4_SPI4CON.setFRMPOL(thebits : TBits_1); inline;
  33330. begin
  33331. if thebits = 0 then
  33332. pTDefRegMap(@Self)^.clr := $20000000
  33333. else
  33334. pTDefRegMap(@Self)^.&set := $20000000;
  33335. end;
  33336. function TSPI4_SPI4CON.getFRMPOL : TBits_1; inline;
  33337. begin
  33338. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  33339. end;
  33340. procedure TSPI4_SPI4CON.setFRMSYNC; inline;
  33341. begin
  33342. pTDefRegMap(@Self)^.&set := $40000000;
  33343. end;
  33344. procedure TSPI4_SPI4CON.clearFRMSYNC; inline;
  33345. begin
  33346. pTDefRegMap(@Self)^.clr := $40000000;
  33347. end;
  33348. procedure TSPI4_SPI4CON.setFRMSYNC(thebits : TBits_1); inline;
  33349. begin
  33350. if thebits = 0 then
  33351. pTDefRegMap(@Self)^.clr := $40000000
  33352. else
  33353. pTDefRegMap(@Self)^.&set := $40000000;
  33354. end;
  33355. function TSPI4_SPI4CON.getFRMSYNC : TBits_1; inline;
  33356. begin
  33357. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  33358. end;
  33359. procedure TSPI4_SPI4CON.setFRMEN; inline;
  33360. begin
  33361. pTDefRegMap(@Self)^.&set := $80000000;
  33362. end;
  33363. procedure TSPI4_SPI4CON.clearFRMEN; inline;
  33364. begin
  33365. pTDefRegMap(@Self)^.clr := $80000000;
  33366. end;
  33367. procedure TSPI4_SPI4CON.setFRMEN(thebits : TBits_1); inline;
  33368. begin
  33369. if thebits = 0 then
  33370. pTDefRegMap(@Self)^.clr := $80000000
  33371. else
  33372. pTDefRegMap(@Self)^.&set := $80000000;
  33373. end;
  33374. function TSPI4_SPI4CON.getFRMEN : TBits_1; inline;
  33375. begin
  33376. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  33377. end;
  33378. procedure TSPI4_SPI4CON.setw(thebits : TBits_32); inline;
  33379. begin
  33380. pTDefRegMap(@Self)^.val := thebits;
  33381. end;
  33382. function TSPI4_SPI4CON.getw : TBits_32; inline;
  33383. begin
  33384. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33385. end;
  33386. procedure TSPI4_SPI3ASTAT.setSPIRBF; inline;
  33387. begin
  33388. pTDefRegMap(@Self)^.&set := $00000001;
  33389. end;
  33390. procedure TSPI4_SPI3ASTAT.clearSPIRBF; inline;
  33391. begin
  33392. pTDefRegMap(@Self)^.clr := $00000001;
  33393. end;
  33394. procedure TSPI4_SPI3ASTAT.setSPIRBF(thebits : TBits_1); inline;
  33395. begin
  33396. if thebits = 0 then
  33397. pTDefRegMap(@Self)^.clr := $00000001
  33398. else
  33399. pTDefRegMap(@Self)^.&set := $00000001;
  33400. end;
  33401. function TSPI4_SPI3ASTAT.getSPIRBF : TBits_1; inline;
  33402. begin
  33403. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33404. end;
  33405. procedure TSPI4_SPI3ASTAT.setSPITBF; inline;
  33406. begin
  33407. pTDefRegMap(@Self)^.&set := $00000002;
  33408. end;
  33409. procedure TSPI4_SPI3ASTAT.clearSPITBF; inline;
  33410. begin
  33411. pTDefRegMap(@Self)^.clr := $00000002;
  33412. end;
  33413. procedure TSPI4_SPI3ASTAT.setSPITBF(thebits : TBits_1); inline;
  33414. begin
  33415. if thebits = 0 then
  33416. pTDefRegMap(@Self)^.clr := $00000002
  33417. else
  33418. pTDefRegMap(@Self)^.&set := $00000002;
  33419. end;
  33420. function TSPI4_SPI3ASTAT.getSPITBF : TBits_1; inline;
  33421. begin
  33422. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33423. end;
  33424. procedure TSPI4_SPI3ASTAT.setSPITBE; inline;
  33425. begin
  33426. pTDefRegMap(@Self)^.&set := $00000008;
  33427. end;
  33428. procedure TSPI4_SPI3ASTAT.clearSPITBE; inline;
  33429. begin
  33430. pTDefRegMap(@Self)^.clr := $00000008;
  33431. end;
  33432. procedure TSPI4_SPI3ASTAT.setSPITBE(thebits : TBits_1); inline;
  33433. begin
  33434. if thebits = 0 then
  33435. pTDefRegMap(@Self)^.clr := $00000008
  33436. else
  33437. pTDefRegMap(@Self)^.&set := $00000008;
  33438. end;
  33439. function TSPI4_SPI3ASTAT.getSPITBE : TBits_1; inline;
  33440. begin
  33441. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33442. end;
  33443. procedure TSPI4_SPI3ASTAT.setSPIRBE; inline;
  33444. begin
  33445. pTDefRegMap(@Self)^.&set := $00000020;
  33446. end;
  33447. procedure TSPI4_SPI3ASTAT.clearSPIRBE; inline;
  33448. begin
  33449. pTDefRegMap(@Self)^.clr := $00000020;
  33450. end;
  33451. procedure TSPI4_SPI3ASTAT.setSPIRBE(thebits : TBits_1); inline;
  33452. begin
  33453. if thebits = 0 then
  33454. pTDefRegMap(@Self)^.clr := $00000020
  33455. else
  33456. pTDefRegMap(@Self)^.&set := $00000020;
  33457. end;
  33458. function TSPI4_SPI3ASTAT.getSPIRBE : TBits_1; inline;
  33459. begin
  33460. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33461. end;
  33462. procedure TSPI4_SPI3ASTAT.setSPIROV; inline;
  33463. begin
  33464. pTDefRegMap(@Self)^.&set := $00000040;
  33465. end;
  33466. procedure TSPI4_SPI3ASTAT.clearSPIROV; inline;
  33467. begin
  33468. pTDefRegMap(@Self)^.clr := $00000040;
  33469. end;
  33470. procedure TSPI4_SPI3ASTAT.setSPIROV(thebits : TBits_1); inline;
  33471. begin
  33472. if thebits = 0 then
  33473. pTDefRegMap(@Self)^.clr := $00000040
  33474. else
  33475. pTDefRegMap(@Self)^.&set := $00000040;
  33476. end;
  33477. function TSPI4_SPI3ASTAT.getSPIROV : TBits_1; inline;
  33478. begin
  33479. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33480. end;
  33481. procedure TSPI4_SPI3ASTAT.setSRMT; inline;
  33482. begin
  33483. pTDefRegMap(@Self)^.&set := $00000080;
  33484. end;
  33485. procedure TSPI4_SPI3ASTAT.clearSRMT; inline;
  33486. begin
  33487. pTDefRegMap(@Self)^.clr := $00000080;
  33488. end;
  33489. procedure TSPI4_SPI3ASTAT.setSRMT(thebits : TBits_1); inline;
  33490. begin
  33491. if thebits = 0 then
  33492. pTDefRegMap(@Self)^.clr := $00000080
  33493. else
  33494. pTDefRegMap(@Self)^.&set := $00000080;
  33495. end;
  33496. function TSPI4_SPI3ASTAT.getSRMT : TBits_1; inline;
  33497. begin
  33498. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33499. end;
  33500. procedure TSPI4_SPI3ASTAT.setSPITUR; inline;
  33501. begin
  33502. pTDefRegMap(@Self)^.&set := $00000100;
  33503. end;
  33504. procedure TSPI4_SPI3ASTAT.clearSPITUR; inline;
  33505. begin
  33506. pTDefRegMap(@Self)^.clr := $00000100;
  33507. end;
  33508. procedure TSPI4_SPI3ASTAT.setSPITUR(thebits : TBits_1); inline;
  33509. begin
  33510. if thebits = 0 then
  33511. pTDefRegMap(@Self)^.clr := $00000100
  33512. else
  33513. pTDefRegMap(@Self)^.&set := $00000100;
  33514. end;
  33515. function TSPI4_SPI3ASTAT.getSPITUR : TBits_1; inline;
  33516. begin
  33517. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33518. end;
  33519. procedure TSPI4_SPI3ASTAT.setSPIBUSY; inline;
  33520. begin
  33521. pTDefRegMap(@Self)^.&set := $00000800;
  33522. end;
  33523. procedure TSPI4_SPI3ASTAT.clearSPIBUSY; inline;
  33524. begin
  33525. pTDefRegMap(@Self)^.clr := $00000800;
  33526. end;
  33527. procedure TSPI4_SPI3ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  33528. begin
  33529. if thebits = 0 then
  33530. pTDefRegMap(@Self)^.clr := $00000800
  33531. else
  33532. pTDefRegMap(@Self)^.&set := $00000800;
  33533. end;
  33534. function TSPI4_SPI3ASTAT.getSPIBUSY : TBits_1; inline;
  33535. begin
  33536. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  33537. end;
  33538. procedure TSPI4_SPI3ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  33539. begin
  33540. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  33541. end;
  33542. function TSPI4_SPI3ASTAT.getTXBUFELM : TBits_5; inline;
  33543. begin
  33544. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  33545. end;
  33546. procedure TSPI4_SPI3ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  33547. begin
  33548. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  33549. end;
  33550. function TSPI4_SPI3ASTAT.getRXBUFELM : TBits_5; inline;
  33551. begin
  33552. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  33553. end;
  33554. procedure TSPI4_SPI3ASTAT.setw(thebits : TBits_32); inline;
  33555. begin
  33556. pTDefRegMap(@Self)^.val := thebits;
  33557. end;
  33558. function TSPI4_SPI3ASTAT.getw : TBits_32; inline;
  33559. begin
  33560. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33561. end;
  33562. procedure TSPI4_SPI4STAT.setSPIRBF; inline;
  33563. begin
  33564. pTDefRegMap(@Self)^.&set := $00000001;
  33565. end;
  33566. procedure TSPI4_SPI4STAT.clearSPIRBF; inline;
  33567. begin
  33568. pTDefRegMap(@Self)^.clr := $00000001;
  33569. end;
  33570. procedure TSPI4_SPI4STAT.setSPIRBF(thebits : TBits_1); inline;
  33571. begin
  33572. if thebits = 0 then
  33573. pTDefRegMap(@Self)^.clr := $00000001
  33574. else
  33575. pTDefRegMap(@Self)^.&set := $00000001;
  33576. end;
  33577. function TSPI4_SPI4STAT.getSPIRBF : TBits_1; inline;
  33578. begin
  33579. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33580. end;
  33581. procedure TSPI4_SPI4STAT.setSPITBF; inline;
  33582. begin
  33583. pTDefRegMap(@Self)^.&set := $00000002;
  33584. end;
  33585. procedure TSPI4_SPI4STAT.clearSPITBF; inline;
  33586. begin
  33587. pTDefRegMap(@Self)^.clr := $00000002;
  33588. end;
  33589. procedure TSPI4_SPI4STAT.setSPITBF(thebits : TBits_1); inline;
  33590. begin
  33591. if thebits = 0 then
  33592. pTDefRegMap(@Self)^.clr := $00000002
  33593. else
  33594. pTDefRegMap(@Self)^.&set := $00000002;
  33595. end;
  33596. function TSPI4_SPI4STAT.getSPITBF : TBits_1; inline;
  33597. begin
  33598. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33599. end;
  33600. procedure TSPI4_SPI4STAT.setSPITBE; inline;
  33601. begin
  33602. pTDefRegMap(@Self)^.&set := $00000008;
  33603. end;
  33604. procedure TSPI4_SPI4STAT.clearSPITBE; inline;
  33605. begin
  33606. pTDefRegMap(@Self)^.clr := $00000008;
  33607. end;
  33608. procedure TSPI4_SPI4STAT.setSPITBE(thebits : TBits_1); inline;
  33609. begin
  33610. if thebits = 0 then
  33611. pTDefRegMap(@Self)^.clr := $00000008
  33612. else
  33613. pTDefRegMap(@Self)^.&set := $00000008;
  33614. end;
  33615. function TSPI4_SPI4STAT.getSPITBE : TBits_1; inline;
  33616. begin
  33617. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33618. end;
  33619. procedure TSPI4_SPI4STAT.setSPIRBE; inline;
  33620. begin
  33621. pTDefRegMap(@Self)^.&set := $00000020;
  33622. end;
  33623. procedure TSPI4_SPI4STAT.clearSPIRBE; inline;
  33624. begin
  33625. pTDefRegMap(@Self)^.clr := $00000020;
  33626. end;
  33627. procedure TSPI4_SPI4STAT.setSPIRBE(thebits : TBits_1); inline;
  33628. begin
  33629. if thebits = 0 then
  33630. pTDefRegMap(@Self)^.clr := $00000020
  33631. else
  33632. pTDefRegMap(@Self)^.&set := $00000020;
  33633. end;
  33634. function TSPI4_SPI4STAT.getSPIRBE : TBits_1; inline;
  33635. begin
  33636. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33637. end;
  33638. procedure TSPI4_SPI4STAT.setSPIROV; inline;
  33639. begin
  33640. pTDefRegMap(@Self)^.&set := $00000040;
  33641. end;
  33642. procedure TSPI4_SPI4STAT.clearSPIROV; inline;
  33643. begin
  33644. pTDefRegMap(@Self)^.clr := $00000040;
  33645. end;
  33646. procedure TSPI4_SPI4STAT.setSPIROV(thebits : TBits_1); inline;
  33647. begin
  33648. if thebits = 0 then
  33649. pTDefRegMap(@Self)^.clr := $00000040
  33650. else
  33651. pTDefRegMap(@Self)^.&set := $00000040;
  33652. end;
  33653. function TSPI4_SPI4STAT.getSPIROV : TBits_1; inline;
  33654. begin
  33655. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33656. end;
  33657. procedure TSPI4_SPI4STAT.setSRMT; inline;
  33658. begin
  33659. pTDefRegMap(@Self)^.&set := $00000080;
  33660. end;
  33661. procedure TSPI4_SPI4STAT.clearSRMT; inline;
  33662. begin
  33663. pTDefRegMap(@Self)^.clr := $00000080;
  33664. end;
  33665. procedure TSPI4_SPI4STAT.setSRMT(thebits : TBits_1); inline;
  33666. begin
  33667. if thebits = 0 then
  33668. pTDefRegMap(@Self)^.clr := $00000080
  33669. else
  33670. pTDefRegMap(@Self)^.&set := $00000080;
  33671. end;
  33672. function TSPI4_SPI4STAT.getSRMT : TBits_1; inline;
  33673. begin
  33674. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33675. end;
  33676. procedure TSPI4_SPI4STAT.setSPITUR; inline;
  33677. begin
  33678. pTDefRegMap(@Self)^.&set := $00000100;
  33679. end;
  33680. procedure TSPI4_SPI4STAT.clearSPITUR; inline;
  33681. begin
  33682. pTDefRegMap(@Self)^.clr := $00000100;
  33683. end;
  33684. procedure TSPI4_SPI4STAT.setSPITUR(thebits : TBits_1); inline;
  33685. begin
  33686. if thebits = 0 then
  33687. pTDefRegMap(@Self)^.clr := $00000100
  33688. else
  33689. pTDefRegMap(@Self)^.&set := $00000100;
  33690. end;
  33691. function TSPI4_SPI4STAT.getSPITUR : TBits_1; inline;
  33692. begin
  33693. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33694. end;
  33695. procedure TSPI4_SPI4STAT.setSPIBUSY; inline;
  33696. begin
  33697. pTDefRegMap(@Self)^.&set := $00000800;
  33698. end;
  33699. procedure TSPI4_SPI4STAT.clearSPIBUSY; inline;
  33700. begin
  33701. pTDefRegMap(@Self)^.clr := $00000800;
  33702. end;
  33703. procedure TSPI4_SPI4STAT.setSPIBUSY(thebits : TBits_1); inline;
  33704. begin
  33705. if thebits = 0 then
  33706. pTDefRegMap(@Self)^.clr := $00000800
  33707. else
  33708. pTDefRegMap(@Self)^.&set := $00000800;
  33709. end;
  33710. function TSPI4_SPI4STAT.getSPIBUSY : TBits_1; inline;
  33711. begin
  33712. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  33713. end;
  33714. procedure TSPI4_SPI4STAT.setTXBUFELM(thebits : TBits_5); inline;
  33715. begin
  33716. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  33717. end;
  33718. function TSPI4_SPI4STAT.getTXBUFELM : TBits_5; inline;
  33719. begin
  33720. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  33721. end;
  33722. procedure TSPI4_SPI4STAT.setRXBUFELM(thebits : TBits_5); inline;
  33723. begin
  33724. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  33725. end;
  33726. function TSPI4_SPI4STAT.getRXBUFELM : TBits_5; inline;
  33727. begin
  33728. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  33729. end;
  33730. procedure TSPI4_SPI4STAT.setw(thebits : TBits_32); inline;
  33731. begin
  33732. pTDefRegMap(@Self)^.val := thebits;
  33733. end;
  33734. function TSPI4_SPI4STAT.getw : TBits_32; inline;
  33735. begin
  33736. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33737. end;
  33738. procedure TUART1A_U1AMODE.setSTSEL; inline;
  33739. begin
  33740. pTDefRegMap(@Self)^.&set := $00000001;
  33741. end;
  33742. procedure TUART1A_U1AMODE.clearSTSEL; inline;
  33743. begin
  33744. pTDefRegMap(@Self)^.clr := $00000001;
  33745. end;
  33746. procedure TUART1A_U1AMODE.setSTSEL(thebits : TBits_1); inline;
  33747. begin
  33748. if thebits = 0 then
  33749. pTDefRegMap(@Self)^.clr := $00000001
  33750. else
  33751. pTDefRegMap(@Self)^.&set := $00000001;
  33752. end;
  33753. function TUART1A_U1AMODE.getSTSEL : TBits_1; inline;
  33754. begin
  33755. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33756. end;
  33757. procedure TUART1A_U1AMODE.setPDSEL(thebits : TBits_2); inline;
  33758. begin
  33759. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  33760. end;
  33761. function TUART1A_U1AMODE.getPDSEL : TBits_2; inline;
  33762. begin
  33763. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  33764. end;
  33765. procedure TUART1A_U1AMODE.setBRGH; inline;
  33766. begin
  33767. pTDefRegMap(@Self)^.&set := $00000008;
  33768. end;
  33769. procedure TUART1A_U1AMODE.clearBRGH; inline;
  33770. begin
  33771. pTDefRegMap(@Self)^.clr := $00000008;
  33772. end;
  33773. procedure TUART1A_U1AMODE.setBRGH(thebits : TBits_1); inline;
  33774. begin
  33775. if thebits = 0 then
  33776. pTDefRegMap(@Self)^.clr := $00000008
  33777. else
  33778. pTDefRegMap(@Self)^.&set := $00000008;
  33779. end;
  33780. function TUART1A_U1AMODE.getBRGH : TBits_1; inline;
  33781. begin
  33782. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33783. end;
  33784. procedure TUART1A_U1AMODE.setRXINV; inline;
  33785. begin
  33786. pTDefRegMap(@Self)^.&set := $00000010;
  33787. end;
  33788. procedure TUART1A_U1AMODE.clearRXINV; inline;
  33789. begin
  33790. pTDefRegMap(@Self)^.clr := $00000010;
  33791. end;
  33792. procedure TUART1A_U1AMODE.setRXINV(thebits : TBits_1); inline;
  33793. begin
  33794. if thebits = 0 then
  33795. pTDefRegMap(@Self)^.clr := $00000010
  33796. else
  33797. pTDefRegMap(@Self)^.&set := $00000010;
  33798. end;
  33799. function TUART1A_U1AMODE.getRXINV : TBits_1; inline;
  33800. begin
  33801. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33802. end;
  33803. procedure TUART1A_U1AMODE.setABAUD; inline;
  33804. begin
  33805. pTDefRegMap(@Self)^.&set := $00000020;
  33806. end;
  33807. procedure TUART1A_U1AMODE.clearABAUD; inline;
  33808. begin
  33809. pTDefRegMap(@Self)^.clr := $00000020;
  33810. end;
  33811. procedure TUART1A_U1AMODE.setABAUD(thebits : TBits_1); inline;
  33812. begin
  33813. if thebits = 0 then
  33814. pTDefRegMap(@Self)^.clr := $00000020
  33815. else
  33816. pTDefRegMap(@Self)^.&set := $00000020;
  33817. end;
  33818. function TUART1A_U1AMODE.getABAUD : TBits_1; inline;
  33819. begin
  33820. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33821. end;
  33822. procedure TUART1A_U1AMODE.setLPBACK; inline;
  33823. begin
  33824. pTDefRegMap(@Self)^.&set := $00000040;
  33825. end;
  33826. procedure TUART1A_U1AMODE.clearLPBACK; inline;
  33827. begin
  33828. pTDefRegMap(@Self)^.clr := $00000040;
  33829. end;
  33830. procedure TUART1A_U1AMODE.setLPBACK(thebits : TBits_1); inline;
  33831. begin
  33832. if thebits = 0 then
  33833. pTDefRegMap(@Self)^.clr := $00000040
  33834. else
  33835. pTDefRegMap(@Self)^.&set := $00000040;
  33836. end;
  33837. function TUART1A_U1AMODE.getLPBACK : TBits_1; inline;
  33838. begin
  33839. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33840. end;
  33841. procedure TUART1A_U1AMODE.setWAKE; inline;
  33842. begin
  33843. pTDefRegMap(@Self)^.&set := $00000080;
  33844. end;
  33845. procedure TUART1A_U1AMODE.clearWAKE; inline;
  33846. begin
  33847. pTDefRegMap(@Self)^.clr := $00000080;
  33848. end;
  33849. procedure TUART1A_U1AMODE.setWAKE(thebits : TBits_1); inline;
  33850. begin
  33851. if thebits = 0 then
  33852. pTDefRegMap(@Self)^.clr := $00000080
  33853. else
  33854. pTDefRegMap(@Self)^.&set := $00000080;
  33855. end;
  33856. function TUART1A_U1AMODE.getWAKE : TBits_1; inline;
  33857. begin
  33858. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33859. end;
  33860. procedure TUART1A_U1AMODE.setUEN(thebits : TBits_2); inline;
  33861. begin
  33862. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  33863. end;
  33864. function TUART1A_U1AMODE.getUEN : TBits_2; inline;
  33865. begin
  33866. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  33867. end;
  33868. procedure TUART1A_U1AMODE.setRTSMD; inline;
  33869. begin
  33870. pTDefRegMap(@Self)^.&set := $00000800;
  33871. end;
  33872. procedure TUART1A_U1AMODE.clearRTSMD; inline;
  33873. begin
  33874. pTDefRegMap(@Self)^.clr := $00000800;
  33875. end;
  33876. procedure TUART1A_U1AMODE.setRTSMD(thebits : TBits_1); inline;
  33877. begin
  33878. if thebits = 0 then
  33879. pTDefRegMap(@Self)^.clr := $00000800
  33880. else
  33881. pTDefRegMap(@Self)^.&set := $00000800;
  33882. end;
  33883. function TUART1A_U1AMODE.getRTSMD : TBits_1; inline;
  33884. begin
  33885. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  33886. end;
  33887. procedure TUART1A_U1AMODE.setIREN; inline;
  33888. begin
  33889. pTDefRegMap(@Self)^.&set := $00001000;
  33890. end;
  33891. procedure TUART1A_U1AMODE.clearIREN; inline;
  33892. begin
  33893. pTDefRegMap(@Self)^.clr := $00001000;
  33894. end;
  33895. procedure TUART1A_U1AMODE.setIREN(thebits : TBits_1); inline;
  33896. begin
  33897. if thebits = 0 then
  33898. pTDefRegMap(@Self)^.clr := $00001000
  33899. else
  33900. pTDefRegMap(@Self)^.&set := $00001000;
  33901. end;
  33902. function TUART1A_U1AMODE.getIREN : TBits_1; inline;
  33903. begin
  33904. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  33905. end;
  33906. procedure TUART1A_U1AMODE.setSIDL; inline;
  33907. begin
  33908. pTDefRegMap(@Self)^.&set := $00002000;
  33909. end;
  33910. procedure TUART1A_U1AMODE.clearSIDL; inline;
  33911. begin
  33912. pTDefRegMap(@Self)^.clr := $00002000;
  33913. end;
  33914. procedure TUART1A_U1AMODE.setSIDL(thebits : TBits_1); inline;
  33915. begin
  33916. if thebits = 0 then
  33917. pTDefRegMap(@Self)^.clr := $00002000
  33918. else
  33919. pTDefRegMap(@Self)^.&set := $00002000;
  33920. end;
  33921. function TUART1A_U1AMODE.getSIDL : TBits_1; inline;
  33922. begin
  33923. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33924. end;
  33925. procedure TUART1A_U1AMODE.setON; inline;
  33926. begin
  33927. pTDefRegMap(@Self)^.&set := $00008000;
  33928. end;
  33929. procedure TUART1A_U1AMODE.clearON; inline;
  33930. begin
  33931. pTDefRegMap(@Self)^.clr := $00008000;
  33932. end;
  33933. procedure TUART1A_U1AMODE.setON(thebits : TBits_1); inline;
  33934. begin
  33935. if thebits = 0 then
  33936. pTDefRegMap(@Self)^.clr := $00008000
  33937. else
  33938. pTDefRegMap(@Self)^.&set := $00008000;
  33939. end;
  33940. function TUART1A_U1AMODE.getON : TBits_1; inline;
  33941. begin
  33942. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33943. end;
  33944. procedure TUART1A_U1AMODE.setPDSEL0; inline;
  33945. begin
  33946. pTDefRegMap(@Self)^.&set := $00000002;
  33947. end;
  33948. procedure TUART1A_U1AMODE.clearPDSEL0; inline;
  33949. begin
  33950. pTDefRegMap(@Self)^.clr := $00000002;
  33951. end;
  33952. procedure TUART1A_U1AMODE.setPDSEL0(thebits : TBits_1); inline;
  33953. begin
  33954. if thebits = 0 then
  33955. pTDefRegMap(@Self)^.clr := $00000002
  33956. else
  33957. pTDefRegMap(@Self)^.&set := $00000002;
  33958. end;
  33959. function TUART1A_U1AMODE.getPDSEL0 : TBits_1; inline;
  33960. begin
  33961. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33962. end;
  33963. procedure TUART1A_U1AMODE.setPDSEL1; inline;
  33964. begin
  33965. pTDefRegMap(@Self)^.&set := $00000004;
  33966. end;
  33967. procedure TUART1A_U1AMODE.clearPDSEL1; inline;
  33968. begin
  33969. pTDefRegMap(@Self)^.clr := $00000004;
  33970. end;
  33971. procedure TUART1A_U1AMODE.setPDSEL1(thebits : TBits_1); inline;
  33972. begin
  33973. if thebits = 0 then
  33974. pTDefRegMap(@Self)^.clr := $00000004
  33975. else
  33976. pTDefRegMap(@Self)^.&set := $00000004;
  33977. end;
  33978. function TUART1A_U1AMODE.getPDSEL1 : TBits_1; inline;
  33979. begin
  33980. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33981. end;
  33982. procedure TUART1A_U1AMODE.setUEN0; inline;
  33983. begin
  33984. pTDefRegMap(@Self)^.&set := $00000100;
  33985. end;
  33986. procedure TUART1A_U1AMODE.clearUEN0; inline;
  33987. begin
  33988. pTDefRegMap(@Self)^.clr := $00000100;
  33989. end;
  33990. procedure TUART1A_U1AMODE.setUEN0(thebits : TBits_1); inline;
  33991. begin
  33992. if thebits = 0 then
  33993. pTDefRegMap(@Self)^.clr := $00000100
  33994. else
  33995. pTDefRegMap(@Self)^.&set := $00000100;
  33996. end;
  33997. function TUART1A_U1AMODE.getUEN0 : TBits_1; inline;
  33998. begin
  33999. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  34000. end;
  34001. procedure TUART1A_U1AMODE.setUEN1; inline;
  34002. begin
  34003. pTDefRegMap(@Self)^.&set := $00000200;
  34004. end;
  34005. procedure TUART1A_U1AMODE.clearUEN1; inline;
  34006. begin
  34007. pTDefRegMap(@Self)^.clr := $00000200;
  34008. end;
  34009. procedure TUART1A_U1AMODE.setUEN1(thebits : TBits_1); inline;
  34010. begin
  34011. if thebits = 0 then
  34012. pTDefRegMap(@Self)^.clr := $00000200
  34013. else
  34014. pTDefRegMap(@Self)^.&set := $00000200;
  34015. end;
  34016. function TUART1A_U1AMODE.getUEN1 : TBits_1; inline;
  34017. begin
  34018. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  34019. end;
  34020. procedure TUART1A_U1AMODE.setUSIDL; inline;
  34021. begin
  34022. pTDefRegMap(@Self)^.&set := $00002000;
  34023. end;
  34024. procedure TUART1A_U1AMODE.clearUSIDL; inline;
  34025. begin
  34026. pTDefRegMap(@Self)^.clr := $00002000;
  34027. end;
  34028. procedure TUART1A_U1AMODE.setUSIDL(thebits : TBits_1); inline;
  34029. begin
  34030. if thebits = 0 then
  34031. pTDefRegMap(@Self)^.clr := $00002000
  34032. else
  34033. pTDefRegMap(@Self)^.&set := $00002000;
  34034. end;
  34035. function TUART1A_U1AMODE.getUSIDL : TBits_1; inline;
  34036. begin
  34037. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34038. end;
  34039. procedure TUART1A_U1AMODE.setUARTEN; inline;
  34040. begin
  34041. pTDefRegMap(@Self)^.&set := $00008000;
  34042. end;
  34043. procedure TUART1A_U1AMODE.clearUARTEN; inline;
  34044. begin
  34045. pTDefRegMap(@Self)^.clr := $00008000;
  34046. end;
  34047. procedure TUART1A_U1AMODE.setUARTEN(thebits : TBits_1); inline;
  34048. begin
  34049. if thebits = 0 then
  34050. pTDefRegMap(@Self)^.clr := $00008000
  34051. else
  34052. pTDefRegMap(@Self)^.&set := $00008000;
  34053. end;
  34054. function TUART1A_U1AMODE.getUARTEN : TBits_1; inline;
  34055. begin
  34056. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34057. end;
  34058. procedure TUART1A_U1AMODE.setw(thebits : TBits_32); inline;
  34059. begin
  34060. pTDefRegMap(@Self)^.val := thebits;
  34061. end;
  34062. function TUART1A_U1AMODE.getw : TBits_32; inline;
  34063. begin
  34064. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34065. end;
  34066. procedure TUART1A_U1MODE.setSTSEL; inline;
  34067. begin
  34068. pTDefRegMap(@Self)^.&set := $00000001;
  34069. end;
  34070. procedure TUART1A_U1MODE.clearSTSEL; inline;
  34071. begin
  34072. pTDefRegMap(@Self)^.clr := $00000001;
  34073. end;
  34074. procedure TUART1A_U1MODE.setSTSEL(thebits : TBits_1); inline;
  34075. begin
  34076. if thebits = 0 then
  34077. pTDefRegMap(@Self)^.clr := $00000001
  34078. else
  34079. pTDefRegMap(@Self)^.&set := $00000001;
  34080. end;
  34081. function TUART1A_U1MODE.getSTSEL : TBits_1; inline;
  34082. begin
  34083. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34084. end;
  34085. procedure TUART1A_U1MODE.setPDSEL(thebits : TBits_2); inline;
  34086. begin
  34087. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  34088. end;
  34089. function TUART1A_U1MODE.getPDSEL : TBits_2; inline;
  34090. begin
  34091. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  34092. end;
  34093. procedure TUART1A_U1MODE.setBRGH; inline;
  34094. begin
  34095. pTDefRegMap(@Self)^.&set := $00000008;
  34096. end;
  34097. procedure TUART1A_U1MODE.clearBRGH; inline;
  34098. begin
  34099. pTDefRegMap(@Self)^.clr := $00000008;
  34100. end;
  34101. procedure TUART1A_U1MODE.setBRGH(thebits : TBits_1); inline;
  34102. begin
  34103. if thebits = 0 then
  34104. pTDefRegMap(@Self)^.clr := $00000008
  34105. else
  34106. pTDefRegMap(@Self)^.&set := $00000008;
  34107. end;
  34108. function TUART1A_U1MODE.getBRGH : TBits_1; inline;
  34109. begin
  34110. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34111. end;
  34112. procedure TUART1A_U1MODE.setRXINV; inline;
  34113. begin
  34114. pTDefRegMap(@Self)^.&set := $00000010;
  34115. end;
  34116. procedure TUART1A_U1MODE.clearRXINV; inline;
  34117. begin
  34118. pTDefRegMap(@Self)^.clr := $00000010;
  34119. end;
  34120. procedure TUART1A_U1MODE.setRXINV(thebits : TBits_1); inline;
  34121. begin
  34122. if thebits = 0 then
  34123. pTDefRegMap(@Self)^.clr := $00000010
  34124. else
  34125. pTDefRegMap(@Self)^.&set := $00000010;
  34126. end;
  34127. function TUART1A_U1MODE.getRXINV : TBits_1; inline;
  34128. begin
  34129. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34130. end;
  34131. procedure TUART1A_U1MODE.setABAUD; inline;
  34132. begin
  34133. pTDefRegMap(@Self)^.&set := $00000020;
  34134. end;
  34135. procedure TUART1A_U1MODE.clearABAUD; inline;
  34136. begin
  34137. pTDefRegMap(@Self)^.clr := $00000020;
  34138. end;
  34139. procedure TUART1A_U1MODE.setABAUD(thebits : TBits_1); inline;
  34140. begin
  34141. if thebits = 0 then
  34142. pTDefRegMap(@Self)^.clr := $00000020
  34143. else
  34144. pTDefRegMap(@Self)^.&set := $00000020;
  34145. end;
  34146. function TUART1A_U1MODE.getABAUD : TBits_1; inline;
  34147. begin
  34148. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34149. end;
  34150. procedure TUART1A_U1MODE.setLPBACK; inline;
  34151. begin
  34152. pTDefRegMap(@Self)^.&set := $00000040;
  34153. end;
  34154. procedure TUART1A_U1MODE.clearLPBACK; inline;
  34155. begin
  34156. pTDefRegMap(@Self)^.clr := $00000040;
  34157. end;
  34158. procedure TUART1A_U1MODE.setLPBACK(thebits : TBits_1); inline;
  34159. begin
  34160. if thebits = 0 then
  34161. pTDefRegMap(@Self)^.clr := $00000040
  34162. else
  34163. pTDefRegMap(@Self)^.&set := $00000040;
  34164. end;
  34165. function TUART1A_U1MODE.getLPBACK : TBits_1; inline;
  34166. begin
  34167. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34168. end;
  34169. procedure TUART1A_U1MODE.setWAKE; inline;
  34170. begin
  34171. pTDefRegMap(@Self)^.&set := $00000080;
  34172. end;
  34173. procedure TUART1A_U1MODE.clearWAKE; inline;
  34174. begin
  34175. pTDefRegMap(@Self)^.clr := $00000080;
  34176. end;
  34177. procedure TUART1A_U1MODE.setWAKE(thebits : TBits_1); inline;
  34178. begin
  34179. if thebits = 0 then
  34180. pTDefRegMap(@Self)^.clr := $00000080
  34181. else
  34182. pTDefRegMap(@Self)^.&set := $00000080;
  34183. end;
  34184. function TUART1A_U1MODE.getWAKE : TBits_1; inline;
  34185. begin
  34186. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  34187. end;
  34188. procedure TUART1A_U1MODE.setUEN(thebits : TBits_2); inline;
  34189. begin
  34190. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  34191. end;
  34192. function TUART1A_U1MODE.getUEN : TBits_2; inline;
  34193. begin
  34194. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  34195. end;
  34196. procedure TUART1A_U1MODE.setRTSMD; inline;
  34197. begin
  34198. pTDefRegMap(@Self)^.&set := $00000800;
  34199. end;
  34200. procedure TUART1A_U1MODE.clearRTSMD; inline;
  34201. begin
  34202. pTDefRegMap(@Self)^.clr := $00000800;
  34203. end;
  34204. procedure TUART1A_U1MODE.setRTSMD(thebits : TBits_1); inline;
  34205. begin
  34206. if thebits = 0 then
  34207. pTDefRegMap(@Self)^.clr := $00000800
  34208. else
  34209. pTDefRegMap(@Self)^.&set := $00000800;
  34210. end;
  34211. function TUART1A_U1MODE.getRTSMD : TBits_1; inline;
  34212. begin
  34213. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  34214. end;
  34215. procedure TUART1A_U1MODE.setIREN; inline;
  34216. begin
  34217. pTDefRegMap(@Self)^.&set := $00001000;
  34218. end;
  34219. procedure TUART1A_U1MODE.clearIREN; inline;
  34220. begin
  34221. pTDefRegMap(@Self)^.clr := $00001000;
  34222. end;
  34223. procedure TUART1A_U1MODE.setIREN(thebits : TBits_1); inline;
  34224. begin
  34225. if thebits = 0 then
  34226. pTDefRegMap(@Self)^.clr := $00001000
  34227. else
  34228. pTDefRegMap(@Self)^.&set := $00001000;
  34229. end;
  34230. function TUART1A_U1MODE.getIREN : TBits_1; inline;
  34231. begin
  34232. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  34233. end;
  34234. procedure TUART1A_U1MODE.setSIDL; inline;
  34235. begin
  34236. pTDefRegMap(@Self)^.&set := $00002000;
  34237. end;
  34238. procedure TUART1A_U1MODE.clearSIDL; inline;
  34239. begin
  34240. pTDefRegMap(@Self)^.clr := $00002000;
  34241. end;
  34242. procedure TUART1A_U1MODE.setSIDL(thebits : TBits_1); inline;
  34243. begin
  34244. if thebits = 0 then
  34245. pTDefRegMap(@Self)^.clr := $00002000
  34246. else
  34247. pTDefRegMap(@Self)^.&set := $00002000;
  34248. end;
  34249. function TUART1A_U1MODE.getSIDL : TBits_1; inline;
  34250. begin
  34251. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34252. end;
  34253. procedure TUART1A_U1MODE.setON; inline;
  34254. begin
  34255. pTDefRegMap(@Self)^.&set := $00008000;
  34256. end;
  34257. procedure TUART1A_U1MODE.clearON; inline;
  34258. begin
  34259. pTDefRegMap(@Self)^.clr := $00008000;
  34260. end;
  34261. procedure TUART1A_U1MODE.setON(thebits : TBits_1); inline;
  34262. begin
  34263. if thebits = 0 then
  34264. pTDefRegMap(@Self)^.clr := $00008000
  34265. else
  34266. pTDefRegMap(@Self)^.&set := $00008000;
  34267. end;
  34268. function TUART1A_U1MODE.getON : TBits_1; inline;
  34269. begin
  34270. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34271. end;
  34272. procedure TUART1A_U1MODE.setPDSEL0; inline;
  34273. begin
  34274. pTDefRegMap(@Self)^.&set := $00000002;
  34275. end;
  34276. procedure TUART1A_U1MODE.clearPDSEL0; inline;
  34277. begin
  34278. pTDefRegMap(@Self)^.clr := $00000002;
  34279. end;
  34280. procedure TUART1A_U1MODE.setPDSEL0(thebits : TBits_1); inline;
  34281. begin
  34282. if thebits = 0 then
  34283. pTDefRegMap(@Self)^.clr := $00000002
  34284. else
  34285. pTDefRegMap(@Self)^.&set := $00000002;
  34286. end;
  34287. function TUART1A_U1MODE.getPDSEL0 : TBits_1; inline;
  34288. begin
  34289. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34290. end;
  34291. procedure TUART1A_U1MODE.setPDSEL1; inline;
  34292. begin
  34293. pTDefRegMap(@Self)^.&set := $00000004;
  34294. end;
  34295. procedure TUART1A_U1MODE.clearPDSEL1; inline;
  34296. begin
  34297. pTDefRegMap(@Self)^.clr := $00000004;
  34298. end;
  34299. procedure TUART1A_U1MODE.setPDSEL1(thebits : TBits_1); inline;
  34300. begin
  34301. if thebits = 0 then
  34302. pTDefRegMap(@Self)^.clr := $00000004
  34303. else
  34304. pTDefRegMap(@Self)^.&set := $00000004;
  34305. end;
  34306. function TUART1A_U1MODE.getPDSEL1 : TBits_1; inline;
  34307. begin
  34308. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34309. end;
  34310. procedure TUART1A_U1MODE.setUEN0; inline;
  34311. begin
  34312. pTDefRegMap(@Self)^.&set := $00000100;
  34313. end;
  34314. procedure TUART1A_U1MODE.clearUEN0; inline;
  34315. begin
  34316. pTDefRegMap(@Self)^.clr := $00000100;
  34317. end;
  34318. procedure TUART1A_U1MODE.setUEN0(thebits : TBits_1); inline;
  34319. begin
  34320. if thebits = 0 then
  34321. pTDefRegMap(@Self)^.clr := $00000100
  34322. else
  34323. pTDefRegMap(@Self)^.&set := $00000100;
  34324. end;
  34325. function TUART1A_U1MODE.getUEN0 : TBits_1; inline;
  34326. begin
  34327. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  34328. end;
  34329. procedure TUART1A_U1MODE.setUEN1; inline;
  34330. begin
  34331. pTDefRegMap(@Self)^.&set := $00000200;
  34332. end;
  34333. procedure TUART1A_U1MODE.clearUEN1; inline;
  34334. begin
  34335. pTDefRegMap(@Self)^.clr := $00000200;
  34336. end;
  34337. procedure TUART1A_U1MODE.setUEN1(thebits : TBits_1); inline;
  34338. begin
  34339. if thebits = 0 then
  34340. pTDefRegMap(@Self)^.clr := $00000200
  34341. else
  34342. pTDefRegMap(@Self)^.&set := $00000200;
  34343. end;
  34344. function TUART1A_U1MODE.getUEN1 : TBits_1; inline;
  34345. begin
  34346. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  34347. end;
  34348. procedure TUART1A_U1MODE.setUSIDL; inline;
  34349. begin
  34350. pTDefRegMap(@Self)^.&set := $00002000;
  34351. end;
  34352. procedure TUART1A_U1MODE.clearUSIDL; inline;
  34353. begin
  34354. pTDefRegMap(@Self)^.clr := $00002000;
  34355. end;
  34356. procedure TUART1A_U1MODE.setUSIDL(thebits : TBits_1); inline;
  34357. begin
  34358. if thebits = 0 then
  34359. pTDefRegMap(@Self)^.clr := $00002000
  34360. else
  34361. pTDefRegMap(@Self)^.&set := $00002000;
  34362. end;
  34363. function TUART1A_U1MODE.getUSIDL : TBits_1; inline;
  34364. begin
  34365. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34366. end;
  34367. procedure TUART1A_U1MODE.setUARTEN; inline;
  34368. begin
  34369. pTDefRegMap(@Self)^.&set := $00008000;
  34370. end;
  34371. procedure TUART1A_U1MODE.clearUARTEN; inline;
  34372. begin
  34373. pTDefRegMap(@Self)^.clr := $00008000;
  34374. end;
  34375. procedure TUART1A_U1MODE.setUARTEN(thebits : TBits_1); inline;
  34376. begin
  34377. if thebits = 0 then
  34378. pTDefRegMap(@Self)^.clr := $00008000
  34379. else
  34380. pTDefRegMap(@Self)^.&set := $00008000;
  34381. end;
  34382. function TUART1A_U1MODE.getUARTEN : TBits_1; inline;
  34383. begin
  34384. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34385. end;
  34386. procedure TUART1A_U1MODE.setw(thebits : TBits_32); inline;
  34387. begin
  34388. pTDefRegMap(@Self)^.val := thebits;
  34389. end;
  34390. function TUART1A_U1MODE.getw : TBits_32; inline;
  34391. begin
  34392. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34393. end;
  34394. procedure TUART1A_U1ASTA.setURXDA; inline;
  34395. begin
  34396. pTDefRegMap(@Self)^.&set := $00000001;
  34397. end;
  34398. procedure TUART1A_U1ASTA.clearURXDA; inline;
  34399. begin
  34400. pTDefRegMap(@Self)^.clr := $00000001;
  34401. end;
  34402. procedure TUART1A_U1ASTA.setURXDA(thebits : TBits_1); inline;
  34403. begin
  34404. if thebits = 0 then
  34405. pTDefRegMap(@Self)^.clr := $00000001
  34406. else
  34407. pTDefRegMap(@Self)^.&set := $00000001;
  34408. end;
  34409. function TUART1A_U1ASTA.getURXDA : TBits_1; inline;
  34410. begin
  34411. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34412. end;
  34413. procedure TUART1A_U1ASTA.setOERR; inline;
  34414. begin
  34415. pTDefRegMap(@Self)^.&set := $00000002;
  34416. end;
  34417. procedure TUART1A_U1ASTA.clearOERR; inline;
  34418. begin
  34419. pTDefRegMap(@Self)^.clr := $00000002;
  34420. end;
  34421. procedure TUART1A_U1ASTA.setOERR(thebits : TBits_1); inline;
  34422. begin
  34423. if thebits = 0 then
  34424. pTDefRegMap(@Self)^.clr := $00000002
  34425. else
  34426. pTDefRegMap(@Self)^.&set := $00000002;
  34427. end;
  34428. function TUART1A_U1ASTA.getOERR : TBits_1; inline;
  34429. begin
  34430. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34431. end;
  34432. procedure TUART1A_U1ASTA.setFERR; inline;
  34433. begin
  34434. pTDefRegMap(@Self)^.&set := $00000004;
  34435. end;
  34436. procedure TUART1A_U1ASTA.clearFERR; inline;
  34437. begin
  34438. pTDefRegMap(@Self)^.clr := $00000004;
  34439. end;
  34440. procedure TUART1A_U1ASTA.setFERR(thebits : TBits_1); inline;
  34441. begin
  34442. if thebits = 0 then
  34443. pTDefRegMap(@Self)^.clr := $00000004
  34444. else
  34445. pTDefRegMap(@Self)^.&set := $00000004;
  34446. end;
  34447. function TUART1A_U1ASTA.getFERR : TBits_1; inline;
  34448. begin
  34449. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34450. end;
  34451. procedure TUART1A_U1ASTA.setPERR; inline;
  34452. begin
  34453. pTDefRegMap(@Self)^.&set := $00000008;
  34454. end;
  34455. procedure TUART1A_U1ASTA.clearPERR; inline;
  34456. begin
  34457. pTDefRegMap(@Self)^.clr := $00000008;
  34458. end;
  34459. procedure TUART1A_U1ASTA.setPERR(thebits : TBits_1); inline;
  34460. begin
  34461. if thebits = 0 then
  34462. pTDefRegMap(@Self)^.clr := $00000008
  34463. else
  34464. pTDefRegMap(@Self)^.&set := $00000008;
  34465. end;
  34466. function TUART1A_U1ASTA.getPERR : TBits_1; inline;
  34467. begin
  34468. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34469. end;
  34470. procedure TUART1A_U1ASTA.setRIDLE; inline;
  34471. begin
  34472. pTDefRegMap(@Self)^.&set := $00000010;
  34473. end;
  34474. procedure TUART1A_U1ASTA.clearRIDLE; inline;
  34475. begin
  34476. pTDefRegMap(@Self)^.clr := $00000010;
  34477. end;
  34478. procedure TUART1A_U1ASTA.setRIDLE(thebits : TBits_1); inline;
  34479. begin
  34480. if thebits = 0 then
  34481. pTDefRegMap(@Self)^.clr := $00000010
  34482. else
  34483. pTDefRegMap(@Self)^.&set := $00000010;
  34484. end;
  34485. function TUART1A_U1ASTA.getRIDLE : TBits_1; inline;
  34486. begin
  34487. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34488. end;
  34489. procedure TUART1A_U1ASTA.setADDEN; inline;
  34490. begin
  34491. pTDefRegMap(@Self)^.&set := $00000020;
  34492. end;
  34493. procedure TUART1A_U1ASTA.clearADDEN; inline;
  34494. begin
  34495. pTDefRegMap(@Self)^.clr := $00000020;
  34496. end;
  34497. procedure TUART1A_U1ASTA.setADDEN(thebits : TBits_1); inline;
  34498. begin
  34499. if thebits = 0 then
  34500. pTDefRegMap(@Self)^.clr := $00000020
  34501. else
  34502. pTDefRegMap(@Self)^.&set := $00000020;
  34503. end;
  34504. function TUART1A_U1ASTA.getADDEN : TBits_1; inline;
  34505. begin
  34506. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34507. end;
  34508. procedure TUART1A_U1ASTA.setURXISEL(thebits : TBits_2); inline;
  34509. begin
  34510. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  34511. end;
  34512. function TUART1A_U1ASTA.getURXISEL : TBits_2; inline;
  34513. begin
  34514. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  34515. end;
  34516. procedure TUART1A_U1ASTA.setTRMT; inline;
  34517. begin
  34518. pTDefRegMap(@Self)^.&set := $00000100;
  34519. end;
  34520. procedure TUART1A_U1ASTA.clearTRMT; inline;
  34521. begin
  34522. pTDefRegMap(@Self)^.clr := $00000100;
  34523. end;
  34524. procedure TUART1A_U1ASTA.setTRMT(thebits : TBits_1); inline;
  34525. begin
  34526. if thebits = 0 then
  34527. pTDefRegMap(@Self)^.clr := $00000100
  34528. else
  34529. pTDefRegMap(@Self)^.&set := $00000100;
  34530. end;
  34531. function TUART1A_U1ASTA.getTRMT : TBits_1; inline;
  34532. begin
  34533. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  34534. end;
  34535. procedure TUART1A_U1ASTA.setUTXBF; inline;
  34536. begin
  34537. pTDefRegMap(@Self)^.&set := $00000200;
  34538. end;
  34539. procedure TUART1A_U1ASTA.clearUTXBF; inline;
  34540. begin
  34541. pTDefRegMap(@Self)^.clr := $00000200;
  34542. end;
  34543. procedure TUART1A_U1ASTA.setUTXBF(thebits : TBits_1); inline;
  34544. begin
  34545. if thebits = 0 then
  34546. pTDefRegMap(@Self)^.clr := $00000200
  34547. else
  34548. pTDefRegMap(@Self)^.&set := $00000200;
  34549. end;
  34550. function TUART1A_U1ASTA.getUTXBF : TBits_1; inline;
  34551. begin
  34552. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  34553. end;
  34554. procedure TUART1A_U1ASTA.setUTXEN; inline;
  34555. begin
  34556. pTDefRegMap(@Self)^.&set := $00000400;
  34557. end;
  34558. procedure TUART1A_U1ASTA.clearUTXEN; inline;
  34559. begin
  34560. pTDefRegMap(@Self)^.clr := $00000400;
  34561. end;
  34562. procedure TUART1A_U1ASTA.setUTXEN(thebits : TBits_1); inline;
  34563. begin
  34564. if thebits = 0 then
  34565. pTDefRegMap(@Self)^.clr := $00000400
  34566. else
  34567. pTDefRegMap(@Self)^.&set := $00000400;
  34568. end;
  34569. function TUART1A_U1ASTA.getUTXEN : TBits_1; inline;
  34570. begin
  34571. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  34572. end;
  34573. procedure TUART1A_U1ASTA.setUTXBRK; inline;
  34574. begin
  34575. pTDefRegMap(@Self)^.&set := $00000800;
  34576. end;
  34577. procedure TUART1A_U1ASTA.clearUTXBRK; inline;
  34578. begin
  34579. pTDefRegMap(@Self)^.clr := $00000800;
  34580. end;
  34581. procedure TUART1A_U1ASTA.setUTXBRK(thebits : TBits_1); inline;
  34582. begin
  34583. if thebits = 0 then
  34584. pTDefRegMap(@Self)^.clr := $00000800
  34585. else
  34586. pTDefRegMap(@Self)^.&set := $00000800;
  34587. end;
  34588. function TUART1A_U1ASTA.getUTXBRK : TBits_1; inline;
  34589. begin
  34590. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  34591. end;
  34592. procedure TUART1A_U1ASTA.setURXEN; inline;
  34593. begin
  34594. pTDefRegMap(@Self)^.&set := $00001000;
  34595. end;
  34596. procedure TUART1A_U1ASTA.clearURXEN; inline;
  34597. begin
  34598. pTDefRegMap(@Self)^.clr := $00001000;
  34599. end;
  34600. procedure TUART1A_U1ASTA.setURXEN(thebits : TBits_1); inline;
  34601. begin
  34602. if thebits = 0 then
  34603. pTDefRegMap(@Self)^.clr := $00001000
  34604. else
  34605. pTDefRegMap(@Self)^.&set := $00001000;
  34606. end;
  34607. function TUART1A_U1ASTA.getURXEN : TBits_1; inline;
  34608. begin
  34609. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  34610. end;
  34611. procedure TUART1A_U1ASTA.setUTXINV; inline;
  34612. begin
  34613. pTDefRegMap(@Self)^.&set := $00002000;
  34614. end;
  34615. procedure TUART1A_U1ASTA.clearUTXINV; inline;
  34616. begin
  34617. pTDefRegMap(@Self)^.clr := $00002000;
  34618. end;
  34619. procedure TUART1A_U1ASTA.setUTXINV(thebits : TBits_1); inline;
  34620. begin
  34621. if thebits = 0 then
  34622. pTDefRegMap(@Self)^.clr := $00002000
  34623. else
  34624. pTDefRegMap(@Self)^.&set := $00002000;
  34625. end;
  34626. function TUART1A_U1ASTA.getUTXINV : TBits_1; inline;
  34627. begin
  34628. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34629. end;
  34630. procedure TUART1A_U1ASTA.setUTXISEL(thebits : TBits_2); inline;
  34631. begin
  34632. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  34633. end;
  34634. function TUART1A_U1ASTA.getUTXISEL : TBits_2; inline;
  34635. begin
  34636. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  34637. end;
  34638. procedure TUART1A_U1ASTA.setADDR(thebits : TBits_8); inline;
  34639. begin
  34640. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  34641. end;
  34642. function TUART1A_U1ASTA.getADDR : TBits_8; inline;
  34643. begin
  34644. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  34645. end;
  34646. procedure TUART1A_U1ASTA.setADM_EN; inline;
  34647. begin
  34648. pTDefRegMap(@Self)^.&set := $01000000;
  34649. end;
  34650. procedure TUART1A_U1ASTA.clearADM_EN; inline;
  34651. begin
  34652. pTDefRegMap(@Self)^.clr := $01000000;
  34653. end;
  34654. procedure TUART1A_U1ASTA.setADM_EN(thebits : TBits_1); inline;
  34655. begin
  34656. if thebits = 0 then
  34657. pTDefRegMap(@Self)^.clr := $01000000
  34658. else
  34659. pTDefRegMap(@Self)^.&set := $01000000;
  34660. end;
  34661. function TUART1A_U1ASTA.getADM_EN : TBits_1; inline;
  34662. begin
  34663. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  34664. end;
  34665. procedure TUART1A_U1ASTA.setURXISEL0; inline;
  34666. begin
  34667. pTDefRegMap(@Self)^.&set := $00000040;
  34668. end;
  34669. procedure TUART1A_U1ASTA.clearURXISEL0; inline;
  34670. begin
  34671. pTDefRegMap(@Self)^.clr := $00000040;
  34672. end;
  34673. procedure TUART1A_U1ASTA.setURXISEL0(thebits : TBits_1); inline;
  34674. begin
  34675. if thebits = 0 then
  34676. pTDefRegMap(@Self)^.clr := $00000040
  34677. else
  34678. pTDefRegMap(@Self)^.&set := $00000040;
  34679. end;
  34680. function TUART1A_U1ASTA.getURXISEL0 : TBits_1; inline;
  34681. begin
  34682. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34683. end;
  34684. procedure TUART1A_U1ASTA.setURXISEL1; inline;
  34685. begin
  34686. pTDefRegMap(@Self)^.&set := $00000080;
  34687. end;
  34688. procedure TUART1A_U1ASTA.clearURXISEL1; inline;
  34689. begin
  34690. pTDefRegMap(@Self)^.clr := $00000080;
  34691. end;
  34692. procedure TUART1A_U1ASTA.setURXISEL1(thebits : TBits_1); inline;
  34693. begin
  34694. if thebits = 0 then
  34695. pTDefRegMap(@Self)^.clr := $00000080
  34696. else
  34697. pTDefRegMap(@Self)^.&set := $00000080;
  34698. end;
  34699. function TUART1A_U1ASTA.getURXISEL1 : TBits_1; inline;
  34700. begin
  34701. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  34702. end;
  34703. procedure TUART1A_U1ASTA.setUTXISEL0; inline;
  34704. begin
  34705. pTDefRegMap(@Self)^.&set := $00004000;
  34706. end;
  34707. procedure TUART1A_U1ASTA.clearUTXISEL0; inline;
  34708. begin
  34709. pTDefRegMap(@Self)^.clr := $00004000;
  34710. end;
  34711. procedure TUART1A_U1ASTA.setUTXISEL0(thebits : TBits_1); inline;
  34712. begin
  34713. if thebits = 0 then
  34714. pTDefRegMap(@Self)^.clr := $00004000
  34715. else
  34716. pTDefRegMap(@Self)^.&set := $00004000;
  34717. end;
  34718. function TUART1A_U1ASTA.getUTXISEL0 : TBits_1; inline;
  34719. begin
  34720. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  34721. end;
  34722. procedure TUART1A_U1ASTA.setUTXISEL1; inline;
  34723. begin
  34724. pTDefRegMap(@Self)^.&set := $00008000;
  34725. end;
  34726. procedure TUART1A_U1ASTA.clearUTXISEL1; inline;
  34727. begin
  34728. pTDefRegMap(@Self)^.clr := $00008000;
  34729. end;
  34730. procedure TUART1A_U1ASTA.setUTXISEL1(thebits : TBits_1); inline;
  34731. begin
  34732. if thebits = 0 then
  34733. pTDefRegMap(@Self)^.clr := $00008000
  34734. else
  34735. pTDefRegMap(@Self)^.&set := $00008000;
  34736. end;
  34737. function TUART1A_U1ASTA.getUTXISEL1 : TBits_1; inline;
  34738. begin
  34739. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34740. end;
  34741. procedure TUART1A_U1ASTA.setUTXSEL(thebits : TBits_2); inline;
  34742. begin
  34743. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  34744. end;
  34745. function TUART1A_U1ASTA.getUTXSEL : TBits_2; inline;
  34746. begin
  34747. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  34748. end;
  34749. procedure TUART1A_U1ASTA.setw(thebits : TBits_32); inline;
  34750. begin
  34751. pTDefRegMap(@Self)^.val := thebits;
  34752. end;
  34753. function TUART1A_U1ASTA.getw : TBits_32; inline;
  34754. begin
  34755. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34756. end;
  34757. procedure TUART1A_U1STA.setURXDA; inline;
  34758. begin
  34759. pTDefRegMap(@Self)^.&set := $00000001;
  34760. end;
  34761. procedure TUART1A_U1STA.clearURXDA; inline;
  34762. begin
  34763. pTDefRegMap(@Self)^.clr := $00000001;
  34764. end;
  34765. procedure TUART1A_U1STA.setURXDA(thebits : TBits_1); inline;
  34766. begin
  34767. if thebits = 0 then
  34768. pTDefRegMap(@Self)^.clr := $00000001
  34769. else
  34770. pTDefRegMap(@Self)^.&set := $00000001;
  34771. end;
  34772. function TUART1A_U1STA.getURXDA : TBits_1; inline;
  34773. begin
  34774. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34775. end;
  34776. procedure TUART1A_U1STA.setOERR; inline;
  34777. begin
  34778. pTDefRegMap(@Self)^.&set := $00000002;
  34779. end;
  34780. procedure TUART1A_U1STA.clearOERR; inline;
  34781. begin
  34782. pTDefRegMap(@Self)^.clr := $00000002;
  34783. end;
  34784. procedure TUART1A_U1STA.setOERR(thebits : TBits_1); inline;
  34785. begin
  34786. if thebits = 0 then
  34787. pTDefRegMap(@Self)^.clr := $00000002
  34788. else
  34789. pTDefRegMap(@Self)^.&set := $00000002;
  34790. end;
  34791. function TUART1A_U1STA.getOERR : TBits_1; inline;
  34792. begin
  34793. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34794. end;
  34795. procedure TUART1A_U1STA.setFERR; inline;
  34796. begin
  34797. pTDefRegMap(@Self)^.&set := $00000004;
  34798. end;
  34799. procedure TUART1A_U1STA.clearFERR; inline;
  34800. begin
  34801. pTDefRegMap(@Self)^.clr := $00000004;
  34802. end;
  34803. procedure TUART1A_U1STA.setFERR(thebits : TBits_1); inline;
  34804. begin
  34805. if thebits = 0 then
  34806. pTDefRegMap(@Self)^.clr := $00000004
  34807. else
  34808. pTDefRegMap(@Self)^.&set := $00000004;
  34809. end;
  34810. function TUART1A_U1STA.getFERR : TBits_1; inline;
  34811. begin
  34812. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34813. end;
  34814. procedure TUART1A_U1STA.setPERR; inline;
  34815. begin
  34816. pTDefRegMap(@Self)^.&set := $00000008;
  34817. end;
  34818. procedure TUART1A_U1STA.clearPERR; inline;
  34819. begin
  34820. pTDefRegMap(@Self)^.clr := $00000008;
  34821. end;
  34822. procedure TUART1A_U1STA.setPERR(thebits : TBits_1); inline;
  34823. begin
  34824. if thebits = 0 then
  34825. pTDefRegMap(@Self)^.clr := $00000008
  34826. else
  34827. pTDefRegMap(@Self)^.&set := $00000008;
  34828. end;
  34829. function TUART1A_U1STA.getPERR : TBits_1; inline;
  34830. begin
  34831. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34832. end;
  34833. procedure TUART1A_U1STA.setRIDLE; inline;
  34834. begin
  34835. pTDefRegMap(@Self)^.&set := $00000010;
  34836. end;
  34837. procedure TUART1A_U1STA.clearRIDLE; inline;
  34838. begin
  34839. pTDefRegMap(@Self)^.clr := $00000010;
  34840. end;
  34841. procedure TUART1A_U1STA.setRIDLE(thebits : TBits_1); inline;
  34842. begin
  34843. if thebits = 0 then
  34844. pTDefRegMap(@Self)^.clr := $00000010
  34845. else
  34846. pTDefRegMap(@Self)^.&set := $00000010;
  34847. end;
  34848. function TUART1A_U1STA.getRIDLE : TBits_1; inline;
  34849. begin
  34850. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34851. end;
  34852. procedure TUART1A_U1STA.setADDEN; inline;
  34853. begin
  34854. pTDefRegMap(@Self)^.&set := $00000020;
  34855. end;
  34856. procedure TUART1A_U1STA.clearADDEN; inline;
  34857. begin
  34858. pTDefRegMap(@Self)^.clr := $00000020;
  34859. end;
  34860. procedure TUART1A_U1STA.setADDEN(thebits : TBits_1); inline;
  34861. begin
  34862. if thebits = 0 then
  34863. pTDefRegMap(@Self)^.clr := $00000020
  34864. else
  34865. pTDefRegMap(@Self)^.&set := $00000020;
  34866. end;
  34867. function TUART1A_U1STA.getADDEN : TBits_1; inline;
  34868. begin
  34869. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34870. end;
  34871. procedure TUART1A_U1STA.setURXISEL(thebits : TBits_2); inline;
  34872. begin
  34873. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  34874. end;
  34875. function TUART1A_U1STA.getURXISEL : TBits_2; inline;
  34876. begin
  34877. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  34878. end;
  34879. procedure TUART1A_U1STA.setTRMT; inline;
  34880. begin
  34881. pTDefRegMap(@Self)^.&set := $00000100;
  34882. end;
  34883. procedure TUART1A_U1STA.clearTRMT; inline;
  34884. begin
  34885. pTDefRegMap(@Self)^.clr := $00000100;
  34886. end;
  34887. procedure TUART1A_U1STA.setTRMT(thebits : TBits_1); inline;
  34888. begin
  34889. if thebits = 0 then
  34890. pTDefRegMap(@Self)^.clr := $00000100
  34891. else
  34892. pTDefRegMap(@Self)^.&set := $00000100;
  34893. end;
  34894. function TUART1A_U1STA.getTRMT : TBits_1; inline;
  34895. begin
  34896. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  34897. end;
  34898. procedure TUART1A_U1STA.setUTXBF; inline;
  34899. begin
  34900. pTDefRegMap(@Self)^.&set := $00000200;
  34901. end;
  34902. procedure TUART1A_U1STA.clearUTXBF; inline;
  34903. begin
  34904. pTDefRegMap(@Self)^.clr := $00000200;
  34905. end;
  34906. procedure TUART1A_U1STA.setUTXBF(thebits : TBits_1); inline;
  34907. begin
  34908. if thebits = 0 then
  34909. pTDefRegMap(@Self)^.clr := $00000200
  34910. else
  34911. pTDefRegMap(@Self)^.&set := $00000200;
  34912. end;
  34913. function TUART1A_U1STA.getUTXBF : TBits_1; inline;
  34914. begin
  34915. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  34916. end;
  34917. procedure TUART1A_U1STA.setUTXEN; inline;
  34918. begin
  34919. pTDefRegMap(@Self)^.&set := $00000400;
  34920. end;
  34921. procedure TUART1A_U1STA.clearUTXEN; inline;
  34922. begin
  34923. pTDefRegMap(@Self)^.clr := $00000400;
  34924. end;
  34925. procedure TUART1A_U1STA.setUTXEN(thebits : TBits_1); inline;
  34926. begin
  34927. if thebits = 0 then
  34928. pTDefRegMap(@Self)^.clr := $00000400
  34929. else
  34930. pTDefRegMap(@Self)^.&set := $00000400;
  34931. end;
  34932. function TUART1A_U1STA.getUTXEN : TBits_1; inline;
  34933. begin
  34934. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  34935. end;
  34936. procedure TUART1A_U1STA.setUTXBRK; inline;
  34937. begin
  34938. pTDefRegMap(@Self)^.&set := $00000800;
  34939. end;
  34940. procedure TUART1A_U1STA.clearUTXBRK; inline;
  34941. begin
  34942. pTDefRegMap(@Self)^.clr := $00000800;
  34943. end;
  34944. procedure TUART1A_U1STA.setUTXBRK(thebits : TBits_1); inline;
  34945. begin
  34946. if thebits = 0 then
  34947. pTDefRegMap(@Self)^.clr := $00000800
  34948. else
  34949. pTDefRegMap(@Self)^.&set := $00000800;
  34950. end;
  34951. function TUART1A_U1STA.getUTXBRK : TBits_1; inline;
  34952. begin
  34953. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  34954. end;
  34955. procedure TUART1A_U1STA.setURXEN; inline;
  34956. begin
  34957. pTDefRegMap(@Self)^.&set := $00001000;
  34958. end;
  34959. procedure TUART1A_U1STA.clearURXEN; inline;
  34960. begin
  34961. pTDefRegMap(@Self)^.clr := $00001000;
  34962. end;
  34963. procedure TUART1A_U1STA.setURXEN(thebits : TBits_1); inline;
  34964. begin
  34965. if thebits = 0 then
  34966. pTDefRegMap(@Self)^.clr := $00001000
  34967. else
  34968. pTDefRegMap(@Self)^.&set := $00001000;
  34969. end;
  34970. function TUART1A_U1STA.getURXEN : TBits_1; inline;
  34971. begin
  34972. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  34973. end;
  34974. procedure TUART1A_U1STA.setUTXINV; inline;
  34975. begin
  34976. pTDefRegMap(@Self)^.&set := $00002000;
  34977. end;
  34978. procedure TUART1A_U1STA.clearUTXINV; inline;
  34979. begin
  34980. pTDefRegMap(@Self)^.clr := $00002000;
  34981. end;
  34982. procedure TUART1A_U1STA.setUTXINV(thebits : TBits_1); inline;
  34983. begin
  34984. if thebits = 0 then
  34985. pTDefRegMap(@Self)^.clr := $00002000
  34986. else
  34987. pTDefRegMap(@Self)^.&set := $00002000;
  34988. end;
  34989. function TUART1A_U1STA.getUTXINV : TBits_1; inline;
  34990. begin
  34991. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34992. end;
  34993. procedure TUART1A_U1STA.setUTXISEL(thebits : TBits_2); inline;
  34994. begin
  34995. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  34996. end;
  34997. function TUART1A_U1STA.getUTXISEL : TBits_2; inline;
  34998. begin
  34999. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  35000. end;
  35001. procedure TUART1A_U1STA.setADDR(thebits : TBits_8); inline;
  35002. begin
  35003. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  35004. end;
  35005. function TUART1A_U1STA.getADDR : TBits_8; inline;
  35006. begin
  35007. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  35008. end;
  35009. procedure TUART1A_U1STA.setADM_EN; inline;
  35010. begin
  35011. pTDefRegMap(@Self)^.&set := $01000000;
  35012. end;
  35013. procedure TUART1A_U1STA.clearADM_EN; inline;
  35014. begin
  35015. pTDefRegMap(@Self)^.clr := $01000000;
  35016. end;
  35017. procedure TUART1A_U1STA.setADM_EN(thebits : TBits_1); inline;
  35018. begin
  35019. if thebits = 0 then
  35020. pTDefRegMap(@Self)^.clr := $01000000
  35021. else
  35022. pTDefRegMap(@Self)^.&set := $01000000;
  35023. end;
  35024. function TUART1A_U1STA.getADM_EN : TBits_1; inline;
  35025. begin
  35026. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  35027. end;
  35028. procedure TUART1A_U1STA.setURXISEL0; inline;
  35029. begin
  35030. pTDefRegMap(@Self)^.&set := $00000040;
  35031. end;
  35032. procedure TUART1A_U1STA.clearURXISEL0; inline;
  35033. begin
  35034. pTDefRegMap(@Self)^.clr := $00000040;
  35035. end;
  35036. procedure TUART1A_U1STA.setURXISEL0(thebits : TBits_1); inline;
  35037. begin
  35038. if thebits = 0 then
  35039. pTDefRegMap(@Self)^.clr := $00000040
  35040. else
  35041. pTDefRegMap(@Self)^.&set := $00000040;
  35042. end;
  35043. function TUART1A_U1STA.getURXISEL0 : TBits_1; inline;
  35044. begin
  35045. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35046. end;
  35047. procedure TUART1A_U1STA.setURXISEL1; inline;
  35048. begin
  35049. pTDefRegMap(@Self)^.&set := $00000080;
  35050. end;
  35051. procedure TUART1A_U1STA.clearURXISEL1; inline;
  35052. begin
  35053. pTDefRegMap(@Self)^.clr := $00000080;
  35054. end;
  35055. procedure TUART1A_U1STA.setURXISEL1(thebits : TBits_1); inline;
  35056. begin
  35057. if thebits = 0 then
  35058. pTDefRegMap(@Self)^.clr := $00000080
  35059. else
  35060. pTDefRegMap(@Self)^.&set := $00000080;
  35061. end;
  35062. function TUART1A_U1STA.getURXISEL1 : TBits_1; inline;
  35063. begin
  35064. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35065. end;
  35066. procedure TUART1A_U1STA.setUTXISEL0; inline;
  35067. begin
  35068. pTDefRegMap(@Self)^.&set := $00004000;
  35069. end;
  35070. procedure TUART1A_U1STA.clearUTXISEL0; inline;
  35071. begin
  35072. pTDefRegMap(@Self)^.clr := $00004000;
  35073. end;
  35074. procedure TUART1A_U1STA.setUTXISEL0(thebits : TBits_1); inline;
  35075. begin
  35076. if thebits = 0 then
  35077. pTDefRegMap(@Self)^.clr := $00004000
  35078. else
  35079. pTDefRegMap(@Self)^.&set := $00004000;
  35080. end;
  35081. function TUART1A_U1STA.getUTXISEL0 : TBits_1; inline;
  35082. begin
  35083. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  35084. end;
  35085. procedure TUART1A_U1STA.setUTXISEL1; inline;
  35086. begin
  35087. pTDefRegMap(@Self)^.&set := $00008000;
  35088. end;
  35089. procedure TUART1A_U1STA.clearUTXISEL1; inline;
  35090. begin
  35091. pTDefRegMap(@Self)^.clr := $00008000;
  35092. end;
  35093. procedure TUART1A_U1STA.setUTXISEL1(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 TUART1A_U1STA.getUTXISEL1 : TBits_1; inline;
  35101. begin
  35102. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35103. end;
  35104. procedure TUART1A_U1STA.setUTXSEL(thebits : TBits_2); inline;
  35105. begin
  35106. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  35107. end;
  35108. function TUART1A_U1STA.getUTXSEL : TBits_2; inline;
  35109. begin
  35110. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  35111. end;
  35112. procedure TUART1A_U1STA.setw(thebits : TBits_32); inline;
  35113. begin
  35114. pTDefRegMap(@Self)^.val := thebits;
  35115. end;
  35116. function TUART1A_U1STA.getw : TBits_32; inline;
  35117. begin
  35118. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35119. end;
  35120. procedure TUART1B_U1BMODE.setSTSEL; inline;
  35121. begin
  35122. pTDefRegMap(@Self)^.&set := $00000001;
  35123. end;
  35124. procedure TUART1B_U1BMODE.clearSTSEL; inline;
  35125. begin
  35126. pTDefRegMap(@Self)^.clr := $00000001;
  35127. end;
  35128. procedure TUART1B_U1BMODE.setSTSEL(thebits : TBits_1); inline;
  35129. begin
  35130. if thebits = 0 then
  35131. pTDefRegMap(@Self)^.clr := $00000001
  35132. else
  35133. pTDefRegMap(@Self)^.&set := $00000001;
  35134. end;
  35135. function TUART1B_U1BMODE.getSTSEL : TBits_1; inline;
  35136. begin
  35137. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35138. end;
  35139. procedure TUART1B_U1BMODE.setPDSEL(thebits : TBits_2); inline;
  35140. begin
  35141. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  35142. end;
  35143. function TUART1B_U1BMODE.getPDSEL : TBits_2; inline;
  35144. begin
  35145. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  35146. end;
  35147. procedure TUART1B_U1BMODE.setBRGH; inline;
  35148. begin
  35149. pTDefRegMap(@Self)^.&set := $00000008;
  35150. end;
  35151. procedure TUART1B_U1BMODE.clearBRGH; inline;
  35152. begin
  35153. pTDefRegMap(@Self)^.clr := $00000008;
  35154. end;
  35155. procedure TUART1B_U1BMODE.setBRGH(thebits : TBits_1); inline;
  35156. begin
  35157. if thebits = 0 then
  35158. pTDefRegMap(@Self)^.clr := $00000008
  35159. else
  35160. pTDefRegMap(@Self)^.&set := $00000008;
  35161. end;
  35162. function TUART1B_U1BMODE.getBRGH : TBits_1; inline;
  35163. begin
  35164. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35165. end;
  35166. procedure TUART1B_U1BMODE.setRXINV; inline;
  35167. begin
  35168. pTDefRegMap(@Self)^.&set := $00000010;
  35169. end;
  35170. procedure TUART1B_U1BMODE.clearRXINV; inline;
  35171. begin
  35172. pTDefRegMap(@Self)^.clr := $00000010;
  35173. end;
  35174. procedure TUART1B_U1BMODE.setRXINV(thebits : TBits_1); inline;
  35175. begin
  35176. if thebits = 0 then
  35177. pTDefRegMap(@Self)^.clr := $00000010
  35178. else
  35179. pTDefRegMap(@Self)^.&set := $00000010;
  35180. end;
  35181. function TUART1B_U1BMODE.getRXINV : TBits_1; inline;
  35182. begin
  35183. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35184. end;
  35185. procedure TUART1B_U1BMODE.setABAUD; inline;
  35186. begin
  35187. pTDefRegMap(@Self)^.&set := $00000020;
  35188. end;
  35189. procedure TUART1B_U1BMODE.clearABAUD; inline;
  35190. begin
  35191. pTDefRegMap(@Self)^.clr := $00000020;
  35192. end;
  35193. procedure TUART1B_U1BMODE.setABAUD(thebits : TBits_1); inline;
  35194. begin
  35195. if thebits = 0 then
  35196. pTDefRegMap(@Self)^.clr := $00000020
  35197. else
  35198. pTDefRegMap(@Self)^.&set := $00000020;
  35199. end;
  35200. function TUART1B_U1BMODE.getABAUD : TBits_1; inline;
  35201. begin
  35202. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35203. end;
  35204. procedure TUART1B_U1BMODE.setLPBACK; inline;
  35205. begin
  35206. pTDefRegMap(@Self)^.&set := $00000040;
  35207. end;
  35208. procedure TUART1B_U1BMODE.clearLPBACK; inline;
  35209. begin
  35210. pTDefRegMap(@Self)^.clr := $00000040;
  35211. end;
  35212. procedure TUART1B_U1BMODE.setLPBACK(thebits : TBits_1); inline;
  35213. begin
  35214. if thebits = 0 then
  35215. pTDefRegMap(@Self)^.clr := $00000040
  35216. else
  35217. pTDefRegMap(@Self)^.&set := $00000040;
  35218. end;
  35219. function TUART1B_U1BMODE.getLPBACK : TBits_1; inline;
  35220. begin
  35221. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35222. end;
  35223. procedure TUART1B_U1BMODE.setWAKE; inline;
  35224. begin
  35225. pTDefRegMap(@Self)^.&set := $00000080;
  35226. end;
  35227. procedure TUART1B_U1BMODE.clearWAKE; inline;
  35228. begin
  35229. pTDefRegMap(@Self)^.clr := $00000080;
  35230. end;
  35231. procedure TUART1B_U1BMODE.setWAKE(thebits : TBits_1); inline;
  35232. begin
  35233. if thebits = 0 then
  35234. pTDefRegMap(@Self)^.clr := $00000080
  35235. else
  35236. pTDefRegMap(@Self)^.&set := $00000080;
  35237. end;
  35238. function TUART1B_U1BMODE.getWAKE : TBits_1; inline;
  35239. begin
  35240. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35241. end;
  35242. procedure TUART1B_U1BMODE.setIREN; inline;
  35243. begin
  35244. pTDefRegMap(@Self)^.&set := $00001000;
  35245. end;
  35246. procedure TUART1B_U1BMODE.clearIREN; inline;
  35247. begin
  35248. pTDefRegMap(@Self)^.clr := $00001000;
  35249. end;
  35250. procedure TUART1B_U1BMODE.setIREN(thebits : TBits_1); inline;
  35251. begin
  35252. if thebits = 0 then
  35253. pTDefRegMap(@Self)^.clr := $00001000
  35254. else
  35255. pTDefRegMap(@Self)^.&set := $00001000;
  35256. end;
  35257. function TUART1B_U1BMODE.getIREN : TBits_1; inline;
  35258. begin
  35259. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  35260. end;
  35261. procedure TUART1B_U1BMODE.setSIDL; inline;
  35262. begin
  35263. pTDefRegMap(@Self)^.&set := $00002000;
  35264. end;
  35265. procedure TUART1B_U1BMODE.clearSIDL; inline;
  35266. begin
  35267. pTDefRegMap(@Self)^.clr := $00002000;
  35268. end;
  35269. procedure TUART1B_U1BMODE.setSIDL(thebits : TBits_1); inline;
  35270. begin
  35271. if thebits = 0 then
  35272. pTDefRegMap(@Self)^.clr := $00002000
  35273. else
  35274. pTDefRegMap(@Self)^.&set := $00002000;
  35275. end;
  35276. function TUART1B_U1BMODE.getSIDL : TBits_1; inline;
  35277. begin
  35278. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35279. end;
  35280. procedure TUART1B_U1BMODE.setON; inline;
  35281. begin
  35282. pTDefRegMap(@Self)^.&set := $00008000;
  35283. end;
  35284. procedure TUART1B_U1BMODE.clearON; inline;
  35285. begin
  35286. pTDefRegMap(@Self)^.clr := $00008000;
  35287. end;
  35288. procedure TUART1B_U1BMODE.setON(thebits : TBits_1); inline;
  35289. begin
  35290. if thebits = 0 then
  35291. pTDefRegMap(@Self)^.clr := $00008000
  35292. else
  35293. pTDefRegMap(@Self)^.&set := $00008000;
  35294. end;
  35295. function TUART1B_U1BMODE.getON : TBits_1; inline;
  35296. begin
  35297. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35298. end;
  35299. procedure TUART1B_U1BMODE.setPDSEL0; inline;
  35300. begin
  35301. pTDefRegMap(@Self)^.&set := $00000002;
  35302. end;
  35303. procedure TUART1B_U1BMODE.clearPDSEL0; inline;
  35304. begin
  35305. pTDefRegMap(@Self)^.clr := $00000002;
  35306. end;
  35307. procedure TUART1B_U1BMODE.setPDSEL0(thebits : TBits_1); inline;
  35308. begin
  35309. if thebits = 0 then
  35310. pTDefRegMap(@Self)^.clr := $00000002
  35311. else
  35312. pTDefRegMap(@Self)^.&set := $00000002;
  35313. end;
  35314. function TUART1B_U1BMODE.getPDSEL0 : TBits_1; inline;
  35315. begin
  35316. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35317. end;
  35318. procedure TUART1B_U1BMODE.setPDSEL1; inline;
  35319. begin
  35320. pTDefRegMap(@Self)^.&set := $00000004;
  35321. end;
  35322. procedure TUART1B_U1BMODE.clearPDSEL1; inline;
  35323. begin
  35324. pTDefRegMap(@Self)^.clr := $00000004;
  35325. end;
  35326. procedure TUART1B_U1BMODE.setPDSEL1(thebits : TBits_1); inline;
  35327. begin
  35328. if thebits = 0 then
  35329. pTDefRegMap(@Self)^.clr := $00000004
  35330. else
  35331. pTDefRegMap(@Self)^.&set := $00000004;
  35332. end;
  35333. function TUART1B_U1BMODE.getPDSEL1 : TBits_1; inline;
  35334. begin
  35335. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35336. end;
  35337. procedure TUART1B_U1BMODE.setUSIDL; inline;
  35338. begin
  35339. pTDefRegMap(@Self)^.&set := $00002000;
  35340. end;
  35341. procedure TUART1B_U1BMODE.clearUSIDL; inline;
  35342. begin
  35343. pTDefRegMap(@Self)^.clr := $00002000;
  35344. end;
  35345. procedure TUART1B_U1BMODE.setUSIDL(thebits : TBits_1); inline;
  35346. begin
  35347. if thebits = 0 then
  35348. pTDefRegMap(@Self)^.clr := $00002000
  35349. else
  35350. pTDefRegMap(@Self)^.&set := $00002000;
  35351. end;
  35352. function TUART1B_U1BMODE.getUSIDL : TBits_1; inline;
  35353. begin
  35354. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35355. end;
  35356. procedure TUART1B_U1BMODE.setUARTEN; inline;
  35357. begin
  35358. pTDefRegMap(@Self)^.&set := $00008000;
  35359. end;
  35360. procedure TUART1B_U1BMODE.clearUARTEN; inline;
  35361. begin
  35362. pTDefRegMap(@Self)^.clr := $00008000;
  35363. end;
  35364. procedure TUART1B_U1BMODE.setUARTEN(thebits : TBits_1); inline;
  35365. begin
  35366. if thebits = 0 then
  35367. pTDefRegMap(@Self)^.clr := $00008000
  35368. else
  35369. pTDefRegMap(@Self)^.&set := $00008000;
  35370. end;
  35371. function TUART1B_U1BMODE.getUARTEN : TBits_1; inline;
  35372. begin
  35373. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35374. end;
  35375. procedure TUART1B_U1BMODE.setw(thebits : TBits_32); inline;
  35376. begin
  35377. pTDefRegMap(@Self)^.val := thebits;
  35378. end;
  35379. function TUART1B_U1BMODE.getw : TBits_32; inline;
  35380. begin
  35381. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35382. end;
  35383. procedure TUART1B_U4MODE.setSTSEL; inline;
  35384. begin
  35385. pTDefRegMap(@Self)^.&set := $00000001;
  35386. end;
  35387. procedure TUART1B_U4MODE.clearSTSEL; inline;
  35388. begin
  35389. pTDefRegMap(@Self)^.clr := $00000001;
  35390. end;
  35391. procedure TUART1B_U4MODE.setSTSEL(thebits : TBits_1); inline;
  35392. begin
  35393. if thebits = 0 then
  35394. pTDefRegMap(@Self)^.clr := $00000001
  35395. else
  35396. pTDefRegMap(@Self)^.&set := $00000001;
  35397. end;
  35398. function TUART1B_U4MODE.getSTSEL : TBits_1; inline;
  35399. begin
  35400. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35401. end;
  35402. procedure TUART1B_U4MODE.setPDSEL(thebits : TBits_2); inline;
  35403. begin
  35404. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  35405. end;
  35406. function TUART1B_U4MODE.getPDSEL : TBits_2; inline;
  35407. begin
  35408. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  35409. end;
  35410. procedure TUART1B_U4MODE.setBRGH; inline;
  35411. begin
  35412. pTDefRegMap(@Self)^.&set := $00000008;
  35413. end;
  35414. procedure TUART1B_U4MODE.clearBRGH; inline;
  35415. begin
  35416. pTDefRegMap(@Self)^.clr := $00000008;
  35417. end;
  35418. procedure TUART1B_U4MODE.setBRGH(thebits : TBits_1); inline;
  35419. begin
  35420. if thebits = 0 then
  35421. pTDefRegMap(@Self)^.clr := $00000008
  35422. else
  35423. pTDefRegMap(@Self)^.&set := $00000008;
  35424. end;
  35425. function TUART1B_U4MODE.getBRGH : TBits_1; inline;
  35426. begin
  35427. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35428. end;
  35429. procedure TUART1B_U4MODE.setRXINV; inline;
  35430. begin
  35431. pTDefRegMap(@Self)^.&set := $00000010;
  35432. end;
  35433. procedure TUART1B_U4MODE.clearRXINV; inline;
  35434. begin
  35435. pTDefRegMap(@Self)^.clr := $00000010;
  35436. end;
  35437. procedure TUART1B_U4MODE.setRXINV(thebits : TBits_1); inline;
  35438. begin
  35439. if thebits = 0 then
  35440. pTDefRegMap(@Self)^.clr := $00000010
  35441. else
  35442. pTDefRegMap(@Self)^.&set := $00000010;
  35443. end;
  35444. function TUART1B_U4MODE.getRXINV : TBits_1; inline;
  35445. begin
  35446. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35447. end;
  35448. procedure TUART1B_U4MODE.setABAUD; inline;
  35449. begin
  35450. pTDefRegMap(@Self)^.&set := $00000020;
  35451. end;
  35452. procedure TUART1B_U4MODE.clearABAUD; inline;
  35453. begin
  35454. pTDefRegMap(@Self)^.clr := $00000020;
  35455. end;
  35456. procedure TUART1B_U4MODE.setABAUD(thebits : TBits_1); inline;
  35457. begin
  35458. if thebits = 0 then
  35459. pTDefRegMap(@Self)^.clr := $00000020
  35460. else
  35461. pTDefRegMap(@Self)^.&set := $00000020;
  35462. end;
  35463. function TUART1B_U4MODE.getABAUD : TBits_1; inline;
  35464. begin
  35465. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35466. end;
  35467. procedure TUART1B_U4MODE.setLPBACK; inline;
  35468. begin
  35469. pTDefRegMap(@Self)^.&set := $00000040;
  35470. end;
  35471. procedure TUART1B_U4MODE.clearLPBACK; inline;
  35472. begin
  35473. pTDefRegMap(@Self)^.clr := $00000040;
  35474. end;
  35475. procedure TUART1B_U4MODE.setLPBACK(thebits : TBits_1); inline;
  35476. begin
  35477. if thebits = 0 then
  35478. pTDefRegMap(@Self)^.clr := $00000040
  35479. else
  35480. pTDefRegMap(@Self)^.&set := $00000040;
  35481. end;
  35482. function TUART1B_U4MODE.getLPBACK : TBits_1; inline;
  35483. begin
  35484. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35485. end;
  35486. procedure TUART1B_U4MODE.setWAKE; inline;
  35487. begin
  35488. pTDefRegMap(@Self)^.&set := $00000080;
  35489. end;
  35490. procedure TUART1B_U4MODE.clearWAKE; inline;
  35491. begin
  35492. pTDefRegMap(@Self)^.clr := $00000080;
  35493. end;
  35494. procedure TUART1B_U4MODE.setWAKE(thebits : TBits_1); inline;
  35495. begin
  35496. if thebits = 0 then
  35497. pTDefRegMap(@Self)^.clr := $00000080
  35498. else
  35499. pTDefRegMap(@Self)^.&set := $00000080;
  35500. end;
  35501. function TUART1B_U4MODE.getWAKE : TBits_1; inline;
  35502. begin
  35503. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35504. end;
  35505. procedure TUART1B_U4MODE.setIREN; inline;
  35506. begin
  35507. pTDefRegMap(@Self)^.&set := $00001000;
  35508. end;
  35509. procedure TUART1B_U4MODE.clearIREN; inline;
  35510. begin
  35511. pTDefRegMap(@Self)^.clr := $00001000;
  35512. end;
  35513. procedure TUART1B_U4MODE.setIREN(thebits : TBits_1); inline;
  35514. begin
  35515. if thebits = 0 then
  35516. pTDefRegMap(@Self)^.clr := $00001000
  35517. else
  35518. pTDefRegMap(@Self)^.&set := $00001000;
  35519. end;
  35520. function TUART1B_U4MODE.getIREN : TBits_1; inline;
  35521. begin
  35522. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  35523. end;
  35524. procedure TUART1B_U4MODE.setSIDL; inline;
  35525. begin
  35526. pTDefRegMap(@Self)^.&set := $00002000;
  35527. end;
  35528. procedure TUART1B_U4MODE.clearSIDL; inline;
  35529. begin
  35530. pTDefRegMap(@Self)^.clr := $00002000;
  35531. end;
  35532. procedure TUART1B_U4MODE.setSIDL(thebits : TBits_1); inline;
  35533. begin
  35534. if thebits = 0 then
  35535. pTDefRegMap(@Self)^.clr := $00002000
  35536. else
  35537. pTDefRegMap(@Self)^.&set := $00002000;
  35538. end;
  35539. function TUART1B_U4MODE.getSIDL : TBits_1; inline;
  35540. begin
  35541. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35542. end;
  35543. procedure TUART1B_U4MODE.setON; inline;
  35544. begin
  35545. pTDefRegMap(@Self)^.&set := $00008000;
  35546. end;
  35547. procedure TUART1B_U4MODE.clearON; inline;
  35548. begin
  35549. pTDefRegMap(@Self)^.clr := $00008000;
  35550. end;
  35551. procedure TUART1B_U4MODE.setON(thebits : TBits_1); inline;
  35552. begin
  35553. if thebits = 0 then
  35554. pTDefRegMap(@Self)^.clr := $00008000
  35555. else
  35556. pTDefRegMap(@Self)^.&set := $00008000;
  35557. end;
  35558. function TUART1B_U4MODE.getON : TBits_1; inline;
  35559. begin
  35560. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35561. end;
  35562. procedure TUART1B_U4MODE.setPDSEL0; inline;
  35563. begin
  35564. pTDefRegMap(@Self)^.&set := $00000002;
  35565. end;
  35566. procedure TUART1B_U4MODE.clearPDSEL0; inline;
  35567. begin
  35568. pTDefRegMap(@Self)^.clr := $00000002;
  35569. end;
  35570. procedure TUART1B_U4MODE.setPDSEL0(thebits : TBits_1); inline;
  35571. begin
  35572. if thebits = 0 then
  35573. pTDefRegMap(@Self)^.clr := $00000002
  35574. else
  35575. pTDefRegMap(@Self)^.&set := $00000002;
  35576. end;
  35577. function TUART1B_U4MODE.getPDSEL0 : TBits_1; inline;
  35578. begin
  35579. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35580. end;
  35581. procedure TUART1B_U4MODE.setPDSEL1; inline;
  35582. begin
  35583. pTDefRegMap(@Self)^.&set := $00000004;
  35584. end;
  35585. procedure TUART1B_U4MODE.clearPDSEL1; inline;
  35586. begin
  35587. pTDefRegMap(@Self)^.clr := $00000004;
  35588. end;
  35589. procedure TUART1B_U4MODE.setPDSEL1(thebits : TBits_1); inline;
  35590. begin
  35591. if thebits = 0 then
  35592. pTDefRegMap(@Self)^.clr := $00000004
  35593. else
  35594. pTDefRegMap(@Self)^.&set := $00000004;
  35595. end;
  35596. function TUART1B_U4MODE.getPDSEL1 : TBits_1; inline;
  35597. begin
  35598. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35599. end;
  35600. procedure TUART1B_U4MODE.setUSIDL; inline;
  35601. begin
  35602. pTDefRegMap(@Self)^.&set := $00002000;
  35603. end;
  35604. procedure TUART1B_U4MODE.clearUSIDL; inline;
  35605. begin
  35606. pTDefRegMap(@Self)^.clr := $00002000;
  35607. end;
  35608. procedure TUART1B_U4MODE.setUSIDL(thebits : TBits_1); inline;
  35609. begin
  35610. if thebits = 0 then
  35611. pTDefRegMap(@Self)^.clr := $00002000
  35612. else
  35613. pTDefRegMap(@Self)^.&set := $00002000;
  35614. end;
  35615. function TUART1B_U4MODE.getUSIDL : TBits_1; inline;
  35616. begin
  35617. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35618. end;
  35619. procedure TUART1B_U4MODE.setUARTEN; inline;
  35620. begin
  35621. pTDefRegMap(@Self)^.&set := $00008000;
  35622. end;
  35623. procedure TUART1B_U4MODE.clearUARTEN; inline;
  35624. begin
  35625. pTDefRegMap(@Self)^.clr := $00008000;
  35626. end;
  35627. procedure TUART1B_U4MODE.setUARTEN(thebits : TBits_1); inline;
  35628. begin
  35629. if thebits = 0 then
  35630. pTDefRegMap(@Self)^.clr := $00008000
  35631. else
  35632. pTDefRegMap(@Self)^.&set := $00008000;
  35633. end;
  35634. function TUART1B_U4MODE.getUARTEN : TBits_1; inline;
  35635. begin
  35636. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35637. end;
  35638. procedure TUART1B_U4MODE.setw(thebits : TBits_32); inline;
  35639. begin
  35640. pTDefRegMap(@Self)^.val := thebits;
  35641. end;
  35642. function TUART1B_U4MODE.getw : TBits_32; inline;
  35643. begin
  35644. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35645. end;
  35646. procedure TUART1B_U1BSTA.setURXDA; inline;
  35647. begin
  35648. pTDefRegMap(@Self)^.&set := $00000001;
  35649. end;
  35650. procedure TUART1B_U1BSTA.clearURXDA; inline;
  35651. begin
  35652. pTDefRegMap(@Self)^.clr := $00000001;
  35653. end;
  35654. procedure TUART1B_U1BSTA.setURXDA(thebits : TBits_1); inline;
  35655. begin
  35656. if thebits = 0 then
  35657. pTDefRegMap(@Self)^.clr := $00000001
  35658. else
  35659. pTDefRegMap(@Self)^.&set := $00000001;
  35660. end;
  35661. function TUART1B_U1BSTA.getURXDA : TBits_1; inline;
  35662. begin
  35663. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35664. end;
  35665. procedure TUART1B_U1BSTA.setOERR; inline;
  35666. begin
  35667. pTDefRegMap(@Self)^.&set := $00000002;
  35668. end;
  35669. procedure TUART1B_U1BSTA.clearOERR; inline;
  35670. begin
  35671. pTDefRegMap(@Self)^.clr := $00000002;
  35672. end;
  35673. procedure TUART1B_U1BSTA.setOERR(thebits : TBits_1); inline;
  35674. begin
  35675. if thebits = 0 then
  35676. pTDefRegMap(@Self)^.clr := $00000002
  35677. else
  35678. pTDefRegMap(@Self)^.&set := $00000002;
  35679. end;
  35680. function TUART1B_U1BSTA.getOERR : TBits_1; inline;
  35681. begin
  35682. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35683. end;
  35684. procedure TUART1B_U1BSTA.setFERR; inline;
  35685. begin
  35686. pTDefRegMap(@Self)^.&set := $00000004;
  35687. end;
  35688. procedure TUART1B_U1BSTA.clearFERR; inline;
  35689. begin
  35690. pTDefRegMap(@Self)^.clr := $00000004;
  35691. end;
  35692. procedure TUART1B_U1BSTA.setFERR(thebits : TBits_1); inline;
  35693. begin
  35694. if thebits = 0 then
  35695. pTDefRegMap(@Self)^.clr := $00000004
  35696. else
  35697. pTDefRegMap(@Self)^.&set := $00000004;
  35698. end;
  35699. function TUART1B_U1BSTA.getFERR : TBits_1; inline;
  35700. begin
  35701. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35702. end;
  35703. procedure TUART1B_U1BSTA.setPERR; inline;
  35704. begin
  35705. pTDefRegMap(@Self)^.&set := $00000008;
  35706. end;
  35707. procedure TUART1B_U1BSTA.clearPERR; inline;
  35708. begin
  35709. pTDefRegMap(@Self)^.clr := $00000008;
  35710. end;
  35711. procedure TUART1B_U1BSTA.setPERR(thebits : TBits_1); inline;
  35712. begin
  35713. if thebits = 0 then
  35714. pTDefRegMap(@Self)^.clr := $00000008
  35715. else
  35716. pTDefRegMap(@Self)^.&set := $00000008;
  35717. end;
  35718. function TUART1B_U1BSTA.getPERR : TBits_1; inline;
  35719. begin
  35720. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35721. end;
  35722. procedure TUART1B_U1BSTA.setRIDLE; inline;
  35723. begin
  35724. pTDefRegMap(@Self)^.&set := $00000010;
  35725. end;
  35726. procedure TUART1B_U1BSTA.clearRIDLE; inline;
  35727. begin
  35728. pTDefRegMap(@Self)^.clr := $00000010;
  35729. end;
  35730. procedure TUART1B_U1BSTA.setRIDLE(thebits : TBits_1); inline;
  35731. begin
  35732. if thebits = 0 then
  35733. pTDefRegMap(@Self)^.clr := $00000010
  35734. else
  35735. pTDefRegMap(@Self)^.&set := $00000010;
  35736. end;
  35737. function TUART1B_U1BSTA.getRIDLE : TBits_1; inline;
  35738. begin
  35739. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35740. end;
  35741. procedure TUART1B_U1BSTA.setADDEN; inline;
  35742. begin
  35743. pTDefRegMap(@Self)^.&set := $00000020;
  35744. end;
  35745. procedure TUART1B_U1BSTA.clearADDEN; inline;
  35746. begin
  35747. pTDefRegMap(@Self)^.clr := $00000020;
  35748. end;
  35749. procedure TUART1B_U1BSTA.setADDEN(thebits : TBits_1); inline;
  35750. begin
  35751. if thebits = 0 then
  35752. pTDefRegMap(@Self)^.clr := $00000020
  35753. else
  35754. pTDefRegMap(@Self)^.&set := $00000020;
  35755. end;
  35756. function TUART1B_U1BSTA.getADDEN : TBits_1; inline;
  35757. begin
  35758. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35759. end;
  35760. procedure TUART1B_U1BSTA.setURXISEL(thebits : TBits_2); inline;
  35761. begin
  35762. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  35763. end;
  35764. function TUART1B_U1BSTA.getURXISEL : TBits_2; inline;
  35765. begin
  35766. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  35767. end;
  35768. procedure TUART1B_U1BSTA.setTRMT; inline;
  35769. begin
  35770. pTDefRegMap(@Self)^.&set := $00000100;
  35771. end;
  35772. procedure TUART1B_U1BSTA.clearTRMT; inline;
  35773. begin
  35774. pTDefRegMap(@Self)^.clr := $00000100;
  35775. end;
  35776. procedure TUART1B_U1BSTA.setTRMT(thebits : TBits_1); inline;
  35777. begin
  35778. if thebits = 0 then
  35779. pTDefRegMap(@Self)^.clr := $00000100
  35780. else
  35781. pTDefRegMap(@Self)^.&set := $00000100;
  35782. end;
  35783. function TUART1B_U1BSTA.getTRMT : TBits_1; inline;
  35784. begin
  35785. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  35786. end;
  35787. procedure TUART1B_U1BSTA.setUTXBF; inline;
  35788. begin
  35789. pTDefRegMap(@Self)^.&set := $00000200;
  35790. end;
  35791. procedure TUART1B_U1BSTA.clearUTXBF; inline;
  35792. begin
  35793. pTDefRegMap(@Self)^.clr := $00000200;
  35794. end;
  35795. procedure TUART1B_U1BSTA.setUTXBF(thebits : TBits_1); inline;
  35796. begin
  35797. if thebits = 0 then
  35798. pTDefRegMap(@Self)^.clr := $00000200
  35799. else
  35800. pTDefRegMap(@Self)^.&set := $00000200;
  35801. end;
  35802. function TUART1B_U1BSTA.getUTXBF : TBits_1; inline;
  35803. begin
  35804. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  35805. end;
  35806. procedure TUART1B_U1BSTA.setUTXEN; inline;
  35807. begin
  35808. pTDefRegMap(@Self)^.&set := $00000400;
  35809. end;
  35810. procedure TUART1B_U1BSTA.clearUTXEN; inline;
  35811. begin
  35812. pTDefRegMap(@Self)^.clr := $00000400;
  35813. end;
  35814. procedure TUART1B_U1BSTA.setUTXEN(thebits : TBits_1); inline;
  35815. begin
  35816. if thebits = 0 then
  35817. pTDefRegMap(@Self)^.clr := $00000400
  35818. else
  35819. pTDefRegMap(@Self)^.&set := $00000400;
  35820. end;
  35821. function TUART1B_U1BSTA.getUTXEN : TBits_1; inline;
  35822. begin
  35823. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  35824. end;
  35825. procedure TUART1B_U1BSTA.setUTXBRK; inline;
  35826. begin
  35827. pTDefRegMap(@Self)^.&set := $00000800;
  35828. end;
  35829. procedure TUART1B_U1BSTA.clearUTXBRK; inline;
  35830. begin
  35831. pTDefRegMap(@Self)^.clr := $00000800;
  35832. end;
  35833. procedure TUART1B_U1BSTA.setUTXBRK(thebits : TBits_1); inline;
  35834. begin
  35835. if thebits = 0 then
  35836. pTDefRegMap(@Self)^.clr := $00000800
  35837. else
  35838. pTDefRegMap(@Self)^.&set := $00000800;
  35839. end;
  35840. function TUART1B_U1BSTA.getUTXBRK : TBits_1; inline;
  35841. begin
  35842. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  35843. end;
  35844. procedure TUART1B_U1BSTA.setURXEN; inline;
  35845. begin
  35846. pTDefRegMap(@Self)^.&set := $00001000;
  35847. end;
  35848. procedure TUART1B_U1BSTA.clearURXEN; inline;
  35849. begin
  35850. pTDefRegMap(@Self)^.clr := $00001000;
  35851. end;
  35852. procedure TUART1B_U1BSTA.setURXEN(thebits : TBits_1); inline;
  35853. begin
  35854. if thebits = 0 then
  35855. pTDefRegMap(@Self)^.clr := $00001000
  35856. else
  35857. pTDefRegMap(@Self)^.&set := $00001000;
  35858. end;
  35859. function TUART1B_U1BSTA.getURXEN : TBits_1; inline;
  35860. begin
  35861. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  35862. end;
  35863. procedure TUART1B_U1BSTA.setUTXINV; inline;
  35864. begin
  35865. pTDefRegMap(@Self)^.&set := $00002000;
  35866. end;
  35867. procedure TUART1B_U1BSTA.clearUTXINV; inline;
  35868. begin
  35869. pTDefRegMap(@Self)^.clr := $00002000;
  35870. end;
  35871. procedure TUART1B_U1BSTA.setUTXINV(thebits : TBits_1); inline;
  35872. begin
  35873. if thebits = 0 then
  35874. pTDefRegMap(@Self)^.clr := $00002000
  35875. else
  35876. pTDefRegMap(@Self)^.&set := $00002000;
  35877. end;
  35878. function TUART1B_U1BSTA.getUTXINV : TBits_1; inline;
  35879. begin
  35880. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35881. end;
  35882. procedure TUART1B_U1BSTA.setUTXISEL(thebits : TBits_2); inline;
  35883. begin
  35884. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  35885. end;
  35886. function TUART1B_U1BSTA.getUTXISEL : TBits_2; inline;
  35887. begin
  35888. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  35889. end;
  35890. procedure TUART1B_U1BSTA.setADDR(thebits : TBits_8); inline;
  35891. begin
  35892. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  35893. end;
  35894. function TUART1B_U1BSTA.getADDR : TBits_8; inline;
  35895. begin
  35896. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  35897. end;
  35898. procedure TUART1B_U1BSTA.setADM_EN; inline;
  35899. begin
  35900. pTDefRegMap(@Self)^.&set := $01000000;
  35901. end;
  35902. procedure TUART1B_U1BSTA.clearADM_EN; inline;
  35903. begin
  35904. pTDefRegMap(@Self)^.clr := $01000000;
  35905. end;
  35906. procedure TUART1B_U1BSTA.setADM_EN(thebits : TBits_1); inline;
  35907. begin
  35908. if thebits = 0 then
  35909. pTDefRegMap(@Self)^.clr := $01000000
  35910. else
  35911. pTDefRegMap(@Self)^.&set := $01000000;
  35912. end;
  35913. function TUART1B_U1BSTA.getADM_EN : TBits_1; inline;
  35914. begin
  35915. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  35916. end;
  35917. procedure TUART1B_U1BSTA.setURXISEL0; inline;
  35918. begin
  35919. pTDefRegMap(@Self)^.&set := $00000040;
  35920. end;
  35921. procedure TUART1B_U1BSTA.clearURXISEL0; inline;
  35922. begin
  35923. pTDefRegMap(@Self)^.clr := $00000040;
  35924. end;
  35925. procedure TUART1B_U1BSTA.setURXISEL0(thebits : TBits_1); inline;
  35926. begin
  35927. if thebits = 0 then
  35928. pTDefRegMap(@Self)^.clr := $00000040
  35929. else
  35930. pTDefRegMap(@Self)^.&set := $00000040;
  35931. end;
  35932. function TUART1B_U1BSTA.getURXISEL0 : TBits_1; inline;
  35933. begin
  35934. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35935. end;
  35936. procedure TUART1B_U1BSTA.setURXISEL1; inline;
  35937. begin
  35938. pTDefRegMap(@Self)^.&set := $00000080;
  35939. end;
  35940. procedure TUART1B_U1BSTA.clearURXISEL1; inline;
  35941. begin
  35942. pTDefRegMap(@Self)^.clr := $00000080;
  35943. end;
  35944. procedure TUART1B_U1BSTA.setURXISEL1(thebits : TBits_1); inline;
  35945. begin
  35946. if thebits = 0 then
  35947. pTDefRegMap(@Self)^.clr := $00000080
  35948. else
  35949. pTDefRegMap(@Self)^.&set := $00000080;
  35950. end;
  35951. function TUART1B_U1BSTA.getURXISEL1 : TBits_1; inline;
  35952. begin
  35953. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35954. end;
  35955. procedure TUART1B_U1BSTA.setUTXISEL0; inline;
  35956. begin
  35957. pTDefRegMap(@Self)^.&set := $00004000;
  35958. end;
  35959. procedure TUART1B_U1BSTA.clearUTXISEL0; inline;
  35960. begin
  35961. pTDefRegMap(@Self)^.clr := $00004000;
  35962. end;
  35963. procedure TUART1B_U1BSTA.setUTXISEL0(thebits : TBits_1); inline;
  35964. begin
  35965. if thebits = 0 then
  35966. pTDefRegMap(@Self)^.clr := $00004000
  35967. else
  35968. pTDefRegMap(@Self)^.&set := $00004000;
  35969. end;
  35970. function TUART1B_U1BSTA.getUTXISEL0 : TBits_1; inline;
  35971. begin
  35972. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  35973. end;
  35974. procedure TUART1B_U1BSTA.setUTXISEL1; inline;
  35975. begin
  35976. pTDefRegMap(@Self)^.&set := $00008000;
  35977. end;
  35978. procedure TUART1B_U1BSTA.clearUTXISEL1; inline;
  35979. begin
  35980. pTDefRegMap(@Self)^.clr := $00008000;
  35981. end;
  35982. procedure TUART1B_U1BSTA.setUTXISEL1(thebits : TBits_1); inline;
  35983. begin
  35984. if thebits = 0 then
  35985. pTDefRegMap(@Self)^.clr := $00008000
  35986. else
  35987. pTDefRegMap(@Self)^.&set := $00008000;
  35988. end;
  35989. function TUART1B_U1BSTA.getUTXISEL1 : TBits_1; inline;
  35990. begin
  35991. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35992. end;
  35993. procedure TUART1B_U1BSTA.setUTXSEL(thebits : TBits_2); inline;
  35994. begin
  35995. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  35996. end;
  35997. function TUART1B_U1BSTA.getUTXSEL : TBits_2; inline;
  35998. begin
  35999. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  36000. end;
  36001. procedure TUART1B_U1BSTA.setw(thebits : TBits_32); inline;
  36002. begin
  36003. pTDefRegMap(@Self)^.val := thebits;
  36004. end;
  36005. function TUART1B_U1BSTA.getw : TBits_32; inline;
  36006. begin
  36007. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36008. end;
  36009. procedure TUART1B_U4STA.setURXDA; inline;
  36010. begin
  36011. pTDefRegMap(@Self)^.&set := $00000001;
  36012. end;
  36013. procedure TUART1B_U4STA.clearURXDA; inline;
  36014. begin
  36015. pTDefRegMap(@Self)^.clr := $00000001;
  36016. end;
  36017. procedure TUART1B_U4STA.setURXDA(thebits : TBits_1); inline;
  36018. begin
  36019. if thebits = 0 then
  36020. pTDefRegMap(@Self)^.clr := $00000001
  36021. else
  36022. pTDefRegMap(@Self)^.&set := $00000001;
  36023. end;
  36024. function TUART1B_U4STA.getURXDA : TBits_1; inline;
  36025. begin
  36026. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36027. end;
  36028. procedure TUART1B_U4STA.setOERR; inline;
  36029. begin
  36030. pTDefRegMap(@Self)^.&set := $00000002;
  36031. end;
  36032. procedure TUART1B_U4STA.clearOERR; inline;
  36033. begin
  36034. pTDefRegMap(@Self)^.clr := $00000002;
  36035. end;
  36036. procedure TUART1B_U4STA.setOERR(thebits : TBits_1); inline;
  36037. begin
  36038. if thebits = 0 then
  36039. pTDefRegMap(@Self)^.clr := $00000002
  36040. else
  36041. pTDefRegMap(@Self)^.&set := $00000002;
  36042. end;
  36043. function TUART1B_U4STA.getOERR : TBits_1; inline;
  36044. begin
  36045. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36046. end;
  36047. procedure TUART1B_U4STA.setFERR; inline;
  36048. begin
  36049. pTDefRegMap(@Self)^.&set := $00000004;
  36050. end;
  36051. procedure TUART1B_U4STA.clearFERR; inline;
  36052. begin
  36053. pTDefRegMap(@Self)^.clr := $00000004;
  36054. end;
  36055. procedure TUART1B_U4STA.setFERR(thebits : TBits_1); inline;
  36056. begin
  36057. if thebits = 0 then
  36058. pTDefRegMap(@Self)^.clr := $00000004
  36059. else
  36060. pTDefRegMap(@Self)^.&set := $00000004;
  36061. end;
  36062. function TUART1B_U4STA.getFERR : TBits_1; inline;
  36063. begin
  36064. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36065. end;
  36066. procedure TUART1B_U4STA.setPERR; inline;
  36067. begin
  36068. pTDefRegMap(@Self)^.&set := $00000008;
  36069. end;
  36070. procedure TUART1B_U4STA.clearPERR; inline;
  36071. begin
  36072. pTDefRegMap(@Self)^.clr := $00000008;
  36073. end;
  36074. procedure TUART1B_U4STA.setPERR(thebits : TBits_1); inline;
  36075. begin
  36076. if thebits = 0 then
  36077. pTDefRegMap(@Self)^.clr := $00000008
  36078. else
  36079. pTDefRegMap(@Self)^.&set := $00000008;
  36080. end;
  36081. function TUART1B_U4STA.getPERR : TBits_1; inline;
  36082. begin
  36083. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36084. end;
  36085. procedure TUART1B_U4STA.setRIDLE; inline;
  36086. begin
  36087. pTDefRegMap(@Self)^.&set := $00000010;
  36088. end;
  36089. procedure TUART1B_U4STA.clearRIDLE; inline;
  36090. begin
  36091. pTDefRegMap(@Self)^.clr := $00000010;
  36092. end;
  36093. procedure TUART1B_U4STA.setRIDLE(thebits : TBits_1); inline;
  36094. begin
  36095. if thebits = 0 then
  36096. pTDefRegMap(@Self)^.clr := $00000010
  36097. else
  36098. pTDefRegMap(@Self)^.&set := $00000010;
  36099. end;
  36100. function TUART1B_U4STA.getRIDLE : TBits_1; inline;
  36101. begin
  36102. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36103. end;
  36104. procedure TUART1B_U4STA.setADDEN; inline;
  36105. begin
  36106. pTDefRegMap(@Self)^.&set := $00000020;
  36107. end;
  36108. procedure TUART1B_U4STA.clearADDEN; inline;
  36109. begin
  36110. pTDefRegMap(@Self)^.clr := $00000020;
  36111. end;
  36112. procedure TUART1B_U4STA.setADDEN(thebits : TBits_1); inline;
  36113. begin
  36114. if thebits = 0 then
  36115. pTDefRegMap(@Self)^.clr := $00000020
  36116. else
  36117. pTDefRegMap(@Self)^.&set := $00000020;
  36118. end;
  36119. function TUART1B_U4STA.getADDEN : TBits_1; inline;
  36120. begin
  36121. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36122. end;
  36123. procedure TUART1B_U4STA.setURXISEL(thebits : TBits_2); inline;
  36124. begin
  36125. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  36126. end;
  36127. function TUART1B_U4STA.getURXISEL : TBits_2; inline;
  36128. begin
  36129. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  36130. end;
  36131. procedure TUART1B_U4STA.setTRMT; inline;
  36132. begin
  36133. pTDefRegMap(@Self)^.&set := $00000100;
  36134. end;
  36135. procedure TUART1B_U4STA.clearTRMT; inline;
  36136. begin
  36137. pTDefRegMap(@Self)^.clr := $00000100;
  36138. end;
  36139. procedure TUART1B_U4STA.setTRMT(thebits : TBits_1); inline;
  36140. begin
  36141. if thebits = 0 then
  36142. pTDefRegMap(@Self)^.clr := $00000100
  36143. else
  36144. pTDefRegMap(@Self)^.&set := $00000100;
  36145. end;
  36146. function TUART1B_U4STA.getTRMT : TBits_1; inline;
  36147. begin
  36148. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36149. end;
  36150. procedure TUART1B_U4STA.setUTXBF; inline;
  36151. begin
  36152. pTDefRegMap(@Self)^.&set := $00000200;
  36153. end;
  36154. procedure TUART1B_U4STA.clearUTXBF; inline;
  36155. begin
  36156. pTDefRegMap(@Self)^.clr := $00000200;
  36157. end;
  36158. procedure TUART1B_U4STA.setUTXBF(thebits : TBits_1); inline;
  36159. begin
  36160. if thebits = 0 then
  36161. pTDefRegMap(@Self)^.clr := $00000200
  36162. else
  36163. pTDefRegMap(@Self)^.&set := $00000200;
  36164. end;
  36165. function TUART1B_U4STA.getUTXBF : TBits_1; inline;
  36166. begin
  36167. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36168. end;
  36169. procedure TUART1B_U4STA.setUTXEN; inline;
  36170. begin
  36171. pTDefRegMap(@Self)^.&set := $00000400;
  36172. end;
  36173. procedure TUART1B_U4STA.clearUTXEN; inline;
  36174. begin
  36175. pTDefRegMap(@Self)^.clr := $00000400;
  36176. end;
  36177. procedure TUART1B_U4STA.setUTXEN(thebits : TBits_1); inline;
  36178. begin
  36179. if thebits = 0 then
  36180. pTDefRegMap(@Self)^.clr := $00000400
  36181. else
  36182. pTDefRegMap(@Self)^.&set := $00000400;
  36183. end;
  36184. function TUART1B_U4STA.getUTXEN : TBits_1; inline;
  36185. begin
  36186. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  36187. end;
  36188. procedure TUART1B_U4STA.setUTXBRK; inline;
  36189. begin
  36190. pTDefRegMap(@Self)^.&set := $00000800;
  36191. end;
  36192. procedure TUART1B_U4STA.clearUTXBRK; inline;
  36193. begin
  36194. pTDefRegMap(@Self)^.clr := $00000800;
  36195. end;
  36196. procedure TUART1B_U4STA.setUTXBRK(thebits : TBits_1); inline;
  36197. begin
  36198. if thebits = 0 then
  36199. pTDefRegMap(@Self)^.clr := $00000800
  36200. else
  36201. pTDefRegMap(@Self)^.&set := $00000800;
  36202. end;
  36203. function TUART1B_U4STA.getUTXBRK : TBits_1; inline;
  36204. begin
  36205. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  36206. end;
  36207. procedure TUART1B_U4STA.setURXEN; inline;
  36208. begin
  36209. pTDefRegMap(@Self)^.&set := $00001000;
  36210. end;
  36211. procedure TUART1B_U4STA.clearURXEN; inline;
  36212. begin
  36213. pTDefRegMap(@Self)^.clr := $00001000;
  36214. end;
  36215. procedure TUART1B_U4STA.setURXEN(thebits : TBits_1); inline;
  36216. begin
  36217. if thebits = 0 then
  36218. pTDefRegMap(@Self)^.clr := $00001000
  36219. else
  36220. pTDefRegMap(@Self)^.&set := $00001000;
  36221. end;
  36222. function TUART1B_U4STA.getURXEN : TBits_1; inline;
  36223. begin
  36224. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  36225. end;
  36226. procedure TUART1B_U4STA.setUTXINV; inline;
  36227. begin
  36228. pTDefRegMap(@Self)^.&set := $00002000;
  36229. end;
  36230. procedure TUART1B_U4STA.clearUTXINV; inline;
  36231. begin
  36232. pTDefRegMap(@Self)^.clr := $00002000;
  36233. end;
  36234. procedure TUART1B_U4STA.setUTXINV(thebits : TBits_1); inline;
  36235. begin
  36236. if thebits = 0 then
  36237. pTDefRegMap(@Self)^.clr := $00002000
  36238. else
  36239. pTDefRegMap(@Self)^.&set := $00002000;
  36240. end;
  36241. function TUART1B_U4STA.getUTXINV : TBits_1; inline;
  36242. begin
  36243. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36244. end;
  36245. procedure TUART1B_U4STA.setUTXISEL(thebits : TBits_2); inline;
  36246. begin
  36247. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  36248. end;
  36249. function TUART1B_U4STA.getUTXISEL : TBits_2; inline;
  36250. begin
  36251. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  36252. end;
  36253. procedure TUART1B_U4STA.setADDR(thebits : TBits_8); inline;
  36254. begin
  36255. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  36256. end;
  36257. function TUART1B_U4STA.getADDR : TBits_8; inline;
  36258. begin
  36259. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  36260. end;
  36261. procedure TUART1B_U4STA.setADM_EN; inline;
  36262. begin
  36263. pTDefRegMap(@Self)^.&set := $01000000;
  36264. end;
  36265. procedure TUART1B_U4STA.clearADM_EN; inline;
  36266. begin
  36267. pTDefRegMap(@Self)^.clr := $01000000;
  36268. end;
  36269. procedure TUART1B_U4STA.setADM_EN(thebits : TBits_1); inline;
  36270. begin
  36271. if thebits = 0 then
  36272. pTDefRegMap(@Self)^.clr := $01000000
  36273. else
  36274. pTDefRegMap(@Self)^.&set := $01000000;
  36275. end;
  36276. function TUART1B_U4STA.getADM_EN : TBits_1; inline;
  36277. begin
  36278. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  36279. end;
  36280. procedure TUART1B_U4STA.setURXISEL0; inline;
  36281. begin
  36282. pTDefRegMap(@Self)^.&set := $00000040;
  36283. end;
  36284. procedure TUART1B_U4STA.clearURXISEL0; inline;
  36285. begin
  36286. pTDefRegMap(@Self)^.clr := $00000040;
  36287. end;
  36288. procedure TUART1B_U4STA.setURXISEL0(thebits : TBits_1); inline;
  36289. begin
  36290. if thebits = 0 then
  36291. pTDefRegMap(@Self)^.clr := $00000040
  36292. else
  36293. pTDefRegMap(@Self)^.&set := $00000040;
  36294. end;
  36295. function TUART1B_U4STA.getURXISEL0 : TBits_1; inline;
  36296. begin
  36297. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36298. end;
  36299. procedure TUART1B_U4STA.setURXISEL1; inline;
  36300. begin
  36301. pTDefRegMap(@Self)^.&set := $00000080;
  36302. end;
  36303. procedure TUART1B_U4STA.clearURXISEL1; inline;
  36304. begin
  36305. pTDefRegMap(@Self)^.clr := $00000080;
  36306. end;
  36307. procedure TUART1B_U4STA.setURXISEL1(thebits : TBits_1); inline;
  36308. begin
  36309. if thebits = 0 then
  36310. pTDefRegMap(@Self)^.clr := $00000080
  36311. else
  36312. pTDefRegMap(@Self)^.&set := $00000080;
  36313. end;
  36314. function TUART1B_U4STA.getURXISEL1 : TBits_1; inline;
  36315. begin
  36316. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36317. end;
  36318. procedure TUART1B_U4STA.setUTXISEL0; inline;
  36319. begin
  36320. pTDefRegMap(@Self)^.&set := $00004000;
  36321. end;
  36322. procedure TUART1B_U4STA.clearUTXISEL0; inline;
  36323. begin
  36324. pTDefRegMap(@Self)^.clr := $00004000;
  36325. end;
  36326. procedure TUART1B_U4STA.setUTXISEL0(thebits : TBits_1); inline;
  36327. begin
  36328. if thebits = 0 then
  36329. pTDefRegMap(@Self)^.clr := $00004000
  36330. else
  36331. pTDefRegMap(@Self)^.&set := $00004000;
  36332. end;
  36333. function TUART1B_U4STA.getUTXISEL0 : TBits_1; inline;
  36334. begin
  36335. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  36336. end;
  36337. procedure TUART1B_U4STA.setUTXISEL1; inline;
  36338. begin
  36339. pTDefRegMap(@Self)^.&set := $00008000;
  36340. end;
  36341. procedure TUART1B_U4STA.clearUTXISEL1; inline;
  36342. begin
  36343. pTDefRegMap(@Self)^.clr := $00008000;
  36344. end;
  36345. procedure TUART1B_U4STA.setUTXISEL1(thebits : TBits_1); inline;
  36346. begin
  36347. if thebits = 0 then
  36348. pTDefRegMap(@Self)^.clr := $00008000
  36349. else
  36350. pTDefRegMap(@Self)^.&set := $00008000;
  36351. end;
  36352. function TUART1B_U4STA.getUTXISEL1 : TBits_1; inline;
  36353. begin
  36354. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36355. end;
  36356. procedure TUART1B_U4STA.setUTXSEL(thebits : TBits_2); inline;
  36357. begin
  36358. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  36359. end;
  36360. function TUART1B_U4STA.getUTXSEL : TBits_2; inline;
  36361. begin
  36362. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  36363. end;
  36364. procedure TUART1B_U4STA.setw(thebits : TBits_32); inline;
  36365. begin
  36366. pTDefRegMap(@Self)^.val := thebits;
  36367. end;
  36368. function TUART1B_U4STA.getw : TBits_32; inline;
  36369. begin
  36370. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36371. end;
  36372. procedure TUART2A_U2AMODE.setSTSEL; inline;
  36373. begin
  36374. pTDefRegMap(@Self)^.&set := $00000001;
  36375. end;
  36376. procedure TUART2A_U2AMODE.clearSTSEL; inline;
  36377. begin
  36378. pTDefRegMap(@Self)^.clr := $00000001;
  36379. end;
  36380. procedure TUART2A_U2AMODE.setSTSEL(thebits : TBits_1); inline;
  36381. begin
  36382. if thebits = 0 then
  36383. pTDefRegMap(@Self)^.clr := $00000001
  36384. else
  36385. pTDefRegMap(@Self)^.&set := $00000001;
  36386. end;
  36387. function TUART2A_U2AMODE.getSTSEL : TBits_1; inline;
  36388. begin
  36389. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36390. end;
  36391. procedure TUART2A_U2AMODE.setPDSEL(thebits : TBits_2); inline;
  36392. begin
  36393. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  36394. end;
  36395. function TUART2A_U2AMODE.getPDSEL : TBits_2; inline;
  36396. begin
  36397. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  36398. end;
  36399. procedure TUART2A_U2AMODE.setBRGH; inline;
  36400. begin
  36401. pTDefRegMap(@Self)^.&set := $00000008;
  36402. end;
  36403. procedure TUART2A_U2AMODE.clearBRGH; inline;
  36404. begin
  36405. pTDefRegMap(@Self)^.clr := $00000008;
  36406. end;
  36407. procedure TUART2A_U2AMODE.setBRGH(thebits : TBits_1); inline;
  36408. begin
  36409. if thebits = 0 then
  36410. pTDefRegMap(@Self)^.clr := $00000008
  36411. else
  36412. pTDefRegMap(@Self)^.&set := $00000008;
  36413. end;
  36414. function TUART2A_U2AMODE.getBRGH : TBits_1; inline;
  36415. begin
  36416. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36417. end;
  36418. procedure TUART2A_U2AMODE.setRXINV; inline;
  36419. begin
  36420. pTDefRegMap(@Self)^.&set := $00000010;
  36421. end;
  36422. procedure TUART2A_U2AMODE.clearRXINV; inline;
  36423. begin
  36424. pTDefRegMap(@Self)^.clr := $00000010;
  36425. end;
  36426. procedure TUART2A_U2AMODE.setRXINV(thebits : TBits_1); inline;
  36427. begin
  36428. if thebits = 0 then
  36429. pTDefRegMap(@Self)^.clr := $00000010
  36430. else
  36431. pTDefRegMap(@Self)^.&set := $00000010;
  36432. end;
  36433. function TUART2A_U2AMODE.getRXINV : TBits_1; inline;
  36434. begin
  36435. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36436. end;
  36437. procedure TUART2A_U2AMODE.setABAUD; inline;
  36438. begin
  36439. pTDefRegMap(@Self)^.&set := $00000020;
  36440. end;
  36441. procedure TUART2A_U2AMODE.clearABAUD; inline;
  36442. begin
  36443. pTDefRegMap(@Self)^.clr := $00000020;
  36444. end;
  36445. procedure TUART2A_U2AMODE.setABAUD(thebits : TBits_1); inline;
  36446. begin
  36447. if thebits = 0 then
  36448. pTDefRegMap(@Self)^.clr := $00000020
  36449. else
  36450. pTDefRegMap(@Self)^.&set := $00000020;
  36451. end;
  36452. function TUART2A_U2AMODE.getABAUD : TBits_1; inline;
  36453. begin
  36454. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36455. end;
  36456. procedure TUART2A_U2AMODE.setLPBACK; inline;
  36457. begin
  36458. pTDefRegMap(@Self)^.&set := $00000040;
  36459. end;
  36460. procedure TUART2A_U2AMODE.clearLPBACK; inline;
  36461. begin
  36462. pTDefRegMap(@Self)^.clr := $00000040;
  36463. end;
  36464. procedure TUART2A_U2AMODE.setLPBACK(thebits : TBits_1); inline;
  36465. begin
  36466. if thebits = 0 then
  36467. pTDefRegMap(@Self)^.clr := $00000040
  36468. else
  36469. pTDefRegMap(@Self)^.&set := $00000040;
  36470. end;
  36471. function TUART2A_U2AMODE.getLPBACK : TBits_1; inline;
  36472. begin
  36473. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36474. end;
  36475. procedure TUART2A_U2AMODE.setWAKE; inline;
  36476. begin
  36477. pTDefRegMap(@Self)^.&set := $00000080;
  36478. end;
  36479. procedure TUART2A_U2AMODE.clearWAKE; inline;
  36480. begin
  36481. pTDefRegMap(@Self)^.clr := $00000080;
  36482. end;
  36483. procedure TUART2A_U2AMODE.setWAKE(thebits : TBits_1); inline;
  36484. begin
  36485. if thebits = 0 then
  36486. pTDefRegMap(@Self)^.clr := $00000080
  36487. else
  36488. pTDefRegMap(@Self)^.&set := $00000080;
  36489. end;
  36490. function TUART2A_U2AMODE.getWAKE : TBits_1; inline;
  36491. begin
  36492. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36493. end;
  36494. procedure TUART2A_U2AMODE.setUEN(thebits : TBits_2); inline;
  36495. begin
  36496. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  36497. end;
  36498. function TUART2A_U2AMODE.getUEN : TBits_2; inline;
  36499. begin
  36500. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  36501. end;
  36502. procedure TUART2A_U2AMODE.setRTSMD; inline;
  36503. begin
  36504. pTDefRegMap(@Self)^.&set := $00000800;
  36505. end;
  36506. procedure TUART2A_U2AMODE.clearRTSMD; inline;
  36507. begin
  36508. pTDefRegMap(@Self)^.clr := $00000800;
  36509. end;
  36510. procedure TUART2A_U2AMODE.setRTSMD(thebits : TBits_1); inline;
  36511. begin
  36512. if thebits = 0 then
  36513. pTDefRegMap(@Self)^.clr := $00000800
  36514. else
  36515. pTDefRegMap(@Self)^.&set := $00000800;
  36516. end;
  36517. function TUART2A_U2AMODE.getRTSMD : TBits_1; inline;
  36518. begin
  36519. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  36520. end;
  36521. procedure TUART2A_U2AMODE.setIREN; inline;
  36522. begin
  36523. pTDefRegMap(@Self)^.&set := $00001000;
  36524. end;
  36525. procedure TUART2A_U2AMODE.clearIREN; inline;
  36526. begin
  36527. pTDefRegMap(@Self)^.clr := $00001000;
  36528. end;
  36529. procedure TUART2A_U2AMODE.setIREN(thebits : TBits_1); inline;
  36530. begin
  36531. if thebits = 0 then
  36532. pTDefRegMap(@Self)^.clr := $00001000
  36533. else
  36534. pTDefRegMap(@Self)^.&set := $00001000;
  36535. end;
  36536. function TUART2A_U2AMODE.getIREN : TBits_1; inline;
  36537. begin
  36538. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  36539. end;
  36540. procedure TUART2A_U2AMODE.setSIDL; inline;
  36541. begin
  36542. pTDefRegMap(@Self)^.&set := $00002000;
  36543. end;
  36544. procedure TUART2A_U2AMODE.clearSIDL; inline;
  36545. begin
  36546. pTDefRegMap(@Self)^.clr := $00002000;
  36547. end;
  36548. procedure TUART2A_U2AMODE.setSIDL(thebits : TBits_1); inline;
  36549. begin
  36550. if thebits = 0 then
  36551. pTDefRegMap(@Self)^.clr := $00002000
  36552. else
  36553. pTDefRegMap(@Self)^.&set := $00002000;
  36554. end;
  36555. function TUART2A_U2AMODE.getSIDL : TBits_1; inline;
  36556. begin
  36557. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36558. end;
  36559. procedure TUART2A_U2AMODE.setON; inline;
  36560. begin
  36561. pTDefRegMap(@Self)^.&set := $00008000;
  36562. end;
  36563. procedure TUART2A_U2AMODE.clearON; inline;
  36564. begin
  36565. pTDefRegMap(@Self)^.clr := $00008000;
  36566. end;
  36567. procedure TUART2A_U2AMODE.setON(thebits : TBits_1); inline;
  36568. begin
  36569. if thebits = 0 then
  36570. pTDefRegMap(@Self)^.clr := $00008000
  36571. else
  36572. pTDefRegMap(@Self)^.&set := $00008000;
  36573. end;
  36574. function TUART2A_U2AMODE.getON : TBits_1; inline;
  36575. begin
  36576. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36577. end;
  36578. procedure TUART2A_U2AMODE.setPDSEL0; inline;
  36579. begin
  36580. pTDefRegMap(@Self)^.&set := $00000002;
  36581. end;
  36582. procedure TUART2A_U2AMODE.clearPDSEL0; inline;
  36583. begin
  36584. pTDefRegMap(@Self)^.clr := $00000002;
  36585. end;
  36586. procedure TUART2A_U2AMODE.setPDSEL0(thebits : TBits_1); inline;
  36587. begin
  36588. if thebits = 0 then
  36589. pTDefRegMap(@Self)^.clr := $00000002
  36590. else
  36591. pTDefRegMap(@Self)^.&set := $00000002;
  36592. end;
  36593. function TUART2A_U2AMODE.getPDSEL0 : TBits_1; inline;
  36594. begin
  36595. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36596. end;
  36597. procedure TUART2A_U2AMODE.setPDSEL1; inline;
  36598. begin
  36599. pTDefRegMap(@Self)^.&set := $00000004;
  36600. end;
  36601. procedure TUART2A_U2AMODE.clearPDSEL1; inline;
  36602. begin
  36603. pTDefRegMap(@Self)^.clr := $00000004;
  36604. end;
  36605. procedure TUART2A_U2AMODE.setPDSEL1(thebits : TBits_1); inline;
  36606. begin
  36607. if thebits = 0 then
  36608. pTDefRegMap(@Self)^.clr := $00000004
  36609. else
  36610. pTDefRegMap(@Self)^.&set := $00000004;
  36611. end;
  36612. function TUART2A_U2AMODE.getPDSEL1 : TBits_1; inline;
  36613. begin
  36614. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36615. end;
  36616. procedure TUART2A_U2AMODE.setUEN0; inline;
  36617. begin
  36618. pTDefRegMap(@Self)^.&set := $00000100;
  36619. end;
  36620. procedure TUART2A_U2AMODE.clearUEN0; inline;
  36621. begin
  36622. pTDefRegMap(@Self)^.clr := $00000100;
  36623. end;
  36624. procedure TUART2A_U2AMODE.setUEN0(thebits : TBits_1); inline;
  36625. begin
  36626. if thebits = 0 then
  36627. pTDefRegMap(@Self)^.clr := $00000100
  36628. else
  36629. pTDefRegMap(@Self)^.&set := $00000100;
  36630. end;
  36631. function TUART2A_U2AMODE.getUEN0 : TBits_1; inline;
  36632. begin
  36633. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36634. end;
  36635. procedure TUART2A_U2AMODE.setUEN1; inline;
  36636. begin
  36637. pTDefRegMap(@Self)^.&set := $00000200;
  36638. end;
  36639. procedure TUART2A_U2AMODE.clearUEN1; inline;
  36640. begin
  36641. pTDefRegMap(@Self)^.clr := $00000200;
  36642. end;
  36643. procedure TUART2A_U2AMODE.setUEN1(thebits : TBits_1); inline;
  36644. begin
  36645. if thebits = 0 then
  36646. pTDefRegMap(@Self)^.clr := $00000200
  36647. else
  36648. pTDefRegMap(@Self)^.&set := $00000200;
  36649. end;
  36650. function TUART2A_U2AMODE.getUEN1 : TBits_1; inline;
  36651. begin
  36652. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36653. end;
  36654. procedure TUART2A_U2AMODE.setUSIDL; inline;
  36655. begin
  36656. pTDefRegMap(@Self)^.&set := $00002000;
  36657. end;
  36658. procedure TUART2A_U2AMODE.clearUSIDL; inline;
  36659. begin
  36660. pTDefRegMap(@Self)^.clr := $00002000;
  36661. end;
  36662. procedure TUART2A_U2AMODE.setUSIDL(thebits : TBits_1); inline;
  36663. begin
  36664. if thebits = 0 then
  36665. pTDefRegMap(@Self)^.clr := $00002000
  36666. else
  36667. pTDefRegMap(@Self)^.&set := $00002000;
  36668. end;
  36669. function TUART2A_U2AMODE.getUSIDL : TBits_1; inline;
  36670. begin
  36671. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36672. end;
  36673. procedure TUART2A_U2AMODE.setUARTEN; inline;
  36674. begin
  36675. pTDefRegMap(@Self)^.&set := $00008000;
  36676. end;
  36677. procedure TUART2A_U2AMODE.clearUARTEN; inline;
  36678. begin
  36679. pTDefRegMap(@Self)^.clr := $00008000;
  36680. end;
  36681. procedure TUART2A_U2AMODE.setUARTEN(thebits : TBits_1); inline;
  36682. begin
  36683. if thebits = 0 then
  36684. pTDefRegMap(@Self)^.clr := $00008000
  36685. else
  36686. pTDefRegMap(@Self)^.&set := $00008000;
  36687. end;
  36688. function TUART2A_U2AMODE.getUARTEN : TBits_1; inline;
  36689. begin
  36690. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36691. end;
  36692. procedure TUART2A_U2AMODE.setw(thebits : TBits_32); inline;
  36693. begin
  36694. pTDefRegMap(@Self)^.val := thebits;
  36695. end;
  36696. function TUART2A_U2AMODE.getw : TBits_32; inline;
  36697. begin
  36698. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36699. end;
  36700. procedure TUART2A_U3MODE.setSTSEL; inline;
  36701. begin
  36702. pTDefRegMap(@Self)^.&set := $00000001;
  36703. end;
  36704. procedure TUART2A_U3MODE.clearSTSEL; inline;
  36705. begin
  36706. pTDefRegMap(@Self)^.clr := $00000001;
  36707. end;
  36708. procedure TUART2A_U3MODE.setSTSEL(thebits : TBits_1); inline;
  36709. begin
  36710. if thebits = 0 then
  36711. pTDefRegMap(@Self)^.clr := $00000001
  36712. else
  36713. pTDefRegMap(@Self)^.&set := $00000001;
  36714. end;
  36715. function TUART2A_U3MODE.getSTSEL : TBits_1; inline;
  36716. begin
  36717. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36718. end;
  36719. procedure TUART2A_U3MODE.setPDSEL(thebits : TBits_2); inline;
  36720. begin
  36721. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  36722. end;
  36723. function TUART2A_U3MODE.getPDSEL : TBits_2; inline;
  36724. begin
  36725. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  36726. end;
  36727. procedure TUART2A_U3MODE.setBRGH; inline;
  36728. begin
  36729. pTDefRegMap(@Self)^.&set := $00000008;
  36730. end;
  36731. procedure TUART2A_U3MODE.clearBRGH; inline;
  36732. begin
  36733. pTDefRegMap(@Self)^.clr := $00000008;
  36734. end;
  36735. procedure TUART2A_U3MODE.setBRGH(thebits : TBits_1); inline;
  36736. begin
  36737. if thebits = 0 then
  36738. pTDefRegMap(@Self)^.clr := $00000008
  36739. else
  36740. pTDefRegMap(@Self)^.&set := $00000008;
  36741. end;
  36742. function TUART2A_U3MODE.getBRGH : TBits_1; inline;
  36743. begin
  36744. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36745. end;
  36746. procedure TUART2A_U3MODE.setRXINV; inline;
  36747. begin
  36748. pTDefRegMap(@Self)^.&set := $00000010;
  36749. end;
  36750. procedure TUART2A_U3MODE.clearRXINV; inline;
  36751. begin
  36752. pTDefRegMap(@Self)^.clr := $00000010;
  36753. end;
  36754. procedure TUART2A_U3MODE.setRXINV(thebits : TBits_1); inline;
  36755. begin
  36756. if thebits = 0 then
  36757. pTDefRegMap(@Self)^.clr := $00000010
  36758. else
  36759. pTDefRegMap(@Self)^.&set := $00000010;
  36760. end;
  36761. function TUART2A_U3MODE.getRXINV : TBits_1; inline;
  36762. begin
  36763. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36764. end;
  36765. procedure TUART2A_U3MODE.setABAUD; inline;
  36766. begin
  36767. pTDefRegMap(@Self)^.&set := $00000020;
  36768. end;
  36769. procedure TUART2A_U3MODE.clearABAUD; inline;
  36770. begin
  36771. pTDefRegMap(@Self)^.clr := $00000020;
  36772. end;
  36773. procedure TUART2A_U3MODE.setABAUD(thebits : TBits_1); inline;
  36774. begin
  36775. if thebits = 0 then
  36776. pTDefRegMap(@Self)^.clr := $00000020
  36777. else
  36778. pTDefRegMap(@Self)^.&set := $00000020;
  36779. end;
  36780. function TUART2A_U3MODE.getABAUD : TBits_1; inline;
  36781. begin
  36782. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36783. end;
  36784. procedure TUART2A_U3MODE.setLPBACK; inline;
  36785. begin
  36786. pTDefRegMap(@Self)^.&set := $00000040;
  36787. end;
  36788. procedure TUART2A_U3MODE.clearLPBACK; inline;
  36789. begin
  36790. pTDefRegMap(@Self)^.clr := $00000040;
  36791. end;
  36792. procedure TUART2A_U3MODE.setLPBACK(thebits : TBits_1); inline;
  36793. begin
  36794. if thebits = 0 then
  36795. pTDefRegMap(@Self)^.clr := $00000040
  36796. else
  36797. pTDefRegMap(@Self)^.&set := $00000040;
  36798. end;
  36799. function TUART2A_U3MODE.getLPBACK : TBits_1; inline;
  36800. begin
  36801. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36802. end;
  36803. procedure TUART2A_U3MODE.setWAKE; inline;
  36804. begin
  36805. pTDefRegMap(@Self)^.&set := $00000080;
  36806. end;
  36807. procedure TUART2A_U3MODE.clearWAKE; inline;
  36808. begin
  36809. pTDefRegMap(@Self)^.clr := $00000080;
  36810. end;
  36811. procedure TUART2A_U3MODE.setWAKE(thebits : TBits_1); inline;
  36812. begin
  36813. if thebits = 0 then
  36814. pTDefRegMap(@Self)^.clr := $00000080
  36815. else
  36816. pTDefRegMap(@Self)^.&set := $00000080;
  36817. end;
  36818. function TUART2A_U3MODE.getWAKE : TBits_1; inline;
  36819. begin
  36820. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36821. end;
  36822. procedure TUART2A_U3MODE.setUEN(thebits : TBits_2); inline;
  36823. begin
  36824. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  36825. end;
  36826. function TUART2A_U3MODE.getUEN : TBits_2; inline;
  36827. begin
  36828. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  36829. end;
  36830. procedure TUART2A_U3MODE.setRTSMD; inline;
  36831. begin
  36832. pTDefRegMap(@Self)^.&set := $00000800;
  36833. end;
  36834. procedure TUART2A_U3MODE.clearRTSMD; inline;
  36835. begin
  36836. pTDefRegMap(@Self)^.clr := $00000800;
  36837. end;
  36838. procedure TUART2A_U3MODE.setRTSMD(thebits : TBits_1); inline;
  36839. begin
  36840. if thebits = 0 then
  36841. pTDefRegMap(@Self)^.clr := $00000800
  36842. else
  36843. pTDefRegMap(@Self)^.&set := $00000800;
  36844. end;
  36845. function TUART2A_U3MODE.getRTSMD : TBits_1; inline;
  36846. begin
  36847. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  36848. end;
  36849. procedure TUART2A_U3MODE.setIREN; inline;
  36850. begin
  36851. pTDefRegMap(@Self)^.&set := $00001000;
  36852. end;
  36853. procedure TUART2A_U3MODE.clearIREN; inline;
  36854. begin
  36855. pTDefRegMap(@Self)^.clr := $00001000;
  36856. end;
  36857. procedure TUART2A_U3MODE.setIREN(thebits : TBits_1); inline;
  36858. begin
  36859. if thebits = 0 then
  36860. pTDefRegMap(@Self)^.clr := $00001000
  36861. else
  36862. pTDefRegMap(@Self)^.&set := $00001000;
  36863. end;
  36864. function TUART2A_U3MODE.getIREN : TBits_1; inline;
  36865. begin
  36866. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  36867. end;
  36868. procedure TUART2A_U3MODE.setSIDL; inline;
  36869. begin
  36870. pTDefRegMap(@Self)^.&set := $00002000;
  36871. end;
  36872. procedure TUART2A_U3MODE.clearSIDL; inline;
  36873. begin
  36874. pTDefRegMap(@Self)^.clr := $00002000;
  36875. end;
  36876. procedure TUART2A_U3MODE.setSIDL(thebits : TBits_1); inline;
  36877. begin
  36878. if thebits = 0 then
  36879. pTDefRegMap(@Self)^.clr := $00002000
  36880. else
  36881. pTDefRegMap(@Self)^.&set := $00002000;
  36882. end;
  36883. function TUART2A_U3MODE.getSIDL : TBits_1; inline;
  36884. begin
  36885. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36886. end;
  36887. procedure TUART2A_U3MODE.setON; inline;
  36888. begin
  36889. pTDefRegMap(@Self)^.&set := $00008000;
  36890. end;
  36891. procedure TUART2A_U3MODE.clearON; inline;
  36892. begin
  36893. pTDefRegMap(@Self)^.clr := $00008000;
  36894. end;
  36895. procedure TUART2A_U3MODE.setON(thebits : TBits_1); inline;
  36896. begin
  36897. if thebits = 0 then
  36898. pTDefRegMap(@Self)^.clr := $00008000
  36899. else
  36900. pTDefRegMap(@Self)^.&set := $00008000;
  36901. end;
  36902. function TUART2A_U3MODE.getON : TBits_1; inline;
  36903. begin
  36904. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36905. end;
  36906. procedure TUART2A_U3MODE.setPDSEL0; inline;
  36907. begin
  36908. pTDefRegMap(@Self)^.&set := $00000002;
  36909. end;
  36910. procedure TUART2A_U3MODE.clearPDSEL0; inline;
  36911. begin
  36912. pTDefRegMap(@Self)^.clr := $00000002;
  36913. end;
  36914. procedure TUART2A_U3MODE.setPDSEL0(thebits : TBits_1); inline;
  36915. begin
  36916. if thebits = 0 then
  36917. pTDefRegMap(@Self)^.clr := $00000002
  36918. else
  36919. pTDefRegMap(@Self)^.&set := $00000002;
  36920. end;
  36921. function TUART2A_U3MODE.getPDSEL0 : TBits_1; inline;
  36922. begin
  36923. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36924. end;
  36925. procedure TUART2A_U3MODE.setPDSEL1; inline;
  36926. begin
  36927. pTDefRegMap(@Self)^.&set := $00000004;
  36928. end;
  36929. procedure TUART2A_U3MODE.clearPDSEL1; inline;
  36930. begin
  36931. pTDefRegMap(@Self)^.clr := $00000004;
  36932. end;
  36933. procedure TUART2A_U3MODE.setPDSEL1(thebits : TBits_1); inline;
  36934. begin
  36935. if thebits = 0 then
  36936. pTDefRegMap(@Self)^.clr := $00000004
  36937. else
  36938. pTDefRegMap(@Self)^.&set := $00000004;
  36939. end;
  36940. function TUART2A_U3MODE.getPDSEL1 : TBits_1; inline;
  36941. begin
  36942. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36943. end;
  36944. procedure TUART2A_U3MODE.setUEN0; inline;
  36945. begin
  36946. pTDefRegMap(@Self)^.&set := $00000100;
  36947. end;
  36948. procedure TUART2A_U3MODE.clearUEN0; inline;
  36949. begin
  36950. pTDefRegMap(@Self)^.clr := $00000100;
  36951. end;
  36952. procedure TUART2A_U3MODE.setUEN0(thebits : TBits_1); inline;
  36953. begin
  36954. if thebits = 0 then
  36955. pTDefRegMap(@Self)^.clr := $00000100
  36956. else
  36957. pTDefRegMap(@Self)^.&set := $00000100;
  36958. end;
  36959. function TUART2A_U3MODE.getUEN0 : TBits_1; inline;
  36960. begin
  36961. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36962. end;
  36963. procedure TUART2A_U3MODE.setUEN1; inline;
  36964. begin
  36965. pTDefRegMap(@Self)^.&set := $00000200;
  36966. end;
  36967. procedure TUART2A_U3MODE.clearUEN1; inline;
  36968. begin
  36969. pTDefRegMap(@Self)^.clr := $00000200;
  36970. end;
  36971. procedure TUART2A_U3MODE.setUEN1(thebits : TBits_1); inline;
  36972. begin
  36973. if thebits = 0 then
  36974. pTDefRegMap(@Self)^.clr := $00000200
  36975. else
  36976. pTDefRegMap(@Self)^.&set := $00000200;
  36977. end;
  36978. function TUART2A_U3MODE.getUEN1 : TBits_1; inline;
  36979. begin
  36980. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36981. end;
  36982. procedure TUART2A_U3MODE.setUSIDL; inline;
  36983. begin
  36984. pTDefRegMap(@Self)^.&set := $00002000;
  36985. end;
  36986. procedure TUART2A_U3MODE.clearUSIDL; inline;
  36987. begin
  36988. pTDefRegMap(@Self)^.clr := $00002000;
  36989. end;
  36990. procedure TUART2A_U3MODE.setUSIDL(thebits : TBits_1); inline;
  36991. begin
  36992. if thebits = 0 then
  36993. pTDefRegMap(@Self)^.clr := $00002000
  36994. else
  36995. pTDefRegMap(@Self)^.&set := $00002000;
  36996. end;
  36997. function TUART2A_U3MODE.getUSIDL : TBits_1; inline;
  36998. begin
  36999. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37000. end;
  37001. procedure TUART2A_U3MODE.setUARTEN; inline;
  37002. begin
  37003. pTDefRegMap(@Self)^.&set := $00008000;
  37004. end;
  37005. procedure TUART2A_U3MODE.clearUARTEN; inline;
  37006. begin
  37007. pTDefRegMap(@Self)^.clr := $00008000;
  37008. end;
  37009. procedure TUART2A_U3MODE.setUARTEN(thebits : TBits_1); inline;
  37010. begin
  37011. if thebits = 0 then
  37012. pTDefRegMap(@Self)^.clr := $00008000
  37013. else
  37014. pTDefRegMap(@Self)^.&set := $00008000;
  37015. end;
  37016. function TUART2A_U3MODE.getUARTEN : TBits_1; inline;
  37017. begin
  37018. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37019. end;
  37020. procedure TUART2A_U3MODE.setw(thebits : TBits_32); inline;
  37021. begin
  37022. pTDefRegMap(@Self)^.val := thebits;
  37023. end;
  37024. function TUART2A_U3MODE.getw : TBits_32; inline;
  37025. begin
  37026. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37027. end;
  37028. procedure TUART2A_U2ASTA.setURXDA; inline;
  37029. begin
  37030. pTDefRegMap(@Self)^.&set := $00000001;
  37031. end;
  37032. procedure TUART2A_U2ASTA.clearURXDA; inline;
  37033. begin
  37034. pTDefRegMap(@Self)^.clr := $00000001;
  37035. end;
  37036. procedure TUART2A_U2ASTA.setURXDA(thebits : TBits_1); inline;
  37037. begin
  37038. if thebits = 0 then
  37039. pTDefRegMap(@Self)^.clr := $00000001
  37040. else
  37041. pTDefRegMap(@Self)^.&set := $00000001;
  37042. end;
  37043. function TUART2A_U2ASTA.getURXDA : TBits_1; inline;
  37044. begin
  37045. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37046. end;
  37047. procedure TUART2A_U2ASTA.setOERR; inline;
  37048. begin
  37049. pTDefRegMap(@Self)^.&set := $00000002;
  37050. end;
  37051. procedure TUART2A_U2ASTA.clearOERR; inline;
  37052. begin
  37053. pTDefRegMap(@Self)^.clr := $00000002;
  37054. end;
  37055. procedure TUART2A_U2ASTA.setOERR(thebits : TBits_1); inline;
  37056. begin
  37057. if thebits = 0 then
  37058. pTDefRegMap(@Self)^.clr := $00000002
  37059. else
  37060. pTDefRegMap(@Self)^.&set := $00000002;
  37061. end;
  37062. function TUART2A_U2ASTA.getOERR : TBits_1; inline;
  37063. begin
  37064. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37065. end;
  37066. procedure TUART2A_U2ASTA.setFERR; inline;
  37067. begin
  37068. pTDefRegMap(@Self)^.&set := $00000004;
  37069. end;
  37070. procedure TUART2A_U2ASTA.clearFERR; inline;
  37071. begin
  37072. pTDefRegMap(@Self)^.clr := $00000004;
  37073. end;
  37074. procedure TUART2A_U2ASTA.setFERR(thebits : TBits_1); inline;
  37075. begin
  37076. if thebits = 0 then
  37077. pTDefRegMap(@Self)^.clr := $00000004
  37078. else
  37079. pTDefRegMap(@Self)^.&set := $00000004;
  37080. end;
  37081. function TUART2A_U2ASTA.getFERR : TBits_1; inline;
  37082. begin
  37083. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37084. end;
  37085. procedure TUART2A_U2ASTA.setPERR; inline;
  37086. begin
  37087. pTDefRegMap(@Self)^.&set := $00000008;
  37088. end;
  37089. procedure TUART2A_U2ASTA.clearPERR; inline;
  37090. begin
  37091. pTDefRegMap(@Self)^.clr := $00000008;
  37092. end;
  37093. procedure TUART2A_U2ASTA.setPERR(thebits : TBits_1); inline;
  37094. begin
  37095. if thebits = 0 then
  37096. pTDefRegMap(@Self)^.clr := $00000008
  37097. else
  37098. pTDefRegMap(@Self)^.&set := $00000008;
  37099. end;
  37100. function TUART2A_U2ASTA.getPERR : TBits_1; inline;
  37101. begin
  37102. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37103. end;
  37104. procedure TUART2A_U2ASTA.setRIDLE; inline;
  37105. begin
  37106. pTDefRegMap(@Self)^.&set := $00000010;
  37107. end;
  37108. procedure TUART2A_U2ASTA.clearRIDLE; inline;
  37109. begin
  37110. pTDefRegMap(@Self)^.clr := $00000010;
  37111. end;
  37112. procedure TUART2A_U2ASTA.setRIDLE(thebits : TBits_1); inline;
  37113. begin
  37114. if thebits = 0 then
  37115. pTDefRegMap(@Self)^.clr := $00000010
  37116. else
  37117. pTDefRegMap(@Self)^.&set := $00000010;
  37118. end;
  37119. function TUART2A_U2ASTA.getRIDLE : TBits_1; inline;
  37120. begin
  37121. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37122. end;
  37123. procedure TUART2A_U2ASTA.setADDEN; inline;
  37124. begin
  37125. pTDefRegMap(@Self)^.&set := $00000020;
  37126. end;
  37127. procedure TUART2A_U2ASTA.clearADDEN; inline;
  37128. begin
  37129. pTDefRegMap(@Self)^.clr := $00000020;
  37130. end;
  37131. procedure TUART2A_U2ASTA.setADDEN(thebits : TBits_1); inline;
  37132. begin
  37133. if thebits = 0 then
  37134. pTDefRegMap(@Self)^.clr := $00000020
  37135. else
  37136. pTDefRegMap(@Self)^.&set := $00000020;
  37137. end;
  37138. function TUART2A_U2ASTA.getADDEN : TBits_1; inline;
  37139. begin
  37140. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37141. end;
  37142. procedure TUART2A_U2ASTA.setURXISEL(thebits : TBits_2); inline;
  37143. begin
  37144. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  37145. end;
  37146. function TUART2A_U2ASTA.getURXISEL : TBits_2; inline;
  37147. begin
  37148. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  37149. end;
  37150. procedure TUART2A_U2ASTA.setTRMT; inline;
  37151. begin
  37152. pTDefRegMap(@Self)^.&set := $00000100;
  37153. end;
  37154. procedure TUART2A_U2ASTA.clearTRMT; inline;
  37155. begin
  37156. pTDefRegMap(@Self)^.clr := $00000100;
  37157. end;
  37158. procedure TUART2A_U2ASTA.setTRMT(thebits : TBits_1); inline;
  37159. begin
  37160. if thebits = 0 then
  37161. pTDefRegMap(@Self)^.clr := $00000100
  37162. else
  37163. pTDefRegMap(@Self)^.&set := $00000100;
  37164. end;
  37165. function TUART2A_U2ASTA.getTRMT : TBits_1; inline;
  37166. begin
  37167. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37168. end;
  37169. procedure TUART2A_U2ASTA.setUTXBF; inline;
  37170. begin
  37171. pTDefRegMap(@Self)^.&set := $00000200;
  37172. end;
  37173. procedure TUART2A_U2ASTA.clearUTXBF; inline;
  37174. begin
  37175. pTDefRegMap(@Self)^.clr := $00000200;
  37176. end;
  37177. procedure TUART2A_U2ASTA.setUTXBF(thebits : TBits_1); inline;
  37178. begin
  37179. if thebits = 0 then
  37180. pTDefRegMap(@Self)^.clr := $00000200
  37181. else
  37182. pTDefRegMap(@Self)^.&set := $00000200;
  37183. end;
  37184. function TUART2A_U2ASTA.getUTXBF : TBits_1; inline;
  37185. begin
  37186. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37187. end;
  37188. procedure TUART2A_U2ASTA.setUTXEN; inline;
  37189. begin
  37190. pTDefRegMap(@Self)^.&set := $00000400;
  37191. end;
  37192. procedure TUART2A_U2ASTA.clearUTXEN; inline;
  37193. begin
  37194. pTDefRegMap(@Self)^.clr := $00000400;
  37195. end;
  37196. procedure TUART2A_U2ASTA.setUTXEN(thebits : TBits_1); inline;
  37197. begin
  37198. if thebits = 0 then
  37199. pTDefRegMap(@Self)^.clr := $00000400
  37200. else
  37201. pTDefRegMap(@Self)^.&set := $00000400;
  37202. end;
  37203. function TUART2A_U2ASTA.getUTXEN : TBits_1; inline;
  37204. begin
  37205. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  37206. end;
  37207. procedure TUART2A_U2ASTA.setUTXBRK; inline;
  37208. begin
  37209. pTDefRegMap(@Self)^.&set := $00000800;
  37210. end;
  37211. procedure TUART2A_U2ASTA.clearUTXBRK; inline;
  37212. begin
  37213. pTDefRegMap(@Self)^.clr := $00000800;
  37214. end;
  37215. procedure TUART2A_U2ASTA.setUTXBRK(thebits : TBits_1); inline;
  37216. begin
  37217. if thebits = 0 then
  37218. pTDefRegMap(@Self)^.clr := $00000800
  37219. else
  37220. pTDefRegMap(@Self)^.&set := $00000800;
  37221. end;
  37222. function TUART2A_U2ASTA.getUTXBRK : TBits_1; inline;
  37223. begin
  37224. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37225. end;
  37226. procedure TUART2A_U2ASTA.setURXEN; inline;
  37227. begin
  37228. pTDefRegMap(@Self)^.&set := $00001000;
  37229. end;
  37230. procedure TUART2A_U2ASTA.clearURXEN; inline;
  37231. begin
  37232. pTDefRegMap(@Self)^.clr := $00001000;
  37233. end;
  37234. procedure TUART2A_U2ASTA.setURXEN(thebits : TBits_1); inline;
  37235. begin
  37236. if thebits = 0 then
  37237. pTDefRegMap(@Self)^.clr := $00001000
  37238. else
  37239. pTDefRegMap(@Self)^.&set := $00001000;
  37240. end;
  37241. function TUART2A_U2ASTA.getURXEN : TBits_1; inline;
  37242. begin
  37243. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37244. end;
  37245. procedure TUART2A_U2ASTA.setUTXINV; inline;
  37246. begin
  37247. pTDefRegMap(@Self)^.&set := $00002000;
  37248. end;
  37249. procedure TUART2A_U2ASTA.clearUTXINV; inline;
  37250. begin
  37251. pTDefRegMap(@Self)^.clr := $00002000;
  37252. end;
  37253. procedure TUART2A_U2ASTA.setUTXINV(thebits : TBits_1); inline;
  37254. begin
  37255. if thebits = 0 then
  37256. pTDefRegMap(@Self)^.clr := $00002000
  37257. else
  37258. pTDefRegMap(@Self)^.&set := $00002000;
  37259. end;
  37260. function TUART2A_U2ASTA.getUTXINV : TBits_1; inline;
  37261. begin
  37262. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37263. end;
  37264. procedure TUART2A_U2ASTA.setUTXISEL(thebits : TBits_2); inline;
  37265. begin
  37266. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  37267. end;
  37268. function TUART2A_U2ASTA.getUTXISEL : TBits_2; inline;
  37269. begin
  37270. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  37271. end;
  37272. procedure TUART2A_U2ASTA.setADDR(thebits : TBits_8); inline;
  37273. begin
  37274. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  37275. end;
  37276. function TUART2A_U2ASTA.getADDR : TBits_8; inline;
  37277. begin
  37278. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  37279. end;
  37280. procedure TUART2A_U2ASTA.setADM_EN; inline;
  37281. begin
  37282. pTDefRegMap(@Self)^.&set := $01000000;
  37283. end;
  37284. procedure TUART2A_U2ASTA.clearADM_EN; inline;
  37285. begin
  37286. pTDefRegMap(@Self)^.clr := $01000000;
  37287. end;
  37288. procedure TUART2A_U2ASTA.setADM_EN(thebits : TBits_1); inline;
  37289. begin
  37290. if thebits = 0 then
  37291. pTDefRegMap(@Self)^.clr := $01000000
  37292. else
  37293. pTDefRegMap(@Self)^.&set := $01000000;
  37294. end;
  37295. function TUART2A_U2ASTA.getADM_EN : TBits_1; inline;
  37296. begin
  37297. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  37298. end;
  37299. procedure TUART2A_U2ASTA.setURXISEL0; inline;
  37300. begin
  37301. pTDefRegMap(@Self)^.&set := $00000040;
  37302. end;
  37303. procedure TUART2A_U2ASTA.clearURXISEL0; inline;
  37304. begin
  37305. pTDefRegMap(@Self)^.clr := $00000040;
  37306. end;
  37307. procedure TUART2A_U2ASTA.setURXISEL0(thebits : TBits_1); inline;
  37308. begin
  37309. if thebits = 0 then
  37310. pTDefRegMap(@Self)^.clr := $00000040
  37311. else
  37312. pTDefRegMap(@Self)^.&set := $00000040;
  37313. end;
  37314. function TUART2A_U2ASTA.getURXISEL0 : TBits_1; inline;
  37315. begin
  37316. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37317. end;
  37318. procedure TUART2A_U2ASTA.setURXISEL1; inline;
  37319. begin
  37320. pTDefRegMap(@Self)^.&set := $00000080;
  37321. end;
  37322. procedure TUART2A_U2ASTA.clearURXISEL1; inline;
  37323. begin
  37324. pTDefRegMap(@Self)^.clr := $00000080;
  37325. end;
  37326. procedure TUART2A_U2ASTA.setURXISEL1(thebits : TBits_1); inline;
  37327. begin
  37328. if thebits = 0 then
  37329. pTDefRegMap(@Self)^.clr := $00000080
  37330. else
  37331. pTDefRegMap(@Self)^.&set := $00000080;
  37332. end;
  37333. function TUART2A_U2ASTA.getURXISEL1 : TBits_1; inline;
  37334. begin
  37335. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37336. end;
  37337. procedure TUART2A_U2ASTA.setUTXISEL0; inline;
  37338. begin
  37339. pTDefRegMap(@Self)^.&set := $00004000;
  37340. end;
  37341. procedure TUART2A_U2ASTA.clearUTXISEL0; inline;
  37342. begin
  37343. pTDefRegMap(@Self)^.clr := $00004000;
  37344. end;
  37345. procedure TUART2A_U2ASTA.setUTXISEL0(thebits : TBits_1); inline;
  37346. begin
  37347. if thebits = 0 then
  37348. pTDefRegMap(@Self)^.clr := $00004000
  37349. else
  37350. pTDefRegMap(@Self)^.&set := $00004000;
  37351. end;
  37352. function TUART2A_U2ASTA.getUTXISEL0 : TBits_1; inline;
  37353. begin
  37354. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  37355. end;
  37356. procedure TUART2A_U2ASTA.setUTXISEL1; inline;
  37357. begin
  37358. pTDefRegMap(@Self)^.&set := $00008000;
  37359. end;
  37360. procedure TUART2A_U2ASTA.clearUTXISEL1; inline;
  37361. begin
  37362. pTDefRegMap(@Self)^.clr := $00008000;
  37363. end;
  37364. procedure TUART2A_U2ASTA.setUTXISEL1(thebits : TBits_1); inline;
  37365. begin
  37366. if thebits = 0 then
  37367. pTDefRegMap(@Self)^.clr := $00008000
  37368. else
  37369. pTDefRegMap(@Self)^.&set := $00008000;
  37370. end;
  37371. function TUART2A_U2ASTA.getUTXISEL1 : TBits_1; inline;
  37372. begin
  37373. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37374. end;
  37375. procedure TUART2A_U2ASTA.setUTXSEL(thebits : TBits_2); inline;
  37376. begin
  37377. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  37378. end;
  37379. function TUART2A_U2ASTA.getUTXSEL : TBits_2; inline;
  37380. begin
  37381. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  37382. end;
  37383. procedure TUART2A_U2ASTA.setw(thebits : TBits_32); inline;
  37384. begin
  37385. pTDefRegMap(@Self)^.val := thebits;
  37386. end;
  37387. function TUART2A_U2ASTA.getw : TBits_32; inline;
  37388. begin
  37389. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37390. end;
  37391. procedure TUART2A_U3STA.setURXDA; inline;
  37392. begin
  37393. pTDefRegMap(@Self)^.&set := $00000001;
  37394. end;
  37395. procedure TUART2A_U3STA.clearURXDA; inline;
  37396. begin
  37397. pTDefRegMap(@Self)^.clr := $00000001;
  37398. end;
  37399. procedure TUART2A_U3STA.setURXDA(thebits : TBits_1); inline;
  37400. begin
  37401. if thebits = 0 then
  37402. pTDefRegMap(@Self)^.clr := $00000001
  37403. else
  37404. pTDefRegMap(@Self)^.&set := $00000001;
  37405. end;
  37406. function TUART2A_U3STA.getURXDA : TBits_1; inline;
  37407. begin
  37408. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37409. end;
  37410. procedure TUART2A_U3STA.setOERR; inline;
  37411. begin
  37412. pTDefRegMap(@Self)^.&set := $00000002;
  37413. end;
  37414. procedure TUART2A_U3STA.clearOERR; inline;
  37415. begin
  37416. pTDefRegMap(@Self)^.clr := $00000002;
  37417. end;
  37418. procedure TUART2A_U3STA.setOERR(thebits : TBits_1); inline;
  37419. begin
  37420. if thebits = 0 then
  37421. pTDefRegMap(@Self)^.clr := $00000002
  37422. else
  37423. pTDefRegMap(@Self)^.&set := $00000002;
  37424. end;
  37425. function TUART2A_U3STA.getOERR : TBits_1; inline;
  37426. begin
  37427. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37428. end;
  37429. procedure TUART2A_U3STA.setFERR; inline;
  37430. begin
  37431. pTDefRegMap(@Self)^.&set := $00000004;
  37432. end;
  37433. procedure TUART2A_U3STA.clearFERR; inline;
  37434. begin
  37435. pTDefRegMap(@Self)^.clr := $00000004;
  37436. end;
  37437. procedure TUART2A_U3STA.setFERR(thebits : TBits_1); inline;
  37438. begin
  37439. if thebits = 0 then
  37440. pTDefRegMap(@Self)^.clr := $00000004
  37441. else
  37442. pTDefRegMap(@Self)^.&set := $00000004;
  37443. end;
  37444. function TUART2A_U3STA.getFERR : TBits_1; inline;
  37445. begin
  37446. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37447. end;
  37448. procedure TUART2A_U3STA.setPERR; inline;
  37449. begin
  37450. pTDefRegMap(@Self)^.&set := $00000008;
  37451. end;
  37452. procedure TUART2A_U3STA.clearPERR; inline;
  37453. begin
  37454. pTDefRegMap(@Self)^.clr := $00000008;
  37455. end;
  37456. procedure TUART2A_U3STA.setPERR(thebits : TBits_1); inline;
  37457. begin
  37458. if thebits = 0 then
  37459. pTDefRegMap(@Self)^.clr := $00000008
  37460. else
  37461. pTDefRegMap(@Self)^.&set := $00000008;
  37462. end;
  37463. function TUART2A_U3STA.getPERR : TBits_1; inline;
  37464. begin
  37465. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37466. end;
  37467. procedure TUART2A_U3STA.setRIDLE; inline;
  37468. begin
  37469. pTDefRegMap(@Self)^.&set := $00000010;
  37470. end;
  37471. procedure TUART2A_U3STA.clearRIDLE; inline;
  37472. begin
  37473. pTDefRegMap(@Self)^.clr := $00000010;
  37474. end;
  37475. procedure TUART2A_U3STA.setRIDLE(thebits : TBits_1); inline;
  37476. begin
  37477. if thebits = 0 then
  37478. pTDefRegMap(@Self)^.clr := $00000010
  37479. else
  37480. pTDefRegMap(@Self)^.&set := $00000010;
  37481. end;
  37482. function TUART2A_U3STA.getRIDLE : TBits_1; inline;
  37483. begin
  37484. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37485. end;
  37486. procedure TUART2A_U3STA.setADDEN; inline;
  37487. begin
  37488. pTDefRegMap(@Self)^.&set := $00000020;
  37489. end;
  37490. procedure TUART2A_U3STA.clearADDEN; inline;
  37491. begin
  37492. pTDefRegMap(@Self)^.clr := $00000020;
  37493. end;
  37494. procedure TUART2A_U3STA.setADDEN(thebits : TBits_1); inline;
  37495. begin
  37496. if thebits = 0 then
  37497. pTDefRegMap(@Self)^.clr := $00000020
  37498. else
  37499. pTDefRegMap(@Self)^.&set := $00000020;
  37500. end;
  37501. function TUART2A_U3STA.getADDEN : TBits_1; inline;
  37502. begin
  37503. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37504. end;
  37505. procedure TUART2A_U3STA.setURXISEL(thebits : TBits_2); inline;
  37506. begin
  37507. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  37508. end;
  37509. function TUART2A_U3STA.getURXISEL : TBits_2; inline;
  37510. begin
  37511. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  37512. end;
  37513. procedure TUART2A_U3STA.setTRMT; inline;
  37514. begin
  37515. pTDefRegMap(@Self)^.&set := $00000100;
  37516. end;
  37517. procedure TUART2A_U3STA.clearTRMT; inline;
  37518. begin
  37519. pTDefRegMap(@Self)^.clr := $00000100;
  37520. end;
  37521. procedure TUART2A_U3STA.setTRMT(thebits : TBits_1); inline;
  37522. begin
  37523. if thebits = 0 then
  37524. pTDefRegMap(@Self)^.clr := $00000100
  37525. else
  37526. pTDefRegMap(@Self)^.&set := $00000100;
  37527. end;
  37528. function TUART2A_U3STA.getTRMT : TBits_1; inline;
  37529. begin
  37530. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37531. end;
  37532. procedure TUART2A_U3STA.setUTXBF; inline;
  37533. begin
  37534. pTDefRegMap(@Self)^.&set := $00000200;
  37535. end;
  37536. procedure TUART2A_U3STA.clearUTXBF; inline;
  37537. begin
  37538. pTDefRegMap(@Self)^.clr := $00000200;
  37539. end;
  37540. procedure TUART2A_U3STA.setUTXBF(thebits : TBits_1); inline;
  37541. begin
  37542. if thebits = 0 then
  37543. pTDefRegMap(@Self)^.clr := $00000200
  37544. else
  37545. pTDefRegMap(@Self)^.&set := $00000200;
  37546. end;
  37547. function TUART2A_U3STA.getUTXBF : TBits_1; inline;
  37548. begin
  37549. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37550. end;
  37551. procedure TUART2A_U3STA.setUTXEN; inline;
  37552. begin
  37553. pTDefRegMap(@Self)^.&set := $00000400;
  37554. end;
  37555. procedure TUART2A_U3STA.clearUTXEN; inline;
  37556. begin
  37557. pTDefRegMap(@Self)^.clr := $00000400;
  37558. end;
  37559. procedure TUART2A_U3STA.setUTXEN(thebits : TBits_1); inline;
  37560. begin
  37561. if thebits = 0 then
  37562. pTDefRegMap(@Self)^.clr := $00000400
  37563. else
  37564. pTDefRegMap(@Self)^.&set := $00000400;
  37565. end;
  37566. function TUART2A_U3STA.getUTXEN : TBits_1; inline;
  37567. begin
  37568. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  37569. end;
  37570. procedure TUART2A_U3STA.setUTXBRK; inline;
  37571. begin
  37572. pTDefRegMap(@Self)^.&set := $00000800;
  37573. end;
  37574. procedure TUART2A_U3STA.clearUTXBRK; inline;
  37575. begin
  37576. pTDefRegMap(@Self)^.clr := $00000800;
  37577. end;
  37578. procedure TUART2A_U3STA.setUTXBRK(thebits : TBits_1); inline;
  37579. begin
  37580. if thebits = 0 then
  37581. pTDefRegMap(@Self)^.clr := $00000800
  37582. else
  37583. pTDefRegMap(@Self)^.&set := $00000800;
  37584. end;
  37585. function TUART2A_U3STA.getUTXBRK : TBits_1; inline;
  37586. begin
  37587. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37588. end;
  37589. procedure TUART2A_U3STA.setURXEN; inline;
  37590. begin
  37591. pTDefRegMap(@Self)^.&set := $00001000;
  37592. end;
  37593. procedure TUART2A_U3STA.clearURXEN; inline;
  37594. begin
  37595. pTDefRegMap(@Self)^.clr := $00001000;
  37596. end;
  37597. procedure TUART2A_U3STA.setURXEN(thebits : TBits_1); inline;
  37598. begin
  37599. if thebits = 0 then
  37600. pTDefRegMap(@Self)^.clr := $00001000
  37601. else
  37602. pTDefRegMap(@Self)^.&set := $00001000;
  37603. end;
  37604. function TUART2A_U3STA.getURXEN : TBits_1; inline;
  37605. begin
  37606. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37607. end;
  37608. procedure TUART2A_U3STA.setUTXINV; inline;
  37609. begin
  37610. pTDefRegMap(@Self)^.&set := $00002000;
  37611. end;
  37612. procedure TUART2A_U3STA.clearUTXINV; inline;
  37613. begin
  37614. pTDefRegMap(@Self)^.clr := $00002000;
  37615. end;
  37616. procedure TUART2A_U3STA.setUTXINV(thebits : TBits_1); inline;
  37617. begin
  37618. if thebits = 0 then
  37619. pTDefRegMap(@Self)^.clr := $00002000
  37620. else
  37621. pTDefRegMap(@Self)^.&set := $00002000;
  37622. end;
  37623. function TUART2A_U3STA.getUTXINV : TBits_1; inline;
  37624. begin
  37625. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37626. end;
  37627. procedure TUART2A_U3STA.setUTXISEL(thebits : TBits_2); inline;
  37628. begin
  37629. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  37630. end;
  37631. function TUART2A_U3STA.getUTXISEL : TBits_2; inline;
  37632. begin
  37633. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  37634. end;
  37635. procedure TUART2A_U3STA.setADDR(thebits : TBits_8); inline;
  37636. begin
  37637. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  37638. end;
  37639. function TUART2A_U3STA.getADDR : TBits_8; inline;
  37640. begin
  37641. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  37642. end;
  37643. procedure TUART2A_U3STA.setADM_EN; inline;
  37644. begin
  37645. pTDefRegMap(@Self)^.&set := $01000000;
  37646. end;
  37647. procedure TUART2A_U3STA.clearADM_EN; inline;
  37648. begin
  37649. pTDefRegMap(@Self)^.clr := $01000000;
  37650. end;
  37651. procedure TUART2A_U3STA.setADM_EN(thebits : TBits_1); inline;
  37652. begin
  37653. if thebits = 0 then
  37654. pTDefRegMap(@Self)^.clr := $01000000
  37655. else
  37656. pTDefRegMap(@Self)^.&set := $01000000;
  37657. end;
  37658. function TUART2A_U3STA.getADM_EN : TBits_1; inline;
  37659. begin
  37660. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  37661. end;
  37662. procedure TUART2A_U3STA.setURXISEL0; inline;
  37663. begin
  37664. pTDefRegMap(@Self)^.&set := $00000040;
  37665. end;
  37666. procedure TUART2A_U3STA.clearURXISEL0; inline;
  37667. begin
  37668. pTDefRegMap(@Self)^.clr := $00000040;
  37669. end;
  37670. procedure TUART2A_U3STA.setURXISEL0(thebits : TBits_1); inline;
  37671. begin
  37672. if thebits = 0 then
  37673. pTDefRegMap(@Self)^.clr := $00000040
  37674. else
  37675. pTDefRegMap(@Self)^.&set := $00000040;
  37676. end;
  37677. function TUART2A_U3STA.getURXISEL0 : TBits_1; inline;
  37678. begin
  37679. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37680. end;
  37681. procedure TUART2A_U3STA.setURXISEL1; inline;
  37682. begin
  37683. pTDefRegMap(@Self)^.&set := $00000080;
  37684. end;
  37685. procedure TUART2A_U3STA.clearURXISEL1; inline;
  37686. begin
  37687. pTDefRegMap(@Self)^.clr := $00000080;
  37688. end;
  37689. procedure TUART2A_U3STA.setURXISEL1(thebits : TBits_1); inline;
  37690. begin
  37691. if thebits = 0 then
  37692. pTDefRegMap(@Self)^.clr := $00000080
  37693. else
  37694. pTDefRegMap(@Self)^.&set := $00000080;
  37695. end;
  37696. function TUART2A_U3STA.getURXISEL1 : TBits_1; inline;
  37697. begin
  37698. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37699. end;
  37700. procedure TUART2A_U3STA.setUTXISEL0; inline;
  37701. begin
  37702. pTDefRegMap(@Self)^.&set := $00004000;
  37703. end;
  37704. procedure TUART2A_U3STA.clearUTXISEL0; inline;
  37705. begin
  37706. pTDefRegMap(@Self)^.clr := $00004000;
  37707. end;
  37708. procedure TUART2A_U3STA.setUTXISEL0(thebits : TBits_1); inline;
  37709. begin
  37710. if thebits = 0 then
  37711. pTDefRegMap(@Self)^.clr := $00004000
  37712. else
  37713. pTDefRegMap(@Self)^.&set := $00004000;
  37714. end;
  37715. function TUART2A_U3STA.getUTXISEL0 : TBits_1; inline;
  37716. begin
  37717. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  37718. end;
  37719. procedure TUART2A_U3STA.setUTXISEL1; inline;
  37720. begin
  37721. pTDefRegMap(@Self)^.&set := $00008000;
  37722. end;
  37723. procedure TUART2A_U3STA.clearUTXISEL1; inline;
  37724. begin
  37725. pTDefRegMap(@Self)^.clr := $00008000;
  37726. end;
  37727. procedure TUART2A_U3STA.setUTXISEL1(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 TUART2A_U3STA.getUTXISEL1 : TBits_1; inline;
  37735. begin
  37736. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37737. end;
  37738. procedure TUART2A_U3STA.setUTXSEL(thebits : TBits_2); inline;
  37739. begin
  37740. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  37741. end;
  37742. function TUART2A_U3STA.getUTXSEL : TBits_2; inline;
  37743. begin
  37744. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  37745. end;
  37746. procedure TUART2A_U3STA.setw(thebits : TBits_32); inline;
  37747. begin
  37748. pTDefRegMap(@Self)^.val := thebits;
  37749. end;
  37750. function TUART2A_U3STA.getw : TBits_32; inline;
  37751. begin
  37752. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37753. end;
  37754. procedure TUART2B_U2BMODE.setSTSEL; inline;
  37755. begin
  37756. pTDefRegMap(@Self)^.&set := $00000001;
  37757. end;
  37758. procedure TUART2B_U2BMODE.clearSTSEL; inline;
  37759. begin
  37760. pTDefRegMap(@Self)^.clr := $00000001;
  37761. end;
  37762. procedure TUART2B_U2BMODE.setSTSEL(thebits : TBits_1); inline;
  37763. begin
  37764. if thebits = 0 then
  37765. pTDefRegMap(@Self)^.clr := $00000001
  37766. else
  37767. pTDefRegMap(@Self)^.&set := $00000001;
  37768. end;
  37769. function TUART2B_U2BMODE.getSTSEL : TBits_1; inline;
  37770. begin
  37771. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37772. end;
  37773. procedure TUART2B_U2BMODE.setPDSEL(thebits : TBits_2); inline;
  37774. begin
  37775. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  37776. end;
  37777. function TUART2B_U2BMODE.getPDSEL : TBits_2; inline;
  37778. begin
  37779. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  37780. end;
  37781. procedure TUART2B_U2BMODE.setBRGH; inline;
  37782. begin
  37783. pTDefRegMap(@Self)^.&set := $00000008;
  37784. end;
  37785. procedure TUART2B_U2BMODE.clearBRGH; inline;
  37786. begin
  37787. pTDefRegMap(@Self)^.clr := $00000008;
  37788. end;
  37789. procedure TUART2B_U2BMODE.setBRGH(thebits : TBits_1); inline;
  37790. begin
  37791. if thebits = 0 then
  37792. pTDefRegMap(@Self)^.clr := $00000008
  37793. else
  37794. pTDefRegMap(@Self)^.&set := $00000008;
  37795. end;
  37796. function TUART2B_U2BMODE.getBRGH : TBits_1; inline;
  37797. begin
  37798. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37799. end;
  37800. procedure TUART2B_U2BMODE.setRXINV; inline;
  37801. begin
  37802. pTDefRegMap(@Self)^.&set := $00000010;
  37803. end;
  37804. procedure TUART2B_U2BMODE.clearRXINV; inline;
  37805. begin
  37806. pTDefRegMap(@Self)^.clr := $00000010;
  37807. end;
  37808. procedure TUART2B_U2BMODE.setRXINV(thebits : TBits_1); inline;
  37809. begin
  37810. if thebits = 0 then
  37811. pTDefRegMap(@Self)^.clr := $00000010
  37812. else
  37813. pTDefRegMap(@Self)^.&set := $00000010;
  37814. end;
  37815. function TUART2B_U2BMODE.getRXINV : TBits_1; inline;
  37816. begin
  37817. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37818. end;
  37819. procedure TUART2B_U2BMODE.setABAUD; inline;
  37820. begin
  37821. pTDefRegMap(@Self)^.&set := $00000020;
  37822. end;
  37823. procedure TUART2B_U2BMODE.clearABAUD; inline;
  37824. begin
  37825. pTDefRegMap(@Self)^.clr := $00000020;
  37826. end;
  37827. procedure TUART2B_U2BMODE.setABAUD(thebits : TBits_1); inline;
  37828. begin
  37829. if thebits = 0 then
  37830. pTDefRegMap(@Self)^.clr := $00000020
  37831. else
  37832. pTDefRegMap(@Self)^.&set := $00000020;
  37833. end;
  37834. function TUART2B_U2BMODE.getABAUD : TBits_1; inline;
  37835. begin
  37836. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37837. end;
  37838. procedure TUART2B_U2BMODE.setLPBACK; inline;
  37839. begin
  37840. pTDefRegMap(@Self)^.&set := $00000040;
  37841. end;
  37842. procedure TUART2B_U2BMODE.clearLPBACK; inline;
  37843. begin
  37844. pTDefRegMap(@Self)^.clr := $00000040;
  37845. end;
  37846. procedure TUART2B_U2BMODE.setLPBACK(thebits : TBits_1); inline;
  37847. begin
  37848. if thebits = 0 then
  37849. pTDefRegMap(@Self)^.clr := $00000040
  37850. else
  37851. pTDefRegMap(@Self)^.&set := $00000040;
  37852. end;
  37853. function TUART2B_U2BMODE.getLPBACK : TBits_1; inline;
  37854. begin
  37855. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37856. end;
  37857. procedure TUART2B_U2BMODE.setWAKE; inline;
  37858. begin
  37859. pTDefRegMap(@Self)^.&set := $00000080;
  37860. end;
  37861. procedure TUART2B_U2BMODE.clearWAKE; inline;
  37862. begin
  37863. pTDefRegMap(@Self)^.clr := $00000080;
  37864. end;
  37865. procedure TUART2B_U2BMODE.setWAKE(thebits : TBits_1); inline;
  37866. begin
  37867. if thebits = 0 then
  37868. pTDefRegMap(@Self)^.clr := $00000080
  37869. else
  37870. pTDefRegMap(@Self)^.&set := $00000080;
  37871. end;
  37872. function TUART2B_U2BMODE.getWAKE : TBits_1; inline;
  37873. begin
  37874. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37875. end;
  37876. procedure TUART2B_U2BMODE.setIREN; inline;
  37877. begin
  37878. pTDefRegMap(@Self)^.&set := $00001000;
  37879. end;
  37880. procedure TUART2B_U2BMODE.clearIREN; inline;
  37881. begin
  37882. pTDefRegMap(@Self)^.clr := $00001000;
  37883. end;
  37884. procedure TUART2B_U2BMODE.setIREN(thebits : TBits_1); inline;
  37885. begin
  37886. if thebits = 0 then
  37887. pTDefRegMap(@Self)^.clr := $00001000
  37888. else
  37889. pTDefRegMap(@Self)^.&set := $00001000;
  37890. end;
  37891. function TUART2B_U2BMODE.getIREN : TBits_1; inline;
  37892. begin
  37893. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37894. end;
  37895. procedure TUART2B_U2BMODE.setSIDL; inline;
  37896. begin
  37897. pTDefRegMap(@Self)^.&set := $00002000;
  37898. end;
  37899. procedure TUART2B_U2BMODE.clearSIDL; inline;
  37900. begin
  37901. pTDefRegMap(@Self)^.clr := $00002000;
  37902. end;
  37903. procedure TUART2B_U2BMODE.setSIDL(thebits : TBits_1); inline;
  37904. begin
  37905. if thebits = 0 then
  37906. pTDefRegMap(@Self)^.clr := $00002000
  37907. else
  37908. pTDefRegMap(@Self)^.&set := $00002000;
  37909. end;
  37910. function TUART2B_U2BMODE.getSIDL : TBits_1; inline;
  37911. begin
  37912. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37913. end;
  37914. procedure TUART2B_U2BMODE.setON; inline;
  37915. begin
  37916. pTDefRegMap(@Self)^.&set := $00008000;
  37917. end;
  37918. procedure TUART2B_U2BMODE.clearON; inline;
  37919. begin
  37920. pTDefRegMap(@Self)^.clr := $00008000;
  37921. end;
  37922. procedure TUART2B_U2BMODE.setON(thebits : TBits_1); inline;
  37923. begin
  37924. if thebits = 0 then
  37925. pTDefRegMap(@Self)^.clr := $00008000
  37926. else
  37927. pTDefRegMap(@Self)^.&set := $00008000;
  37928. end;
  37929. function TUART2B_U2BMODE.getON : TBits_1; inline;
  37930. begin
  37931. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37932. end;
  37933. procedure TUART2B_U2BMODE.setPDSEL0; inline;
  37934. begin
  37935. pTDefRegMap(@Self)^.&set := $00000002;
  37936. end;
  37937. procedure TUART2B_U2BMODE.clearPDSEL0; inline;
  37938. begin
  37939. pTDefRegMap(@Self)^.clr := $00000002;
  37940. end;
  37941. procedure TUART2B_U2BMODE.setPDSEL0(thebits : TBits_1); inline;
  37942. begin
  37943. if thebits = 0 then
  37944. pTDefRegMap(@Self)^.clr := $00000002
  37945. else
  37946. pTDefRegMap(@Self)^.&set := $00000002;
  37947. end;
  37948. function TUART2B_U2BMODE.getPDSEL0 : TBits_1; inline;
  37949. begin
  37950. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37951. end;
  37952. procedure TUART2B_U2BMODE.setPDSEL1; inline;
  37953. begin
  37954. pTDefRegMap(@Self)^.&set := $00000004;
  37955. end;
  37956. procedure TUART2B_U2BMODE.clearPDSEL1; inline;
  37957. begin
  37958. pTDefRegMap(@Self)^.clr := $00000004;
  37959. end;
  37960. procedure TUART2B_U2BMODE.setPDSEL1(thebits : TBits_1); inline;
  37961. begin
  37962. if thebits = 0 then
  37963. pTDefRegMap(@Self)^.clr := $00000004
  37964. else
  37965. pTDefRegMap(@Self)^.&set := $00000004;
  37966. end;
  37967. function TUART2B_U2BMODE.getPDSEL1 : TBits_1; inline;
  37968. begin
  37969. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37970. end;
  37971. procedure TUART2B_U2BMODE.setUSIDL; inline;
  37972. begin
  37973. pTDefRegMap(@Self)^.&set := $00002000;
  37974. end;
  37975. procedure TUART2B_U2BMODE.clearUSIDL; inline;
  37976. begin
  37977. pTDefRegMap(@Self)^.clr := $00002000;
  37978. end;
  37979. procedure TUART2B_U2BMODE.setUSIDL(thebits : TBits_1); inline;
  37980. begin
  37981. if thebits = 0 then
  37982. pTDefRegMap(@Self)^.clr := $00002000
  37983. else
  37984. pTDefRegMap(@Self)^.&set := $00002000;
  37985. end;
  37986. function TUART2B_U2BMODE.getUSIDL : TBits_1; inline;
  37987. begin
  37988. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37989. end;
  37990. procedure TUART2B_U2BMODE.setUARTEN; inline;
  37991. begin
  37992. pTDefRegMap(@Self)^.&set := $00008000;
  37993. end;
  37994. procedure TUART2B_U2BMODE.clearUARTEN; inline;
  37995. begin
  37996. pTDefRegMap(@Self)^.clr := $00008000;
  37997. end;
  37998. procedure TUART2B_U2BMODE.setUARTEN(thebits : TBits_1); inline;
  37999. begin
  38000. if thebits = 0 then
  38001. pTDefRegMap(@Self)^.clr := $00008000
  38002. else
  38003. pTDefRegMap(@Self)^.&set := $00008000;
  38004. end;
  38005. function TUART2B_U2BMODE.getUARTEN : TBits_1; inline;
  38006. begin
  38007. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38008. end;
  38009. procedure TUART2B_U2BMODE.setw(thebits : TBits_32); inline;
  38010. begin
  38011. pTDefRegMap(@Self)^.val := thebits;
  38012. end;
  38013. function TUART2B_U2BMODE.getw : TBits_32; inline;
  38014. begin
  38015. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38016. end;
  38017. procedure TUART2B_U6MODE.setSTSEL; inline;
  38018. begin
  38019. pTDefRegMap(@Self)^.&set := $00000001;
  38020. end;
  38021. procedure TUART2B_U6MODE.clearSTSEL; inline;
  38022. begin
  38023. pTDefRegMap(@Self)^.clr := $00000001;
  38024. end;
  38025. procedure TUART2B_U6MODE.setSTSEL(thebits : TBits_1); inline;
  38026. begin
  38027. if thebits = 0 then
  38028. pTDefRegMap(@Self)^.clr := $00000001
  38029. else
  38030. pTDefRegMap(@Self)^.&set := $00000001;
  38031. end;
  38032. function TUART2B_U6MODE.getSTSEL : TBits_1; inline;
  38033. begin
  38034. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38035. end;
  38036. procedure TUART2B_U6MODE.setPDSEL(thebits : TBits_2); inline;
  38037. begin
  38038. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  38039. end;
  38040. function TUART2B_U6MODE.getPDSEL : TBits_2; inline;
  38041. begin
  38042. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  38043. end;
  38044. procedure TUART2B_U6MODE.setBRGH; inline;
  38045. begin
  38046. pTDefRegMap(@Self)^.&set := $00000008;
  38047. end;
  38048. procedure TUART2B_U6MODE.clearBRGH; inline;
  38049. begin
  38050. pTDefRegMap(@Self)^.clr := $00000008;
  38051. end;
  38052. procedure TUART2B_U6MODE.setBRGH(thebits : TBits_1); inline;
  38053. begin
  38054. if thebits = 0 then
  38055. pTDefRegMap(@Self)^.clr := $00000008
  38056. else
  38057. pTDefRegMap(@Self)^.&set := $00000008;
  38058. end;
  38059. function TUART2B_U6MODE.getBRGH : TBits_1; inline;
  38060. begin
  38061. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38062. end;
  38063. procedure TUART2B_U6MODE.setRXINV; inline;
  38064. begin
  38065. pTDefRegMap(@Self)^.&set := $00000010;
  38066. end;
  38067. procedure TUART2B_U6MODE.clearRXINV; inline;
  38068. begin
  38069. pTDefRegMap(@Self)^.clr := $00000010;
  38070. end;
  38071. procedure TUART2B_U6MODE.setRXINV(thebits : TBits_1); inline;
  38072. begin
  38073. if thebits = 0 then
  38074. pTDefRegMap(@Self)^.clr := $00000010
  38075. else
  38076. pTDefRegMap(@Self)^.&set := $00000010;
  38077. end;
  38078. function TUART2B_U6MODE.getRXINV : TBits_1; inline;
  38079. begin
  38080. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38081. end;
  38082. procedure TUART2B_U6MODE.setABAUD; inline;
  38083. begin
  38084. pTDefRegMap(@Self)^.&set := $00000020;
  38085. end;
  38086. procedure TUART2B_U6MODE.clearABAUD; inline;
  38087. begin
  38088. pTDefRegMap(@Self)^.clr := $00000020;
  38089. end;
  38090. procedure TUART2B_U6MODE.setABAUD(thebits : TBits_1); inline;
  38091. begin
  38092. if thebits = 0 then
  38093. pTDefRegMap(@Self)^.clr := $00000020
  38094. else
  38095. pTDefRegMap(@Self)^.&set := $00000020;
  38096. end;
  38097. function TUART2B_U6MODE.getABAUD : TBits_1; inline;
  38098. begin
  38099. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38100. end;
  38101. procedure TUART2B_U6MODE.setLPBACK; inline;
  38102. begin
  38103. pTDefRegMap(@Self)^.&set := $00000040;
  38104. end;
  38105. procedure TUART2B_U6MODE.clearLPBACK; inline;
  38106. begin
  38107. pTDefRegMap(@Self)^.clr := $00000040;
  38108. end;
  38109. procedure TUART2B_U6MODE.setLPBACK(thebits : TBits_1); inline;
  38110. begin
  38111. if thebits = 0 then
  38112. pTDefRegMap(@Self)^.clr := $00000040
  38113. else
  38114. pTDefRegMap(@Self)^.&set := $00000040;
  38115. end;
  38116. function TUART2B_U6MODE.getLPBACK : TBits_1; inline;
  38117. begin
  38118. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38119. end;
  38120. procedure TUART2B_U6MODE.setWAKE; inline;
  38121. begin
  38122. pTDefRegMap(@Self)^.&set := $00000080;
  38123. end;
  38124. procedure TUART2B_U6MODE.clearWAKE; inline;
  38125. begin
  38126. pTDefRegMap(@Self)^.clr := $00000080;
  38127. end;
  38128. procedure TUART2B_U6MODE.setWAKE(thebits : TBits_1); inline;
  38129. begin
  38130. if thebits = 0 then
  38131. pTDefRegMap(@Self)^.clr := $00000080
  38132. else
  38133. pTDefRegMap(@Self)^.&set := $00000080;
  38134. end;
  38135. function TUART2B_U6MODE.getWAKE : TBits_1; inline;
  38136. begin
  38137. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38138. end;
  38139. procedure TUART2B_U6MODE.setIREN; inline;
  38140. begin
  38141. pTDefRegMap(@Self)^.&set := $00001000;
  38142. end;
  38143. procedure TUART2B_U6MODE.clearIREN; inline;
  38144. begin
  38145. pTDefRegMap(@Self)^.clr := $00001000;
  38146. end;
  38147. procedure TUART2B_U6MODE.setIREN(thebits : TBits_1); inline;
  38148. begin
  38149. if thebits = 0 then
  38150. pTDefRegMap(@Self)^.clr := $00001000
  38151. else
  38152. pTDefRegMap(@Self)^.&set := $00001000;
  38153. end;
  38154. function TUART2B_U6MODE.getIREN : TBits_1; inline;
  38155. begin
  38156. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38157. end;
  38158. procedure TUART2B_U6MODE.setSIDL; inline;
  38159. begin
  38160. pTDefRegMap(@Self)^.&set := $00002000;
  38161. end;
  38162. procedure TUART2B_U6MODE.clearSIDL; inline;
  38163. begin
  38164. pTDefRegMap(@Self)^.clr := $00002000;
  38165. end;
  38166. procedure TUART2B_U6MODE.setSIDL(thebits : TBits_1); inline;
  38167. begin
  38168. if thebits = 0 then
  38169. pTDefRegMap(@Self)^.clr := $00002000
  38170. else
  38171. pTDefRegMap(@Self)^.&set := $00002000;
  38172. end;
  38173. function TUART2B_U6MODE.getSIDL : TBits_1; inline;
  38174. begin
  38175. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38176. end;
  38177. procedure TUART2B_U6MODE.setON; inline;
  38178. begin
  38179. pTDefRegMap(@Self)^.&set := $00008000;
  38180. end;
  38181. procedure TUART2B_U6MODE.clearON; inline;
  38182. begin
  38183. pTDefRegMap(@Self)^.clr := $00008000;
  38184. end;
  38185. procedure TUART2B_U6MODE.setON(thebits : TBits_1); inline;
  38186. begin
  38187. if thebits = 0 then
  38188. pTDefRegMap(@Self)^.clr := $00008000
  38189. else
  38190. pTDefRegMap(@Self)^.&set := $00008000;
  38191. end;
  38192. function TUART2B_U6MODE.getON : TBits_1; inline;
  38193. begin
  38194. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38195. end;
  38196. procedure TUART2B_U6MODE.setPDSEL0; inline;
  38197. begin
  38198. pTDefRegMap(@Self)^.&set := $00000002;
  38199. end;
  38200. procedure TUART2B_U6MODE.clearPDSEL0; inline;
  38201. begin
  38202. pTDefRegMap(@Self)^.clr := $00000002;
  38203. end;
  38204. procedure TUART2B_U6MODE.setPDSEL0(thebits : TBits_1); inline;
  38205. begin
  38206. if thebits = 0 then
  38207. pTDefRegMap(@Self)^.clr := $00000002
  38208. else
  38209. pTDefRegMap(@Self)^.&set := $00000002;
  38210. end;
  38211. function TUART2B_U6MODE.getPDSEL0 : TBits_1; inline;
  38212. begin
  38213. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38214. end;
  38215. procedure TUART2B_U6MODE.setPDSEL1; inline;
  38216. begin
  38217. pTDefRegMap(@Self)^.&set := $00000004;
  38218. end;
  38219. procedure TUART2B_U6MODE.clearPDSEL1; inline;
  38220. begin
  38221. pTDefRegMap(@Self)^.clr := $00000004;
  38222. end;
  38223. procedure TUART2B_U6MODE.setPDSEL1(thebits : TBits_1); inline;
  38224. begin
  38225. if thebits = 0 then
  38226. pTDefRegMap(@Self)^.clr := $00000004
  38227. else
  38228. pTDefRegMap(@Self)^.&set := $00000004;
  38229. end;
  38230. function TUART2B_U6MODE.getPDSEL1 : TBits_1; inline;
  38231. begin
  38232. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38233. end;
  38234. procedure TUART2B_U6MODE.setUSIDL; inline;
  38235. begin
  38236. pTDefRegMap(@Self)^.&set := $00002000;
  38237. end;
  38238. procedure TUART2B_U6MODE.clearUSIDL; inline;
  38239. begin
  38240. pTDefRegMap(@Self)^.clr := $00002000;
  38241. end;
  38242. procedure TUART2B_U6MODE.setUSIDL(thebits : TBits_1); inline;
  38243. begin
  38244. if thebits = 0 then
  38245. pTDefRegMap(@Self)^.clr := $00002000
  38246. else
  38247. pTDefRegMap(@Self)^.&set := $00002000;
  38248. end;
  38249. function TUART2B_U6MODE.getUSIDL : TBits_1; inline;
  38250. begin
  38251. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38252. end;
  38253. procedure TUART2B_U6MODE.setUARTEN; inline;
  38254. begin
  38255. pTDefRegMap(@Self)^.&set := $00008000;
  38256. end;
  38257. procedure TUART2B_U6MODE.clearUARTEN; inline;
  38258. begin
  38259. pTDefRegMap(@Self)^.clr := $00008000;
  38260. end;
  38261. procedure TUART2B_U6MODE.setUARTEN(thebits : TBits_1); inline;
  38262. begin
  38263. if thebits = 0 then
  38264. pTDefRegMap(@Self)^.clr := $00008000
  38265. else
  38266. pTDefRegMap(@Self)^.&set := $00008000;
  38267. end;
  38268. function TUART2B_U6MODE.getUARTEN : TBits_1; inline;
  38269. begin
  38270. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38271. end;
  38272. procedure TUART2B_U6MODE.setw(thebits : TBits_32); inline;
  38273. begin
  38274. pTDefRegMap(@Self)^.val := thebits;
  38275. end;
  38276. function TUART2B_U6MODE.getw : TBits_32; inline;
  38277. begin
  38278. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38279. end;
  38280. procedure TUART2B_U2BSTA.setURXDA; inline;
  38281. begin
  38282. pTDefRegMap(@Self)^.&set := $00000001;
  38283. end;
  38284. procedure TUART2B_U2BSTA.clearURXDA; inline;
  38285. begin
  38286. pTDefRegMap(@Self)^.clr := $00000001;
  38287. end;
  38288. procedure TUART2B_U2BSTA.setURXDA(thebits : TBits_1); inline;
  38289. begin
  38290. if thebits = 0 then
  38291. pTDefRegMap(@Self)^.clr := $00000001
  38292. else
  38293. pTDefRegMap(@Self)^.&set := $00000001;
  38294. end;
  38295. function TUART2B_U2BSTA.getURXDA : TBits_1; inline;
  38296. begin
  38297. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38298. end;
  38299. procedure TUART2B_U2BSTA.setOERR; inline;
  38300. begin
  38301. pTDefRegMap(@Self)^.&set := $00000002;
  38302. end;
  38303. procedure TUART2B_U2BSTA.clearOERR; inline;
  38304. begin
  38305. pTDefRegMap(@Self)^.clr := $00000002;
  38306. end;
  38307. procedure TUART2B_U2BSTA.setOERR(thebits : TBits_1); inline;
  38308. begin
  38309. if thebits = 0 then
  38310. pTDefRegMap(@Self)^.clr := $00000002
  38311. else
  38312. pTDefRegMap(@Self)^.&set := $00000002;
  38313. end;
  38314. function TUART2B_U2BSTA.getOERR : TBits_1; inline;
  38315. begin
  38316. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38317. end;
  38318. procedure TUART2B_U2BSTA.setFERR; inline;
  38319. begin
  38320. pTDefRegMap(@Self)^.&set := $00000004;
  38321. end;
  38322. procedure TUART2B_U2BSTA.clearFERR; inline;
  38323. begin
  38324. pTDefRegMap(@Self)^.clr := $00000004;
  38325. end;
  38326. procedure TUART2B_U2BSTA.setFERR(thebits : TBits_1); inline;
  38327. begin
  38328. if thebits = 0 then
  38329. pTDefRegMap(@Self)^.clr := $00000004
  38330. else
  38331. pTDefRegMap(@Self)^.&set := $00000004;
  38332. end;
  38333. function TUART2B_U2BSTA.getFERR : TBits_1; inline;
  38334. begin
  38335. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38336. end;
  38337. procedure TUART2B_U2BSTA.setPERR; inline;
  38338. begin
  38339. pTDefRegMap(@Self)^.&set := $00000008;
  38340. end;
  38341. procedure TUART2B_U2BSTA.clearPERR; inline;
  38342. begin
  38343. pTDefRegMap(@Self)^.clr := $00000008;
  38344. end;
  38345. procedure TUART2B_U2BSTA.setPERR(thebits : TBits_1); inline;
  38346. begin
  38347. if thebits = 0 then
  38348. pTDefRegMap(@Self)^.clr := $00000008
  38349. else
  38350. pTDefRegMap(@Self)^.&set := $00000008;
  38351. end;
  38352. function TUART2B_U2BSTA.getPERR : TBits_1; inline;
  38353. begin
  38354. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38355. end;
  38356. procedure TUART2B_U2BSTA.setRIDLE; inline;
  38357. begin
  38358. pTDefRegMap(@Self)^.&set := $00000010;
  38359. end;
  38360. procedure TUART2B_U2BSTA.clearRIDLE; inline;
  38361. begin
  38362. pTDefRegMap(@Self)^.clr := $00000010;
  38363. end;
  38364. procedure TUART2B_U2BSTA.setRIDLE(thebits : TBits_1); inline;
  38365. begin
  38366. if thebits = 0 then
  38367. pTDefRegMap(@Self)^.clr := $00000010
  38368. else
  38369. pTDefRegMap(@Self)^.&set := $00000010;
  38370. end;
  38371. function TUART2B_U2BSTA.getRIDLE : TBits_1; inline;
  38372. begin
  38373. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38374. end;
  38375. procedure TUART2B_U2BSTA.setADDEN; inline;
  38376. begin
  38377. pTDefRegMap(@Self)^.&set := $00000020;
  38378. end;
  38379. procedure TUART2B_U2BSTA.clearADDEN; inline;
  38380. begin
  38381. pTDefRegMap(@Self)^.clr := $00000020;
  38382. end;
  38383. procedure TUART2B_U2BSTA.setADDEN(thebits : TBits_1); inline;
  38384. begin
  38385. if thebits = 0 then
  38386. pTDefRegMap(@Self)^.clr := $00000020
  38387. else
  38388. pTDefRegMap(@Self)^.&set := $00000020;
  38389. end;
  38390. function TUART2B_U2BSTA.getADDEN : TBits_1; inline;
  38391. begin
  38392. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38393. end;
  38394. procedure TUART2B_U2BSTA.setURXISEL(thebits : TBits_2); inline;
  38395. begin
  38396. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  38397. end;
  38398. function TUART2B_U2BSTA.getURXISEL : TBits_2; inline;
  38399. begin
  38400. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  38401. end;
  38402. procedure TUART2B_U2BSTA.setTRMT; inline;
  38403. begin
  38404. pTDefRegMap(@Self)^.&set := $00000100;
  38405. end;
  38406. procedure TUART2B_U2BSTA.clearTRMT; inline;
  38407. begin
  38408. pTDefRegMap(@Self)^.clr := $00000100;
  38409. end;
  38410. procedure TUART2B_U2BSTA.setTRMT(thebits : TBits_1); inline;
  38411. begin
  38412. if thebits = 0 then
  38413. pTDefRegMap(@Self)^.clr := $00000100
  38414. else
  38415. pTDefRegMap(@Self)^.&set := $00000100;
  38416. end;
  38417. function TUART2B_U2BSTA.getTRMT : TBits_1; inline;
  38418. begin
  38419. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38420. end;
  38421. procedure TUART2B_U2BSTA.setUTXBF; inline;
  38422. begin
  38423. pTDefRegMap(@Self)^.&set := $00000200;
  38424. end;
  38425. procedure TUART2B_U2BSTA.clearUTXBF; inline;
  38426. begin
  38427. pTDefRegMap(@Self)^.clr := $00000200;
  38428. end;
  38429. procedure TUART2B_U2BSTA.setUTXBF(thebits : TBits_1); inline;
  38430. begin
  38431. if thebits = 0 then
  38432. pTDefRegMap(@Self)^.clr := $00000200
  38433. else
  38434. pTDefRegMap(@Self)^.&set := $00000200;
  38435. end;
  38436. function TUART2B_U2BSTA.getUTXBF : TBits_1; inline;
  38437. begin
  38438. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38439. end;
  38440. procedure TUART2B_U2BSTA.setUTXEN; inline;
  38441. begin
  38442. pTDefRegMap(@Self)^.&set := $00000400;
  38443. end;
  38444. procedure TUART2B_U2BSTA.clearUTXEN; inline;
  38445. begin
  38446. pTDefRegMap(@Self)^.clr := $00000400;
  38447. end;
  38448. procedure TUART2B_U2BSTA.setUTXEN(thebits : TBits_1); inline;
  38449. begin
  38450. if thebits = 0 then
  38451. pTDefRegMap(@Self)^.clr := $00000400
  38452. else
  38453. pTDefRegMap(@Self)^.&set := $00000400;
  38454. end;
  38455. function TUART2B_U2BSTA.getUTXEN : TBits_1; inline;
  38456. begin
  38457. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38458. end;
  38459. procedure TUART2B_U2BSTA.setUTXBRK; inline;
  38460. begin
  38461. pTDefRegMap(@Self)^.&set := $00000800;
  38462. end;
  38463. procedure TUART2B_U2BSTA.clearUTXBRK; inline;
  38464. begin
  38465. pTDefRegMap(@Self)^.clr := $00000800;
  38466. end;
  38467. procedure TUART2B_U2BSTA.setUTXBRK(thebits : TBits_1); inline;
  38468. begin
  38469. if thebits = 0 then
  38470. pTDefRegMap(@Self)^.clr := $00000800
  38471. else
  38472. pTDefRegMap(@Self)^.&set := $00000800;
  38473. end;
  38474. function TUART2B_U2BSTA.getUTXBRK : TBits_1; inline;
  38475. begin
  38476. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38477. end;
  38478. procedure TUART2B_U2BSTA.setURXEN; inline;
  38479. begin
  38480. pTDefRegMap(@Self)^.&set := $00001000;
  38481. end;
  38482. procedure TUART2B_U2BSTA.clearURXEN; inline;
  38483. begin
  38484. pTDefRegMap(@Self)^.clr := $00001000;
  38485. end;
  38486. procedure TUART2B_U2BSTA.setURXEN(thebits : TBits_1); inline;
  38487. begin
  38488. if thebits = 0 then
  38489. pTDefRegMap(@Self)^.clr := $00001000
  38490. else
  38491. pTDefRegMap(@Self)^.&set := $00001000;
  38492. end;
  38493. function TUART2B_U2BSTA.getURXEN : TBits_1; inline;
  38494. begin
  38495. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38496. end;
  38497. procedure TUART2B_U2BSTA.setUTXINV; inline;
  38498. begin
  38499. pTDefRegMap(@Self)^.&set := $00002000;
  38500. end;
  38501. procedure TUART2B_U2BSTA.clearUTXINV; inline;
  38502. begin
  38503. pTDefRegMap(@Self)^.clr := $00002000;
  38504. end;
  38505. procedure TUART2B_U2BSTA.setUTXINV(thebits : TBits_1); inline;
  38506. begin
  38507. if thebits = 0 then
  38508. pTDefRegMap(@Self)^.clr := $00002000
  38509. else
  38510. pTDefRegMap(@Self)^.&set := $00002000;
  38511. end;
  38512. function TUART2B_U2BSTA.getUTXINV : TBits_1; inline;
  38513. begin
  38514. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38515. end;
  38516. procedure TUART2B_U2BSTA.setUTXISEL(thebits : TBits_2); inline;
  38517. begin
  38518. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  38519. end;
  38520. function TUART2B_U2BSTA.getUTXISEL : TBits_2; inline;
  38521. begin
  38522. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  38523. end;
  38524. procedure TUART2B_U2BSTA.setADDR(thebits : TBits_8); inline;
  38525. begin
  38526. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  38527. end;
  38528. function TUART2B_U2BSTA.getADDR : TBits_8; inline;
  38529. begin
  38530. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  38531. end;
  38532. procedure TUART2B_U2BSTA.setADM_EN; inline;
  38533. begin
  38534. pTDefRegMap(@Self)^.&set := $01000000;
  38535. end;
  38536. procedure TUART2B_U2BSTA.clearADM_EN; inline;
  38537. begin
  38538. pTDefRegMap(@Self)^.clr := $01000000;
  38539. end;
  38540. procedure TUART2B_U2BSTA.setADM_EN(thebits : TBits_1); inline;
  38541. begin
  38542. if thebits = 0 then
  38543. pTDefRegMap(@Self)^.clr := $01000000
  38544. else
  38545. pTDefRegMap(@Self)^.&set := $01000000;
  38546. end;
  38547. function TUART2B_U2BSTA.getADM_EN : TBits_1; inline;
  38548. begin
  38549. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  38550. end;
  38551. procedure TUART2B_U2BSTA.setURXISEL0; inline;
  38552. begin
  38553. pTDefRegMap(@Self)^.&set := $00000040;
  38554. end;
  38555. procedure TUART2B_U2BSTA.clearURXISEL0; inline;
  38556. begin
  38557. pTDefRegMap(@Self)^.clr := $00000040;
  38558. end;
  38559. procedure TUART2B_U2BSTA.setURXISEL0(thebits : TBits_1); inline;
  38560. begin
  38561. if thebits = 0 then
  38562. pTDefRegMap(@Self)^.clr := $00000040
  38563. else
  38564. pTDefRegMap(@Self)^.&set := $00000040;
  38565. end;
  38566. function TUART2B_U2BSTA.getURXISEL0 : TBits_1; inline;
  38567. begin
  38568. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38569. end;
  38570. procedure TUART2B_U2BSTA.setURXISEL1; inline;
  38571. begin
  38572. pTDefRegMap(@Self)^.&set := $00000080;
  38573. end;
  38574. procedure TUART2B_U2BSTA.clearURXISEL1; inline;
  38575. begin
  38576. pTDefRegMap(@Self)^.clr := $00000080;
  38577. end;
  38578. procedure TUART2B_U2BSTA.setURXISEL1(thebits : TBits_1); inline;
  38579. begin
  38580. if thebits = 0 then
  38581. pTDefRegMap(@Self)^.clr := $00000080
  38582. else
  38583. pTDefRegMap(@Self)^.&set := $00000080;
  38584. end;
  38585. function TUART2B_U2BSTA.getURXISEL1 : TBits_1; inline;
  38586. begin
  38587. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38588. end;
  38589. procedure TUART2B_U2BSTA.setUTXISEL0; inline;
  38590. begin
  38591. pTDefRegMap(@Self)^.&set := $00004000;
  38592. end;
  38593. procedure TUART2B_U2BSTA.clearUTXISEL0; inline;
  38594. begin
  38595. pTDefRegMap(@Self)^.clr := $00004000;
  38596. end;
  38597. procedure TUART2B_U2BSTA.setUTXISEL0(thebits : TBits_1); inline;
  38598. begin
  38599. if thebits = 0 then
  38600. pTDefRegMap(@Self)^.clr := $00004000
  38601. else
  38602. pTDefRegMap(@Self)^.&set := $00004000;
  38603. end;
  38604. function TUART2B_U2BSTA.getUTXISEL0 : TBits_1; inline;
  38605. begin
  38606. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  38607. end;
  38608. procedure TUART2B_U2BSTA.setUTXISEL1; inline;
  38609. begin
  38610. pTDefRegMap(@Self)^.&set := $00008000;
  38611. end;
  38612. procedure TUART2B_U2BSTA.clearUTXISEL1; inline;
  38613. begin
  38614. pTDefRegMap(@Self)^.clr := $00008000;
  38615. end;
  38616. procedure TUART2B_U2BSTA.setUTXISEL1(thebits : TBits_1); inline;
  38617. begin
  38618. if thebits = 0 then
  38619. pTDefRegMap(@Self)^.clr := $00008000
  38620. else
  38621. pTDefRegMap(@Self)^.&set := $00008000;
  38622. end;
  38623. function TUART2B_U2BSTA.getUTXISEL1 : TBits_1; inline;
  38624. begin
  38625. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38626. end;
  38627. procedure TUART2B_U2BSTA.setUTXSEL(thebits : TBits_2); inline;
  38628. begin
  38629. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  38630. end;
  38631. function TUART2B_U2BSTA.getUTXSEL : TBits_2; inline;
  38632. begin
  38633. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  38634. end;
  38635. procedure TUART2B_U2BSTA.setw(thebits : TBits_32); inline;
  38636. begin
  38637. pTDefRegMap(@Self)^.val := thebits;
  38638. end;
  38639. function TUART2B_U2BSTA.getw : TBits_32; inline;
  38640. begin
  38641. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38642. end;
  38643. procedure TUART2B_U6STA.setURXDA; inline;
  38644. begin
  38645. pTDefRegMap(@Self)^.&set := $00000001;
  38646. end;
  38647. procedure TUART2B_U6STA.clearURXDA; inline;
  38648. begin
  38649. pTDefRegMap(@Self)^.clr := $00000001;
  38650. end;
  38651. procedure TUART2B_U6STA.setURXDA(thebits : TBits_1); inline;
  38652. begin
  38653. if thebits = 0 then
  38654. pTDefRegMap(@Self)^.clr := $00000001
  38655. else
  38656. pTDefRegMap(@Self)^.&set := $00000001;
  38657. end;
  38658. function TUART2B_U6STA.getURXDA : TBits_1; inline;
  38659. begin
  38660. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38661. end;
  38662. procedure TUART2B_U6STA.setOERR; inline;
  38663. begin
  38664. pTDefRegMap(@Self)^.&set := $00000002;
  38665. end;
  38666. procedure TUART2B_U6STA.clearOERR; inline;
  38667. begin
  38668. pTDefRegMap(@Self)^.clr := $00000002;
  38669. end;
  38670. procedure TUART2B_U6STA.setOERR(thebits : TBits_1); inline;
  38671. begin
  38672. if thebits = 0 then
  38673. pTDefRegMap(@Self)^.clr := $00000002
  38674. else
  38675. pTDefRegMap(@Self)^.&set := $00000002;
  38676. end;
  38677. function TUART2B_U6STA.getOERR : TBits_1; inline;
  38678. begin
  38679. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38680. end;
  38681. procedure TUART2B_U6STA.setFERR; inline;
  38682. begin
  38683. pTDefRegMap(@Self)^.&set := $00000004;
  38684. end;
  38685. procedure TUART2B_U6STA.clearFERR; inline;
  38686. begin
  38687. pTDefRegMap(@Self)^.clr := $00000004;
  38688. end;
  38689. procedure TUART2B_U6STA.setFERR(thebits : TBits_1); inline;
  38690. begin
  38691. if thebits = 0 then
  38692. pTDefRegMap(@Self)^.clr := $00000004
  38693. else
  38694. pTDefRegMap(@Self)^.&set := $00000004;
  38695. end;
  38696. function TUART2B_U6STA.getFERR : TBits_1; inline;
  38697. begin
  38698. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38699. end;
  38700. procedure TUART2B_U6STA.setPERR; inline;
  38701. begin
  38702. pTDefRegMap(@Self)^.&set := $00000008;
  38703. end;
  38704. procedure TUART2B_U6STA.clearPERR; inline;
  38705. begin
  38706. pTDefRegMap(@Self)^.clr := $00000008;
  38707. end;
  38708. procedure TUART2B_U6STA.setPERR(thebits : TBits_1); inline;
  38709. begin
  38710. if thebits = 0 then
  38711. pTDefRegMap(@Self)^.clr := $00000008
  38712. else
  38713. pTDefRegMap(@Self)^.&set := $00000008;
  38714. end;
  38715. function TUART2B_U6STA.getPERR : TBits_1; inline;
  38716. begin
  38717. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38718. end;
  38719. procedure TUART2B_U6STA.setRIDLE; inline;
  38720. begin
  38721. pTDefRegMap(@Self)^.&set := $00000010;
  38722. end;
  38723. procedure TUART2B_U6STA.clearRIDLE; inline;
  38724. begin
  38725. pTDefRegMap(@Self)^.clr := $00000010;
  38726. end;
  38727. procedure TUART2B_U6STA.setRIDLE(thebits : TBits_1); inline;
  38728. begin
  38729. if thebits = 0 then
  38730. pTDefRegMap(@Self)^.clr := $00000010
  38731. else
  38732. pTDefRegMap(@Self)^.&set := $00000010;
  38733. end;
  38734. function TUART2B_U6STA.getRIDLE : TBits_1; inline;
  38735. begin
  38736. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38737. end;
  38738. procedure TUART2B_U6STA.setADDEN; inline;
  38739. begin
  38740. pTDefRegMap(@Self)^.&set := $00000020;
  38741. end;
  38742. procedure TUART2B_U6STA.clearADDEN; inline;
  38743. begin
  38744. pTDefRegMap(@Self)^.clr := $00000020;
  38745. end;
  38746. procedure TUART2B_U6STA.setADDEN(thebits : TBits_1); inline;
  38747. begin
  38748. if thebits = 0 then
  38749. pTDefRegMap(@Self)^.clr := $00000020
  38750. else
  38751. pTDefRegMap(@Self)^.&set := $00000020;
  38752. end;
  38753. function TUART2B_U6STA.getADDEN : TBits_1; inline;
  38754. begin
  38755. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38756. end;
  38757. procedure TUART2B_U6STA.setURXISEL(thebits : TBits_2); inline;
  38758. begin
  38759. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  38760. end;
  38761. function TUART2B_U6STA.getURXISEL : TBits_2; inline;
  38762. begin
  38763. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  38764. end;
  38765. procedure TUART2B_U6STA.setTRMT; inline;
  38766. begin
  38767. pTDefRegMap(@Self)^.&set := $00000100;
  38768. end;
  38769. procedure TUART2B_U6STA.clearTRMT; inline;
  38770. begin
  38771. pTDefRegMap(@Self)^.clr := $00000100;
  38772. end;
  38773. procedure TUART2B_U6STA.setTRMT(thebits : TBits_1); inline;
  38774. begin
  38775. if thebits = 0 then
  38776. pTDefRegMap(@Self)^.clr := $00000100
  38777. else
  38778. pTDefRegMap(@Self)^.&set := $00000100;
  38779. end;
  38780. function TUART2B_U6STA.getTRMT : TBits_1; inline;
  38781. begin
  38782. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38783. end;
  38784. procedure TUART2B_U6STA.setUTXBF; inline;
  38785. begin
  38786. pTDefRegMap(@Self)^.&set := $00000200;
  38787. end;
  38788. procedure TUART2B_U6STA.clearUTXBF; inline;
  38789. begin
  38790. pTDefRegMap(@Self)^.clr := $00000200;
  38791. end;
  38792. procedure TUART2B_U6STA.setUTXBF(thebits : TBits_1); inline;
  38793. begin
  38794. if thebits = 0 then
  38795. pTDefRegMap(@Self)^.clr := $00000200
  38796. else
  38797. pTDefRegMap(@Self)^.&set := $00000200;
  38798. end;
  38799. function TUART2B_U6STA.getUTXBF : TBits_1; inline;
  38800. begin
  38801. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38802. end;
  38803. procedure TUART2B_U6STA.setUTXEN; inline;
  38804. begin
  38805. pTDefRegMap(@Self)^.&set := $00000400;
  38806. end;
  38807. procedure TUART2B_U6STA.clearUTXEN; inline;
  38808. begin
  38809. pTDefRegMap(@Self)^.clr := $00000400;
  38810. end;
  38811. procedure TUART2B_U6STA.setUTXEN(thebits : TBits_1); inline;
  38812. begin
  38813. if thebits = 0 then
  38814. pTDefRegMap(@Self)^.clr := $00000400
  38815. else
  38816. pTDefRegMap(@Self)^.&set := $00000400;
  38817. end;
  38818. function TUART2B_U6STA.getUTXEN : TBits_1; inline;
  38819. begin
  38820. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38821. end;
  38822. procedure TUART2B_U6STA.setUTXBRK; inline;
  38823. begin
  38824. pTDefRegMap(@Self)^.&set := $00000800;
  38825. end;
  38826. procedure TUART2B_U6STA.clearUTXBRK; inline;
  38827. begin
  38828. pTDefRegMap(@Self)^.clr := $00000800;
  38829. end;
  38830. procedure TUART2B_U6STA.setUTXBRK(thebits : TBits_1); inline;
  38831. begin
  38832. if thebits = 0 then
  38833. pTDefRegMap(@Self)^.clr := $00000800
  38834. else
  38835. pTDefRegMap(@Self)^.&set := $00000800;
  38836. end;
  38837. function TUART2B_U6STA.getUTXBRK : TBits_1; inline;
  38838. begin
  38839. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38840. end;
  38841. procedure TUART2B_U6STA.setURXEN; inline;
  38842. begin
  38843. pTDefRegMap(@Self)^.&set := $00001000;
  38844. end;
  38845. procedure TUART2B_U6STA.clearURXEN; inline;
  38846. begin
  38847. pTDefRegMap(@Self)^.clr := $00001000;
  38848. end;
  38849. procedure TUART2B_U6STA.setURXEN(thebits : TBits_1); inline;
  38850. begin
  38851. if thebits = 0 then
  38852. pTDefRegMap(@Self)^.clr := $00001000
  38853. else
  38854. pTDefRegMap(@Self)^.&set := $00001000;
  38855. end;
  38856. function TUART2B_U6STA.getURXEN : TBits_1; inline;
  38857. begin
  38858. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38859. end;
  38860. procedure TUART2B_U6STA.setUTXINV; inline;
  38861. begin
  38862. pTDefRegMap(@Self)^.&set := $00002000;
  38863. end;
  38864. procedure TUART2B_U6STA.clearUTXINV; inline;
  38865. begin
  38866. pTDefRegMap(@Self)^.clr := $00002000;
  38867. end;
  38868. procedure TUART2B_U6STA.setUTXINV(thebits : TBits_1); inline;
  38869. begin
  38870. if thebits = 0 then
  38871. pTDefRegMap(@Self)^.clr := $00002000
  38872. else
  38873. pTDefRegMap(@Self)^.&set := $00002000;
  38874. end;
  38875. function TUART2B_U6STA.getUTXINV : TBits_1; inline;
  38876. begin
  38877. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38878. end;
  38879. procedure TUART2B_U6STA.setUTXISEL(thebits : TBits_2); inline;
  38880. begin
  38881. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  38882. end;
  38883. function TUART2B_U6STA.getUTXISEL : TBits_2; inline;
  38884. begin
  38885. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  38886. end;
  38887. procedure TUART2B_U6STA.setADDR(thebits : TBits_8); inline;
  38888. begin
  38889. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  38890. end;
  38891. function TUART2B_U6STA.getADDR : TBits_8; inline;
  38892. begin
  38893. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  38894. end;
  38895. procedure TUART2B_U6STA.setADM_EN; inline;
  38896. begin
  38897. pTDefRegMap(@Self)^.&set := $01000000;
  38898. end;
  38899. procedure TUART2B_U6STA.clearADM_EN; inline;
  38900. begin
  38901. pTDefRegMap(@Self)^.clr := $01000000;
  38902. end;
  38903. procedure TUART2B_U6STA.setADM_EN(thebits : TBits_1); inline;
  38904. begin
  38905. if thebits = 0 then
  38906. pTDefRegMap(@Self)^.clr := $01000000
  38907. else
  38908. pTDefRegMap(@Self)^.&set := $01000000;
  38909. end;
  38910. function TUART2B_U6STA.getADM_EN : TBits_1; inline;
  38911. begin
  38912. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  38913. end;
  38914. procedure TUART2B_U6STA.setURXISEL0; inline;
  38915. begin
  38916. pTDefRegMap(@Self)^.&set := $00000040;
  38917. end;
  38918. procedure TUART2B_U6STA.clearURXISEL0; inline;
  38919. begin
  38920. pTDefRegMap(@Self)^.clr := $00000040;
  38921. end;
  38922. procedure TUART2B_U6STA.setURXISEL0(thebits : TBits_1); inline;
  38923. begin
  38924. if thebits = 0 then
  38925. pTDefRegMap(@Self)^.clr := $00000040
  38926. else
  38927. pTDefRegMap(@Self)^.&set := $00000040;
  38928. end;
  38929. function TUART2B_U6STA.getURXISEL0 : TBits_1; inline;
  38930. begin
  38931. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38932. end;
  38933. procedure TUART2B_U6STA.setURXISEL1; inline;
  38934. begin
  38935. pTDefRegMap(@Self)^.&set := $00000080;
  38936. end;
  38937. procedure TUART2B_U6STA.clearURXISEL1; inline;
  38938. begin
  38939. pTDefRegMap(@Self)^.clr := $00000080;
  38940. end;
  38941. procedure TUART2B_U6STA.setURXISEL1(thebits : TBits_1); inline;
  38942. begin
  38943. if thebits = 0 then
  38944. pTDefRegMap(@Self)^.clr := $00000080
  38945. else
  38946. pTDefRegMap(@Self)^.&set := $00000080;
  38947. end;
  38948. function TUART2B_U6STA.getURXISEL1 : TBits_1; inline;
  38949. begin
  38950. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38951. end;
  38952. procedure TUART2B_U6STA.setUTXISEL0; inline;
  38953. begin
  38954. pTDefRegMap(@Self)^.&set := $00004000;
  38955. end;
  38956. procedure TUART2B_U6STA.clearUTXISEL0; inline;
  38957. begin
  38958. pTDefRegMap(@Self)^.clr := $00004000;
  38959. end;
  38960. procedure TUART2B_U6STA.setUTXISEL0(thebits : TBits_1); inline;
  38961. begin
  38962. if thebits = 0 then
  38963. pTDefRegMap(@Self)^.clr := $00004000
  38964. else
  38965. pTDefRegMap(@Self)^.&set := $00004000;
  38966. end;
  38967. function TUART2B_U6STA.getUTXISEL0 : TBits_1; inline;
  38968. begin
  38969. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  38970. end;
  38971. procedure TUART2B_U6STA.setUTXISEL1; inline;
  38972. begin
  38973. pTDefRegMap(@Self)^.&set := $00008000;
  38974. end;
  38975. procedure TUART2B_U6STA.clearUTXISEL1; inline;
  38976. begin
  38977. pTDefRegMap(@Self)^.clr := $00008000;
  38978. end;
  38979. procedure TUART2B_U6STA.setUTXISEL1(thebits : TBits_1); inline;
  38980. begin
  38981. if thebits = 0 then
  38982. pTDefRegMap(@Self)^.clr := $00008000
  38983. else
  38984. pTDefRegMap(@Self)^.&set := $00008000;
  38985. end;
  38986. function TUART2B_U6STA.getUTXISEL1 : TBits_1; inline;
  38987. begin
  38988. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38989. end;
  38990. procedure TUART2B_U6STA.setUTXSEL(thebits : TBits_2); inline;
  38991. begin
  38992. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  38993. end;
  38994. function TUART2B_U6STA.getUTXSEL : TBits_2; inline;
  38995. begin
  38996. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  38997. end;
  38998. procedure TUART2B_U6STA.setw(thebits : TBits_32); inline;
  38999. begin
  39000. pTDefRegMap(@Self)^.val := thebits;
  39001. end;
  39002. function TUART2B_U6STA.getw : TBits_32; inline;
  39003. begin
  39004. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39005. end;
  39006. procedure TUART3A_U2MODE.setSTSEL; inline;
  39007. begin
  39008. pTDefRegMap(@Self)^.&set := $00000001;
  39009. end;
  39010. procedure TUART3A_U2MODE.clearSTSEL; inline;
  39011. begin
  39012. pTDefRegMap(@Self)^.clr := $00000001;
  39013. end;
  39014. procedure TUART3A_U2MODE.setSTSEL(thebits : TBits_1); inline;
  39015. begin
  39016. if thebits = 0 then
  39017. pTDefRegMap(@Self)^.clr := $00000001
  39018. else
  39019. pTDefRegMap(@Self)^.&set := $00000001;
  39020. end;
  39021. function TUART3A_U2MODE.getSTSEL : TBits_1; inline;
  39022. begin
  39023. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39024. end;
  39025. procedure TUART3A_U2MODE.setPDSEL(thebits : TBits_2); inline;
  39026. begin
  39027. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  39028. end;
  39029. function TUART3A_U2MODE.getPDSEL : TBits_2; inline;
  39030. begin
  39031. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  39032. end;
  39033. procedure TUART3A_U2MODE.setBRGH; inline;
  39034. begin
  39035. pTDefRegMap(@Self)^.&set := $00000008;
  39036. end;
  39037. procedure TUART3A_U2MODE.clearBRGH; inline;
  39038. begin
  39039. pTDefRegMap(@Self)^.clr := $00000008;
  39040. end;
  39041. procedure TUART3A_U2MODE.setBRGH(thebits : TBits_1); inline;
  39042. begin
  39043. if thebits = 0 then
  39044. pTDefRegMap(@Self)^.clr := $00000008
  39045. else
  39046. pTDefRegMap(@Self)^.&set := $00000008;
  39047. end;
  39048. function TUART3A_U2MODE.getBRGH : TBits_1; inline;
  39049. begin
  39050. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39051. end;
  39052. procedure TUART3A_U2MODE.setRXINV; inline;
  39053. begin
  39054. pTDefRegMap(@Self)^.&set := $00000010;
  39055. end;
  39056. procedure TUART3A_U2MODE.clearRXINV; inline;
  39057. begin
  39058. pTDefRegMap(@Self)^.clr := $00000010;
  39059. end;
  39060. procedure TUART3A_U2MODE.setRXINV(thebits : TBits_1); inline;
  39061. begin
  39062. if thebits = 0 then
  39063. pTDefRegMap(@Self)^.clr := $00000010
  39064. else
  39065. pTDefRegMap(@Self)^.&set := $00000010;
  39066. end;
  39067. function TUART3A_U2MODE.getRXINV : TBits_1; inline;
  39068. begin
  39069. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  39070. end;
  39071. procedure TUART3A_U2MODE.setABAUD; inline;
  39072. begin
  39073. pTDefRegMap(@Self)^.&set := $00000020;
  39074. end;
  39075. procedure TUART3A_U2MODE.clearABAUD; inline;
  39076. begin
  39077. pTDefRegMap(@Self)^.clr := $00000020;
  39078. end;
  39079. procedure TUART3A_U2MODE.setABAUD(thebits : TBits_1); inline;
  39080. begin
  39081. if thebits = 0 then
  39082. pTDefRegMap(@Self)^.clr := $00000020
  39083. else
  39084. pTDefRegMap(@Self)^.&set := $00000020;
  39085. end;
  39086. function TUART3A_U2MODE.getABAUD : TBits_1; inline;
  39087. begin
  39088. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39089. end;
  39090. procedure TUART3A_U2MODE.setLPBACK; inline;
  39091. begin
  39092. pTDefRegMap(@Self)^.&set := $00000040;
  39093. end;
  39094. procedure TUART3A_U2MODE.clearLPBACK; inline;
  39095. begin
  39096. pTDefRegMap(@Self)^.clr := $00000040;
  39097. end;
  39098. procedure TUART3A_U2MODE.setLPBACK(thebits : TBits_1); inline;
  39099. begin
  39100. if thebits = 0 then
  39101. pTDefRegMap(@Self)^.clr := $00000040
  39102. else
  39103. pTDefRegMap(@Self)^.&set := $00000040;
  39104. end;
  39105. function TUART3A_U2MODE.getLPBACK : TBits_1; inline;
  39106. begin
  39107. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39108. end;
  39109. procedure TUART3A_U2MODE.setWAKE; inline;
  39110. begin
  39111. pTDefRegMap(@Self)^.&set := $00000080;
  39112. end;
  39113. procedure TUART3A_U2MODE.clearWAKE; inline;
  39114. begin
  39115. pTDefRegMap(@Self)^.clr := $00000080;
  39116. end;
  39117. procedure TUART3A_U2MODE.setWAKE(thebits : TBits_1); inline;
  39118. begin
  39119. if thebits = 0 then
  39120. pTDefRegMap(@Self)^.clr := $00000080
  39121. else
  39122. pTDefRegMap(@Self)^.&set := $00000080;
  39123. end;
  39124. function TUART3A_U2MODE.getWAKE : TBits_1; inline;
  39125. begin
  39126. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39127. end;
  39128. procedure TUART3A_U2MODE.setUEN(thebits : TBits_2); inline;
  39129. begin
  39130. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  39131. end;
  39132. function TUART3A_U2MODE.getUEN : TBits_2; inline;
  39133. begin
  39134. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  39135. end;
  39136. procedure TUART3A_U2MODE.setRTSMD; inline;
  39137. begin
  39138. pTDefRegMap(@Self)^.&set := $00000800;
  39139. end;
  39140. procedure TUART3A_U2MODE.clearRTSMD; inline;
  39141. begin
  39142. pTDefRegMap(@Self)^.clr := $00000800;
  39143. end;
  39144. procedure TUART3A_U2MODE.setRTSMD(thebits : TBits_1); inline;
  39145. begin
  39146. if thebits = 0 then
  39147. pTDefRegMap(@Self)^.clr := $00000800
  39148. else
  39149. pTDefRegMap(@Self)^.&set := $00000800;
  39150. end;
  39151. function TUART3A_U2MODE.getRTSMD : TBits_1; inline;
  39152. begin
  39153. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  39154. end;
  39155. procedure TUART3A_U2MODE.setIREN; inline;
  39156. begin
  39157. pTDefRegMap(@Self)^.&set := $00001000;
  39158. end;
  39159. procedure TUART3A_U2MODE.clearIREN; inline;
  39160. begin
  39161. pTDefRegMap(@Self)^.clr := $00001000;
  39162. end;
  39163. procedure TUART3A_U2MODE.setIREN(thebits : TBits_1); inline;
  39164. begin
  39165. if thebits = 0 then
  39166. pTDefRegMap(@Self)^.clr := $00001000
  39167. else
  39168. pTDefRegMap(@Self)^.&set := $00001000;
  39169. end;
  39170. function TUART3A_U2MODE.getIREN : TBits_1; inline;
  39171. begin
  39172. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  39173. end;
  39174. procedure TUART3A_U2MODE.setSIDL; inline;
  39175. begin
  39176. pTDefRegMap(@Self)^.&set := $00002000;
  39177. end;
  39178. procedure TUART3A_U2MODE.clearSIDL; inline;
  39179. begin
  39180. pTDefRegMap(@Self)^.clr := $00002000;
  39181. end;
  39182. procedure TUART3A_U2MODE.setSIDL(thebits : TBits_1); inline;
  39183. begin
  39184. if thebits = 0 then
  39185. pTDefRegMap(@Self)^.clr := $00002000
  39186. else
  39187. pTDefRegMap(@Self)^.&set := $00002000;
  39188. end;
  39189. function TUART3A_U2MODE.getSIDL : TBits_1; inline;
  39190. begin
  39191. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39192. end;
  39193. procedure TUART3A_U2MODE.setON; inline;
  39194. begin
  39195. pTDefRegMap(@Self)^.&set := $00008000;
  39196. end;
  39197. procedure TUART3A_U2MODE.clearON; inline;
  39198. begin
  39199. pTDefRegMap(@Self)^.clr := $00008000;
  39200. end;
  39201. procedure TUART3A_U2MODE.setON(thebits : TBits_1); inline;
  39202. begin
  39203. if thebits = 0 then
  39204. pTDefRegMap(@Self)^.clr := $00008000
  39205. else
  39206. pTDefRegMap(@Self)^.&set := $00008000;
  39207. end;
  39208. function TUART3A_U2MODE.getON : TBits_1; inline;
  39209. begin
  39210. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39211. end;
  39212. procedure TUART3A_U2MODE.setPDSEL0; inline;
  39213. begin
  39214. pTDefRegMap(@Self)^.&set := $00000002;
  39215. end;
  39216. procedure TUART3A_U2MODE.clearPDSEL0; inline;
  39217. begin
  39218. pTDefRegMap(@Self)^.clr := $00000002;
  39219. end;
  39220. procedure TUART3A_U2MODE.setPDSEL0(thebits : TBits_1); inline;
  39221. begin
  39222. if thebits = 0 then
  39223. pTDefRegMap(@Self)^.clr := $00000002
  39224. else
  39225. pTDefRegMap(@Self)^.&set := $00000002;
  39226. end;
  39227. function TUART3A_U2MODE.getPDSEL0 : TBits_1; inline;
  39228. begin
  39229. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39230. end;
  39231. procedure TUART3A_U2MODE.setPDSEL1; inline;
  39232. begin
  39233. pTDefRegMap(@Self)^.&set := $00000004;
  39234. end;
  39235. procedure TUART3A_U2MODE.clearPDSEL1; inline;
  39236. begin
  39237. pTDefRegMap(@Self)^.clr := $00000004;
  39238. end;
  39239. procedure TUART3A_U2MODE.setPDSEL1(thebits : TBits_1); inline;
  39240. begin
  39241. if thebits = 0 then
  39242. pTDefRegMap(@Self)^.clr := $00000004
  39243. else
  39244. pTDefRegMap(@Self)^.&set := $00000004;
  39245. end;
  39246. function TUART3A_U2MODE.getPDSEL1 : TBits_1; inline;
  39247. begin
  39248. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39249. end;
  39250. procedure TUART3A_U2MODE.setUEN0; inline;
  39251. begin
  39252. pTDefRegMap(@Self)^.&set := $00000100;
  39253. end;
  39254. procedure TUART3A_U2MODE.clearUEN0; inline;
  39255. begin
  39256. pTDefRegMap(@Self)^.clr := $00000100;
  39257. end;
  39258. procedure TUART3A_U2MODE.setUEN0(thebits : TBits_1); inline;
  39259. begin
  39260. if thebits = 0 then
  39261. pTDefRegMap(@Self)^.clr := $00000100
  39262. else
  39263. pTDefRegMap(@Self)^.&set := $00000100;
  39264. end;
  39265. function TUART3A_U2MODE.getUEN0 : TBits_1; inline;
  39266. begin
  39267. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39268. end;
  39269. procedure TUART3A_U2MODE.setUEN1; inline;
  39270. begin
  39271. pTDefRegMap(@Self)^.&set := $00000200;
  39272. end;
  39273. procedure TUART3A_U2MODE.clearUEN1; inline;
  39274. begin
  39275. pTDefRegMap(@Self)^.clr := $00000200;
  39276. end;
  39277. procedure TUART3A_U2MODE.setUEN1(thebits : TBits_1); inline;
  39278. begin
  39279. if thebits = 0 then
  39280. pTDefRegMap(@Self)^.clr := $00000200
  39281. else
  39282. pTDefRegMap(@Self)^.&set := $00000200;
  39283. end;
  39284. function TUART3A_U2MODE.getUEN1 : TBits_1; inline;
  39285. begin
  39286. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39287. end;
  39288. procedure TUART3A_U2MODE.setUSIDL; inline;
  39289. begin
  39290. pTDefRegMap(@Self)^.&set := $00002000;
  39291. end;
  39292. procedure TUART3A_U2MODE.clearUSIDL; inline;
  39293. begin
  39294. pTDefRegMap(@Self)^.clr := $00002000;
  39295. end;
  39296. procedure TUART3A_U2MODE.setUSIDL(thebits : TBits_1); inline;
  39297. begin
  39298. if thebits = 0 then
  39299. pTDefRegMap(@Self)^.clr := $00002000
  39300. else
  39301. pTDefRegMap(@Self)^.&set := $00002000;
  39302. end;
  39303. function TUART3A_U2MODE.getUSIDL : TBits_1; inline;
  39304. begin
  39305. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39306. end;
  39307. procedure TUART3A_U2MODE.setUARTEN; inline;
  39308. begin
  39309. pTDefRegMap(@Self)^.&set := $00008000;
  39310. end;
  39311. procedure TUART3A_U2MODE.clearUARTEN; inline;
  39312. begin
  39313. pTDefRegMap(@Self)^.clr := $00008000;
  39314. end;
  39315. procedure TUART3A_U2MODE.setUARTEN(thebits : TBits_1); inline;
  39316. begin
  39317. if thebits = 0 then
  39318. pTDefRegMap(@Self)^.clr := $00008000
  39319. else
  39320. pTDefRegMap(@Self)^.&set := $00008000;
  39321. end;
  39322. function TUART3A_U2MODE.getUARTEN : TBits_1; inline;
  39323. begin
  39324. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39325. end;
  39326. procedure TUART3A_U2MODE.setw(thebits : TBits_32); inline;
  39327. begin
  39328. pTDefRegMap(@Self)^.val := thebits;
  39329. end;
  39330. function TUART3A_U2MODE.getw : TBits_32; inline;
  39331. begin
  39332. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39333. end;
  39334. procedure TUART3A_U3AMODE.setSTSEL; inline;
  39335. begin
  39336. pTDefRegMap(@Self)^.&set := $00000001;
  39337. end;
  39338. procedure TUART3A_U3AMODE.clearSTSEL; inline;
  39339. begin
  39340. pTDefRegMap(@Self)^.clr := $00000001;
  39341. end;
  39342. procedure TUART3A_U3AMODE.setSTSEL(thebits : TBits_1); inline;
  39343. begin
  39344. if thebits = 0 then
  39345. pTDefRegMap(@Self)^.clr := $00000001
  39346. else
  39347. pTDefRegMap(@Self)^.&set := $00000001;
  39348. end;
  39349. function TUART3A_U3AMODE.getSTSEL : TBits_1; inline;
  39350. begin
  39351. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39352. end;
  39353. procedure TUART3A_U3AMODE.setPDSEL(thebits : TBits_2); inline;
  39354. begin
  39355. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  39356. end;
  39357. function TUART3A_U3AMODE.getPDSEL : TBits_2; inline;
  39358. begin
  39359. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  39360. end;
  39361. procedure TUART3A_U3AMODE.setBRGH; inline;
  39362. begin
  39363. pTDefRegMap(@Self)^.&set := $00000008;
  39364. end;
  39365. procedure TUART3A_U3AMODE.clearBRGH; inline;
  39366. begin
  39367. pTDefRegMap(@Self)^.clr := $00000008;
  39368. end;
  39369. procedure TUART3A_U3AMODE.setBRGH(thebits : TBits_1); inline;
  39370. begin
  39371. if thebits = 0 then
  39372. pTDefRegMap(@Self)^.clr := $00000008
  39373. else
  39374. pTDefRegMap(@Self)^.&set := $00000008;
  39375. end;
  39376. function TUART3A_U3AMODE.getBRGH : TBits_1; inline;
  39377. begin
  39378. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39379. end;
  39380. procedure TUART3A_U3AMODE.setRXINV; inline;
  39381. begin
  39382. pTDefRegMap(@Self)^.&set := $00000010;
  39383. end;
  39384. procedure TUART3A_U3AMODE.clearRXINV; inline;
  39385. begin
  39386. pTDefRegMap(@Self)^.clr := $00000010;
  39387. end;
  39388. procedure TUART3A_U3AMODE.setRXINV(thebits : TBits_1); inline;
  39389. begin
  39390. if thebits = 0 then
  39391. pTDefRegMap(@Self)^.clr := $00000010
  39392. else
  39393. pTDefRegMap(@Self)^.&set := $00000010;
  39394. end;
  39395. function TUART3A_U3AMODE.getRXINV : TBits_1; inline;
  39396. begin
  39397. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  39398. end;
  39399. procedure TUART3A_U3AMODE.setABAUD; inline;
  39400. begin
  39401. pTDefRegMap(@Self)^.&set := $00000020;
  39402. end;
  39403. procedure TUART3A_U3AMODE.clearABAUD; inline;
  39404. begin
  39405. pTDefRegMap(@Self)^.clr := $00000020;
  39406. end;
  39407. procedure TUART3A_U3AMODE.setABAUD(thebits : TBits_1); inline;
  39408. begin
  39409. if thebits = 0 then
  39410. pTDefRegMap(@Self)^.clr := $00000020
  39411. else
  39412. pTDefRegMap(@Self)^.&set := $00000020;
  39413. end;
  39414. function TUART3A_U3AMODE.getABAUD : TBits_1; inline;
  39415. begin
  39416. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39417. end;
  39418. procedure TUART3A_U3AMODE.setLPBACK; inline;
  39419. begin
  39420. pTDefRegMap(@Self)^.&set := $00000040;
  39421. end;
  39422. procedure TUART3A_U3AMODE.clearLPBACK; inline;
  39423. begin
  39424. pTDefRegMap(@Self)^.clr := $00000040;
  39425. end;
  39426. procedure TUART3A_U3AMODE.setLPBACK(thebits : TBits_1); inline;
  39427. begin
  39428. if thebits = 0 then
  39429. pTDefRegMap(@Self)^.clr := $00000040
  39430. else
  39431. pTDefRegMap(@Self)^.&set := $00000040;
  39432. end;
  39433. function TUART3A_U3AMODE.getLPBACK : TBits_1; inline;
  39434. begin
  39435. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39436. end;
  39437. procedure TUART3A_U3AMODE.setWAKE; inline;
  39438. begin
  39439. pTDefRegMap(@Self)^.&set := $00000080;
  39440. end;
  39441. procedure TUART3A_U3AMODE.clearWAKE; inline;
  39442. begin
  39443. pTDefRegMap(@Self)^.clr := $00000080;
  39444. end;
  39445. procedure TUART3A_U3AMODE.setWAKE(thebits : TBits_1); inline;
  39446. begin
  39447. if thebits = 0 then
  39448. pTDefRegMap(@Self)^.clr := $00000080
  39449. else
  39450. pTDefRegMap(@Self)^.&set := $00000080;
  39451. end;
  39452. function TUART3A_U3AMODE.getWAKE : TBits_1; inline;
  39453. begin
  39454. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39455. end;
  39456. procedure TUART3A_U3AMODE.setUEN(thebits : TBits_2); inline;
  39457. begin
  39458. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  39459. end;
  39460. function TUART3A_U3AMODE.getUEN : TBits_2; inline;
  39461. begin
  39462. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  39463. end;
  39464. procedure TUART3A_U3AMODE.setRTSMD; inline;
  39465. begin
  39466. pTDefRegMap(@Self)^.&set := $00000800;
  39467. end;
  39468. procedure TUART3A_U3AMODE.clearRTSMD; inline;
  39469. begin
  39470. pTDefRegMap(@Self)^.clr := $00000800;
  39471. end;
  39472. procedure TUART3A_U3AMODE.setRTSMD(thebits : TBits_1); inline;
  39473. begin
  39474. if thebits = 0 then
  39475. pTDefRegMap(@Self)^.clr := $00000800
  39476. else
  39477. pTDefRegMap(@Self)^.&set := $00000800;
  39478. end;
  39479. function TUART3A_U3AMODE.getRTSMD : TBits_1; inline;
  39480. begin
  39481. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  39482. end;
  39483. procedure TUART3A_U3AMODE.setIREN; inline;
  39484. begin
  39485. pTDefRegMap(@Self)^.&set := $00001000;
  39486. end;
  39487. procedure TUART3A_U3AMODE.clearIREN; inline;
  39488. begin
  39489. pTDefRegMap(@Self)^.clr := $00001000;
  39490. end;
  39491. procedure TUART3A_U3AMODE.setIREN(thebits : TBits_1); inline;
  39492. begin
  39493. if thebits = 0 then
  39494. pTDefRegMap(@Self)^.clr := $00001000
  39495. else
  39496. pTDefRegMap(@Self)^.&set := $00001000;
  39497. end;
  39498. function TUART3A_U3AMODE.getIREN : TBits_1; inline;
  39499. begin
  39500. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  39501. end;
  39502. procedure TUART3A_U3AMODE.setSIDL; inline;
  39503. begin
  39504. pTDefRegMap(@Self)^.&set := $00002000;
  39505. end;
  39506. procedure TUART3A_U3AMODE.clearSIDL; inline;
  39507. begin
  39508. pTDefRegMap(@Self)^.clr := $00002000;
  39509. end;
  39510. procedure TUART3A_U3AMODE.setSIDL(thebits : TBits_1); inline;
  39511. begin
  39512. if thebits = 0 then
  39513. pTDefRegMap(@Self)^.clr := $00002000
  39514. else
  39515. pTDefRegMap(@Self)^.&set := $00002000;
  39516. end;
  39517. function TUART3A_U3AMODE.getSIDL : TBits_1; inline;
  39518. begin
  39519. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39520. end;
  39521. procedure TUART3A_U3AMODE.setON; inline;
  39522. begin
  39523. pTDefRegMap(@Self)^.&set := $00008000;
  39524. end;
  39525. procedure TUART3A_U3AMODE.clearON; inline;
  39526. begin
  39527. pTDefRegMap(@Self)^.clr := $00008000;
  39528. end;
  39529. procedure TUART3A_U3AMODE.setON(thebits : TBits_1); inline;
  39530. begin
  39531. if thebits = 0 then
  39532. pTDefRegMap(@Self)^.clr := $00008000
  39533. else
  39534. pTDefRegMap(@Self)^.&set := $00008000;
  39535. end;
  39536. function TUART3A_U3AMODE.getON : TBits_1; inline;
  39537. begin
  39538. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39539. end;
  39540. procedure TUART3A_U3AMODE.setPDSEL0; inline;
  39541. begin
  39542. pTDefRegMap(@Self)^.&set := $00000002;
  39543. end;
  39544. procedure TUART3A_U3AMODE.clearPDSEL0; inline;
  39545. begin
  39546. pTDefRegMap(@Self)^.clr := $00000002;
  39547. end;
  39548. procedure TUART3A_U3AMODE.setPDSEL0(thebits : TBits_1); inline;
  39549. begin
  39550. if thebits = 0 then
  39551. pTDefRegMap(@Self)^.clr := $00000002
  39552. else
  39553. pTDefRegMap(@Self)^.&set := $00000002;
  39554. end;
  39555. function TUART3A_U3AMODE.getPDSEL0 : TBits_1; inline;
  39556. begin
  39557. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39558. end;
  39559. procedure TUART3A_U3AMODE.setPDSEL1; inline;
  39560. begin
  39561. pTDefRegMap(@Self)^.&set := $00000004;
  39562. end;
  39563. procedure TUART3A_U3AMODE.clearPDSEL1; inline;
  39564. begin
  39565. pTDefRegMap(@Self)^.clr := $00000004;
  39566. end;
  39567. procedure TUART3A_U3AMODE.setPDSEL1(thebits : TBits_1); inline;
  39568. begin
  39569. if thebits = 0 then
  39570. pTDefRegMap(@Self)^.clr := $00000004
  39571. else
  39572. pTDefRegMap(@Self)^.&set := $00000004;
  39573. end;
  39574. function TUART3A_U3AMODE.getPDSEL1 : TBits_1; inline;
  39575. begin
  39576. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39577. end;
  39578. procedure TUART3A_U3AMODE.setUEN0; inline;
  39579. begin
  39580. pTDefRegMap(@Self)^.&set := $00000100;
  39581. end;
  39582. procedure TUART3A_U3AMODE.clearUEN0; inline;
  39583. begin
  39584. pTDefRegMap(@Self)^.clr := $00000100;
  39585. end;
  39586. procedure TUART3A_U3AMODE.setUEN0(thebits : TBits_1); inline;
  39587. begin
  39588. if thebits = 0 then
  39589. pTDefRegMap(@Self)^.clr := $00000100
  39590. else
  39591. pTDefRegMap(@Self)^.&set := $00000100;
  39592. end;
  39593. function TUART3A_U3AMODE.getUEN0 : TBits_1; inline;
  39594. begin
  39595. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39596. end;
  39597. procedure TUART3A_U3AMODE.setUEN1; inline;
  39598. begin
  39599. pTDefRegMap(@Self)^.&set := $00000200;
  39600. end;
  39601. procedure TUART3A_U3AMODE.clearUEN1; inline;
  39602. begin
  39603. pTDefRegMap(@Self)^.clr := $00000200;
  39604. end;
  39605. procedure TUART3A_U3AMODE.setUEN1(thebits : TBits_1); inline;
  39606. begin
  39607. if thebits = 0 then
  39608. pTDefRegMap(@Self)^.clr := $00000200
  39609. else
  39610. pTDefRegMap(@Self)^.&set := $00000200;
  39611. end;
  39612. function TUART3A_U3AMODE.getUEN1 : TBits_1; inline;
  39613. begin
  39614. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39615. end;
  39616. procedure TUART3A_U3AMODE.setUSIDL; inline;
  39617. begin
  39618. pTDefRegMap(@Self)^.&set := $00002000;
  39619. end;
  39620. procedure TUART3A_U3AMODE.clearUSIDL; inline;
  39621. begin
  39622. pTDefRegMap(@Self)^.clr := $00002000;
  39623. end;
  39624. procedure TUART3A_U3AMODE.setUSIDL(thebits : TBits_1); inline;
  39625. begin
  39626. if thebits = 0 then
  39627. pTDefRegMap(@Self)^.clr := $00002000
  39628. else
  39629. pTDefRegMap(@Self)^.&set := $00002000;
  39630. end;
  39631. function TUART3A_U3AMODE.getUSIDL : TBits_1; inline;
  39632. begin
  39633. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39634. end;
  39635. procedure TUART3A_U3AMODE.setUARTEN; inline;
  39636. begin
  39637. pTDefRegMap(@Self)^.&set := $00008000;
  39638. end;
  39639. procedure TUART3A_U3AMODE.clearUARTEN; inline;
  39640. begin
  39641. pTDefRegMap(@Self)^.clr := $00008000;
  39642. end;
  39643. procedure TUART3A_U3AMODE.setUARTEN(thebits : TBits_1); inline;
  39644. begin
  39645. if thebits = 0 then
  39646. pTDefRegMap(@Self)^.clr := $00008000
  39647. else
  39648. pTDefRegMap(@Self)^.&set := $00008000;
  39649. end;
  39650. function TUART3A_U3AMODE.getUARTEN : TBits_1; inline;
  39651. begin
  39652. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39653. end;
  39654. procedure TUART3A_U3AMODE.setw(thebits : TBits_32); inline;
  39655. begin
  39656. pTDefRegMap(@Self)^.val := thebits;
  39657. end;
  39658. function TUART3A_U3AMODE.getw : TBits_32; inline;
  39659. begin
  39660. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39661. end;
  39662. procedure TUART3A_U2STA.setURXDA; inline;
  39663. begin
  39664. pTDefRegMap(@Self)^.&set := $00000001;
  39665. end;
  39666. procedure TUART3A_U2STA.clearURXDA; inline;
  39667. begin
  39668. pTDefRegMap(@Self)^.clr := $00000001;
  39669. end;
  39670. procedure TUART3A_U2STA.setURXDA(thebits : TBits_1); inline;
  39671. begin
  39672. if thebits = 0 then
  39673. pTDefRegMap(@Self)^.clr := $00000001
  39674. else
  39675. pTDefRegMap(@Self)^.&set := $00000001;
  39676. end;
  39677. function TUART3A_U2STA.getURXDA : TBits_1; inline;
  39678. begin
  39679. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39680. end;
  39681. procedure TUART3A_U2STA.setOERR; inline;
  39682. begin
  39683. pTDefRegMap(@Self)^.&set := $00000002;
  39684. end;
  39685. procedure TUART3A_U2STA.clearOERR; inline;
  39686. begin
  39687. pTDefRegMap(@Self)^.clr := $00000002;
  39688. end;
  39689. procedure TUART3A_U2STA.setOERR(thebits : TBits_1); inline;
  39690. begin
  39691. if thebits = 0 then
  39692. pTDefRegMap(@Self)^.clr := $00000002
  39693. else
  39694. pTDefRegMap(@Self)^.&set := $00000002;
  39695. end;
  39696. function TUART3A_U2STA.getOERR : TBits_1; inline;
  39697. begin
  39698. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39699. end;
  39700. procedure TUART3A_U2STA.setFERR; inline;
  39701. begin
  39702. pTDefRegMap(@Self)^.&set := $00000004;
  39703. end;
  39704. procedure TUART3A_U2STA.clearFERR; inline;
  39705. begin
  39706. pTDefRegMap(@Self)^.clr := $00000004;
  39707. end;
  39708. procedure TUART3A_U2STA.setFERR(thebits : TBits_1); inline;
  39709. begin
  39710. if thebits = 0 then
  39711. pTDefRegMap(@Self)^.clr := $00000004
  39712. else
  39713. pTDefRegMap(@Self)^.&set := $00000004;
  39714. end;
  39715. function TUART3A_U2STA.getFERR : TBits_1; inline;
  39716. begin
  39717. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39718. end;
  39719. procedure TUART3A_U2STA.setPERR; inline;
  39720. begin
  39721. pTDefRegMap(@Self)^.&set := $00000008;
  39722. end;
  39723. procedure TUART3A_U2STA.clearPERR; inline;
  39724. begin
  39725. pTDefRegMap(@Self)^.clr := $00000008;
  39726. end;
  39727. procedure TUART3A_U2STA.setPERR(thebits : TBits_1); inline;
  39728. begin
  39729. if thebits = 0 then
  39730. pTDefRegMap(@Self)^.clr := $00000008
  39731. else
  39732. pTDefRegMap(@Self)^.&set := $00000008;
  39733. end;
  39734. function TUART3A_U2STA.getPERR : TBits_1; inline;
  39735. begin
  39736. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39737. end;
  39738. procedure TUART3A_U2STA.setRIDLE; inline;
  39739. begin
  39740. pTDefRegMap(@Self)^.&set := $00000010;
  39741. end;
  39742. procedure TUART3A_U2STA.clearRIDLE; inline;
  39743. begin
  39744. pTDefRegMap(@Self)^.clr := $00000010;
  39745. end;
  39746. procedure TUART3A_U2STA.setRIDLE(thebits : TBits_1); inline;
  39747. begin
  39748. if thebits = 0 then
  39749. pTDefRegMap(@Self)^.clr := $00000010
  39750. else
  39751. pTDefRegMap(@Self)^.&set := $00000010;
  39752. end;
  39753. function TUART3A_U2STA.getRIDLE : TBits_1; inline;
  39754. begin
  39755. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  39756. end;
  39757. procedure TUART3A_U2STA.setADDEN; inline;
  39758. begin
  39759. pTDefRegMap(@Self)^.&set := $00000020;
  39760. end;
  39761. procedure TUART3A_U2STA.clearADDEN; inline;
  39762. begin
  39763. pTDefRegMap(@Self)^.clr := $00000020;
  39764. end;
  39765. procedure TUART3A_U2STA.setADDEN(thebits : TBits_1); inline;
  39766. begin
  39767. if thebits = 0 then
  39768. pTDefRegMap(@Self)^.clr := $00000020
  39769. else
  39770. pTDefRegMap(@Self)^.&set := $00000020;
  39771. end;
  39772. function TUART3A_U2STA.getADDEN : TBits_1; inline;
  39773. begin
  39774. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39775. end;
  39776. procedure TUART3A_U2STA.setURXISEL(thebits : TBits_2); inline;
  39777. begin
  39778. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  39779. end;
  39780. function TUART3A_U2STA.getURXISEL : TBits_2; inline;
  39781. begin
  39782. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  39783. end;
  39784. procedure TUART3A_U2STA.setTRMT; inline;
  39785. begin
  39786. pTDefRegMap(@Self)^.&set := $00000100;
  39787. end;
  39788. procedure TUART3A_U2STA.clearTRMT; inline;
  39789. begin
  39790. pTDefRegMap(@Self)^.clr := $00000100;
  39791. end;
  39792. procedure TUART3A_U2STA.setTRMT(thebits : TBits_1); inline;
  39793. begin
  39794. if thebits = 0 then
  39795. pTDefRegMap(@Self)^.clr := $00000100
  39796. else
  39797. pTDefRegMap(@Self)^.&set := $00000100;
  39798. end;
  39799. function TUART3A_U2STA.getTRMT : TBits_1; inline;
  39800. begin
  39801. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39802. end;
  39803. procedure TUART3A_U2STA.setUTXBF; inline;
  39804. begin
  39805. pTDefRegMap(@Self)^.&set := $00000200;
  39806. end;
  39807. procedure TUART3A_U2STA.clearUTXBF; inline;
  39808. begin
  39809. pTDefRegMap(@Self)^.clr := $00000200;
  39810. end;
  39811. procedure TUART3A_U2STA.setUTXBF(thebits : TBits_1); inline;
  39812. begin
  39813. if thebits = 0 then
  39814. pTDefRegMap(@Self)^.clr := $00000200
  39815. else
  39816. pTDefRegMap(@Self)^.&set := $00000200;
  39817. end;
  39818. function TUART3A_U2STA.getUTXBF : TBits_1; inline;
  39819. begin
  39820. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39821. end;
  39822. procedure TUART3A_U2STA.setUTXEN; inline;
  39823. begin
  39824. pTDefRegMap(@Self)^.&set := $00000400;
  39825. end;
  39826. procedure TUART3A_U2STA.clearUTXEN; inline;
  39827. begin
  39828. pTDefRegMap(@Self)^.clr := $00000400;
  39829. end;
  39830. procedure TUART3A_U2STA.setUTXEN(thebits : TBits_1); inline;
  39831. begin
  39832. if thebits = 0 then
  39833. pTDefRegMap(@Self)^.clr := $00000400
  39834. else
  39835. pTDefRegMap(@Self)^.&set := $00000400;
  39836. end;
  39837. function TUART3A_U2STA.getUTXEN : TBits_1; inline;
  39838. begin
  39839. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  39840. end;
  39841. procedure TUART3A_U2STA.setUTXBRK; inline;
  39842. begin
  39843. pTDefRegMap(@Self)^.&set := $00000800;
  39844. end;
  39845. procedure TUART3A_U2STA.clearUTXBRK; inline;
  39846. begin
  39847. pTDefRegMap(@Self)^.clr := $00000800;
  39848. end;
  39849. procedure TUART3A_U2STA.setUTXBRK(thebits : TBits_1); inline;
  39850. begin
  39851. if thebits = 0 then
  39852. pTDefRegMap(@Self)^.clr := $00000800
  39853. else
  39854. pTDefRegMap(@Self)^.&set := $00000800;
  39855. end;
  39856. function TUART3A_U2STA.getUTXBRK : TBits_1; inline;
  39857. begin
  39858. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  39859. end;
  39860. procedure TUART3A_U2STA.setURXEN; inline;
  39861. begin
  39862. pTDefRegMap(@Self)^.&set := $00001000;
  39863. end;
  39864. procedure TUART3A_U2STA.clearURXEN; inline;
  39865. begin
  39866. pTDefRegMap(@Self)^.clr := $00001000;
  39867. end;
  39868. procedure TUART3A_U2STA.setURXEN(thebits : TBits_1); inline;
  39869. begin
  39870. if thebits = 0 then
  39871. pTDefRegMap(@Self)^.clr := $00001000
  39872. else
  39873. pTDefRegMap(@Self)^.&set := $00001000;
  39874. end;
  39875. function TUART3A_U2STA.getURXEN : TBits_1; inline;
  39876. begin
  39877. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  39878. end;
  39879. procedure TUART3A_U2STA.setUTXINV; inline;
  39880. begin
  39881. pTDefRegMap(@Self)^.&set := $00002000;
  39882. end;
  39883. procedure TUART3A_U2STA.clearUTXINV; inline;
  39884. begin
  39885. pTDefRegMap(@Self)^.clr := $00002000;
  39886. end;
  39887. procedure TUART3A_U2STA.setUTXINV(thebits : TBits_1); inline;
  39888. begin
  39889. if thebits = 0 then
  39890. pTDefRegMap(@Self)^.clr := $00002000
  39891. else
  39892. pTDefRegMap(@Self)^.&set := $00002000;
  39893. end;
  39894. function TUART3A_U2STA.getUTXINV : TBits_1; inline;
  39895. begin
  39896. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39897. end;
  39898. procedure TUART3A_U2STA.setUTXISEL(thebits : TBits_2); inline;
  39899. begin
  39900. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  39901. end;
  39902. function TUART3A_U2STA.getUTXISEL : TBits_2; inline;
  39903. begin
  39904. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  39905. end;
  39906. procedure TUART3A_U2STA.setADDR(thebits : TBits_8); inline;
  39907. begin
  39908. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  39909. end;
  39910. function TUART3A_U2STA.getADDR : TBits_8; inline;
  39911. begin
  39912. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  39913. end;
  39914. procedure TUART3A_U2STA.setADM_EN; inline;
  39915. begin
  39916. pTDefRegMap(@Self)^.&set := $01000000;
  39917. end;
  39918. procedure TUART3A_U2STA.clearADM_EN; inline;
  39919. begin
  39920. pTDefRegMap(@Self)^.clr := $01000000;
  39921. end;
  39922. procedure TUART3A_U2STA.setADM_EN(thebits : TBits_1); inline;
  39923. begin
  39924. if thebits = 0 then
  39925. pTDefRegMap(@Self)^.clr := $01000000
  39926. else
  39927. pTDefRegMap(@Self)^.&set := $01000000;
  39928. end;
  39929. function TUART3A_U2STA.getADM_EN : TBits_1; inline;
  39930. begin
  39931. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  39932. end;
  39933. procedure TUART3A_U2STA.setURXISEL0; inline;
  39934. begin
  39935. pTDefRegMap(@Self)^.&set := $00000040;
  39936. end;
  39937. procedure TUART3A_U2STA.clearURXISEL0; inline;
  39938. begin
  39939. pTDefRegMap(@Self)^.clr := $00000040;
  39940. end;
  39941. procedure TUART3A_U2STA.setURXISEL0(thebits : TBits_1); inline;
  39942. begin
  39943. if thebits = 0 then
  39944. pTDefRegMap(@Self)^.clr := $00000040
  39945. else
  39946. pTDefRegMap(@Self)^.&set := $00000040;
  39947. end;
  39948. function TUART3A_U2STA.getURXISEL0 : TBits_1; inline;
  39949. begin
  39950. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39951. end;
  39952. procedure TUART3A_U2STA.setURXISEL1; inline;
  39953. begin
  39954. pTDefRegMap(@Self)^.&set := $00000080;
  39955. end;
  39956. procedure TUART3A_U2STA.clearURXISEL1; inline;
  39957. begin
  39958. pTDefRegMap(@Self)^.clr := $00000080;
  39959. end;
  39960. procedure TUART3A_U2STA.setURXISEL1(thebits : TBits_1); inline;
  39961. begin
  39962. if thebits = 0 then
  39963. pTDefRegMap(@Self)^.clr := $00000080
  39964. else
  39965. pTDefRegMap(@Self)^.&set := $00000080;
  39966. end;
  39967. function TUART3A_U2STA.getURXISEL1 : TBits_1; inline;
  39968. begin
  39969. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39970. end;
  39971. procedure TUART3A_U2STA.setUTXISEL0; inline;
  39972. begin
  39973. pTDefRegMap(@Self)^.&set := $00004000;
  39974. end;
  39975. procedure TUART3A_U2STA.clearUTXISEL0; inline;
  39976. begin
  39977. pTDefRegMap(@Self)^.clr := $00004000;
  39978. end;
  39979. procedure TUART3A_U2STA.setUTXISEL0(thebits : TBits_1); inline;
  39980. begin
  39981. if thebits = 0 then
  39982. pTDefRegMap(@Self)^.clr := $00004000
  39983. else
  39984. pTDefRegMap(@Self)^.&set := $00004000;
  39985. end;
  39986. function TUART3A_U2STA.getUTXISEL0 : TBits_1; inline;
  39987. begin
  39988. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  39989. end;
  39990. procedure TUART3A_U2STA.setUTXISEL1; inline;
  39991. begin
  39992. pTDefRegMap(@Self)^.&set := $00008000;
  39993. end;
  39994. procedure TUART3A_U2STA.clearUTXISEL1; inline;
  39995. begin
  39996. pTDefRegMap(@Self)^.clr := $00008000;
  39997. end;
  39998. procedure TUART3A_U2STA.setUTXISEL1(thebits : TBits_1); inline;
  39999. begin
  40000. if thebits = 0 then
  40001. pTDefRegMap(@Self)^.clr := $00008000
  40002. else
  40003. pTDefRegMap(@Self)^.&set := $00008000;
  40004. end;
  40005. function TUART3A_U2STA.getUTXISEL1 : TBits_1; inline;
  40006. begin
  40007. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40008. end;
  40009. procedure TUART3A_U2STA.setUTXSEL(thebits : TBits_2); inline;
  40010. begin
  40011. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  40012. end;
  40013. function TUART3A_U2STA.getUTXSEL : TBits_2; inline;
  40014. begin
  40015. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  40016. end;
  40017. procedure TUART3A_U2STA.setw(thebits : TBits_32); inline;
  40018. begin
  40019. pTDefRegMap(@Self)^.val := thebits;
  40020. end;
  40021. function TUART3A_U2STA.getw : TBits_32; inline;
  40022. begin
  40023. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40024. end;
  40025. procedure TUART3A_U3ASTA.setURXDA; inline;
  40026. begin
  40027. pTDefRegMap(@Self)^.&set := $00000001;
  40028. end;
  40029. procedure TUART3A_U3ASTA.clearURXDA; inline;
  40030. begin
  40031. pTDefRegMap(@Self)^.clr := $00000001;
  40032. end;
  40033. procedure TUART3A_U3ASTA.setURXDA(thebits : TBits_1); inline;
  40034. begin
  40035. if thebits = 0 then
  40036. pTDefRegMap(@Self)^.clr := $00000001
  40037. else
  40038. pTDefRegMap(@Self)^.&set := $00000001;
  40039. end;
  40040. function TUART3A_U3ASTA.getURXDA : TBits_1; inline;
  40041. begin
  40042. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40043. end;
  40044. procedure TUART3A_U3ASTA.setOERR; inline;
  40045. begin
  40046. pTDefRegMap(@Self)^.&set := $00000002;
  40047. end;
  40048. procedure TUART3A_U3ASTA.clearOERR; inline;
  40049. begin
  40050. pTDefRegMap(@Self)^.clr := $00000002;
  40051. end;
  40052. procedure TUART3A_U3ASTA.setOERR(thebits : TBits_1); inline;
  40053. begin
  40054. if thebits = 0 then
  40055. pTDefRegMap(@Self)^.clr := $00000002
  40056. else
  40057. pTDefRegMap(@Self)^.&set := $00000002;
  40058. end;
  40059. function TUART3A_U3ASTA.getOERR : TBits_1; inline;
  40060. begin
  40061. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40062. end;
  40063. procedure TUART3A_U3ASTA.setFERR; inline;
  40064. begin
  40065. pTDefRegMap(@Self)^.&set := $00000004;
  40066. end;
  40067. procedure TUART3A_U3ASTA.clearFERR; inline;
  40068. begin
  40069. pTDefRegMap(@Self)^.clr := $00000004;
  40070. end;
  40071. procedure TUART3A_U3ASTA.setFERR(thebits : TBits_1); inline;
  40072. begin
  40073. if thebits = 0 then
  40074. pTDefRegMap(@Self)^.clr := $00000004
  40075. else
  40076. pTDefRegMap(@Self)^.&set := $00000004;
  40077. end;
  40078. function TUART3A_U3ASTA.getFERR : TBits_1; inline;
  40079. begin
  40080. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  40081. end;
  40082. procedure TUART3A_U3ASTA.setPERR; inline;
  40083. begin
  40084. pTDefRegMap(@Self)^.&set := $00000008;
  40085. end;
  40086. procedure TUART3A_U3ASTA.clearPERR; inline;
  40087. begin
  40088. pTDefRegMap(@Self)^.clr := $00000008;
  40089. end;
  40090. procedure TUART3A_U3ASTA.setPERR(thebits : TBits_1); inline;
  40091. begin
  40092. if thebits = 0 then
  40093. pTDefRegMap(@Self)^.clr := $00000008
  40094. else
  40095. pTDefRegMap(@Self)^.&set := $00000008;
  40096. end;
  40097. function TUART3A_U3ASTA.getPERR : TBits_1; inline;
  40098. begin
  40099. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40100. end;
  40101. procedure TUART3A_U3ASTA.setRIDLE; inline;
  40102. begin
  40103. pTDefRegMap(@Self)^.&set := $00000010;
  40104. end;
  40105. procedure TUART3A_U3ASTA.clearRIDLE; inline;
  40106. begin
  40107. pTDefRegMap(@Self)^.clr := $00000010;
  40108. end;
  40109. procedure TUART3A_U3ASTA.setRIDLE(thebits : TBits_1); inline;
  40110. begin
  40111. if thebits = 0 then
  40112. pTDefRegMap(@Self)^.clr := $00000010
  40113. else
  40114. pTDefRegMap(@Self)^.&set := $00000010;
  40115. end;
  40116. function TUART3A_U3ASTA.getRIDLE : TBits_1; inline;
  40117. begin
  40118. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  40119. end;
  40120. procedure TUART3A_U3ASTA.setADDEN; inline;
  40121. begin
  40122. pTDefRegMap(@Self)^.&set := $00000020;
  40123. end;
  40124. procedure TUART3A_U3ASTA.clearADDEN; inline;
  40125. begin
  40126. pTDefRegMap(@Self)^.clr := $00000020;
  40127. end;
  40128. procedure TUART3A_U3ASTA.setADDEN(thebits : TBits_1); inline;
  40129. begin
  40130. if thebits = 0 then
  40131. pTDefRegMap(@Self)^.clr := $00000020
  40132. else
  40133. pTDefRegMap(@Self)^.&set := $00000020;
  40134. end;
  40135. function TUART3A_U3ASTA.getADDEN : TBits_1; inline;
  40136. begin
  40137. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40138. end;
  40139. procedure TUART3A_U3ASTA.setURXISEL(thebits : TBits_2); inline;
  40140. begin
  40141. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  40142. end;
  40143. function TUART3A_U3ASTA.getURXISEL : TBits_2; inline;
  40144. begin
  40145. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  40146. end;
  40147. procedure TUART3A_U3ASTA.setTRMT; inline;
  40148. begin
  40149. pTDefRegMap(@Self)^.&set := $00000100;
  40150. end;
  40151. procedure TUART3A_U3ASTA.clearTRMT; inline;
  40152. begin
  40153. pTDefRegMap(@Self)^.clr := $00000100;
  40154. end;
  40155. procedure TUART3A_U3ASTA.setTRMT(thebits : TBits_1); inline;
  40156. begin
  40157. if thebits = 0 then
  40158. pTDefRegMap(@Self)^.clr := $00000100
  40159. else
  40160. pTDefRegMap(@Self)^.&set := $00000100;
  40161. end;
  40162. function TUART3A_U3ASTA.getTRMT : TBits_1; inline;
  40163. begin
  40164. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  40165. end;
  40166. procedure TUART3A_U3ASTA.setUTXBF; inline;
  40167. begin
  40168. pTDefRegMap(@Self)^.&set := $00000200;
  40169. end;
  40170. procedure TUART3A_U3ASTA.clearUTXBF; inline;
  40171. begin
  40172. pTDefRegMap(@Self)^.clr := $00000200;
  40173. end;
  40174. procedure TUART3A_U3ASTA.setUTXBF(thebits : TBits_1); inline;
  40175. begin
  40176. if thebits = 0 then
  40177. pTDefRegMap(@Self)^.clr := $00000200
  40178. else
  40179. pTDefRegMap(@Self)^.&set := $00000200;
  40180. end;
  40181. function TUART3A_U3ASTA.getUTXBF : TBits_1; inline;
  40182. begin
  40183. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  40184. end;
  40185. procedure TUART3A_U3ASTA.setUTXEN; inline;
  40186. begin
  40187. pTDefRegMap(@Self)^.&set := $00000400;
  40188. end;
  40189. procedure TUART3A_U3ASTA.clearUTXEN; inline;
  40190. begin
  40191. pTDefRegMap(@Self)^.clr := $00000400;
  40192. end;
  40193. procedure TUART3A_U3ASTA.setUTXEN(thebits : TBits_1); inline;
  40194. begin
  40195. if thebits = 0 then
  40196. pTDefRegMap(@Self)^.clr := $00000400
  40197. else
  40198. pTDefRegMap(@Self)^.&set := $00000400;
  40199. end;
  40200. function TUART3A_U3ASTA.getUTXEN : TBits_1; inline;
  40201. begin
  40202. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  40203. end;
  40204. procedure TUART3A_U3ASTA.setUTXBRK; inline;
  40205. begin
  40206. pTDefRegMap(@Self)^.&set := $00000800;
  40207. end;
  40208. procedure TUART3A_U3ASTA.clearUTXBRK; inline;
  40209. begin
  40210. pTDefRegMap(@Self)^.clr := $00000800;
  40211. end;
  40212. procedure TUART3A_U3ASTA.setUTXBRK(thebits : TBits_1); inline;
  40213. begin
  40214. if thebits = 0 then
  40215. pTDefRegMap(@Self)^.clr := $00000800
  40216. else
  40217. pTDefRegMap(@Self)^.&set := $00000800;
  40218. end;
  40219. function TUART3A_U3ASTA.getUTXBRK : TBits_1; inline;
  40220. begin
  40221. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40222. end;
  40223. procedure TUART3A_U3ASTA.setURXEN; inline;
  40224. begin
  40225. pTDefRegMap(@Self)^.&set := $00001000;
  40226. end;
  40227. procedure TUART3A_U3ASTA.clearURXEN; inline;
  40228. begin
  40229. pTDefRegMap(@Self)^.clr := $00001000;
  40230. end;
  40231. procedure TUART3A_U3ASTA.setURXEN(thebits : TBits_1); inline;
  40232. begin
  40233. if thebits = 0 then
  40234. pTDefRegMap(@Self)^.clr := $00001000
  40235. else
  40236. pTDefRegMap(@Self)^.&set := $00001000;
  40237. end;
  40238. function TUART3A_U3ASTA.getURXEN : TBits_1; inline;
  40239. begin
  40240. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40241. end;
  40242. procedure TUART3A_U3ASTA.setUTXINV; inline;
  40243. begin
  40244. pTDefRegMap(@Self)^.&set := $00002000;
  40245. end;
  40246. procedure TUART3A_U3ASTA.clearUTXINV; inline;
  40247. begin
  40248. pTDefRegMap(@Self)^.clr := $00002000;
  40249. end;
  40250. procedure TUART3A_U3ASTA.setUTXINV(thebits : TBits_1); inline;
  40251. begin
  40252. if thebits = 0 then
  40253. pTDefRegMap(@Self)^.clr := $00002000
  40254. else
  40255. pTDefRegMap(@Self)^.&set := $00002000;
  40256. end;
  40257. function TUART3A_U3ASTA.getUTXINV : TBits_1; inline;
  40258. begin
  40259. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40260. end;
  40261. procedure TUART3A_U3ASTA.setUTXISEL(thebits : TBits_2); inline;
  40262. begin
  40263. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  40264. end;
  40265. function TUART3A_U3ASTA.getUTXISEL : TBits_2; inline;
  40266. begin
  40267. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  40268. end;
  40269. procedure TUART3A_U3ASTA.setADDR(thebits : TBits_8); inline;
  40270. begin
  40271. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  40272. end;
  40273. function TUART3A_U3ASTA.getADDR : TBits_8; inline;
  40274. begin
  40275. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  40276. end;
  40277. procedure TUART3A_U3ASTA.setADM_EN; inline;
  40278. begin
  40279. pTDefRegMap(@Self)^.&set := $01000000;
  40280. end;
  40281. procedure TUART3A_U3ASTA.clearADM_EN; inline;
  40282. begin
  40283. pTDefRegMap(@Self)^.clr := $01000000;
  40284. end;
  40285. procedure TUART3A_U3ASTA.setADM_EN(thebits : TBits_1); inline;
  40286. begin
  40287. if thebits = 0 then
  40288. pTDefRegMap(@Self)^.clr := $01000000
  40289. else
  40290. pTDefRegMap(@Self)^.&set := $01000000;
  40291. end;
  40292. function TUART3A_U3ASTA.getADM_EN : TBits_1; inline;
  40293. begin
  40294. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  40295. end;
  40296. procedure TUART3A_U3ASTA.setURXISEL0; inline;
  40297. begin
  40298. pTDefRegMap(@Self)^.&set := $00000040;
  40299. end;
  40300. procedure TUART3A_U3ASTA.clearURXISEL0; inline;
  40301. begin
  40302. pTDefRegMap(@Self)^.clr := $00000040;
  40303. end;
  40304. procedure TUART3A_U3ASTA.setURXISEL0(thebits : TBits_1); inline;
  40305. begin
  40306. if thebits = 0 then
  40307. pTDefRegMap(@Self)^.clr := $00000040
  40308. else
  40309. pTDefRegMap(@Self)^.&set := $00000040;
  40310. end;
  40311. function TUART3A_U3ASTA.getURXISEL0 : TBits_1; inline;
  40312. begin
  40313. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40314. end;
  40315. procedure TUART3A_U3ASTA.setURXISEL1; inline;
  40316. begin
  40317. pTDefRegMap(@Self)^.&set := $00000080;
  40318. end;
  40319. procedure TUART3A_U3ASTA.clearURXISEL1; inline;
  40320. begin
  40321. pTDefRegMap(@Self)^.clr := $00000080;
  40322. end;
  40323. procedure TUART3A_U3ASTA.setURXISEL1(thebits : TBits_1); inline;
  40324. begin
  40325. if thebits = 0 then
  40326. pTDefRegMap(@Self)^.clr := $00000080
  40327. else
  40328. pTDefRegMap(@Self)^.&set := $00000080;
  40329. end;
  40330. function TUART3A_U3ASTA.getURXISEL1 : TBits_1; inline;
  40331. begin
  40332. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40333. end;
  40334. procedure TUART3A_U3ASTA.setUTXISEL0; inline;
  40335. begin
  40336. pTDefRegMap(@Self)^.&set := $00004000;
  40337. end;
  40338. procedure TUART3A_U3ASTA.clearUTXISEL0; inline;
  40339. begin
  40340. pTDefRegMap(@Self)^.clr := $00004000;
  40341. end;
  40342. procedure TUART3A_U3ASTA.setUTXISEL0(thebits : TBits_1); inline;
  40343. begin
  40344. if thebits = 0 then
  40345. pTDefRegMap(@Self)^.clr := $00004000
  40346. else
  40347. pTDefRegMap(@Self)^.&set := $00004000;
  40348. end;
  40349. function TUART3A_U3ASTA.getUTXISEL0 : TBits_1; inline;
  40350. begin
  40351. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  40352. end;
  40353. procedure TUART3A_U3ASTA.setUTXISEL1; inline;
  40354. begin
  40355. pTDefRegMap(@Self)^.&set := $00008000;
  40356. end;
  40357. procedure TUART3A_U3ASTA.clearUTXISEL1; inline;
  40358. begin
  40359. pTDefRegMap(@Self)^.clr := $00008000;
  40360. end;
  40361. procedure TUART3A_U3ASTA.setUTXISEL1(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 TUART3A_U3ASTA.getUTXISEL1 : TBits_1; inline;
  40369. begin
  40370. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40371. end;
  40372. procedure TUART3A_U3ASTA.setUTXSEL(thebits : TBits_2); inline;
  40373. begin
  40374. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  40375. end;
  40376. function TUART3A_U3ASTA.getUTXSEL : TBits_2; inline;
  40377. begin
  40378. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  40379. end;
  40380. procedure TUART3A_U3ASTA.setw(thebits : TBits_32); inline;
  40381. begin
  40382. pTDefRegMap(@Self)^.val := thebits;
  40383. end;
  40384. function TUART3A_U3ASTA.getw : TBits_32; inline;
  40385. begin
  40386. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40387. end;
  40388. procedure TUART3B_U3BMODE.setSTSEL; inline;
  40389. begin
  40390. pTDefRegMap(@Self)^.&set := $00000001;
  40391. end;
  40392. procedure TUART3B_U3BMODE.clearSTSEL; inline;
  40393. begin
  40394. pTDefRegMap(@Self)^.clr := $00000001;
  40395. end;
  40396. procedure TUART3B_U3BMODE.setSTSEL(thebits : TBits_1); inline;
  40397. begin
  40398. if thebits = 0 then
  40399. pTDefRegMap(@Self)^.clr := $00000001
  40400. else
  40401. pTDefRegMap(@Self)^.&set := $00000001;
  40402. end;
  40403. function TUART3B_U3BMODE.getSTSEL : TBits_1; inline;
  40404. begin
  40405. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40406. end;
  40407. procedure TUART3B_U3BMODE.setPDSEL(thebits : TBits_2); inline;
  40408. begin
  40409. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  40410. end;
  40411. function TUART3B_U3BMODE.getPDSEL : TBits_2; inline;
  40412. begin
  40413. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  40414. end;
  40415. procedure TUART3B_U3BMODE.setBRGH; inline;
  40416. begin
  40417. pTDefRegMap(@Self)^.&set := $00000008;
  40418. end;
  40419. procedure TUART3B_U3BMODE.clearBRGH; inline;
  40420. begin
  40421. pTDefRegMap(@Self)^.clr := $00000008;
  40422. end;
  40423. procedure TUART3B_U3BMODE.setBRGH(thebits : TBits_1); inline;
  40424. begin
  40425. if thebits = 0 then
  40426. pTDefRegMap(@Self)^.clr := $00000008
  40427. else
  40428. pTDefRegMap(@Self)^.&set := $00000008;
  40429. end;
  40430. function TUART3B_U3BMODE.getBRGH : TBits_1; inline;
  40431. begin
  40432. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40433. end;
  40434. procedure TUART3B_U3BMODE.setRXINV; inline;
  40435. begin
  40436. pTDefRegMap(@Self)^.&set := $00000010;
  40437. end;
  40438. procedure TUART3B_U3BMODE.clearRXINV; inline;
  40439. begin
  40440. pTDefRegMap(@Self)^.clr := $00000010;
  40441. end;
  40442. procedure TUART3B_U3BMODE.setRXINV(thebits : TBits_1); inline;
  40443. begin
  40444. if thebits = 0 then
  40445. pTDefRegMap(@Self)^.clr := $00000010
  40446. else
  40447. pTDefRegMap(@Self)^.&set := $00000010;
  40448. end;
  40449. function TUART3B_U3BMODE.getRXINV : TBits_1; inline;
  40450. begin
  40451. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  40452. end;
  40453. procedure TUART3B_U3BMODE.setABAUD; inline;
  40454. begin
  40455. pTDefRegMap(@Self)^.&set := $00000020;
  40456. end;
  40457. procedure TUART3B_U3BMODE.clearABAUD; inline;
  40458. begin
  40459. pTDefRegMap(@Self)^.clr := $00000020;
  40460. end;
  40461. procedure TUART3B_U3BMODE.setABAUD(thebits : TBits_1); inline;
  40462. begin
  40463. if thebits = 0 then
  40464. pTDefRegMap(@Self)^.clr := $00000020
  40465. else
  40466. pTDefRegMap(@Self)^.&set := $00000020;
  40467. end;
  40468. function TUART3B_U3BMODE.getABAUD : TBits_1; inline;
  40469. begin
  40470. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40471. end;
  40472. procedure TUART3B_U3BMODE.setLPBACK; inline;
  40473. begin
  40474. pTDefRegMap(@Self)^.&set := $00000040;
  40475. end;
  40476. procedure TUART3B_U3BMODE.clearLPBACK; inline;
  40477. begin
  40478. pTDefRegMap(@Self)^.clr := $00000040;
  40479. end;
  40480. procedure TUART3B_U3BMODE.setLPBACK(thebits : TBits_1); inline;
  40481. begin
  40482. if thebits = 0 then
  40483. pTDefRegMap(@Self)^.clr := $00000040
  40484. else
  40485. pTDefRegMap(@Self)^.&set := $00000040;
  40486. end;
  40487. function TUART3B_U3BMODE.getLPBACK : TBits_1; inline;
  40488. begin
  40489. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40490. end;
  40491. procedure TUART3B_U3BMODE.setWAKE; inline;
  40492. begin
  40493. pTDefRegMap(@Self)^.&set := $00000080;
  40494. end;
  40495. procedure TUART3B_U3BMODE.clearWAKE; inline;
  40496. begin
  40497. pTDefRegMap(@Self)^.clr := $00000080;
  40498. end;
  40499. procedure TUART3B_U3BMODE.setWAKE(thebits : TBits_1); inline;
  40500. begin
  40501. if thebits = 0 then
  40502. pTDefRegMap(@Self)^.clr := $00000080
  40503. else
  40504. pTDefRegMap(@Self)^.&set := $00000080;
  40505. end;
  40506. function TUART3B_U3BMODE.getWAKE : TBits_1; inline;
  40507. begin
  40508. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40509. end;
  40510. procedure TUART3B_U3BMODE.setIREN; inline;
  40511. begin
  40512. pTDefRegMap(@Self)^.&set := $00001000;
  40513. end;
  40514. procedure TUART3B_U3BMODE.clearIREN; inline;
  40515. begin
  40516. pTDefRegMap(@Self)^.clr := $00001000;
  40517. end;
  40518. procedure TUART3B_U3BMODE.setIREN(thebits : TBits_1); inline;
  40519. begin
  40520. if thebits = 0 then
  40521. pTDefRegMap(@Self)^.clr := $00001000
  40522. else
  40523. pTDefRegMap(@Self)^.&set := $00001000;
  40524. end;
  40525. function TUART3B_U3BMODE.getIREN : TBits_1; inline;
  40526. begin
  40527. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40528. end;
  40529. procedure TUART3B_U3BMODE.setSIDL; inline;
  40530. begin
  40531. pTDefRegMap(@Self)^.&set := $00002000;
  40532. end;
  40533. procedure TUART3B_U3BMODE.clearSIDL; inline;
  40534. begin
  40535. pTDefRegMap(@Self)^.clr := $00002000;
  40536. end;
  40537. procedure TUART3B_U3BMODE.setSIDL(thebits : TBits_1); inline;
  40538. begin
  40539. if thebits = 0 then
  40540. pTDefRegMap(@Self)^.clr := $00002000
  40541. else
  40542. pTDefRegMap(@Self)^.&set := $00002000;
  40543. end;
  40544. function TUART3B_U3BMODE.getSIDL : TBits_1; inline;
  40545. begin
  40546. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40547. end;
  40548. procedure TUART3B_U3BMODE.setON; inline;
  40549. begin
  40550. pTDefRegMap(@Self)^.&set := $00008000;
  40551. end;
  40552. procedure TUART3B_U3BMODE.clearON; inline;
  40553. begin
  40554. pTDefRegMap(@Self)^.clr := $00008000;
  40555. end;
  40556. procedure TUART3B_U3BMODE.setON(thebits : TBits_1); inline;
  40557. begin
  40558. if thebits = 0 then
  40559. pTDefRegMap(@Self)^.clr := $00008000
  40560. else
  40561. pTDefRegMap(@Self)^.&set := $00008000;
  40562. end;
  40563. function TUART3B_U3BMODE.getON : TBits_1; inline;
  40564. begin
  40565. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40566. end;
  40567. procedure TUART3B_U3BMODE.setPDSEL0; inline;
  40568. begin
  40569. pTDefRegMap(@Self)^.&set := $00000002;
  40570. end;
  40571. procedure TUART3B_U3BMODE.clearPDSEL0; inline;
  40572. begin
  40573. pTDefRegMap(@Self)^.clr := $00000002;
  40574. end;
  40575. procedure TUART3B_U3BMODE.setPDSEL0(thebits : TBits_1); inline;
  40576. begin
  40577. if thebits = 0 then
  40578. pTDefRegMap(@Self)^.clr := $00000002
  40579. else
  40580. pTDefRegMap(@Self)^.&set := $00000002;
  40581. end;
  40582. function TUART3B_U3BMODE.getPDSEL0 : TBits_1; inline;
  40583. begin
  40584. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40585. end;
  40586. procedure TUART3B_U3BMODE.setPDSEL1; inline;
  40587. begin
  40588. pTDefRegMap(@Self)^.&set := $00000004;
  40589. end;
  40590. procedure TUART3B_U3BMODE.clearPDSEL1; inline;
  40591. begin
  40592. pTDefRegMap(@Self)^.clr := $00000004;
  40593. end;
  40594. procedure TUART3B_U3BMODE.setPDSEL1(thebits : TBits_1); inline;
  40595. begin
  40596. if thebits = 0 then
  40597. pTDefRegMap(@Self)^.clr := $00000004
  40598. else
  40599. pTDefRegMap(@Self)^.&set := $00000004;
  40600. end;
  40601. function TUART3B_U3BMODE.getPDSEL1 : TBits_1; inline;
  40602. begin
  40603. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  40604. end;
  40605. procedure TUART3B_U3BMODE.setUSIDL; inline;
  40606. begin
  40607. pTDefRegMap(@Self)^.&set := $00002000;
  40608. end;
  40609. procedure TUART3B_U3BMODE.clearUSIDL; inline;
  40610. begin
  40611. pTDefRegMap(@Self)^.clr := $00002000;
  40612. end;
  40613. procedure TUART3B_U3BMODE.setUSIDL(thebits : TBits_1); inline;
  40614. begin
  40615. if thebits = 0 then
  40616. pTDefRegMap(@Self)^.clr := $00002000
  40617. else
  40618. pTDefRegMap(@Self)^.&set := $00002000;
  40619. end;
  40620. function TUART3B_U3BMODE.getUSIDL : TBits_1; inline;
  40621. begin
  40622. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40623. end;
  40624. procedure TUART3B_U3BMODE.setUARTEN; inline;
  40625. begin
  40626. pTDefRegMap(@Self)^.&set := $00008000;
  40627. end;
  40628. procedure TUART3B_U3BMODE.clearUARTEN; inline;
  40629. begin
  40630. pTDefRegMap(@Self)^.clr := $00008000;
  40631. end;
  40632. procedure TUART3B_U3BMODE.setUARTEN(thebits : TBits_1); inline;
  40633. begin
  40634. if thebits = 0 then
  40635. pTDefRegMap(@Self)^.clr := $00008000
  40636. else
  40637. pTDefRegMap(@Self)^.&set := $00008000;
  40638. end;
  40639. function TUART3B_U3BMODE.getUARTEN : TBits_1; inline;
  40640. begin
  40641. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40642. end;
  40643. procedure TUART3B_U3BMODE.setw(thebits : TBits_32); inline;
  40644. begin
  40645. pTDefRegMap(@Self)^.val := thebits;
  40646. end;
  40647. function TUART3B_U3BMODE.getw : TBits_32; inline;
  40648. begin
  40649. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40650. end;
  40651. procedure TUART3B_U5MODE.setSTSEL; inline;
  40652. begin
  40653. pTDefRegMap(@Self)^.&set := $00000001;
  40654. end;
  40655. procedure TUART3B_U5MODE.clearSTSEL; inline;
  40656. begin
  40657. pTDefRegMap(@Self)^.clr := $00000001;
  40658. end;
  40659. procedure TUART3B_U5MODE.setSTSEL(thebits : TBits_1); inline;
  40660. begin
  40661. if thebits = 0 then
  40662. pTDefRegMap(@Self)^.clr := $00000001
  40663. else
  40664. pTDefRegMap(@Self)^.&set := $00000001;
  40665. end;
  40666. function TUART3B_U5MODE.getSTSEL : TBits_1; inline;
  40667. begin
  40668. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40669. end;
  40670. procedure TUART3B_U5MODE.setPDSEL(thebits : TBits_2); inline;
  40671. begin
  40672. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  40673. end;
  40674. function TUART3B_U5MODE.getPDSEL : TBits_2; inline;
  40675. begin
  40676. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  40677. end;
  40678. procedure TUART3B_U5MODE.setBRGH; inline;
  40679. begin
  40680. pTDefRegMap(@Self)^.&set := $00000008;
  40681. end;
  40682. procedure TUART3B_U5MODE.clearBRGH; inline;
  40683. begin
  40684. pTDefRegMap(@Self)^.clr := $00000008;
  40685. end;
  40686. procedure TUART3B_U5MODE.setBRGH(thebits : TBits_1); inline;
  40687. begin
  40688. if thebits = 0 then
  40689. pTDefRegMap(@Self)^.clr := $00000008
  40690. else
  40691. pTDefRegMap(@Self)^.&set := $00000008;
  40692. end;
  40693. function TUART3B_U5MODE.getBRGH : TBits_1; inline;
  40694. begin
  40695. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40696. end;
  40697. procedure TUART3B_U5MODE.setRXINV; inline;
  40698. begin
  40699. pTDefRegMap(@Self)^.&set := $00000010;
  40700. end;
  40701. procedure TUART3B_U5MODE.clearRXINV; inline;
  40702. begin
  40703. pTDefRegMap(@Self)^.clr := $00000010;
  40704. end;
  40705. procedure TUART3B_U5MODE.setRXINV(thebits : TBits_1); inline;
  40706. begin
  40707. if thebits = 0 then
  40708. pTDefRegMap(@Self)^.clr := $00000010
  40709. else
  40710. pTDefRegMap(@Self)^.&set := $00000010;
  40711. end;
  40712. function TUART3B_U5MODE.getRXINV : TBits_1; inline;
  40713. begin
  40714. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  40715. end;
  40716. procedure TUART3B_U5MODE.setABAUD; inline;
  40717. begin
  40718. pTDefRegMap(@Self)^.&set := $00000020;
  40719. end;
  40720. procedure TUART3B_U5MODE.clearABAUD; inline;
  40721. begin
  40722. pTDefRegMap(@Self)^.clr := $00000020;
  40723. end;
  40724. procedure TUART3B_U5MODE.setABAUD(thebits : TBits_1); inline;
  40725. begin
  40726. if thebits = 0 then
  40727. pTDefRegMap(@Self)^.clr := $00000020
  40728. else
  40729. pTDefRegMap(@Self)^.&set := $00000020;
  40730. end;
  40731. function TUART3B_U5MODE.getABAUD : TBits_1; inline;
  40732. begin
  40733. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40734. end;
  40735. procedure TUART3B_U5MODE.setLPBACK; inline;
  40736. begin
  40737. pTDefRegMap(@Self)^.&set := $00000040;
  40738. end;
  40739. procedure TUART3B_U5MODE.clearLPBACK; inline;
  40740. begin
  40741. pTDefRegMap(@Self)^.clr := $00000040;
  40742. end;
  40743. procedure TUART3B_U5MODE.setLPBACK(thebits : TBits_1); inline;
  40744. begin
  40745. if thebits = 0 then
  40746. pTDefRegMap(@Self)^.clr := $00000040
  40747. else
  40748. pTDefRegMap(@Self)^.&set := $00000040;
  40749. end;
  40750. function TUART3B_U5MODE.getLPBACK : TBits_1; inline;
  40751. begin
  40752. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40753. end;
  40754. procedure TUART3B_U5MODE.setWAKE; inline;
  40755. begin
  40756. pTDefRegMap(@Self)^.&set := $00000080;
  40757. end;
  40758. procedure TUART3B_U5MODE.clearWAKE; inline;
  40759. begin
  40760. pTDefRegMap(@Self)^.clr := $00000080;
  40761. end;
  40762. procedure TUART3B_U5MODE.setWAKE(thebits : TBits_1); inline;
  40763. begin
  40764. if thebits = 0 then
  40765. pTDefRegMap(@Self)^.clr := $00000080
  40766. else
  40767. pTDefRegMap(@Self)^.&set := $00000080;
  40768. end;
  40769. function TUART3B_U5MODE.getWAKE : TBits_1; inline;
  40770. begin
  40771. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40772. end;
  40773. procedure TUART3B_U5MODE.setIREN; inline;
  40774. begin
  40775. pTDefRegMap(@Self)^.&set := $00001000;
  40776. end;
  40777. procedure TUART3B_U5MODE.clearIREN; inline;
  40778. begin
  40779. pTDefRegMap(@Self)^.clr := $00001000;
  40780. end;
  40781. procedure TUART3B_U5MODE.setIREN(thebits : TBits_1); inline;
  40782. begin
  40783. if thebits = 0 then
  40784. pTDefRegMap(@Self)^.clr := $00001000
  40785. else
  40786. pTDefRegMap(@Self)^.&set := $00001000;
  40787. end;
  40788. function TUART3B_U5MODE.getIREN : TBits_1; inline;
  40789. begin
  40790. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40791. end;
  40792. procedure TUART3B_U5MODE.setSIDL; inline;
  40793. begin
  40794. pTDefRegMap(@Self)^.&set := $00002000;
  40795. end;
  40796. procedure TUART3B_U5MODE.clearSIDL; inline;
  40797. begin
  40798. pTDefRegMap(@Self)^.clr := $00002000;
  40799. end;
  40800. procedure TUART3B_U5MODE.setSIDL(thebits : TBits_1); inline;
  40801. begin
  40802. if thebits = 0 then
  40803. pTDefRegMap(@Self)^.clr := $00002000
  40804. else
  40805. pTDefRegMap(@Self)^.&set := $00002000;
  40806. end;
  40807. function TUART3B_U5MODE.getSIDL : TBits_1; inline;
  40808. begin
  40809. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40810. end;
  40811. procedure TUART3B_U5MODE.setON; inline;
  40812. begin
  40813. pTDefRegMap(@Self)^.&set := $00008000;
  40814. end;
  40815. procedure TUART3B_U5MODE.clearON; inline;
  40816. begin
  40817. pTDefRegMap(@Self)^.clr := $00008000;
  40818. end;
  40819. procedure TUART3B_U5MODE.setON(thebits : TBits_1); inline;
  40820. begin
  40821. if thebits = 0 then
  40822. pTDefRegMap(@Self)^.clr := $00008000
  40823. else
  40824. pTDefRegMap(@Self)^.&set := $00008000;
  40825. end;
  40826. function TUART3B_U5MODE.getON : TBits_1; inline;
  40827. begin
  40828. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40829. end;
  40830. procedure TUART3B_U5MODE.setPDSEL0; inline;
  40831. begin
  40832. pTDefRegMap(@Self)^.&set := $00000002;
  40833. end;
  40834. procedure TUART3B_U5MODE.clearPDSEL0; inline;
  40835. begin
  40836. pTDefRegMap(@Self)^.clr := $00000002;
  40837. end;
  40838. procedure TUART3B_U5MODE.setPDSEL0(thebits : TBits_1); inline;
  40839. begin
  40840. if thebits = 0 then
  40841. pTDefRegMap(@Self)^.clr := $00000002
  40842. else
  40843. pTDefRegMap(@Self)^.&set := $00000002;
  40844. end;
  40845. function TUART3B_U5MODE.getPDSEL0 : TBits_1; inline;
  40846. begin
  40847. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40848. end;
  40849. procedure TUART3B_U5MODE.setPDSEL1; inline;
  40850. begin
  40851. pTDefRegMap(@Self)^.&set := $00000004;
  40852. end;
  40853. procedure TUART3B_U5MODE.clearPDSEL1; inline;
  40854. begin
  40855. pTDefRegMap(@Self)^.clr := $00000004;
  40856. end;
  40857. procedure TUART3B_U5MODE.setPDSEL1(thebits : TBits_1); inline;
  40858. begin
  40859. if thebits = 0 then
  40860. pTDefRegMap(@Self)^.clr := $00000004
  40861. else
  40862. pTDefRegMap(@Self)^.&set := $00000004;
  40863. end;
  40864. function TUART3B_U5MODE.getPDSEL1 : TBits_1; inline;
  40865. begin
  40866. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  40867. end;
  40868. procedure TUART3B_U5MODE.setUSIDL; inline;
  40869. begin
  40870. pTDefRegMap(@Self)^.&set := $00002000;
  40871. end;
  40872. procedure TUART3B_U5MODE.clearUSIDL; inline;
  40873. begin
  40874. pTDefRegMap(@Self)^.clr := $00002000;
  40875. end;
  40876. procedure TUART3B_U5MODE.setUSIDL(thebits : TBits_1); inline;
  40877. begin
  40878. if thebits = 0 then
  40879. pTDefRegMap(@Self)^.clr := $00002000
  40880. else
  40881. pTDefRegMap(@Self)^.&set := $00002000;
  40882. end;
  40883. function TUART3B_U5MODE.getUSIDL : TBits_1; inline;
  40884. begin
  40885. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40886. end;
  40887. procedure TUART3B_U5MODE.setUARTEN; inline;
  40888. begin
  40889. pTDefRegMap(@Self)^.&set := $00008000;
  40890. end;
  40891. procedure TUART3B_U5MODE.clearUARTEN; inline;
  40892. begin
  40893. pTDefRegMap(@Self)^.clr := $00008000;
  40894. end;
  40895. procedure TUART3B_U5MODE.setUARTEN(thebits : TBits_1); inline;
  40896. begin
  40897. if thebits = 0 then
  40898. pTDefRegMap(@Self)^.clr := $00008000
  40899. else
  40900. pTDefRegMap(@Self)^.&set := $00008000;
  40901. end;
  40902. function TUART3B_U5MODE.getUARTEN : TBits_1; inline;
  40903. begin
  40904. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40905. end;
  40906. procedure TUART3B_U5MODE.setw(thebits : TBits_32); inline;
  40907. begin
  40908. pTDefRegMap(@Self)^.val := thebits;
  40909. end;
  40910. function TUART3B_U5MODE.getw : TBits_32; inline;
  40911. begin
  40912. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40913. end;
  40914. procedure TUART3B_U3BSTA.setURXDA; inline;
  40915. begin
  40916. pTDefRegMap(@Self)^.&set := $00000001;
  40917. end;
  40918. procedure TUART3B_U3BSTA.clearURXDA; inline;
  40919. begin
  40920. pTDefRegMap(@Self)^.clr := $00000001;
  40921. end;
  40922. procedure TUART3B_U3BSTA.setURXDA(thebits : TBits_1); inline;
  40923. begin
  40924. if thebits = 0 then
  40925. pTDefRegMap(@Self)^.clr := $00000001
  40926. else
  40927. pTDefRegMap(@Self)^.&set := $00000001;
  40928. end;
  40929. function TUART3B_U3BSTA.getURXDA : TBits_1; inline;
  40930. begin
  40931. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40932. end;
  40933. procedure TUART3B_U3BSTA.setOERR; inline;
  40934. begin
  40935. pTDefRegMap(@Self)^.&set := $00000002;
  40936. end;
  40937. procedure TUART3B_U3BSTA.clearOERR; inline;
  40938. begin
  40939. pTDefRegMap(@Self)^.clr := $00000002;
  40940. end;
  40941. procedure TUART3B_U3BSTA.setOERR(thebits : TBits_1); inline;
  40942. begin
  40943. if thebits = 0 then
  40944. pTDefRegMap(@Self)^.clr := $00000002
  40945. else
  40946. pTDefRegMap(@Self)^.&set := $00000002;
  40947. end;
  40948. function TUART3B_U3BSTA.getOERR : TBits_1; inline;
  40949. begin
  40950. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40951. end;
  40952. procedure TUART3B_U3BSTA.setFERR; inline;
  40953. begin
  40954. pTDefRegMap(@Self)^.&set := $00000004;
  40955. end;
  40956. procedure TUART3B_U3BSTA.clearFERR; inline;
  40957. begin
  40958. pTDefRegMap(@Self)^.clr := $00000004;
  40959. end;
  40960. procedure TUART3B_U3BSTA.setFERR(thebits : TBits_1); inline;
  40961. begin
  40962. if thebits = 0 then
  40963. pTDefRegMap(@Self)^.clr := $00000004
  40964. else
  40965. pTDefRegMap(@Self)^.&set := $00000004;
  40966. end;
  40967. function TUART3B_U3BSTA.getFERR : TBits_1; inline;
  40968. begin
  40969. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  40970. end;
  40971. procedure TUART3B_U3BSTA.setPERR; inline;
  40972. begin
  40973. pTDefRegMap(@Self)^.&set := $00000008;
  40974. end;
  40975. procedure TUART3B_U3BSTA.clearPERR; inline;
  40976. begin
  40977. pTDefRegMap(@Self)^.clr := $00000008;
  40978. end;
  40979. procedure TUART3B_U3BSTA.setPERR(thebits : TBits_1); inline;
  40980. begin
  40981. if thebits = 0 then
  40982. pTDefRegMap(@Self)^.clr := $00000008
  40983. else
  40984. pTDefRegMap(@Self)^.&set := $00000008;
  40985. end;
  40986. function TUART3B_U3BSTA.getPERR : TBits_1; inline;
  40987. begin
  40988. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40989. end;
  40990. procedure TUART3B_U3BSTA.setRIDLE; inline;
  40991. begin
  40992. pTDefRegMap(@Self)^.&set := $00000010;
  40993. end;
  40994. procedure TUART3B_U3BSTA.clearRIDLE; inline;
  40995. begin
  40996. pTDefRegMap(@Self)^.clr := $00000010;
  40997. end;
  40998. procedure TUART3B_U3BSTA.setRIDLE(thebits : TBits_1); inline;
  40999. begin
  41000. if thebits = 0 then
  41001. pTDefRegMap(@Self)^.clr := $00000010
  41002. else
  41003. pTDefRegMap(@Self)^.&set := $00000010;
  41004. end;
  41005. function TUART3B_U3BSTA.getRIDLE : TBits_1; inline;
  41006. begin
  41007. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  41008. end;
  41009. procedure TUART3B_U3BSTA.setADDEN; inline;
  41010. begin
  41011. pTDefRegMap(@Self)^.&set := $00000020;
  41012. end;
  41013. procedure TUART3B_U3BSTA.clearADDEN; inline;
  41014. begin
  41015. pTDefRegMap(@Self)^.clr := $00000020;
  41016. end;
  41017. procedure TUART3B_U3BSTA.setADDEN(thebits : TBits_1); inline;
  41018. begin
  41019. if thebits = 0 then
  41020. pTDefRegMap(@Self)^.clr := $00000020
  41021. else
  41022. pTDefRegMap(@Self)^.&set := $00000020;
  41023. end;
  41024. function TUART3B_U3BSTA.getADDEN : TBits_1; inline;
  41025. begin
  41026. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41027. end;
  41028. procedure TUART3B_U3BSTA.setURXISEL(thebits : TBits_2); inline;
  41029. begin
  41030. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  41031. end;
  41032. function TUART3B_U3BSTA.getURXISEL : TBits_2; inline;
  41033. begin
  41034. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  41035. end;
  41036. procedure TUART3B_U3BSTA.setTRMT; inline;
  41037. begin
  41038. pTDefRegMap(@Self)^.&set := $00000100;
  41039. end;
  41040. procedure TUART3B_U3BSTA.clearTRMT; inline;
  41041. begin
  41042. pTDefRegMap(@Self)^.clr := $00000100;
  41043. end;
  41044. procedure TUART3B_U3BSTA.setTRMT(thebits : TBits_1); inline;
  41045. begin
  41046. if thebits = 0 then
  41047. pTDefRegMap(@Self)^.clr := $00000100
  41048. else
  41049. pTDefRegMap(@Self)^.&set := $00000100;
  41050. end;
  41051. function TUART3B_U3BSTA.getTRMT : TBits_1; inline;
  41052. begin
  41053. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41054. end;
  41055. procedure TUART3B_U3BSTA.setUTXBF; inline;
  41056. begin
  41057. pTDefRegMap(@Self)^.&set := $00000200;
  41058. end;
  41059. procedure TUART3B_U3BSTA.clearUTXBF; inline;
  41060. begin
  41061. pTDefRegMap(@Self)^.clr := $00000200;
  41062. end;
  41063. procedure TUART3B_U3BSTA.setUTXBF(thebits : TBits_1); inline;
  41064. begin
  41065. if thebits = 0 then
  41066. pTDefRegMap(@Self)^.clr := $00000200
  41067. else
  41068. pTDefRegMap(@Self)^.&set := $00000200;
  41069. end;
  41070. function TUART3B_U3BSTA.getUTXBF : TBits_1; inline;
  41071. begin
  41072. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  41073. end;
  41074. procedure TUART3B_U3BSTA.setUTXEN; inline;
  41075. begin
  41076. pTDefRegMap(@Self)^.&set := $00000400;
  41077. end;
  41078. procedure TUART3B_U3BSTA.clearUTXEN; inline;
  41079. begin
  41080. pTDefRegMap(@Self)^.clr := $00000400;
  41081. end;
  41082. procedure TUART3B_U3BSTA.setUTXEN(thebits : TBits_1); inline;
  41083. begin
  41084. if thebits = 0 then
  41085. pTDefRegMap(@Self)^.clr := $00000400
  41086. else
  41087. pTDefRegMap(@Self)^.&set := $00000400;
  41088. end;
  41089. function TUART3B_U3BSTA.getUTXEN : TBits_1; inline;
  41090. begin
  41091. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  41092. end;
  41093. procedure TUART3B_U3BSTA.setUTXBRK; inline;
  41094. begin
  41095. pTDefRegMap(@Self)^.&set := $00000800;
  41096. end;
  41097. procedure TUART3B_U3BSTA.clearUTXBRK; inline;
  41098. begin
  41099. pTDefRegMap(@Self)^.clr := $00000800;
  41100. end;
  41101. procedure TUART3B_U3BSTA.setUTXBRK(thebits : TBits_1); inline;
  41102. begin
  41103. if thebits = 0 then
  41104. pTDefRegMap(@Self)^.clr := $00000800
  41105. else
  41106. pTDefRegMap(@Self)^.&set := $00000800;
  41107. end;
  41108. function TUART3B_U3BSTA.getUTXBRK : TBits_1; inline;
  41109. begin
  41110. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41111. end;
  41112. procedure TUART3B_U3BSTA.setURXEN; inline;
  41113. begin
  41114. pTDefRegMap(@Self)^.&set := $00001000;
  41115. end;
  41116. procedure TUART3B_U3BSTA.clearURXEN; inline;
  41117. begin
  41118. pTDefRegMap(@Self)^.clr := $00001000;
  41119. end;
  41120. procedure TUART3B_U3BSTA.setURXEN(thebits : TBits_1); inline;
  41121. begin
  41122. if thebits = 0 then
  41123. pTDefRegMap(@Self)^.clr := $00001000
  41124. else
  41125. pTDefRegMap(@Self)^.&set := $00001000;
  41126. end;
  41127. function TUART3B_U3BSTA.getURXEN : TBits_1; inline;
  41128. begin
  41129. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  41130. end;
  41131. procedure TUART3B_U3BSTA.setUTXINV; inline;
  41132. begin
  41133. pTDefRegMap(@Self)^.&set := $00002000;
  41134. end;
  41135. procedure TUART3B_U3BSTA.clearUTXINV; inline;
  41136. begin
  41137. pTDefRegMap(@Self)^.clr := $00002000;
  41138. end;
  41139. procedure TUART3B_U3BSTA.setUTXINV(thebits : TBits_1); inline;
  41140. begin
  41141. if thebits = 0 then
  41142. pTDefRegMap(@Self)^.clr := $00002000
  41143. else
  41144. pTDefRegMap(@Self)^.&set := $00002000;
  41145. end;
  41146. function TUART3B_U3BSTA.getUTXINV : TBits_1; inline;
  41147. begin
  41148. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41149. end;
  41150. procedure TUART3B_U3BSTA.setUTXISEL(thebits : TBits_2); inline;
  41151. begin
  41152. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  41153. end;
  41154. function TUART3B_U3BSTA.getUTXISEL : TBits_2; inline;
  41155. begin
  41156. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  41157. end;
  41158. procedure TUART3B_U3BSTA.setADDR(thebits : TBits_8); inline;
  41159. begin
  41160. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  41161. end;
  41162. function TUART3B_U3BSTA.getADDR : TBits_8; inline;
  41163. begin
  41164. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  41165. end;
  41166. procedure TUART3B_U3BSTA.setADM_EN; inline;
  41167. begin
  41168. pTDefRegMap(@Self)^.&set := $01000000;
  41169. end;
  41170. procedure TUART3B_U3BSTA.clearADM_EN; inline;
  41171. begin
  41172. pTDefRegMap(@Self)^.clr := $01000000;
  41173. end;
  41174. procedure TUART3B_U3BSTA.setADM_EN(thebits : TBits_1); inline;
  41175. begin
  41176. if thebits = 0 then
  41177. pTDefRegMap(@Self)^.clr := $01000000
  41178. else
  41179. pTDefRegMap(@Self)^.&set := $01000000;
  41180. end;
  41181. function TUART3B_U3BSTA.getADM_EN : TBits_1; inline;
  41182. begin
  41183. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  41184. end;
  41185. procedure TUART3B_U3BSTA.setURXISEL0; inline;
  41186. begin
  41187. pTDefRegMap(@Self)^.&set := $00000040;
  41188. end;
  41189. procedure TUART3B_U3BSTA.clearURXISEL0; inline;
  41190. begin
  41191. pTDefRegMap(@Self)^.clr := $00000040;
  41192. end;
  41193. procedure TUART3B_U3BSTA.setURXISEL0(thebits : TBits_1); inline;
  41194. begin
  41195. if thebits = 0 then
  41196. pTDefRegMap(@Self)^.clr := $00000040
  41197. else
  41198. pTDefRegMap(@Self)^.&set := $00000040;
  41199. end;
  41200. function TUART3B_U3BSTA.getURXISEL0 : TBits_1; inline;
  41201. begin
  41202. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41203. end;
  41204. procedure TUART3B_U3BSTA.setURXISEL1; inline;
  41205. begin
  41206. pTDefRegMap(@Self)^.&set := $00000080;
  41207. end;
  41208. procedure TUART3B_U3BSTA.clearURXISEL1; inline;
  41209. begin
  41210. pTDefRegMap(@Self)^.clr := $00000080;
  41211. end;
  41212. procedure TUART3B_U3BSTA.setURXISEL1(thebits : TBits_1); inline;
  41213. begin
  41214. if thebits = 0 then
  41215. pTDefRegMap(@Self)^.clr := $00000080
  41216. else
  41217. pTDefRegMap(@Self)^.&set := $00000080;
  41218. end;
  41219. function TUART3B_U3BSTA.getURXISEL1 : TBits_1; inline;
  41220. begin
  41221. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41222. end;
  41223. procedure TUART3B_U3BSTA.setUTXISEL0; inline;
  41224. begin
  41225. pTDefRegMap(@Self)^.&set := $00004000;
  41226. end;
  41227. procedure TUART3B_U3BSTA.clearUTXISEL0; inline;
  41228. begin
  41229. pTDefRegMap(@Self)^.clr := $00004000;
  41230. end;
  41231. procedure TUART3B_U3BSTA.setUTXISEL0(thebits : TBits_1); inline;
  41232. begin
  41233. if thebits = 0 then
  41234. pTDefRegMap(@Self)^.clr := $00004000
  41235. else
  41236. pTDefRegMap(@Self)^.&set := $00004000;
  41237. end;
  41238. function TUART3B_U3BSTA.getUTXISEL0 : TBits_1; inline;
  41239. begin
  41240. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  41241. end;
  41242. procedure TUART3B_U3BSTA.setUTXISEL1; inline;
  41243. begin
  41244. pTDefRegMap(@Self)^.&set := $00008000;
  41245. end;
  41246. procedure TUART3B_U3BSTA.clearUTXISEL1; inline;
  41247. begin
  41248. pTDefRegMap(@Self)^.clr := $00008000;
  41249. end;
  41250. procedure TUART3B_U3BSTA.setUTXISEL1(thebits : TBits_1); inline;
  41251. begin
  41252. if thebits = 0 then
  41253. pTDefRegMap(@Self)^.clr := $00008000
  41254. else
  41255. pTDefRegMap(@Self)^.&set := $00008000;
  41256. end;
  41257. function TUART3B_U3BSTA.getUTXISEL1 : TBits_1; inline;
  41258. begin
  41259. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41260. end;
  41261. procedure TUART3B_U3BSTA.setUTXSEL(thebits : TBits_2); inline;
  41262. begin
  41263. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  41264. end;
  41265. function TUART3B_U3BSTA.getUTXSEL : TBits_2; inline;
  41266. begin
  41267. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  41268. end;
  41269. procedure TUART3B_U3BSTA.setw(thebits : TBits_32); inline;
  41270. begin
  41271. pTDefRegMap(@Self)^.val := thebits;
  41272. end;
  41273. function TUART3B_U3BSTA.getw : TBits_32; inline;
  41274. begin
  41275. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41276. end;
  41277. procedure TUART3B_U5STA.setURXDA; inline;
  41278. begin
  41279. pTDefRegMap(@Self)^.&set := $00000001;
  41280. end;
  41281. procedure TUART3B_U5STA.clearURXDA; inline;
  41282. begin
  41283. pTDefRegMap(@Self)^.clr := $00000001;
  41284. end;
  41285. procedure TUART3B_U5STA.setURXDA(thebits : TBits_1); inline;
  41286. begin
  41287. if thebits = 0 then
  41288. pTDefRegMap(@Self)^.clr := $00000001
  41289. else
  41290. pTDefRegMap(@Self)^.&set := $00000001;
  41291. end;
  41292. function TUART3B_U5STA.getURXDA : TBits_1; inline;
  41293. begin
  41294. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41295. end;
  41296. procedure TUART3B_U5STA.setOERR; inline;
  41297. begin
  41298. pTDefRegMap(@Self)^.&set := $00000002;
  41299. end;
  41300. procedure TUART3B_U5STA.clearOERR; inline;
  41301. begin
  41302. pTDefRegMap(@Self)^.clr := $00000002;
  41303. end;
  41304. procedure TUART3B_U5STA.setOERR(thebits : TBits_1); inline;
  41305. begin
  41306. if thebits = 0 then
  41307. pTDefRegMap(@Self)^.clr := $00000002
  41308. else
  41309. pTDefRegMap(@Self)^.&set := $00000002;
  41310. end;
  41311. function TUART3B_U5STA.getOERR : TBits_1; inline;
  41312. begin
  41313. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41314. end;
  41315. procedure TUART3B_U5STA.setFERR; inline;
  41316. begin
  41317. pTDefRegMap(@Self)^.&set := $00000004;
  41318. end;
  41319. procedure TUART3B_U5STA.clearFERR; inline;
  41320. begin
  41321. pTDefRegMap(@Self)^.clr := $00000004;
  41322. end;
  41323. procedure TUART3B_U5STA.setFERR(thebits : TBits_1); inline;
  41324. begin
  41325. if thebits = 0 then
  41326. pTDefRegMap(@Self)^.clr := $00000004
  41327. else
  41328. pTDefRegMap(@Self)^.&set := $00000004;
  41329. end;
  41330. function TUART3B_U5STA.getFERR : TBits_1; inline;
  41331. begin
  41332. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  41333. end;
  41334. procedure TUART3B_U5STA.setPERR; inline;
  41335. begin
  41336. pTDefRegMap(@Self)^.&set := $00000008;
  41337. end;
  41338. procedure TUART3B_U5STA.clearPERR; inline;
  41339. begin
  41340. pTDefRegMap(@Self)^.clr := $00000008;
  41341. end;
  41342. procedure TUART3B_U5STA.setPERR(thebits : TBits_1); inline;
  41343. begin
  41344. if thebits = 0 then
  41345. pTDefRegMap(@Self)^.clr := $00000008
  41346. else
  41347. pTDefRegMap(@Self)^.&set := $00000008;
  41348. end;
  41349. function TUART3B_U5STA.getPERR : TBits_1; inline;
  41350. begin
  41351. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  41352. end;
  41353. procedure TUART3B_U5STA.setRIDLE; inline;
  41354. begin
  41355. pTDefRegMap(@Self)^.&set := $00000010;
  41356. end;
  41357. procedure TUART3B_U5STA.clearRIDLE; inline;
  41358. begin
  41359. pTDefRegMap(@Self)^.clr := $00000010;
  41360. end;
  41361. procedure TUART3B_U5STA.setRIDLE(thebits : TBits_1); inline;
  41362. begin
  41363. if thebits = 0 then
  41364. pTDefRegMap(@Self)^.clr := $00000010
  41365. else
  41366. pTDefRegMap(@Self)^.&set := $00000010;
  41367. end;
  41368. function TUART3B_U5STA.getRIDLE : TBits_1; inline;
  41369. begin
  41370. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  41371. end;
  41372. procedure TUART3B_U5STA.setADDEN; inline;
  41373. begin
  41374. pTDefRegMap(@Self)^.&set := $00000020;
  41375. end;
  41376. procedure TUART3B_U5STA.clearADDEN; inline;
  41377. begin
  41378. pTDefRegMap(@Self)^.clr := $00000020;
  41379. end;
  41380. procedure TUART3B_U5STA.setADDEN(thebits : TBits_1); inline;
  41381. begin
  41382. if thebits = 0 then
  41383. pTDefRegMap(@Self)^.clr := $00000020
  41384. else
  41385. pTDefRegMap(@Self)^.&set := $00000020;
  41386. end;
  41387. function TUART3B_U5STA.getADDEN : TBits_1; inline;
  41388. begin
  41389. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41390. end;
  41391. procedure TUART3B_U5STA.setURXISEL(thebits : TBits_2); inline;
  41392. begin
  41393. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  41394. end;
  41395. function TUART3B_U5STA.getURXISEL : TBits_2; inline;
  41396. begin
  41397. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  41398. end;
  41399. procedure TUART3B_U5STA.setTRMT; inline;
  41400. begin
  41401. pTDefRegMap(@Self)^.&set := $00000100;
  41402. end;
  41403. procedure TUART3B_U5STA.clearTRMT; inline;
  41404. begin
  41405. pTDefRegMap(@Self)^.clr := $00000100;
  41406. end;
  41407. procedure TUART3B_U5STA.setTRMT(thebits : TBits_1); inline;
  41408. begin
  41409. if thebits = 0 then
  41410. pTDefRegMap(@Self)^.clr := $00000100
  41411. else
  41412. pTDefRegMap(@Self)^.&set := $00000100;
  41413. end;
  41414. function TUART3B_U5STA.getTRMT : TBits_1; inline;
  41415. begin
  41416. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41417. end;
  41418. procedure TUART3B_U5STA.setUTXBF; inline;
  41419. begin
  41420. pTDefRegMap(@Self)^.&set := $00000200;
  41421. end;
  41422. procedure TUART3B_U5STA.clearUTXBF; inline;
  41423. begin
  41424. pTDefRegMap(@Self)^.clr := $00000200;
  41425. end;
  41426. procedure TUART3B_U5STA.setUTXBF(thebits : TBits_1); inline;
  41427. begin
  41428. if thebits = 0 then
  41429. pTDefRegMap(@Self)^.clr := $00000200
  41430. else
  41431. pTDefRegMap(@Self)^.&set := $00000200;
  41432. end;
  41433. function TUART3B_U5STA.getUTXBF : TBits_1; inline;
  41434. begin
  41435. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  41436. end;
  41437. procedure TUART3B_U5STA.setUTXEN; inline;
  41438. begin
  41439. pTDefRegMap(@Self)^.&set := $00000400;
  41440. end;
  41441. procedure TUART3B_U5STA.clearUTXEN; inline;
  41442. begin
  41443. pTDefRegMap(@Self)^.clr := $00000400;
  41444. end;
  41445. procedure TUART3B_U5STA.setUTXEN(thebits : TBits_1); inline;
  41446. begin
  41447. if thebits = 0 then
  41448. pTDefRegMap(@Self)^.clr := $00000400
  41449. else
  41450. pTDefRegMap(@Self)^.&set := $00000400;
  41451. end;
  41452. function TUART3B_U5STA.getUTXEN : TBits_1; inline;
  41453. begin
  41454. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  41455. end;
  41456. procedure TUART3B_U5STA.setUTXBRK; inline;
  41457. begin
  41458. pTDefRegMap(@Self)^.&set := $00000800;
  41459. end;
  41460. procedure TUART3B_U5STA.clearUTXBRK; inline;
  41461. begin
  41462. pTDefRegMap(@Self)^.clr := $00000800;
  41463. end;
  41464. procedure TUART3B_U5STA.setUTXBRK(thebits : TBits_1); inline;
  41465. begin
  41466. if thebits = 0 then
  41467. pTDefRegMap(@Self)^.clr := $00000800
  41468. else
  41469. pTDefRegMap(@Self)^.&set := $00000800;
  41470. end;
  41471. function TUART3B_U5STA.getUTXBRK : TBits_1; inline;
  41472. begin
  41473. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41474. end;
  41475. procedure TUART3B_U5STA.setURXEN; inline;
  41476. begin
  41477. pTDefRegMap(@Self)^.&set := $00001000;
  41478. end;
  41479. procedure TUART3B_U5STA.clearURXEN; inline;
  41480. begin
  41481. pTDefRegMap(@Self)^.clr := $00001000;
  41482. end;
  41483. procedure TUART3B_U5STA.setURXEN(thebits : TBits_1); inline;
  41484. begin
  41485. if thebits = 0 then
  41486. pTDefRegMap(@Self)^.clr := $00001000
  41487. else
  41488. pTDefRegMap(@Self)^.&set := $00001000;
  41489. end;
  41490. function TUART3B_U5STA.getURXEN : TBits_1; inline;
  41491. begin
  41492. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  41493. end;
  41494. procedure TUART3B_U5STA.setUTXINV; inline;
  41495. begin
  41496. pTDefRegMap(@Self)^.&set := $00002000;
  41497. end;
  41498. procedure TUART3B_U5STA.clearUTXINV; inline;
  41499. begin
  41500. pTDefRegMap(@Self)^.clr := $00002000;
  41501. end;
  41502. procedure TUART3B_U5STA.setUTXINV(thebits : TBits_1); inline;
  41503. begin
  41504. if thebits = 0 then
  41505. pTDefRegMap(@Self)^.clr := $00002000
  41506. else
  41507. pTDefRegMap(@Self)^.&set := $00002000;
  41508. end;
  41509. function TUART3B_U5STA.getUTXINV : TBits_1; inline;
  41510. begin
  41511. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41512. end;
  41513. procedure TUART3B_U5STA.setUTXISEL(thebits : TBits_2); inline;
  41514. begin
  41515. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  41516. end;
  41517. function TUART3B_U5STA.getUTXISEL : TBits_2; inline;
  41518. begin
  41519. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  41520. end;
  41521. procedure TUART3B_U5STA.setADDR(thebits : TBits_8); inline;
  41522. begin
  41523. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  41524. end;
  41525. function TUART3B_U5STA.getADDR : TBits_8; inline;
  41526. begin
  41527. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  41528. end;
  41529. procedure TUART3B_U5STA.setADM_EN; inline;
  41530. begin
  41531. pTDefRegMap(@Self)^.&set := $01000000;
  41532. end;
  41533. procedure TUART3B_U5STA.clearADM_EN; inline;
  41534. begin
  41535. pTDefRegMap(@Self)^.clr := $01000000;
  41536. end;
  41537. procedure TUART3B_U5STA.setADM_EN(thebits : TBits_1); inline;
  41538. begin
  41539. if thebits = 0 then
  41540. pTDefRegMap(@Self)^.clr := $01000000
  41541. else
  41542. pTDefRegMap(@Self)^.&set := $01000000;
  41543. end;
  41544. function TUART3B_U5STA.getADM_EN : TBits_1; inline;
  41545. begin
  41546. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  41547. end;
  41548. procedure TUART3B_U5STA.setURXISEL0; inline;
  41549. begin
  41550. pTDefRegMap(@Self)^.&set := $00000040;
  41551. end;
  41552. procedure TUART3B_U5STA.clearURXISEL0; inline;
  41553. begin
  41554. pTDefRegMap(@Self)^.clr := $00000040;
  41555. end;
  41556. procedure TUART3B_U5STA.setURXISEL0(thebits : TBits_1); inline;
  41557. begin
  41558. if thebits = 0 then
  41559. pTDefRegMap(@Self)^.clr := $00000040
  41560. else
  41561. pTDefRegMap(@Self)^.&set := $00000040;
  41562. end;
  41563. function TUART3B_U5STA.getURXISEL0 : TBits_1; inline;
  41564. begin
  41565. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41566. end;
  41567. procedure TUART3B_U5STA.setURXISEL1; inline;
  41568. begin
  41569. pTDefRegMap(@Self)^.&set := $00000080;
  41570. end;
  41571. procedure TUART3B_U5STA.clearURXISEL1; inline;
  41572. begin
  41573. pTDefRegMap(@Self)^.clr := $00000080;
  41574. end;
  41575. procedure TUART3B_U5STA.setURXISEL1(thebits : TBits_1); inline;
  41576. begin
  41577. if thebits = 0 then
  41578. pTDefRegMap(@Self)^.clr := $00000080
  41579. else
  41580. pTDefRegMap(@Self)^.&set := $00000080;
  41581. end;
  41582. function TUART3B_U5STA.getURXISEL1 : TBits_1; inline;
  41583. begin
  41584. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41585. end;
  41586. procedure TUART3B_U5STA.setUTXISEL0; inline;
  41587. begin
  41588. pTDefRegMap(@Self)^.&set := $00004000;
  41589. end;
  41590. procedure TUART3B_U5STA.clearUTXISEL0; inline;
  41591. begin
  41592. pTDefRegMap(@Self)^.clr := $00004000;
  41593. end;
  41594. procedure TUART3B_U5STA.setUTXISEL0(thebits : TBits_1); inline;
  41595. begin
  41596. if thebits = 0 then
  41597. pTDefRegMap(@Self)^.clr := $00004000
  41598. else
  41599. pTDefRegMap(@Self)^.&set := $00004000;
  41600. end;
  41601. function TUART3B_U5STA.getUTXISEL0 : TBits_1; inline;
  41602. begin
  41603. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  41604. end;
  41605. procedure TUART3B_U5STA.setUTXISEL1; inline;
  41606. begin
  41607. pTDefRegMap(@Self)^.&set := $00008000;
  41608. end;
  41609. procedure TUART3B_U5STA.clearUTXISEL1; inline;
  41610. begin
  41611. pTDefRegMap(@Self)^.clr := $00008000;
  41612. end;
  41613. procedure TUART3B_U5STA.setUTXISEL1(thebits : TBits_1); inline;
  41614. begin
  41615. if thebits = 0 then
  41616. pTDefRegMap(@Self)^.clr := $00008000
  41617. else
  41618. pTDefRegMap(@Self)^.&set := $00008000;
  41619. end;
  41620. function TUART3B_U5STA.getUTXISEL1 : TBits_1; inline;
  41621. begin
  41622. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41623. end;
  41624. procedure TUART3B_U5STA.setUTXSEL(thebits : TBits_2); inline;
  41625. begin
  41626. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  41627. end;
  41628. function TUART3B_U5STA.getUTXSEL : TBits_2; inline;
  41629. begin
  41630. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  41631. end;
  41632. procedure TUART3B_U5STA.setw(thebits : TBits_32); inline;
  41633. begin
  41634. pTDefRegMap(@Self)^.val := thebits;
  41635. end;
  41636. function TUART3B_U5STA.getw : TBits_32; inline;
  41637. begin
  41638. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41639. end;
  41640. procedure TPMP_PMCON.setRDSP; inline;
  41641. begin
  41642. pTDefRegMap(@Self)^.&set := $00000001;
  41643. end;
  41644. procedure TPMP_PMCON.clearRDSP; inline;
  41645. begin
  41646. pTDefRegMap(@Self)^.clr := $00000001;
  41647. end;
  41648. procedure TPMP_PMCON.setRDSP(thebits : TBits_1); inline;
  41649. begin
  41650. if thebits = 0 then
  41651. pTDefRegMap(@Self)^.clr := $00000001
  41652. else
  41653. pTDefRegMap(@Self)^.&set := $00000001;
  41654. end;
  41655. function TPMP_PMCON.getRDSP : TBits_1; inline;
  41656. begin
  41657. getRDSP := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41658. end;
  41659. procedure TPMP_PMCON.setWRSP; inline;
  41660. begin
  41661. pTDefRegMap(@Self)^.&set := $00000002;
  41662. end;
  41663. procedure TPMP_PMCON.clearWRSP; inline;
  41664. begin
  41665. pTDefRegMap(@Self)^.clr := $00000002;
  41666. end;
  41667. procedure TPMP_PMCON.setWRSP(thebits : TBits_1); inline;
  41668. begin
  41669. if thebits = 0 then
  41670. pTDefRegMap(@Self)^.clr := $00000002
  41671. else
  41672. pTDefRegMap(@Self)^.&set := $00000002;
  41673. end;
  41674. function TPMP_PMCON.getWRSP : TBits_1; inline;
  41675. begin
  41676. getWRSP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41677. end;
  41678. procedure TPMP_PMCON.setCS1P; inline;
  41679. begin
  41680. pTDefRegMap(@Self)^.&set := $00000008;
  41681. end;
  41682. procedure TPMP_PMCON.clearCS1P; inline;
  41683. begin
  41684. pTDefRegMap(@Self)^.clr := $00000008;
  41685. end;
  41686. procedure TPMP_PMCON.setCS1P(thebits : TBits_1); inline;
  41687. begin
  41688. if thebits = 0 then
  41689. pTDefRegMap(@Self)^.clr := $00000008
  41690. else
  41691. pTDefRegMap(@Self)^.&set := $00000008;
  41692. end;
  41693. function TPMP_PMCON.getCS1P : TBits_1; inline;
  41694. begin
  41695. getCS1P := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  41696. end;
  41697. procedure TPMP_PMCON.setCS2P; inline;
  41698. begin
  41699. pTDefRegMap(@Self)^.&set := $00000010;
  41700. end;
  41701. procedure TPMP_PMCON.clearCS2P; inline;
  41702. begin
  41703. pTDefRegMap(@Self)^.clr := $00000010;
  41704. end;
  41705. procedure TPMP_PMCON.setCS2P(thebits : TBits_1); inline;
  41706. begin
  41707. if thebits = 0 then
  41708. pTDefRegMap(@Self)^.clr := $00000010
  41709. else
  41710. pTDefRegMap(@Self)^.&set := $00000010;
  41711. end;
  41712. function TPMP_PMCON.getCS2P : TBits_1; inline;
  41713. begin
  41714. getCS2P := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  41715. end;
  41716. procedure TPMP_PMCON.setALP; inline;
  41717. begin
  41718. pTDefRegMap(@Self)^.&set := $00000020;
  41719. end;
  41720. procedure TPMP_PMCON.clearALP; inline;
  41721. begin
  41722. pTDefRegMap(@Self)^.clr := $00000020;
  41723. end;
  41724. procedure TPMP_PMCON.setALP(thebits : TBits_1); inline;
  41725. begin
  41726. if thebits = 0 then
  41727. pTDefRegMap(@Self)^.clr := $00000020
  41728. else
  41729. pTDefRegMap(@Self)^.&set := $00000020;
  41730. end;
  41731. function TPMP_PMCON.getALP : TBits_1; inline;
  41732. begin
  41733. getALP := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41734. end;
  41735. procedure TPMP_PMCON.setCSF(thebits : TBits_2); inline;
  41736. begin
  41737. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  41738. end;
  41739. function TPMP_PMCON.getCSF : TBits_2; inline;
  41740. begin
  41741. getCSF := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  41742. end;
  41743. procedure TPMP_PMCON.setPTRDEN; inline;
  41744. begin
  41745. pTDefRegMap(@Self)^.&set := $00000100;
  41746. end;
  41747. procedure TPMP_PMCON.clearPTRDEN; inline;
  41748. begin
  41749. pTDefRegMap(@Self)^.clr := $00000100;
  41750. end;
  41751. procedure TPMP_PMCON.setPTRDEN(thebits : TBits_1); inline;
  41752. begin
  41753. if thebits = 0 then
  41754. pTDefRegMap(@Self)^.clr := $00000100
  41755. else
  41756. pTDefRegMap(@Self)^.&set := $00000100;
  41757. end;
  41758. function TPMP_PMCON.getPTRDEN : TBits_1; inline;
  41759. begin
  41760. getPTRDEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41761. end;
  41762. procedure TPMP_PMCON.setPTWREN; inline;
  41763. begin
  41764. pTDefRegMap(@Self)^.&set := $00000200;
  41765. end;
  41766. procedure TPMP_PMCON.clearPTWREN; inline;
  41767. begin
  41768. pTDefRegMap(@Self)^.clr := $00000200;
  41769. end;
  41770. procedure TPMP_PMCON.setPTWREN(thebits : TBits_1); inline;
  41771. begin
  41772. if thebits = 0 then
  41773. pTDefRegMap(@Self)^.clr := $00000200
  41774. else
  41775. pTDefRegMap(@Self)^.&set := $00000200;
  41776. end;
  41777. function TPMP_PMCON.getPTWREN : TBits_1; inline;
  41778. begin
  41779. getPTWREN := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  41780. end;
  41781. procedure TPMP_PMCON.setPMPTTL; inline;
  41782. begin
  41783. pTDefRegMap(@Self)^.&set := $00000400;
  41784. end;
  41785. procedure TPMP_PMCON.clearPMPTTL; inline;
  41786. begin
  41787. pTDefRegMap(@Self)^.clr := $00000400;
  41788. end;
  41789. procedure TPMP_PMCON.setPMPTTL(thebits : TBits_1); inline;
  41790. begin
  41791. if thebits = 0 then
  41792. pTDefRegMap(@Self)^.clr := $00000400
  41793. else
  41794. pTDefRegMap(@Self)^.&set := $00000400;
  41795. end;
  41796. function TPMP_PMCON.getPMPTTL : TBits_1; inline;
  41797. begin
  41798. getPMPTTL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  41799. end;
  41800. procedure TPMP_PMCON.setADRMUX(thebits : TBits_2); inline;
  41801. begin
  41802. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE7FF or ( thebits shl 11 );
  41803. end;
  41804. function TPMP_PMCON.getADRMUX : TBits_2; inline;
  41805. begin
  41806. getADRMUX := (pTDefRegMap(@Self)^.val and $00001800) shr 11;
  41807. end;
  41808. procedure TPMP_PMCON.setSIDL; inline;
  41809. begin
  41810. pTDefRegMap(@Self)^.&set := $00002000;
  41811. end;
  41812. procedure TPMP_PMCON.clearSIDL; inline;
  41813. begin
  41814. pTDefRegMap(@Self)^.clr := $00002000;
  41815. end;
  41816. procedure TPMP_PMCON.setSIDL(thebits : TBits_1); inline;
  41817. begin
  41818. if thebits = 0 then
  41819. pTDefRegMap(@Self)^.clr := $00002000
  41820. else
  41821. pTDefRegMap(@Self)^.&set := $00002000;
  41822. end;
  41823. function TPMP_PMCON.getSIDL : TBits_1; inline;
  41824. begin
  41825. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41826. end;
  41827. procedure TPMP_PMCON.setON; inline;
  41828. begin
  41829. pTDefRegMap(@Self)^.&set := $00008000;
  41830. end;
  41831. procedure TPMP_PMCON.clearON; inline;
  41832. begin
  41833. pTDefRegMap(@Self)^.clr := $00008000;
  41834. end;
  41835. procedure TPMP_PMCON.setON(thebits : TBits_1); inline;
  41836. begin
  41837. if thebits = 0 then
  41838. pTDefRegMap(@Self)^.clr := $00008000
  41839. else
  41840. pTDefRegMap(@Self)^.&set := $00008000;
  41841. end;
  41842. function TPMP_PMCON.getON : TBits_1; inline;
  41843. begin
  41844. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41845. end;
  41846. procedure TPMP_PMCON.setCSF0; inline;
  41847. begin
  41848. pTDefRegMap(@Self)^.&set := $00000040;
  41849. end;
  41850. procedure TPMP_PMCON.clearCSF0; inline;
  41851. begin
  41852. pTDefRegMap(@Self)^.clr := $00000040;
  41853. end;
  41854. procedure TPMP_PMCON.setCSF0(thebits : TBits_1); inline;
  41855. begin
  41856. if thebits = 0 then
  41857. pTDefRegMap(@Self)^.clr := $00000040
  41858. else
  41859. pTDefRegMap(@Self)^.&set := $00000040;
  41860. end;
  41861. function TPMP_PMCON.getCSF0 : TBits_1; inline;
  41862. begin
  41863. getCSF0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41864. end;
  41865. procedure TPMP_PMCON.setCSF1; inline;
  41866. begin
  41867. pTDefRegMap(@Self)^.&set := $00000080;
  41868. end;
  41869. procedure TPMP_PMCON.clearCSF1; inline;
  41870. begin
  41871. pTDefRegMap(@Self)^.clr := $00000080;
  41872. end;
  41873. procedure TPMP_PMCON.setCSF1(thebits : TBits_1); inline;
  41874. begin
  41875. if thebits = 0 then
  41876. pTDefRegMap(@Self)^.clr := $00000080
  41877. else
  41878. pTDefRegMap(@Self)^.&set := $00000080;
  41879. end;
  41880. function TPMP_PMCON.getCSF1 : TBits_1; inline;
  41881. begin
  41882. getCSF1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41883. end;
  41884. procedure TPMP_PMCON.setADRMUX0; inline;
  41885. begin
  41886. pTDefRegMap(@Self)^.&set := $00000800;
  41887. end;
  41888. procedure TPMP_PMCON.clearADRMUX0; inline;
  41889. begin
  41890. pTDefRegMap(@Self)^.clr := $00000800;
  41891. end;
  41892. procedure TPMP_PMCON.setADRMUX0(thebits : TBits_1); inline;
  41893. begin
  41894. if thebits = 0 then
  41895. pTDefRegMap(@Self)^.clr := $00000800
  41896. else
  41897. pTDefRegMap(@Self)^.&set := $00000800;
  41898. end;
  41899. function TPMP_PMCON.getADRMUX0 : TBits_1; inline;
  41900. begin
  41901. getADRMUX0 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41902. end;
  41903. procedure TPMP_PMCON.setADRMUX1; inline;
  41904. begin
  41905. pTDefRegMap(@Self)^.&set := $00001000;
  41906. end;
  41907. procedure TPMP_PMCON.clearADRMUX1; inline;
  41908. begin
  41909. pTDefRegMap(@Self)^.clr := $00001000;
  41910. end;
  41911. procedure TPMP_PMCON.setADRMUX1(thebits : TBits_1); inline;
  41912. begin
  41913. if thebits = 0 then
  41914. pTDefRegMap(@Self)^.clr := $00001000
  41915. else
  41916. pTDefRegMap(@Self)^.&set := $00001000;
  41917. end;
  41918. function TPMP_PMCON.getADRMUX1 : TBits_1; inline;
  41919. begin
  41920. getADRMUX1 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  41921. end;
  41922. procedure TPMP_PMCON.setPSIDL; inline;
  41923. begin
  41924. pTDefRegMap(@Self)^.&set := $00002000;
  41925. end;
  41926. procedure TPMP_PMCON.clearPSIDL; inline;
  41927. begin
  41928. pTDefRegMap(@Self)^.clr := $00002000;
  41929. end;
  41930. procedure TPMP_PMCON.setPSIDL(thebits : TBits_1); inline;
  41931. begin
  41932. if thebits = 0 then
  41933. pTDefRegMap(@Self)^.clr := $00002000
  41934. else
  41935. pTDefRegMap(@Self)^.&set := $00002000;
  41936. end;
  41937. function TPMP_PMCON.getPSIDL : TBits_1; inline;
  41938. begin
  41939. getPSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41940. end;
  41941. procedure TPMP_PMCON.setPMPEN; inline;
  41942. begin
  41943. pTDefRegMap(@Self)^.&set := $00008000;
  41944. end;
  41945. procedure TPMP_PMCON.clearPMPEN; inline;
  41946. begin
  41947. pTDefRegMap(@Self)^.clr := $00008000;
  41948. end;
  41949. procedure TPMP_PMCON.setPMPEN(thebits : TBits_1); inline;
  41950. begin
  41951. if thebits = 0 then
  41952. pTDefRegMap(@Self)^.clr := $00008000
  41953. else
  41954. pTDefRegMap(@Self)^.&set := $00008000;
  41955. end;
  41956. function TPMP_PMCON.getPMPEN : TBits_1; inline;
  41957. begin
  41958. getPMPEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41959. end;
  41960. procedure TPMP_PMCON.setw(thebits : TBits_32); inline;
  41961. begin
  41962. pTDefRegMap(@Self)^.val := thebits;
  41963. end;
  41964. function TPMP_PMCON.getw : TBits_32; inline;
  41965. begin
  41966. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41967. end;
  41968. procedure TPMP_PMMODE.setWAITE(thebits : TBits_2); inline;
  41969. begin
  41970. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  41971. end;
  41972. function TPMP_PMMODE.getWAITE : TBits_2; inline;
  41973. begin
  41974. getWAITE := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  41975. end;
  41976. procedure TPMP_PMMODE.setWAITM(thebits : TBits_4); inline;
  41977. begin
  41978. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  41979. end;
  41980. function TPMP_PMMODE.getWAITM : TBits_4; inline;
  41981. begin
  41982. getWAITM := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  41983. end;
  41984. procedure TPMP_PMMODE.setWAITB(thebits : TBits_2); inline;
  41985. begin
  41986. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  41987. end;
  41988. function TPMP_PMMODE.getWAITB : TBits_2; inline;
  41989. begin
  41990. getWAITB := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  41991. end;
  41992. procedure TPMP_PMMODE.setMODE(thebits : TBits_2); inline;
  41993. begin
  41994. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  41995. end;
  41996. function TPMP_PMMODE.getMODE : TBits_2; inline;
  41997. begin
  41998. getMODE := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  41999. end;
  42000. procedure TPMP_PMMODE.setMODE16; inline;
  42001. begin
  42002. pTDefRegMap(@Self)^.&set := $00000400;
  42003. end;
  42004. procedure TPMP_PMMODE.clearMODE16; inline;
  42005. begin
  42006. pTDefRegMap(@Self)^.clr := $00000400;
  42007. end;
  42008. procedure TPMP_PMMODE.setMODE16(thebits : TBits_1); inline;
  42009. begin
  42010. if thebits = 0 then
  42011. pTDefRegMap(@Self)^.clr := $00000400
  42012. else
  42013. pTDefRegMap(@Self)^.&set := $00000400;
  42014. end;
  42015. function TPMP_PMMODE.getMODE16 : TBits_1; inline;
  42016. begin
  42017. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  42018. end;
  42019. procedure TPMP_PMMODE.setINCM(thebits : TBits_2); inline;
  42020. begin
  42021. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE7FF or ( thebits shl 11 );
  42022. end;
  42023. function TPMP_PMMODE.getINCM : TBits_2; inline;
  42024. begin
  42025. getINCM := (pTDefRegMap(@Self)^.val and $00001800) shr 11;
  42026. end;
  42027. procedure TPMP_PMMODE.setIRQM(thebits : TBits_2); inline;
  42028. begin
  42029. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  42030. end;
  42031. function TPMP_PMMODE.getIRQM : TBits_2; inline;
  42032. begin
  42033. getIRQM := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  42034. end;
  42035. procedure TPMP_PMMODE.setBUSY; inline;
  42036. begin
  42037. pTDefRegMap(@Self)^.&set := $00008000;
  42038. end;
  42039. procedure TPMP_PMMODE.clearBUSY; inline;
  42040. begin
  42041. pTDefRegMap(@Self)^.clr := $00008000;
  42042. end;
  42043. procedure TPMP_PMMODE.setBUSY(thebits : TBits_1); inline;
  42044. begin
  42045. if thebits = 0 then
  42046. pTDefRegMap(@Self)^.clr := $00008000
  42047. else
  42048. pTDefRegMap(@Self)^.&set := $00008000;
  42049. end;
  42050. function TPMP_PMMODE.getBUSY : TBits_1; inline;
  42051. begin
  42052. getBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42053. end;
  42054. procedure TPMP_PMMODE.setWAITE0; inline;
  42055. begin
  42056. pTDefRegMap(@Self)^.&set := $00000001;
  42057. end;
  42058. procedure TPMP_PMMODE.clearWAITE0; inline;
  42059. begin
  42060. pTDefRegMap(@Self)^.clr := $00000001;
  42061. end;
  42062. procedure TPMP_PMMODE.setWAITE0(thebits : TBits_1); inline;
  42063. begin
  42064. if thebits = 0 then
  42065. pTDefRegMap(@Self)^.clr := $00000001
  42066. else
  42067. pTDefRegMap(@Self)^.&set := $00000001;
  42068. end;
  42069. function TPMP_PMMODE.getWAITE0 : TBits_1; inline;
  42070. begin
  42071. getWAITE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42072. end;
  42073. procedure TPMP_PMMODE.setWAITE1; inline;
  42074. begin
  42075. pTDefRegMap(@Self)^.&set := $00000002;
  42076. end;
  42077. procedure TPMP_PMMODE.clearWAITE1; inline;
  42078. begin
  42079. pTDefRegMap(@Self)^.clr := $00000002;
  42080. end;
  42081. procedure TPMP_PMMODE.setWAITE1(thebits : TBits_1); inline;
  42082. begin
  42083. if thebits = 0 then
  42084. pTDefRegMap(@Self)^.clr := $00000002
  42085. else
  42086. pTDefRegMap(@Self)^.&set := $00000002;
  42087. end;
  42088. function TPMP_PMMODE.getWAITE1 : TBits_1; inline;
  42089. begin
  42090. getWAITE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42091. end;
  42092. procedure TPMP_PMMODE.setWAITM0; inline;
  42093. begin
  42094. pTDefRegMap(@Self)^.&set := $00000004;
  42095. end;
  42096. procedure TPMP_PMMODE.clearWAITM0; inline;
  42097. begin
  42098. pTDefRegMap(@Self)^.clr := $00000004;
  42099. end;
  42100. procedure TPMP_PMMODE.setWAITM0(thebits : TBits_1); inline;
  42101. begin
  42102. if thebits = 0 then
  42103. pTDefRegMap(@Self)^.clr := $00000004
  42104. else
  42105. pTDefRegMap(@Self)^.&set := $00000004;
  42106. end;
  42107. function TPMP_PMMODE.getWAITM0 : TBits_1; inline;
  42108. begin
  42109. getWAITM0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42110. end;
  42111. procedure TPMP_PMMODE.setWAITM1; inline;
  42112. begin
  42113. pTDefRegMap(@Self)^.&set := $00000008;
  42114. end;
  42115. procedure TPMP_PMMODE.clearWAITM1; inline;
  42116. begin
  42117. pTDefRegMap(@Self)^.clr := $00000008;
  42118. end;
  42119. procedure TPMP_PMMODE.setWAITM1(thebits : TBits_1); inline;
  42120. begin
  42121. if thebits = 0 then
  42122. pTDefRegMap(@Self)^.clr := $00000008
  42123. else
  42124. pTDefRegMap(@Self)^.&set := $00000008;
  42125. end;
  42126. function TPMP_PMMODE.getWAITM1 : TBits_1; inline;
  42127. begin
  42128. getWAITM1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42129. end;
  42130. procedure TPMP_PMMODE.setWAITM2; inline;
  42131. begin
  42132. pTDefRegMap(@Self)^.&set := $00000010;
  42133. end;
  42134. procedure TPMP_PMMODE.clearWAITM2; inline;
  42135. begin
  42136. pTDefRegMap(@Self)^.clr := $00000010;
  42137. end;
  42138. procedure TPMP_PMMODE.setWAITM2(thebits : TBits_1); inline;
  42139. begin
  42140. if thebits = 0 then
  42141. pTDefRegMap(@Self)^.clr := $00000010
  42142. else
  42143. pTDefRegMap(@Self)^.&set := $00000010;
  42144. end;
  42145. function TPMP_PMMODE.getWAITM2 : TBits_1; inline;
  42146. begin
  42147. getWAITM2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  42148. end;
  42149. procedure TPMP_PMMODE.setWAITM3; inline;
  42150. begin
  42151. pTDefRegMap(@Self)^.&set := $00000020;
  42152. end;
  42153. procedure TPMP_PMMODE.clearWAITM3; inline;
  42154. begin
  42155. pTDefRegMap(@Self)^.clr := $00000020;
  42156. end;
  42157. procedure TPMP_PMMODE.setWAITM3(thebits : TBits_1); inline;
  42158. begin
  42159. if thebits = 0 then
  42160. pTDefRegMap(@Self)^.clr := $00000020
  42161. else
  42162. pTDefRegMap(@Self)^.&set := $00000020;
  42163. end;
  42164. function TPMP_PMMODE.getWAITM3 : TBits_1; inline;
  42165. begin
  42166. getWAITM3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42167. end;
  42168. procedure TPMP_PMMODE.setWAITB0; inline;
  42169. begin
  42170. pTDefRegMap(@Self)^.&set := $00000040;
  42171. end;
  42172. procedure TPMP_PMMODE.clearWAITB0; inline;
  42173. begin
  42174. pTDefRegMap(@Self)^.clr := $00000040;
  42175. end;
  42176. procedure TPMP_PMMODE.setWAITB0(thebits : TBits_1); inline;
  42177. begin
  42178. if thebits = 0 then
  42179. pTDefRegMap(@Self)^.clr := $00000040
  42180. else
  42181. pTDefRegMap(@Self)^.&set := $00000040;
  42182. end;
  42183. function TPMP_PMMODE.getWAITB0 : TBits_1; inline;
  42184. begin
  42185. getWAITB0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42186. end;
  42187. procedure TPMP_PMMODE.setWAITB1; inline;
  42188. begin
  42189. pTDefRegMap(@Self)^.&set := $00000080;
  42190. end;
  42191. procedure TPMP_PMMODE.clearWAITB1; inline;
  42192. begin
  42193. pTDefRegMap(@Self)^.clr := $00000080;
  42194. end;
  42195. procedure TPMP_PMMODE.setWAITB1(thebits : TBits_1); inline;
  42196. begin
  42197. if thebits = 0 then
  42198. pTDefRegMap(@Self)^.clr := $00000080
  42199. else
  42200. pTDefRegMap(@Self)^.&set := $00000080;
  42201. end;
  42202. function TPMP_PMMODE.getWAITB1 : TBits_1; inline;
  42203. begin
  42204. getWAITB1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42205. end;
  42206. procedure TPMP_PMMODE.setMODE0; inline;
  42207. begin
  42208. pTDefRegMap(@Self)^.&set := $00000100;
  42209. end;
  42210. procedure TPMP_PMMODE.clearMODE0; inline;
  42211. begin
  42212. pTDefRegMap(@Self)^.clr := $00000100;
  42213. end;
  42214. procedure TPMP_PMMODE.setMODE0(thebits : TBits_1); inline;
  42215. begin
  42216. if thebits = 0 then
  42217. pTDefRegMap(@Self)^.clr := $00000100
  42218. else
  42219. pTDefRegMap(@Self)^.&set := $00000100;
  42220. end;
  42221. function TPMP_PMMODE.getMODE0 : TBits_1; inline;
  42222. begin
  42223. getMODE0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42224. end;
  42225. procedure TPMP_PMMODE.setMODE1; inline;
  42226. begin
  42227. pTDefRegMap(@Self)^.&set := $00000200;
  42228. end;
  42229. procedure TPMP_PMMODE.clearMODE1; inline;
  42230. begin
  42231. pTDefRegMap(@Self)^.clr := $00000200;
  42232. end;
  42233. procedure TPMP_PMMODE.setMODE1(thebits : TBits_1); inline;
  42234. begin
  42235. if thebits = 0 then
  42236. pTDefRegMap(@Self)^.clr := $00000200
  42237. else
  42238. pTDefRegMap(@Self)^.&set := $00000200;
  42239. end;
  42240. function TPMP_PMMODE.getMODE1 : TBits_1; inline;
  42241. begin
  42242. getMODE1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42243. end;
  42244. procedure TPMP_PMMODE.setINCM0; inline;
  42245. begin
  42246. pTDefRegMap(@Self)^.&set := $00000800;
  42247. end;
  42248. procedure TPMP_PMMODE.clearINCM0; inline;
  42249. begin
  42250. pTDefRegMap(@Self)^.clr := $00000800;
  42251. end;
  42252. procedure TPMP_PMMODE.setINCM0(thebits : TBits_1); inline;
  42253. begin
  42254. if thebits = 0 then
  42255. pTDefRegMap(@Self)^.clr := $00000800
  42256. else
  42257. pTDefRegMap(@Self)^.&set := $00000800;
  42258. end;
  42259. function TPMP_PMMODE.getINCM0 : TBits_1; inline;
  42260. begin
  42261. getINCM0 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42262. end;
  42263. procedure TPMP_PMMODE.setINCM1; inline;
  42264. begin
  42265. pTDefRegMap(@Self)^.&set := $00001000;
  42266. end;
  42267. procedure TPMP_PMMODE.clearINCM1; inline;
  42268. begin
  42269. pTDefRegMap(@Self)^.clr := $00001000;
  42270. end;
  42271. procedure TPMP_PMMODE.setINCM1(thebits : TBits_1); inline;
  42272. begin
  42273. if thebits = 0 then
  42274. pTDefRegMap(@Self)^.clr := $00001000
  42275. else
  42276. pTDefRegMap(@Self)^.&set := $00001000;
  42277. end;
  42278. function TPMP_PMMODE.getINCM1 : TBits_1; inline;
  42279. begin
  42280. getINCM1 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  42281. end;
  42282. procedure TPMP_PMMODE.setIRQM0; inline;
  42283. begin
  42284. pTDefRegMap(@Self)^.&set := $00002000;
  42285. end;
  42286. procedure TPMP_PMMODE.clearIRQM0; inline;
  42287. begin
  42288. pTDefRegMap(@Self)^.clr := $00002000;
  42289. end;
  42290. procedure TPMP_PMMODE.setIRQM0(thebits : TBits_1); inline;
  42291. begin
  42292. if thebits = 0 then
  42293. pTDefRegMap(@Self)^.clr := $00002000
  42294. else
  42295. pTDefRegMap(@Self)^.&set := $00002000;
  42296. end;
  42297. function TPMP_PMMODE.getIRQM0 : TBits_1; inline;
  42298. begin
  42299. getIRQM0 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42300. end;
  42301. procedure TPMP_PMMODE.setIRQM1; inline;
  42302. begin
  42303. pTDefRegMap(@Self)^.&set := $00004000;
  42304. end;
  42305. procedure TPMP_PMMODE.clearIRQM1; inline;
  42306. begin
  42307. pTDefRegMap(@Self)^.clr := $00004000;
  42308. end;
  42309. procedure TPMP_PMMODE.setIRQM1(thebits : TBits_1); inline;
  42310. begin
  42311. if thebits = 0 then
  42312. pTDefRegMap(@Self)^.clr := $00004000
  42313. else
  42314. pTDefRegMap(@Self)^.&set := $00004000;
  42315. end;
  42316. function TPMP_PMMODE.getIRQM1 : TBits_1; inline;
  42317. begin
  42318. getIRQM1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  42319. end;
  42320. procedure TPMP_PMMODE.setw(thebits : TBits_32); inline;
  42321. begin
  42322. pTDefRegMap(@Self)^.val := thebits;
  42323. end;
  42324. function TPMP_PMMODE.getw : TBits_32; inline;
  42325. begin
  42326. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42327. end;
  42328. procedure TPMP_PMADDR.setADDR(thebits : TBits_14); inline;
  42329. begin
  42330. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC000 or ( thebits shl 0 );
  42331. end;
  42332. function TPMP_PMADDR.getADDR : TBits_14; inline;
  42333. begin
  42334. getADDR := (pTDefRegMap(@Self)^.val and $00003FFF) shr 0;
  42335. end;
  42336. procedure TPMP_PMADDR.setCS(thebits : TBits_2); inline;
  42337. begin
  42338. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  42339. end;
  42340. function TPMP_PMADDR.getCS : TBits_2; inline;
  42341. begin
  42342. getCS := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  42343. end;
  42344. procedure TPMP_PMADDR.setPADDR(thebits : TBits_14); inline;
  42345. begin
  42346. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC000 or ( thebits shl 0 );
  42347. end;
  42348. function TPMP_PMADDR.getPADDR : TBits_14; inline;
  42349. begin
  42350. getPADDR := (pTDefRegMap(@Self)^.val and $00003FFF) shr 0;
  42351. end;
  42352. procedure TPMP_PMADDR.setCS1; inline;
  42353. begin
  42354. pTDefRegMap(@Self)^.&set := $00004000;
  42355. end;
  42356. procedure TPMP_PMADDR.clearCS1; inline;
  42357. begin
  42358. pTDefRegMap(@Self)^.clr := $00004000;
  42359. end;
  42360. procedure TPMP_PMADDR.setCS1(thebits : TBits_1); inline;
  42361. begin
  42362. if thebits = 0 then
  42363. pTDefRegMap(@Self)^.clr := $00004000
  42364. else
  42365. pTDefRegMap(@Self)^.&set := $00004000;
  42366. end;
  42367. function TPMP_PMADDR.getCS1 : TBits_1; inline;
  42368. begin
  42369. getCS1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  42370. end;
  42371. procedure TPMP_PMADDR.setCS2; inline;
  42372. begin
  42373. pTDefRegMap(@Self)^.&set := $00008000;
  42374. end;
  42375. procedure TPMP_PMADDR.clearCS2; inline;
  42376. begin
  42377. pTDefRegMap(@Self)^.clr := $00008000;
  42378. end;
  42379. procedure TPMP_PMADDR.setCS2(thebits : TBits_1); inline;
  42380. begin
  42381. if thebits = 0 then
  42382. pTDefRegMap(@Self)^.clr := $00008000
  42383. else
  42384. pTDefRegMap(@Self)^.&set := $00008000;
  42385. end;
  42386. function TPMP_PMADDR.getCS2 : TBits_1; inline;
  42387. begin
  42388. getCS2 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42389. end;
  42390. procedure TPMP_PMADDR.setw(thebits : TBits_32); inline;
  42391. begin
  42392. pTDefRegMap(@Self)^.val := thebits;
  42393. end;
  42394. function TPMP_PMADDR.getw : TBits_32; inline;
  42395. begin
  42396. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42397. end;
  42398. procedure TPMP_PMDOUT.setDATAOUT(thebits : TBits_32); inline;
  42399. begin
  42400. pTDefRegMap(@Self)^.val := thebits;
  42401. end;
  42402. function TPMP_PMDOUT.getDATAOUT : TBits_32; inline;
  42403. begin
  42404. getDATAOUT := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42405. end;
  42406. procedure TPMP_PMDOUT.setw(thebits : TBits_32); inline;
  42407. begin
  42408. pTDefRegMap(@Self)^.val := thebits;
  42409. end;
  42410. function TPMP_PMDOUT.getw : TBits_32; inline;
  42411. begin
  42412. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42413. end;
  42414. procedure TPMP_PMDIN.setDATAIN(thebits : TBits_32); inline;
  42415. begin
  42416. pTDefRegMap(@Self)^.val := thebits;
  42417. end;
  42418. function TPMP_PMDIN.getDATAIN : TBits_32; inline;
  42419. begin
  42420. getDATAIN := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42421. end;
  42422. procedure TPMP_PMDIN.setw(thebits : TBits_32); inline;
  42423. begin
  42424. pTDefRegMap(@Self)^.val := thebits;
  42425. end;
  42426. function TPMP_PMDIN.getw : TBits_32; inline;
  42427. begin
  42428. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42429. end;
  42430. procedure TPMP_PMAEN.setPTEN(thebits : TBits_16); inline;
  42431. begin
  42432. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  42433. end;
  42434. function TPMP_PMAEN.getPTEN : TBits_16; inline;
  42435. begin
  42436. getPTEN := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  42437. end;
  42438. procedure TPMP_PMAEN.setPTEN0; inline;
  42439. begin
  42440. pTDefRegMap(@Self)^.&set := $00000001;
  42441. end;
  42442. procedure TPMP_PMAEN.clearPTEN0; inline;
  42443. begin
  42444. pTDefRegMap(@Self)^.clr := $00000001;
  42445. end;
  42446. procedure TPMP_PMAEN.setPTEN0(thebits : TBits_1); inline;
  42447. begin
  42448. if thebits = 0 then
  42449. pTDefRegMap(@Self)^.clr := $00000001
  42450. else
  42451. pTDefRegMap(@Self)^.&set := $00000001;
  42452. end;
  42453. function TPMP_PMAEN.getPTEN0 : TBits_1; inline;
  42454. begin
  42455. getPTEN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42456. end;
  42457. procedure TPMP_PMAEN.setPTEN1; inline;
  42458. begin
  42459. pTDefRegMap(@Self)^.&set := $00000002;
  42460. end;
  42461. procedure TPMP_PMAEN.clearPTEN1; inline;
  42462. begin
  42463. pTDefRegMap(@Self)^.clr := $00000002;
  42464. end;
  42465. procedure TPMP_PMAEN.setPTEN1(thebits : TBits_1); inline;
  42466. begin
  42467. if thebits = 0 then
  42468. pTDefRegMap(@Self)^.clr := $00000002
  42469. else
  42470. pTDefRegMap(@Self)^.&set := $00000002;
  42471. end;
  42472. function TPMP_PMAEN.getPTEN1 : TBits_1; inline;
  42473. begin
  42474. getPTEN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42475. end;
  42476. procedure TPMP_PMAEN.setPTEN2; inline;
  42477. begin
  42478. pTDefRegMap(@Self)^.&set := $00000004;
  42479. end;
  42480. procedure TPMP_PMAEN.clearPTEN2; inline;
  42481. begin
  42482. pTDefRegMap(@Self)^.clr := $00000004;
  42483. end;
  42484. procedure TPMP_PMAEN.setPTEN2(thebits : TBits_1); inline;
  42485. begin
  42486. if thebits = 0 then
  42487. pTDefRegMap(@Self)^.clr := $00000004
  42488. else
  42489. pTDefRegMap(@Self)^.&set := $00000004;
  42490. end;
  42491. function TPMP_PMAEN.getPTEN2 : TBits_1; inline;
  42492. begin
  42493. getPTEN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42494. end;
  42495. procedure TPMP_PMAEN.setPTEN3; inline;
  42496. begin
  42497. pTDefRegMap(@Self)^.&set := $00000008;
  42498. end;
  42499. procedure TPMP_PMAEN.clearPTEN3; inline;
  42500. begin
  42501. pTDefRegMap(@Self)^.clr := $00000008;
  42502. end;
  42503. procedure TPMP_PMAEN.setPTEN3(thebits : TBits_1); inline;
  42504. begin
  42505. if thebits = 0 then
  42506. pTDefRegMap(@Self)^.clr := $00000008
  42507. else
  42508. pTDefRegMap(@Self)^.&set := $00000008;
  42509. end;
  42510. function TPMP_PMAEN.getPTEN3 : TBits_1; inline;
  42511. begin
  42512. getPTEN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42513. end;
  42514. procedure TPMP_PMAEN.setPTEN4; inline;
  42515. begin
  42516. pTDefRegMap(@Self)^.&set := $00000010;
  42517. end;
  42518. procedure TPMP_PMAEN.clearPTEN4; inline;
  42519. begin
  42520. pTDefRegMap(@Self)^.clr := $00000010;
  42521. end;
  42522. procedure TPMP_PMAEN.setPTEN4(thebits : TBits_1); inline;
  42523. begin
  42524. if thebits = 0 then
  42525. pTDefRegMap(@Self)^.clr := $00000010
  42526. else
  42527. pTDefRegMap(@Self)^.&set := $00000010;
  42528. end;
  42529. function TPMP_PMAEN.getPTEN4 : TBits_1; inline;
  42530. begin
  42531. getPTEN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  42532. end;
  42533. procedure TPMP_PMAEN.setPTEN5; inline;
  42534. begin
  42535. pTDefRegMap(@Self)^.&set := $00000020;
  42536. end;
  42537. procedure TPMP_PMAEN.clearPTEN5; inline;
  42538. begin
  42539. pTDefRegMap(@Self)^.clr := $00000020;
  42540. end;
  42541. procedure TPMP_PMAEN.setPTEN5(thebits : TBits_1); inline;
  42542. begin
  42543. if thebits = 0 then
  42544. pTDefRegMap(@Self)^.clr := $00000020
  42545. else
  42546. pTDefRegMap(@Self)^.&set := $00000020;
  42547. end;
  42548. function TPMP_PMAEN.getPTEN5 : TBits_1; inline;
  42549. begin
  42550. getPTEN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42551. end;
  42552. procedure TPMP_PMAEN.setPTEN6; inline;
  42553. begin
  42554. pTDefRegMap(@Self)^.&set := $00000040;
  42555. end;
  42556. procedure TPMP_PMAEN.clearPTEN6; inline;
  42557. begin
  42558. pTDefRegMap(@Self)^.clr := $00000040;
  42559. end;
  42560. procedure TPMP_PMAEN.setPTEN6(thebits : TBits_1); inline;
  42561. begin
  42562. if thebits = 0 then
  42563. pTDefRegMap(@Self)^.clr := $00000040
  42564. else
  42565. pTDefRegMap(@Self)^.&set := $00000040;
  42566. end;
  42567. function TPMP_PMAEN.getPTEN6 : TBits_1; inline;
  42568. begin
  42569. getPTEN6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42570. end;
  42571. procedure TPMP_PMAEN.setPTEN7; inline;
  42572. begin
  42573. pTDefRegMap(@Self)^.&set := $00000080;
  42574. end;
  42575. procedure TPMP_PMAEN.clearPTEN7; inline;
  42576. begin
  42577. pTDefRegMap(@Self)^.clr := $00000080;
  42578. end;
  42579. procedure TPMP_PMAEN.setPTEN7(thebits : TBits_1); inline;
  42580. begin
  42581. if thebits = 0 then
  42582. pTDefRegMap(@Self)^.clr := $00000080
  42583. else
  42584. pTDefRegMap(@Self)^.&set := $00000080;
  42585. end;
  42586. function TPMP_PMAEN.getPTEN7 : TBits_1; inline;
  42587. begin
  42588. getPTEN7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42589. end;
  42590. procedure TPMP_PMAEN.setPTEN8; inline;
  42591. begin
  42592. pTDefRegMap(@Self)^.&set := $00000100;
  42593. end;
  42594. procedure TPMP_PMAEN.clearPTEN8; inline;
  42595. begin
  42596. pTDefRegMap(@Self)^.clr := $00000100;
  42597. end;
  42598. procedure TPMP_PMAEN.setPTEN8(thebits : TBits_1); inline;
  42599. begin
  42600. if thebits = 0 then
  42601. pTDefRegMap(@Self)^.clr := $00000100
  42602. else
  42603. pTDefRegMap(@Self)^.&set := $00000100;
  42604. end;
  42605. function TPMP_PMAEN.getPTEN8 : TBits_1; inline;
  42606. begin
  42607. getPTEN8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42608. end;
  42609. procedure TPMP_PMAEN.setPTEN9; inline;
  42610. begin
  42611. pTDefRegMap(@Self)^.&set := $00000200;
  42612. end;
  42613. procedure TPMP_PMAEN.clearPTEN9; inline;
  42614. begin
  42615. pTDefRegMap(@Self)^.clr := $00000200;
  42616. end;
  42617. procedure TPMP_PMAEN.setPTEN9(thebits : TBits_1); inline;
  42618. begin
  42619. if thebits = 0 then
  42620. pTDefRegMap(@Self)^.clr := $00000200
  42621. else
  42622. pTDefRegMap(@Self)^.&set := $00000200;
  42623. end;
  42624. function TPMP_PMAEN.getPTEN9 : TBits_1; inline;
  42625. begin
  42626. getPTEN9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42627. end;
  42628. procedure TPMP_PMAEN.setPTEN10; inline;
  42629. begin
  42630. pTDefRegMap(@Self)^.&set := $00000400;
  42631. end;
  42632. procedure TPMP_PMAEN.clearPTEN10; inline;
  42633. begin
  42634. pTDefRegMap(@Self)^.clr := $00000400;
  42635. end;
  42636. procedure TPMP_PMAEN.setPTEN10(thebits : TBits_1); inline;
  42637. begin
  42638. if thebits = 0 then
  42639. pTDefRegMap(@Self)^.clr := $00000400
  42640. else
  42641. pTDefRegMap(@Self)^.&set := $00000400;
  42642. end;
  42643. function TPMP_PMAEN.getPTEN10 : TBits_1; inline;
  42644. begin
  42645. getPTEN10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  42646. end;
  42647. procedure TPMP_PMAEN.setPTEN11; inline;
  42648. begin
  42649. pTDefRegMap(@Self)^.&set := $00000800;
  42650. end;
  42651. procedure TPMP_PMAEN.clearPTEN11; inline;
  42652. begin
  42653. pTDefRegMap(@Self)^.clr := $00000800;
  42654. end;
  42655. procedure TPMP_PMAEN.setPTEN11(thebits : TBits_1); inline;
  42656. begin
  42657. if thebits = 0 then
  42658. pTDefRegMap(@Self)^.clr := $00000800
  42659. else
  42660. pTDefRegMap(@Self)^.&set := $00000800;
  42661. end;
  42662. function TPMP_PMAEN.getPTEN11 : TBits_1; inline;
  42663. begin
  42664. getPTEN11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42665. end;
  42666. procedure TPMP_PMAEN.setPTEN12; inline;
  42667. begin
  42668. pTDefRegMap(@Self)^.&set := $00001000;
  42669. end;
  42670. procedure TPMP_PMAEN.clearPTEN12; inline;
  42671. begin
  42672. pTDefRegMap(@Self)^.clr := $00001000;
  42673. end;
  42674. procedure TPMP_PMAEN.setPTEN12(thebits : TBits_1); inline;
  42675. begin
  42676. if thebits = 0 then
  42677. pTDefRegMap(@Self)^.clr := $00001000
  42678. else
  42679. pTDefRegMap(@Self)^.&set := $00001000;
  42680. end;
  42681. function TPMP_PMAEN.getPTEN12 : TBits_1; inline;
  42682. begin
  42683. getPTEN12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  42684. end;
  42685. procedure TPMP_PMAEN.setPTEN13; inline;
  42686. begin
  42687. pTDefRegMap(@Self)^.&set := $00002000;
  42688. end;
  42689. procedure TPMP_PMAEN.clearPTEN13; inline;
  42690. begin
  42691. pTDefRegMap(@Self)^.clr := $00002000;
  42692. end;
  42693. procedure TPMP_PMAEN.setPTEN13(thebits : TBits_1); inline;
  42694. begin
  42695. if thebits = 0 then
  42696. pTDefRegMap(@Self)^.clr := $00002000
  42697. else
  42698. pTDefRegMap(@Self)^.&set := $00002000;
  42699. end;
  42700. function TPMP_PMAEN.getPTEN13 : TBits_1; inline;
  42701. begin
  42702. getPTEN13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42703. end;
  42704. procedure TPMP_PMAEN.setPTEN14; inline;
  42705. begin
  42706. pTDefRegMap(@Self)^.&set := $00004000;
  42707. end;
  42708. procedure TPMP_PMAEN.clearPTEN14; inline;
  42709. begin
  42710. pTDefRegMap(@Self)^.clr := $00004000;
  42711. end;
  42712. procedure TPMP_PMAEN.setPTEN14(thebits : TBits_1); inline;
  42713. begin
  42714. if thebits = 0 then
  42715. pTDefRegMap(@Self)^.clr := $00004000
  42716. else
  42717. pTDefRegMap(@Self)^.&set := $00004000;
  42718. end;
  42719. function TPMP_PMAEN.getPTEN14 : TBits_1; inline;
  42720. begin
  42721. getPTEN14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  42722. end;
  42723. procedure TPMP_PMAEN.setPTEN15; inline;
  42724. begin
  42725. pTDefRegMap(@Self)^.&set := $00008000;
  42726. end;
  42727. procedure TPMP_PMAEN.clearPTEN15; inline;
  42728. begin
  42729. pTDefRegMap(@Self)^.clr := $00008000;
  42730. end;
  42731. procedure TPMP_PMAEN.setPTEN15(thebits : TBits_1); inline;
  42732. begin
  42733. if thebits = 0 then
  42734. pTDefRegMap(@Self)^.clr := $00008000
  42735. else
  42736. pTDefRegMap(@Self)^.&set := $00008000;
  42737. end;
  42738. function TPMP_PMAEN.getPTEN15 : TBits_1; inline;
  42739. begin
  42740. getPTEN15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42741. end;
  42742. procedure TPMP_PMAEN.setw(thebits : TBits_32); inline;
  42743. begin
  42744. pTDefRegMap(@Self)^.val := thebits;
  42745. end;
  42746. function TPMP_PMAEN.getw : TBits_32; inline;
  42747. begin
  42748. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42749. end;
  42750. procedure TPMP_PMSTAT.setOB0E; inline;
  42751. begin
  42752. pTDefRegMap(@Self)^.&set := $00000001;
  42753. end;
  42754. procedure TPMP_PMSTAT.clearOB0E; inline;
  42755. begin
  42756. pTDefRegMap(@Self)^.clr := $00000001;
  42757. end;
  42758. procedure TPMP_PMSTAT.setOB0E(thebits : TBits_1); inline;
  42759. begin
  42760. if thebits = 0 then
  42761. pTDefRegMap(@Self)^.clr := $00000001
  42762. else
  42763. pTDefRegMap(@Self)^.&set := $00000001;
  42764. end;
  42765. function TPMP_PMSTAT.getOB0E : TBits_1; inline;
  42766. begin
  42767. getOB0E := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42768. end;
  42769. procedure TPMP_PMSTAT.setOB1E; inline;
  42770. begin
  42771. pTDefRegMap(@Self)^.&set := $00000002;
  42772. end;
  42773. procedure TPMP_PMSTAT.clearOB1E; inline;
  42774. begin
  42775. pTDefRegMap(@Self)^.clr := $00000002;
  42776. end;
  42777. procedure TPMP_PMSTAT.setOB1E(thebits : TBits_1); inline;
  42778. begin
  42779. if thebits = 0 then
  42780. pTDefRegMap(@Self)^.clr := $00000002
  42781. else
  42782. pTDefRegMap(@Self)^.&set := $00000002;
  42783. end;
  42784. function TPMP_PMSTAT.getOB1E : TBits_1; inline;
  42785. begin
  42786. getOB1E := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42787. end;
  42788. procedure TPMP_PMSTAT.setOB2E; inline;
  42789. begin
  42790. pTDefRegMap(@Self)^.&set := $00000004;
  42791. end;
  42792. procedure TPMP_PMSTAT.clearOB2E; inline;
  42793. begin
  42794. pTDefRegMap(@Self)^.clr := $00000004;
  42795. end;
  42796. procedure TPMP_PMSTAT.setOB2E(thebits : TBits_1); inline;
  42797. begin
  42798. if thebits = 0 then
  42799. pTDefRegMap(@Self)^.clr := $00000004
  42800. else
  42801. pTDefRegMap(@Self)^.&set := $00000004;
  42802. end;
  42803. function TPMP_PMSTAT.getOB2E : TBits_1; inline;
  42804. begin
  42805. getOB2E := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42806. end;
  42807. procedure TPMP_PMSTAT.setOB3E; inline;
  42808. begin
  42809. pTDefRegMap(@Self)^.&set := $00000008;
  42810. end;
  42811. procedure TPMP_PMSTAT.clearOB3E; inline;
  42812. begin
  42813. pTDefRegMap(@Self)^.clr := $00000008;
  42814. end;
  42815. procedure TPMP_PMSTAT.setOB3E(thebits : TBits_1); inline;
  42816. begin
  42817. if thebits = 0 then
  42818. pTDefRegMap(@Self)^.clr := $00000008
  42819. else
  42820. pTDefRegMap(@Self)^.&set := $00000008;
  42821. end;
  42822. function TPMP_PMSTAT.getOB3E : TBits_1; inline;
  42823. begin
  42824. getOB3E := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42825. end;
  42826. procedure TPMP_PMSTAT.setOBUF; inline;
  42827. begin
  42828. pTDefRegMap(@Self)^.&set := $00000040;
  42829. end;
  42830. procedure TPMP_PMSTAT.clearOBUF; inline;
  42831. begin
  42832. pTDefRegMap(@Self)^.clr := $00000040;
  42833. end;
  42834. procedure TPMP_PMSTAT.setOBUF(thebits : TBits_1); inline;
  42835. begin
  42836. if thebits = 0 then
  42837. pTDefRegMap(@Self)^.clr := $00000040
  42838. else
  42839. pTDefRegMap(@Self)^.&set := $00000040;
  42840. end;
  42841. function TPMP_PMSTAT.getOBUF : TBits_1; inline;
  42842. begin
  42843. getOBUF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42844. end;
  42845. procedure TPMP_PMSTAT.setOBE; inline;
  42846. begin
  42847. pTDefRegMap(@Self)^.&set := $00000080;
  42848. end;
  42849. procedure TPMP_PMSTAT.clearOBE; inline;
  42850. begin
  42851. pTDefRegMap(@Self)^.clr := $00000080;
  42852. end;
  42853. procedure TPMP_PMSTAT.setOBE(thebits : TBits_1); inline;
  42854. begin
  42855. if thebits = 0 then
  42856. pTDefRegMap(@Self)^.clr := $00000080
  42857. else
  42858. pTDefRegMap(@Self)^.&set := $00000080;
  42859. end;
  42860. function TPMP_PMSTAT.getOBE : TBits_1; inline;
  42861. begin
  42862. getOBE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42863. end;
  42864. procedure TPMP_PMSTAT.setIB0F; inline;
  42865. begin
  42866. pTDefRegMap(@Self)^.&set := $00000100;
  42867. end;
  42868. procedure TPMP_PMSTAT.clearIB0F; inline;
  42869. begin
  42870. pTDefRegMap(@Self)^.clr := $00000100;
  42871. end;
  42872. procedure TPMP_PMSTAT.setIB0F(thebits : TBits_1); inline;
  42873. begin
  42874. if thebits = 0 then
  42875. pTDefRegMap(@Self)^.clr := $00000100
  42876. else
  42877. pTDefRegMap(@Self)^.&set := $00000100;
  42878. end;
  42879. function TPMP_PMSTAT.getIB0F : TBits_1; inline;
  42880. begin
  42881. getIB0F := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42882. end;
  42883. procedure TPMP_PMSTAT.setIB1F; inline;
  42884. begin
  42885. pTDefRegMap(@Self)^.&set := $00000200;
  42886. end;
  42887. procedure TPMP_PMSTAT.clearIB1F; inline;
  42888. begin
  42889. pTDefRegMap(@Self)^.clr := $00000200;
  42890. end;
  42891. procedure TPMP_PMSTAT.setIB1F(thebits : TBits_1); inline;
  42892. begin
  42893. if thebits = 0 then
  42894. pTDefRegMap(@Self)^.clr := $00000200
  42895. else
  42896. pTDefRegMap(@Self)^.&set := $00000200;
  42897. end;
  42898. function TPMP_PMSTAT.getIB1F : TBits_1; inline;
  42899. begin
  42900. getIB1F := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42901. end;
  42902. procedure TPMP_PMSTAT.setIB2F; inline;
  42903. begin
  42904. pTDefRegMap(@Self)^.&set := $00000400;
  42905. end;
  42906. procedure TPMP_PMSTAT.clearIB2F; inline;
  42907. begin
  42908. pTDefRegMap(@Self)^.clr := $00000400;
  42909. end;
  42910. procedure TPMP_PMSTAT.setIB2F(thebits : TBits_1); inline;
  42911. begin
  42912. if thebits = 0 then
  42913. pTDefRegMap(@Self)^.clr := $00000400
  42914. else
  42915. pTDefRegMap(@Self)^.&set := $00000400;
  42916. end;
  42917. function TPMP_PMSTAT.getIB2F : TBits_1; inline;
  42918. begin
  42919. getIB2F := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  42920. end;
  42921. procedure TPMP_PMSTAT.setIB3F; inline;
  42922. begin
  42923. pTDefRegMap(@Self)^.&set := $00000800;
  42924. end;
  42925. procedure TPMP_PMSTAT.clearIB3F; inline;
  42926. begin
  42927. pTDefRegMap(@Self)^.clr := $00000800;
  42928. end;
  42929. procedure TPMP_PMSTAT.setIB3F(thebits : TBits_1); inline;
  42930. begin
  42931. if thebits = 0 then
  42932. pTDefRegMap(@Self)^.clr := $00000800
  42933. else
  42934. pTDefRegMap(@Self)^.&set := $00000800;
  42935. end;
  42936. function TPMP_PMSTAT.getIB3F : TBits_1; inline;
  42937. begin
  42938. getIB3F := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42939. end;
  42940. procedure TPMP_PMSTAT.setIBOV; inline;
  42941. begin
  42942. pTDefRegMap(@Self)^.&set := $00004000;
  42943. end;
  42944. procedure TPMP_PMSTAT.clearIBOV; inline;
  42945. begin
  42946. pTDefRegMap(@Self)^.clr := $00004000;
  42947. end;
  42948. procedure TPMP_PMSTAT.setIBOV(thebits : TBits_1); inline;
  42949. begin
  42950. if thebits = 0 then
  42951. pTDefRegMap(@Self)^.clr := $00004000
  42952. else
  42953. pTDefRegMap(@Self)^.&set := $00004000;
  42954. end;
  42955. function TPMP_PMSTAT.getIBOV : TBits_1; inline;
  42956. begin
  42957. getIBOV := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  42958. end;
  42959. procedure TPMP_PMSTAT.setIBF; inline;
  42960. begin
  42961. pTDefRegMap(@Self)^.&set := $00008000;
  42962. end;
  42963. procedure TPMP_PMSTAT.clearIBF; inline;
  42964. begin
  42965. pTDefRegMap(@Self)^.clr := $00008000;
  42966. end;
  42967. procedure TPMP_PMSTAT.setIBF(thebits : TBits_1); inline;
  42968. begin
  42969. if thebits = 0 then
  42970. pTDefRegMap(@Self)^.clr := $00008000
  42971. else
  42972. pTDefRegMap(@Self)^.&set := $00008000;
  42973. end;
  42974. function TPMP_PMSTAT.getIBF : TBits_1; inline;
  42975. begin
  42976. getIBF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42977. end;
  42978. procedure TPMP_PMSTAT.setw(thebits : TBits_32); inline;
  42979. begin
  42980. pTDefRegMap(@Self)^.val := thebits;
  42981. end;
  42982. function TPMP_PMSTAT.getw : TBits_32; inline;
  42983. begin
  42984. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42985. end;
  42986. procedure TADC10_AD1CON1.setDONE; inline;
  42987. begin
  42988. pTDefRegMap(@Self)^.&set := $00000001;
  42989. end;
  42990. procedure TADC10_AD1CON1.clearDONE; inline;
  42991. begin
  42992. pTDefRegMap(@Self)^.clr := $00000001;
  42993. end;
  42994. procedure TADC10_AD1CON1.setDONE(thebits : TBits_1); inline;
  42995. begin
  42996. if thebits = 0 then
  42997. pTDefRegMap(@Self)^.clr := $00000001
  42998. else
  42999. pTDefRegMap(@Self)^.&set := $00000001;
  43000. end;
  43001. function TADC10_AD1CON1.getDONE : TBits_1; inline;
  43002. begin
  43003. getDONE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43004. end;
  43005. procedure TADC10_AD1CON1.setSAMP; inline;
  43006. begin
  43007. pTDefRegMap(@Self)^.&set := $00000002;
  43008. end;
  43009. procedure TADC10_AD1CON1.clearSAMP; inline;
  43010. begin
  43011. pTDefRegMap(@Self)^.clr := $00000002;
  43012. end;
  43013. procedure TADC10_AD1CON1.setSAMP(thebits : TBits_1); inline;
  43014. begin
  43015. if thebits = 0 then
  43016. pTDefRegMap(@Self)^.clr := $00000002
  43017. else
  43018. pTDefRegMap(@Self)^.&set := $00000002;
  43019. end;
  43020. function TADC10_AD1CON1.getSAMP : TBits_1; inline;
  43021. begin
  43022. getSAMP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43023. end;
  43024. procedure TADC10_AD1CON1.setASAM; inline;
  43025. begin
  43026. pTDefRegMap(@Self)^.&set := $00000004;
  43027. end;
  43028. procedure TADC10_AD1CON1.clearASAM; inline;
  43029. begin
  43030. pTDefRegMap(@Self)^.clr := $00000004;
  43031. end;
  43032. procedure TADC10_AD1CON1.setASAM(thebits : TBits_1); inline;
  43033. begin
  43034. if thebits = 0 then
  43035. pTDefRegMap(@Self)^.clr := $00000004
  43036. else
  43037. pTDefRegMap(@Self)^.&set := $00000004;
  43038. end;
  43039. function TADC10_AD1CON1.getASAM : TBits_1; inline;
  43040. begin
  43041. getASAM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  43042. end;
  43043. procedure TADC10_AD1CON1.setCLRASAM; inline;
  43044. begin
  43045. pTDefRegMap(@Self)^.&set := $00000010;
  43046. end;
  43047. procedure TADC10_AD1CON1.clearCLRASAM; inline;
  43048. begin
  43049. pTDefRegMap(@Self)^.clr := $00000010;
  43050. end;
  43051. procedure TADC10_AD1CON1.setCLRASAM(thebits : TBits_1); inline;
  43052. begin
  43053. if thebits = 0 then
  43054. pTDefRegMap(@Self)^.clr := $00000010
  43055. else
  43056. pTDefRegMap(@Self)^.&set := $00000010;
  43057. end;
  43058. function TADC10_AD1CON1.getCLRASAM : TBits_1; inline;
  43059. begin
  43060. getCLRASAM := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43061. end;
  43062. procedure TADC10_AD1CON1.setSSRC(thebits : TBits_3); inline;
  43063. begin
  43064. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF1F or ( thebits shl 5 );
  43065. end;
  43066. function TADC10_AD1CON1.getSSRC : TBits_3; inline;
  43067. begin
  43068. getSSRC := (pTDefRegMap(@Self)^.val and $000000E0) shr 5;
  43069. end;
  43070. procedure TADC10_AD1CON1.setFORM(thebits : TBits_3); inline;
  43071. begin
  43072. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  43073. end;
  43074. function TADC10_AD1CON1.getFORM : TBits_3; inline;
  43075. begin
  43076. getFORM := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  43077. end;
  43078. procedure TADC10_AD1CON1.setSIDL; inline;
  43079. begin
  43080. pTDefRegMap(@Self)^.&set := $00002000;
  43081. end;
  43082. procedure TADC10_AD1CON1.clearSIDL; inline;
  43083. begin
  43084. pTDefRegMap(@Self)^.clr := $00002000;
  43085. end;
  43086. procedure TADC10_AD1CON1.setSIDL(thebits : TBits_1); inline;
  43087. begin
  43088. if thebits = 0 then
  43089. pTDefRegMap(@Self)^.clr := $00002000
  43090. else
  43091. pTDefRegMap(@Self)^.&set := $00002000;
  43092. end;
  43093. function TADC10_AD1CON1.getSIDL : TBits_1; inline;
  43094. begin
  43095. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43096. end;
  43097. procedure TADC10_AD1CON1.setON; inline;
  43098. begin
  43099. pTDefRegMap(@Self)^.&set := $00008000;
  43100. end;
  43101. procedure TADC10_AD1CON1.clearON; inline;
  43102. begin
  43103. pTDefRegMap(@Self)^.clr := $00008000;
  43104. end;
  43105. procedure TADC10_AD1CON1.setON(thebits : TBits_1); inline;
  43106. begin
  43107. if thebits = 0 then
  43108. pTDefRegMap(@Self)^.clr := $00008000
  43109. else
  43110. pTDefRegMap(@Self)^.&set := $00008000;
  43111. end;
  43112. function TADC10_AD1CON1.getON : TBits_1; inline;
  43113. begin
  43114. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43115. end;
  43116. procedure TADC10_AD1CON1.setSSRC0; inline;
  43117. begin
  43118. pTDefRegMap(@Self)^.&set := $00000020;
  43119. end;
  43120. procedure TADC10_AD1CON1.clearSSRC0; inline;
  43121. begin
  43122. pTDefRegMap(@Self)^.clr := $00000020;
  43123. end;
  43124. procedure TADC10_AD1CON1.setSSRC0(thebits : TBits_1); inline;
  43125. begin
  43126. if thebits = 0 then
  43127. pTDefRegMap(@Self)^.clr := $00000020
  43128. else
  43129. pTDefRegMap(@Self)^.&set := $00000020;
  43130. end;
  43131. function TADC10_AD1CON1.getSSRC0 : TBits_1; inline;
  43132. begin
  43133. getSSRC0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43134. end;
  43135. procedure TADC10_AD1CON1.setSSRC1; inline;
  43136. begin
  43137. pTDefRegMap(@Self)^.&set := $00000040;
  43138. end;
  43139. procedure TADC10_AD1CON1.clearSSRC1; inline;
  43140. begin
  43141. pTDefRegMap(@Self)^.clr := $00000040;
  43142. end;
  43143. procedure TADC10_AD1CON1.setSSRC1(thebits : TBits_1); inline;
  43144. begin
  43145. if thebits = 0 then
  43146. pTDefRegMap(@Self)^.clr := $00000040
  43147. else
  43148. pTDefRegMap(@Self)^.&set := $00000040;
  43149. end;
  43150. function TADC10_AD1CON1.getSSRC1 : TBits_1; inline;
  43151. begin
  43152. getSSRC1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43153. end;
  43154. procedure TADC10_AD1CON1.setSSRC2; inline;
  43155. begin
  43156. pTDefRegMap(@Self)^.&set := $00000080;
  43157. end;
  43158. procedure TADC10_AD1CON1.clearSSRC2; inline;
  43159. begin
  43160. pTDefRegMap(@Self)^.clr := $00000080;
  43161. end;
  43162. procedure TADC10_AD1CON1.setSSRC2(thebits : TBits_1); inline;
  43163. begin
  43164. if thebits = 0 then
  43165. pTDefRegMap(@Self)^.clr := $00000080
  43166. else
  43167. pTDefRegMap(@Self)^.&set := $00000080;
  43168. end;
  43169. function TADC10_AD1CON1.getSSRC2 : TBits_1; inline;
  43170. begin
  43171. getSSRC2 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43172. end;
  43173. procedure TADC10_AD1CON1.setFORM0; inline;
  43174. begin
  43175. pTDefRegMap(@Self)^.&set := $00000100;
  43176. end;
  43177. procedure TADC10_AD1CON1.clearFORM0; inline;
  43178. begin
  43179. pTDefRegMap(@Self)^.clr := $00000100;
  43180. end;
  43181. procedure TADC10_AD1CON1.setFORM0(thebits : TBits_1); inline;
  43182. begin
  43183. if thebits = 0 then
  43184. pTDefRegMap(@Self)^.clr := $00000100
  43185. else
  43186. pTDefRegMap(@Self)^.&set := $00000100;
  43187. end;
  43188. function TADC10_AD1CON1.getFORM0 : TBits_1; inline;
  43189. begin
  43190. getFORM0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43191. end;
  43192. procedure TADC10_AD1CON1.setFORM1; inline;
  43193. begin
  43194. pTDefRegMap(@Self)^.&set := $00000200;
  43195. end;
  43196. procedure TADC10_AD1CON1.clearFORM1; inline;
  43197. begin
  43198. pTDefRegMap(@Self)^.clr := $00000200;
  43199. end;
  43200. procedure TADC10_AD1CON1.setFORM1(thebits : TBits_1); inline;
  43201. begin
  43202. if thebits = 0 then
  43203. pTDefRegMap(@Self)^.clr := $00000200
  43204. else
  43205. pTDefRegMap(@Self)^.&set := $00000200;
  43206. end;
  43207. function TADC10_AD1CON1.getFORM1 : TBits_1; inline;
  43208. begin
  43209. getFORM1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  43210. end;
  43211. procedure TADC10_AD1CON1.setFORM2; inline;
  43212. begin
  43213. pTDefRegMap(@Self)^.&set := $00000400;
  43214. end;
  43215. procedure TADC10_AD1CON1.clearFORM2; inline;
  43216. begin
  43217. pTDefRegMap(@Self)^.clr := $00000400;
  43218. end;
  43219. procedure TADC10_AD1CON1.setFORM2(thebits : TBits_1); inline;
  43220. begin
  43221. if thebits = 0 then
  43222. pTDefRegMap(@Self)^.clr := $00000400
  43223. else
  43224. pTDefRegMap(@Self)^.&set := $00000400;
  43225. end;
  43226. function TADC10_AD1CON1.getFORM2 : TBits_1; inline;
  43227. begin
  43228. getFORM2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  43229. end;
  43230. procedure TADC10_AD1CON1.setADSIDL; inline;
  43231. begin
  43232. pTDefRegMap(@Self)^.&set := $00002000;
  43233. end;
  43234. procedure TADC10_AD1CON1.clearADSIDL; inline;
  43235. begin
  43236. pTDefRegMap(@Self)^.clr := $00002000;
  43237. end;
  43238. procedure TADC10_AD1CON1.setADSIDL(thebits : TBits_1); inline;
  43239. begin
  43240. if thebits = 0 then
  43241. pTDefRegMap(@Self)^.clr := $00002000
  43242. else
  43243. pTDefRegMap(@Self)^.&set := $00002000;
  43244. end;
  43245. function TADC10_AD1CON1.getADSIDL : TBits_1; inline;
  43246. begin
  43247. getADSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43248. end;
  43249. procedure TADC10_AD1CON1.setADON; inline;
  43250. begin
  43251. pTDefRegMap(@Self)^.&set := $00008000;
  43252. end;
  43253. procedure TADC10_AD1CON1.clearADON; inline;
  43254. begin
  43255. pTDefRegMap(@Self)^.clr := $00008000;
  43256. end;
  43257. procedure TADC10_AD1CON1.setADON(thebits : TBits_1); inline;
  43258. begin
  43259. if thebits = 0 then
  43260. pTDefRegMap(@Self)^.clr := $00008000
  43261. else
  43262. pTDefRegMap(@Self)^.&set := $00008000;
  43263. end;
  43264. function TADC10_AD1CON1.getADON : TBits_1; inline;
  43265. begin
  43266. getADON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43267. end;
  43268. procedure TADC10_AD1CON1.setw(thebits : TBits_32); inline;
  43269. begin
  43270. pTDefRegMap(@Self)^.val := thebits;
  43271. end;
  43272. function TADC10_AD1CON1.getw : TBits_32; inline;
  43273. begin
  43274. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43275. end;
  43276. procedure TADC10_AD1CON2.setALTS; inline;
  43277. begin
  43278. pTDefRegMap(@Self)^.&set := $00000001;
  43279. end;
  43280. procedure TADC10_AD1CON2.clearALTS; inline;
  43281. begin
  43282. pTDefRegMap(@Self)^.clr := $00000001;
  43283. end;
  43284. procedure TADC10_AD1CON2.setALTS(thebits : TBits_1); inline;
  43285. begin
  43286. if thebits = 0 then
  43287. pTDefRegMap(@Self)^.clr := $00000001
  43288. else
  43289. pTDefRegMap(@Self)^.&set := $00000001;
  43290. end;
  43291. function TADC10_AD1CON2.getALTS : TBits_1; inline;
  43292. begin
  43293. getALTS := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43294. end;
  43295. procedure TADC10_AD1CON2.setBUFM; inline;
  43296. begin
  43297. pTDefRegMap(@Self)^.&set := $00000002;
  43298. end;
  43299. procedure TADC10_AD1CON2.clearBUFM; inline;
  43300. begin
  43301. pTDefRegMap(@Self)^.clr := $00000002;
  43302. end;
  43303. procedure TADC10_AD1CON2.setBUFM(thebits : TBits_1); inline;
  43304. begin
  43305. if thebits = 0 then
  43306. pTDefRegMap(@Self)^.clr := $00000002
  43307. else
  43308. pTDefRegMap(@Self)^.&set := $00000002;
  43309. end;
  43310. function TADC10_AD1CON2.getBUFM : TBits_1; inline;
  43311. begin
  43312. getBUFM := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43313. end;
  43314. procedure TADC10_AD1CON2.setSMPI(thebits : TBits_4); inline;
  43315. begin
  43316. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  43317. end;
  43318. function TADC10_AD1CON2.getSMPI : TBits_4; inline;
  43319. begin
  43320. getSMPI := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  43321. end;
  43322. procedure TADC10_AD1CON2.setBUFS; inline;
  43323. begin
  43324. pTDefRegMap(@Self)^.&set := $00000080;
  43325. end;
  43326. procedure TADC10_AD1CON2.clearBUFS; inline;
  43327. begin
  43328. pTDefRegMap(@Self)^.clr := $00000080;
  43329. end;
  43330. procedure TADC10_AD1CON2.setBUFS(thebits : TBits_1); inline;
  43331. begin
  43332. if thebits = 0 then
  43333. pTDefRegMap(@Self)^.clr := $00000080
  43334. else
  43335. pTDefRegMap(@Self)^.&set := $00000080;
  43336. end;
  43337. function TADC10_AD1CON2.getBUFS : TBits_1; inline;
  43338. begin
  43339. getBUFS := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43340. end;
  43341. procedure TADC10_AD1CON2.setCSCNA; inline;
  43342. begin
  43343. pTDefRegMap(@Self)^.&set := $00000400;
  43344. end;
  43345. procedure TADC10_AD1CON2.clearCSCNA; inline;
  43346. begin
  43347. pTDefRegMap(@Self)^.clr := $00000400;
  43348. end;
  43349. procedure TADC10_AD1CON2.setCSCNA(thebits : TBits_1); inline;
  43350. begin
  43351. if thebits = 0 then
  43352. pTDefRegMap(@Self)^.clr := $00000400
  43353. else
  43354. pTDefRegMap(@Self)^.&set := $00000400;
  43355. end;
  43356. function TADC10_AD1CON2.getCSCNA : TBits_1; inline;
  43357. begin
  43358. getCSCNA := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  43359. end;
  43360. procedure TADC10_AD1CON2.setOFFCAL; inline;
  43361. begin
  43362. pTDefRegMap(@Self)^.&set := $00001000;
  43363. end;
  43364. procedure TADC10_AD1CON2.clearOFFCAL; inline;
  43365. begin
  43366. pTDefRegMap(@Self)^.clr := $00001000;
  43367. end;
  43368. procedure TADC10_AD1CON2.setOFFCAL(thebits : TBits_1); inline;
  43369. begin
  43370. if thebits = 0 then
  43371. pTDefRegMap(@Self)^.clr := $00001000
  43372. else
  43373. pTDefRegMap(@Self)^.&set := $00001000;
  43374. end;
  43375. function TADC10_AD1CON2.getOFFCAL : TBits_1; inline;
  43376. begin
  43377. getOFFCAL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  43378. end;
  43379. procedure TADC10_AD1CON2.setVCFG(thebits : TBits_3); inline;
  43380. begin
  43381. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF1FFF or ( thebits shl 13 );
  43382. end;
  43383. function TADC10_AD1CON2.getVCFG : TBits_3; inline;
  43384. begin
  43385. getVCFG := (pTDefRegMap(@Self)^.val and $0000E000) shr 13;
  43386. end;
  43387. procedure TADC10_AD1CON2.setSMPI0; inline;
  43388. begin
  43389. pTDefRegMap(@Self)^.&set := $00000004;
  43390. end;
  43391. procedure TADC10_AD1CON2.clearSMPI0; inline;
  43392. begin
  43393. pTDefRegMap(@Self)^.clr := $00000004;
  43394. end;
  43395. procedure TADC10_AD1CON2.setSMPI0(thebits : TBits_1); inline;
  43396. begin
  43397. if thebits = 0 then
  43398. pTDefRegMap(@Self)^.clr := $00000004
  43399. else
  43400. pTDefRegMap(@Self)^.&set := $00000004;
  43401. end;
  43402. function TADC10_AD1CON2.getSMPI0 : TBits_1; inline;
  43403. begin
  43404. getSMPI0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  43405. end;
  43406. procedure TADC10_AD1CON2.setSMPI1; inline;
  43407. begin
  43408. pTDefRegMap(@Self)^.&set := $00000008;
  43409. end;
  43410. procedure TADC10_AD1CON2.clearSMPI1; inline;
  43411. begin
  43412. pTDefRegMap(@Self)^.clr := $00000008;
  43413. end;
  43414. procedure TADC10_AD1CON2.setSMPI1(thebits : TBits_1); inline;
  43415. begin
  43416. if thebits = 0 then
  43417. pTDefRegMap(@Self)^.clr := $00000008
  43418. else
  43419. pTDefRegMap(@Self)^.&set := $00000008;
  43420. end;
  43421. function TADC10_AD1CON2.getSMPI1 : TBits_1; inline;
  43422. begin
  43423. getSMPI1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  43424. end;
  43425. procedure TADC10_AD1CON2.setSMPI2; inline;
  43426. begin
  43427. pTDefRegMap(@Self)^.&set := $00000010;
  43428. end;
  43429. procedure TADC10_AD1CON2.clearSMPI2; inline;
  43430. begin
  43431. pTDefRegMap(@Self)^.clr := $00000010;
  43432. end;
  43433. procedure TADC10_AD1CON2.setSMPI2(thebits : TBits_1); inline;
  43434. begin
  43435. if thebits = 0 then
  43436. pTDefRegMap(@Self)^.clr := $00000010
  43437. else
  43438. pTDefRegMap(@Self)^.&set := $00000010;
  43439. end;
  43440. function TADC10_AD1CON2.getSMPI2 : TBits_1; inline;
  43441. begin
  43442. getSMPI2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43443. end;
  43444. procedure TADC10_AD1CON2.setSMPI3; inline;
  43445. begin
  43446. pTDefRegMap(@Self)^.&set := $00000020;
  43447. end;
  43448. procedure TADC10_AD1CON2.clearSMPI3; inline;
  43449. begin
  43450. pTDefRegMap(@Self)^.clr := $00000020;
  43451. end;
  43452. procedure TADC10_AD1CON2.setSMPI3(thebits : TBits_1); inline;
  43453. begin
  43454. if thebits = 0 then
  43455. pTDefRegMap(@Self)^.clr := $00000020
  43456. else
  43457. pTDefRegMap(@Self)^.&set := $00000020;
  43458. end;
  43459. function TADC10_AD1CON2.getSMPI3 : TBits_1; inline;
  43460. begin
  43461. getSMPI3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43462. end;
  43463. procedure TADC10_AD1CON2.setVCFG0; inline;
  43464. begin
  43465. pTDefRegMap(@Self)^.&set := $00002000;
  43466. end;
  43467. procedure TADC10_AD1CON2.clearVCFG0; inline;
  43468. begin
  43469. pTDefRegMap(@Self)^.clr := $00002000;
  43470. end;
  43471. procedure TADC10_AD1CON2.setVCFG0(thebits : TBits_1); inline;
  43472. begin
  43473. if thebits = 0 then
  43474. pTDefRegMap(@Self)^.clr := $00002000
  43475. else
  43476. pTDefRegMap(@Self)^.&set := $00002000;
  43477. end;
  43478. function TADC10_AD1CON2.getVCFG0 : TBits_1; inline;
  43479. begin
  43480. getVCFG0 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43481. end;
  43482. procedure TADC10_AD1CON2.setVCFG1; inline;
  43483. begin
  43484. pTDefRegMap(@Self)^.&set := $00004000;
  43485. end;
  43486. procedure TADC10_AD1CON2.clearVCFG1; inline;
  43487. begin
  43488. pTDefRegMap(@Self)^.clr := $00004000;
  43489. end;
  43490. procedure TADC10_AD1CON2.setVCFG1(thebits : TBits_1); inline;
  43491. begin
  43492. if thebits = 0 then
  43493. pTDefRegMap(@Self)^.clr := $00004000
  43494. else
  43495. pTDefRegMap(@Self)^.&set := $00004000;
  43496. end;
  43497. function TADC10_AD1CON2.getVCFG1 : TBits_1; inline;
  43498. begin
  43499. getVCFG1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  43500. end;
  43501. procedure TADC10_AD1CON2.setVCFG2; inline;
  43502. begin
  43503. pTDefRegMap(@Self)^.&set := $00008000;
  43504. end;
  43505. procedure TADC10_AD1CON2.clearVCFG2; inline;
  43506. begin
  43507. pTDefRegMap(@Self)^.clr := $00008000;
  43508. end;
  43509. procedure TADC10_AD1CON2.setVCFG2(thebits : TBits_1); inline;
  43510. begin
  43511. if thebits = 0 then
  43512. pTDefRegMap(@Self)^.clr := $00008000
  43513. else
  43514. pTDefRegMap(@Self)^.&set := $00008000;
  43515. end;
  43516. function TADC10_AD1CON2.getVCFG2 : TBits_1; inline;
  43517. begin
  43518. getVCFG2 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43519. end;
  43520. procedure TADC10_AD1CON2.setw(thebits : TBits_32); inline;
  43521. begin
  43522. pTDefRegMap(@Self)^.val := thebits;
  43523. end;
  43524. function TADC10_AD1CON2.getw : TBits_32; inline;
  43525. begin
  43526. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43527. end;
  43528. procedure TADC10_AD1CON3.setADCS(thebits : TBits_8); inline;
  43529. begin
  43530. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  43531. end;
  43532. function TADC10_AD1CON3.getADCS : TBits_8; inline;
  43533. begin
  43534. getADCS := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  43535. end;
  43536. procedure TADC10_AD1CON3.setSAMC(thebits : TBits_5); inline;
  43537. begin
  43538. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  43539. end;
  43540. function TADC10_AD1CON3.getSAMC : TBits_5; inline;
  43541. begin
  43542. getSAMC := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  43543. end;
  43544. procedure TADC10_AD1CON3.setADRC; inline;
  43545. begin
  43546. pTDefRegMap(@Self)^.&set := $00008000;
  43547. end;
  43548. procedure TADC10_AD1CON3.clearADRC; inline;
  43549. begin
  43550. pTDefRegMap(@Self)^.clr := $00008000;
  43551. end;
  43552. procedure TADC10_AD1CON3.setADRC(thebits : TBits_1); inline;
  43553. begin
  43554. if thebits = 0 then
  43555. pTDefRegMap(@Self)^.clr := $00008000
  43556. else
  43557. pTDefRegMap(@Self)^.&set := $00008000;
  43558. end;
  43559. function TADC10_AD1CON3.getADRC : TBits_1; inline;
  43560. begin
  43561. getADRC := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43562. end;
  43563. procedure TADC10_AD1CON3.setADCS0; inline;
  43564. begin
  43565. pTDefRegMap(@Self)^.&set := $00000001;
  43566. end;
  43567. procedure TADC10_AD1CON3.clearADCS0; inline;
  43568. begin
  43569. pTDefRegMap(@Self)^.clr := $00000001;
  43570. end;
  43571. procedure TADC10_AD1CON3.setADCS0(thebits : TBits_1); inline;
  43572. begin
  43573. if thebits = 0 then
  43574. pTDefRegMap(@Self)^.clr := $00000001
  43575. else
  43576. pTDefRegMap(@Self)^.&set := $00000001;
  43577. end;
  43578. function TADC10_AD1CON3.getADCS0 : TBits_1; inline;
  43579. begin
  43580. getADCS0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43581. end;
  43582. procedure TADC10_AD1CON3.setADCS1; inline;
  43583. begin
  43584. pTDefRegMap(@Self)^.&set := $00000002;
  43585. end;
  43586. procedure TADC10_AD1CON3.clearADCS1; inline;
  43587. begin
  43588. pTDefRegMap(@Self)^.clr := $00000002;
  43589. end;
  43590. procedure TADC10_AD1CON3.setADCS1(thebits : TBits_1); inline;
  43591. begin
  43592. if thebits = 0 then
  43593. pTDefRegMap(@Self)^.clr := $00000002
  43594. else
  43595. pTDefRegMap(@Self)^.&set := $00000002;
  43596. end;
  43597. function TADC10_AD1CON3.getADCS1 : TBits_1; inline;
  43598. begin
  43599. getADCS1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43600. end;
  43601. procedure TADC10_AD1CON3.setADCS2; inline;
  43602. begin
  43603. pTDefRegMap(@Self)^.&set := $00000004;
  43604. end;
  43605. procedure TADC10_AD1CON3.clearADCS2; inline;
  43606. begin
  43607. pTDefRegMap(@Self)^.clr := $00000004;
  43608. end;
  43609. procedure TADC10_AD1CON3.setADCS2(thebits : TBits_1); inline;
  43610. begin
  43611. if thebits = 0 then
  43612. pTDefRegMap(@Self)^.clr := $00000004
  43613. else
  43614. pTDefRegMap(@Self)^.&set := $00000004;
  43615. end;
  43616. function TADC10_AD1CON3.getADCS2 : TBits_1; inline;
  43617. begin
  43618. getADCS2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  43619. end;
  43620. procedure TADC10_AD1CON3.setADCS3; inline;
  43621. begin
  43622. pTDefRegMap(@Self)^.&set := $00000008;
  43623. end;
  43624. procedure TADC10_AD1CON3.clearADCS3; inline;
  43625. begin
  43626. pTDefRegMap(@Self)^.clr := $00000008;
  43627. end;
  43628. procedure TADC10_AD1CON3.setADCS3(thebits : TBits_1); inline;
  43629. begin
  43630. if thebits = 0 then
  43631. pTDefRegMap(@Self)^.clr := $00000008
  43632. else
  43633. pTDefRegMap(@Self)^.&set := $00000008;
  43634. end;
  43635. function TADC10_AD1CON3.getADCS3 : TBits_1; inline;
  43636. begin
  43637. getADCS3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  43638. end;
  43639. procedure TADC10_AD1CON3.setADCS4; inline;
  43640. begin
  43641. pTDefRegMap(@Self)^.&set := $00000010;
  43642. end;
  43643. procedure TADC10_AD1CON3.clearADCS4; inline;
  43644. begin
  43645. pTDefRegMap(@Self)^.clr := $00000010;
  43646. end;
  43647. procedure TADC10_AD1CON3.setADCS4(thebits : TBits_1); inline;
  43648. begin
  43649. if thebits = 0 then
  43650. pTDefRegMap(@Self)^.clr := $00000010
  43651. else
  43652. pTDefRegMap(@Self)^.&set := $00000010;
  43653. end;
  43654. function TADC10_AD1CON3.getADCS4 : TBits_1; inline;
  43655. begin
  43656. getADCS4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43657. end;
  43658. procedure TADC10_AD1CON3.setADCS5; inline;
  43659. begin
  43660. pTDefRegMap(@Self)^.&set := $00000020;
  43661. end;
  43662. procedure TADC10_AD1CON3.clearADCS5; inline;
  43663. begin
  43664. pTDefRegMap(@Self)^.clr := $00000020;
  43665. end;
  43666. procedure TADC10_AD1CON3.setADCS5(thebits : TBits_1); inline;
  43667. begin
  43668. if thebits = 0 then
  43669. pTDefRegMap(@Self)^.clr := $00000020
  43670. else
  43671. pTDefRegMap(@Self)^.&set := $00000020;
  43672. end;
  43673. function TADC10_AD1CON3.getADCS5 : TBits_1; inline;
  43674. begin
  43675. getADCS5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43676. end;
  43677. procedure TADC10_AD1CON3.setADCS6; inline;
  43678. begin
  43679. pTDefRegMap(@Self)^.&set := $00000040;
  43680. end;
  43681. procedure TADC10_AD1CON3.clearADCS6; inline;
  43682. begin
  43683. pTDefRegMap(@Self)^.clr := $00000040;
  43684. end;
  43685. procedure TADC10_AD1CON3.setADCS6(thebits : TBits_1); inline;
  43686. begin
  43687. if thebits = 0 then
  43688. pTDefRegMap(@Self)^.clr := $00000040
  43689. else
  43690. pTDefRegMap(@Self)^.&set := $00000040;
  43691. end;
  43692. function TADC10_AD1CON3.getADCS6 : TBits_1; inline;
  43693. begin
  43694. getADCS6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43695. end;
  43696. procedure TADC10_AD1CON3.setADCS7; inline;
  43697. begin
  43698. pTDefRegMap(@Self)^.&set := $00000080;
  43699. end;
  43700. procedure TADC10_AD1CON3.clearADCS7; inline;
  43701. begin
  43702. pTDefRegMap(@Self)^.clr := $00000080;
  43703. end;
  43704. procedure TADC10_AD1CON3.setADCS7(thebits : TBits_1); inline;
  43705. begin
  43706. if thebits = 0 then
  43707. pTDefRegMap(@Self)^.clr := $00000080
  43708. else
  43709. pTDefRegMap(@Self)^.&set := $00000080;
  43710. end;
  43711. function TADC10_AD1CON3.getADCS7 : TBits_1; inline;
  43712. begin
  43713. getADCS7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43714. end;
  43715. procedure TADC10_AD1CON3.setSAMC0; inline;
  43716. begin
  43717. pTDefRegMap(@Self)^.&set := $00000100;
  43718. end;
  43719. procedure TADC10_AD1CON3.clearSAMC0; inline;
  43720. begin
  43721. pTDefRegMap(@Self)^.clr := $00000100;
  43722. end;
  43723. procedure TADC10_AD1CON3.setSAMC0(thebits : TBits_1); inline;
  43724. begin
  43725. if thebits = 0 then
  43726. pTDefRegMap(@Self)^.clr := $00000100
  43727. else
  43728. pTDefRegMap(@Self)^.&set := $00000100;
  43729. end;
  43730. function TADC10_AD1CON3.getSAMC0 : TBits_1; inline;
  43731. begin
  43732. getSAMC0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43733. end;
  43734. procedure TADC10_AD1CON3.setSAMC1; inline;
  43735. begin
  43736. pTDefRegMap(@Self)^.&set := $00000200;
  43737. end;
  43738. procedure TADC10_AD1CON3.clearSAMC1; inline;
  43739. begin
  43740. pTDefRegMap(@Self)^.clr := $00000200;
  43741. end;
  43742. procedure TADC10_AD1CON3.setSAMC1(thebits : TBits_1); inline;
  43743. begin
  43744. if thebits = 0 then
  43745. pTDefRegMap(@Self)^.clr := $00000200
  43746. else
  43747. pTDefRegMap(@Self)^.&set := $00000200;
  43748. end;
  43749. function TADC10_AD1CON3.getSAMC1 : TBits_1; inline;
  43750. begin
  43751. getSAMC1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  43752. end;
  43753. procedure TADC10_AD1CON3.setSAMC2; inline;
  43754. begin
  43755. pTDefRegMap(@Self)^.&set := $00000400;
  43756. end;
  43757. procedure TADC10_AD1CON3.clearSAMC2; inline;
  43758. begin
  43759. pTDefRegMap(@Self)^.clr := $00000400;
  43760. end;
  43761. procedure TADC10_AD1CON3.setSAMC2(thebits : TBits_1); inline;
  43762. begin
  43763. if thebits = 0 then
  43764. pTDefRegMap(@Self)^.clr := $00000400
  43765. else
  43766. pTDefRegMap(@Self)^.&set := $00000400;
  43767. end;
  43768. function TADC10_AD1CON3.getSAMC2 : TBits_1; inline;
  43769. begin
  43770. getSAMC2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  43771. end;
  43772. procedure TADC10_AD1CON3.setSAMC3; inline;
  43773. begin
  43774. pTDefRegMap(@Self)^.&set := $00000800;
  43775. end;
  43776. procedure TADC10_AD1CON3.clearSAMC3; inline;
  43777. begin
  43778. pTDefRegMap(@Self)^.clr := $00000800;
  43779. end;
  43780. procedure TADC10_AD1CON3.setSAMC3(thebits : TBits_1); inline;
  43781. begin
  43782. if thebits = 0 then
  43783. pTDefRegMap(@Self)^.clr := $00000800
  43784. else
  43785. pTDefRegMap(@Self)^.&set := $00000800;
  43786. end;
  43787. function TADC10_AD1CON3.getSAMC3 : TBits_1; inline;
  43788. begin
  43789. getSAMC3 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  43790. end;
  43791. procedure TADC10_AD1CON3.setSAMC4; inline;
  43792. begin
  43793. pTDefRegMap(@Self)^.&set := $00001000;
  43794. end;
  43795. procedure TADC10_AD1CON3.clearSAMC4; inline;
  43796. begin
  43797. pTDefRegMap(@Self)^.clr := $00001000;
  43798. end;
  43799. procedure TADC10_AD1CON3.setSAMC4(thebits : TBits_1); inline;
  43800. begin
  43801. if thebits = 0 then
  43802. pTDefRegMap(@Self)^.clr := $00001000
  43803. else
  43804. pTDefRegMap(@Self)^.&set := $00001000;
  43805. end;
  43806. function TADC10_AD1CON3.getSAMC4 : TBits_1; inline;
  43807. begin
  43808. getSAMC4 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  43809. end;
  43810. procedure TADC10_AD1CON3.setw(thebits : TBits_32); inline;
  43811. begin
  43812. pTDefRegMap(@Self)^.val := thebits;
  43813. end;
  43814. function TADC10_AD1CON3.getw : TBits_32; inline;
  43815. begin
  43816. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43817. end;
  43818. procedure TADC10_AD1CHS.setCH0SA(thebits : TBits_4); inline;
  43819. begin
  43820. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  43821. end;
  43822. function TADC10_AD1CHS.getCH0SA : TBits_4; inline;
  43823. begin
  43824. getCH0SA := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  43825. end;
  43826. procedure TADC10_AD1CHS.setCH0NA; inline;
  43827. begin
  43828. pTDefRegMap(@Self)^.&set := $00800000;
  43829. end;
  43830. procedure TADC10_AD1CHS.clearCH0NA; inline;
  43831. begin
  43832. pTDefRegMap(@Self)^.clr := $00800000;
  43833. end;
  43834. procedure TADC10_AD1CHS.setCH0NA(thebits : TBits_1); inline;
  43835. begin
  43836. if thebits = 0 then
  43837. pTDefRegMap(@Self)^.clr := $00800000
  43838. else
  43839. pTDefRegMap(@Self)^.&set := $00800000;
  43840. end;
  43841. function TADC10_AD1CHS.getCH0NA : TBits_1; inline;
  43842. begin
  43843. getCH0NA := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  43844. end;
  43845. procedure TADC10_AD1CHS.setCH0SB(thebits : TBits_4); inline;
  43846. begin
  43847. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  43848. end;
  43849. function TADC10_AD1CHS.getCH0SB : TBits_4; inline;
  43850. begin
  43851. getCH0SB := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  43852. end;
  43853. procedure TADC10_AD1CHS.setCH0NB; inline;
  43854. begin
  43855. pTDefRegMap(@Self)^.&set := $80000000;
  43856. end;
  43857. procedure TADC10_AD1CHS.clearCH0NB; inline;
  43858. begin
  43859. pTDefRegMap(@Self)^.clr := $80000000;
  43860. end;
  43861. procedure TADC10_AD1CHS.setCH0NB(thebits : TBits_1); inline;
  43862. begin
  43863. if thebits = 0 then
  43864. pTDefRegMap(@Self)^.clr := $80000000
  43865. else
  43866. pTDefRegMap(@Self)^.&set := $80000000;
  43867. end;
  43868. function TADC10_AD1CHS.getCH0NB : TBits_1; inline;
  43869. begin
  43870. getCH0NB := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  43871. end;
  43872. procedure TADC10_AD1CHS.setCH0SA0; inline;
  43873. begin
  43874. pTDefRegMap(@Self)^.&set := $00010000;
  43875. end;
  43876. procedure TADC10_AD1CHS.clearCH0SA0; inline;
  43877. begin
  43878. pTDefRegMap(@Self)^.clr := $00010000;
  43879. end;
  43880. procedure TADC10_AD1CHS.setCH0SA0(thebits : TBits_1); inline;
  43881. begin
  43882. if thebits = 0 then
  43883. pTDefRegMap(@Self)^.clr := $00010000
  43884. else
  43885. pTDefRegMap(@Self)^.&set := $00010000;
  43886. end;
  43887. function TADC10_AD1CHS.getCH0SA0 : TBits_1; inline;
  43888. begin
  43889. getCH0SA0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  43890. end;
  43891. procedure TADC10_AD1CHS.setCH0SA1; inline;
  43892. begin
  43893. pTDefRegMap(@Self)^.&set := $00020000;
  43894. end;
  43895. procedure TADC10_AD1CHS.clearCH0SA1; inline;
  43896. begin
  43897. pTDefRegMap(@Self)^.clr := $00020000;
  43898. end;
  43899. procedure TADC10_AD1CHS.setCH0SA1(thebits : TBits_1); inline;
  43900. begin
  43901. if thebits = 0 then
  43902. pTDefRegMap(@Self)^.clr := $00020000
  43903. else
  43904. pTDefRegMap(@Self)^.&set := $00020000;
  43905. end;
  43906. function TADC10_AD1CHS.getCH0SA1 : TBits_1; inline;
  43907. begin
  43908. getCH0SA1 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  43909. end;
  43910. procedure TADC10_AD1CHS.setCH0SA2; inline;
  43911. begin
  43912. pTDefRegMap(@Self)^.&set := $00040000;
  43913. end;
  43914. procedure TADC10_AD1CHS.clearCH0SA2; inline;
  43915. begin
  43916. pTDefRegMap(@Self)^.clr := $00040000;
  43917. end;
  43918. procedure TADC10_AD1CHS.setCH0SA2(thebits : TBits_1); inline;
  43919. begin
  43920. if thebits = 0 then
  43921. pTDefRegMap(@Self)^.clr := $00040000
  43922. else
  43923. pTDefRegMap(@Self)^.&set := $00040000;
  43924. end;
  43925. function TADC10_AD1CHS.getCH0SA2 : TBits_1; inline;
  43926. begin
  43927. getCH0SA2 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  43928. end;
  43929. procedure TADC10_AD1CHS.setCH0SA3; inline;
  43930. begin
  43931. pTDefRegMap(@Self)^.&set := $00080000;
  43932. end;
  43933. procedure TADC10_AD1CHS.clearCH0SA3; inline;
  43934. begin
  43935. pTDefRegMap(@Self)^.clr := $00080000;
  43936. end;
  43937. procedure TADC10_AD1CHS.setCH0SA3(thebits : TBits_1); inline;
  43938. begin
  43939. if thebits = 0 then
  43940. pTDefRegMap(@Self)^.clr := $00080000
  43941. else
  43942. pTDefRegMap(@Self)^.&set := $00080000;
  43943. end;
  43944. function TADC10_AD1CHS.getCH0SA3 : TBits_1; inline;
  43945. begin
  43946. getCH0SA3 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  43947. end;
  43948. procedure TADC10_AD1CHS.setCH0SB0; inline;
  43949. begin
  43950. pTDefRegMap(@Self)^.&set := $01000000;
  43951. end;
  43952. procedure TADC10_AD1CHS.clearCH0SB0; inline;
  43953. begin
  43954. pTDefRegMap(@Self)^.clr := $01000000;
  43955. end;
  43956. procedure TADC10_AD1CHS.setCH0SB0(thebits : TBits_1); inline;
  43957. begin
  43958. if thebits = 0 then
  43959. pTDefRegMap(@Self)^.clr := $01000000
  43960. else
  43961. pTDefRegMap(@Self)^.&set := $01000000;
  43962. end;
  43963. function TADC10_AD1CHS.getCH0SB0 : TBits_1; inline;
  43964. begin
  43965. getCH0SB0 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  43966. end;
  43967. procedure TADC10_AD1CHS.setCH0SB1; inline;
  43968. begin
  43969. pTDefRegMap(@Self)^.&set := $02000000;
  43970. end;
  43971. procedure TADC10_AD1CHS.clearCH0SB1; inline;
  43972. begin
  43973. pTDefRegMap(@Self)^.clr := $02000000;
  43974. end;
  43975. procedure TADC10_AD1CHS.setCH0SB1(thebits : TBits_1); inline;
  43976. begin
  43977. if thebits = 0 then
  43978. pTDefRegMap(@Self)^.clr := $02000000
  43979. else
  43980. pTDefRegMap(@Self)^.&set := $02000000;
  43981. end;
  43982. function TADC10_AD1CHS.getCH0SB1 : TBits_1; inline;
  43983. begin
  43984. getCH0SB1 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  43985. end;
  43986. procedure TADC10_AD1CHS.setCH0SB2; inline;
  43987. begin
  43988. pTDefRegMap(@Self)^.&set := $04000000;
  43989. end;
  43990. procedure TADC10_AD1CHS.clearCH0SB2; inline;
  43991. begin
  43992. pTDefRegMap(@Self)^.clr := $04000000;
  43993. end;
  43994. procedure TADC10_AD1CHS.setCH0SB2(thebits : TBits_1); inline;
  43995. begin
  43996. if thebits = 0 then
  43997. pTDefRegMap(@Self)^.clr := $04000000
  43998. else
  43999. pTDefRegMap(@Self)^.&set := $04000000;
  44000. end;
  44001. function TADC10_AD1CHS.getCH0SB2 : TBits_1; inline;
  44002. begin
  44003. getCH0SB2 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  44004. end;
  44005. procedure TADC10_AD1CHS.setCH0SB3; inline;
  44006. begin
  44007. pTDefRegMap(@Self)^.&set := $08000000;
  44008. end;
  44009. procedure TADC10_AD1CHS.clearCH0SB3; inline;
  44010. begin
  44011. pTDefRegMap(@Self)^.clr := $08000000;
  44012. end;
  44013. procedure TADC10_AD1CHS.setCH0SB3(thebits : TBits_1); inline;
  44014. begin
  44015. if thebits = 0 then
  44016. pTDefRegMap(@Self)^.clr := $08000000
  44017. else
  44018. pTDefRegMap(@Self)^.&set := $08000000;
  44019. end;
  44020. function TADC10_AD1CHS.getCH0SB3 : TBits_1; inline;
  44021. begin
  44022. getCH0SB3 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  44023. end;
  44024. procedure TADC10_AD1CHS.setw(thebits : TBits_32); inline;
  44025. begin
  44026. pTDefRegMap(@Self)^.val := thebits;
  44027. end;
  44028. function TADC10_AD1CHS.getw : TBits_32; inline;
  44029. begin
  44030. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44031. end;
  44032. procedure TADC10_AD1CSSL.setCSSL(thebits : TBits_16); inline;
  44033. begin
  44034. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  44035. end;
  44036. function TADC10_AD1CSSL.getCSSL : TBits_16; inline;
  44037. begin
  44038. getCSSL := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  44039. end;
  44040. procedure TADC10_AD1CSSL.setCSSL0; inline;
  44041. begin
  44042. pTDefRegMap(@Self)^.&set := $00000001;
  44043. end;
  44044. procedure TADC10_AD1CSSL.clearCSSL0; inline;
  44045. begin
  44046. pTDefRegMap(@Self)^.clr := $00000001;
  44047. end;
  44048. procedure TADC10_AD1CSSL.setCSSL0(thebits : TBits_1); inline;
  44049. begin
  44050. if thebits = 0 then
  44051. pTDefRegMap(@Self)^.clr := $00000001
  44052. else
  44053. pTDefRegMap(@Self)^.&set := $00000001;
  44054. end;
  44055. function TADC10_AD1CSSL.getCSSL0 : TBits_1; inline;
  44056. begin
  44057. getCSSL0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44058. end;
  44059. procedure TADC10_AD1CSSL.setCSSL1; inline;
  44060. begin
  44061. pTDefRegMap(@Self)^.&set := $00000002;
  44062. end;
  44063. procedure TADC10_AD1CSSL.clearCSSL1; inline;
  44064. begin
  44065. pTDefRegMap(@Self)^.clr := $00000002;
  44066. end;
  44067. procedure TADC10_AD1CSSL.setCSSL1(thebits : TBits_1); inline;
  44068. begin
  44069. if thebits = 0 then
  44070. pTDefRegMap(@Self)^.clr := $00000002
  44071. else
  44072. pTDefRegMap(@Self)^.&set := $00000002;
  44073. end;
  44074. function TADC10_AD1CSSL.getCSSL1 : TBits_1; inline;
  44075. begin
  44076. getCSSL1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44077. end;
  44078. procedure TADC10_AD1CSSL.setCSSL2; inline;
  44079. begin
  44080. pTDefRegMap(@Self)^.&set := $00000004;
  44081. end;
  44082. procedure TADC10_AD1CSSL.clearCSSL2; inline;
  44083. begin
  44084. pTDefRegMap(@Self)^.clr := $00000004;
  44085. end;
  44086. procedure TADC10_AD1CSSL.setCSSL2(thebits : TBits_1); inline;
  44087. begin
  44088. if thebits = 0 then
  44089. pTDefRegMap(@Self)^.clr := $00000004
  44090. else
  44091. pTDefRegMap(@Self)^.&set := $00000004;
  44092. end;
  44093. function TADC10_AD1CSSL.getCSSL2 : TBits_1; inline;
  44094. begin
  44095. getCSSL2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44096. end;
  44097. procedure TADC10_AD1CSSL.setCSSL3; inline;
  44098. begin
  44099. pTDefRegMap(@Self)^.&set := $00000008;
  44100. end;
  44101. procedure TADC10_AD1CSSL.clearCSSL3; inline;
  44102. begin
  44103. pTDefRegMap(@Self)^.clr := $00000008;
  44104. end;
  44105. procedure TADC10_AD1CSSL.setCSSL3(thebits : TBits_1); inline;
  44106. begin
  44107. if thebits = 0 then
  44108. pTDefRegMap(@Self)^.clr := $00000008
  44109. else
  44110. pTDefRegMap(@Self)^.&set := $00000008;
  44111. end;
  44112. function TADC10_AD1CSSL.getCSSL3 : TBits_1; inline;
  44113. begin
  44114. getCSSL3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44115. end;
  44116. procedure TADC10_AD1CSSL.setCSSL4; inline;
  44117. begin
  44118. pTDefRegMap(@Self)^.&set := $00000010;
  44119. end;
  44120. procedure TADC10_AD1CSSL.clearCSSL4; inline;
  44121. begin
  44122. pTDefRegMap(@Self)^.clr := $00000010;
  44123. end;
  44124. procedure TADC10_AD1CSSL.setCSSL4(thebits : TBits_1); inline;
  44125. begin
  44126. if thebits = 0 then
  44127. pTDefRegMap(@Self)^.clr := $00000010
  44128. else
  44129. pTDefRegMap(@Self)^.&set := $00000010;
  44130. end;
  44131. function TADC10_AD1CSSL.getCSSL4 : TBits_1; inline;
  44132. begin
  44133. getCSSL4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44134. end;
  44135. procedure TADC10_AD1CSSL.setCSSL5; inline;
  44136. begin
  44137. pTDefRegMap(@Self)^.&set := $00000020;
  44138. end;
  44139. procedure TADC10_AD1CSSL.clearCSSL5; inline;
  44140. begin
  44141. pTDefRegMap(@Self)^.clr := $00000020;
  44142. end;
  44143. procedure TADC10_AD1CSSL.setCSSL5(thebits : TBits_1); inline;
  44144. begin
  44145. if thebits = 0 then
  44146. pTDefRegMap(@Self)^.clr := $00000020
  44147. else
  44148. pTDefRegMap(@Self)^.&set := $00000020;
  44149. end;
  44150. function TADC10_AD1CSSL.getCSSL5 : TBits_1; inline;
  44151. begin
  44152. getCSSL5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  44153. end;
  44154. procedure TADC10_AD1CSSL.setCSSL6; inline;
  44155. begin
  44156. pTDefRegMap(@Self)^.&set := $00000040;
  44157. end;
  44158. procedure TADC10_AD1CSSL.clearCSSL6; inline;
  44159. begin
  44160. pTDefRegMap(@Self)^.clr := $00000040;
  44161. end;
  44162. procedure TADC10_AD1CSSL.setCSSL6(thebits : TBits_1); inline;
  44163. begin
  44164. if thebits = 0 then
  44165. pTDefRegMap(@Self)^.clr := $00000040
  44166. else
  44167. pTDefRegMap(@Self)^.&set := $00000040;
  44168. end;
  44169. function TADC10_AD1CSSL.getCSSL6 : TBits_1; inline;
  44170. begin
  44171. getCSSL6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44172. end;
  44173. procedure TADC10_AD1CSSL.setCSSL7; inline;
  44174. begin
  44175. pTDefRegMap(@Self)^.&set := $00000080;
  44176. end;
  44177. procedure TADC10_AD1CSSL.clearCSSL7; inline;
  44178. begin
  44179. pTDefRegMap(@Self)^.clr := $00000080;
  44180. end;
  44181. procedure TADC10_AD1CSSL.setCSSL7(thebits : TBits_1); inline;
  44182. begin
  44183. if thebits = 0 then
  44184. pTDefRegMap(@Self)^.clr := $00000080
  44185. else
  44186. pTDefRegMap(@Self)^.&set := $00000080;
  44187. end;
  44188. function TADC10_AD1CSSL.getCSSL7 : TBits_1; inline;
  44189. begin
  44190. getCSSL7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44191. end;
  44192. procedure TADC10_AD1CSSL.setCSSL8; inline;
  44193. begin
  44194. pTDefRegMap(@Self)^.&set := $00000100;
  44195. end;
  44196. procedure TADC10_AD1CSSL.clearCSSL8; inline;
  44197. begin
  44198. pTDefRegMap(@Self)^.clr := $00000100;
  44199. end;
  44200. procedure TADC10_AD1CSSL.setCSSL8(thebits : TBits_1); inline;
  44201. begin
  44202. if thebits = 0 then
  44203. pTDefRegMap(@Self)^.clr := $00000100
  44204. else
  44205. pTDefRegMap(@Self)^.&set := $00000100;
  44206. end;
  44207. function TADC10_AD1CSSL.getCSSL8 : TBits_1; inline;
  44208. begin
  44209. getCSSL8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44210. end;
  44211. procedure TADC10_AD1CSSL.setCSSL9; inline;
  44212. begin
  44213. pTDefRegMap(@Self)^.&set := $00000200;
  44214. end;
  44215. procedure TADC10_AD1CSSL.clearCSSL9; inline;
  44216. begin
  44217. pTDefRegMap(@Self)^.clr := $00000200;
  44218. end;
  44219. procedure TADC10_AD1CSSL.setCSSL9(thebits : TBits_1); inline;
  44220. begin
  44221. if thebits = 0 then
  44222. pTDefRegMap(@Self)^.clr := $00000200
  44223. else
  44224. pTDefRegMap(@Self)^.&set := $00000200;
  44225. end;
  44226. function TADC10_AD1CSSL.getCSSL9 : TBits_1; inline;
  44227. begin
  44228. getCSSL9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  44229. end;
  44230. procedure TADC10_AD1CSSL.setCSSL10; inline;
  44231. begin
  44232. pTDefRegMap(@Self)^.&set := $00000400;
  44233. end;
  44234. procedure TADC10_AD1CSSL.clearCSSL10; inline;
  44235. begin
  44236. pTDefRegMap(@Self)^.clr := $00000400;
  44237. end;
  44238. procedure TADC10_AD1CSSL.setCSSL10(thebits : TBits_1); inline;
  44239. begin
  44240. if thebits = 0 then
  44241. pTDefRegMap(@Self)^.clr := $00000400
  44242. else
  44243. pTDefRegMap(@Self)^.&set := $00000400;
  44244. end;
  44245. function TADC10_AD1CSSL.getCSSL10 : TBits_1; inline;
  44246. begin
  44247. getCSSL10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  44248. end;
  44249. procedure TADC10_AD1CSSL.setCSSL11; inline;
  44250. begin
  44251. pTDefRegMap(@Self)^.&set := $00000800;
  44252. end;
  44253. procedure TADC10_AD1CSSL.clearCSSL11; inline;
  44254. begin
  44255. pTDefRegMap(@Self)^.clr := $00000800;
  44256. end;
  44257. procedure TADC10_AD1CSSL.setCSSL11(thebits : TBits_1); inline;
  44258. begin
  44259. if thebits = 0 then
  44260. pTDefRegMap(@Self)^.clr := $00000800
  44261. else
  44262. pTDefRegMap(@Self)^.&set := $00000800;
  44263. end;
  44264. function TADC10_AD1CSSL.getCSSL11 : TBits_1; inline;
  44265. begin
  44266. getCSSL11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  44267. end;
  44268. procedure TADC10_AD1CSSL.setCSSL12; inline;
  44269. begin
  44270. pTDefRegMap(@Self)^.&set := $00001000;
  44271. end;
  44272. procedure TADC10_AD1CSSL.clearCSSL12; inline;
  44273. begin
  44274. pTDefRegMap(@Self)^.clr := $00001000;
  44275. end;
  44276. procedure TADC10_AD1CSSL.setCSSL12(thebits : TBits_1); inline;
  44277. begin
  44278. if thebits = 0 then
  44279. pTDefRegMap(@Self)^.clr := $00001000
  44280. else
  44281. pTDefRegMap(@Self)^.&set := $00001000;
  44282. end;
  44283. function TADC10_AD1CSSL.getCSSL12 : TBits_1; inline;
  44284. begin
  44285. getCSSL12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  44286. end;
  44287. procedure TADC10_AD1CSSL.setCSSL13; inline;
  44288. begin
  44289. pTDefRegMap(@Self)^.&set := $00002000;
  44290. end;
  44291. procedure TADC10_AD1CSSL.clearCSSL13; inline;
  44292. begin
  44293. pTDefRegMap(@Self)^.clr := $00002000;
  44294. end;
  44295. procedure TADC10_AD1CSSL.setCSSL13(thebits : TBits_1); inline;
  44296. begin
  44297. if thebits = 0 then
  44298. pTDefRegMap(@Self)^.clr := $00002000
  44299. else
  44300. pTDefRegMap(@Self)^.&set := $00002000;
  44301. end;
  44302. function TADC10_AD1CSSL.getCSSL13 : TBits_1; inline;
  44303. begin
  44304. getCSSL13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44305. end;
  44306. procedure TADC10_AD1CSSL.setCSSL14; inline;
  44307. begin
  44308. pTDefRegMap(@Self)^.&set := $00004000;
  44309. end;
  44310. procedure TADC10_AD1CSSL.clearCSSL14; inline;
  44311. begin
  44312. pTDefRegMap(@Self)^.clr := $00004000;
  44313. end;
  44314. procedure TADC10_AD1CSSL.setCSSL14(thebits : TBits_1); inline;
  44315. begin
  44316. if thebits = 0 then
  44317. pTDefRegMap(@Self)^.clr := $00004000
  44318. else
  44319. pTDefRegMap(@Self)^.&set := $00004000;
  44320. end;
  44321. function TADC10_AD1CSSL.getCSSL14 : TBits_1; inline;
  44322. begin
  44323. getCSSL14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  44324. end;
  44325. procedure TADC10_AD1CSSL.setCSSL15; inline;
  44326. begin
  44327. pTDefRegMap(@Self)^.&set := $00008000;
  44328. end;
  44329. procedure TADC10_AD1CSSL.clearCSSL15; inline;
  44330. begin
  44331. pTDefRegMap(@Self)^.clr := $00008000;
  44332. end;
  44333. procedure TADC10_AD1CSSL.setCSSL15(thebits : TBits_1); inline;
  44334. begin
  44335. if thebits = 0 then
  44336. pTDefRegMap(@Self)^.clr := $00008000
  44337. else
  44338. pTDefRegMap(@Self)^.&set := $00008000;
  44339. end;
  44340. function TADC10_AD1CSSL.getCSSL15 : TBits_1; inline;
  44341. begin
  44342. getCSSL15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44343. end;
  44344. procedure TADC10_AD1CSSL.setw(thebits : TBits_32); inline;
  44345. begin
  44346. pTDefRegMap(@Self)^.val := thebits;
  44347. end;
  44348. function TADC10_AD1CSSL.getw : TBits_32; inline;
  44349. begin
  44350. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44351. end;
  44352. procedure TADC10_AD1PCFG.setPCFG(thebits : TBits_16); inline;
  44353. begin
  44354. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  44355. end;
  44356. function TADC10_AD1PCFG.getPCFG : TBits_16; inline;
  44357. begin
  44358. getPCFG := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  44359. end;
  44360. procedure TADC10_AD1PCFG.setPCFG0; inline;
  44361. begin
  44362. pTDefRegMap(@Self)^.&set := $00000001;
  44363. end;
  44364. procedure TADC10_AD1PCFG.clearPCFG0; inline;
  44365. begin
  44366. pTDefRegMap(@Self)^.clr := $00000001;
  44367. end;
  44368. procedure TADC10_AD1PCFG.setPCFG0(thebits : TBits_1); inline;
  44369. begin
  44370. if thebits = 0 then
  44371. pTDefRegMap(@Self)^.clr := $00000001
  44372. else
  44373. pTDefRegMap(@Self)^.&set := $00000001;
  44374. end;
  44375. function TADC10_AD1PCFG.getPCFG0 : TBits_1; inline;
  44376. begin
  44377. getPCFG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44378. end;
  44379. procedure TADC10_AD1PCFG.setPCFG1; inline;
  44380. begin
  44381. pTDefRegMap(@Self)^.&set := $00000002;
  44382. end;
  44383. procedure TADC10_AD1PCFG.clearPCFG1; inline;
  44384. begin
  44385. pTDefRegMap(@Self)^.clr := $00000002;
  44386. end;
  44387. procedure TADC10_AD1PCFG.setPCFG1(thebits : TBits_1); inline;
  44388. begin
  44389. if thebits = 0 then
  44390. pTDefRegMap(@Self)^.clr := $00000002
  44391. else
  44392. pTDefRegMap(@Self)^.&set := $00000002;
  44393. end;
  44394. function TADC10_AD1PCFG.getPCFG1 : TBits_1; inline;
  44395. begin
  44396. getPCFG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44397. end;
  44398. procedure TADC10_AD1PCFG.setPCFG2; inline;
  44399. begin
  44400. pTDefRegMap(@Self)^.&set := $00000004;
  44401. end;
  44402. procedure TADC10_AD1PCFG.clearPCFG2; inline;
  44403. begin
  44404. pTDefRegMap(@Self)^.clr := $00000004;
  44405. end;
  44406. procedure TADC10_AD1PCFG.setPCFG2(thebits : TBits_1); inline;
  44407. begin
  44408. if thebits = 0 then
  44409. pTDefRegMap(@Self)^.clr := $00000004
  44410. else
  44411. pTDefRegMap(@Self)^.&set := $00000004;
  44412. end;
  44413. function TADC10_AD1PCFG.getPCFG2 : TBits_1; inline;
  44414. begin
  44415. getPCFG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44416. end;
  44417. procedure TADC10_AD1PCFG.setPCFG3; inline;
  44418. begin
  44419. pTDefRegMap(@Self)^.&set := $00000008;
  44420. end;
  44421. procedure TADC10_AD1PCFG.clearPCFG3; inline;
  44422. begin
  44423. pTDefRegMap(@Self)^.clr := $00000008;
  44424. end;
  44425. procedure TADC10_AD1PCFG.setPCFG3(thebits : TBits_1); inline;
  44426. begin
  44427. if thebits = 0 then
  44428. pTDefRegMap(@Self)^.clr := $00000008
  44429. else
  44430. pTDefRegMap(@Self)^.&set := $00000008;
  44431. end;
  44432. function TADC10_AD1PCFG.getPCFG3 : TBits_1; inline;
  44433. begin
  44434. getPCFG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44435. end;
  44436. procedure TADC10_AD1PCFG.setPCFG4; inline;
  44437. begin
  44438. pTDefRegMap(@Self)^.&set := $00000010;
  44439. end;
  44440. procedure TADC10_AD1PCFG.clearPCFG4; inline;
  44441. begin
  44442. pTDefRegMap(@Self)^.clr := $00000010;
  44443. end;
  44444. procedure TADC10_AD1PCFG.setPCFG4(thebits : TBits_1); inline;
  44445. begin
  44446. if thebits = 0 then
  44447. pTDefRegMap(@Self)^.clr := $00000010
  44448. else
  44449. pTDefRegMap(@Self)^.&set := $00000010;
  44450. end;
  44451. function TADC10_AD1PCFG.getPCFG4 : TBits_1; inline;
  44452. begin
  44453. getPCFG4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44454. end;
  44455. procedure TADC10_AD1PCFG.setPCFG5; inline;
  44456. begin
  44457. pTDefRegMap(@Self)^.&set := $00000020;
  44458. end;
  44459. procedure TADC10_AD1PCFG.clearPCFG5; inline;
  44460. begin
  44461. pTDefRegMap(@Self)^.clr := $00000020;
  44462. end;
  44463. procedure TADC10_AD1PCFG.setPCFG5(thebits : TBits_1); inline;
  44464. begin
  44465. if thebits = 0 then
  44466. pTDefRegMap(@Self)^.clr := $00000020
  44467. else
  44468. pTDefRegMap(@Self)^.&set := $00000020;
  44469. end;
  44470. function TADC10_AD1PCFG.getPCFG5 : TBits_1; inline;
  44471. begin
  44472. getPCFG5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  44473. end;
  44474. procedure TADC10_AD1PCFG.setPCFG6; inline;
  44475. begin
  44476. pTDefRegMap(@Self)^.&set := $00000040;
  44477. end;
  44478. procedure TADC10_AD1PCFG.clearPCFG6; inline;
  44479. begin
  44480. pTDefRegMap(@Self)^.clr := $00000040;
  44481. end;
  44482. procedure TADC10_AD1PCFG.setPCFG6(thebits : TBits_1); inline;
  44483. begin
  44484. if thebits = 0 then
  44485. pTDefRegMap(@Self)^.clr := $00000040
  44486. else
  44487. pTDefRegMap(@Self)^.&set := $00000040;
  44488. end;
  44489. function TADC10_AD1PCFG.getPCFG6 : TBits_1; inline;
  44490. begin
  44491. getPCFG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44492. end;
  44493. procedure TADC10_AD1PCFG.setPCFG7; inline;
  44494. begin
  44495. pTDefRegMap(@Self)^.&set := $00000080;
  44496. end;
  44497. procedure TADC10_AD1PCFG.clearPCFG7; inline;
  44498. begin
  44499. pTDefRegMap(@Self)^.clr := $00000080;
  44500. end;
  44501. procedure TADC10_AD1PCFG.setPCFG7(thebits : TBits_1); inline;
  44502. begin
  44503. if thebits = 0 then
  44504. pTDefRegMap(@Self)^.clr := $00000080
  44505. else
  44506. pTDefRegMap(@Self)^.&set := $00000080;
  44507. end;
  44508. function TADC10_AD1PCFG.getPCFG7 : TBits_1; inline;
  44509. begin
  44510. getPCFG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44511. end;
  44512. procedure TADC10_AD1PCFG.setPCFG8; inline;
  44513. begin
  44514. pTDefRegMap(@Self)^.&set := $00000100;
  44515. end;
  44516. procedure TADC10_AD1PCFG.clearPCFG8; inline;
  44517. begin
  44518. pTDefRegMap(@Self)^.clr := $00000100;
  44519. end;
  44520. procedure TADC10_AD1PCFG.setPCFG8(thebits : TBits_1); inline;
  44521. begin
  44522. if thebits = 0 then
  44523. pTDefRegMap(@Self)^.clr := $00000100
  44524. else
  44525. pTDefRegMap(@Self)^.&set := $00000100;
  44526. end;
  44527. function TADC10_AD1PCFG.getPCFG8 : TBits_1; inline;
  44528. begin
  44529. getPCFG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44530. end;
  44531. procedure TADC10_AD1PCFG.setPCFG9; inline;
  44532. begin
  44533. pTDefRegMap(@Self)^.&set := $00000200;
  44534. end;
  44535. procedure TADC10_AD1PCFG.clearPCFG9; inline;
  44536. begin
  44537. pTDefRegMap(@Self)^.clr := $00000200;
  44538. end;
  44539. procedure TADC10_AD1PCFG.setPCFG9(thebits : TBits_1); inline;
  44540. begin
  44541. if thebits = 0 then
  44542. pTDefRegMap(@Self)^.clr := $00000200
  44543. else
  44544. pTDefRegMap(@Self)^.&set := $00000200;
  44545. end;
  44546. function TADC10_AD1PCFG.getPCFG9 : TBits_1; inline;
  44547. begin
  44548. getPCFG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  44549. end;
  44550. procedure TADC10_AD1PCFG.setPCFG10; inline;
  44551. begin
  44552. pTDefRegMap(@Self)^.&set := $00000400;
  44553. end;
  44554. procedure TADC10_AD1PCFG.clearPCFG10; inline;
  44555. begin
  44556. pTDefRegMap(@Self)^.clr := $00000400;
  44557. end;
  44558. procedure TADC10_AD1PCFG.setPCFG10(thebits : TBits_1); inline;
  44559. begin
  44560. if thebits = 0 then
  44561. pTDefRegMap(@Self)^.clr := $00000400
  44562. else
  44563. pTDefRegMap(@Self)^.&set := $00000400;
  44564. end;
  44565. function TADC10_AD1PCFG.getPCFG10 : TBits_1; inline;
  44566. begin
  44567. getPCFG10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  44568. end;
  44569. procedure TADC10_AD1PCFG.setPCFG11; inline;
  44570. begin
  44571. pTDefRegMap(@Self)^.&set := $00000800;
  44572. end;
  44573. procedure TADC10_AD1PCFG.clearPCFG11; inline;
  44574. begin
  44575. pTDefRegMap(@Self)^.clr := $00000800;
  44576. end;
  44577. procedure TADC10_AD1PCFG.setPCFG11(thebits : TBits_1); inline;
  44578. begin
  44579. if thebits = 0 then
  44580. pTDefRegMap(@Self)^.clr := $00000800
  44581. else
  44582. pTDefRegMap(@Self)^.&set := $00000800;
  44583. end;
  44584. function TADC10_AD1PCFG.getPCFG11 : TBits_1; inline;
  44585. begin
  44586. getPCFG11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  44587. end;
  44588. procedure TADC10_AD1PCFG.setPCFG12; inline;
  44589. begin
  44590. pTDefRegMap(@Self)^.&set := $00001000;
  44591. end;
  44592. procedure TADC10_AD1PCFG.clearPCFG12; inline;
  44593. begin
  44594. pTDefRegMap(@Self)^.clr := $00001000;
  44595. end;
  44596. procedure TADC10_AD1PCFG.setPCFG12(thebits : TBits_1); inline;
  44597. begin
  44598. if thebits = 0 then
  44599. pTDefRegMap(@Self)^.clr := $00001000
  44600. else
  44601. pTDefRegMap(@Self)^.&set := $00001000;
  44602. end;
  44603. function TADC10_AD1PCFG.getPCFG12 : TBits_1; inline;
  44604. begin
  44605. getPCFG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  44606. end;
  44607. procedure TADC10_AD1PCFG.setPCFG13; inline;
  44608. begin
  44609. pTDefRegMap(@Self)^.&set := $00002000;
  44610. end;
  44611. procedure TADC10_AD1PCFG.clearPCFG13; inline;
  44612. begin
  44613. pTDefRegMap(@Self)^.clr := $00002000;
  44614. end;
  44615. procedure TADC10_AD1PCFG.setPCFG13(thebits : TBits_1); inline;
  44616. begin
  44617. if thebits = 0 then
  44618. pTDefRegMap(@Self)^.clr := $00002000
  44619. else
  44620. pTDefRegMap(@Self)^.&set := $00002000;
  44621. end;
  44622. function TADC10_AD1PCFG.getPCFG13 : TBits_1; inline;
  44623. begin
  44624. getPCFG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44625. end;
  44626. procedure TADC10_AD1PCFG.setPCFG14; inline;
  44627. begin
  44628. pTDefRegMap(@Self)^.&set := $00004000;
  44629. end;
  44630. procedure TADC10_AD1PCFG.clearPCFG14; inline;
  44631. begin
  44632. pTDefRegMap(@Self)^.clr := $00004000;
  44633. end;
  44634. procedure TADC10_AD1PCFG.setPCFG14(thebits : TBits_1); inline;
  44635. begin
  44636. if thebits = 0 then
  44637. pTDefRegMap(@Self)^.clr := $00004000
  44638. else
  44639. pTDefRegMap(@Self)^.&set := $00004000;
  44640. end;
  44641. function TADC10_AD1PCFG.getPCFG14 : TBits_1; inline;
  44642. begin
  44643. getPCFG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  44644. end;
  44645. procedure TADC10_AD1PCFG.setPCFG15; inline;
  44646. begin
  44647. pTDefRegMap(@Self)^.&set := $00008000;
  44648. end;
  44649. procedure TADC10_AD1PCFG.clearPCFG15; inline;
  44650. begin
  44651. pTDefRegMap(@Self)^.clr := $00008000;
  44652. end;
  44653. procedure TADC10_AD1PCFG.setPCFG15(thebits : TBits_1); inline;
  44654. begin
  44655. if thebits = 0 then
  44656. pTDefRegMap(@Self)^.clr := $00008000
  44657. else
  44658. pTDefRegMap(@Self)^.&set := $00008000;
  44659. end;
  44660. function TADC10_AD1PCFG.getPCFG15 : TBits_1; inline;
  44661. begin
  44662. getPCFG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44663. end;
  44664. procedure TADC10_AD1PCFG.setw(thebits : TBits_32); inline;
  44665. begin
  44666. pTDefRegMap(@Self)^.val := thebits;
  44667. end;
  44668. function TADC10_AD1PCFG.getw : TBits_32; inline;
  44669. begin
  44670. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44671. end;
  44672. procedure TCVR_CVRCON.setCVR(thebits : TBits_4); inline;
  44673. begin
  44674. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  44675. end;
  44676. function TCVR_CVRCON.getCVR : TBits_4; inline;
  44677. begin
  44678. getCVR := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  44679. end;
  44680. procedure TCVR_CVRCON.setCVRSS; inline;
  44681. begin
  44682. pTDefRegMap(@Self)^.&set := $00000010;
  44683. end;
  44684. procedure TCVR_CVRCON.clearCVRSS; inline;
  44685. begin
  44686. pTDefRegMap(@Self)^.clr := $00000010;
  44687. end;
  44688. procedure TCVR_CVRCON.setCVRSS(thebits : TBits_1); inline;
  44689. begin
  44690. if thebits = 0 then
  44691. pTDefRegMap(@Self)^.clr := $00000010
  44692. else
  44693. pTDefRegMap(@Self)^.&set := $00000010;
  44694. end;
  44695. function TCVR_CVRCON.getCVRSS : TBits_1; inline;
  44696. begin
  44697. getCVRSS := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44698. end;
  44699. procedure TCVR_CVRCON.setCVRR; inline;
  44700. begin
  44701. pTDefRegMap(@Self)^.&set := $00000020;
  44702. end;
  44703. procedure TCVR_CVRCON.clearCVRR; inline;
  44704. begin
  44705. pTDefRegMap(@Self)^.clr := $00000020;
  44706. end;
  44707. procedure TCVR_CVRCON.setCVRR(thebits : TBits_1); inline;
  44708. begin
  44709. if thebits = 0 then
  44710. pTDefRegMap(@Self)^.clr := $00000020
  44711. else
  44712. pTDefRegMap(@Self)^.&set := $00000020;
  44713. end;
  44714. function TCVR_CVRCON.getCVRR : TBits_1; inline;
  44715. begin
  44716. getCVRR := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  44717. end;
  44718. procedure TCVR_CVRCON.setCVROE; inline;
  44719. begin
  44720. pTDefRegMap(@Self)^.&set := $00000040;
  44721. end;
  44722. procedure TCVR_CVRCON.clearCVROE; inline;
  44723. begin
  44724. pTDefRegMap(@Self)^.clr := $00000040;
  44725. end;
  44726. procedure TCVR_CVRCON.setCVROE(thebits : TBits_1); inline;
  44727. begin
  44728. if thebits = 0 then
  44729. pTDefRegMap(@Self)^.clr := $00000040
  44730. else
  44731. pTDefRegMap(@Self)^.&set := $00000040;
  44732. end;
  44733. function TCVR_CVRCON.getCVROE : TBits_1; inline;
  44734. begin
  44735. getCVROE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44736. end;
  44737. procedure TCVR_CVRCON.setBGSEL(thebits : TBits_2); inline;
  44738. begin
  44739. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  44740. end;
  44741. function TCVR_CVRCON.getBGSEL : TBits_2; inline;
  44742. begin
  44743. getBGSEL := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  44744. end;
  44745. procedure TCVR_CVRCON.setVREFSEL; inline;
  44746. begin
  44747. pTDefRegMap(@Self)^.&set := $00000400;
  44748. end;
  44749. procedure TCVR_CVRCON.clearVREFSEL; inline;
  44750. begin
  44751. pTDefRegMap(@Self)^.clr := $00000400;
  44752. end;
  44753. procedure TCVR_CVRCON.setVREFSEL(thebits : TBits_1); inline;
  44754. begin
  44755. if thebits = 0 then
  44756. pTDefRegMap(@Self)^.clr := $00000400
  44757. else
  44758. pTDefRegMap(@Self)^.&set := $00000400;
  44759. end;
  44760. function TCVR_CVRCON.getVREFSEL : TBits_1; inline;
  44761. begin
  44762. getVREFSEL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  44763. end;
  44764. procedure TCVR_CVRCON.setON; inline;
  44765. begin
  44766. pTDefRegMap(@Self)^.&set := $00008000;
  44767. end;
  44768. procedure TCVR_CVRCON.clearON; inline;
  44769. begin
  44770. pTDefRegMap(@Self)^.clr := $00008000;
  44771. end;
  44772. procedure TCVR_CVRCON.setON(thebits : TBits_1); inline;
  44773. begin
  44774. if thebits = 0 then
  44775. pTDefRegMap(@Self)^.clr := $00008000
  44776. else
  44777. pTDefRegMap(@Self)^.&set := $00008000;
  44778. end;
  44779. function TCVR_CVRCON.getON : TBits_1; inline;
  44780. begin
  44781. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44782. end;
  44783. procedure TCVR_CVRCON.setCVR0; inline;
  44784. begin
  44785. pTDefRegMap(@Self)^.&set := $00000001;
  44786. end;
  44787. procedure TCVR_CVRCON.clearCVR0; inline;
  44788. begin
  44789. pTDefRegMap(@Self)^.clr := $00000001;
  44790. end;
  44791. procedure TCVR_CVRCON.setCVR0(thebits : TBits_1); inline;
  44792. begin
  44793. if thebits = 0 then
  44794. pTDefRegMap(@Self)^.clr := $00000001
  44795. else
  44796. pTDefRegMap(@Self)^.&set := $00000001;
  44797. end;
  44798. function TCVR_CVRCON.getCVR0 : TBits_1; inline;
  44799. begin
  44800. getCVR0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44801. end;
  44802. procedure TCVR_CVRCON.setCVR1; inline;
  44803. begin
  44804. pTDefRegMap(@Self)^.&set := $00000002;
  44805. end;
  44806. procedure TCVR_CVRCON.clearCVR1; inline;
  44807. begin
  44808. pTDefRegMap(@Self)^.clr := $00000002;
  44809. end;
  44810. procedure TCVR_CVRCON.setCVR1(thebits : TBits_1); inline;
  44811. begin
  44812. if thebits = 0 then
  44813. pTDefRegMap(@Self)^.clr := $00000002
  44814. else
  44815. pTDefRegMap(@Self)^.&set := $00000002;
  44816. end;
  44817. function TCVR_CVRCON.getCVR1 : TBits_1; inline;
  44818. begin
  44819. getCVR1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44820. end;
  44821. procedure TCVR_CVRCON.setCVR2; inline;
  44822. begin
  44823. pTDefRegMap(@Self)^.&set := $00000004;
  44824. end;
  44825. procedure TCVR_CVRCON.clearCVR2; inline;
  44826. begin
  44827. pTDefRegMap(@Self)^.clr := $00000004;
  44828. end;
  44829. procedure TCVR_CVRCON.setCVR2(thebits : TBits_1); inline;
  44830. begin
  44831. if thebits = 0 then
  44832. pTDefRegMap(@Self)^.clr := $00000004
  44833. else
  44834. pTDefRegMap(@Self)^.&set := $00000004;
  44835. end;
  44836. function TCVR_CVRCON.getCVR2 : TBits_1; inline;
  44837. begin
  44838. getCVR2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44839. end;
  44840. procedure TCVR_CVRCON.setCVR3; inline;
  44841. begin
  44842. pTDefRegMap(@Self)^.&set := $00000008;
  44843. end;
  44844. procedure TCVR_CVRCON.clearCVR3; inline;
  44845. begin
  44846. pTDefRegMap(@Self)^.clr := $00000008;
  44847. end;
  44848. procedure TCVR_CVRCON.setCVR3(thebits : TBits_1); inline;
  44849. begin
  44850. if thebits = 0 then
  44851. pTDefRegMap(@Self)^.clr := $00000008
  44852. else
  44853. pTDefRegMap(@Self)^.&set := $00000008;
  44854. end;
  44855. function TCVR_CVRCON.getCVR3 : TBits_1; inline;
  44856. begin
  44857. getCVR3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44858. end;
  44859. procedure TCVR_CVRCON.setBGSEL0; inline;
  44860. begin
  44861. pTDefRegMap(@Self)^.&set := $00000100;
  44862. end;
  44863. procedure TCVR_CVRCON.clearBGSEL0; inline;
  44864. begin
  44865. pTDefRegMap(@Self)^.clr := $00000100;
  44866. end;
  44867. procedure TCVR_CVRCON.setBGSEL0(thebits : TBits_1); inline;
  44868. begin
  44869. if thebits = 0 then
  44870. pTDefRegMap(@Self)^.clr := $00000100
  44871. else
  44872. pTDefRegMap(@Self)^.&set := $00000100;
  44873. end;
  44874. function TCVR_CVRCON.getBGSEL0 : TBits_1; inline;
  44875. begin
  44876. getBGSEL0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44877. end;
  44878. procedure TCVR_CVRCON.setBGSEL1; inline;
  44879. begin
  44880. pTDefRegMap(@Self)^.&set := $00000200;
  44881. end;
  44882. procedure TCVR_CVRCON.clearBGSEL1; inline;
  44883. begin
  44884. pTDefRegMap(@Self)^.clr := $00000200;
  44885. end;
  44886. procedure TCVR_CVRCON.setBGSEL1(thebits : TBits_1); inline;
  44887. begin
  44888. if thebits = 0 then
  44889. pTDefRegMap(@Self)^.clr := $00000200
  44890. else
  44891. pTDefRegMap(@Self)^.&set := $00000200;
  44892. end;
  44893. function TCVR_CVRCON.getBGSEL1 : TBits_1; inline;
  44894. begin
  44895. getBGSEL1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  44896. end;
  44897. procedure TCVR_CVRCON.setw(thebits : TBits_32); inline;
  44898. begin
  44899. pTDefRegMap(@Self)^.val := thebits;
  44900. end;
  44901. function TCVR_CVRCON.getw : TBits_32; inline;
  44902. begin
  44903. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44904. end;
  44905. procedure TCMP_CM1CON.setCCH(thebits : TBits_2); inline;
  44906. begin
  44907. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  44908. end;
  44909. function TCMP_CM1CON.getCCH : TBits_2; inline;
  44910. begin
  44911. getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  44912. end;
  44913. procedure TCMP_CM1CON.setCREF; inline;
  44914. begin
  44915. pTDefRegMap(@Self)^.&set := $00000010;
  44916. end;
  44917. procedure TCMP_CM1CON.clearCREF; inline;
  44918. begin
  44919. pTDefRegMap(@Self)^.clr := $00000010;
  44920. end;
  44921. procedure TCMP_CM1CON.setCREF(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 TCMP_CM1CON.getCREF : TBits_1; inline;
  44929. begin
  44930. getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44931. end;
  44932. procedure TCMP_CM1CON.setEVPOL(thebits : TBits_2); inline;
  44933. begin
  44934. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  44935. end;
  44936. function TCMP_CM1CON.getEVPOL : TBits_2; inline;
  44937. begin
  44938. getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  44939. end;
  44940. procedure TCMP_CM1CON.setCOUT; inline;
  44941. begin
  44942. pTDefRegMap(@Self)^.&set := $00000100;
  44943. end;
  44944. procedure TCMP_CM1CON.clearCOUT; inline;
  44945. begin
  44946. pTDefRegMap(@Self)^.clr := $00000100;
  44947. end;
  44948. procedure TCMP_CM1CON.setCOUT(thebits : TBits_1); inline;
  44949. begin
  44950. if thebits = 0 then
  44951. pTDefRegMap(@Self)^.clr := $00000100
  44952. else
  44953. pTDefRegMap(@Self)^.&set := $00000100;
  44954. end;
  44955. function TCMP_CM1CON.getCOUT : TBits_1; inline;
  44956. begin
  44957. getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44958. end;
  44959. procedure TCMP_CM1CON.setCPOL; inline;
  44960. begin
  44961. pTDefRegMap(@Self)^.&set := $00002000;
  44962. end;
  44963. procedure TCMP_CM1CON.clearCPOL; inline;
  44964. begin
  44965. pTDefRegMap(@Self)^.clr := $00002000;
  44966. end;
  44967. procedure TCMP_CM1CON.setCPOL(thebits : TBits_1); inline;
  44968. begin
  44969. if thebits = 0 then
  44970. pTDefRegMap(@Self)^.clr := $00002000
  44971. else
  44972. pTDefRegMap(@Self)^.&set := $00002000;
  44973. end;
  44974. function TCMP_CM1CON.getCPOL : TBits_1; inline;
  44975. begin
  44976. getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44977. end;
  44978. procedure TCMP_CM1CON.setCOE; inline;
  44979. begin
  44980. pTDefRegMap(@Self)^.&set := $00004000;
  44981. end;
  44982. procedure TCMP_CM1CON.clearCOE; inline;
  44983. begin
  44984. pTDefRegMap(@Self)^.clr := $00004000;
  44985. end;
  44986. procedure TCMP_CM1CON.setCOE(thebits : TBits_1); inline;
  44987. begin
  44988. if thebits = 0 then
  44989. pTDefRegMap(@Self)^.clr := $00004000
  44990. else
  44991. pTDefRegMap(@Self)^.&set := $00004000;
  44992. end;
  44993. function TCMP_CM1CON.getCOE : TBits_1; inline;
  44994. begin
  44995. getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  44996. end;
  44997. procedure TCMP_CM1CON.setON; inline;
  44998. begin
  44999. pTDefRegMap(@Self)^.&set := $00008000;
  45000. end;
  45001. procedure TCMP_CM1CON.clearON; inline;
  45002. begin
  45003. pTDefRegMap(@Self)^.clr := $00008000;
  45004. end;
  45005. procedure TCMP_CM1CON.setON(thebits : TBits_1); inline;
  45006. begin
  45007. if thebits = 0 then
  45008. pTDefRegMap(@Self)^.clr := $00008000
  45009. else
  45010. pTDefRegMap(@Self)^.&set := $00008000;
  45011. end;
  45012. function TCMP_CM1CON.getON : TBits_1; inline;
  45013. begin
  45014. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  45015. end;
  45016. procedure TCMP_CM1CON.setCCH0; inline;
  45017. begin
  45018. pTDefRegMap(@Self)^.&set := $00000001;
  45019. end;
  45020. procedure TCMP_CM1CON.clearCCH0; inline;
  45021. begin
  45022. pTDefRegMap(@Self)^.clr := $00000001;
  45023. end;
  45024. procedure TCMP_CM1CON.setCCH0(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 TCMP_CM1CON.getCCH0 : TBits_1; inline;
  45032. begin
  45033. getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45034. end;
  45035. procedure TCMP_CM1CON.setCCH1; inline;
  45036. begin
  45037. pTDefRegMap(@Self)^.&set := $00000002;
  45038. end;
  45039. procedure TCMP_CM1CON.clearCCH1; inline;
  45040. begin
  45041. pTDefRegMap(@Self)^.clr := $00000002;
  45042. end;
  45043. procedure TCMP_CM1CON.setCCH1(thebits : TBits_1); inline;
  45044. begin
  45045. if thebits = 0 then
  45046. pTDefRegMap(@Self)^.clr := $00000002
  45047. else
  45048. pTDefRegMap(@Self)^.&set := $00000002;
  45049. end;
  45050. function TCMP_CM1CON.getCCH1 : TBits_1; inline;
  45051. begin
  45052. getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45053. end;
  45054. procedure TCMP_CM1CON.setEVPOL0; inline;
  45055. begin
  45056. pTDefRegMap(@Self)^.&set := $00000040;
  45057. end;
  45058. procedure TCMP_CM1CON.clearEVPOL0; inline;
  45059. begin
  45060. pTDefRegMap(@Self)^.clr := $00000040;
  45061. end;
  45062. procedure TCMP_CM1CON.setEVPOL0(thebits : TBits_1); inline;
  45063. begin
  45064. if thebits = 0 then
  45065. pTDefRegMap(@Self)^.clr := $00000040
  45066. else
  45067. pTDefRegMap(@Self)^.&set := $00000040;
  45068. end;
  45069. function TCMP_CM1CON.getEVPOL0 : TBits_1; inline;
  45070. begin
  45071. getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  45072. end;
  45073. procedure TCMP_CM1CON.setEVPOL1; inline;
  45074. begin
  45075. pTDefRegMap(@Self)^.&set := $00000080;
  45076. end;
  45077. procedure TCMP_CM1CON.clearEVPOL1; inline;
  45078. begin
  45079. pTDefRegMap(@Self)^.clr := $00000080;
  45080. end;
  45081. procedure TCMP_CM1CON.setEVPOL1(thebits : TBits_1); inline;
  45082. begin
  45083. if thebits = 0 then
  45084. pTDefRegMap(@Self)^.clr := $00000080
  45085. else
  45086. pTDefRegMap(@Self)^.&set := $00000080;
  45087. end;
  45088. function TCMP_CM1CON.getEVPOL1 : TBits_1; inline;
  45089. begin
  45090. getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  45091. end;
  45092. procedure TCMP_CM1CON.setw(thebits : TBits_32); inline;
  45093. begin
  45094. pTDefRegMap(@Self)^.val := thebits;
  45095. end;
  45096. function TCMP_CM1CON.getw : TBits_32; inline;
  45097. begin
  45098. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45099. end;
  45100. procedure TCMP_CM2CON.setCCH(thebits : TBits_2); inline;
  45101. begin
  45102. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  45103. end;
  45104. function TCMP_CM2CON.getCCH : TBits_2; inline;
  45105. begin
  45106. getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  45107. end;
  45108. procedure TCMP_CM2CON.setCREF; inline;
  45109. begin
  45110. pTDefRegMap(@Self)^.&set := $00000010;
  45111. end;
  45112. procedure TCMP_CM2CON.clearCREF; inline;
  45113. begin
  45114. pTDefRegMap(@Self)^.clr := $00000010;
  45115. end;
  45116. procedure TCMP_CM2CON.setCREF(thebits : TBits_1); inline;
  45117. begin
  45118. if thebits = 0 then
  45119. pTDefRegMap(@Self)^.clr := $00000010
  45120. else
  45121. pTDefRegMap(@Self)^.&set := $00000010;
  45122. end;
  45123. function TCMP_CM2CON.getCREF : TBits_1; inline;
  45124. begin
  45125. getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  45126. end;
  45127. procedure TCMP_CM2CON.setEVPOL(thebits : TBits_2); inline;
  45128. begin
  45129. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  45130. end;
  45131. function TCMP_CM2CON.getEVPOL : TBits_2; inline;
  45132. begin
  45133. getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  45134. end;
  45135. procedure TCMP_CM2CON.setCOUT; inline;
  45136. begin
  45137. pTDefRegMap(@Self)^.&set := $00000100;
  45138. end;
  45139. procedure TCMP_CM2CON.clearCOUT; inline;
  45140. begin
  45141. pTDefRegMap(@Self)^.clr := $00000100;
  45142. end;
  45143. procedure TCMP_CM2CON.setCOUT(thebits : TBits_1); inline;
  45144. begin
  45145. if thebits = 0 then
  45146. pTDefRegMap(@Self)^.clr := $00000100
  45147. else
  45148. pTDefRegMap(@Self)^.&set := $00000100;
  45149. end;
  45150. function TCMP_CM2CON.getCOUT : TBits_1; inline;
  45151. begin
  45152. getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  45153. end;
  45154. procedure TCMP_CM2CON.setCPOL; inline;
  45155. begin
  45156. pTDefRegMap(@Self)^.&set := $00002000;
  45157. end;
  45158. procedure TCMP_CM2CON.clearCPOL; inline;
  45159. begin
  45160. pTDefRegMap(@Self)^.clr := $00002000;
  45161. end;
  45162. procedure TCMP_CM2CON.setCPOL(thebits : TBits_1); inline;
  45163. begin
  45164. if thebits = 0 then
  45165. pTDefRegMap(@Self)^.clr := $00002000
  45166. else
  45167. pTDefRegMap(@Self)^.&set := $00002000;
  45168. end;
  45169. function TCMP_CM2CON.getCPOL : TBits_1; inline;
  45170. begin
  45171. getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45172. end;
  45173. procedure TCMP_CM2CON.setCOE; inline;
  45174. begin
  45175. pTDefRegMap(@Self)^.&set := $00004000;
  45176. end;
  45177. procedure TCMP_CM2CON.clearCOE; inline;
  45178. begin
  45179. pTDefRegMap(@Self)^.clr := $00004000;
  45180. end;
  45181. procedure TCMP_CM2CON.setCOE(thebits : TBits_1); inline;
  45182. begin
  45183. if thebits = 0 then
  45184. pTDefRegMap(@Self)^.clr := $00004000
  45185. else
  45186. pTDefRegMap(@Self)^.&set := $00004000;
  45187. end;
  45188. function TCMP_CM2CON.getCOE : TBits_1; inline;
  45189. begin
  45190. getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  45191. end;
  45192. procedure TCMP_CM2CON.setON; inline;
  45193. begin
  45194. pTDefRegMap(@Self)^.&set := $00008000;
  45195. end;
  45196. procedure TCMP_CM2CON.clearON; inline;
  45197. begin
  45198. pTDefRegMap(@Self)^.clr := $00008000;
  45199. end;
  45200. procedure TCMP_CM2CON.setON(thebits : TBits_1); inline;
  45201. begin
  45202. if thebits = 0 then
  45203. pTDefRegMap(@Self)^.clr := $00008000
  45204. else
  45205. pTDefRegMap(@Self)^.&set := $00008000;
  45206. end;
  45207. function TCMP_CM2CON.getON : TBits_1; inline;
  45208. begin
  45209. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  45210. end;
  45211. procedure TCMP_CM2CON.setCCH0; inline;
  45212. begin
  45213. pTDefRegMap(@Self)^.&set := $00000001;
  45214. end;
  45215. procedure TCMP_CM2CON.clearCCH0; inline;
  45216. begin
  45217. pTDefRegMap(@Self)^.clr := $00000001;
  45218. end;
  45219. procedure TCMP_CM2CON.setCCH0(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 TCMP_CM2CON.getCCH0 : TBits_1; inline;
  45227. begin
  45228. getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45229. end;
  45230. procedure TCMP_CM2CON.setCCH1; inline;
  45231. begin
  45232. pTDefRegMap(@Self)^.&set := $00000002;
  45233. end;
  45234. procedure TCMP_CM2CON.clearCCH1; inline;
  45235. begin
  45236. pTDefRegMap(@Self)^.clr := $00000002;
  45237. end;
  45238. procedure TCMP_CM2CON.setCCH1(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 TCMP_CM2CON.getCCH1 : TBits_1; inline;
  45246. begin
  45247. getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45248. end;
  45249. procedure TCMP_CM2CON.setEVPOL0; inline;
  45250. begin
  45251. pTDefRegMap(@Self)^.&set := $00000040;
  45252. end;
  45253. procedure TCMP_CM2CON.clearEVPOL0; inline;
  45254. begin
  45255. pTDefRegMap(@Self)^.clr := $00000040;
  45256. end;
  45257. procedure TCMP_CM2CON.setEVPOL0(thebits : TBits_1); inline;
  45258. begin
  45259. if thebits = 0 then
  45260. pTDefRegMap(@Self)^.clr := $00000040
  45261. else
  45262. pTDefRegMap(@Self)^.&set := $00000040;
  45263. end;
  45264. function TCMP_CM2CON.getEVPOL0 : TBits_1; inline;
  45265. begin
  45266. getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  45267. end;
  45268. procedure TCMP_CM2CON.setEVPOL1; inline;
  45269. begin
  45270. pTDefRegMap(@Self)^.&set := $00000080;
  45271. end;
  45272. procedure TCMP_CM2CON.clearEVPOL1; inline;
  45273. begin
  45274. pTDefRegMap(@Self)^.clr := $00000080;
  45275. end;
  45276. procedure TCMP_CM2CON.setEVPOL1(thebits : TBits_1); inline;
  45277. begin
  45278. if thebits = 0 then
  45279. pTDefRegMap(@Self)^.clr := $00000080
  45280. else
  45281. pTDefRegMap(@Self)^.&set := $00000080;
  45282. end;
  45283. function TCMP_CM2CON.getEVPOL1 : TBits_1; inline;
  45284. begin
  45285. getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  45286. end;
  45287. procedure TCMP_CM2CON.setw(thebits : TBits_32); inline;
  45288. begin
  45289. pTDefRegMap(@Self)^.val := thebits;
  45290. end;
  45291. function TCMP_CM2CON.getw : TBits_32; inline;
  45292. begin
  45293. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45294. end;
  45295. procedure TCMP_CMSTAT.setC1OUT; inline;
  45296. begin
  45297. pTDefRegMap(@Self)^.&set := $00000001;
  45298. end;
  45299. procedure TCMP_CMSTAT.clearC1OUT; inline;
  45300. begin
  45301. pTDefRegMap(@Self)^.clr := $00000001;
  45302. end;
  45303. procedure TCMP_CMSTAT.setC1OUT(thebits : TBits_1); inline;
  45304. begin
  45305. if thebits = 0 then
  45306. pTDefRegMap(@Self)^.clr := $00000001
  45307. else
  45308. pTDefRegMap(@Self)^.&set := $00000001;
  45309. end;
  45310. function TCMP_CMSTAT.getC1OUT : TBits_1; inline;
  45311. begin
  45312. getC1OUT := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45313. end;
  45314. procedure TCMP_CMSTAT.setC2OUT; inline;
  45315. begin
  45316. pTDefRegMap(@Self)^.&set := $00000002;
  45317. end;
  45318. procedure TCMP_CMSTAT.clearC2OUT; inline;
  45319. begin
  45320. pTDefRegMap(@Self)^.clr := $00000002;
  45321. end;
  45322. procedure TCMP_CMSTAT.setC2OUT(thebits : TBits_1); inline;
  45323. begin
  45324. if thebits = 0 then
  45325. pTDefRegMap(@Self)^.clr := $00000002
  45326. else
  45327. pTDefRegMap(@Self)^.&set := $00000002;
  45328. end;
  45329. function TCMP_CMSTAT.getC2OUT : TBits_1; inline;
  45330. begin
  45331. getC2OUT := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45332. end;
  45333. procedure TCMP_CMSTAT.setSIDL; inline;
  45334. begin
  45335. pTDefRegMap(@Self)^.&set := $00002000;
  45336. end;
  45337. procedure TCMP_CMSTAT.clearSIDL; inline;
  45338. begin
  45339. pTDefRegMap(@Self)^.clr := $00002000;
  45340. end;
  45341. procedure TCMP_CMSTAT.setSIDL(thebits : TBits_1); inline;
  45342. begin
  45343. if thebits = 0 then
  45344. pTDefRegMap(@Self)^.clr := $00002000
  45345. else
  45346. pTDefRegMap(@Self)^.&set := $00002000;
  45347. end;
  45348. function TCMP_CMSTAT.getSIDL : TBits_1; inline;
  45349. begin
  45350. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45351. end;
  45352. procedure TCMP_CMSTAT.setw(thebits : TBits_32); inline;
  45353. begin
  45354. pTDefRegMap(@Self)^.val := thebits;
  45355. end;
  45356. function TCMP_CMSTAT.getw : TBits_32; inline;
  45357. begin
  45358. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45359. end;
  45360. procedure TOSC_OSCCON.setOSWEN; inline;
  45361. begin
  45362. pTDefRegMap(@Self)^.&set := $00000001;
  45363. end;
  45364. procedure TOSC_OSCCON.clearOSWEN; inline;
  45365. begin
  45366. pTDefRegMap(@Self)^.clr := $00000001;
  45367. end;
  45368. procedure TOSC_OSCCON.setOSWEN(thebits : TBits_1); inline;
  45369. begin
  45370. if thebits = 0 then
  45371. pTDefRegMap(@Self)^.clr := $00000001
  45372. else
  45373. pTDefRegMap(@Self)^.&set := $00000001;
  45374. end;
  45375. function TOSC_OSCCON.getOSWEN : TBits_1; inline;
  45376. begin
  45377. getOSWEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45378. end;
  45379. procedure TOSC_OSCCON.setSOSCEN; inline;
  45380. begin
  45381. pTDefRegMap(@Self)^.&set := $00000002;
  45382. end;
  45383. procedure TOSC_OSCCON.clearSOSCEN; inline;
  45384. begin
  45385. pTDefRegMap(@Self)^.clr := $00000002;
  45386. end;
  45387. procedure TOSC_OSCCON.setSOSCEN(thebits : TBits_1); inline;
  45388. begin
  45389. if thebits = 0 then
  45390. pTDefRegMap(@Self)^.clr := $00000002
  45391. else
  45392. pTDefRegMap(@Self)^.&set := $00000002;
  45393. end;
  45394. function TOSC_OSCCON.getSOSCEN : TBits_1; inline;
  45395. begin
  45396. getSOSCEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45397. end;
  45398. procedure TOSC_OSCCON.setUFRCEN; inline;
  45399. begin
  45400. pTDefRegMap(@Self)^.&set := $00000004;
  45401. end;
  45402. procedure TOSC_OSCCON.clearUFRCEN; inline;
  45403. begin
  45404. pTDefRegMap(@Self)^.clr := $00000004;
  45405. end;
  45406. procedure TOSC_OSCCON.setUFRCEN(thebits : TBits_1); inline;
  45407. begin
  45408. if thebits = 0 then
  45409. pTDefRegMap(@Self)^.clr := $00000004
  45410. else
  45411. pTDefRegMap(@Self)^.&set := $00000004;
  45412. end;
  45413. function TOSC_OSCCON.getUFRCEN : TBits_1; inline;
  45414. begin
  45415. getUFRCEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45416. end;
  45417. procedure TOSC_OSCCON.setCF; inline;
  45418. begin
  45419. pTDefRegMap(@Self)^.&set := $00000008;
  45420. end;
  45421. procedure TOSC_OSCCON.clearCF; inline;
  45422. begin
  45423. pTDefRegMap(@Self)^.clr := $00000008;
  45424. end;
  45425. procedure TOSC_OSCCON.setCF(thebits : TBits_1); inline;
  45426. begin
  45427. if thebits = 0 then
  45428. pTDefRegMap(@Self)^.clr := $00000008
  45429. else
  45430. pTDefRegMap(@Self)^.&set := $00000008;
  45431. end;
  45432. function TOSC_OSCCON.getCF : TBits_1; inline;
  45433. begin
  45434. getCF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45435. end;
  45436. procedure TOSC_OSCCON.setSLPEN; inline;
  45437. begin
  45438. pTDefRegMap(@Self)^.&set := $00000010;
  45439. end;
  45440. procedure TOSC_OSCCON.clearSLPEN; inline;
  45441. begin
  45442. pTDefRegMap(@Self)^.clr := $00000010;
  45443. end;
  45444. procedure TOSC_OSCCON.setSLPEN(thebits : TBits_1); inline;
  45445. begin
  45446. if thebits = 0 then
  45447. pTDefRegMap(@Self)^.clr := $00000010
  45448. else
  45449. pTDefRegMap(@Self)^.&set := $00000010;
  45450. end;
  45451. function TOSC_OSCCON.getSLPEN : TBits_1; inline;
  45452. begin
  45453. getSLPEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  45454. end;
  45455. procedure TOSC_OSCCON.setSLOCK; inline;
  45456. begin
  45457. pTDefRegMap(@Self)^.&set := $00000020;
  45458. end;
  45459. procedure TOSC_OSCCON.clearSLOCK; inline;
  45460. begin
  45461. pTDefRegMap(@Self)^.clr := $00000020;
  45462. end;
  45463. procedure TOSC_OSCCON.setSLOCK(thebits : TBits_1); inline;
  45464. begin
  45465. if thebits = 0 then
  45466. pTDefRegMap(@Self)^.clr := $00000020
  45467. else
  45468. pTDefRegMap(@Self)^.&set := $00000020;
  45469. end;
  45470. function TOSC_OSCCON.getSLOCK : TBits_1; inline;
  45471. begin
  45472. getSLOCK := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  45473. end;
  45474. procedure TOSC_OSCCON.setULOCK; inline;
  45475. begin
  45476. pTDefRegMap(@Self)^.&set := $00000040;
  45477. end;
  45478. procedure TOSC_OSCCON.clearULOCK; inline;
  45479. begin
  45480. pTDefRegMap(@Self)^.clr := $00000040;
  45481. end;
  45482. procedure TOSC_OSCCON.setULOCK(thebits : TBits_1); inline;
  45483. begin
  45484. if thebits = 0 then
  45485. pTDefRegMap(@Self)^.clr := $00000040
  45486. else
  45487. pTDefRegMap(@Self)^.&set := $00000040;
  45488. end;
  45489. function TOSC_OSCCON.getULOCK : TBits_1; inline;
  45490. begin
  45491. getULOCK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  45492. end;
  45493. procedure TOSC_OSCCON.setCLKLOCK; inline;
  45494. begin
  45495. pTDefRegMap(@Self)^.&set := $00000080;
  45496. end;
  45497. procedure TOSC_OSCCON.clearCLKLOCK; inline;
  45498. begin
  45499. pTDefRegMap(@Self)^.clr := $00000080;
  45500. end;
  45501. procedure TOSC_OSCCON.setCLKLOCK(thebits : TBits_1); inline;
  45502. begin
  45503. if thebits = 0 then
  45504. pTDefRegMap(@Self)^.clr := $00000080
  45505. else
  45506. pTDefRegMap(@Self)^.&set := $00000080;
  45507. end;
  45508. function TOSC_OSCCON.getCLKLOCK : TBits_1; inline;
  45509. begin
  45510. getCLKLOCK := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  45511. end;
  45512. procedure TOSC_OSCCON.setNOSC(thebits : TBits_3); inline;
  45513. begin
  45514. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  45515. end;
  45516. function TOSC_OSCCON.getNOSC : TBits_3; inline;
  45517. begin
  45518. getNOSC := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  45519. end;
  45520. procedure TOSC_OSCCON.setCOSC(thebits : TBits_3); inline;
  45521. begin
  45522. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF8FFF or ( thebits shl 12 );
  45523. end;
  45524. function TOSC_OSCCON.getCOSC : TBits_3; inline;
  45525. begin
  45526. getCOSC := (pTDefRegMap(@Self)^.val and $00007000) shr 12;
  45527. end;
  45528. procedure TOSC_OSCCON.setPLLMULT(thebits : TBits_3); inline;
  45529. begin
  45530. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  45531. end;
  45532. function TOSC_OSCCON.getPLLMULT : TBits_3; inline;
  45533. begin
  45534. getPLLMULT := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  45535. end;
  45536. procedure TOSC_OSCCON.setPBDIV(thebits : TBits_2); inline;
  45537. begin
  45538. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE7FFFF or ( thebits shl 19 );
  45539. end;
  45540. function TOSC_OSCCON.getPBDIV : TBits_2; inline;
  45541. begin
  45542. getPBDIV := (pTDefRegMap(@Self)^.val and $00180000) shr 19;
  45543. end;
  45544. procedure TOSC_OSCCON.setSOSCRDY; inline;
  45545. begin
  45546. pTDefRegMap(@Self)^.&set := $00400000;
  45547. end;
  45548. procedure TOSC_OSCCON.clearSOSCRDY; inline;
  45549. begin
  45550. pTDefRegMap(@Self)^.clr := $00400000;
  45551. end;
  45552. procedure TOSC_OSCCON.setSOSCRDY(thebits : TBits_1); inline;
  45553. begin
  45554. if thebits = 0 then
  45555. pTDefRegMap(@Self)^.clr := $00400000
  45556. else
  45557. pTDefRegMap(@Self)^.&set := $00400000;
  45558. end;
  45559. function TOSC_OSCCON.getSOSCRDY : TBits_1; inline;
  45560. begin
  45561. getSOSCRDY := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  45562. end;
  45563. procedure TOSC_OSCCON.setFRCDIV(thebits : TBits_3); inline;
  45564. begin
  45565. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  45566. end;
  45567. function TOSC_OSCCON.getFRCDIV : TBits_3; inline;
  45568. begin
  45569. getFRCDIV := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  45570. end;
  45571. procedure TOSC_OSCCON.setPLLODIV(thebits : TBits_3); inline;
  45572. begin
  45573. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $C7FFFFFF or ( thebits shl 27 );
  45574. end;
  45575. function TOSC_OSCCON.getPLLODIV : TBits_3; inline;
  45576. begin
  45577. getPLLODIV := (pTDefRegMap(@Self)^.val and $38000000) shr 27;
  45578. end;
  45579. procedure TOSC_OSCCON.setNOSC0; inline;
  45580. begin
  45581. pTDefRegMap(@Self)^.&set := $00000100;
  45582. end;
  45583. procedure TOSC_OSCCON.clearNOSC0; inline;
  45584. begin
  45585. pTDefRegMap(@Self)^.clr := $00000100;
  45586. end;
  45587. procedure TOSC_OSCCON.setNOSC0(thebits : TBits_1); inline;
  45588. begin
  45589. if thebits = 0 then
  45590. pTDefRegMap(@Self)^.clr := $00000100
  45591. else
  45592. pTDefRegMap(@Self)^.&set := $00000100;
  45593. end;
  45594. function TOSC_OSCCON.getNOSC0 : TBits_1; inline;
  45595. begin
  45596. getNOSC0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  45597. end;
  45598. procedure TOSC_OSCCON.setNOSC1; inline;
  45599. begin
  45600. pTDefRegMap(@Self)^.&set := $00000200;
  45601. end;
  45602. procedure TOSC_OSCCON.clearNOSC1; inline;
  45603. begin
  45604. pTDefRegMap(@Self)^.clr := $00000200;
  45605. end;
  45606. procedure TOSC_OSCCON.setNOSC1(thebits : TBits_1); inline;
  45607. begin
  45608. if thebits = 0 then
  45609. pTDefRegMap(@Self)^.clr := $00000200
  45610. else
  45611. pTDefRegMap(@Self)^.&set := $00000200;
  45612. end;
  45613. function TOSC_OSCCON.getNOSC1 : TBits_1; inline;
  45614. begin
  45615. getNOSC1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  45616. end;
  45617. procedure TOSC_OSCCON.setNOSC2; inline;
  45618. begin
  45619. pTDefRegMap(@Self)^.&set := $00000400;
  45620. end;
  45621. procedure TOSC_OSCCON.clearNOSC2; inline;
  45622. begin
  45623. pTDefRegMap(@Self)^.clr := $00000400;
  45624. end;
  45625. procedure TOSC_OSCCON.setNOSC2(thebits : TBits_1); inline;
  45626. begin
  45627. if thebits = 0 then
  45628. pTDefRegMap(@Self)^.clr := $00000400
  45629. else
  45630. pTDefRegMap(@Self)^.&set := $00000400;
  45631. end;
  45632. function TOSC_OSCCON.getNOSC2 : TBits_1; inline;
  45633. begin
  45634. getNOSC2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  45635. end;
  45636. procedure TOSC_OSCCON.setCOSC0; inline;
  45637. begin
  45638. pTDefRegMap(@Self)^.&set := $00001000;
  45639. end;
  45640. procedure TOSC_OSCCON.clearCOSC0; inline;
  45641. begin
  45642. pTDefRegMap(@Self)^.clr := $00001000;
  45643. end;
  45644. procedure TOSC_OSCCON.setCOSC0(thebits : TBits_1); inline;
  45645. begin
  45646. if thebits = 0 then
  45647. pTDefRegMap(@Self)^.clr := $00001000
  45648. else
  45649. pTDefRegMap(@Self)^.&set := $00001000;
  45650. end;
  45651. function TOSC_OSCCON.getCOSC0 : TBits_1; inline;
  45652. begin
  45653. getCOSC0 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  45654. end;
  45655. procedure TOSC_OSCCON.setCOSC1; inline;
  45656. begin
  45657. pTDefRegMap(@Self)^.&set := $00002000;
  45658. end;
  45659. procedure TOSC_OSCCON.clearCOSC1; inline;
  45660. begin
  45661. pTDefRegMap(@Self)^.clr := $00002000;
  45662. end;
  45663. procedure TOSC_OSCCON.setCOSC1(thebits : TBits_1); inline;
  45664. begin
  45665. if thebits = 0 then
  45666. pTDefRegMap(@Self)^.clr := $00002000
  45667. else
  45668. pTDefRegMap(@Self)^.&set := $00002000;
  45669. end;
  45670. function TOSC_OSCCON.getCOSC1 : TBits_1; inline;
  45671. begin
  45672. getCOSC1 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45673. end;
  45674. procedure TOSC_OSCCON.setCOSC2; inline;
  45675. begin
  45676. pTDefRegMap(@Self)^.&set := $00004000;
  45677. end;
  45678. procedure TOSC_OSCCON.clearCOSC2; inline;
  45679. begin
  45680. pTDefRegMap(@Self)^.clr := $00004000;
  45681. end;
  45682. procedure TOSC_OSCCON.setCOSC2(thebits : TBits_1); inline;
  45683. begin
  45684. if thebits = 0 then
  45685. pTDefRegMap(@Self)^.clr := $00004000
  45686. else
  45687. pTDefRegMap(@Self)^.&set := $00004000;
  45688. end;
  45689. function TOSC_OSCCON.getCOSC2 : TBits_1; inline;
  45690. begin
  45691. getCOSC2 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  45692. end;
  45693. procedure TOSC_OSCCON.setPLLMULT0; inline;
  45694. begin
  45695. pTDefRegMap(@Self)^.&set := $00010000;
  45696. end;
  45697. procedure TOSC_OSCCON.clearPLLMULT0; inline;
  45698. begin
  45699. pTDefRegMap(@Self)^.clr := $00010000;
  45700. end;
  45701. procedure TOSC_OSCCON.setPLLMULT0(thebits : TBits_1); inline;
  45702. begin
  45703. if thebits = 0 then
  45704. pTDefRegMap(@Self)^.clr := $00010000
  45705. else
  45706. pTDefRegMap(@Self)^.&set := $00010000;
  45707. end;
  45708. function TOSC_OSCCON.getPLLMULT0 : TBits_1; inline;
  45709. begin
  45710. getPLLMULT0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  45711. end;
  45712. procedure TOSC_OSCCON.setPLLMULT1; inline;
  45713. begin
  45714. pTDefRegMap(@Self)^.&set := $00020000;
  45715. end;
  45716. procedure TOSC_OSCCON.clearPLLMULT1; inline;
  45717. begin
  45718. pTDefRegMap(@Self)^.clr := $00020000;
  45719. end;
  45720. procedure TOSC_OSCCON.setPLLMULT1(thebits : TBits_1); inline;
  45721. begin
  45722. if thebits = 0 then
  45723. pTDefRegMap(@Self)^.clr := $00020000
  45724. else
  45725. pTDefRegMap(@Self)^.&set := $00020000;
  45726. end;
  45727. function TOSC_OSCCON.getPLLMULT1 : TBits_1; inline;
  45728. begin
  45729. getPLLMULT1 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  45730. end;
  45731. procedure TOSC_OSCCON.setPLLMULT2; inline;
  45732. begin
  45733. pTDefRegMap(@Self)^.&set := $00040000;
  45734. end;
  45735. procedure TOSC_OSCCON.clearPLLMULT2; inline;
  45736. begin
  45737. pTDefRegMap(@Self)^.clr := $00040000;
  45738. end;
  45739. procedure TOSC_OSCCON.setPLLMULT2(thebits : TBits_1); inline;
  45740. begin
  45741. if thebits = 0 then
  45742. pTDefRegMap(@Self)^.clr := $00040000
  45743. else
  45744. pTDefRegMap(@Self)^.&set := $00040000;
  45745. end;
  45746. function TOSC_OSCCON.getPLLMULT2 : TBits_1; inline;
  45747. begin
  45748. getPLLMULT2 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  45749. end;
  45750. procedure TOSC_OSCCON.setPBDIV0; inline;
  45751. begin
  45752. pTDefRegMap(@Self)^.&set := $00080000;
  45753. end;
  45754. procedure TOSC_OSCCON.clearPBDIV0; inline;
  45755. begin
  45756. pTDefRegMap(@Self)^.clr := $00080000;
  45757. end;
  45758. procedure TOSC_OSCCON.setPBDIV0(thebits : TBits_1); inline;
  45759. begin
  45760. if thebits = 0 then
  45761. pTDefRegMap(@Self)^.clr := $00080000
  45762. else
  45763. pTDefRegMap(@Self)^.&set := $00080000;
  45764. end;
  45765. function TOSC_OSCCON.getPBDIV0 : TBits_1; inline;
  45766. begin
  45767. getPBDIV0 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  45768. end;
  45769. procedure TOSC_OSCCON.setPBDIV1; inline;
  45770. begin
  45771. pTDefRegMap(@Self)^.&set := $00100000;
  45772. end;
  45773. procedure TOSC_OSCCON.clearPBDIV1; inline;
  45774. begin
  45775. pTDefRegMap(@Self)^.clr := $00100000;
  45776. end;
  45777. procedure TOSC_OSCCON.setPBDIV1(thebits : TBits_1); inline;
  45778. begin
  45779. if thebits = 0 then
  45780. pTDefRegMap(@Self)^.clr := $00100000
  45781. else
  45782. pTDefRegMap(@Self)^.&set := $00100000;
  45783. end;
  45784. function TOSC_OSCCON.getPBDIV1 : TBits_1; inline;
  45785. begin
  45786. getPBDIV1 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  45787. end;
  45788. procedure TOSC_OSCCON.setFRCDIV0; inline;
  45789. begin
  45790. pTDefRegMap(@Self)^.&set := $01000000;
  45791. end;
  45792. procedure TOSC_OSCCON.clearFRCDIV0; inline;
  45793. begin
  45794. pTDefRegMap(@Self)^.clr := $01000000;
  45795. end;
  45796. procedure TOSC_OSCCON.setFRCDIV0(thebits : TBits_1); inline;
  45797. begin
  45798. if thebits = 0 then
  45799. pTDefRegMap(@Self)^.clr := $01000000
  45800. else
  45801. pTDefRegMap(@Self)^.&set := $01000000;
  45802. end;
  45803. function TOSC_OSCCON.getFRCDIV0 : TBits_1; inline;
  45804. begin
  45805. getFRCDIV0 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  45806. end;
  45807. procedure TOSC_OSCCON.setFRCDIV1; inline;
  45808. begin
  45809. pTDefRegMap(@Self)^.&set := $02000000;
  45810. end;
  45811. procedure TOSC_OSCCON.clearFRCDIV1; inline;
  45812. begin
  45813. pTDefRegMap(@Self)^.clr := $02000000;
  45814. end;
  45815. procedure TOSC_OSCCON.setFRCDIV1(thebits : TBits_1); inline;
  45816. begin
  45817. if thebits = 0 then
  45818. pTDefRegMap(@Self)^.clr := $02000000
  45819. else
  45820. pTDefRegMap(@Self)^.&set := $02000000;
  45821. end;
  45822. function TOSC_OSCCON.getFRCDIV1 : TBits_1; inline;
  45823. begin
  45824. getFRCDIV1 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  45825. end;
  45826. procedure TOSC_OSCCON.setFRCDIV2; inline;
  45827. begin
  45828. pTDefRegMap(@Self)^.&set := $04000000;
  45829. end;
  45830. procedure TOSC_OSCCON.clearFRCDIV2; inline;
  45831. begin
  45832. pTDefRegMap(@Self)^.clr := $04000000;
  45833. end;
  45834. procedure TOSC_OSCCON.setFRCDIV2(thebits : TBits_1); inline;
  45835. begin
  45836. if thebits = 0 then
  45837. pTDefRegMap(@Self)^.clr := $04000000
  45838. else
  45839. pTDefRegMap(@Self)^.&set := $04000000;
  45840. end;
  45841. function TOSC_OSCCON.getFRCDIV2 : TBits_1; inline;
  45842. begin
  45843. getFRCDIV2 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  45844. end;
  45845. procedure TOSC_OSCCON.setPLLODIV0; inline;
  45846. begin
  45847. pTDefRegMap(@Self)^.&set := $08000000;
  45848. end;
  45849. procedure TOSC_OSCCON.clearPLLODIV0; inline;
  45850. begin
  45851. pTDefRegMap(@Self)^.clr := $08000000;
  45852. end;
  45853. procedure TOSC_OSCCON.setPLLODIV0(thebits : TBits_1); inline;
  45854. begin
  45855. if thebits = 0 then
  45856. pTDefRegMap(@Self)^.clr := $08000000
  45857. else
  45858. pTDefRegMap(@Self)^.&set := $08000000;
  45859. end;
  45860. function TOSC_OSCCON.getPLLODIV0 : TBits_1; inline;
  45861. begin
  45862. getPLLODIV0 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  45863. end;
  45864. procedure TOSC_OSCCON.setPLLODIV1; inline;
  45865. begin
  45866. pTDefRegMap(@Self)^.&set := $10000000;
  45867. end;
  45868. procedure TOSC_OSCCON.clearPLLODIV1; inline;
  45869. begin
  45870. pTDefRegMap(@Self)^.clr := $10000000;
  45871. end;
  45872. procedure TOSC_OSCCON.setPLLODIV1(thebits : TBits_1); inline;
  45873. begin
  45874. if thebits = 0 then
  45875. pTDefRegMap(@Self)^.clr := $10000000
  45876. else
  45877. pTDefRegMap(@Self)^.&set := $10000000;
  45878. end;
  45879. function TOSC_OSCCON.getPLLODIV1 : TBits_1; inline;
  45880. begin
  45881. getPLLODIV1 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  45882. end;
  45883. procedure TOSC_OSCCON.setPLLODIV2; inline;
  45884. begin
  45885. pTDefRegMap(@Self)^.&set := $20000000;
  45886. end;
  45887. procedure TOSC_OSCCON.clearPLLODIV2; inline;
  45888. begin
  45889. pTDefRegMap(@Self)^.clr := $20000000;
  45890. end;
  45891. procedure TOSC_OSCCON.setPLLODIV2(thebits : TBits_1); inline;
  45892. begin
  45893. if thebits = 0 then
  45894. pTDefRegMap(@Self)^.clr := $20000000
  45895. else
  45896. pTDefRegMap(@Self)^.&set := $20000000;
  45897. end;
  45898. function TOSC_OSCCON.getPLLODIV2 : TBits_1; inline;
  45899. begin
  45900. getPLLODIV2 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  45901. end;
  45902. procedure TOSC_OSCCON.setw(thebits : TBits_32); inline;
  45903. begin
  45904. pTDefRegMap(@Self)^.val := thebits;
  45905. end;
  45906. function TOSC_OSCCON.getw : TBits_32; inline;
  45907. begin
  45908. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45909. end;
  45910. procedure TOSC_OSCTUN.setTUN(thebits : TBits_6); inline;
  45911. begin
  45912. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
  45913. end;
  45914. function TOSC_OSCTUN.getTUN : TBits_6; inline;
  45915. begin
  45916. getTUN := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
  45917. end;
  45918. procedure TOSC_OSCTUN.setTUN0; inline;
  45919. begin
  45920. pTDefRegMap(@Self)^.&set := $00000001;
  45921. end;
  45922. procedure TOSC_OSCTUN.clearTUN0; inline;
  45923. begin
  45924. pTDefRegMap(@Self)^.clr := $00000001;
  45925. end;
  45926. procedure TOSC_OSCTUN.setTUN0(thebits : TBits_1); inline;
  45927. begin
  45928. if thebits = 0 then
  45929. pTDefRegMap(@Self)^.clr := $00000001
  45930. else
  45931. pTDefRegMap(@Self)^.&set := $00000001;
  45932. end;
  45933. function TOSC_OSCTUN.getTUN0 : TBits_1; inline;
  45934. begin
  45935. getTUN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45936. end;
  45937. procedure TOSC_OSCTUN.setTUN1; inline;
  45938. begin
  45939. pTDefRegMap(@Self)^.&set := $00000002;
  45940. end;
  45941. procedure TOSC_OSCTUN.clearTUN1; inline;
  45942. begin
  45943. pTDefRegMap(@Self)^.clr := $00000002;
  45944. end;
  45945. procedure TOSC_OSCTUN.setTUN1(thebits : TBits_1); inline;
  45946. begin
  45947. if thebits = 0 then
  45948. pTDefRegMap(@Self)^.clr := $00000002
  45949. else
  45950. pTDefRegMap(@Self)^.&set := $00000002;
  45951. end;
  45952. function TOSC_OSCTUN.getTUN1 : TBits_1; inline;
  45953. begin
  45954. getTUN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45955. end;
  45956. procedure TOSC_OSCTUN.setTUN2; inline;
  45957. begin
  45958. pTDefRegMap(@Self)^.&set := $00000004;
  45959. end;
  45960. procedure TOSC_OSCTUN.clearTUN2; inline;
  45961. begin
  45962. pTDefRegMap(@Self)^.clr := $00000004;
  45963. end;
  45964. procedure TOSC_OSCTUN.setTUN2(thebits : TBits_1); inline;
  45965. begin
  45966. if thebits = 0 then
  45967. pTDefRegMap(@Self)^.clr := $00000004
  45968. else
  45969. pTDefRegMap(@Self)^.&set := $00000004;
  45970. end;
  45971. function TOSC_OSCTUN.getTUN2 : TBits_1; inline;
  45972. begin
  45973. getTUN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45974. end;
  45975. procedure TOSC_OSCTUN.setTUN3; inline;
  45976. begin
  45977. pTDefRegMap(@Self)^.&set := $00000008;
  45978. end;
  45979. procedure TOSC_OSCTUN.clearTUN3; inline;
  45980. begin
  45981. pTDefRegMap(@Self)^.clr := $00000008;
  45982. end;
  45983. procedure TOSC_OSCTUN.setTUN3(thebits : TBits_1); inline;
  45984. begin
  45985. if thebits = 0 then
  45986. pTDefRegMap(@Self)^.clr := $00000008
  45987. else
  45988. pTDefRegMap(@Self)^.&set := $00000008;
  45989. end;
  45990. function TOSC_OSCTUN.getTUN3 : TBits_1; inline;
  45991. begin
  45992. getTUN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45993. end;
  45994. procedure TOSC_OSCTUN.setTUN4; inline;
  45995. begin
  45996. pTDefRegMap(@Self)^.&set := $00000010;
  45997. end;
  45998. procedure TOSC_OSCTUN.clearTUN4; inline;
  45999. begin
  46000. pTDefRegMap(@Self)^.clr := $00000010;
  46001. end;
  46002. procedure TOSC_OSCTUN.setTUN4(thebits : TBits_1); inline;
  46003. begin
  46004. if thebits = 0 then
  46005. pTDefRegMap(@Self)^.clr := $00000010
  46006. else
  46007. pTDefRegMap(@Self)^.&set := $00000010;
  46008. end;
  46009. function TOSC_OSCTUN.getTUN4 : TBits_1; inline;
  46010. begin
  46011. getTUN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46012. end;
  46013. procedure TOSC_OSCTUN.setTUN5; inline;
  46014. begin
  46015. pTDefRegMap(@Self)^.&set := $00000020;
  46016. end;
  46017. procedure TOSC_OSCTUN.clearTUN5; inline;
  46018. begin
  46019. pTDefRegMap(@Self)^.clr := $00000020;
  46020. end;
  46021. procedure TOSC_OSCTUN.setTUN5(thebits : TBits_1); inline;
  46022. begin
  46023. if thebits = 0 then
  46024. pTDefRegMap(@Self)^.clr := $00000020
  46025. else
  46026. pTDefRegMap(@Self)^.&set := $00000020;
  46027. end;
  46028. function TOSC_OSCTUN.getTUN5 : TBits_1; inline;
  46029. begin
  46030. getTUN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46031. end;
  46032. procedure TOSC_OSCTUN.setw(thebits : TBits_32); inline;
  46033. begin
  46034. pTDefRegMap(@Self)^.val := thebits;
  46035. end;
  46036. function TOSC_OSCTUN.getw : TBits_32; inline;
  46037. begin
  46038. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46039. end;
  46040. procedure TNVM_NVMCON.setNVMOP(thebits : TBits_4); inline;
  46041. begin
  46042. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  46043. end;
  46044. function TNVM_NVMCON.getNVMOP : TBits_4; inline;
  46045. begin
  46046. getNVMOP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  46047. end;
  46048. procedure TNVM_NVMCON.setLVDSTAT; inline;
  46049. begin
  46050. pTDefRegMap(@Self)^.&set := $00000800;
  46051. end;
  46052. procedure TNVM_NVMCON.clearLVDSTAT; inline;
  46053. begin
  46054. pTDefRegMap(@Self)^.clr := $00000800;
  46055. end;
  46056. procedure TNVM_NVMCON.setLVDSTAT(thebits : TBits_1); inline;
  46057. begin
  46058. if thebits = 0 then
  46059. pTDefRegMap(@Self)^.clr := $00000800
  46060. else
  46061. pTDefRegMap(@Self)^.&set := $00000800;
  46062. end;
  46063. function TNVM_NVMCON.getLVDSTAT : TBits_1; inline;
  46064. begin
  46065. getLVDSTAT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  46066. end;
  46067. procedure TNVM_NVMCON.setLVDERR; inline;
  46068. begin
  46069. pTDefRegMap(@Self)^.&set := $00001000;
  46070. end;
  46071. procedure TNVM_NVMCON.clearLVDERR; inline;
  46072. begin
  46073. pTDefRegMap(@Self)^.clr := $00001000;
  46074. end;
  46075. procedure TNVM_NVMCON.setLVDERR(thebits : TBits_1); inline;
  46076. begin
  46077. if thebits = 0 then
  46078. pTDefRegMap(@Self)^.clr := $00001000
  46079. else
  46080. pTDefRegMap(@Self)^.&set := $00001000;
  46081. end;
  46082. function TNVM_NVMCON.getLVDERR : TBits_1; inline;
  46083. begin
  46084. getLVDERR := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  46085. end;
  46086. procedure TNVM_NVMCON.setWRERR; inline;
  46087. begin
  46088. pTDefRegMap(@Self)^.&set := $00002000;
  46089. end;
  46090. procedure TNVM_NVMCON.clearWRERR; inline;
  46091. begin
  46092. pTDefRegMap(@Self)^.clr := $00002000;
  46093. end;
  46094. procedure TNVM_NVMCON.setWRERR(thebits : TBits_1); inline;
  46095. begin
  46096. if thebits = 0 then
  46097. pTDefRegMap(@Self)^.clr := $00002000
  46098. else
  46099. pTDefRegMap(@Self)^.&set := $00002000;
  46100. end;
  46101. function TNVM_NVMCON.getWRERR : TBits_1; inline;
  46102. begin
  46103. getWRERR := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  46104. end;
  46105. procedure TNVM_NVMCON.setWREN; inline;
  46106. begin
  46107. pTDefRegMap(@Self)^.&set := $00004000;
  46108. end;
  46109. procedure TNVM_NVMCON.clearWREN; inline;
  46110. begin
  46111. pTDefRegMap(@Self)^.clr := $00004000;
  46112. end;
  46113. procedure TNVM_NVMCON.setWREN(thebits : TBits_1); inline;
  46114. begin
  46115. if thebits = 0 then
  46116. pTDefRegMap(@Self)^.clr := $00004000
  46117. else
  46118. pTDefRegMap(@Self)^.&set := $00004000;
  46119. end;
  46120. function TNVM_NVMCON.getWREN : TBits_1; inline;
  46121. begin
  46122. getWREN := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  46123. end;
  46124. procedure TNVM_NVMCON.setWR; inline;
  46125. begin
  46126. pTDefRegMap(@Self)^.&set := $00008000;
  46127. end;
  46128. procedure TNVM_NVMCON.clearWR; inline;
  46129. begin
  46130. pTDefRegMap(@Self)^.clr := $00008000;
  46131. end;
  46132. procedure TNVM_NVMCON.setWR(thebits : TBits_1); inline;
  46133. begin
  46134. if thebits = 0 then
  46135. pTDefRegMap(@Self)^.clr := $00008000
  46136. else
  46137. pTDefRegMap(@Self)^.&set := $00008000;
  46138. end;
  46139. function TNVM_NVMCON.getWR : TBits_1; inline;
  46140. begin
  46141. getWR := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46142. end;
  46143. procedure TNVM_NVMCON.setNVMOP0; inline;
  46144. begin
  46145. pTDefRegMap(@Self)^.&set := $00000001;
  46146. end;
  46147. procedure TNVM_NVMCON.clearNVMOP0; inline;
  46148. begin
  46149. pTDefRegMap(@Self)^.clr := $00000001;
  46150. end;
  46151. procedure TNVM_NVMCON.setNVMOP0(thebits : TBits_1); inline;
  46152. begin
  46153. if thebits = 0 then
  46154. pTDefRegMap(@Self)^.clr := $00000001
  46155. else
  46156. pTDefRegMap(@Self)^.&set := $00000001;
  46157. end;
  46158. function TNVM_NVMCON.getNVMOP0 : TBits_1; inline;
  46159. begin
  46160. getNVMOP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46161. end;
  46162. procedure TNVM_NVMCON.setNVMOP1; inline;
  46163. begin
  46164. pTDefRegMap(@Self)^.&set := $00000002;
  46165. end;
  46166. procedure TNVM_NVMCON.clearNVMOP1; inline;
  46167. begin
  46168. pTDefRegMap(@Self)^.clr := $00000002;
  46169. end;
  46170. procedure TNVM_NVMCON.setNVMOP1(thebits : TBits_1); inline;
  46171. begin
  46172. if thebits = 0 then
  46173. pTDefRegMap(@Self)^.clr := $00000002
  46174. else
  46175. pTDefRegMap(@Self)^.&set := $00000002;
  46176. end;
  46177. function TNVM_NVMCON.getNVMOP1 : TBits_1; inline;
  46178. begin
  46179. getNVMOP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46180. end;
  46181. procedure TNVM_NVMCON.setNVMOP2; inline;
  46182. begin
  46183. pTDefRegMap(@Self)^.&set := $00000004;
  46184. end;
  46185. procedure TNVM_NVMCON.clearNVMOP2; inline;
  46186. begin
  46187. pTDefRegMap(@Self)^.clr := $00000004;
  46188. end;
  46189. procedure TNVM_NVMCON.setNVMOP2(thebits : TBits_1); inline;
  46190. begin
  46191. if thebits = 0 then
  46192. pTDefRegMap(@Self)^.clr := $00000004
  46193. else
  46194. pTDefRegMap(@Self)^.&set := $00000004;
  46195. end;
  46196. function TNVM_NVMCON.getNVMOP2 : TBits_1; inline;
  46197. begin
  46198. getNVMOP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46199. end;
  46200. procedure TNVM_NVMCON.setNVMOP3; inline;
  46201. begin
  46202. pTDefRegMap(@Self)^.&set := $00000008;
  46203. end;
  46204. procedure TNVM_NVMCON.clearNVMOP3; inline;
  46205. begin
  46206. pTDefRegMap(@Self)^.clr := $00000008;
  46207. end;
  46208. procedure TNVM_NVMCON.setNVMOP3(thebits : TBits_1); inline;
  46209. begin
  46210. if thebits = 0 then
  46211. pTDefRegMap(@Self)^.clr := $00000008
  46212. else
  46213. pTDefRegMap(@Self)^.&set := $00000008;
  46214. end;
  46215. function TNVM_NVMCON.getNVMOP3 : TBits_1; inline;
  46216. begin
  46217. getNVMOP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46218. end;
  46219. procedure TNVM_NVMCON.setPROGOP(thebits : TBits_4); inline;
  46220. begin
  46221. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  46222. end;
  46223. function TNVM_NVMCON.getPROGOP : TBits_4; inline;
  46224. begin
  46225. getPROGOP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  46226. end;
  46227. procedure TNVM_NVMCON.setPROGOP0; inline;
  46228. begin
  46229. pTDefRegMap(@Self)^.&set := $00000001;
  46230. end;
  46231. procedure TNVM_NVMCON.clearPROGOP0; inline;
  46232. begin
  46233. pTDefRegMap(@Self)^.clr := $00000001;
  46234. end;
  46235. procedure TNVM_NVMCON.setPROGOP0(thebits : TBits_1); inline;
  46236. begin
  46237. if thebits = 0 then
  46238. pTDefRegMap(@Self)^.clr := $00000001
  46239. else
  46240. pTDefRegMap(@Self)^.&set := $00000001;
  46241. end;
  46242. function TNVM_NVMCON.getPROGOP0 : TBits_1; inline;
  46243. begin
  46244. getPROGOP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46245. end;
  46246. procedure TNVM_NVMCON.setPROGOP1; inline;
  46247. begin
  46248. pTDefRegMap(@Self)^.&set := $00000002;
  46249. end;
  46250. procedure TNVM_NVMCON.clearPROGOP1; inline;
  46251. begin
  46252. pTDefRegMap(@Self)^.clr := $00000002;
  46253. end;
  46254. procedure TNVM_NVMCON.setPROGOP1(thebits : TBits_1); inline;
  46255. begin
  46256. if thebits = 0 then
  46257. pTDefRegMap(@Self)^.clr := $00000002
  46258. else
  46259. pTDefRegMap(@Self)^.&set := $00000002;
  46260. end;
  46261. function TNVM_NVMCON.getPROGOP1 : TBits_1; inline;
  46262. begin
  46263. getPROGOP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46264. end;
  46265. procedure TNVM_NVMCON.setPROGOP2; inline;
  46266. begin
  46267. pTDefRegMap(@Self)^.&set := $00000004;
  46268. end;
  46269. procedure TNVM_NVMCON.clearPROGOP2; inline;
  46270. begin
  46271. pTDefRegMap(@Self)^.clr := $00000004;
  46272. end;
  46273. procedure TNVM_NVMCON.setPROGOP2(thebits : TBits_1); inline;
  46274. begin
  46275. if thebits = 0 then
  46276. pTDefRegMap(@Self)^.clr := $00000004
  46277. else
  46278. pTDefRegMap(@Self)^.&set := $00000004;
  46279. end;
  46280. function TNVM_NVMCON.getPROGOP2 : TBits_1; inline;
  46281. begin
  46282. getPROGOP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46283. end;
  46284. procedure TNVM_NVMCON.setPROGOP3; inline;
  46285. begin
  46286. pTDefRegMap(@Self)^.&set := $00000008;
  46287. end;
  46288. procedure TNVM_NVMCON.clearPROGOP3; inline;
  46289. begin
  46290. pTDefRegMap(@Self)^.clr := $00000008;
  46291. end;
  46292. procedure TNVM_NVMCON.setPROGOP3(thebits : TBits_1); inline;
  46293. begin
  46294. if thebits = 0 then
  46295. pTDefRegMap(@Self)^.clr := $00000008
  46296. else
  46297. pTDefRegMap(@Self)^.&set := $00000008;
  46298. end;
  46299. function TNVM_NVMCON.getPROGOP3 : TBits_1; inline;
  46300. begin
  46301. getPROGOP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46302. end;
  46303. procedure TNVM_NVMCON.setw(thebits : TBits_32); inline;
  46304. begin
  46305. pTDefRegMap(@Self)^.val := thebits;
  46306. end;
  46307. function TNVM_NVMCON.getw : TBits_32; inline;
  46308. begin
  46309. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46310. end;
  46311. procedure TRCON_RCON.setPOR; inline;
  46312. begin
  46313. pTDefRegMap(@Self)^.&set := $00000001;
  46314. end;
  46315. procedure TRCON_RCON.clearPOR; inline;
  46316. begin
  46317. pTDefRegMap(@Self)^.clr := $00000001;
  46318. end;
  46319. procedure TRCON_RCON.setPOR(thebits : TBits_1); inline;
  46320. begin
  46321. if thebits = 0 then
  46322. pTDefRegMap(@Self)^.clr := $00000001
  46323. else
  46324. pTDefRegMap(@Self)^.&set := $00000001;
  46325. end;
  46326. function TRCON_RCON.getPOR : TBits_1; inline;
  46327. begin
  46328. getPOR := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46329. end;
  46330. procedure TRCON_RCON.setBOR; inline;
  46331. begin
  46332. pTDefRegMap(@Self)^.&set := $00000002;
  46333. end;
  46334. procedure TRCON_RCON.clearBOR; inline;
  46335. begin
  46336. pTDefRegMap(@Self)^.clr := $00000002;
  46337. end;
  46338. procedure TRCON_RCON.setBOR(thebits : TBits_1); inline;
  46339. begin
  46340. if thebits = 0 then
  46341. pTDefRegMap(@Self)^.clr := $00000002
  46342. else
  46343. pTDefRegMap(@Self)^.&set := $00000002;
  46344. end;
  46345. function TRCON_RCON.getBOR : TBits_1; inline;
  46346. begin
  46347. getBOR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46348. end;
  46349. procedure TRCON_RCON.setIDLE; inline;
  46350. begin
  46351. pTDefRegMap(@Self)^.&set := $00000004;
  46352. end;
  46353. procedure TRCON_RCON.clearIDLE; inline;
  46354. begin
  46355. pTDefRegMap(@Self)^.clr := $00000004;
  46356. end;
  46357. procedure TRCON_RCON.setIDLE(thebits : TBits_1); inline;
  46358. begin
  46359. if thebits = 0 then
  46360. pTDefRegMap(@Self)^.clr := $00000004
  46361. else
  46362. pTDefRegMap(@Self)^.&set := $00000004;
  46363. end;
  46364. function TRCON_RCON.getIDLE : TBits_1; inline;
  46365. begin
  46366. getIDLE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46367. end;
  46368. procedure TRCON_RCON.setSLEEP; inline;
  46369. begin
  46370. pTDefRegMap(@Self)^.&set := $00000008;
  46371. end;
  46372. procedure TRCON_RCON.clearSLEEP; inline;
  46373. begin
  46374. pTDefRegMap(@Self)^.clr := $00000008;
  46375. end;
  46376. procedure TRCON_RCON.setSLEEP(thebits : TBits_1); inline;
  46377. begin
  46378. if thebits = 0 then
  46379. pTDefRegMap(@Self)^.clr := $00000008
  46380. else
  46381. pTDefRegMap(@Self)^.&set := $00000008;
  46382. end;
  46383. function TRCON_RCON.getSLEEP : TBits_1; inline;
  46384. begin
  46385. getSLEEP := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46386. end;
  46387. procedure TRCON_RCON.setWDTO; inline;
  46388. begin
  46389. pTDefRegMap(@Self)^.&set := $00000010;
  46390. end;
  46391. procedure TRCON_RCON.clearWDTO; inline;
  46392. begin
  46393. pTDefRegMap(@Self)^.clr := $00000010;
  46394. end;
  46395. procedure TRCON_RCON.setWDTO(thebits : TBits_1); inline;
  46396. begin
  46397. if thebits = 0 then
  46398. pTDefRegMap(@Self)^.clr := $00000010
  46399. else
  46400. pTDefRegMap(@Self)^.&set := $00000010;
  46401. end;
  46402. function TRCON_RCON.getWDTO : TBits_1; inline;
  46403. begin
  46404. getWDTO := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46405. end;
  46406. procedure TRCON_RCON.setSWR; inline;
  46407. begin
  46408. pTDefRegMap(@Self)^.&set := $00000040;
  46409. end;
  46410. procedure TRCON_RCON.clearSWR; inline;
  46411. begin
  46412. pTDefRegMap(@Self)^.clr := $00000040;
  46413. end;
  46414. procedure TRCON_RCON.setSWR(thebits : TBits_1); inline;
  46415. begin
  46416. if thebits = 0 then
  46417. pTDefRegMap(@Self)^.clr := $00000040
  46418. else
  46419. pTDefRegMap(@Self)^.&set := $00000040;
  46420. end;
  46421. function TRCON_RCON.getSWR : TBits_1; inline;
  46422. begin
  46423. getSWR := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46424. end;
  46425. procedure TRCON_RCON.setEXTR; inline;
  46426. begin
  46427. pTDefRegMap(@Self)^.&set := $00000080;
  46428. end;
  46429. procedure TRCON_RCON.clearEXTR; inline;
  46430. begin
  46431. pTDefRegMap(@Self)^.clr := $00000080;
  46432. end;
  46433. procedure TRCON_RCON.setEXTR(thebits : TBits_1); inline;
  46434. begin
  46435. if thebits = 0 then
  46436. pTDefRegMap(@Self)^.clr := $00000080
  46437. else
  46438. pTDefRegMap(@Self)^.&set := $00000080;
  46439. end;
  46440. function TRCON_RCON.getEXTR : TBits_1; inline;
  46441. begin
  46442. getEXTR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46443. end;
  46444. procedure TRCON_RCON.setVREGS; inline;
  46445. begin
  46446. pTDefRegMap(@Self)^.&set := $00000100;
  46447. end;
  46448. procedure TRCON_RCON.clearVREGS; inline;
  46449. begin
  46450. pTDefRegMap(@Self)^.clr := $00000100;
  46451. end;
  46452. procedure TRCON_RCON.setVREGS(thebits : TBits_1); inline;
  46453. begin
  46454. if thebits = 0 then
  46455. pTDefRegMap(@Self)^.clr := $00000100
  46456. else
  46457. pTDefRegMap(@Self)^.&set := $00000100;
  46458. end;
  46459. function TRCON_RCON.getVREGS : TBits_1; inline;
  46460. begin
  46461. getVREGS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  46462. end;
  46463. procedure TRCON_RCON.setCMR; inline;
  46464. begin
  46465. pTDefRegMap(@Self)^.&set := $00000200;
  46466. end;
  46467. procedure TRCON_RCON.clearCMR; inline;
  46468. begin
  46469. pTDefRegMap(@Self)^.clr := $00000200;
  46470. end;
  46471. procedure TRCON_RCON.setCMR(thebits : TBits_1); inline;
  46472. begin
  46473. if thebits = 0 then
  46474. pTDefRegMap(@Self)^.clr := $00000200
  46475. else
  46476. pTDefRegMap(@Self)^.&set := $00000200;
  46477. end;
  46478. function TRCON_RCON.getCMR : TBits_1; inline;
  46479. begin
  46480. getCMR := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  46481. end;
  46482. procedure TRCON_RCON.setw(thebits : TBits_32); inline;
  46483. begin
  46484. pTDefRegMap(@Self)^.val := thebits;
  46485. end;
  46486. function TRCON_RCON.getw : TBits_32; inline;
  46487. begin
  46488. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46489. end;
  46490. procedure TRCON_RSWRST.setSWRST; inline;
  46491. begin
  46492. pTDefRegMap(@Self)^.&set := $00000001;
  46493. end;
  46494. procedure TRCON_RSWRST.clearSWRST; inline;
  46495. begin
  46496. pTDefRegMap(@Self)^.clr := $00000001;
  46497. end;
  46498. procedure TRCON_RSWRST.setSWRST(thebits : TBits_1); inline;
  46499. begin
  46500. if thebits = 0 then
  46501. pTDefRegMap(@Self)^.clr := $00000001
  46502. else
  46503. pTDefRegMap(@Self)^.&set := $00000001;
  46504. end;
  46505. function TRCON_RSWRST.getSWRST : TBits_1; inline;
  46506. begin
  46507. getSWRST := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46508. end;
  46509. procedure TRCON_RSWRST.setw(thebits : TBits_32); inline;
  46510. begin
  46511. pTDefRegMap(@Self)^.val := thebits;
  46512. end;
  46513. function TRCON_RSWRST.getw : TBits_32; inline;
  46514. begin
  46515. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46516. end;
  46517. procedure TINT_INTCON.setINT0EP; inline;
  46518. begin
  46519. pTDefRegMap(@Self)^.&set := $00000001;
  46520. end;
  46521. procedure TINT_INTCON.clearINT0EP; inline;
  46522. begin
  46523. pTDefRegMap(@Self)^.clr := $00000001;
  46524. end;
  46525. procedure TINT_INTCON.setINT0EP(thebits : TBits_1); inline;
  46526. begin
  46527. if thebits = 0 then
  46528. pTDefRegMap(@Self)^.clr := $00000001
  46529. else
  46530. pTDefRegMap(@Self)^.&set := $00000001;
  46531. end;
  46532. function TINT_INTCON.getINT0EP : TBits_1; inline;
  46533. begin
  46534. getINT0EP := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46535. end;
  46536. procedure TINT_INTCON.setINT1EP; inline;
  46537. begin
  46538. pTDefRegMap(@Self)^.&set := $00000002;
  46539. end;
  46540. procedure TINT_INTCON.clearINT1EP; inline;
  46541. begin
  46542. pTDefRegMap(@Self)^.clr := $00000002;
  46543. end;
  46544. procedure TINT_INTCON.setINT1EP(thebits : TBits_1); inline;
  46545. begin
  46546. if thebits = 0 then
  46547. pTDefRegMap(@Self)^.clr := $00000002
  46548. else
  46549. pTDefRegMap(@Self)^.&set := $00000002;
  46550. end;
  46551. function TINT_INTCON.getINT1EP : TBits_1; inline;
  46552. begin
  46553. getINT1EP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46554. end;
  46555. procedure TINT_INTCON.setINT2EP; inline;
  46556. begin
  46557. pTDefRegMap(@Self)^.&set := $00000004;
  46558. end;
  46559. procedure TINT_INTCON.clearINT2EP; inline;
  46560. begin
  46561. pTDefRegMap(@Self)^.clr := $00000004;
  46562. end;
  46563. procedure TINT_INTCON.setINT2EP(thebits : TBits_1); inline;
  46564. begin
  46565. if thebits = 0 then
  46566. pTDefRegMap(@Self)^.clr := $00000004
  46567. else
  46568. pTDefRegMap(@Self)^.&set := $00000004;
  46569. end;
  46570. function TINT_INTCON.getINT2EP : TBits_1; inline;
  46571. begin
  46572. getINT2EP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46573. end;
  46574. procedure TINT_INTCON.setINT3EP; inline;
  46575. begin
  46576. pTDefRegMap(@Self)^.&set := $00000008;
  46577. end;
  46578. procedure TINT_INTCON.clearINT3EP; inline;
  46579. begin
  46580. pTDefRegMap(@Self)^.clr := $00000008;
  46581. end;
  46582. procedure TINT_INTCON.setINT3EP(thebits : TBits_1); inline;
  46583. begin
  46584. if thebits = 0 then
  46585. pTDefRegMap(@Self)^.clr := $00000008
  46586. else
  46587. pTDefRegMap(@Self)^.&set := $00000008;
  46588. end;
  46589. function TINT_INTCON.getINT3EP : TBits_1; inline;
  46590. begin
  46591. getINT3EP := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46592. end;
  46593. procedure TINT_INTCON.setINT4EP; inline;
  46594. begin
  46595. pTDefRegMap(@Self)^.&set := $00000010;
  46596. end;
  46597. procedure TINT_INTCON.clearINT4EP; inline;
  46598. begin
  46599. pTDefRegMap(@Self)^.clr := $00000010;
  46600. end;
  46601. procedure TINT_INTCON.setINT4EP(thebits : TBits_1); inline;
  46602. begin
  46603. if thebits = 0 then
  46604. pTDefRegMap(@Self)^.clr := $00000010
  46605. else
  46606. pTDefRegMap(@Self)^.&set := $00000010;
  46607. end;
  46608. function TINT_INTCON.getINT4EP : TBits_1; inline;
  46609. begin
  46610. getINT4EP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46611. end;
  46612. procedure TINT_INTCON.setTPC(thebits : TBits_3); inline;
  46613. begin
  46614. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  46615. end;
  46616. function TINT_INTCON.getTPC : TBits_3; inline;
  46617. begin
  46618. getTPC := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  46619. end;
  46620. procedure TINT_INTCON.setMVEC; inline;
  46621. begin
  46622. pTDefRegMap(@Self)^.&set := $00001000;
  46623. end;
  46624. procedure TINT_INTCON.clearMVEC; inline;
  46625. begin
  46626. pTDefRegMap(@Self)^.clr := $00001000;
  46627. end;
  46628. procedure TINT_INTCON.setMVEC(thebits : TBits_1); inline;
  46629. begin
  46630. if thebits = 0 then
  46631. pTDefRegMap(@Self)^.clr := $00001000
  46632. else
  46633. pTDefRegMap(@Self)^.&set := $00001000;
  46634. end;
  46635. function TINT_INTCON.getMVEC : TBits_1; inline;
  46636. begin
  46637. getMVEC := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  46638. end;
  46639. procedure TINT_INTCON.setFRZ; inline;
  46640. begin
  46641. pTDefRegMap(@Self)^.&set := $00004000;
  46642. end;
  46643. procedure TINT_INTCON.clearFRZ; inline;
  46644. begin
  46645. pTDefRegMap(@Self)^.clr := $00004000;
  46646. end;
  46647. procedure TINT_INTCON.setFRZ(thebits : TBits_1); inline;
  46648. begin
  46649. if thebits = 0 then
  46650. pTDefRegMap(@Self)^.clr := $00004000
  46651. else
  46652. pTDefRegMap(@Self)^.&set := $00004000;
  46653. end;
  46654. function TINT_INTCON.getFRZ : TBits_1; inline;
  46655. begin
  46656. getFRZ := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  46657. end;
  46658. procedure TINT_INTCON.setSS0; inline;
  46659. begin
  46660. pTDefRegMap(@Self)^.&set := $00010000;
  46661. end;
  46662. procedure TINT_INTCON.clearSS0; inline;
  46663. begin
  46664. pTDefRegMap(@Self)^.clr := $00010000;
  46665. end;
  46666. procedure TINT_INTCON.setSS0(thebits : TBits_1); inline;
  46667. begin
  46668. if thebits = 0 then
  46669. pTDefRegMap(@Self)^.clr := $00010000
  46670. else
  46671. pTDefRegMap(@Self)^.&set := $00010000;
  46672. end;
  46673. function TINT_INTCON.getSS0 : TBits_1; inline;
  46674. begin
  46675. getSS0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  46676. end;
  46677. procedure TINT_INTCON.setw(thebits : TBits_32); inline;
  46678. begin
  46679. pTDefRegMap(@Self)^.val := thebits;
  46680. end;
  46681. function TINT_INTCON.getw : TBits_32; inline;
  46682. begin
  46683. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46684. end;
  46685. procedure TINT_IFS0.setCTIF; inline;
  46686. begin
  46687. pTDefRegMap(@Self)^.&set := $00000001;
  46688. end;
  46689. procedure TINT_IFS0.clearCTIF; inline;
  46690. begin
  46691. pTDefRegMap(@Self)^.clr := $00000001;
  46692. end;
  46693. procedure TINT_IFS0.setCTIF(thebits : TBits_1); inline;
  46694. begin
  46695. if thebits = 0 then
  46696. pTDefRegMap(@Self)^.clr := $00000001
  46697. else
  46698. pTDefRegMap(@Self)^.&set := $00000001;
  46699. end;
  46700. function TINT_IFS0.getCTIF : TBits_1; inline;
  46701. begin
  46702. getCTIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46703. end;
  46704. procedure TINT_IFS0.setCS0IF; inline;
  46705. begin
  46706. pTDefRegMap(@Self)^.&set := $00000002;
  46707. end;
  46708. procedure TINT_IFS0.clearCS0IF; inline;
  46709. begin
  46710. pTDefRegMap(@Self)^.clr := $00000002;
  46711. end;
  46712. procedure TINT_IFS0.setCS0IF(thebits : TBits_1); inline;
  46713. begin
  46714. if thebits = 0 then
  46715. pTDefRegMap(@Self)^.clr := $00000002
  46716. else
  46717. pTDefRegMap(@Self)^.&set := $00000002;
  46718. end;
  46719. function TINT_IFS0.getCS0IF : TBits_1; inline;
  46720. begin
  46721. getCS0IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46722. end;
  46723. procedure TINT_IFS0.setCS1IF; inline;
  46724. begin
  46725. pTDefRegMap(@Self)^.&set := $00000004;
  46726. end;
  46727. procedure TINT_IFS0.clearCS1IF; inline;
  46728. begin
  46729. pTDefRegMap(@Self)^.clr := $00000004;
  46730. end;
  46731. procedure TINT_IFS0.setCS1IF(thebits : TBits_1); inline;
  46732. begin
  46733. if thebits = 0 then
  46734. pTDefRegMap(@Self)^.clr := $00000004
  46735. else
  46736. pTDefRegMap(@Self)^.&set := $00000004;
  46737. end;
  46738. function TINT_IFS0.getCS1IF : TBits_1; inline;
  46739. begin
  46740. getCS1IF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46741. end;
  46742. procedure TINT_IFS0.setINT0IF; inline;
  46743. begin
  46744. pTDefRegMap(@Self)^.&set := $00000008;
  46745. end;
  46746. procedure TINT_IFS0.clearINT0IF; inline;
  46747. begin
  46748. pTDefRegMap(@Self)^.clr := $00000008;
  46749. end;
  46750. procedure TINT_IFS0.setINT0IF(thebits : TBits_1); inline;
  46751. begin
  46752. if thebits = 0 then
  46753. pTDefRegMap(@Self)^.clr := $00000008
  46754. else
  46755. pTDefRegMap(@Self)^.&set := $00000008;
  46756. end;
  46757. function TINT_IFS0.getINT0IF : TBits_1; inline;
  46758. begin
  46759. getINT0IF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46760. end;
  46761. procedure TINT_IFS0.setT1IF; inline;
  46762. begin
  46763. pTDefRegMap(@Self)^.&set := $00000010;
  46764. end;
  46765. procedure TINT_IFS0.clearT1IF; inline;
  46766. begin
  46767. pTDefRegMap(@Self)^.clr := $00000010;
  46768. end;
  46769. procedure TINT_IFS0.setT1IF(thebits : TBits_1); inline;
  46770. begin
  46771. if thebits = 0 then
  46772. pTDefRegMap(@Self)^.clr := $00000010
  46773. else
  46774. pTDefRegMap(@Self)^.&set := $00000010;
  46775. end;
  46776. function TINT_IFS0.getT1IF : TBits_1; inline;
  46777. begin
  46778. getT1IF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46779. end;
  46780. procedure TINT_IFS0.setIC1IF; inline;
  46781. begin
  46782. pTDefRegMap(@Self)^.&set := $00000020;
  46783. end;
  46784. procedure TINT_IFS0.clearIC1IF; inline;
  46785. begin
  46786. pTDefRegMap(@Self)^.clr := $00000020;
  46787. end;
  46788. procedure TINT_IFS0.setIC1IF(thebits : TBits_1); inline;
  46789. begin
  46790. if thebits = 0 then
  46791. pTDefRegMap(@Self)^.clr := $00000020
  46792. else
  46793. pTDefRegMap(@Self)^.&set := $00000020;
  46794. end;
  46795. function TINT_IFS0.getIC1IF : TBits_1; inline;
  46796. begin
  46797. getIC1IF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46798. end;
  46799. procedure TINT_IFS0.setOC1IF; inline;
  46800. begin
  46801. pTDefRegMap(@Self)^.&set := $00000040;
  46802. end;
  46803. procedure TINT_IFS0.clearOC1IF; inline;
  46804. begin
  46805. pTDefRegMap(@Self)^.clr := $00000040;
  46806. end;
  46807. procedure TINT_IFS0.setOC1IF(thebits : TBits_1); inline;
  46808. begin
  46809. if thebits = 0 then
  46810. pTDefRegMap(@Self)^.clr := $00000040
  46811. else
  46812. pTDefRegMap(@Self)^.&set := $00000040;
  46813. end;
  46814. function TINT_IFS0.getOC1IF : TBits_1; inline;
  46815. begin
  46816. getOC1IF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46817. end;
  46818. procedure TINT_IFS0.setINT1IF; inline;
  46819. begin
  46820. pTDefRegMap(@Self)^.&set := $00000080;
  46821. end;
  46822. procedure TINT_IFS0.clearINT1IF; inline;
  46823. begin
  46824. pTDefRegMap(@Self)^.clr := $00000080;
  46825. end;
  46826. procedure TINT_IFS0.setINT1IF(thebits : TBits_1); inline;
  46827. begin
  46828. if thebits = 0 then
  46829. pTDefRegMap(@Self)^.clr := $00000080
  46830. else
  46831. pTDefRegMap(@Self)^.&set := $00000080;
  46832. end;
  46833. function TINT_IFS0.getINT1IF : TBits_1; inline;
  46834. begin
  46835. getINT1IF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46836. end;
  46837. procedure TINT_IFS0.setT2IF; inline;
  46838. begin
  46839. pTDefRegMap(@Self)^.&set := $00000100;
  46840. end;
  46841. procedure TINT_IFS0.clearT2IF; inline;
  46842. begin
  46843. pTDefRegMap(@Self)^.clr := $00000100;
  46844. end;
  46845. procedure TINT_IFS0.setT2IF(thebits : TBits_1); inline;
  46846. begin
  46847. if thebits = 0 then
  46848. pTDefRegMap(@Self)^.clr := $00000100
  46849. else
  46850. pTDefRegMap(@Self)^.&set := $00000100;
  46851. end;
  46852. function TINT_IFS0.getT2IF : TBits_1; inline;
  46853. begin
  46854. getT2IF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  46855. end;
  46856. procedure TINT_IFS0.setIC2IF; inline;
  46857. begin
  46858. pTDefRegMap(@Self)^.&set := $00000200;
  46859. end;
  46860. procedure TINT_IFS0.clearIC2IF; inline;
  46861. begin
  46862. pTDefRegMap(@Self)^.clr := $00000200;
  46863. end;
  46864. procedure TINT_IFS0.setIC2IF(thebits : TBits_1); inline;
  46865. begin
  46866. if thebits = 0 then
  46867. pTDefRegMap(@Self)^.clr := $00000200
  46868. else
  46869. pTDefRegMap(@Self)^.&set := $00000200;
  46870. end;
  46871. function TINT_IFS0.getIC2IF : TBits_1; inline;
  46872. begin
  46873. getIC2IF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  46874. end;
  46875. procedure TINT_IFS0.setOC2IF; inline;
  46876. begin
  46877. pTDefRegMap(@Self)^.&set := $00000400;
  46878. end;
  46879. procedure TINT_IFS0.clearOC2IF; inline;
  46880. begin
  46881. pTDefRegMap(@Self)^.clr := $00000400;
  46882. end;
  46883. procedure TINT_IFS0.setOC2IF(thebits : TBits_1); inline;
  46884. begin
  46885. if thebits = 0 then
  46886. pTDefRegMap(@Self)^.clr := $00000400
  46887. else
  46888. pTDefRegMap(@Self)^.&set := $00000400;
  46889. end;
  46890. function TINT_IFS0.getOC2IF : TBits_1; inline;
  46891. begin
  46892. getOC2IF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  46893. end;
  46894. procedure TINT_IFS0.setINT2IF; inline;
  46895. begin
  46896. pTDefRegMap(@Self)^.&set := $00000800;
  46897. end;
  46898. procedure TINT_IFS0.clearINT2IF; inline;
  46899. begin
  46900. pTDefRegMap(@Self)^.clr := $00000800;
  46901. end;
  46902. procedure TINT_IFS0.setINT2IF(thebits : TBits_1); inline;
  46903. begin
  46904. if thebits = 0 then
  46905. pTDefRegMap(@Self)^.clr := $00000800
  46906. else
  46907. pTDefRegMap(@Self)^.&set := $00000800;
  46908. end;
  46909. function TINT_IFS0.getINT2IF : TBits_1; inline;
  46910. begin
  46911. getINT2IF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  46912. end;
  46913. procedure TINT_IFS0.setT3IF; inline;
  46914. begin
  46915. pTDefRegMap(@Self)^.&set := $00001000;
  46916. end;
  46917. procedure TINT_IFS0.clearT3IF; inline;
  46918. begin
  46919. pTDefRegMap(@Self)^.clr := $00001000;
  46920. end;
  46921. procedure TINT_IFS0.setT3IF(thebits : TBits_1); inline;
  46922. begin
  46923. if thebits = 0 then
  46924. pTDefRegMap(@Self)^.clr := $00001000
  46925. else
  46926. pTDefRegMap(@Self)^.&set := $00001000;
  46927. end;
  46928. function TINT_IFS0.getT3IF : TBits_1; inline;
  46929. begin
  46930. getT3IF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  46931. end;
  46932. procedure TINT_IFS0.setIC3IF; inline;
  46933. begin
  46934. pTDefRegMap(@Self)^.&set := $00002000;
  46935. end;
  46936. procedure TINT_IFS0.clearIC3IF; inline;
  46937. begin
  46938. pTDefRegMap(@Self)^.clr := $00002000;
  46939. end;
  46940. procedure TINT_IFS0.setIC3IF(thebits : TBits_1); inline;
  46941. begin
  46942. if thebits = 0 then
  46943. pTDefRegMap(@Self)^.clr := $00002000
  46944. else
  46945. pTDefRegMap(@Self)^.&set := $00002000;
  46946. end;
  46947. function TINT_IFS0.getIC3IF : TBits_1; inline;
  46948. begin
  46949. getIC3IF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  46950. end;
  46951. procedure TINT_IFS0.setOC3IF; inline;
  46952. begin
  46953. pTDefRegMap(@Self)^.&set := $00004000;
  46954. end;
  46955. procedure TINT_IFS0.clearOC3IF; inline;
  46956. begin
  46957. pTDefRegMap(@Self)^.clr := $00004000;
  46958. end;
  46959. procedure TINT_IFS0.setOC3IF(thebits : TBits_1); inline;
  46960. begin
  46961. if thebits = 0 then
  46962. pTDefRegMap(@Self)^.clr := $00004000
  46963. else
  46964. pTDefRegMap(@Self)^.&set := $00004000;
  46965. end;
  46966. function TINT_IFS0.getOC3IF : TBits_1; inline;
  46967. begin
  46968. getOC3IF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  46969. end;
  46970. procedure TINT_IFS0.setINT3IF; inline;
  46971. begin
  46972. pTDefRegMap(@Self)^.&set := $00008000;
  46973. end;
  46974. procedure TINT_IFS0.clearINT3IF; inline;
  46975. begin
  46976. pTDefRegMap(@Self)^.clr := $00008000;
  46977. end;
  46978. procedure TINT_IFS0.setINT3IF(thebits : TBits_1); inline;
  46979. begin
  46980. if thebits = 0 then
  46981. pTDefRegMap(@Self)^.clr := $00008000
  46982. else
  46983. pTDefRegMap(@Self)^.&set := $00008000;
  46984. end;
  46985. function TINT_IFS0.getINT3IF : TBits_1; inline;
  46986. begin
  46987. getINT3IF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46988. end;
  46989. procedure TINT_IFS0.setT4IF; inline;
  46990. begin
  46991. pTDefRegMap(@Self)^.&set := $00010000;
  46992. end;
  46993. procedure TINT_IFS0.clearT4IF; inline;
  46994. begin
  46995. pTDefRegMap(@Self)^.clr := $00010000;
  46996. end;
  46997. procedure TINT_IFS0.setT4IF(thebits : TBits_1); inline;
  46998. begin
  46999. if thebits = 0 then
  47000. pTDefRegMap(@Self)^.clr := $00010000
  47001. else
  47002. pTDefRegMap(@Self)^.&set := $00010000;
  47003. end;
  47004. function TINT_IFS0.getT4IF : TBits_1; inline;
  47005. begin
  47006. getT4IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  47007. end;
  47008. procedure TINT_IFS0.setIC4IF; inline;
  47009. begin
  47010. pTDefRegMap(@Self)^.&set := $00020000;
  47011. end;
  47012. procedure TINT_IFS0.clearIC4IF; inline;
  47013. begin
  47014. pTDefRegMap(@Self)^.clr := $00020000;
  47015. end;
  47016. procedure TINT_IFS0.setIC4IF(thebits : TBits_1); inline;
  47017. begin
  47018. if thebits = 0 then
  47019. pTDefRegMap(@Self)^.clr := $00020000
  47020. else
  47021. pTDefRegMap(@Self)^.&set := $00020000;
  47022. end;
  47023. function TINT_IFS0.getIC4IF : TBits_1; inline;
  47024. begin
  47025. getIC4IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  47026. end;
  47027. procedure TINT_IFS0.setOC4IF; inline;
  47028. begin
  47029. pTDefRegMap(@Self)^.&set := $00040000;
  47030. end;
  47031. procedure TINT_IFS0.clearOC4IF; inline;
  47032. begin
  47033. pTDefRegMap(@Self)^.clr := $00040000;
  47034. end;
  47035. procedure TINT_IFS0.setOC4IF(thebits : TBits_1); inline;
  47036. begin
  47037. if thebits = 0 then
  47038. pTDefRegMap(@Self)^.clr := $00040000
  47039. else
  47040. pTDefRegMap(@Self)^.&set := $00040000;
  47041. end;
  47042. function TINT_IFS0.getOC4IF : TBits_1; inline;
  47043. begin
  47044. getOC4IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  47045. end;
  47046. procedure TINT_IFS0.setINT4IF; inline;
  47047. begin
  47048. pTDefRegMap(@Self)^.&set := $00080000;
  47049. end;
  47050. procedure TINT_IFS0.clearINT4IF; inline;
  47051. begin
  47052. pTDefRegMap(@Self)^.clr := $00080000;
  47053. end;
  47054. procedure TINT_IFS0.setINT4IF(thebits : TBits_1); inline;
  47055. begin
  47056. if thebits = 0 then
  47057. pTDefRegMap(@Self)^.clr := $00080000
  47058. else
  47059. pTDefRegMap(@Self)^.&set := $00080000;
  47060. end;
  47061. function TINT_IFS0.getINT4IF : TBits_1; inline;
  47062. begin
  47063. getINT4IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  47064. end;
  47065. procedure TINT_IFS0.setT5IF; inline;
  47066. begin
  47067. pTDefRegMap(@Self)^.&set := $00100000;
  47068. end;
  47069. procedure TINT_IFS0.clearT5IF; inline;
  47070. begin
  47071. pTDefRegMap(@Self)^.clr := $00100000;
  47072. end;
  47073. procedure TINT_IFS0.setT5IF(thebits : TBits_1); inline;
  47074. begin
  47075. if thebits = 0 then
  47076. pTDefRegMap(@Self)^.clr := $00100000
  47077. else
  47078. pTDefRegMap(@Self)^.&set := $00100000;
  47079. end;
  47080. function TINT_IFS0.getT5IF : TBits_1; inline;
  47081. begin
  47082. getT5IF := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  47083. end;
  47084. procedure TINT_IFS0.setIC5IF; inline;
  47085. begin
  47086. pTDefRegMap(@Self)^.&set := $00200000;
  47087. end;
  47088. procedure TINT_IFS0.clearIC5IF; inline;
  47089. begin
  47090. pTDefRegMap(@Self)^.clr := $00200000;
  47091. end;
  47092. procedure TINT_IFS0.setIC5IF(thebits : TBits_1); inline;
  47093. begin
  47094. if thebits = 0 then
  47095. pTDefRegMap(@Self)^.clr := $00200000
  47096. else
  47097. pTDefRegMap(@Self)^.&set := $00200000;
  47098. end;
  47099. function TINT_IFS0.getIC5IF : TBits_1; inline;
  47100. begin
  47101. getIC5IF := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  47102. end;
  47103. procedure TINT_IFS0.setOC5IF; inline;
  47104. begin
  47105. pTDefRegMap(@Self)^.&set := $00400000;
  47106. end;
  47107. procedure TINT_IFS0.clearOC5IF; inline;
  47108. begin
  47109. pTDefRegMap(@Self)^.clr := $00400000;
  47110. end;
  47111. procedure TINT_IFS0.setOC5IF(thebits : TBits_1); inline;
  47112. begin
  47113. if thebits = 0 then
  47114. pTDefRegMap(@Self)^.clr := $00400000
  47115. else
  47116. pTDefRegMap(@Self)^.&set := $00400000;
  47117. end;
  47118. function TINT_IFS0.getOC5IF : TBits_1; inline;
  47119. begin
  47120. getOC5IF := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  47121. end;
  47122. procedure TINT_IFS0.setU1EIF; inline;
  47123. begin
  47124. pTDefRegMap(@Self)^.&set := $04000000;
  47125. end;
  47126. procedure TINT_IFS0.clearU1EIF; inline;
  47127. begin
  47128. pTDefRegMap(@Self)^.clr := $04000000;
  47129. end;
  47130. procedure TINT_IFS0.setU1EIF(thebits : TBits_1); inline;
  47131. begin
  47132. if thebits = 0 then
  47133. pTDefRegMap(@Self)^.clr := $04000000
  47134. else
  47135. pTDefRegMap(@Self)^.&set := $04000000;
  47136. end;
  47137. function TINT_IFS0.getU1EIF : TBits_1; inline;
  47138. begin
  47139. getU1EIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  47140. end;
  47141. procedure TINT_IFS0.setU1RXIF; inline;
  47142. begin
  47143. pTDefRegMap(@Self)^.&set := $08000000;
  47144. end;
  47145. procedure TINT_IFS0.clearU1RXIF; inline;
  47146. begin
  47147. pTDefRegMap(@Self)^.clr := $08000000;
  47148. end;
  47149. procedure TINT_IFS0.setU1RXIF(thebits : TBits_1); inline;
  47150. begin
  47151. if thebits = 0 then
  47152. pTDefRegMap(@Self)^.clr := $08000000
  47153. else
  47154. pTDefRegMap(@Self)^.&set := $08000000;
  47155. end;
  47156. function TINT_IFS0.getU1RXIF : TBits_1; inline;
  47157. begin
  47158. getU1RXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  47159. end;
  47160. procedure TINT_IFS0.setU1TXIF; inline;
  47161. begin
  47162. pTDefRegMap(@Self)^.&set := $10000000;
  47163. end;
  47164. procedure TINT_IFS0.clearU1TXIF; inline;
  47165. begin
  47166. pTDefRegMap(@Self)^.clr := $10000000;
  47167. end;
  47168. procedure TINT_IFS0.setU1TXIF(thebits : TBits_1); inline;
  47169. begin
  47170. if thebits = 0 then
  47171. pTDefRegMap(@Self)^.clr := $10000000
  47172. else
  47173. pTDefRegMap(@Self)^.&set := $10000000;
  47174. end;
  47175. function TINT_IFS0.getU1TXIF : TBits_1; inline;
  47176. begin
  47177. getU1TXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  47178. end;
  47179. procedure TINT_IFS0.setI2C1BIF; inline;
  47180. begin
  47181. pTDefRegMap(@Self)^.&set := $20000000;
  47182. end;
  47183. procedure TINT_IFS0.clearI2C1BIF; inline;
  47184. begin
  47185. pTDefRegMap(@Self)^.clr := $20000000;
  47186. end;
  47187. procedure TINT_IFS0.setI2C1BIF(thebits : TBits_1); inline;
  47188. begin
  47189. if thebits = 0 then
  47190. pTDefRegMap(@Self)^.clr := $20000000
  47191. else
  47192. pTDefRegMap(@Self)^.&set := $20000000;
  47193. end;
  47194. function TINT_IFS0.getI2C1BIF : TBits_1; inline;
  47195. begin
  47196. getI2C1BIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  47197. end;
  47198. procedure TINT_IFS0.setI2C1SIF; inline;
  47199. begin
  47200. pTDefRegMap(@Self)^.&set := $40000000;
  47201. end;
  47202. procedure TINT_IFS0.clearI2C1SIF; inline;
  47203. begin
  47204. pTDefRegMap(@Self)^.clr := $40000000;
  47205. end;
  47206. procedure TINT_IFS0.setI2C1SIF(thebits : TBits_1); inline;
  47207. begin
  47208. if thebits = 0 then
  47209. pTDefRegMap(@Self)^.clr := $40000000
  47210. else
  47211. pTDefRegMap(@Self)^.&set := $40000000;
  47212. end;
  47213. function TINT_IFS0.getI2C1SIF : TBits_1; inline;
  47214. begin
  47215. getI2C1SIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  47216. end;
  47217. procedure TINT_IFS0.setI2C1MIF; inline;
  47218. begin
  47219. pTDefRegMap(@Self)^.&set := $80000000;
  47220. end;
  47221. procedure TINT_IFS0.clearI2C1MIF; inline;
  47222. begin
  47223. pTDefRegMap(@Self)^.clr := $80000000;
  47224. end;
  47225. procedure TINT_IFS0.setI2C1MIF(thebits : TBits_1); inline;
  47226. begin
  47227. if thebits = 0 then
  47228. pTDefRegMap(@Self)^.clr := $80000000
  47229. else
  47230. pTDefRegMap(@Self)^.&set := $80000000;
  47231. end;
  47232. function TINT_IFS0.getI2C1MIF : TBits_1; inline;
  47233. begin
  47234. getI2C1MIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  47235. end;
  47236. procedure TINT_IFS0.setU1AEIF; inline;
  47237. begin
  47238. pTDefRegMap(@Self)^.&set := $04000000;
  47239. end;
  47240. procedure TINT_IFS0.clearU1AEIF; inline;
  47241. begin
  47242. pTDefRegMap(@Self)^.clr := $04000000;
  47243. end;
  47244. procedure TINT_IFS0.setU1AEIF(thebits : TBits_1); inline;
  47245. begin
  47246. if thebits = 0 then
  47247. pTDefRegMap(@Self)^.clr := $04000000
  47248. else
  47249. pTDefRegMap(@Self)^.&set := $04000000;
  47250. end;
  47251. function TINT_IFS0.getU1AEIF : TBits_1; inline;
  47252. begin
  47253. getU1AEIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  47254. end;
  47255. procedure TINT_IFS0.setU1ARXIF; inline;
  47256. begin
  47257. pTDefRegMap(@Self)^.&set := $08000000;
  47258. end;
  47259. procedure TINT_IFS0.clearU1ARXIF; inline;
  47260. begin
  47261. pTDefRegMap(@Self)^.clr := $08000000;
  47262. end;
  47263. procedure TINT_IFS0.setU1ARXIF(thebits : TBits_1); inline;
  47264. begin
  47265. if thebits = 0 then
  47266. pTDefRegMap(@Self)^.clr := $08000000
  47267. else
  47268. pTDefRegMap(@Self)^.&set := $08000000;
  47269. end;
  47270. function TINT_IFS0.getU1ARXIF : TBits_1; inline;
  47271. begin
  47272. getU1ARXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  47273. end;
  47274. procedure TINT_IFS0.setU1ATXIF; inline;
  47275. begin
  47276. pTDefRegMap(@Self)^.&set := $10000000;
  47277. end;
  47278. procedure TINT_IFS0.clearU1ATXIF; inline;
  47279. begin
  47280. pTDefRegMap(@Self)^.clr := $10000000;
  47281. end;
  47282. procedure TINT_IFS0.setU1ATXIF(thebits : TBits_1); inline;
  47283. begin
  47284. if thebits = 0 then
  47285. pTDefRegMap(@Self)^.clr := $10000000
  47286. else
  47287. pTDefRegMap(@Self)^.&set := $10000000;
  47288. end;
  47289. function TINT_IFS0.getU1ATXIF : TBits_1; inline;
  47290. begin
  47291. getU1ATXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  47292. end;
  47293. procedure TINT_IFS0.setSPI3EIF; inline;
  47294. begin
  47295. pTDefRegMap(@Self)^.&set := $04000000;
  47296. end;
  47297. procedure TINT_IFS0.clearSPI3EIF; inline;
  47298. begin
  47299. pTDefRegMap(@Self)^.clr := $04000000;
  47300. end;
  47301. procedure TINT_IFS0.setSPI3EIF(thebits : TBits_1); inline;
  47302. begin
  47303. if thebits = 0 then
  47304. pTDefRegMap(@Self)^.clr := $04000000
  47305. else
  47306. pTDefRegMap(@Self)^.&set := $04000000;
  47307. end;
  47308. function TINT_IFS0.getSPI3EIF : TBits_1; inline;
  47309. begin
  47310. getSPI3EIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  47311. end;
  47312. procedure TINT_IFS0.setSPI3RXIF; inline;
  47313. begin
  47314. pTDefRegMap(@Self)^.&set := $08000000;
  47315. end;
  47316. procedure TINT_IFS0.clearSPI3RXIF; inline;
  47317. begin
  47318. pTDefRegMap(@Self)^.clr := $08000000;
  47319. end;
  47320. procedure TINT_IFS0.setSPI3RXIF(thebits : TBits_1); inline;
  47321. begin
  47322. if thebits = 0 then
  47323. pTDefRegMap(@Self)^.clr := $08000000
  47324. else
  47325. pTDefRegMap(@Self)^.&set := $08000000;
  47326. end;
  47327. function TINT_IFS0.getSPI3RXIF : TBits_1; inline;
  47328. begin
  47329. getSPI3RXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  47330. end;
  47331. procedure TINT_IFS0.setSPI3TXIF; inline;
  47332. begin
  47333. pTDefRegMap(@Self)^.&set := $10000000;
  47334. end;
  47335. procedure TINT_IFS0.clearSPI3TXIF; inline;
  47336. begin
  47337. pTDefRegMap(@Self)^.clr := $10000000;
  47338. end;
  47339. procedure TINT_IFS0.setSPI3TXIF(thebits : TBits_1); inline;
  47340. begin
  47341. if thebits = 0 then
  47342. pTDefRegMap(@Self)^.clr := $10000000
  47343. else
  47344. pTDefRegMap(@Self)^.&set := $10000000;
  47345. end;
  47346. function TINT_IFS0.getSPI3TXIF : TBits_1; inline;
  47347. begin
  47348. getSPI3TXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  47349. end;
  47350. procedure TINT_IFS0.setSPI1AEIF; inline;
  47351. begin
  47352. pTDefRegMap(@Self)^.&set := $04000000;
  47353. end;
  47354. procedure TINT_IFS0.clearSPI1AEIF; inline;
  47355. begin
  47356. pTDefRegMap(@Self)^.clr := $04000000;
  47357. end;
  47358. procedure TINT_IFS0.setSPI1AEIF(thebits : TBits_1); inline;
  47359. begin
  47360. if thebits = 0 then
  47361. pTDefRegMap(@Self)^.clr := $04000000
  47362. else
  47363. pTDefRegMap(@Self)^.&set := $04000000;
  47364. end;
  47365. function TINT_IFS0.getSPI1AEIF : TBits_1; inline;
  47366. begin
  47367. getSPI1AEIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  47368. end;
  47369. procedure TINT_IFS0.setSPI1ARXIF; inline;
  47370. begin
  47371. pTDefRegMap(@Self)^.&set := $08000000;
  47372. end;
  47373. procedure TINT_IFS0.clearSPI1ARXIF; inline;
  47374. begin
  47375. pTDefRegMap(@Self)^.clr := $08000000;
  47376. end;
  47377. procedure TINT_IFS0.setSPI1ARXIF(thebits : TBits_1); inline;
  47378. begin
  47379. if thebits = 0 then
  47380. pTDefRegMap(@Self)^.clr := $08000000
  47381. else
  47382. pTDefRegMap(@Self)^.&set := $08000000;
  47383. end;
  47384. function TINT_IFS0.getSPI1ARXIF : TBits_1; inline;
  47385. begin
  47386. getSPI1ARXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  47387. end;
  47388. procedure TINT_IFS0.setSPI1ATXIF; inline;
  47389. begin
  47390. pTDefRegMap(@Self)^.&set := $10000000;
  47391. end;
  47392. procedure TINT_IFS0.clearSPI1ATXIF; inline;
  47393. begin
  47394. pTDefRegMap(@Self)^.clr := $10000000;
  47395. end;
  47396. procedure TINT_IFS0.setSPI1ATXIF(thebits : TBits_1); inline;
  47397. begin
  47398. if thebits = 0 then
  47399. pTDefRegMap(@Self)^.clr := $10000000
  47400. else
  47401. pTDefRegMap(@Self)^.&set := $10000000;
  47402. end;
  47403. function TINT_IFS0.getSPI1ATXIF : TBits_1; inline;
  47404. begin
  47405. getSPI1ATXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  47406. end;
  47407. procedure TINT_IFS0.setI2C3BIF; inline;
  47408. begin
  47409. pTDefRegMap(@Self)^.&set := $04000000;
  47410. end;
  47411. procedure TINT_IFS0.clearI2C3BIF; inline;
  47412. begin
  47413. pTDefRegMap(@Self)^.clr := $04000000;
  47414. end;
  47415. procedure TINT_IFS0.setI2C3BIF(thebits : TBits_1); inline;
  47416. begin
  47417. if thebits = 0 then
  47418. pTDefRegMap(@Self)^.clr := $04000000
  47419. else
  47420. pTDefRegMap(@Self)^.&set := $04000000;
  47421. end;
  47422. function TINT_IFS0.getI2C3BIF : TBits_1; inline;
  47423. begin
  47424. getI2C3BIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  47425. end;
  47426. procedure TINT_IFS0.setI2C3SIF; inline;
  47427. begin
  47428. pTDefRegMap(@Self)^.&set := $08000000;
  47429. end;
  47430. procedure TINT_IFS0.clearI2C3SIF; inline;
  47431. begin
  47432. pTDefRegMap(@Self)^.clr := $08000000;
  47433. end;
  47434. procedure TINT_IFS0.setI2C3SIF(thebits : TBits_1); inline;
  47435. begin
  47436. if thebits = 0 then
  47437. pTDefRegMap(@Self)^.clr := $08000000
  47438. else
  47439. pTDefRegMap(@Self)^.&set := $08000000;
  47440. end;
  47441. function TINT_IFS0.getI2C3SIF : TBits_1; inline;
  47442. begin
  47443. getI2C3SIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  47444. end;
  47445. procedure TINT_IFS0.setI2C3MIF; inline;
  47446. begin
  47447. pTDefRegMap(@Self)^.&set := $10000000;
  47448. end;
  47449. procedure TINT_IFS0.clearI2C3MIF; inline;
  47450. begin
  47451. pTDefRegMap(@Self)^.clr := $10000000;
  47452. end;
  47453. procedure TINT_IFS0.setI2C3MIF(thebits : TBits_1); inline;
  47454. begin
  47455. if thebits = 0 then
  47456. pTDefRegMap(@Self)^.clr := $10000000
  47457. else
  47458. pTDefRegMap(@Self)^.&set := $10000000;
  47459. end;
  47460. function TINT_IFS0.getI2C3MIF : TBits_1; inline;
  47461. begin
  47462. getI2C3MIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  47463. end;
  47464. procedure TINT_IFS0.setI2C1ABIF; inline;
  47465. begin
  47466. pTDefRegMap(@Self)^.&set := $04000000;
  47467. end;
  47468. procedure TINT_IFS0.clearI2C1ABIF; inline;
  47469. begin
  47470. pTDefRegMap(@Self)^.clr := $04000000;
  47471. end;
  47472. procedure TINT_IFS0.setI2C1ABIF(thebits : TBits_1); inline;
  47473. begin
  47474. if thebits = 0 then
  47475. pTDefRegMap(@Self)^.clr := $04000000
  47476. else
  47477. pTDefRegMap(@Self)^.&set := $04000000;
  47478. end;
  47479. function TINT_IFS0.getI2C1ABIF : TBits_1; inline;
  47480. begin
  47481. getI2C1ABIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  47482. end;
  47483. procedure TINT_IFS0.setI2C1ASIF; inline;
  47484. begin
  47485. pTDefRegMap(@Self)^.&set := $08000000;
  47486. end;
  47487. procedure TINT_IFS0.clearI2C1ASIF; inline;
  47488. begin
  47489. pTDefRegMap(@Self)^.clr := $08000000;
  47490. end;
  47491. procedure TINT_IFS0.setI2C1ASIF(thebits : TBits_1); inline;
  47492. begin
  47493. if thebits = 0 then
  47494. pTDefRegMap(@Self)^.clr := $08000000
  47495. else
  47496. pTDefRegMap(@Self)^.&set := $08000000;
  47497. end;
  47498. function TINT_IFS0.getI2C1ASIF : TBits_1; inline;
  47499. begin
  47500. getI2C1ASIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  47501. end;
  47502. procedure TINT_IFS0.setI2C1AMIF; inline;
  47503. begin
  47504. pTDefRegMap(@Self)^.&set := $10000000;
  47505. end;
  47506. procedure TINT_IFS0.clearI2C1AMIF; inline;
  47507. begin
  47508. pTDefRegMap(@Self)^.clr := $10000000;
  47509. end;
  47510. procedure TINT_IFS0.setI2C1AMIF(thebits : TBits_1); inline;
  47511. begin
  47512. if thebits = 0 then
  47513. pTDefRegMap(@Self)^.clr := $10000000
  47514. else
  47515. pTDefRegMap(@Self)^.&set := $10000000;
  47516. end;
  47517. function TINT_IFS0.getI2C1AMIF : TBits_1; inline;
  47518. begin
  47519. getI2C1AMIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  47520. end;
  47521. procedure TINT_IFS0.setw(thebits : TBits_32); inline;
  47522. begin
  47523. pTDefRegMap(@Self)^.val := thebits;
  47524. end;
  47525. function TINT_IFS0.getw : TBits_32; inline;
  47526. begin
  47527. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  47528. end;
  47529. procedure TINT_IFS1.setCNIF; inline;
  47530. begin
  47531. pTDefRegMap(@Self)^.&set := $00000001;
  47532. end;
  47533. procedure TINT_IFS1.clearCNIF; inline;
  47534. begin
  47535. pTDefRegMap(@Self)^.clr := $00000001;
  47536. end;
  47537. procedure TINT_IFS1.setCNIF(thebits : TBits_1); inline;
  47538. begin
  47539. if thebits = 0 then
  47540. pTDefRegMap(@Self)^.clr := $00000001
  47541. else
  47542. pTDefRegMap(@Self)^.&set := $00000001;
  47543. end;
  47544. function TINT_IFS1.getCNIF : TBits_1; inline;
  47545. begin
  47546. getCNIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  47547. end;
  47548. procedure TINT_IFS1.setAD1IF; inline;
  47549. begin
  47550. pTDefRegMap(@Self)^.&set := $00000002;
  47551. end;
  47552. procedure TINT_IFS1.clearAD1IF; inline;
  47553. begin
  47554. pTDefRegMap(@Self)^.clr := $00000002;
  47555. end;
  47556. procedure TINT_IFS1.setAD1IF(thebits : TBits_1); inline;
  47557. begin
  47558. if thebits = 0 then
  47559. pTDefRegMap(@Self)^.clr := $00000002
  47560. else
  47561. pTDefRegMap(@Self)^.&set := $00000002;
  47562. end;
  47563. function TINT_IFS1.getAD1IF : TBits_1; inline;
  47564. begin
  47565. getAD1IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  47566. end;
  47567. procedure TINT_IFS1.setPMPIF; inline;
  47568. begin
  47569. pTDefRegMap(@Self)^.&set := $00000004;
  47570. end;
  47571. procedure TINT_IFS1.clearPMPIF; inline;
  47572. begin
  47573. pTDefRegMap(@Self)^.clr := $00000004;
  47574. end;
  47575. procedure TINT_IFS1.setPMPIF(thebits : TBits_1); inline;
  47576. begin
  47577. if thebits = 0 then
  47578. pTDefRegMap(@Self)^.clr := $00000004
  47579. else
  47580. pTDefRegMap(@Self)^.&set := $00000004;
  47581. end;
  47582. function TINT_IFS1.getPMPIF : TBits_1; inline;
  47583. begin
  47584. getPMPIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  47585. end;
  47586. procedure TINT_IFS1.setCMP1IF; inline;
  47587. begin
  47588. pTDefRegMap(@Self)^.&set := $00000008;
  47589. end;
  47590. procedure TINT_IFS1.clearCMP1IF; inline;
  47591. begin
  47592. pTDefRegMap(@Self)^.clr := $00000008;
  47593. end;
  47594. procedure TINT_IFS1.setCMP1IF(thebits : TBits_1); inline;
  47595. begin
  47596. if thebits = 0 then
  47597. pTDefRegMap(@Self)^.clr := $00000008
  47598. else
  47599. pTDefRegMap(@Self)^.&set := $00000008;
  47600. end;
  47601. function TINT_IFS1.getCMP1IF : TBits_1; inline;
  47602. begin
  47603. getCMP1IF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  47604. end;
  47605. procedure TINT_IFS1.setCMP2IF; inline;
  47606. begin
  47607. pTDefRegMap(@Self)^.&set := $00000010;
  47608. end;
  47609. procedure TINT_IFS1.clearCMP2IF; inline;
  47610. begin
  47611. pTDefRegMap(@Self)^.clr := $00000010;
  47612. end;
  47613. procedure TINT_IFS1.setCMP2IF(thebits : TBits_1); inline;
  47614. begin
  47615. if thebits = 0 then
  47616. pTDefRegMap(@Self)^.clr := $00000010
  47617. else
  47618. pTDefRegMap(@Self)^.&set := $00000010;
  47619. end;
  47620. function TINT_IFS1.getCMP2IF : TBits_1; inline;
  47621. begin
  47622. getCMP2IF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  47623. end;
  47624. procedure TINT_IFS1.setU3EIF; inline;
  47625. begin
  47626. pTDefRegMap(@Self)^.&set := $00000020;
  47627. end;
  47628. procedure TINT_IFS1.clearU3EIF; inline;
  47629. begin
  47630. pTDefRegMap(@Self)^.clr := $00000020;
  47631. end;
  47632. procedure TINT_IFS1.setU3EIF(thebits : TBits_1); inline;
  47633. begin
  47634. if thebits = 0 then
  47635. pTDefRegMap(@Self)^.clr := $00000020
  47636. else
  47637. pTDefRegMap(@Self)^.&set := $00000020;
  47638. end;
  47639. function TINT_IFS1.getU3EIF : TBits_1; inline;
  47640. begin
  47641. getU3EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47642. end;
  47643. procedure TINT_IFS1.setU3RXIF; inline;
  47644. begin
  47645. pTDefRegMap(@Self)^.&set := $00000040;
  47646. end;
  47647. procedure TINT_IFS1.clearU3RXIF; inline;
  47648. begin
  47649. pTDefRegMap(@Self)^.clr := $00000040;
  47650. end;
  47651. procedure TINT_IFS1.setU3RXIF(thebits : TBits_1); inline;
  47652. begin
  47653. if thebits = 0 then
  47654. pTDefRegMap(@Self)^.clr := $00000040
  47655. else
  47656. pTDefRegMap(@Self)^.&set := $00000040;
  47657. end;
  47658. function TINT_IFS1.getU3RXIF : TBits_1; inline;
  47659. begin
  47660. getU3RXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47661. end;
  47662. procedure TINT_IFS1.setU3TXIF; inline;
  47663. begin
  47664. pTDefRegMap(@Self)^.&set := $00000080;
  47665. end;
  47666. procedure TINT_IFS1.clearU3TXIF; inline;
  47667. begin
  47668. pTDefRegMap(@Self)^.clr := $00000080;
  47669. end;
  47670. procedure TINT_IFS1.setU3TXIF(thebits : TBits_1); inline;
  47671. begin
  47672. if thebits = 0 then
  47673. pTDefRegMap(@Self)^.clr := $00000080
  47674. else
  47675. pTDefRegMap(@Self)^.&set := $00000080;
  47676. end;
  47677. function TINT_IFS1.getU3TXIF : TBits_1; inline;
  47678. begin
  47679. getU3TXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47680. end;
  47681. procedure TINT_IFS1.setU2EIF; inline;
  47682. begin
  47683. pTDefRegMap(@Self)^.&set := $00000100;
  47684. end;
  47685. procedure TINT_IFS1.clearU2EIF; inline;
  47686. begin
  47687. pTDefRegMap(@Self)^.clr := $00000100;
  47688. end;
  47689. procedure TINT_IFS1.setU2EIF(thebits : TBits_1); inline;
  47690. begin
  47691. if thebits = 0 then
  47692. pTDefRegMap(@Self)^.clr := $00000100
  47693. else
  47694. pTDefRegMap(@Self)^.&set := $00000100;
  47695. end;
  47696. function TINT_IFS1.getU2EIF : TBits_1; inline;
  47697. begin
  47698. getU2EIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47699. end;
  47700. procedure TINT_IFS1.setU2RXIF; inline;
  47701. begin
  47702. pTDefRegMap(@Self)^.&set := $00000200;
  47703. end;
  47704. procedure TINT_IFS1.clearU2RXIF; inline;
  47705. begin
  47706. pTDefRegMap(@Self)^.clr := $00000200;
  47707. end;
  47708. procedure TINT_IFS1.setU2RXIF(thebits : TBits_1); inline;
  47709. begin
  47710. if thebits = 0 then
  47711. pTDefRegMap(@Self)^.clr := $00000200
  47712. else
  47713. pTDefRegMap(@Self)^.&set := $00000200;
  47714. end;
  47715. function TINT_IFS1.getU2RXIF : TBits_1; inline;
  47716. begin
  47717. getU2RXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47718. end;
  47719. procedure TINT_IFS1.setU2TXIF; inline;
  47720. begin
  47721. pTDefRegMap(@Self)^.&set := $00000400;
  47722. end;
  47723. procedure TINT_IFS1.clearU2TXIF; inline;
  47724. begin
  47725. pTDefRegMap(@Self)^.clr := $00000400;
  47726. end;
  47727. procedure TINT_IFS1.setU2TXIF(thebits : TBits_1); inline;
  47728. begin
  47729. if thebits = 0 then
  47730. pTDefRegMap(@Self)^.clr := $00000400
  47731. else
  47732. pTDefRegMap(@Self)^.&set := $00000400;
  47733. end;
  47734. function TINT_IFS1.getU2TXIF : TBits_1; inline;
  47735. begin
  47736. getU2TXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  47737. end;
  47738. procedure TINT_IFS1.setFSCMIF; inline;
  47739. begin
  47740. pTDefRegMap(@Self)^.&set := $00004000;
  47741. end;
  47742. procedure TINT_IFS1.clearFSCMIF; inline;
  47743. begin
  47744. pTDefRegMap(@Self)^.clr := $00004000;
  47745. end;
  47746. procedure TINT_IFS1.setFSCMIF(thebits : TBits_1); inline;
  47747. begin
  47748. if thebits = 0 then
  47749. pTDefRegMap(@Self)^.clr := $00004000
  47750. else
  47751. pTDefRegMap(@Self)^.&set := $00004000;
  47752. end;
  47753. function TINT_IFS1.getFSCMIF : TBits_1; inline;
  47754. begin
  47755. getFSCMIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  47756. end;
  47757. procedure TINT_IFS1.setRTCCIF; inline;
  47758. begin
  47759. pTDefRegMap(@Self)^.&set := $00008000;
  47760. end;
  47761. procedure TINT_IFS1.clearRTCCIF; inline;
  47762. begin
  47763. pTDefRegMap(@Self)^.clr := $00008000;
  47764. end;
  47765. procedure TINT_IFS1.setRTCCIF(thebits : TBits_1); inline;
  47766. begin
  47767. if thebits = 0 then
  47768. pTDefRegMap(@Self)^.clr := $00008000
  47769. else
  47770. pTDefRegMap(@Self)^.&set := $00008000;
  47771. end;
  47772. function TINT_IFS1.getRTCCIF : TBits_1; inline;
  47773. begin
  47774. getRTCCIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47775. end;
  47776. procedure TINT_IFS1.setDMA0IF; inline;
  47777. begin
  47778. pTDefRegMap(@Self)^.&set := $00010000;
  47779. end;
  47780. procedure TINT_IFS1.clearDMA0IF; inline;
  47781. begin
  47782. pTDefRegMap(@Self)^.clr := $00010000;
  47783. end;
  47784. procedure TINT_IFS1.setDMA0IF(thebits : TBits_1); inline;
  47785. begin
  47786. if thebits = 0 then
  47787. pTDefRegMap(@Self)^.clr := $00010000
  47788. else
  47789. pTDefRegMap(@Self)^.&set := $00010000;
  47790. end;
  47791. function TINT_IFS1.getDMA0IF : TBits_1; inline;
  47792. begin
  47793. getDMA0IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  47794. end;
  47795. procedure TINT_IFS1.setDMA1IF; inline;
  47796. begin
  47797. pTDefRegMap(@Self)^.&set := $00020000;
  47798. end;
  47799. procedure TINT_IFS1.clearDMA1IF; inline;
  47800. begin
  47801. pTDefRegMap(@Self)^.clr := $00020000;
  47802. end;
  47803. procedure TINT_IFS1.setDMA1IF(thebits : TBits_1); inline;
  47804. begin
  47805. if thebits = 0 then
  47806. pTDefRegMap(@Self)^.clr := $00020000
  47807. else
  47808. pTDefRegMap(@Self)^.&set := $00020000;
  47809. end;
  47810. function TINT_IFS1.getDMA1IF : TBits_1; inline;
  47811. begin
  47812. getDMA1IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  47813. end;
  47814. procedure TINT_IFS1.setDMA2IF; inline;
  47815. begin
  47816. pTDefRegMap(@Self)^.&set := $00040000;
  47817. end;
  47818. procedure TINT_IFS1.clearDMA2IF; inline;
  47819. begin
  47820. pTDefRegMap(@Self)^.clr := $00040000;
  47821. end;
  47822. procedure TINT_IFS1.setDMA2IF(thebits : TBits_1); inline;
  47823. begin
  47824. if thebits = 0 then
  47825. pTDefRegMap(@Self)^.clr := $00040000
  47826. else
  47827. pTDefRegMap(@Self)^.&set := $00040000;
  47828. end;
  47829. function TINT_IFS1.getDMA2IF : TBits_1; inline;
  47830. begin
  47831. getDMA2IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  47832. end;
  47833. procedure TINT_IFS1.setDMA3IF; inline;
  47834. begin
  47835. pTDefRegMap(@Self)^.&set := $00080000;
  47836. end;
  47837. procedure TINT_IFS1.clearDMA3IF; inline;
  47838. begin
  47839. pTDefRegMap(@Self)^.clr := $00080000;
  47840. end;
  47841. procedure TINT_IFS1.setDMA3IF(thebits : TBits_1); inline;
  47842. begin
  47843. if thebits = 0 then
  47844. pTDefRegMap(@Self)^.clr := $00080000
  47845. else
  47846. pTDefRegMap(@Self)^.&set := $00080000;
  47847. end;
  47848. function TINT_IFS1.getDMA3IF : TBits_1; inline;
  47849. begin
  47850. getDMA3IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  47851. end;
  47852. procedure TINT_IFS1.setFCEIF; inline;
  47853. begin
  47854. pTDefRegMap(@Self)^.&set := $01000000;
  47855. end;
  47856. procedure TINT_IFS1.clearFCEIF; inline;
  47857. begin
  47858. pTDefRegMap(@Self)^.clr := $01000000;
  47859. end;
  47860. procedure TINT_IFS1.setFCEIF(thebits : TBits_1); inline;
  47861. begin
  47862. if thebits = 0 then
  47863. pTDefRegMap(@Self)^.clr := $01000000
  47864. else
  47865. pTDefRegMap(@Self)^.&set := $01000000;
  47866. end;
  47867. function TINT_IFS1.getFCEIF : TBits_1; inline;
  47868. begin
  47869. getFCEIF := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  47870. end;
  47871. procedure TINT_IFS1.setUSBIF; inline;
  47872. begin
  47873. pTDefRegMap(@Self)^.&set := $02000000;
  47874. end;
  47875. procedure TINT_IFS1.clearUSBIF; inline;
  47876. begin
  47877. pTDefRegMap(@Self)^.clr := $02000000;
  47878. end;
  47879. procedure TINT_IFS1.setUSBIF(thebits : TBits_1); inline;
  47880. begin
  47881. if thebits = 0 then
  47882. pTDefRegMap(@Self)^.clr := $02000000
  47883. else
  47884. pTDefRegMap(@Self)^.&set := $02000000;
  47885. end;
  47886. function TINT_IFS1.getUSBIF : TBits_1; inline;
  47887. begin
  47888. getUSBIF := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  47889. end;
  47890. procedure TINT_IFS1.setCAN1IF; inline;
  47891. begin
  47892. pTDefRegMap(@Self)^.&set := $04000000;
  47893. end;
  47894. procedure TINT_IFS1.clearCAN1IF; inline;
  47895. begin
  47896. pTDefRegMap(@Self)^.clr := $04000000;
  47897. end;
  47898. procedure TINT_IFS1.setCAN1IF(thebits : TBits_1); inline;
  47899. begin
  47900. if thebits = 0 then
  47901. pTDefRegMap(@Self)^.clr := $04000000
  47902. else
  47903. pTDefRegMap(@Self)^.&set := $04000000;
  47904. end;
  47905. function TINT_IFS1.getCAN1IF : TBits_1; inline;
  47906. begin
  47907. getCAN1IF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  47908. end;
  47909. procedure TINT_IFS1.setETHIF; inline;
  47910. begin
  47911. pTDefRegMap(@Self)^.&set := $10000000;
  47912. end;
  47913. procedure TINT_IFS1.clearETHIF; inline;
  47914. begin
  47915. pTDefRegMap(@Self)^.clr := $10000000;
  47916. end;
  47917. procedure TINT_IFS1.setETHIF(thebits : TBits_1); inline;
  47918. begin
  47919. if thebits = 0 then
  47920. pTDefRegMap(@Self)^.clr := $10000000
  47921. else
  47922. pTDefRegMap(@Self)^.&set := $10000000;
  47923. end;
  47924. function TINT_IFS1.getETHIF : TBits_1; inline;
  47925. begin
  47926. getETHIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  47927. end;
  47928. procedure TINT_IFS1.setIC1EIF; inline;
  47929. begin
  47930. pTDefRegMap(@Self)^.&set := $20000000;
  47931. end;
  47932. procedure TINT_IFS1.clearIC1EIF; inline;
  47933. begin
  47934. pTDefRegMap(@Self)^.clr := $20000000;
  47935. end;
  47936. procedure TINT_IFS1.setIC1EIF(thebits : TBits_1); inline;
  47937. begin
  47938. if thebits = 0 then
  47939. pTDefRegMap(@Self)^.clr := $20000000
  47940. else
  47941. pTDefRegMap(@Self)^.&set := $20000000;
  47942. end;
  47943. function TINT_IFS1.getIC1EIF : TBits_1; inline;
  47944. begin
  47945. getIC1EIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  47946. end;
  47947. procedure TINT_IFS1.setIC2EIF; inline;
  47948. begin
  47949. pTDefRegMap(@Self)^.&set := $40000000;
  47950. end;
  47951. procedure TINT_IFS1.clearIC2EIF; inline;
  47952. begin
  47953. pTDefRegMap(@Self)^.clr := $40000000;
  47954. end;
  47955. procedure TINT_IFS1.setIC2EIF(thebits : TBits_1); inline;
  47956. begin
  47957. if thebits = 0 then
  47958. pTDefRegMap(@Self)^.clr := $40000000
  47959. else
  47960. pTDefRegMap(@Self)^.&set := $40000000;
  47961. end;
  47962. function TINT_IFS1.getIC2EIF : TBits_1; inline;
  47963. begin
  47964. getIC2EIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  47965. end;
  47966. procedure TINT_IFS1.setIC3EIF; inline;
  47967. begin
  47968. pTDefRegMap(@Self)^.&set := $80000000;
  47969. end;
  47970. procedure TINT_IFS1.clearIC3EIF; inline;
  47971. begin
  47972. pTDefRegMap(@Self)^.clr := $80000000;
  47973. end;
  47974. procedure TINT_IFS1.setIC3EIF(thebits : TBits_1); inline;
  47975. begin
  47976. if thebits = 0 then
  47977. pTDefRegMap(@Self)^.clr := $80000000
  47978. else
  47979. pTDefRegMap(@Self)^.&set := $80000000;
  47980. end;
  47981. function TINT_IFS1.getIC3EIF : TBits_1; inline;
  47982. begin
  47983. getIC3EIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  47984. end;
  47985. procedure TINT_IFS1.setU2AEIF; inline;
  47986. begin
  47987. pTDefRegMap(@Self)^.&set := $00000020;
  47988. end;
  47989. procedure TINT_IFS1.clearU2AEIF; inline;
  47990. begin
  47991. pTDefRegMap(@Self)^.clr := $00000020;
  47992. end;
  47993. procedure TINT_IFS1.setU2AEIF(thebits : TBits_1); inline;
  47994. begin
  47995. if thebits = 0 then
  47996. pTDefRegMap(@Self)^.clr := $00000020
  47997. else
  47998. pTDefRegMap(@Self)^.&set := $00000020;
  47999. end;
  48000. function TINT_IFS1.getU2AEIF : TBits_1; inline;
  48001. begin
  48002. getU2AEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48003. end;
  48004. procedure TINT_IFS1.setU2ARXIF; inline;
  48005. begin
  48006. pTDefRegMap(@Self)^.&set := $00000040;
  48007. end;
  48008. procedure TINT_IFS1.clearU2ARXIF; inline;
  48009. begin
  48010. pTDefRegMap(@Self)^.clr := $00000040;
  48011. end;
  48012. procedure TINT_IFS1.setU2ARXIF(thebits : TBits_1); inline;
  48013. begin
  48014. if thebits = 0 then
  48015. pTDefRegMap(@Self)^.clr := $00000040
  48016. else
  48017. pTDefRegMap(@Self)^.&set := $00000040;
  48018. end;
  48019. function TINT_IFS1.getU2ARXIF : TBits_1; inline;
  48020. begin
  48021. getU2ARXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48022. end;
  48023. procedure TINT_IFS1.setU2ATXIF; inline;
  48024. begin
  48025. pTDefRegMap(@Self)^.&set := $00000080;
  48026. end;
  48027. procedure TINT_IFS1.clearU2ATXIF; inline;
  48028. begin
  48029. pTDefRegMap(@Self)^.clr := $00000080;
  48030. end;
  48031. procedure TINT_IFS1.setU2ATXIF(thebits : TBits_1); inline;
  48032. begin
  48033. if thebits = 0 then
  48034. pTDefRegMap(@Self)^.clr := $00000080
  48035. else
  48036. pTDefRegMap(@Self)^.&set := $00000080;
  48037. end;
  48038. function TINT_IFS1.getU2ATXIF : TBits_1; inline;
  48039. begin
  48040. getU2ATXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48041. end;
  48042. procedure TINT_IFS1.setU3AEIF; inline;
  48043. begin
  48044. pTDefRegMap(@Self)^.&set := $00000100;
  48045. end;
  48046. procedure TINT_IFS1.clearU3AEIF; inline;
  48047. begin
  48048. pTDefRegMap(@Self)^.clr := $00000100;
  48049. end;
  48050. procedure TINT_IFS1.setU3AEIF(thebits : TBits_1); inline;
  48051. begin
  48052. if thebits = 0 then
  48053. pTDefRegMap(@Self)^.clr := $00000100
  48054. else
  48055. pTDefRegMap(@Self)^.&set := $00000100;
  48056. end;
  48057. function TINT_IFS1.getU3AEIF : TBits_1; inline;
  48058. begin
  48059. getU3AEIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48060. end;
  48061. procedure TINT_IFS1.setU3ARXIF; inline;
  48062. begin
  48063. pTDefRegMap(@Self)^.&set := $00000200;
  48064. end;
  48065. procedure TINT_IFS1.clearU3ARXIF; inline;
  48066. begin
  48067. pTDefRegMap(@Self)^.clr := $00000200;
  48068. end;
  48069. procedure TINT_IFS1.setU3ARXIF(thebits : TBits_1); inline;
  48070. begin
  48071. if thebits = 0 then
  48072. pTDefRegMap(@Self)^.clr := $00000200
  48073. else
  48074. pTDefRegMap(@Self)^.&set := $00000200;
  48075. end;
  48076. function TINT_IFS1.getU3ARXIF : TBits_1; inline;
  48077. begin
  48078. getU3ARXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48079. end;
  48080. procedure TINT_IFS1.setU3ATXIF; inline;
  48081. begin
  48082. pTDefRegMap(@Self)^.&set := $00000400;
  48083. end;
  48084. procedure TINT_IFS1.clearU3ATXIF; inline;
  48085. begin
  48086. pTDefRegMap(@Self)^.clr := $00000400;
  48087. end;
  48088. procedure TINT_IFS1.setU3ATXIF(thebits : TBits_1); inline;
  48089. begin
  48090. if thebits = 0 then
  48091. pTDefRegMap(@Self)^.clr := $00000400
  48092. else
  48093. pTDefRegMap(@Self)^.&set := $00000400;
  48094. end;
  48095. function TINT_IFS1.getU3ATXIF : TBits_1; inline;
  48096. begin
  48097. getU3ATXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48098. end;
  48099. procedure TINT_IFS1.setSPI2EIF; inline;
  48100. begin
  48101. pTDefRegMap(@Self)^.&set := $00000020;
  48102. end;
  48103. procedure TINT_IFS1.clearSPI2EIF; inline;
  48104. begin
  48105. pTDefRegMap(@Self)^.clr := $00000020;
  48106. end;
  48107. procedure TINT_IFS1.setSPI2EIF(thebits : TBits_1); inline;
  48108. begin
  48109. if thebits = 0 then
  48110. pTDefRegMap(@Self)^.clr := $00000020
  48111. else
  48112. pTDefRegMap(@Self)^.&set := $00000020;
  48113. end;
  48114. function TINT_IFS1.getSPI2EIF : TBits_1; inline;
  48115. begin
  48116. getSPI2EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48117. end;
  48118. procedure TINT_IFS1.setSPI2RXIF; inline;
  48119. begin
  48120. pTDefRegMap(@Self)^.&set := $00000040;
  48121. end;
  48122. procedure TINT_IFS1.clearSPI2RXIF; inline;
  48123. begin
  48124. pTDefRegMap(@Self)^.clr := $00000040;
  48125. end;
  48126. procedure TINT_IFS1.setSPI2RXIF(thebits : TBits_1); inline;
  48127. begin
  48128. if thebits = 0 then
  48129. pTDefRegMap(@Self)^.clr := $00000040
  48130. else
  48131. pTDefRegMap(@Self)^.&set := $00000040;
  48132. end;
  48133. function TINT_IFS1.getSPI2RXIF : TBits_1; inline;
  48134. begin
  48135. getSPI2RXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48136. end;
  48137. procedure TINT_IFS1.setSPI2TXIF; inline;
  48138. begin
  48139. pTDefRegMap(@Self)^.&set := $00000080;
  48140. end;
  48141. procedure TINT_IFS1.clearSPI2TXIF; inline;
  48142. begin
  48143. pTDefRegMap(@Self)^.clr := $00000080;
  48144. end;
  48145. procedure TINT_IFS1.setSPI2TXIF(thebits : TBits_1); inline;
  48146. begin
  48147. if thebits = 0 then
  48148. pTDefRegMap(@Self)^.clr := $00000080
  48149. else
  48150. pTDefRegMap(@Self)^.&set := $00000080;
  48151. end;
  48152. function TINT_IFS1.getSPI2TXIF : TBits_1; inline;
  48153. begin
  48154. getSPI2TXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48155. end;
  48156. procedure TINT_IFS1.setSPI4EIF; inline;
  48157. begin
  48158. pTDefRegMap(@Self)^.&set := $00000100;
  48159. end;
  48160. procedure TINT_IFS1.clearSPI4EIF; inline;
  48161. begin
  48162. pTDefRegMap(@Self)^.clr := $00000100;
  48163. end;
  48164. procedure TINT_IFS1.setSPI4EIF(thebits : TBits_1); inline;
  48165. begin
  48166. if thebits = 0 then
  48167. pTDefRegMap(@Self)^.clr := $00000100
  48168. else
  48169. pTDefRegMap(@Self)^.&set := $00000100;
  48170. end;
  48171. function TINT_IFS1.getSPI4EIF : TBits_1; inline;
  48172. begin
  48173. getSPI4EIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48174. end;
  48175. procedure TINT_IFS1.setSPI4RXIF; inline;
  48176. begin
  48177. pTDefRegMap(@Self)^.&set := $00000200;
  48178. end;
  48179. procedure TINT_IFS1.clearSPI4RXIF; inline;
  48180. begin
  48181. pTDefRegMap(@Self)^.clr := $00000200;
  48182. end;
  48183. procedure TINT_IFS1.setSPI4RXIF(thebits : TBits_1); inline;
  48184. begin
  48185. if thebits = 0 then
  48186. pTDefRegMap(@Self)^.clr := $00000200
  48187. else
  48188. pTDefRegMap(@Self)^.&set := $00000200;
  48189. end;
  48190. function TINT_IFS1.getSPI4RXIF : TBits_1; inline;
  48191. begin
  48192. getSPI4RXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48193. end;
  48194. procedure TINT_IFS1.setSPI4TXIF; inline;
  48195. begin
  48196. pTDefRegMap(@Self)^.&set := $00000400;
  48197. end;
  48198. procedure TINT_IFS1.clearSPI4TXIF; inline;
  48199. begin
  48200. pTDefRegMap(@Self)^.clr := $00000400;
  48201. end;
  48202. procedure TINT_IFS1.setSPI4TXIF(thebits : TBits_1); inline;
  48203. begin
  48204. if thebits = 0 then
  48205. pTDefRegMap(@Self)^.clr := $00000400
  48206. else
  48207. pTDefRegMap(@Self)^.&set := $00000400;
  48208. end;
  48209. function TINT_IFS1.getSPI4TXIF : TBits_1; inline;
  48210. begin
  48211. getSPI4TXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48212. end;
  48213. procedure TINT_IFS1.setSPI2AEIF; inline;
  48214. begin
  48215. pTDefRegMap(@Self)^.&set := $00000020;
  48216. end;
  48217. procedure TINT_IFS1.clearSPI2AEIF; inline;
  48218. begin
  48219. pTDefRegMap(@Self)^.clr := $00000020;
  48220. end;
  48221. procedure TINT_IFS1.setSPI2AEIF(thebits : TBits_1); inline;
  48222. begin
  48223. if thebits = 0 then
  48224. pTDefRegMap(@Self)^.clr := $00000020
  48225. else
  48226. pTDefRegMap(@Self)^.&set := $00000020;
  48227. end;
  48228. function TINT_IFS1.getSPI2AEIF : TBits_1; inline;
  48229. begin
  48230. getSPI2AEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48231. end;
  48232. procedure TINT_IFS1.setSPI2ARXIF; inline;
  48233. begin
  48234. pTDefRegMap(@Self)^.&set := $00000040;
  48235. end;
  48236. procedure TINT_IFS1.clearSPI2ARXIF; inline;
  48237. begin
  48238. pTDefRegMap(@Self)^.clr := $00000040;
  48239. end;
  48240. procedure TINT_IFS1.setSPI2ARXIF(thebits : TBits_1); inline;
  48241. begin
  48242. if thebits = 0 then
  48243. pTDefRegMap(@Self)^.clr := $00000040
  48244. else
  48245. pTDefRegMap(@Self)^.&set := $00000040;
  48246. end;
  48247. function TINT_IFS1.getSPI2ARXIF : TBits_1; inline;
  48248. begin
  48249. getSPI2ARXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48250. end;
  48251. procedure TINT_IFS1.setSPI2ATXIF; inline;
  48252. begin
  48253. pTDefRegMap(@Self)^.&set := $00000080;
  48254. end;
  48255. procedure TINT_IFS1.clearSPI2ATXIF; inline;
  48256. begin
  48257. pTDefRegMap(@Self)^.clr := $00000080;
  48258. end;
  48259. procedure TINT_IFS1.setSPI2ATXIF(thebits : TBits_1); inline;
  48260. begin
  48261. if thebits = 0 then
  48262. pTDefRegMap(@Self)^.clr := $00000080
  48263. else
  48264. pTDefRegMap(@Self)^.&set := $00000080;
  48265. end;
  48266. function TINT_IFS1.getSPI2ATXIF : TBits_1; inline;
  48267. begin
  48268. getSPI2ATXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48269. end;
  48270. procedure TINT_IFS1.setSPI3AEIF; inline;
  48271. begin
  48272. pTDefRegMap(@Self)^.&set := $00000100;
  48273. end;
  48274. procedure TINT_IFS1.clearSPI3AEIF; inline;
  48275. begin
  48276. pTDefRegMap(@Self)^.clr := $00000100;
  48277. end;
  48278. procedure TINT_IFS1.setSPI3AEIF(thebits : TBits_1); inline;
  48279. begin
  48280. if thebits = 0 then
  48281. pTDefRegMap(@Self)^.clr := $00000100
  48282. else
  48283. pTDefRegMap(@Self)^.&set := $00000100;
  48284. end;
  48285. function TINT_IFS1.getSPI3AEIF : TBits_1; inline;
  48286. begin
  48287. getSPI3AEIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48288. end;
  48289. procedure TINT_IFS1.setSPI3ARXIF; inline;
  48290. begin
  48291. pTDefRegMap(@Self)^.&set := $00000200;
  48292. end;
  48293. procedure TINT_IFS1.clearSPI3ARXIF; inline;
  48294. begin
  48295. pTDefRegMap(@Self)^.clr := $00000200;
  48296. end;
  48297. procedure TINT_IFS1.setSPI3ARXIF(thebits : TBits_1); inline;
  48298. begin
  48299. if thebits = 0 then
  48300. pTDefRegMap(@Self)^.clr := $00000200
  48301. else
  48302. pTDefRegMap(@Self)^.&set := $00000200;
  48303. end;
  48304. function TINT_IFS1.getSPI3ARXIF : TBits_1; inline;
  48305. begin
  48306. getSPI3ARXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48307. end;
  48308. procedure TINT_IFS1.setSPI3ATXIF; inline;
  48309. begin
  48310. pTDefRegMap(@Self)^.&set := $00000400;
  48311. end;
  48312. procedure TINT_IFS1.clearSPI3ATXIF; inline;
  48313. begin
  48314. pTDefRegMap(@Self)^.clr := $00000400;
  48315. end;
  48316. procedure TINT_IFS1.setSPI3ATXIF(thebits : TBits_1); inline;
  48317. begin
  48318. if thebits = 0 then
  48319. pTDefRegMap(@Self)^.clr := $00000400
  48320. else
  48321. pTDefRegMap(@Self)^.&set := $00000400;
  48322. end;
  48323. function TINT_IFS1.getSPI3ATXIF : TBits_1; inline;
  48324. begin
  48325. getSPI3ATXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48326. end;
  48327. procedure TINT_IFS1.setI2C4BIF; inline;
  48328. begin
  48329. pTDefRegMap(@Self)^.&set := $00000020;
  48330. end;
  48331. procedure TINT_IFS1.clearI2C4BIF; inline;
  48332. begin
  48333. pTDefRegMap(@Self)^.clr := $00000020;
  48334. end;
  48335. procedure TINT_IFS1.setI2C4BIF(thebits : TBits_1); inline;
  48336. begin
  48337. if thebits = 0 then
  48338. pTDefRegMap(@Self)^.clr := $00000020
  48339. else
  48340. pTDefRegMap(@Self)^.&set := $00000020;
  48341. end;
  48342. function TINT_IFS1.getI2C4BIF : TBits_1; inline;
  48343. begin
  48344. getI2C4BIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48345. end;
  48346. procedure TINT_IFS1.setI2C4SIF; inline;
  48347. begin
  48348. pTDefRegMap(@Self)^.&set := $00000040;
  48349. end;
  48350. procedure TINT_IFS1.clearI2C4SIF; inline;
  48351. begin
  48352. pTDefRegMap(@Self)^.clr := $00000040;
  48353. end;
  48354. procedure TINT_IFS1.setI2C4SIF(thebits : TBits_1); inline;
  48355. begin
  48356. if thebits = 0 then
  48357. pTDefRegMap(@Self)^.clr := $00000040
  48358. else
  48359. pTDefRegMap(@Self)^.&set := $00000040;
  48360. end;
  48361. function TINT_IFS1.getI2C4SIF : TBits_1; inline;
  48362. begin
  48363. getI2C4SIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48364. end;
  48365. procedure TINT_IFS1.setI2C4MIF; inline;
  48366. begin
  48367. pTDefRegMap(@Self)^.&set := $00000080;
  48368. end;
  48369. procedure TINT_IFS1.clearI2C4MIF; inline;
  48370. begin
  48371. pTDefRegMap(@Self)^.clr := $00000080;
  48372. end;
  48373. procedure TINT_IFS1.setI2C4MIF(thebits : TBits_1); inline;
  48374. begin
  48375. if thebits = 0 then
  48376. pTDefRegMap(@Self)^.clr := $00000080
  48377. else
  48378. pTDefRegMap(@Self)^.&set := $00000080;
  48379. end;
  48380. function TINT_IFS1.getI2C4MIF : TBits_1; inline;
  48381. begin
  48382. getI2C4MIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48383. end;
  48384. procedure TINT_IFS1.setI2C5BIF; inline;
  48385. begin
  48386. pTDefRegMap(@Self)^.&set := $00000100;
  48387. end;
  48388. procedure TINT_IFS1.clearI2C5BIF; inline;
  48389. begin
  48390. pTDefRegMap(@Self)^.clr := $00000100;
  48391. end;
  48392. procedure TINT_IFS1.setI2C5BIF(thebits : TBits_1); inline;
  48393. begin
  48394. if thebits = 0 then
  48395. pTDefRegMap(@Self)^.clr := $00000100
  48396. else
  48397. pTDefRegMap(@Self)^.&set := $00000100;
  48398. end;
  48399. function TINT_IFS1.getI2C5BIF : TBits_1; inline;
  48400. begin
  48401. getI2C5BIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48402. end;
  48403. procedure TINT_IFS1.setI2C5SIF; inline;
  48404. begin
  48405. pTDefRegMap(@Self)^.&set := $00000200;
  48406. end;
  48407. procedure TINT_IFS1.clearI2C5SIF; inline;
  48408. begin
  48409. pTDefRegMap(@Self)^.clr := $00000200;
  48410. end;
  48411. procedure TINT_IFS1.setI2C5SIF(thebits : TBits_1); inline;
  48412. begin
  48413. if thebits = 0 then
  48414. pTDefRegMap(@Self)^.clr := $00000200
  48415. else
  48416. pTDefRegMap(@Self)^.&set := $00000200;
  48417. end;
  48418. function TINT_IFS1.getI2C5SIF : TBits_1; inline;
  48419. begin
  48420. getI2C5SIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48421. end;
  48422. procedure TINT_IFS1.setI2C5MIF; inline;
  48423. begin
  48424. pTDefRegMap(@Self)^.&set := $00000400;
  48425. end;
  48426. procedure TINT_IFS1.clearI2C5MIF; inline;
  48427. begin
  48428. pTDefRegMap(@Self)^.clr := $00000400;
  48429. end;
  48430. procedure TINT_IFS1.setI2C5MIF(thebits : TBits_1); inline;
  48431. begin
  48432. if thebits = 0 then
  48433. pTDefRegMap(@Self)^.clr := $00000400
  48434. else
  48435. pTDefRegMap(@Self)^.&set := $00000400;
  48436. end;
  48437. function TINT_IFS1.getI2C5MIF : TBits_1; inline;
  48438. begin
  48439. getI2C5MIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48440. end;
  48441. procedure TINT_IFS1.setI2C2ABIF; inline;
  48442. begin
  48443. pTDefRegMap(@Self)^.&set := $00000020;
  48444. end;
  48445. procedure TINT_IFS1.clearI2C2ABIF; inline;
  48446. begin
  48447. pTDefRegMap(@Self)^.clr := $00000020;
  48448. end;
  48449. procedure TINT_IFS1.setI2C2ABIF(thebits : TBits_1); inline;
  48450. begin
  48451. if thebits = 0 then
  48452. pTDefRegMap(@Self)^.clr := $00000020
  48453. else
  48454. pTDefRegMap(@Self)^.&set := $00000020;
  48455. end;
  48456. function TINT_IFS1.getI2C2ABIF : TBits_1; inline;
  48457. begin
  48458. getI2C2ABIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48459. end;
  48460. procedure TINT_IFS1.setI2C2ASIF; inline;
  48461. begin
  48462. pTDefRegMap(@Self)^.&set := $00000040;
  48463. end;
  48464. procedure TINT_IFS1.clearI2C2ASIF; inline;
  48465. begin
  48466. pTDefRegMap(@Self)^.clr := $00000040;
  48467. end;
  48468. procedure TINT_IFS1.setI2C2ASIF(thebits : TBits_1); inline;
  48469. begin
  48470. if thebits = 0 then
  48471. pTDefRegMap(@Self)^.clr := $00000040
  48472. else
  48473. pTDefRegMap(@Self)^.&set := $00000040;
  48474. end;
  48475. function TINT_IFS1.getI2C2ASIF : TBits_1; inline;
  48476. begin
  48477. getI2C2ASIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48478. end;
  48479. procedure TINT_IFS1.setI2C2AMIF; inline;
  48480. begin
  48481. pTDefRegMap(@Self)^.&set := $00000080;
  48482. end;
  48483. procedure TINT_IFS1.clearI2C2AMIF; inline;
  48484. begin
  48485. pTDefRegMap(@Self)^.clr := $00000080;
  48486. end;
  48487. procedure TINT_IFS1.setI2C2AMIF(thebits : TBits_1); inline;
  48488. begin
  48489. if thebits = 0 then
  48490. pTDefRegMap(@Self)^.clr := $00000080
  48491. else
  48492. pTDefRegMap(@Self)^.&set := $00000080;
  48493. end;
  48494. function TINT_IFS1.getI2C2AMIF : TBits_1; inline;
  48495. begin
  48496. getI2C2AMIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48497. end;
  48498. procedure TINT_IFS1.setI2C3ABIF; inline;
  48499. begin
  48500. pTDefRegMap(@Self)^.&set := $00000100;
  48501. end;
  48502. procedure TINT_IFS1.clearI2C3ABIF; inline;
  48503. begin
  48504. pTDefRegMap(@Self)^.clr := $00000100;
  48505. end;
  48506. procedure TINT_IFS1.setI2C3ABIF(thebits : TBits_1); inline;
  48507. begin
  48508. if thebits = 0 then
  48509. pTDefRegMap(@Self)^.clr := $00000100
  48510. else
  48511. pTDefRegMap(@Self)^.&set := $00000100;
  48512. end;
  48513. function TINT_IFS1.getI2C3ABIF : TBits_1; inline;
  48514. begin
  48515. getI2C3ABIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48516. end;
  48517. procedure TINT_IFS1.setI2C3ASIF; inline;
  48518. begin
  48519. pTDefRegMap(@Self)^.&set := $00000200;
  48520. end;
  48521. procedure TINT_IFS1.clearI2C3ASIF; inline;
  48522. begin
  48523. pTDefRegMap(@Self)^.clr := $00000200;
  48524. end;
  48525. procedure TINT_IFS1.setI2C3ASIF(thebits : TBits_1); inline;
  48526. begin
  48527. if thebits = 0 then
  48528. pTDefRegMap(@Self)^.clr := $00000200
  48529. else
  48530. pTDefRegMap(@Self)^.&set := $00000200;
  48531. end;
  48532. function TINT_IFS1.getI2C3ASIF : TBits_1; inline;
  48533. begin
  48534. getI2C3ASIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48535. end;
  48536. procedure TINT_IFS1.setI2C3AMIF; inline;
  48537. begin
  48538. pTDefRegMap(@Self)^.&set := $00000400;
  48539. end;
  48540. procedure TINT_IFS1.clearI2C3AMIF; inline;
  48541. begin
  48542. pTDefRegMap(@Self)^.clr := $00000400;
  48543. end;
  48544. procedure TINT_IFS1.setI2C3AMIF(thebits : TBits_1); inline;
  48545. begin
  48546. if thebits = 0 then
  48547. pTDefRegMap(@Self)^.clr := $00000400
  48548. else
  48549. pTDefRegMap(@Self)^.&set := $00000400;
  48550. end;
  48551. function TINT_IFS1.getI2C3AMIF : TBits_1; inline;
  48552. begin
  48553. getI2C3AMIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48554. end;
  48555. procedure TINT_IFS1.setw(thebits : TBits_32); inline;
  48556. begin
  48557. pTDefRegMap(@Self)^.val := thebits;
  48558. end;
  48559. function TINT_IFS1.getw : TBits_32; inline;
  48560. begin
  48561. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  48562. end;
  48563. procedure TINT_IFS2.setIC4EIF; inline;
  48564. begin
  48565. pTDefRegMap(@Self)^.&set := $00000001;
  48566. end;
  48567. procedure TINT_IFS2.clearIC4EIF; inline;
  48568. begin
  48569. pTDefRegMap(@Self)^.clr := $00000001;
  48570. end;
  48571. procedure TINT_IFS2.setIC4EIF(thebits : TBits_1); inline;
  48572. begin
  48573. if thebits = 0 then
  48574. pTDefRegMap(@Self)^.clr := $00000001
  48575. else
  48576. pTDefRegMap(@Self)^.&set := $00000001;
  48577. end;
  48578. function TINT_IFS2.getIC4EIF : TBits_1; inline;
  48579. begin
  48580. getIC4EIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  48581. end;
  48582. procedure TINT_IFS2.setIC5EIF; inline;
  48583. begin
  48584. pTDefRegMap(@Self)^.&set := $00000002;
  48585. end;
  48586. procedure TINT_IFS2.clearIC5EIF; inline;
  48587. begin
  48588. pTDefRegMap(@Self)^.clr := $00000002;
  48589. end;
  48590. procedure TINT_IFS2.setIC5EIF(thebits : TBits_1); inline;
  48591. begin
  48592. if thebits = 0 then
  48593. pTDefRegMap(@Self)^.clr := $00000002
  48594. else
  48595. pTDefRegMap(@Self)^.&set := $00000002;
  48596. end;
  48597. function TINT_IFS2.getIC5EIF : TBits_1; inline;
  48598. begin
  48599. getIC5EIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  48600. end;
  48601. procedure TINT_IFS2.setPMPEIF; inline;
  48602. begin
  48603. pTDefRegMap(@Self)^.&set := $00000004;
  48604. end;
  48605. procedure TINT_IFS2.clearPMPEIF; inline;
  48606. begin
  48607. pTDefRegMap(@Self)^.clr := $00000004;
  48608. end;
  48609. procedure TINT_IFS2.setPMPEIF(thebits : TBits_1); inline;
  48610. begin
  48611. if thebits = 0 then
  48612. pTDefRegMap(@Self)^.clr := $00000004
  48613. else
  48614. pTDefRegMap(@Self)^.&set := $00000004;
  48615. end;
  48616. function TINT_IFS2.getPMPEIF : TBits_1; inline;
  48617. begin
  48618. getPMPEIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  48619. end;
  48620. procedure TINT_IFS2.setU1BEIF; inline;
  48621. begin
  48622. pTDefRegMap(@Self)^.&set := $00000008;
  48623. end;
  48624. procedure TINT_IFS2.clearU1BEIF; inline;
  48625. begin
  48626. pTDefRegMap(@Self)^.clr := $00000008;
  48627. end;
  48628. procedure TINT_IFS2.setU1BEIF(thebits : TBits_1); inline;
  48629. begin
  48630. if thebits = 0 then
  48631. pTDefRegMap(@Self)^.clr := $00000008
  48632. else
  48633. pTDefRegMap(@Self)^.&set := $00000008;
  48634. end;
  48635. function TINT_IFS2.getU1BEIF : TBits_1; inline;
  48636. begin
  48637. getU1BEIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48638. end;
  48639. procedure TINT_IFS2.setU1BRXIF; inline;
  48640. begin
  48641. pTDefRegMap(@Self)^.&set := $00000010;
  48642. end;
  48643. procedure TINT_IFS2.clearU1BRXIF; inline;
  48644. begin
  48645. pTDefRegMap(@Self)^.clr := $00000010;
  48646. end;
  48647. procedure TINT_IFS2.setU1BRXIF(thebits : TBits_1); inline;
  48648. begin
  48649. if thebits = 0 then
  48650. pTDefRegMap(@Self)^.clr := $00000010
  48651. else
  48652. pTDefRegMap(@Self)^.&set := $00000010;
  48653. end;
  48654. function TINT_IFS2.getU1BRXIF : TBits_1; inline;
  48655. begin
  48656. getU1BRXIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48657. end;
  48658. procedure TINT_IFS2.setU1BTXIF; inline;
  48659. begin
  48660. pTDefRegMap(@Self)^.&set := $00000020;
  48661. end;
  48662. procedure TINT_IFS2.clearU1BTXIF; inline;
  48663. begin
  48664. pTDefRegMap(@Self)^.clr := $00000020;
  48665. end;
  48666. procedure TINT_IFS2.setU1BTXIF(thebits : TBits_1); inline;
  48667. begin
  48668. if thebits = 0 then
  48669. pTDefRegMap(@Self)^.clr := $00000020
  48670. else
  48671. pTDefRegMap(@Self)^.&set := $00000020;
  48672. end;
  48673. function TINT_IFS2.getU1BTXIF : TBits_1; inline;
  48674. begin
  48675. getU1BTXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48676. end;
  48677. procedure TINT_IFS2.setU2BEIF; inline;
  48678. begin
  48679. pTDefRegMap(@Self)^.&set := $00000040;
  48680. end;
  48681. procedure TINT_IFS2.clearU2BEIF; inline;
  48682. begin
  48683. pTDefRegMap(@Self)^.clr := $00000040;
  48684. end;
  48685. procedure TINT_IFS2.setU2BEIF(thebits : TBits_1); inline;
  48686. begin
  48687. if thebits = 0 then
  48688. pTDefRegMap(@Self)^.clr := $00000040
  48689. else
  48690. pTDefRegMap(@Self)^.&set := $00000040;
  48691. end;
  48692. function TINT_IFS2.getU2BEIF : TBits_1; inline;
  48693. begin
  48694. getU2BEIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48695. end;
  48696. procedure TINT_IFS2.setU2BRXIF; inline;
  48697. begin
  48698. pTDefRegMap(@Self)^.&set := $00000080;
  48699. end;
  48700. procedure TINT_IFS2.clearU2BRXIF; inline;
  48701. begin
  48702. pTDefRegMap(@Self)^.clr := $00000080;
  48703. end;
  48704. procedure TINT_IFS2.setU2BRXIF(thebits : TBits_1); inline;
  48705. begin
  48706. if thebits = 0 then
  48707. pTDefRegMap(@Self)^.clr := $00000080
  48708. else
  48709. pTDefRegMap(@Self)^.&set := $00000080;
  48710. end;
  48711. function TINT_IFS2.getU2BRXIF : TBits_1; inline;
  48712. begin
  48713. getU2BRXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48714. end;
  48715. procedure TINT_IFS2.setU2BTXIF; inline;
  48716. begin
  48717. pTDefRegMap(@Self)^.&set := $00000100;
  48718. end;
  48719. procedure TINT_IFS2.clearU2BTXIF; inline;
  48720. begin
  48721. pTDefRegMap(@Self)^.clr := $00000100;
  48722. end;
  48723. procedure TINT_IFS2.setU2BTXIF(thebits : TBits_1); inline;
  48724. begin
  48725. if thebits = 0 then
  48726. pTDefRegMap(@Self)^.clr := $00000100
  48727. else
  48728. pTDefRegMap(@Self)^.&set := $00000100;
  48729. end;
  48730. function TINT_IFS2.getU2BTXIF : TBits_1; inline;
  48731. begin
  48732. getU2BTXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48733. end;
  48734. procedure TINT_IFS2.setU3BEIF; inline;
  48735. begin
  48736. pTDefRegMap(@Self)^.&set := $00000200;
  48737. end;
  48738. procedure TINT_IFS2.clearU3BEIF; inline;
  48739. begin
  48740. pTDefRegMap(@Self)^.clr := $00000200;
  48741. end;
  48742. procedure TINT_IFS2.setU3BEIF(thebits : TBits_1); inline;
  48743. begin
  48744. if thebits = 0 then
  48745. pTDefRegMap(@Self)^.clr := $00000200
  48746. else
  48747. pTDefRegMap(@Self)^.&set := $00000200;
  48748. end;
  48749. function TINT_IFS2.getU3BEIF : TBits_1; inline;
  48750. begin
  48751. getU3BEIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48752. end;
  48753. procedure TINT_IFS2.setU3BRXIF; inline;
  48754. begin
  48755. pTDefRegMap(@Self)^.&set := $00000400;
  48756. end;
  48757. procedure TINT_IFS2.clearU3BRXIF; inline;
  48758. begin
  48759. pTDefRegMap(@Self)^.clr := $00000400;
  48760. end;
  48761. procedure TINT_IFS2.setU3BRXIF(thebits : TBits_1); inline;
  48762. begin
  48763. if thebits = 0 then
  48764. pTDefRegMap(@Self)^.clr := $00000400
  48765. else
  48766. pTDefRegMap(@Self)^.&set := $00000400;
  48767. end;
  48768. function TINT_IFS2.getU3BRXIF : TBits_1; inline;
  48769. begin
  48770. getU3BRXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48771. end;
  48772. procedure TINT_IFS2.setU3BTXIF; inline;
  48773. begin
  48774. pTDefRegMap(@Self)^.&set := $00000800;
  48775. end;
  48776. procedure TINT_IFS2.clearU3BTXIF; inline;
  48777. begin
  48778. pTDefRegMap(@Self)^.clr := $00000800;
  48779. end;
  48780. procedure TINT_IFS2.setU3BTXIF(thebits : TBits_1); inline;
  48781. begin
  48782. if thebits = 0 then
  48783. pTDefRegMap(@Self)^.clr := $00000800
  48784. else
  48785. pTDefRegMap(@Self)^.&set := $00000800;
  48786. end;
  48787. function TINT_IFS2.getU3BTXIF : TBits_1; inline;
  48788. begin
  48789. getU3BTXIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  48790. end;
  48791. procedure TINT_IFS2.setU4EIF; inline;
  48792. begin
  48793. pTDefRegMap(@Self)^.&set := $00000008;
  48794. end;
  48795. procedure TINT_IFS2.clearU4EIF; inline;
  48796. begin
  48797. pTDefRegMap(@Self)^.clr := $00000008;
  48798. end;
  48799. procedure TINT_IFS2.setU4EIF(thebits : TBits_1); inline;
  48800. begin
  48801. if thebits = 0 then
  48802. pTDefRegMap(@Self)^.clr := $00000008
  48803. else
  48804. pTDefRegMap(@Self)^.&set := $00000008;
  48805. end;
  48806. function TINT_IFS2.getU4EIF : TBits_1; inline;
  48807. begin
  48808. getU4EIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48809. end;
  48810. procedure TINT_IFS2.setU4RXIF; inline;
  48811. begin
  48812. pTDefRegMap(@Self)^.&set := $00000010;
  48813. end;
  48814. procedure TINT_IFS2.clearU4RXIF; inline;
  48815. begin
  48816. pTDefRegMap(@Self)^.clr := $00000010;
  48817. end;
  48818. procedure TINT_IFS2.setU4RXIF(thebits : TBits_1); inline;
  48819. begin
  48820. if thebits = 0 then
  48821. pTDefRegMap(@Self)^.clr := $00000010
  48822. else
  48823. pTDefRegMap(@Self)^.&set := $00000010;
  48824. end;
  48825. function TINT_IFS2.getU4RXIF : TBits_1; inline;
  48826. begin
  48827. getU4RXIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48828. end;
  48829. procedure TINT_IFS2.setU4TXIF; inline;
  48830. begin
  48831. pTDefRegMap(@Self)^.&set := $00000020;
  48832. end;
  48833. procedure TINT_IFS2.clearU4TXIF; inline;
  48834. begin
  48835. pTDefRegMap(@Self)^.clr := $00000020;
  48836. end;
  48837. procedure TINT_IFS2.setU4TXIF(thebits : TBits_1); inline;
  48838. begin
  48839. if thebits = 0 then
  48840. pTDefRegMap(@Self)^.clr := $00000020
  48841. else
  48842. pTDefRegMap(@Self)^.&set := $00000020;
  48843. end;
  48844. function TINT_IFS2.getU4TXIF : TBits_1; inline;
  48845. begin
  48846. getU4TXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48847. end;
  48848. procedure TINT_IFS2.setU6EIF; inline;
  48849. begin
  48850. pTDefRegMap(@Self)^.&set := $00000040;
  48851. end;
  48852. procedure TINT_IFS2.clearU6EIF; inline;
  48853. begin
  48854. pTDefRegMap(@Self)^.clr := $00000040;
  48855. end;
  48856. procedure TINT_IFS2.setU6EIF(thebits : TBits_1); inline;
  48857. begin
  48858. if thebits = 0 then
  48859. pTDefRegMap(@Self)^.clr := $00000040
  48860. else
  48861. pTDefRegMap(@Self)^.&set := $00000040;
  48862. end;
  48863. function TINT_IFS2.getU6EIF : TBits_1; inline;
  48864. begin
  48865. getU6EIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48866. end;
  48867. procedure TINT_IFS2.setU6RXIF; inline;
  48868. begin
  48869. pTDefRegMap(@Self)^.&set := $00000080;
  48870. end;
  48871. procedure TINT_IFS2.clearU6RXIF; inline;
  48872. begin
  48873. pTDefRegMap(@Self)^.clr := $00000080;
  48874. end;
  48875. procedure TINT_IFS2.setU6RXIF(thebits : TBits_1); inline;
  48876. begin
  48877. if thebits = 0 then
  48878. pTDefRegMap(@Self)^.clr := $00000080
  48879. else
  48880. pTDefRegMap(@Self)^.&set := $00000080;
  48881. end;
  48882. function TINT_IFS2.getU6RXIF : TBits_1; inline;
  48883. begin
  48884. getU6RXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48885. end;
  48886. procedure TINT_IFS2.setU6TXIF; inline;
  48887. begin
  48888. pTDefRegMap(@Self)^.&set := $00000100;
  48889. end;
  48890. procedure TINT_IFS2.clearU6TXIF; inline;
  48891. begin
  48892. pTDefRegMap(@Self)^.clr := $00000100;
  48893. end;
  48894. procedure TINT_IFS2.setU6TXIF(thebits : TBits_1); inline;
  48895. begin
  48896. if thebits = 0 then
  48897. pTDefRegMap(@Self)^.clr := $00000100
  48898. else
  48899. pTDefRegMap(@Self)^.&set := $00000100;
  48900. end;
  48901. function TINT_IFS2.getU6TXIF : TBits_1; inline;
  48902. begin
  48903. getU6TXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48904. end;
  48905. procedure TINT_IFS2.setU5EIF; inline;
  48906. begin
  48907. pTDefRegMap(@Self)^.&set := $00000200;
  48908. end;
  48909. procedure TINT_IFS2.clearU5EIF; inline;
  48910. begin
  48911. pTDefRegMap(@Self)^.clr := $00000200;
  48912. end;
  48913. procedure TINT_IFS2.setU5EIF(thebits : TBits_1); inline;
  48914. begin
  48915. if thebits = 0 then
  48916. pTDefRegMap(@Self)^.clr := $00000200
  48917. else
  48918. pTDefRegMap(@Self)^.&set := $00000200;
  48919. end;
  48920. function TINT_IFS2.getU5EIF : TBits_1; inline;
  48921. begin
  48922. getU5EIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48923. end;
  48924. procedure TINT_IFS2.setU5RXIF; inline;
  48925. begin
  48926. pTDefRegMap(@Self)^.&set := $00000400;
  48927. end;
  48928. procedure TINT_IFS2.clearU5RXIF; inline;
  48929. begin
  48930. pTDefRegMap(@Self)^.clr := $00000400;
  48931. end;
  48932. procedure TINT_IFS2.setU5RXIF(thebits : TBits_1); inline;
  48933. begin
  48934. if thebits = 0 then
  48935. pTDefRegMap(@Self)^.clr := $00000400
  48936. else
  48937. pTDefRegMap(@Self)^.&set := $00000400;
  48938. end;
  48939. function TINT_IFS2.getU5RXIF : TBits_1; inline;
  48940. begin
  48941. getU5RXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48942. end;
  48943. procedure TINT_IFS2.setU5TXIF; inline;
  48944. begin
  48945. pTDefRegMap(@Self)^.&set := $00000800;
  48946. end;
  48947. procedure TINT_IFS2.clearU5TXIF; inline;
  48948. begin
  48949. pTDefRegMap(@Self)^.clr := $00000800;
  48950. end;
  48951. procedure TINT_IFS2.setU5TXIF(thebits : TBits_1); inline;
  48952. begin
  48953. if thebits = 0 then
  48954. pTDefRegMap(@Self)^.clr := $00000800
  48955. else
  48956. pTDefRegMap(@Self)^.&set := $00000800;
  48957. end;
  48958. function TINT_IFS2.getU5TXIF : TBits_1; inline;
  48959. begin
  48960. getU5TXIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  48961. end;
  48962. procedure TINT_IFS2.setw(thebits : TBits_32); inline;
  48963. begin
  48964. pTDefRegMap(@Self)^.val := thebits;
  48965. end;
  48966. function TINT_IFS2.getw : TBits_32; inline;
  48967. begin
  48968. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  48969. end;
  48970. procedure TINT_IEC0.setCTIE; inline;
  48971. begin
  48972. pTDefRegMap(@Self)^.&set := $00000001;
  48973. end;
  48974. procedure TINT_IEC0.clearCTIE; inline;
  48975. begin
  48976. pTDefRegMap(@Self)^.clr := $00000001;
  48977. end;
  48978. procedure TINT_IEC0.setCTIE(thebits : TBits_1); inline;
  48979. begin
  48980. if thebits = 0 then
  48981. pTDefRegMap(@Self)^.clr := $00000001
  48982. else
  48983. pTDefRegMap(@Self)^.&set := $00000001;
  48984. end;
  48985. function TINT_IEC0.getCTIE : TBits_1; inline;
  48986. begin
  48987. getCTIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  48988. end;
  48989. procedure TINT_IEC0.setCS0IE; inline;
  48990. begin
  48991. pTDefRegMap(@Self)^.&set := $00000002;
  48992. end;
  48993. procedure TINT_IEC0.clearCS0IE; inline;
  48994. begin
  48995. pTDefRegMap(@Self)^.clr := $00000002;
  48996. end;
  48997. procedure TINT_IEC0.setCS0IE(thebits : TBits_1); inline;
  48998. begin
  48999. if thebits = 0 then
  49000. pTDefRegMap(@Self)^.clr := $00000002
  49001. else
  49002. pTDefRegMap(@Self)^.&set := $00000002;
  49003. end;
  49004. function TINT_IEC0.getCS0IE : TBits_1; inline;
  49005. begin
  49006. getCS0IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  49007. end;
  49008. procedure TINT_IEC0.setCS1IE; inline;
  49009. begin
  49010. pTDefRegMap(@Self)^.&set := $00000004;
  49011. end;
  49012. procedure TINT_IEC0.clearCS1IE; inline;
  49013. begin
  49014. pTDefRegMap(@Self)^.clr := $00000004;
  49015. end;
  49016. procedure TINT_IEC0.setCS1IE(thebits : TBits_1); inline;
  49017. begin
  49018. if thebits = 0 then
  49019. pTDefRegMap(@Self)^.clr := $00000004
  49020. else
  49021. pTDefRegMap(@Self)^.&set := $00000004;
  49022. end;
  49023. function TINT_IEC0.getCS1IE : TBits_1; inline;
  49024. begin
  49025. getCS1IE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  49026. end;
  49027. procedure TINT_IEC0.setINT0IE; inline;
  49028. begin
  49029. pTDefRegMap(@Self)^.&set := $00000008;
  49030. end;
  49031. procedure TINT_IEC0.clearINT0IE; inline;
  49032. begin
  49033. pTDefRegMap(@Self)^.clr := $00000008;
  49034. end;
  49035. procedure TINT_IEC0.setINT0IE(thebits : TBits_1); inline;
  49036. begin
  49037. if thebits = 0 then
  49038. pTDefRegMap(@Self)^.clr := $00000008
  49039. else
  49040. pTDefRegMap(@Self)^.&set := $00000008;
  49041. end;
  49042. function TINT_IEC0.getINT0IE : TBits_1; inline;
  49043. begin
  49044. getINT0IE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  49045. end;
  49046. procedure TINT_IEC0.setT1IE; inline;
  49047. begin
  49048. pTDefRegMap(@Self)^.&set := $00000010;
  49049. end;
  49050. procedure TINT_IEC0.clearT1IE; inline;
  49051. begin
  49052. pTDefRegMap(@Self)^.clr := $00000010;
  49053. end;
  49054. procedure TINT_IEC0.setT1IE(thebits : TBits_1); inline;
  49055. begin
  49056. if thebits = 0 then
  49057. pTDefRegMap(@Self)^.clr := $00000010
  49058. else
  49059. pTDefRegMap(@Self)^.&set := $00000010;
  49060. end;
  49061. function TINT_IEC0.getT1IE : TBits_1; inline;
  49062. begin
  49063. getT1IE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  49064. end;
  49065. procedure TINT_IEC0.setIC1IE; inline;
  49066. begin
  49067. pTDefRegMap(@Self)^.&set := $00000020;
  49068. end;
  49069. procedure TINT_IEC0.clearIC1IE; inline;
  49070. begin
  49071. pTDefRegMap(@Self)^.clr := $00000020;
  49072. end;
  49073. procedure TINT_IEC0.setIC1IE(thebits : TBits_1); inline;
  49074. begin
  49075. if thebits = 0 then
  49076. pTDefRegMap(@Self)^.clr := $00000020
  49077. else
  49078. pTDefRegMap(@Self)^.&set := $00000020;
  49079. end;
  49080. function TINT_IEC0.getIC1IE : TBits_1; inline;
  49081. begin
  49082. getIC1IE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49083. end;
  49084. procedure TINT_IEC0.setOC1IE; inline;
  49085. begin
  49086. pTDefRegMap(@Self)^.&set := $00000040;
  49087. end;
  49088. procedure TINT_IEC0.clearOC1IE; inline;
  49089. begin
  49090. pTDefRegMap(@Self)^.clr := $00000040;
  49091. end;
  49092. procedure TINT_IEC0.setOC1IE(thebits : TBits_1); inline;
  49093. begin
  49094. if thebits = 0 then
  49095. pTDefRegMap(@Self)^.clr := $00000040
  49096. else
  49097. pTDefRegMap(@Self)^.&set := $00000040;
  49098. end;
  49099. function TINT_IEC0.getOC1IE : TBits_1; inline;
  49100. begin
  49101. getOC1IE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49102. end;
  49103. procedure TINT_IEC0.setINT1IE; inline;
  49104. begin
  49105. pTDefRegMap(@Self)^.&set := $00000080;
  49106. end;
  49107. procedure TINT_IEC0.clearINT1IE; inline;
  49108. begin
  49109. pTDefRegMap(@Self)^.clr := $00000080;
  49110. end;
  49111. procedure TINT_IEC0.setINT1IE(thebits : TBits_1); inline;
  49112. begin
  49113. if thebits = 0 then
  49114. pTDefRegMap(@Self)^.clr := $00000080
  49115. else
  49116. pTDefRegMap(@Self)^.&set := $00000080;
  49117. end;
  49118. function TINT_IEC0.getINT1IE : TBits_1; inline;
  49119. begin
  49120. getINT1IE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49121. end;
  49122. procedure TINT_IEC0.setT2IE; inline;
  49123. begin
  49124. pTDefRegMap(@Self)^.&set := $00000100;
  49125. end;
  49126. procedure TINT_IEC0.clearT2IE; inline;
  49127. begin
  49128. pTDefRegMap(@Self)^.clr := $00000100;
  49129. end;
  49130. procedure TINT_IEC0.setT2IE(thebits : TBits_1); inline;
  49131. begin
  49132. if thebits = 0 then
  49133. pTDefRegMap(@Self)^.clr := $00000100
  49134. else
  49135. pTDefRegMap(@Self)^.&set := $00000100;
  49136. end;
  49137. function TINT_IEC0.getT2IE : TBits_1; inline;
  49138. begin
  49139. getT2IE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49140. end;
  49141. procedure TINT_IEC0.setIC2IE; inline;
  49142. begin
  49143. pTDefRegMap(@Self)^.&set := $00000200;
  49144. end;
  49145. procedure TINT_IEC0.clearIC2IE; inline;
  49146. begin
  49147. pTDefRegMap(@Self)^.clr := $00000200;
  49148. end;
  49149. procedure TINT_IEC0.setIC2IE(thebits : TBits_1); inline;
  49150. begin
  49151. if thebits = 0 then
  49152. pTDefRegMap(@Self)^.clr := $00000200
  49153. else
  49154. pTDefRegMap(@Self)^.&set := $00000200;
  49155. end;
  49156. function TINT_IEC0.getIC2IE : TBits_1; inline;
  49157. begin
  49158. getIC2IE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49159. end;
  49160. procedure TINT_IEC0.setOC2IE; inline;
  49161. begin
  49162. pTDefRegMap(@Self)^.&set := $00000400;
  49163. end;
  49164. procedure TINT_IEC0.clearOC2IE; inline;
  49165. begin
  49166. pTDefRegMap(@Self)^.clr := $00000400;
  49167. end;
  49168. procedure TINT_IEC0.setOC2IE(thebits : TBits_1); inline;
  49169. begin
  49170. if thebits = 0 then
  49171. pTDefRegMap(@Self)^.clr := $00000400
  49172. else
  49173. pTDefRegMap(@Self)^.&set := $00000400;
  49174. end;
  49175. function TINT_IEC0.getOC2IE : TBits_1; inline;
  49176. begin
  49177. getOC2IE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49178. end;
  49179. procedure TINT_IEC0.setINT2IE; inline;
  49180. begin
  49181. pTDefRegMap(@Self)^.&set := $00000800;
  49182. end;
  49183. procedure TINT_IEC0.clearINT2IE; inline;
  49184. begin
  49185. pTDefRegMap(@Self)^.clr := $00000800;
  49186. end;
  49187. procedure TINT_IEC0.setINT2IE(thebits : TBits_1); inline;
  49188. begin
  49189. if thebits = 0 then
  49190. pTDefRegMap(@Self)^.clr := $00000800
  49191. else
  49192. pTDefRegMap(@Self)^.&set := $00000800;
  49193. end;
  49194. function TINT_IEC0.getINT2IE : TBits_1; inline;
  49195. begin
  49196. getINT2IE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  49197. end;
  49198. procedure TINT_IEC0.setT3IE; inline;
  49199. begin
  49200. pTDefRegMap(@Self)^.&set := $00001000;
  49201. end;
  49202. procedure TINT_IEC0.clearT3IE; inline;
  49203. begin
  49204. pTDefRegMap(@Self)^.clr := $00001000;
  49205. end;
  49206. procedure TINT_IEC0.setT3IE(thebits : TBits_1); inline;
  49207. begin
  49208. if thebits = 0 then
  49209. pTDefRegMap(@Self)^.clr := $00001000
  49210. else
  49211. pTDefRegMap(@Self)^.&set := $00001000;
  49212. end;
  49213. function TINT_IEC0.getT3IE : TBits_1; inline;
  49214. begin
  49215. getT3IE := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  49216. end;
  49217. procedure TINT_IEC0.setIC3IE; inline;
  49218. begin
  49219. pTDefRegMap(@Self)^.&set := $00002000;
  49220. end;
  49221. procedure TINT_IEC0.clearIC3IE; inline;
  49222. begin
  49223. pTDefRegMap(@Self)^.clr := $00002000;
  49224. end;
  49225. procedure TINT_IEC0.setIC3IE(thebits : TBits_1); inline;
  49226. begin
  49227. if thebits = 0 then
  49228. pTDefRegMap(@Self)^.clr := $00002000
  49229. else
  49230. pTDefRegMap(@Self)^.&set := $00002000;
  49231. end;
  49232. function TINT_IEC0.getIC3IE : TBits_1; inline;
  49233. begin
  49234. getIC3IE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  49235. end;
  49236. procedure TINT_IEC0.setOC3IE; inline;
  49237. begin
  49238. pTDefRegMap(@Self)^.&set := $00004000;
  49239. end;
  49240. procedure TINT_IEC0.clearOC3IE; inline;
  49241. begin
  49242. pTDefRegMap(@Self)^.clr := $00004000;
  49243. end;
  49244. procedure TINT_IEC0.setOC3IE(thebits : TBits_1); inline;
  49245. begin
  49246. if thebits = 0 then
  49247. pTDefRegMap(@Self)^.clr := $00004000
  49248. else
  49249. pTDefRegMap(@Self)^.&set := $00004000;
  49250. end;
  49251. function TINT_IEC0.getOC3IE : TBits_1; inline;
  49252. begin
  49253. getOC3IE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  49254. end;
  49255. procedure TINT_IEC0.setINT3IE; inline;
  49256. begin
  49257. pTDefRegMap(@Self)^.&set := $00008000;
  49258. end;
  49259. procedure TINT_IEC0.clearINT3IE; inline;
  49260. begin
  49261. pTDefRegMap(@Self)^.clr := $00008000;
  49262. end;
  49263. procedure TINT_IEC0.setINT3IE(thebits : TBits_1); inline;
  49264. begin
  49265. if thebits = 0 then
  49266. pTDefRegMap(@Self)^.clr := $00008000
  49267. else
  49268. pTDefRegMap(@Self)^.&set := $00008000;
  49269. end;
  49270. function TINT_IEC0.getINT3IE : TBits_1; inline;
  49271. begin
  49272. getINT3IE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  49273. end;
  49274. procedure TINT_IEC0.setT4IE; inline;
  49275. begin
  49276. pTDefRegMap(@Self)^.&set := $00010000;
  49277. end;
  49278. procedure TINT_IEC0.clearT4IE; inline;
  49279. begin
  49280. pTDefRegMap(@Self)^.clr := $00010000;
  49281. end;
  49282. procedure TINT_IEC0.setT4IE(thebits : TBits_1); inline;
  49283. begin
  49284. if thebits = 0 then
  49285. pTDefRegMap(@Self)^.clr := $00010000
  49286. else
  49287. pTDefRegMap(@Self)^.&set := $00010000;
  49288. end;
  49289. function TINT_IEC0.getT4IE : TBits_1; inline;
  49290. begin
  49291. getT4IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  49292. end;
  49293. procedure TINT_IEC0.setIC4IE; inline;
  49294. begin
  49295. pTDefRegMap(@Self)^.&set := $00020000;
  49296. end;
  49297. procedure TINT_IEC0.clearIC4IE; inline;
  49298. begin
  49299. pTDefRegMap(@Self)^.clr := $00020000;
  49300. end;
  49301. procedure TINT_IEC0.setIC4IE(thebits : TBits_1); inline;
  49302. begin
  49303. if thebits = 0 then
  49304. pTDefRegMap(@Self)^.clr := $00020000
  49305. else
  49306. pTDefRegMap(@Self)^.&set := $00020000;
  49307. end;
  49308. function TINT_IEC0.getIC4IE : TBits_1; inline;
  49309. begin
  49310. getIC4IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  49311. end;
  49312. procedure TINT_IEC0.setOC4IE; inline;
  49313. begin
  49314. pTDefRegMap(@Self)^.&set := $00040000;
  49315. end;
  49316. procedure TINT_IEC0.clearOC4IE; inline;
  49317. begin
  49318. pTDefRegMap(@Self)^.clr := $00040000;
  49319. end;
  49320. procedure TINT_IEC0.setOC4IE(thebits : TBits_1); inline;
  49321. begin
  49322. if thebits = 0 then
  49323. pTDefRegMap(@Self)^.clr := $00040000
  49324. else
  49325. pTDefRegMap(@Self)^.&set := $00040000;
  49326. end;
  49327. function TINT_IEC0.getOC4IE : TBits_1; inline;
  49328. begin
  49329. getOC4IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  49330. end;
  49331. procedure TINT_IEC0.setINT4IE; inline;
  49332. begin
  49333. pTDefRegMap(@Self)^.&set := $00080000;
  49334. end;
  49335. procedure TINT_IEC0.clearINT4IE; inline;
  49336. begin
  49337. pTDefRegMap(@Self)^.clr := $00080000;
  49338. end;
  49339. procedure TINT_IEC0.setINT4IE(thebits : TBits_1); inline;
  49340. begin
  49341. if thebits = 0 then
  49342. pTDefRegMap(@Self)^.clr := $00080000
  49343. else
  49344. pTDefRegMap(@Self)^.&set := $00080000;
  49345. end;
  49346. function TINT_IEC0.getINT4IE : TBits_1; inline;
  49347. begin
  49348. getINT4IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  49349. end;
  49350. procedure TINT_IEC0.setT5IE; inline;
  49351. begin
  49352. pTDefRegMap(@Self)^.&set := $00100000;
  49353. end;
  49354. procedure TINT_IEC0.clearT5IE; inline;
  49355. begin
  49356. pTDefRegMap(@Self)^.clr := $00100000;
  49357. end;
  49358. procedure TINT_IEC0.setT5IE(thebits : TBits_1); inline;
  49359. begin
  49360. if thebits = 0 then
  49361. pTDefRegMap(@Self)^.clr := $00100000
  49362. else
  49363. pTDefRegMap(@Self)^.&set := $00100000;
  49364. end;
  49365. function TINT_IEC0.getT5IE : TBits_1; inline;
  49366. begin
  49367. getT5IE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  49368. end;
  49369. procedure TINT_IEC0.setIC5IE; inline;
  49370. begin
  49371. pTDefRegMap(@Self)^.&set := $00200000;
  49372. end;
  49373. procedure TINT_IEC0.clearIC5IE; inline;
  49374. begin
  49375. pTDefRegMap(@Self)^.clr := $00200000;
  49376. end;
  49377. procedure TINT_IEC0.setIC5IE(thebits : TBits_1); inline;
  49378. begin
  49379. if thebits = 0 then
  49380. pTDefRegMap(@Self)^.clr := $00200000
  49381. else
  49382. pTDefRegMap(@Self)^.&set := $00200000;
  49383. end;
  49384. function TINT_IEC0.getIC5IE : TBits_1; inline;
  49385. begin
  49386. getIC5IE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  49387. end;
  49388. procedure TINT_IEC0.setOC5IE; inline;
  49389. begin
  49390. pTDefRegMap(@Self)^.&set := $00400000;
  49391. end;
  49392. procedure TINT_IEC0.clearOC5IE; inline;
  49393. begin
  49394. pTDefRegMap(@Self)^.clr := $00400000;
  49395. end;
  49396. procedure TINT_IEC0.setOC5IE(thebits : TBits_1); inline;
  49397. begin
  49398. if thebits = 0 then
  49399. pTDefRegMap(@Self)^.clr := $00400000
  49400. else
  49401. pTDefRegMap(@Self)^.&set := $00400000;
  49402. end;
  49403. function TINT_IEC0.getOC5IE : TBits_1; inline;
  49404. begin
  49405. getOC5IE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  49406. end;
  49407. procedure TINT_IEC0.setU1EIE; inline;
  49408. begin
  49409. pTDefRegMap(@Self)^.&set := $04000000;
  49410. end;
  49411. procedure TINT_IEC0.clearU1EIE; inline;
  49412. begin
  49413. pTDefRegMap(@Self)^.clr := $04000000;
  49414. end;
  49415. procedure TINT_IEC0.setU1EIE(thebits : TBits_1); inline;
  49416. begin
  49417. if thebits = 0 then
  49418. pTDefRegMap(@Self)^.clr := $04000000
  49419. else
  49420. pTDefRegMap(@Self)^.&set := $04000000;
  49421. end;
  49422. function TINT_IEC0.getU1EIE : TBits_1; inline;
  49423. begin
  49424. getU1EIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  49425. end;
  49426. procedure TINT_IEC0.setU1RXIE; inline;
  49427. begin
  49428. pTDefRegMap(@Self)^.&set := $08000000;
  49429. end;
  49430. procedure TINT_IEC0.clearU1RXIE; inline;
  49431. begin
  49432. pTDefRegMap(@Self)^.clr := $08000000;
  49433. end;
  49434. procedure TINT_IEC0.setU1RXIE(thebits : TBits_1); inline;
  49435. begin
  49436. if thebits = 0 then
  49437. pTDefRegMap(@Self)^.clr := $08000000
  49438. else
  49439. pTDefRegMap(@Self)^.&set := $08000000;
  49440. end;
  49441. function TINT_IEC0.getU1RXIE : TBits_1; inline;
  49442. begin
  49443. getU1RXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  49444. end;
  49445. procedure TINT_IEC0.setU1TXIE; inline;
  49446. begin
  49447. pTDefRegMap(@Self)^.&set := $10000000;
  49448. end;
  49449. procedure TINT_IEC0.clearU1TXIE; inline;
  49450. begin
  49451. pTDefRegMap(@Self)^.clr := $10000000;
  49452. end;
  49453. procedure TINT_IEC0.setU1TXIE(thebits : TBits_1); inline;
  49454. begin
  49455. if thebits = 0 then
  49456. pTDefRegMap(@Self)^.clr := $10000000
  49457. else
  49458. pTDefRegMap(@Self)^.&set := $10000000;
  49459. end;
  49460. function TINT_IEC0.getU1TXIE : TBits_1; inline;
  49461. begin
  49462. getU1TXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  49463. end;
  49464. procedure TINT_IEC0.setI2C1BIE; inline;
  49465. begin
  49466. pTDefRegMap(@Self)^.&set := $20000000;
  49467. end;
  49468. procedure TINT_IEC0.clearI2C1BIE; inline;
  49469. begin
  49470. pTDefRegMap(@Self)^.clr := $20000000;
  49471. end;
  49472. procedure TINT_IEC0.setI2C1BIE(thebits : TBits_1); inline;
  49473. begin
  49474. if thebits = 0 then
  49475. pTDefRegMap(@Self)^.clr := $20000000
  49476. else
  49477. pTDefRegMap(@Self)^.&set := $20000000;
  49478. end;
  49479. function TINT_IEC0.getI2C1BIE : TBits_1; inline;
  49480. begin
  49481. getI2C1BIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  49482. end;
  49483. procedure TINT_IEC0.setI2C1SIE; inline;
  49484. begin
  49485. pTDefRegMap(@Self)^.&set := $40000000;
  49486. end;
  49487. procedure TINT_IEC0.clearI2C1SIE; inline;
  49488. begin
  49489. pTDefRegMap(@Self)^.clr := $40000000;
  49490. end;
  49491. procedure TINT_IEC0.setI2C1SIE(thebits : TBits_1); inline;
  49492. begin
  49493. if thebits = 0 then
  49494. pTDefRegMap(@Self)^.clr := $40000000
  49495. else
  49496. pTDefRegMap(@Self)^.&set := $40000000;
  49497. end;
  49498. function TINT_IEC0.getI2C1SIE : TBits_1; inline;
  49499. begin
  49500. getI2C1SIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  49501. end;
  49502. procedure TINT_IEC0.setI2C1MIE; inline;
  49503. begin
  49504. pTDefRegMap(@Self)^.&set := $80000000;
  49505. end;
  49506. procedure TINT_IEC0.clearI2C1MIE; inline;
  49507. begin
  49508. pTDefRegMap(@Self)^.clr := $80000000;
  49509. end;
  49510. procedure TINT_IEC0.setI2C1MIE(thebits : TBits_1); inline;
  49511. begin
  49512. if thebits = 0 then
  49513. pTDefRegMap(@Self)^.clr := $80000000
  49514. else
  49515. pTDefRegMap(@Self)^.&set := $80000000;
  49516. end;
  49517. function TINT_IEC0.getI2C1MIE : TBits_1; inline;
  49518. begin
  49519. getI2C1MIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  49520. end;
  49521. procedure TINT_IEC0.setU1AEIE; inline;
  49522. begin
  49523. pTDefRegMap(@Self)^.&set := $04000000;
  49524. end;
  49525. procedure TINT_IEC0.clearU1AEIE; inline;
  49526. begin
  49527. pTDefRegMap(@Self)^.clr := $04000000;
  49528. end;
  49529. procedure TINT_IEC0.setU1AEIE(thebits : TBits_1); inline;
  49530. begin
  49531. if thebits = 0 then
  49532. pTDefRegMap(@Self)^.clr := $04000000
  49533. else
  49534. pTDefRegMap(@Self)^.&set := $04000000;
  49535. end;
  49536. function TINT_IEC0.getU1AEIE : TBits_1; inline;
  49537. begin
  49538. getU1AEIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  49539. end;
  49540. procedure TINT_IEC0.setU1ARXIE; inline;
  49541. begin
  49542. pTDefRegMap(@Self)^.&set := $08000000;
  49543. end;
  49544. procedure TINT_IEC0.clearU1ARXIE; inline;
  49545. begin
  49546. pTDefRegMap(@Self)^.clr := $08000000;
  49547. end;
  49548. procedure TINT_IEC0.setU1ARXIE(thebits : TBits_1); inline;
  49549. begin
  49550. if thebits = 0 then
  49551. pTDefRegMap(@Self)^.clr := $08000000
  49552. else
  49553. pTDefRegMap(@Self)^.&set := $08000000;
  49554. end;
  49555. function TINT_IEC0.getU1ARXIE : TBits_1; inline;
  49556. begin
  49557. getU1ARXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  49558. end;
  49559. procedure TINT_IEC0.setU1ATXIE; inline;
  49560. begin
  49561. pTDefRegMap(@Self)^.&set := $10000000;
  49562. end;
  49563. procedure TINT_IEC0.clearU1ATXIE; inline;
  49564. begin
  49565. pTDefRegMap(@Self)^.clr := $10000000;
  49566. end;
  49567. procedure TINT_IEC0.setU1ATXIE(thebits : TBits_1); inline;
  49568. begin
  49569. if thebits = 0 then
  49570. pTDefRegMap(@Self)^.clr := $10000000
  49571. else
  49572. pTDefRegMap(@Self)^.&set := $10000000;
  49573. end;
  49574. function TINT_IEC0.getU1ATXIE : TBits_1; inline;
  49575. begin
  49576. getU1ATXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  49577. end;
  49578. procedure TINT_IEC0.setSPI3EIE; inline;
  49579. begin
  49580. pTDefRegMap(@Self)^.&set := $04000000;
  49581. end;
  49582. procedure TINT_IEC0.clearSPI3EIE; inline;
  49583. begin
  49584. pTDefRegMap(@Self)^.clr := $04000000;
  49585. end;
  49586. procedure TINT_IEC0.setSPI3EIE(thebits : TBits_1); inline;
  49587. begin
  49588. if thebits = 0 then
  49589. pTDefRegMap(@Self)^.clr := $04000000
  49590. else
  49591. pTDefRegMap(@Self)^.&set := $04000000;
  49592. end;
  49593. function TINT_IEC0.getSPI3EIE : TBits_1; inline;
  49594. begin
  49595. getSPI3EIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  49596. end;
  49597. procedure TINT_IEC0.setSPI3RXIE; inline;
  49598. begin
  49599. pTDefRegMap(@Self)^.&set := $08000000;
  49600. end;
  49601. procedure TINT_IEC0.clearSPI3RXIE; inline;
  49602. begin
  49603. pTDefRegMap(@Self)^.clr := $08000000;
  49604. end;
  49605. procedure TINT_IEC0.setSPI3RXIE(thebits : TBits_1); inline;
  49606. begin
  49607. if thebits = 0 then
  49608. pTDefRegMap(@Self)^.clr := $08000000
  49609. else
  49610. pTDefRegMap(@Self)^.&set := $08000000;
  49611. end;
  49612. function TINT_IEC0.getSPI3RXIE : TBits_1; inline;
  49613. begin
  49614. getSPI3RXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  49615. end;
  49616. procedure TINT_IEC0.setSPI3TXIE; inline;
  49617. begin
  49618. pTDefRegMap(@Self)^.&set := $10000000;
  49619. end;
  49620. procedure TINT_IEC0.clearSPI3TXIE; inline;
  49621. begin
  49622. pTDefRegMap(@Self)^.clr := $10000000;
  49623. end;
  49624. procedure TINT_IEC0.setSPI3TXIE(thebits : TBits_1); inline;
  49625. begin
  49626. if thebits = 0 then
  49627. pTDefRegMap(@Self)^.clr := $10000000
  49628. else
  49629. pTDefRegMap(@Self)^.&set := $10000000;
  49630. end;
  49631. function TINT_IEC0.getSPI3TXIE : TBits_1; inline;
  49632. begin
  49633. getSPI3TXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  49634. end;
  49635. procedure TINT_IEC0.setSPI1AEIE; inline;
  49636. begin
  49637. pTDefRegMap(@Self)^.&set := $04000000;
  49638. end;
  49639. procedure TINT_IEC0.clearSPI1AEIE; inline;
  49640. begin
  49641. pTDefRegMap(@Self)^.clr := $04000000;
  49642. end;
  49643. procedure TINT_IEC0.setSPI1AEIE(thebits : TBits_1); inline;
  49644. begin
  49645. if thebits = 0 then
  49646. pTDefRegMap(@Self)^.clr := $04000000
  49647. else
  49648. pTDefRegMap(@Self)^.&set := $04000000;
  49649. end;
  49650. function TINT_IEC0.getSPI1AEIE : TBits_1; inline;
  49651. begin
  49652. getSPI1AEIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  49653. end;
  49654. procedure TINT_IEC0.setSPI1ARXIE; inline;
  49655. begin
  49656. pTDefRegMap(@Self)^.&set := $08000000;
  49657. end;
  49658. procedure TINT_IEC0.clearSPI1ARXIE; inline;
  49659. begin
  49660. pTDefRegMap(@Self)^.clr := $08000000;
  49661. end;
  49662. procedure TINT_IEC0.setSPI1ARXIE(thebits : TBits_1); inline;
  49663. begin
  49664. if thebits = 0 then
  49665. pTDefRegMap(@Self)^.clr := $08000000
  49666. else
  49667. pTDefRegMap(@Self)^.&set := $08000000;
  49668. end;
  49669. function TINT_IEC0.getSPI1ARXIE : TBits_1; inline;
  49670. begin
  49671. getSPI1ARXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  49672. end;
  49673. procedure TINT_IEC0.setSPI1ATXIE; inline;
  49674. begin
  49675. pTDefRegMap(@Self)^.&set := $10000000;
  49676. end;
  49677. procedure TINT_IEC0.clearSPI1ATXIE; inline;
  49678. begin
  49679. pTDefRegMap(@Self)^.clr := $10000000;
  49680. end;
  49681. procedure TINT_IEC0.setSPI1ATXIE(thebits : TBits_1); inline;
  49682. begin
  49683. if thebits = 0 then
  49684. pTDefRegMap(@Self)^.clr := $10000000
  49685. else
  49686. pTDefRegMap(@Self)^.&set := $10000000;
  49687. end;
  49688. function TINT_IEC0.getSPI1ATXIE : TBits_1; inline;
  49689. begin
  49690. getSPI1ATXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  49691. end;
  49692. procedure TINT_IEC0.setI2C3BIE; inline;
  49693. begin
  49694. pTDefRegMap(@Self)^.&set := $04000000;
  49695. end;
  49696. procedure TINT_IEC0.clearI2C3BIE; inline;
  49697. begin
  49698. pTDefRegMap(@Self)^.clr := $04000000;
  49699. end;
  49700. procedure TINT_IEC0.setI2C3BIE(thebits : TBits_1); inline;
  49701. begin
  49702. if thebits = 0 then
  49703. pTDefRegMap(@Self)^.clr := $04000000
  49704. else
  49705. pTDefRegMap(@Self)^.&set := $04000000;
  49706. end;
  49707. function TINT_IEC0.getI2C3BIE : TBits_1; inline;
  49708. begin
  49709. getI2C3BIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  49710. end;
  49711. procedure TINT_IEC0.setI2C3SIE; inline;
  49712. begin
  49713. pTDefRegMap(@Self)^.&set := $08000000;
  49714. end;
  49715. procedure TINT_IEC0.clearI2C3SIE; inline;
  49716. begin
  49717. pTDefRegMap(@Self)^.clr := $08000000;
  49718. end;
  49719. procedure TINT_IEC0.setI2C3SIE(thebits : TBits_1); inline;
  49720. begin
  49721. if thebits = 0 then
  49722. pTDefRegMap(@Self)^.clr := $08000000
  49723. else
  49724. pTDefRegMap(@Self)^.&set := $08000000;
  49725. end;
  49726. function TINT_IEC0.getI2C3SIE : TBits_1; inline;
  49727. begin
  49728. getI2C3SIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  49729. end;
  49730. procedure TINT_IEC0.setI2C3MIE; inline;
  49731. begin
  49732. pTDefRegMap(@Self)^.&set := $10000000;
  49733. end;
  49734. procedure TINT_IEC0.clearI2C3MIE; inline;
  49735. begin
  49736. pTDefRegMap(@Self)^.clr := $10000000;
  49737. end;
  49738. procedure TINT_IEC0.setI2C3MIE(thebits : TBits_1); inline;
  49739. begin
  49740. if thebits = 0 then
  49741. pTDefRegMap(@Self)^.clr := $10000000
  49742. else
  49743. pTDefRegMap(@Self)^.&set := $10000000;
  49744. end;
  49745. function TINT_IEC0.getI2C3MIE : TBits_1; inline;
  49746. begin
  49747. getI2C3MIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  49748. end;
  49749. procedure TINT_IEC0.setI2C1ABIE; inline;
  49750. begin
  49751. pTDefRegMap(@Self)^.&set := $04000000;
  49752. end;
  49753. procedure TINT_IEC0.clearI2C1ABIE; inline;
  49754. begin
  49755. pTDefRegMap(@Self)^.clr := $04000000;
  49756. end;
  49757. procedure TINT_IEC0.setI2C1ABIE(thebits : TBits_1); inline;
  49758. begin
  49759. if thebits = 0 then
  49760. pTDefRegMap(@Self)^.clr := $04000000
  49761. else
  49762. pTDefRegMap(@Self)^.&set := $04000000;
  49763. end;
  49764. function TINT_IEC0.getI2C1ABIE : TBits_1; inline;
  49765. begin
  49766. getI2C1ABIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  49767. end;
  49768. procedure TINT_IEC0.setI2C1ASIE; inline;
  49769. begin
  49770. pTDefRegMap(@Self)^.&set := $08000000;
  49771. end;
  49772. procedure TINT_IEC0.clearI2C1ASIE; inline;
  49773. begin
  49774. pTDefRegMap(@Self)^.clr := $08000000;
  49775. end;
  49776. procedure TINT_IEC0.setI2C1ASIE(thebits : TBits_1); inline;
  49777. begin
  49778. if thebits = 0 then
  49779. pTDefRegMap(@Self)^.clr := $08000000
  49780. else
  49781. pTDefRegMap(@Self)^.&set := $08000000;
  49782. end;
  49783. function TINT_IEC0.getI2C1ASIE : TBits_1; inline;
  49784. begin
  49785. getI2C1ASIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  49786. end;
  49787. procedure TINT_IEC0.setI2C1AMIE; inline;
  49788. begin
  49789. pTDefRegMap(@Self)^.&set := $10000000;
  49790. end;
  49791. procedure TINT_IEC0.clearI2C1AMIE; inline;
  49792. begin
  49793. pTDefRegMap(@Self)^.clr := $10000000;
  49794. end;
  49795. procedure TINT_IEC0.setI2C1AMIE(thebits : TBits_1); inline;
  49796. begin
  49797. if thebits = 0 then
  49798. pTDefRegMap(@Self)^.clr := $10000000
  49799. else
  49800. pTDefRegMap(@Self)^.&set := $10000000;
  49801. end;
  49802. function TINT_IEC0.getI2C1AMIE : TBits_1; inline;
  49803. begin
  49804. getI2C1AMIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  49805. end;
  49806. procedure TINT_IEC0.setw(thebits : TBits_32); inline;
  49807. begin
  49808. pTDefRegMap(@Self)^.val := thebits;
  49809. end;
  49810. function TINT_IEC0.getw : TBits_32; inline;
  49811. begin
  49812. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49813. end;
  49814. procedure TINT_IEC1.setCNIE; inline;
  49815. begin
  49816. pTDefRegMap(@Self)^.&set := $00000001;
  49817. end;
  49818. procedure TINT_IEC1.clearCNIE; inline;
  49819. begin
  49820. pTDefRegMap(@Self)^.clr := $00000001;
  49821. end;
  49822. procedure TINT_IEC1.setCNIE(thebits : TBits_1); inline;
  49823. begin
  49824. if thebits = 0 then
  49825. pTDefRegMap(@Self)^.clr := $00000001
  49826. else
  49827. pTDefRegMap(@Self)^.&set := $00000001;
  49828. end;
  49829. function TINT_IEC1.getCNIE : TBits_1; inline;
  49830. begin
  49831. getCNIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  49832. end;
  49833. procedure TINT_IEC1.setAD1IE; inline;
  49834. begin
  49835. pTDefRegMap(@Self)^.&set := $00000002;
  49836. end;
  49837. procedure TINT_IEC1.clearAD1IE; inline;
  49838. begin
  49839. pTDefRegMap(@Self)^.clr := $00000002;
  49840. end;
  49841. procedure TINT_IEC1.setAD1IE(thebits : TBits_1); inline;
  49842. begin
  49843. if thebits = 0 then
  49844. pTDefRegMap(@Self)^.clr := $00000002
  49845. else
  49846. pTDefRegMap(@Self)^.&set := $00000002;
  49847. end;
  49848. function TINT_IEC1.getAD1IE : TBits_1; inline;
  49849. begin
  49850. getAD1IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  49851. end;
  49852. procedure TINT_IEC1.setPMPIE; inline;
  49853. begin
  49854. pTDefRegMap(@Self)^.&set := $00000004;
  49855. end;
  49856. procedure TINT_IEC1.clearPMPIE; inline;
  49857. begin
  49858. pTDefRegMap(@Self)^.clr := $00000004;
  49859. end;
  49860. procedure TINT_IEC1.setPMPIE(thebits : TBits_1); inline;
  49861. begin
  49862. if thebits = 0 then
  49863. pTDefRegMap(@Self)^.clr := $00000004
  49864. else
  49865. pTDefRegMap(@Self)^.&set := $00000004;
  49866. end;
  49867. function TINT_IEC1.getPMPIE : TBits_1; inline;
  49868. begin
  49869. getPMPIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  49870. end;
  49871. procedure TINT_IEC1.setCMP1IE; inline;
  49872. begin
  49873. pTDefRegMap(@Self)^.&set := $00000008;
  49874. end;
  49875. procedure TINT_IEC1.clearCMP1IE; inline;
  49876. begin
  49877. pTDefRegMap(@Self)^.clr := $00000008;
  49878. end;
  49879. procedure TINT_IEC1.setCMP1IE(thebits : TBits_1); inline;
  49880. begin
  49881. if thebits = 0 then
  49882. pTDefRegMap(@Self)^.clr := $00000008
  49883. else
  49884. pTDefRegMap(@Self)^.&set := $00000008;
  49885. end;
  49886. function TINT_IEC1.getCMP1IE : TBits_1; inline;
  49887. begin
  49888. getCMP1IE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  49889. end;
  49890. procedure TINT_IEC1.setCMP2IE; inline;
  49891. begin
  49892. pTDefRegMap(@Self)^.&set := $00000010;
  49893. end;
  49894. procedure TINT_IEC1.clearCMP2IE; inline;
  49895. begin
  49896. pTDefRegMap(@Self)^.clr := $00000010;
  49897. end;
  49898. procedure TINT_IEC1.setCMP2IE(thebits : TBits_1); inline;
  49899. begin
  49900. if thebits = 0 then
  49901. pTDefRegMap(@Self)^.clr := $00000010
  49902. else
  49903. pTDefRegMap(@Self)^.&set := $00000010;
  49904. end;
  49905. function TINT_IEC1.getCMP2IE : TBits_1; inline;
  49906. begin
  49907. getCMP2IE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  49908. end;
  49909. procedure TINT_IEC1.setU3EIE; inline;
  49910. begin
  49911. pTDefRegMap(@Self)^.&set := $00000020;
  49912. end;
  49913. procedure TINT_IEC1.clearU3EIE; inline;
  49914. begin
  49915. pTDefRegMap(@Self)^.clr := $00000020;
  49916. end;
  49917. procedure TINT_IEC1.setU3EIE(thebits : TBits_1); inline;
  49918. begin
  49919. if thebits = 0 then
  49920. pTDefRegMap(@Self)^.clr := $00000020
  49921. else
  49922. pTDefRegMap(@Self)^.&set := $00000020;
  49923. end;
  49924. function TINT_IEC1.getU3EIE : TBits_1; inline;
  49925. begin
  49926. getU3EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49927. end;
  49928. procedure TINT_IEC1.setU3RXIE; inline;
  49929. begin
  49930. pTDefRegMap(@Self)^.&set := $00000040;
  49931. end;
  49932. procedure TINT_IEC1.clearU3RXIE; inline;
  49933. begin
  49934. pTDefRegMap(@Self)^.clr := $00000040;
  49935. end;
  49936. procedure TINT_IEC1.setU3RXIE(thebits : TBits_1); inline;
  49937. begin
  49938. if thebits = 0 then
  49939. pTDefRegMap(@Self)^.clr := $00000040
  49940. else
  49941. pTDefRegMap(@Self)^.&set := $00000040;
  49942. end;
  49943. function TINT_IEC1.getU3RXIE : TBits_1; inline;
  49944. begin
  49945. getU3RXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49946. end;
  49947. procedure TINT_IEC1.setU3TXIE; inline;
  49948. begin
  49949. pTDefRegMap(@Self)^.&set := $00000080;
  49950. end;
  49951. procedure TINT_IEC1.clearU3TXIE; inline;
  49952. begin
  49953. pTDefRegMap(@Self)^.clr := $00000080;
  49954. end;
  49955. procedure TINT_IEC1.setU3TXIE(thebits : TBits_1); inline;
  49956. begin
  49957. if thebits = 0 then
  49958. pTDefRegMap(@Self)^.clr := $00000080
  49959. else
  49960. pTDefRegMap(@Self)^.&set := $00000080;
  49961. end;
  49962. function TINT_IEC1.getU3TXIE : TBits_1; inline;
  49963. begin
  49964. getU3TXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49965. end;
  49966. procedure TINT_IEC1.setU2EIE; inline;
  49967. begin
  49968. pTDefRegMap(@Self)^.&set := $00000100;
  49969. end;
  49970. procedure TINT_IEC1.clearU2EIE; inline;
  49971. begin
  49972. pTDefRegMap(@Self)^.clr := $00000100;
  49973. end;
  49974. procedure TINT_IEC1.setU2EIE(thebits : TBits_1); inline;
  49975. begin
  49976. if thebits = 0 then
  49977. pTDefRegMap(@Self)^.clr := $00000100
  49978. else
  49979. pTDefRegMap(@Self)^.&set := $00000100;
  49980. end;
  49981. function TINT_IEC1.getU2EIE : TBits_1; inline;
  49982. begin
  49983. getU2EIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49984. end;
  49985. procedure TINT_IEC1.setU2RXIE; inline;
  49986. begin
  49987. pTDefRegMap(@Self)^.&set := $00000200;
  49988. end;
  49989. procedure TINT_IEC1.clearU2RXIE; inline;
  49990. begin
  49991. pTDefRegMap(@Self)^.clr := $00000200;
  49992. end;
  49993. procedure TINT_IEC1.setU2RXIE(thebits : TBits_1); inline;
  49994. begin
  49995. if thebits = 0 then
  49996. pTDefRegMap(@Self)^.clr := $00000200
  49997. else
  49998. pTDefRegMap(@Self)^.&set := $00000200;
  49999. end;
  50000. function TINT_IEC1.getU2RXIE : TBits_1; inline;
  50001. begin
  50002. getU2RXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50003. end;
  50004. procedure TINT_IEC1.setU2TXIE; inline;
  50005. begin
  50006. pTDefRegMap(@Self)^.&set := $00000400;
  50007. end;
  50008. procedure TINT_IEC1.clearU2TXIE; inline;
  50009. begin
  50010. pTDefRegMap(@Self)^.clr := $00000400;
  50011. end;
  50012. procedure TINT_IEC1.setU2TXIE(thebits : TBits_1); inline;
  50013. begin
  50014. if thebits = 0 then
  50015. pTDefRegMap(@Self)^.clr := $00000400
  50016. else
  50017. pTDefRegMap(@Self)^.&set := $00000400;
  50018. end;
  50019. function TINT_IEC1.getU2TXIE : TBits_1; inline;
  50020. begin
  50021. getU2TXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50022. end;
  50023. procedure TINT_IEC1.setFSCMIE; inline;
  50024. begin
  50025. pTDefRegMap(@Self)^.&set := $00004000;
  50026. end;
  50027. procedure TINT_IEC1.clearFSCMIE; inline;
  50028. begin
  50029. pTDefRegMap(@Self)^.clr := $00004000;
  50030. end;
  50031. procedure TINT_IEC1.setFSCMIE(thebits : TBits_1); inline;
  50032. begin
  50033. if thebits = 0 then
  50034. pTDefRegMap(@Self)^.clr := $00004000
  50035. else
  50036. pTDefRegMap(@Self)^.&set := $00004000;
  50037. end;
  50038. function TINT_IEC1.getFSCMIE : TBits_1; inline;
  50039. begin
  50040. getFSCMIE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  50041. end;
  50042. procedure TINT_IEC1.setRTCCIE; inline;
  50043. begin
  50044. pTDefRegMap(@Self)^.&set := $00008000;
  50045. end;
  50046. procedure TINT_IEC1.clearRTCCIE; inline;
  50047. begin
  50048. pTDefRegMap(@Self)^.clr := $00008000;
  50049. end;
  50050. procedure TINT_IEC1.setRTCCIE(thebits : TBits_1); inline;
  50051. begin
  50052. if thebits = 0 then
  50053. pTDefRegMap(@Self)^.clr := $00008000
  50054. else
  50055. pTDefRegMap(@Self)^.&set := $00008000;
  50056. end;
  50057. function TINT_IEC1.getRTCCIE : TBits_1; inline;
  50058. begin
  50059. getRTCCIE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  50060. end;
  50061. procedure TINT_IEC1.setDMA0IE; inline;
  50062. begin
  50063. pTDefRegMap(@Self)^.&set := $00010000;
  50064. end;
  50065. procedure TINT_IEC1.clearDMA0IE; inline;
  50066. begin
  50067. pTDefRegMap(@Self)^.clr := $00010000;
  50068. end;
  50069. procedure TINT_IEC1.setDMA0IE(thebits : TBits_1); inline;
  50070. begin
  50071. if thebits = 0 then
  50072. pTDefRegMap(@Self)^.clr := $00010000
  50073. else
  50074. pTDefRegMap(@Self)^.&set := $00010000;
  50075. end;
  50076. function TINT_IEC1.getDMA0IE : TBits_1; inline;
  50077. begin
  50078. getDMA0IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  50079. end;
  50080. procedure TINT_IEC1.setDMA1IE; inline;
  50081. begin
  50082. pTDefRegMap(@Self)^.&set := $00020000;
  50083. end;
  50084. procedure TINT_IEC1.clearDMA1IE; inline;
  50085. begin
  50086. pTDefRegMap(@Self)^.clr := $00020000;
  50087. end;
  50088. procedure TINT_IEC1.setDMA1IE(thebits : TBits_1); inline;
  50089. begin
  50090. if thebits = 0 then
  50091. pTDefRegMap(@Self)^.clr := $00020000
  50092. else
  50093. pTDefRegMap(@Self)^.&set := $00020000;
  50094. end;
  50095. function TINT_IEC1.getDMA1IE : TBits_1; inline;
  50096. begin
  50097. getDMA1IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  50098. end;
  50099. procedure TINT_IEC1.setDMA2IE; inline;
  50100. begin
  50101. pTDefRegMap(@Self)^.&set := $00040000;
  50102. end;
  50103. procedure TINT_IEC1.clearDMA2IE; inline;
  50104. begin
  50105. pTDefRegMap(@Self)^.clr := $00040000;
  50106. end;
  50107. procedure TINT_IEC1.setDMA2IE(thebits : TBits_1); inline;
  50108. begin
  50109. if thebits = 0 then
  50110. pTDefRegMap(@Self)^.clr := $00040000
  50111. else
  50112. pTDefRegMap(@Self)^.&set := $00040000;
  50113. end;
  50114. function TINT_IEC1.getDMA2IE : TBits_1; inline;
  50115. begin
  50116. getDMA2IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  50117. end;
  50118. procedure TINT_IEC1.setDMA3IE; inline;
  50119. begin
  50120. pTDefRegMap(@Self)^.&set := $00080000;
  50121. end;
  50122. procedure TINT_IEC1.clearDMA3IE; inline;
  50123. begin
  50124. pTDefRegMap(@Self)^.clr := $00080000;
  50125. end;
  50126. procedure TINT_IEC1.setDMA3IE(thebits : TBits_1); inline;
  50127. begin
  50128. if thebits = 0 then
  50129. pTDefRegMap(@Self)^.clr := $00080000
  50130. else
  50131. pTDefRegMap(@Self)^.&set := $00080000;
  50132. end;
  50133. function TINT_IEC1.getDMA3IE : TBits_1; inline;
  50134. begin
  50135. getDMA3IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  50136. end;
  50137. procedure TINT_IEC1.setFCEIE; inline;
  50138. begin
  50139. pTDefRegMap(@Self)^.&set := $01000000;
  50140. end;
  50141. procedure TINT_IEC1.clearFCEIE; inline;
  50142. begin
  50143. pTDefRegMap(@Self)^.clr := $01000000;
  50144. end;
  50145. procedure TINT_IEC1.setFCEIE(thebits : TBits_1); inline;
  50146. begin
  50147. if thebits = 0 then
  50148. pTDefRegMap(@Self)^.clr := $01000000
  50149. else
  50150. pTDefRegMap(@Self)^.&set := $01000000;
  50151. end;
  50152. function TINT_IEC1.getFCEIE : TBits_1; inline;
  50153. begin
  50154. getFCEIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  50155. end;
  50156. procedure TINT_IEC1.setUSBIE; inline;
  50157. begin
  50158. pTDefRegMap(@Self)^.&set := $02000000;
  50159. end;
  50160. procedure TINT_IEC1.clearUSBIE; inline;
  50161. begin
  50162. pTDefRegMap(@Self)^.clr := $02000000;
  50163. end;
  50164. procedure TINT_IEC1.setUSBIE(thebits : TBits_1); inline;
  50165. begin
  50166. if thebits = 0 then
  50167. pTDefRegMap(@Self)^.clr := $02000000
  50168. else
  50169. pTDefRegMap(@Self)^.&set := $02000000;
  50170. end;
  50171. function TINT_IEC1.getUSBIE : TBits_1; inline;
  50172. begin
  50173. getUSBIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  50174. end;
  50175. procedure TINT_IEC1.setCAN1IE; inline;
  50176. begin
  50177. pTDefRegMap(@Self)^.&set := $04000000;
  50178. end;
  50179. procedure TINT_IEC1.clearCAN1IE; inline;
  50180. begin
  50181. pTDefRegMap(@Self)^.clr := $04000000;
  50182. end;
  50183. procedure TINT_IEC1.setCAN1IE(thebits : TBits_1); inline;
  50184. begin
  50185. if thebits = 0 then
  50186. pTDefRegMap(@Self)^.clr := $04000000
  50187. else
  50188. pTDefRegMap(@Self)^.&set := $04000000;
  50189. end;
  50190. function TINT_IEC1.getCAN1IE : TBits_1; inline;
  50191. begin
  50192. getCAN1IE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  50193. end;
  50194. procedure TINT_IEC1.setETHIE; inline;
  50195. begin
  50196. pTDefRegMap(@Self)^.&set := $10000000;
  50197. end;
  50198. procedure TINT_IEC1.clearETHIE; inline;
  50199. begin
  50200. pTDefRegMap(@Self)^.clr := $10000000;
  50201. end;
  50202. procedure TINT_IEC1.setETHIE(thebits : TBits_1); inline;
  50203. begin
  50204. if thebits = 0 then
  50205. pTDefRegMap(@Self)^.clr := $10000000
  50206. else
  50207. pTDefRegMap(@Self)^.&set := $10000000;
  50208. end;
  50209. function TINT_IEC1.getETHIE : TBits_1; inline;
  50210. begin
  50211. getETHIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  50212. end;
  50213. procedure TINT_IEC1.setIC1EIE; inline;
  50214. begin
  50215. pTDefRegMap(@Self)^.&set := $20000000;
  50216. end;
  50217. procedure TINT_IEC1.clearIC1EIE; inline;
  50218. begin
  50219. pTDefRegMap(@Self)^.clr := $20000000;
  50220. end;
  50221. procedure TINT_IEC1.setIC1EIE(thebits : TBits_1); inline;
  50222. begin
  50223. if thebits = 0 then
  50224. pTDefRegMap(@Self)^.clr := $20000000
  50225. else
  50226. pTDefRegMap(@Self)^.&set := $20000000;
  50227. end;
  50228. function TINT_IEC1.getIC1EIE : TBits_1; inline;
  50229. begin
  50230. getIC1EIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  50231. end;
  50232. procedure TINT_IEC1.setIC2EIE; inline;
  50233. begin
  50234. pTDefRegMap(@Self)^.&set := $40000000;
  50235. end;
  50236. procedure TINT_IEC1.clearIC2EIE; inline;
  50237. begin
  50238. pTDefRegMap(@Self)^.clr := $40000000;
  50239. end;
  50240. procedure TINT_IEC1.setIC2EIE(thebits : TBits_1); inline;
  50241. begin
  50242. if thebits = 0 then
  50243. pTDefRegMap(@Self)^.clr := $40000000
  50244. else
  50245. pTDefRegMap(@Self)^.&set := $40000000;
  50246. end;
  50247. function TINT_IEC1.getIC2EIE : TBits_1; inline;
  50248. begin
  50249. getIC2EIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  50250. end;
  50251. procedure TINT_IEC1.setIC3EIE; inline;
  50252. begin
  50253. pTDefRegMap(@Self)^.&set := $80000000;
  50254. end;
  50255. procedure TINT_IEC1.clearIC3EIE; inline;
  50256. begin
  50257. pTDefRegMap(@Self)^.clr := $80000000;
  50258. end;
  50259. procedure TINT_IEC1.setIC3EIE(thebits : TBits_1); inline;
  50260. begin
  50261. if thebits = 0 then
  50262. pTDefRegMap(@Self)^.clr := $80000000
  50263. else
  50264. pTDefRegMap(@Self)^.&set := $80000000;
  50265. end;
  50266. function TINT_IEC1.getIC3EIE : TBits_1; inline;
  50267. begin
  50268. getIC3EIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  50269. end;
  50270. procedure TINT_IEC1.setU2AEIE; inline;
  50271. begin
  50272. pTDefRegMap(@Self)^.&set := $00000020;
  50273. end;
  50274. procedure TINT_IEC1.clearU2AEIE; inline;
  50275. begin
  50276. pTDefRegMap(@Self)^.clr := $00000020;
  50277. end;
  50278. procedure TINT_IEC1.setU2AEIE(thebits : TBits_1); inline;
  50279. begin
  50280. if thebits = 0 then
  50281. pTDefRegMap(@Self)^.clr := $00000020
  50282. else
  50283. pTDefRegMap(@Self)^.&set := $00000020;
  50284. end;
  50285. function TINT_IEC1.getU2AEIE : TBits_1; inline;
  50286. begin
  50287. getU2AEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50288. end;
  50289. procedure TINT_IEC1.setU2ARXIE; inline;
  50290. begin
  50291. pTDefRegMap(@Self)^.&set := $00000040;
  50292. end;
  50293. procedure TINT_IEC1.clearU2ARXIE; inline;
  50294. begin
  50295. pTDefRegMap(@Self)^.clr := $00000040;
  50296. end;
  50297. procedure TINT_IEC1.setU2ARXIE(thebits : TBits_1); inline;
  50298. begin
  50299. if thebits = 0 then
  50300. pTDefRegMap(@Self)^.clr := $00000040
  50301. else
  50302. pTDefRegMap(@Self)^.&set := $00000040;
  50303. end;
  50304. function TINT_IEC1.getU2ARXIE : TBits_1; inline;
  50305. begin
  50306. getU2ARXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50307. end;
  50308. procedure TINT_IEC1.setU2ATXIE; inline;
  50309. begin
  50310. pTDefRegMap(@Self)^.&set := $00000080;
  50311. end;
  50312. procedure TINT_IEC1.clearU2ATXIE; inline;
  50313. begin
  50314. pTDefRegMap(@Self)^.clr := $00000080;
  50315. end;
  50316. procedure TINT_IEC1.setU2ATXIE(thebits : TBits_1); inline;
  50317. begin
  50318. if thebits = 0 then
  50319. pTDefRegMap(@Self)^.clr := $00000080
  50320. else
  50321. pTDefRegMap(@Self)^.&set := $00000080;
  50322. end;
  50323. function TINT_IEC1.getU2ATXIE : TBits_1; inline;
  50324. begin
  50325. getU2ATXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50326. end;
  50327. procedure TINT_IEC1.setU3AEIE; inline;
  50328. begin
  50329. pTDefRegMap(@Self)^.&set := $00000100;
  50330. end;
  50331. procedure TINT_IEC1.clearU3AEIE; inline;
  50332. begin
  50333. pTDefRegMap(@Self)^.clr := $00000100;
  50334. end;
  50335. procedure TINT_IEC1.setU3AEIE(thebits : TBits_1); inline;
  50336. begin
  50337. if thebits = 0 then
  50338. pTDefRegMap(@Self)^.clr := $00000100
  50339. else
  50340. pTDefRegMap(@Self)^.&set := $00000100;
  50341. end;
  50342. function TINT_IEC1.getU3AEIE : TBits_1; inline;
  50343. begin
  50344. getU3AEIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50345. end;
  50346. procedure TINT_IEC1.setU3ARXIE; inline;
  50347. begin
  50348. pTDefRegMap(@Self)^.&set := $00000200;
  50349. end;
  50350. procedure TINT_IEC1.clearU3ARXIE; inline;
  50351. begin
  50352. pTDefRegMap(@Self)^.clr := $00000200;
  50353. end;
  50354. procedure TINT_IEC1.setU3ARXIE(thebits : TBits_1); inline;
  50355. begin
  50356. if thebits = 0 then
  50357. pTDefRegMap(@Self)^.clr := $00000200
  50358. else
  50359. pTDefRegMap(@Self)^.&set := $00000200;
  50360. end;
  50361. function TINT_IEC1.getU3ARXIE : TBits_1; inline;
  50362. begin
  50363. getU3ARXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50364. end;
  50365. procedure TINT_IEC1.setU3ATXIE; inline;
  50366. begin
  50367. pTDefRegMap(@Self)^.&set := $00000400;
  50368. end;
  50369. procedure TINT_IEC1.clearU3ATXIE; inline;
  50370. begin
  50371. pTDefRegMap(@Self)^.clr := $00000400;
  50372. end;
  50373. procedure TINT_IEC1.setU3ATXIE(thebits : TBits_1); inline;
  50374. begin
  50375. if thebits = 0 then
  50376. pTDefRegMap(@Self)^.clr := $00000400
  50377. else
  50378. pTDefRegMap(@Self)^.&set := $00000400;
  50379. end;
  50380. function TINT_IEC1.getU3ATXIE : TBits_1; inline;
  50381. begin
  50382. getU3ATXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50383. end;
  50384. procedure TINT_IEC1.setSPI2EIE; inline;
  50385. begin
  50386. pTDefRegMap(@Self)^.&set := $00000020;
  50387. end;
  50388. procedure TINT_IEC1.clearSPI2EIE; inline;
  50389. begin
  50390. pTDefRegMap(@Self)^.clr := $00000020;
  50391. end;
  50392. procedure TINT_IEC1.setSPI2EIE(thebits : TBits_1); inline;
  50393. begin
  50394. if thebits = 0 then
  50395. pTDefRegMap(@Self)^.clr := $00000020
  50396. else
  50397. pTDefRegMap(@Self)^.&set := $00000020;
  50398. end;
  50399. function TINT_IEC1.getSPI2EIE : TBits_1; inline;
  50400. begin
  50401. getSPI2EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50402. end;
  50403. procedure TINT_IEC1.setSPI2RXIE; inline;
  50404. begin
  50405. pTDefRegMap(@Self)^.&set := $00000040;
  50406. end;
  50407. procedure TINT_IEC1.clearSPI2RXIE; inline;
  50408. begin
  50409. pTDefRegMap(@Self)^.clr := $00000040;
  50410. end;
  50411. procedure TINT_IEC1.setSPI2RXIE(thebits : TBits_1); inline;
  50412. begin
  50413. if thebits = 0 then
  50414. pTDefRegMap(@Self)^.clr := $00000040
  50415. else
  50416. pTDefRegMap(@Self)^.&set := $00000040;
  50417. end;
  50418. function TINT_IEC1.getSPI2RXIE : TBits_1; inline;
  50419. begin
  50420. getSPI2RXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50421. end;
  50422. procedure TINT_IEC1.setSPI2TXIE; inline;
  50423. begin
  50424. pTDefRegMap(@Self)^.&set := $00000080;
  50425. end;
  50426. procedure TINT_IEC1.clearSPI2TXIE; inline;
  50427. begin
  50428. pTDefRegMap(@Self)^.clr := $00000080;
  50429. end;
  50430. procedure TINT_IEC1.setSPI2TXIE(thebits : TBits_1); inline;
  50431. begin
  50432. if thebits = 0 then
  50433. pTDefRegMap(@Self)^.clr := $00000080
  50434. else
  50435. pTDefRegMap(@Self)^.&set := $00000080;
  50436. end;
  50437. function TINT_IEC1.getSPI2TXIE : TBits_1; inline;
  50438. begin
  50439. getSPI2TXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50440. end;
  50441. procedure TINT_IEC1.setSPI4EIE; inline;
  50442. begin
  50443. pTDefRegMap(@Self)^.&set := $00000100;
  50444. end;
  50445. procedure TINT_IEC1.clearSPI4EIE; inline;
  50446. begin
  50447. pTDefRegMap(@Self)^.clr := $00000100;
  50448. end;
  50449. procedure TINT_IEC1.setSPI4EIE(thebits : TBits_1); inline;
  50450. begin
  50451. if thebits = 0 then
  50452. pTDefRegMap(@Self)^.clr := $00000100
  50453. else
  50454. pTDefRegMap(@Self)^.&set := $00000100;
  50455. end;
  50456. function TINT_IEC1.getSPI4EIE : TBits_1; inline;
  50457. begin
  50458. getSPI4EIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50459. end;
  50460. procedure TINT_IEC1.setSPI4RXIE; inline;
  50461. begin
  50462. pTDefRegMap(@Self)^.&set := $00000200;
  50463. end;
  50464. procedure TINT_IEC1.clearSPI4RXIE; inline;
  50465. begin
  50466. pTDefRegMap(@Self)^.clr := $00000200;
  50467. end;
  50468. procedure TINT_IEC1.setSPI4RXIE(thebits : TBits_1); inline;
  50469. begin
  50470. if thebits = 0 then
  50471. pTDefRegMap(@Self)^.clr := $00000200
  50472. else
  50473. pTDefRegMap(@Self)^.&set := $00000200;
  50474. end;
  50475. function TINT_IEC1.getSPI4RXIE : TBits_1; inline;
  50476. begin
  50477. getSPI4RXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50478. end;
  50479. procedure TINT_IEC1.setSPI4TXIE; inline;
  50480. begin
  50481. pTDefRegMap(@Self)^.&set := $00000400;
  50482. end;
  50483. procedure TINT_IEC1.clearSPI4TXIE; inline;
  50484. begin
  50485. pTDefRegMap(@Self)^.clr := $00000400;
  50486. end;
  50487. procedure TINT_IEC1.setSPI4TXIE(thebits : TBits_1); inline;
  50488. begin
  50489. if thebits = 0 then
  50490. pTDefRegMap(@Self)^.clr := $00000400
  50491. else
  50492. pTDefRegMap(@Self)^.&set := $00000400;
  50493. end;
  50494. function TINT_IEC1.getSPI4TXIE : TBits_1; inline;
  50495. begin
  50496. getSPI4TXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50497. end;
  50498. procedure TINT_IEC1.setSPI2AEIE; inline;
  50499. begin
  50500. pTDefRegMap(@Self)^.&set := $00000020;
  50501. end;
  50502. procedure TINT_IEC1.clearSPI2AEIE; inline;
  50503. begin
  50504. pTDefRegMap(@Self)^.clr := $00000020;
  50505. end;
  50506. procedure TINT_IEC1.setSPI2AEIE(thebits : TBits_1); inline;
  50507. begin
  50508. if thebits = 0 then
  50509. pTDefRegMap(@Self)^.clr := $00000020
  50510. else
  50511. pTDefRegMap(@Self)^.&set := $00000020;
  50512. end;
  50513. function TINT_IEC1.getSPI2AEIE : TBits_1; inline;
  50514. begin
  50515. getSPI2AEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50516. end;
  50517. procedure TINT_IEC1.setSPI2ARXIE; inline;
  50518. begin
  50519. pTDefRegMap(@Self)^.&set := $00000040;
  50520. end;
  50521. procedure TINT_IEC1.clearSPI2ARXIE; inline;
  50522. begin
  50523. pTDefRegMap(@Self)^.clr := $00000040;
  50524. end;
  50525. procedure TINT_IEC1.setSPI2ARXIE(thebits : TBits_1); inline;
  50526. begin
  50527. if thebits = 0 then
  50528. pTDefRegMap(@Self)^.clr := $00000040
  50529. else
  50530. pTDefRegMap(@Self)^.&set := $00000040;
  50531. end;
  50532. function TINT_IEC1.getSPI2ARXIE : TBits_1; inline;
  50533. begin
  50534. getSPI2ARXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50535. end;
  50536. procedure TINT_IEC1.setSPI2ATXIE; inline;
  50537. begin
  50538. pTDefRegMap(@Self)^.&set := $00000080;
  50539. end;
  50540. procedure TINT_IEC1.clearSPI2ATXIE; inline;
  50541. begin
  50542. pTDefRegMap(@Self)^.clr := $00000080;
  50543. end;
  50544. procedure TINT_IEC1.setSPI2ATXIE(thebits : TBits_1); inline;
  50545. begin
  50546. if thebits = 0 then
  50547. pTDefRegMap(@Self)^.clr := $00000080
  50548. else
  50549. pTDefRegMap(@Self)^.&set := $00000080;
  50550. end;
  50551. function TINT_IEC1.getSPI2ATXIE : TBits_1; inline;
  50552. begin
  50553. getSPI2ATXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50554. end;
  50555. procedure TINT_IEC1.setSPI3AEIE; inline;
  50556. begin
  50557. pTDefRegMap(@Self)^.&set := $00000100;
  50558. end;
  50559. procedure TINT_IEC1.clearSPI3AEIE; inline;
  50560. begin
  50561. pTDefRegMap(@Self)^.clr := $00000100;
  50562. end;
  50563. procedure TINT_IEC1.setSPI3AEIE(thebits : TBits_1); inline;
  50564. begin
  50565. if thebits = 0 then
  50566. pTDefRegMap(@Self)^.clr := $00000100
  50567. else
  50568. pTDefRegMap(@Self)^.&set := $00000100;
  50569. end;
  50570. function TINT_IEC1.getSPI3AEIE : TBits_1; inline;
  50571. begin
  50572. getSPI3AEIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50573. end;
  50574. procedure TINT_IEC1.setSPI3ARXIE; inline;
  50575. begin
  50576. pTDefRegMap(@Self)^.&set := $00000200;
  50577. end;
  50578. procedure TINT_IEC1.clearSPI3ARXIE; inline;
  50579. begin
  50580. pTDefRegMap(@Self)^.clr := $00000200;
  50581. end;
  50582. procedure TINT_IEC1.setSPI3ARXIE(thebits : TBits_1); inline;
  50583. begin
  50584. if thebits = 0 then
  50585. pTDefRegMap(@Self)^.clr := $00000200
  50586. else
  50587. pTDefRegMap(@Self)^.&set := $00000200;
  50588. end;
  50589. function TINT_IEC1.getSPI3ARXIE : TBits_1; inline;
  50590. begin
  50591. getSPI3ARXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50592. end;
  50593. procedure TINT_IEC1.setSPI3ATXIE; inline;
  50594. begin
  50595. pTDefRegMap(@Self)^.&set := $00000400;
  50596. end;
  50597. procedure TINT_IEC1.clearSPI3ATXIE; inline;
  50598. begin
  50599. pTDefRegMap(@Self)^.clr := $00000400;
  50600. end;
  50601. procedure TINT_IEC1.setSPI3ATXIE(thebits : TBits_1); inline;
  50602. begin
  50603. if thebits = 0 then
  50604. pTDefRegMap(@Self)^.clr := $00000400
  50605. else
  50606. pTDefRegMap(@Self)^.&set := $00000400;
  50607. end;
  50608. function TINT_IEC1.getSPI3ATXIE : TBits_1; inline;
  50609. begin
  50610. getSPI3ATXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50611. end;
  50612. procedure TINT_IEC1.setI2C4BIE; inline;
  50613. begin
  50614. pTDefRegMap(@Self)^.&set := $00000020;
  50615. end;
  50616. procedure TINT_IEC1.clearI2C4BIE; inline;
  50617. begin
  50618. pTDefRegMap(@Self)^.clr := $00000020;
  50619. end;
  50620. procedure TINT_IEC1.setI2C4BIE(thebits : TBits_1); inline;
  50621. begin
  50622. if thebits = 0 then
  50623. pTDefRegMap(@Self)^.clr := $00000020
  50624. else
  50625. pTDefRegMap(@Self)^.&set := $00000020;
  50626. end;
  50627. function TINT_IEC1.getI2C4BIE : TBits_1; inline;
  50628. begin
  50629. getI2C4BIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50630. end;
  50631. procedure TINT_IEC1.setI2C4SIE; inline;
  50632. begin
  50633. pTDefRegMap(@Self)^.&set := $00000040;
  50634. end;
  50635. procedure TINT_IEC1.clearI2C4SIE; inline;
  50636. begin
  50637. pTDefRegMap(@Self)^.clr := $00000040;
  50638. end;
  50639. procedure TINT_IEC1.setI2C4SIE(thebits : TBits_1); inline;
  50640. begin
  50641. if thebits = 0 then
  50642. pTDefRegMap(@Self)^.clr := $00000040
  50643. else
  50644. pTDefRegMap(@Self)^.&set := $00000040;
  50645. end;
  50646. function TINT_IEC1.getI2C4SIE : TBits_1; inline;
  50647. begin
  50648. getI2C4SIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50649. end;
  50650. procedure TINT_IEC1.setI2C4MIE; inline;
  50651. begin
  50652. pTDefRegMap(@Self)^.&set := $00000080;
  50653. end;
  50654. procedure TINT_IEC1.clearI2C4MIE; inline;
  50655. begin
  50656. pTDefRegMap(@Self)^.clr := $00000080;
  50657. end;
  50658. procedure TINT_IEC1.setI2C4MIE(thebits : TBits_1); inline;
  50659. begin
  50660. if thebits = 0 then
  50661. pTDefRegMap(@Self)^.clr := $00000080
  50662. else
  50663. pTDefRegMap(@Self)^.&set := $00000080;
  50664. end;
  50665. function TINT_IEC1.getI2C4MIE : TBits_1; inline;
  50666. begin
  50667. getI2C4MIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50668. end;
  50669. procedure TINT_IEC1.setI2C5BIE; inline;
  50670. begin
  50671. pTDefRegMap(@Self)^.&set := $00000100;
  50672. end;
  50673. procedure TINT_IEC1.clearI2C5BIE; inline;
  50674. begin
  50675. pTDefRegMap(@Self)^.clr := $00000100;
  50676. end;
  50677. procedure TINT_IEC1.setI2C5BIE(thebits : TBits_1); inline;
  50678. begin
  50679. if thebits = 0 then
  50680. pTDefRegMap(@Self)^.clr := $00000100
  50681. else
  50682. pTDefRegMap(@Self)^.&set := $00000100;
  50683. end;
  50684. function TINT_IEC1.getI2C5BIE : TBits_1; inline;
  50685. begin
  50686. getI2C5BIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50687. end;
  50688. procedure TINT_IEC1.setI2C5SIE; inline;
  50689. begin
  50690. pTDefRegMap(@Self)^.&set := $00000200;
  50691. end;
  50692. procedure TINT_IEC1.clearI2C5SIE; inline;
  50693. begin
  50694. pTDefRegMap(@Self)^.clr := $00000200;
  50695. end;
  50696. procedure TINT_IEC1.setI2C5SIE(thebits : TBits_1); inline;
  50697. begin
  50698. if thebits = 0 then
  50699. pTDefRegMap(@Self)^.clr := $00000200
  50700. else
  50701. pTDefRegMap(@Self)^.&set := $00000200;
  50702. end;
  50703. function TINT_IEC1.getI2C5SIE : TBits_1; inline;
  50704. begin
  50705. getI2C5SIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50706. end;
  50707. procedure TINT_IEC1.setI2C5MIE; inline;
  50708. begin
  50709. pTDefRegMap(@Self)^.&set := $00000400;
  50710. end;
  50711. procedure TINT_IEC1.clearI2C5MIE; inline;
  50712. begin
  50713. pTDefRegMap(@Self)^.clr := $00000400;
  50714. end;
  50715. procedure TINT_IEC1.setI2C5MIE(thebits : TBits_1); inline;
  50716. begin
  50717. if thebits = 0 then
  50718. pTDefRegMap(@Self)^.clr := $00000400
  50719. else
  50720. pTDefRegMap(@Self)^.&set := $00000400;
  50721. end;
  50722. function TINT_IEC1.getI2C5MIE : TBits_1; inline;
  50723. begin
  50724. getI2C5MIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50725. end;
  50726. procedure TINT_IEC1.setI2C2ABIE; inline;
  50727. begin
  50728. pTDefRegMap(@Self)^.&set := $00000020;
  50729. end;
  50730. procedure TINT_IEC1.clearI2C2ABIE; inline;
  50731. begin
  50732. pTDefRegMap(@Self)^.clr := $00000020;
  50733. end;
  50734. procedure TINT_IEC1.setI2C2ABIE(thebits : TBits_1); inline;
  50735. begin
  50736. if thebits = 0 then
  50737. pTDefRegMap(@Self)^.clr := $00000020
  50738. else
  50739. pTDefRegMap(@Self)^.&set := $00000020;
  50740. end;
  50741. function TINT_IEC1.getI2C2ABIE : TBits_1; inline;
  50742. begin
  50743. getI2C2ABIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50744. end;
  50745. procedure TINT_IEC1.setI2C2ASIE; inline;
  50746. begin
  50747. pTDefRegMap(@Self)^.&set := $00000040;
  50748. end;
  50749. procedure TINT_IEC1.clearI2C2ASIE; inline;
  50750. begin
  50751. pTDefRegMap(@Self)^.clr := $00000040;
  50752. end;
  50753. procedure TINT_IEC1.setI2C2ASIE(thebits : TBits_1); inline;
  50754. begin
  50755. if thebits = 0 then
  50756. pTDefRegMap(@Self)^.clr := $00000040
  50757. else
  50758. pTDefRegMap(@Self)^.&set := $00000040;
  50759. end;
  50760. function TINT_IEC1.getI2C2ASIE : TBits_1; inline;
  50761. begin
  50762. getI2C2ASIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50763. end;
  50764. procedure TINT_IEC1.setI2C2AMIE; inline;
  50765. begin
  50766. pTDefRegMap(@Self)^.&set := $00000080;
  50767. end;
  50768. procedure TINT_IEC1.clearI2C2AMIE; inline;
  50769. begin
  50770. pTDefRegMap(@Self)^.clr := $00000080;
  50771. end;
  50772. procedure TINT_IEC1.setI2C2AMIE(thebits : TBits_1); inline;
  50773. begin
  50774. if thebits = 0 then
  50775. pTDefRegMap(@Self)^.clr := $00000080
  50776. else
  50777. pTDefRegMap(@Self)^.&set := $00000080;
  50778. end;
  50779. function TINT_IEC1.getI2C2AMIE : TBits_1; inline;
  50780. begin
  50781. getI2C2AMIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50782. end;
  50783. procedure TINT_IEC1.setI2C3ABIE; inline;
  50784. begin
  50785. pTDefRegMap(@Self)^.&set := $00000100;
  50786. end;
  50787. procedure TINT_IEC1.clearI2C3ABIE; inline;
  50788. begin
  50789. pTDefRegMap(@Self)^.clr := $00000100;
  50790. end;
  50791. procedure TINT_IEC1.setI2C3ABIE(thebits : TBits_1); inline;
  50792. begin
  50793. if thebits = 0 then
  50794. pTDefRegMap(@Self)^.clr := $00000100
  50795. else
  50796. pTDefRegMap(@Self)^.&set := $00000100;
  50797. end;
  50798. function TINT_IEC1.getI2C3ABIE : TBits_1; inline;
  50799. begin
  50800. getI2C3ABIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50801. end;
  50802. procedure TINT_IEC1.setI2C3ASIE; inline;
  50803. begin
  50804. pTDefRegMap(@Self)^.&set := $00000200;
  50805. end;
  50806. procedure TINT_IEC1.clearI2C3ASIE; inline;
  50807. begin
  50808. pTDefRegMap(@Self)^.clr := $00000200;
  50809. end;
  50810. procedure TINT_IEC1.setI2C3ASIE(thebits : TBits_1); inline;
  50811. begin
  50812. if thebits = 0 then
  50813. pTDefRegMap(@Self)^.clr := $00000200
  50814. else
  50815. pTDefRegMap(@Self)^.&set := $00000200;
  50816. end;
  50817. function TINT_IEC1.getI2C3ASIE : TBits_1; inline;
  50818. begin
  50819. getI2C3ASIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50820. end;
  50821. procedure TINT_IEC1.setI2C3AMIE; inline;
  50822. begin
  50823. pTDefRegMap(@Self)^.&set := $00000400;
  50824. end;
  50825. procedure TINT_IEC1.clearI2C3AMIE; inline;
  50826. begin
  50827. pTDefRegMap(@Self)^.clr := $00000400;
  50828. end;
  50829. procedure TINT_IEC1.setI2C3AMIE(thebits : TBits_1); inline;
  50830. begin
  50831. if thebits = 0 then
  50832. pTDefRegMap(@Self)^.clr := $00000400
  50833. else
  50834. pTDefRegMap(@Self)^.&set := $00000400;
  50835. end;
  50836. function TINT_IEC1.getI2C3AMIE : TBits_1; inline;
  50837. begin
  50838. getI2C3AMIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50839. end;
  50840. procedure TINT_IEC1.setw(thebits : TBits_32); inline;
  50841. begin
  50842. pTDefRegMap(@Self)^.val := thebits;
  50843. end;
  50844. function TINT_IEC1.getw : TBits_32; inline;
  50845. begin
  50846. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50847. end;
  50848. procedure TINT_IEC2.setIC4EIE; inline;
  50849. begin
  50850. pTDefRegMap(@Self)^.&set := $00000001;
  50851. end;
  50852. procedure TINT_IEC2.clearIC4EIE; inline;
  50853. begin
  50854. pTDefRegMap(@Self)^.clr := $00000001;
  50855. end;
  50856. procedure TINT_IEC2.setIC4EIE(thebits : TBits_1); inline;
  50857. begin
  50858. if thebits = 0 then
  50859. pTDefRegMap(@Self)^.clr := $00000001
  50860. else
  50861. pTDefRegMap(@Self)^.&set := $00000001;
  50862. end;
  50863. function TINT_IEC2.getIC4EIE : TBits_1; inline;
  50864. begin
  50865. getIC4EIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  50866. end;
  50867. procedure TINT_IEC2.setIC5EIE; inline;
  50868. begin
  50869. pTDefRegMap(@Self)^.&set := $00000002;
  50870. end;
  50871. procedure TINT_IEC2.clearIC5EIE; inline;
  50872. begin
  50873. pTDefRegMap(@Self)^.clr := $00000002;
  50874. end;
  50875. procedure TINT_IEC2.setIC5EIE(thebits : TBits_1); inline;
  50876. begin
  50877. if thebits = 0 then
  50878. pTDefRegMap(@Self)^.clr := $00000002
  50879. else
  50880. pTDefRegMap(@Self)^.&set := $00000002;
  50881. end;
  50882. function TINT_IEC2.getIC5EIE : TBits_1; inline;
  50883. begin
  50884. getIC5EIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  50885. end;
  50886. procedure TINT_IEC2.setPMPEIE; inline;
  50887. begin
  50888. pTDefRegMap(@Self)^.&set := $00000004;
  50889. end;
  50890. procedure TINT_IEC2.clearPMPEIE; inline;
  50891. begin
  50892. pTDefRegMap(@Self)^.clr := $00000004;
  50893. end;
  50894. procedure TINT_IEC2.setPMPEIE(thebits : TBits_1); inline;
  50895. begin
  50896. if thebits = 0 then
  50897. pTDefRegMap(@Self)^.clr := $00000004
  50898. else
  50899. pTDefRegMap(@Self)^.&set := $00000004;
  50900. end;
  50901. function TINT_IEC2.getPMPEIE : TBits_1; inline;
  50902. begin
  50903. getPMPEIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  50904. end;
  50905. procedure TINT_IEC2.setU1BEIE; inline;
  50906. begin
  50907. pTDefRegMap(@Self)^.&set := $00000008;
  50908. end;
  50909. procedure TINT_IEC2.clearU1BEIE; inline;
  50910. begin
  50911. pTDefRegMap(@Self)^.clr := $00000008;
  50912. end;
  50913. procedure TINT_IEC2.setU1BEIE(thebits : TBits_1); inline;
  50914. begin
  50915. if thebits = 0 then
  50916. pTDefRegMap(@Self)^.clr := $00000008
  50917. else
  50918. pTDefRegMap(@Self)^.&set := $00000008;
  50919. end;
  50920. function TINT_IEC2.getU1BEIE : TBits_1; inline;
  50921. begin
  50922. getU1BEIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  50923. end;
  50924. procedure TINT_IEC2.setU1BRXIE; inline;
  50925. begin
  50926. pTDefRegMap(@Self)^.&set := $00000010;
  50927. end;
  50928. procedure TINT_IEC2.clearU1BRXIE; inline;
  50929. begin
  50930. pTDefRegMap(@Self)^.clr := $00000010;
  50931. end;
  50932. procedure TINT_IEC2.setU1BRXIE(thebits : TBits_1); inline;
  50933. begin
  50934. if thebits = 0 then
  50935. pTDefRegMap(@Self)^.clr := $00000010
  50936. else
  50937. pTDefRegMap(@Self)^.&set := $00000010;
  50938. end;
  50939. function TINT_IEC2.getU1BRXIE : TBits_1; inline;
  50940. begin
  50941. getU1BRXIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  50942. end;
  50943. procedure TINT_IEC2.setU1BTXIE; inline;
  50944. begin
  50945. pTDefRegMap(@Self)^.&set := $00000020;
  50946. end;
  50947. procedure TINT_IEC2.clearU1BTXIE; inline;
  50948. begin
  50949. pTDefRegMap(@Self)^.clr := $00000020;
  50950. end;
  50951. procedure TINT_IEC2.setU1BTXIE(thebits : TBits_1); inline;
  50952. begin
  50953. if thebits = 0 then
  50954. pTDefRegMap(@Self)^.clr := $00000020
  50955. else
  50956. pTDefRegMap(@Self)^.&set := $00000020;
  50957. end;
  50958. function TINT_IEC2.getU1BTXIE : TBits_1; inline;
  50959. begin
  50960. getU1BTXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50961. end;
  50962. procedure TINT_IEC2.setU2BEIE; inline;
  50963. begin
  50964. pTDefRegMap(@Self)^.&set := $00000040;
  50965. end;
  50966. procedure TINT_IEC2.clearU2BEIE; inline;
  50967. begin
  50968. pTDefRegMap(@Self)^.clr := $00000040;
  50969. end;
  50970. procedure TINT_IEC2.setU2BEIE(thebits : TBits_1); inline;
  50971. begin
  50972. if thebits = 0 then
  50973. pTDefRegMap(@Self)^.clr := $00000040
  50974. else
  50975. pTDefRegMap(@Self)^.&set := $00000040;
  50976. end;
  50977. function TINT_IEC2.getU2BEIE : TBits_1; inline;
  50978. begin
  50979. getU2BEIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50980. end;
  50981. procedure TINT_IEC2.setU2BRXIE; inline;
  50982. begin
  50983. pTDefRegMap(@Self)^.&set := $00000080;
  50984. end;
  50985. procedure TINT_IEC2.clearU2BRXIE; inline;
  50986. begin
  50987. pTDefRegMap(@Self)^.clr := $00000080;
  50988. end;
  50989. procedure TINT_IEC2.setU2BRXIE(thebits : TBits_1); inline;
  50990. begin
  50991. if thebits = 0 then
  50992. pTDefRegMap(@Self)^.clr := $00000080
  50993. else
  50994. pTDefRegMap(@Self)^.&set := $00000080;
  50995. end;
  50996. function TINT_IEC2.getU2BRXIE : TBits_1; inline;
  50997. begin
  50998. getU2BRXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50999. end;
  51000. procedure TINT_IEC2.setU2BTXIE; inline;
  51001. begin
  51002. pTDefRegMap(@Self)^.&set := $00000100;
  51003. end;
  51004. procedure TINT_IEC2.clearU2BTXIE; inline;
  51005. begin
  51006. pTDefRegMap(@Self)^.clr := $00000100;
  51007. end;
  51008. procedure TINT_IEC2.setU2BTXIE(thebits : TBits_1); inline;
  51009. begin
  51010. if thebits = 0 then
  51011. pTDefRegMap(@Self)^.clr := $00000100
  51012. else
  51013. pTDefRegMap(@Self)^.&set := $00000100;
  51014. end;
  51015. function TINT_IEC2.getU2BTXIE : TBits_1; inline;
  51016. begin
  51017. getU2BTXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  51018. end;
  51019. procedure TINT_IEC2.setU3BEIE; inline;
  51020. begin
  51021. pTDefRegMap(@Self)^.&set := $00000200;
  51022. end;
  51023. procedure TINT_IEC2.clearU3BEIE; inline;
  51024. begin
  51025. pTDefRegMap(@Self)^.clr := $00000200;
  51026. end;
  51027. procedure TINT_IEC2.setU3BEIE(thebits : TBits_1); inline;
  51028. begin
  51029. if thebits = 0 then
  51030. pTDefRegMap(@Self)^.clr := $00000200
  51031. else
  51032. pTDefRegMap(@Self)^.&set := $00000200;
  51033. end;
  51034. function TINT_IEC2.getU3BEIE : TBits_1; inline;
  51035. begin
  51036. getU3BEIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  51037. end;
  51038. procedure TINT_IEC2.setU3BRXIE; inline;
  51039. begin
  51040. pTDefRegMap(@Self)^.&set := $00000400;
  51041. end;
  51042. procedure TINT_IEC2.clearU3BRXIE; inline;
  51043. begin
  51044. pTDefRegMap(@Self)^.clr := $00000400;
  51045. end;
  51046. procedure TINT_IEC2.setU3BRXIE(thebits : TBits_1); inline;
  51047. begin
  51048. if thebits = 0 then
  51049. pTDefRegMap(@Self)^.clr := $00000400
  51050. else
  51051. pTDefRegMap(@Self)^.&set := $00000400;
  51052. end;
  51053. function TINT_IEC2.getU3BRXIE : TBits_1; inline;
  51054. begin
  51055. getU3BRXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  51056. end;
  51057. procedure TINT_IEC2.setU3BTXIE; inline;
  51058. begin
  51059. pTDefRegMap(@Self)^.&set := $00000800;
  51060. end;
  51061. procedure TINT_IEC2.clearU3BTXIE; inline;
  51062. begin
  51063. pTDefRegMap(@Self)^.clr := $00000800;
  51064. end;
  51065. procedure TINT_IEC2.setU3BTXIE(thebits : TBits_1); inline;
  51066. begin
  51067. if thebits = 0 then
  51068. pTDefRegMap(@Self)^.clr := $00000800
  51069. else
  51070. pTDefRegMap(@Self)^.&set := $00000800;
  51071. end;
  51072. function TINT_IEC2.getU3BTXIE : TBits_1; inline;
  51073. begin
  51074. getU3BTXIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  51075. end;
  51076. procedure TINT_IEC2.setU4EIE; inline;
  51077. begin
  51078. pTDefRegMap(@Self)^.&set := $00000008;
  51079. end;
  51080. procedure TINT_IEC2.clearU4EIE; inline;
  51081. begin
  51082. pTDefRegMap(@Self)^.clr := $00000008;
  51083. end;
  51084. procedure TINT_IEC2.setU4EIE(thebits : TBits_1); inline;
  51085. begin
  51086. if thebits = 0 then
  51087. pTDefRegMap(@Self)^.clr := $00000008
  51088. else
  51089. pTDefRegMap(@Self)^.&set := $00000008;
  51090. end;
  51091. function TINT_IEC2.getU4EIE : TBits_1; inline;
  51092. begin
  51093. getU4EIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  51094. end;
  51095. procedure TINT_IEC2.setU4RXIE; inline;
  51096. begin
  51097. pTDefRegMap(@Self)^.&set := $00000010;
  51098. end;
  51099. procedure TINT_IEC2.clearU4RXIE; inline;
  51100. begin
  51101. pTDefRegMap(@Self)^.clr := $00000010;
  51102. end;
  51103. procedure TINT_IEC2.setU4RXIE(thebits : TBits_1); inline;
  51104. begin
  51105. if thebits = 0 then
  51106. pTDefRegMap(@Self)^.clr := $00000010
  51107. else
  51108. pTDefRegMap(@Self)^.&set := $00000010;
  51109. end;
  51110. function TINT_IEC2.getU4RXIE : TBits_1; inline;
  51111. begin
  51112. getU4RXIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51113. end;
  51114. procedure TINT_IEC2.setU4TXIE; inline;
  51115. begin
  51116. pTDefRegMap(@Self)^.&set := $00000020;
  51117. end;
  51118. procedure TINT_IEC2.clearU4TXIE; inline;
  51119. begin
  51120. pTDefRegMap(@Self)^.clr := $00000020;
  51121. end;
  51122. procedure TINT_IEC2.setU4TXIE(thebits : TBits_1); inline;
  51123. begin
  51124. if thebits = 0 then
  51125. pTDefRegMap(@Self)^.clr := $00000020
  51126. else
  51127. pTDefRegMap(@Self)^.&set := $00000020;
  51128. end;
  51129. function TINT_IEC2.getU4TXIE : TBits_1; inline;
  51130. begin
  51131. getU4TXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51132. end;
  51133. procedure TINT_IEC2.setU6EIE; inline;
  51134. begin
  51135. pTDefRegMap(@Self)^.&set := $00000040;
  51136. end;
  51137. procedure TINT_IEC2.clearU6EIE; inline;
  51138. begin
  51139. pTDefRegMap(@Self)^.clr := $00000040;
  51140. end;
  51141. procedure TINT_IEC2.setU6EIE(thebits : TBits_1); inline;
  51142. begin
  51143. if thebits = 0 then
  51144. pTDefRegMap(@Self)^.clr := $00000040
  51145. else
  51146. pTDefRegMap(@Self)^.&set := $00000040;
  51147. end;
  51148. function TINT_IEC2.getU6EIE : TBits_1; inline;
  51149. begin
  51150. getU6EIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  51151. end;
  51152. procedure TINT_IEC2.setU6RXIE; inline;
  51153. begin
  51154. pTDefRegMap(@Self)^.&set := $00000080;
  51155. end;
  51156. procedure TINT_IEC2.clearU6RXIE; inline;
  51157. begin
  51158. pTDefRegMap(@Self)^.clr := $00000080;
  51159. end;
  51160. procedure TINT_IEC2.setU6RXIE(thebits : TBits_1); inline;
  51161. begin
  51162. if thebits = 0 then
  51163. pTDefRegMap(@Self)^.clr := $00000080
  51164. else
  51165. pTDefRegMap(@Self)^.&set := $00000080;
  51166. end;
  51167. function TINT_IEC2.getU6RXIE : TBits_1; inline;
  51168. begin
  51169. getU6RXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51170. end;
  51171. procedure TINT_IEC2.setU6TXIE; inline;
  51172. begin
  51173. pTDefRegMap(@Self)^.&set := $00000100;
  51174. end;
  51175. procedure TINT_IEC2.clearU6TXIE; inline;
  51176. begin
  51177. pTDefRegMap(@Self)^.clr := $00000100;
  51178. end;
  51179. procedure TINT_IEC2.setU6TXIE(thebits : TBits_1); inline;
  51180. begin
  51181. if thebits = 0 then
  51182. pTDefRegMap(@Self)^.clr := $00000100
  51183. else
  51184. pTDefRegMap(@Self)^.&set := $00000100;
  51185. end;
  51186. function TINT_IEC2.getU6TXIE : TBits_1; inline;
  51187. begin
  51188. getU6TXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  51189. end;
  51190. procedure TINT_IEC2.setU5EIE; inline;
  51191. begin
  51192. pTDefRegMap(@Self)^.&set := $00000200;
  51193. end;
  51194. procedure TINT_IEC2.clearU5EIE; inline;
  51195. begin
  51196. pTDefRegMap(@Self)^.clr := $00000200;
  51197. end;
  51198. procedure TINT_IEC2.setU5EIE(thebits : TBits_1); inline;
  51199. begin
  51200. if thebits = 0 then
  51201. pTDefRegMap(@Self)^.clr := $00000200
  51202. else
  51203. pTDefRegMap(@Self)^.&set := $00000200;
  51204. end;
  51205. function TINT_IEC2.getU5EIE : TBits_1; inline;
  51206. begin
  51207. getU5EIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  51208. end;
  51209. procedure TINT_IEC2.setU5RXIE; inline;
  51210. begin
  51211. pTDefRegMap(@Self)^.&set := $00000400;
  51212. end;
  51213. procedure TINT_IEC2.clearU5RXIE; inline;
  51214. begin
  51215. pTDefRegMap(@Self)^.clr := $00000400;
  51216. end;
  51217. procedure TINT_IEC2.setU5RXIE(thebits : TBits_1); inline;
  51218. begin
  51219. if thebits = 0 then
  51220. pTDefRegMap(@Self)^.clr := $00000400
  51221. else
  51222. pTDefRegMap(@Self)^.&set := $00000400;
  51223. end;
  51224. function TINT_IEC2.getU5RXIE : TBits_1; inline;
  51225. begin
  51226. getU5RXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  51227. end;
  51228. procedure TINT_IEC2.setU5TXIE; inline;
  51229. begin
  51230. pTDefRegMap(@Self)^.&set := $00000800;
  51231. end;
  51232. procedure TINT_IEC2.clearU5TXIE; inline;
  51233. begin
  51234. pTDefRegMap(@Self)^.clr := $00000800;
  51235. end;
  51236. procedure TINT_IEC2.setU5TXIE(thebits : TBits_1); inline;
  51237. begin
  51238. if thebits = 0 then
  51239. pTDefRegMap(@Self)^.clr := $00000800
  51240. else
  51241. pTDefRegMap(@Self)^.&set := $00000800;
  51242. end;
  51243. function TINT_IEC2.getU5TXIE : TBits_1; inline;
  51244. begin
  51245. getU5TXIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  51246. end;
  51247. procedure TINT_IEC2.setw(thebits : TBits_32); inline;
  51248. begin
  51249. pTDefRegMap(@Self)^.val := thebits;
  51250. end;
  51251. function TINT_IEC2.getw : TBits_32; inline;
  51252. begin
  51253. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51254. end;
  51255. procedure TINT_IPC0.setCTIS(thebits : TBits_2); inline;
  51256. begin
  51257. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51258. end;
  51259. function TINT_IPC0.getCTIS : TBits_2; inline;
  51260. begin
  51261. getCTIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51262. end;
  51263. procedure TINT_IPC0.setCTIP(thebits : TBits_3); inline;
  51264. begin
  51265. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51266. end;
  51267. function TINT_IPC0.getCTIP : TBits_3; inline;
  51268. begin
  51269. getCTIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51270. end;
  51271. procedure TINT_IPC0.setCS0IS(thebits : TBits_2); inline;
  51272. begin
  51273. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51274. end;
  51275. function TINT_IPC0.getCS0IS : TBits_2; inline;
  51276. begin
  51277. getCS0IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51278. end;
  51279. procedure TINT_IPC0.setCS0IP(thebits : TBits_3); inline;
  51280. begin
  51281. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51282. end;
  51283. function TINT_IPC0.getCS0IP : TBits_3; inline;
  51284. begin
  51285. getCS0IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51286. end;
  51287. procedure TINT_IPC0.setCS1IS(thebits : TBits_2); inline;
  51288. begin
  51289. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51290. end;
  51291. function TINT_IPC0.getCS1IS : TBits_2; inline;
  51292. begin
  51293. getCS1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51294. end;
  51295. procedure TINT_IPC0.setCS1IP(thebits : TBits_3); inline;
  51296. begin
  51297. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51298. end;
  51299. function TINT_IPC0.getCS1IP : TBits_3; inline;
  51300. begin
  51301. getCS1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51302. end;
  51303. procedure TINT_IPC0.setINT0IS(thebits : TBits_2); inline;
  51304. begin
  51305. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51306. end;
  51307. function TINT_IPC0.getINT0IS : TBits_2; inline;
  51308. begin
  51309. getINT0IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51310. end;
  51311. procedure TINT_IPC0.setINT0IP(thebits : TBits_3); inline;
  51312. begin
  51313. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51314. end;
  51315. function TINT_IPC0.getINT0IP : TBits_3; inline;
  51316. begin
  51317. getINT0IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51318. end;
  51319. procedure TINT_IPC0.setw(thebits : TBits_32); inline;
  51320. begin
  51321. pTDefRegMap(@Self)^.val := thebits;
  51322. end;
  51323. function TINT_IPC0.getw : TBits_32; inline;
  51324. begin
  51325. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51326. end;
  51327. procedure TINT_IPC1.setT1IS(thebits : TBits_2); inline;
  51328. begin
  51329. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51330. end;
  51331. function TINT_IPC1.getT1IS : TBits_2; inline;
  51332. begin
  51333. getT1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51334. end;
  51335. procedure TINT_IPC1.setT1IP(thebits : TBits_3); inline;
  51336. begin
  51337. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51338. end;
  51339. function TINT_IPC1.getT1IP : TBits_3; inline;
  51340. begin
  51341. getT1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51342. end;
  51343. procedure TINT_IPC1.setIC1IS(thebits : TBits_2); inline;
  51344. begin
  51345. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51346. end;
  51347. function TINT_IPC1.getIC1IS : TBits_2; inline;
  51348. begin
  51349. getIC1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51350. end;
  51351. procedure TINT_IPC1.setIC1IP(thebits : TBits_3); inline;
  51352. begin
  51353. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51354. end;
  51355. function TINT_IPC1.getIC1IP : TBits_3; inline;
  51356. begin
  51357. getIC1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51358. end;
  51359. procedure TINT_IPC1.setOC1IS(thebits : TBits_2); inline;
  51360. begin
  51361. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51362. end;
  51363. function TINT_IPC1.getOC1IS : TBits_2; inline;
  51364. begin
  51365. getOC1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51366. end;
  51367. procedure TINT_IPC1.setOC1IP(thebits : TBits_3); inline;
  51368. begin
  51369. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51370. end;
  51371. function TINT_IPC1.getOC1IP : TBits_3; inline;
  51372. begin
  51373. getOC1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51374. end;
  51375. procedure TINT_IPC1.setINT1IS(thebits : TBits_2); inline;
  51376. begin
  51377. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51378. end;
  51379. function TINT_IPC1.getINT1IS : TBits_2; inline;
  51380. begin
  51381. getINT1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51382. end;
  51383. procedure TINT_IPC1.setINT1IP(thebits : TBits_3); inline;
  51384. begin
  51385. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51386. end;
  51387. function TINT_IPC1.getINT1IP : TBits_3; inline;
  51388. begin
  51389. getINT1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51390. end;
  51391. procedure TINT_IPC1.setw(thebits : TBits_32); inline;
  51392. begin
  51393. pTDefRegMap(@Self)^.val := thebits;
  51394. end;
  51395. function TINT_IPC1.getw : TBits_32; inline;
  51396. begin
  51397. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51398. end;
  51399. procedure TINT_IPC2.setT2IS(thebits : TBits_2); inline;
  51400. begin
  51401. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51402. end;
  51403. function TINT_IPC2.getT2IS : TBits_2; inline;
  51404. begin
  51405. getT2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51406. end;
  51407. procedure TINT_IPC2.setT2IP(thebits : TBits_3); inline;
  51408. begin
  51409. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51410. end;
  51411. function TINT_IPC2.getT2IP : TBits_3; inline;
  51412. begin
  51413. getT2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51414. end;
  51415. procedure TINT_IPC2.setIC2IS(thebits : TBits_2); inline;
  51416. begin
  51417. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51418. end;
  51419. function TINT_IPC2.getIC2IS : TBits_2; inline;
  51420. begin
  51421. getIC2IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51422. end;
  51423. procedure TINT_IPC2.setIC2IP(thebits : TBits_3); inline;
  51424. begin
  51425. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51426. end;
  51427. function TINT_IPC2.getIC2IP : TBits_3; inline;
  51428. begin
  51429. getIC2IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51430. end;
  51431. procedure TINT_IPC2.setOC2IS(thebits : TBits_2); inline;
  51432. begin
  51433. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51434. end;
  51435. function TINT_IPC2.getOC2IS : TBits_2; inline;
  51436. begin
  51437. getOC2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51438. end;
  51439. procedure TINT_IPC2.setOC2IP(thebits : TBits_3); inline;
  51440. begin
  51441. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51442. end;
  51443. function TINT_IPC2.getOC2IP : TBits_3; inline;
  51444. begin
  51445. getOC2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51446. end;
  51447. procedure TINT_IPC2.setINT2IS(thebits : TBits_2); inline;
  51448. begin
  51449. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51450. end;
  51451. function TINT_IPC2.getINT2IS : TBits_2; inline;
  51452. begin
  51453. getINT2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51454. end;
  51455. procedure TINT_IPC2.setINT2IP(thebits : TBits_3); inline;
  51456. begin
  51457. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51458. end;
  51459. function TINT_IPC2.getINT2IP : TBits_3; inline;
  51460. begin
  51461. getINT2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51462. end;
  51463. procedure TINT_IPC2.setw(thebits : TBits_32); inline;
  51464. begin
  51465. pTDefRegMap(@Self)^.val := thebits;
  51466. end;
  51467. function TINT_IPC2.getw : TBits_32; inline;
  51468. begin
  51469. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51470. end;
  51471. procedure TINT_IPC3.setT3IS(thebits : TBits_2); inline;
  51472. begin
  51473. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51474. end;
  51475. function TINT_IPC3.getT3IS : TBits_2; inline;
  51476. begin
  51477. getT3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51478. end;
  51479. procedure TINT_IPC3.setT3IP(thebits : TBits_3); inline;
  51480. begin
  51481. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51482. end;
  51483. function TINT_IPC3.getT3IP : TBits_3; inline;
  51484. begin
  51485. getT3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51486. end;
  51487. procedure TINT_IPC3.setIC3IS(thebits : TBits_2); inline;
  51488. begin
  51489. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51490. end;
  51491. function TINT_IPC3.getIC3IS : TBits_2; inline;
  51492. begin
  51493. getIC3IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51494. end;
  51495. procedure TINT_IPC3.setIC3IP(thebits : TBits_3); inline;
  51496. begin
  51497. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51498. end;
  51499. function TINT_IPC3.getIC3IP : TBits_3; inline;
  51500. begin
  51501. getIC3IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51502. end;
  51503. procedure TINT_IPC3.setOC3IS(thebits : TBits_2); inline;
  51504. begin
  51505. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51506. end;
  51507. function TINT_IPC3.getOC3IS : TBits_2; inline;
  51508. begin
  51509. getOC3IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51510. end;
  51511. procedure TINT_IPC3.setOC3IP(thebits : TBits_3); inline;
  51512. begin
  51513. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51514. end;
  51515. function TINT_IPC3.getOC3IP : TBits_3; inline;
  51516. begin
  51517. getOC3IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51518. end;
  51519. procedure TINT_IPC3.setINT3IS(thebits : TBits_2); inline;
  51520. begin
  51521. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51522. end;
  51523. function TINT_IPC3.getINT3IS : TBits_2; inline;
  51524. begin
  51525. getINT3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51526. end;
  51527. procedure TINT_IPC3.setINT3IP(thebits : TBits_3); inline;
  51528. begin
  51529. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51530. end;
  51531. function TINT_IPC3.getINT3IP : TBits_3; inline;
  51532. begin
  51533. getINT3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51534. end;
  51535. procedure TINT_IPC3.setw(thebits : TBits_32); inline;
  51536. begin
  51537. pTDefRegMap(@Self)^.val := thebits;
  51538. end;
  51539. function TINT_IPC3.getw : TBits_32; inline;
  51540. begin
  51541. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51542. end;
  51543. procedure TINT_IPC4.setT4IS(thebits : TBits_2); inline;
  51544. begin
  51545. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51546. end;
  51547. function TINT_IPC4.getT4IS : TBits_2; inline;
  51548. begin
  51549. getT4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51550. end;
  51551. procedure TINT_IPC4.setT4IP(thebits : TBits_3); inline;
  51552. begin
  51553. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51554. end;
  51555. function TINT_IPC4.getT4IP : TBits_3; inline;
  51556. begin
  51557. getT4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51558. end;
  51559. procedure TINT_IPC4.setIC4IS(thebits : TBits_2); inline;
  51560. begin
  51561. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51562. end;
  51563. function TINT_IPC4.getIC4IS : TBits_2; inline;
  51564. begin
  51565. getIC4IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51566. end;
  51567. procedure TINT_IPC4.setIC4IP(thebits : TBits_3); inline;
  51568. begin
  51569. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51570. end;
  51571. function TINT_IPC4.getIC4IP : TBits_3; inline;
  51572. begin
  51573. getIC4IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51574. end;
  51575. procedure TINT_IPC4.setOC4IS(thebits : TBits_2); inline;
  51576. begin
  51577. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51578. end;
  51579. function TINT_IPC4.getOC4IS : TBits_2; inline;
  51580. begin
  51581. getOC4IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51582. end;
  51583. procedure TINT_IPC4.setOC4IP(thebits : TBits_3); inline;
  51584. begin
  51585. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51586. end;
  51587. function TINT_IPC4.getOC4IP : TBits_3; inline;
  51588. begin
  51589. getOC4IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51590. end;
  51591. procedure TINT_IPC4.setINT4IS(thebits : TBits_2); inline;
  51592. begin
  51593. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51594. end;
  51595. function TINT_IPC4.getINT4IS : TBits_2; inline;
  51596. begin
  51597. getINT4IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51598. end;
  51599. procedure TINT_IPC4.setINT4IP(thebits : TBits_3); inline;
  51600. begin
  51601. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51602. end;
  51603. function TINT_IPC4.getINT4IP : TBits_3; inline;
  51604. begin
  51605. getINT4IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51606. end;
  51607. procedure TINT_IPC4.setw(thebits : TBits_32); inline;
  51608. begin
  51609. pTDefRegMap(@Self)^.val := thebits;
  51610. end;
  51611. function TINT_IPC4.getw : TBits_32; inline;
  51612. begin
  51613. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51614. end;
  51615. procedure TINT_IPC5.setT5IS(thebits : TBits_2); inline;
  51616. begin
  51617. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51618. end;
  51619. function TINT_IPC5.getT5IS : TBits_2; inline;
  51620. begin
  51621. getT5IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51622. end;
  51623. procedure TINT_IPC5.setT5IP(thebits : TBits_3); inline;
  51624. begin
  51625. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51626. end;
  51627. function TINT_IPC5.getT5IP : TBits_3; inline;
  51628. begin
  51629. getT5IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51630. end;
  51631. procedure TINT_IPC5.setIC5IS(thebits : TBits_2); inline;
  51632. begin
  51633. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51634. end;
  51635. function TINT_IPC5.getIC5IS : TBits_2; inline;
  51636. begin
  51637. getIC5IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51638. end;
  51639. procedure TINT_IPC5.setIC5IP(thebits : TBits_3); inline;
  51640. begin
  51641. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51642. end;
  51643. function TINT_IPC5.getIC5IP : TBits_3; inline;
  51644. begin
  51645. getIC5IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51646. end;
  51647. procedure TINT_IPC5.setOC5IS(thebits : TBits_2); inline;
  51648. begin
  51649. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51650. end;
  51651. function TINT_IPC5.getOC5IS : TBits_2; inline;
  51652. begin
  51653. getOC5IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51654. end;
  51655. procedure TINT_IPC5.setOC5IP(thebits : TBits_3); inline;
  51656. begin
  51657. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51658. end;
  51659. function TINT_IPC5.getOC5IP : TBits_3; inline;
  51660. begin
  51661. getOC5IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51662. end;
  51663. procedure TINT_IPC5.setw(thebits : TBits_32); inline;
  51664. begin
  51665. pTDefRegMap(@Self)^.val := thebits;
  51666. end;
  51667. function TINT_IPC5.getw : TBits_32; inline;
  51668. begin
  51669. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51670. end;
  51671. procedure TINT_IPC6.setU1IS(thebits : TBits_2); inline;
  51672. begin
  51673. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51674. end;
  51675. function TINT_IPC6.getU1IS : TBits_2; inline;
  51676. begin
  51677. getU1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51678. end;
  51679. procedure TINT_IPC6.setU1IP(thebits : TBits_3); inline;
  51680. begin
  51681. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51682. end;
  51683. function TINT_IPC6.getU1IP : TBits_3; inline;
  51684. begin
  51685. getU1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51686. end;
  51687. procedure TINT_IPC6.setI2C1IS(thebits : TBits_2); inline;
  51688. begin
  51689. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51690. end;
  51691. function TINT_IPC6.getI2C1IS : TBits_2; inline;
  51692. begin
  51693. getI2C1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51694. end;
  51695. procedure TINT_IPC6.setI2C1IP(thebits : TBits_3); inline;
  51696. begin
  51697. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51698. end;
  51699. function TINT_IPC6.getI2C1IP : TBits_3; inline;
  51700. begin
  51701. getI2C1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51702. end;
  51703. procedure TINT_IPC6.setCNIS(thebits : TBits_2); inline;
  51704. begin
  51705. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51706. end;
  51707. function TINT_IPC6.getCNIS : TBits_2; inline;
  51708. begin
  51709. getCNIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51710. end;
  51711. procedure TINT_IPC6.setCNIP(thebits : TBits_3); inline;
  51712. begin
  51713. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51714. end;
  51715. function TINT_IPC6.getCNIP : TBits_3; inline;
  51716. begin
  51717. getCNIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51718. end;
  51719. procedure TINT_IPC6.setAD1IS(thebits : TBits_2); inline;
  51720. begin
  51721. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51722. end;
  51723. function TINT_IPC6.getAD1IS : TBits_2; inline;
  51724. begin
  51725. getAD1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51726. end;
  51727. procedure TINT_IPC6.setAD1IP(thebits : TBits_3); inline;
  51728. begin
  51729. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51730. end;
  51731. function TINT_IPC6.getAD1IP : TBits_3; inline;
  51732. begin
  51733. getAD1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51734. end;
  51735. procedure TINT_IPC6.setU1AIS(thebits : TBits_2); inline;
  51736. begin
  51737. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51738. end;
  51739. function TINT_IPC6.getU1AIS : TBits_2; inline;
  51740. begin
  51741. getU1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51742. end;
  51743. procedure TINT_IPC6.setU1AIP(thebits : TBits_3); inline;
  51744. begin
  51745. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51746. end;
  51747. function TINT_IPC6.getU1AIP : TBits_3; inline;
  51748. begin
  51749. getU1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51750. end;
  51751. procedure TINT_IPC6.setSPI3IS(thebits : TBits_2); inline;
  51752. begin
  51753. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51754. end;
  51755. function TINT_IPC6.getSPI3IS : TBits_2; inline;
  51756. begin
  51757. getSPI3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51758. end;
  51759. procedure TINT_IPC6.setSPI3IP(thebits : TBits_3); inline;
  51760. begin
  51761. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51762. end;
  51763. function TINT_IPC6.getSPI3IP : TBits_3; inline;
  51764. begin
  51765. getSPI3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51766. end;
  51767. procedure TINT_IPC6.setSPI1AIS(thebits : TBits_2); inline;
  51768. begin
  51769. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51770. end;
  51771. function TINT_IPC6.getSPI1AIS : TBits_2; inline;
  51772. begin
  51773. getSPI1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51774. end;
  51775. procedure TINT_IPC6.setSPI1AIP(thebits : TBits_3); inline;
  51776. begin
  51777. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51778. end;
  51779. function TINT_IPC6.getSPI1AIP : TBits_3; inline;
  51780. begin
  51781. getSPI1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51782. end;
  51783. procedure TINT_IPC6.setI2C3IS(thebits : TBits_2); inline;
  51784. begin
  51785. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51786. end;
  51787. function TINT_IPC6.getI2C3IS : TBits_2; inline;
  51788. begin
  51789. getI2C3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51790. end;
  51791. procedure TINT_IPC6.setI2C3IP(thebits : TBits_3); inline;
  51792. begin
  51793. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51794. end;
  51795. function TINT_IPC6.getI2C3IP : TBits_3; inline;
  51796. begin
  51797. getI2C3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51798. end;
  51799. procedure TINT_IPC6.setI2C1AIS(thebits : TBits_2); inline;
  51800. begin
  51801. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51802. end;
  51803. function TINT_IPC6.getI2C1AIS : TBits_2; inline;
  51804. begin
  51805. getI2C1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51806. end;
  51807. procedure TINT_IPC6.setI2C1AIP(thebits : TBits_3); inline;
  51808. begin
  51809. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51810. end;
  51811. function TINT_IPC6.getI2C1AIP : TBits_3; inline;
  51812. begin
  51813. getI2C1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51814. end;
  51815. procedure TINT_IPC6.setw(thebits : TBits_32); inline;
  51816. begin
  51817. pTDefRegMap(@Self)^.val := thebits;
  51818. end;
  51819. function TINT_IPC6.getw : TBits_32; inline;
  51820. begin
  51821. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51822. end;
  51823. procedure TINT_IPC7.setPMPIS(thebits : TBits_2); inline;
  51824. begin
  51825. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51826. end;
  51827. function TINT_IPC7.getPMPIS : TBits_2; inline;
  51828. begin
  51829. getPMPIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51830. end;
  51831. procedure TINT_IPC7.setPMPIP(thebits : TBits_3); inline;
  51832. begin
  51833. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51834. end;
  51835. function TINT_IPC7.getPMPIP : TBits_3; inline;
  51836. begin
  51837. getPMPIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51838. end;
  51839. procedure TINT_IPC7.setCMP1IS(thebits : TBits_2); inline;
  51840. begin
  51841. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51842. end;
  51843. function TINT_IPC7.getCMP1IS : TBits_2; inline;
  51844. begin
  51845. getCMP1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51846. end;
  51847. procedure TINT_IPC7.setCMP1IP(thebits : TBits_3); inline;
  51848. begin
  51849. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51850. end;
  51851. function TINT_IPC7.getCMP1IP : TBits_3; inline;
  51852. begin
  51853. getCMP1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51854. end;
  51855. procedure TINT_IPC7.setCMP2IS(thebits : TBits_2); inline;
  51856. begin
  51857. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51858. end;
  51859. function TINT_IPC7.getCMP2IS : TBits_2; inline;
  51860. begin
  51861. getCMP2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51862. end;
  51863. procedure TINT_IPC7.setCMP2IP(thebits : TBits_3); inline;
  51864. begin
  51865. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51866. end;
  51867. function TINT_IPC7.getCMP2IP : TBits_3; inline;
  51868. begin
  51869. getCMP2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51870. end;
  51871. procedure TINT_IPC7.setU3IS(thebits : TBits_2); inline;
  51872. begin
  51873. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51874. end;
  51875. function TINT_IPC7.getU3IS : TBits_2; inline;
  51876. begin
  51877. getU3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51878. end;
  51879. procedure TINT_IPC7.setU3IP(thebits : TBits_3); inline;
  51880. begin
  51881. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51882. end;
  51883. function TINT_IPC7.getU3IP : TBits_3; inline;
  51884. begin
  51885. getU3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51886. end;
  51887. procedure TINT_IPC7.setU2AIS(thebits : TBits_2); inline;
  51888. begin
  51889. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51890. end;
  51891. function TINT_IPC7.getU2AIS : TBits_2; inline;
  51892. begin
  51893. getU2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51894. end;
  51895. procedure TINT_IPC7.setU2AIP(thebits : TBits_3); inline;
  51896. begin
  51897. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51898. end;
  51899. function TINT_IPC7.getU2AIP : TBits_3; inline;
  51900. begin
  51901. getU2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51902. end;
  51903. procedure TINT_IPC7.setSPI2IS(thebits : TBits_2); inline;
  51904. begin
  51905. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51906. end;
  51907. function TINT_IPC7.getSPI2IS : TBits_2; inline;
  51908. begin
  51909. getSPI2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51910. end;
  51911. procedure TINT_IPC7.setSPI2IP(thebits : TBits_3); inline;
  51912. begin
  51913. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51914. end;
  51915. function TINT_IPC7.getSPI2IP : TBits_3; inline;
  51916. begin
  51917. getSPI2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51918. end;
  51919. procedure TINT_IPC7.setSPI2AIS(thebits : TBits_2); inline;
  51920. begin
  51921. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51922. end;
  51923. function TINT_IPC7.getSPI2AIS : TBits_2; inline;
  51924. begin
  51925. getSPI2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51926. end;
  51927. procedure TINT_IPC7.setSPI2AIP(thebits : TBits_3); inline;
  51928. begin
  51929. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51930. end;
  51931. function TINT_IPC7.getSPI2AIP : TBits_3; inline;
  51932. begin
  51933. getSPI2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51934. end;
  51935. procedure TINT_IPC7.setI2C4IS(thebits : TBits_2); inline;
  51936. begin
  51937. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51938. end;
  51939. function TINT_IPC7.getI2C4IS : TBits_2; inline;
  51940. begin
  51941. getI2C4IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51942. end;
  51943. procedure TINT_IPC7.setI2C4IP(thebits : TBits_3); inline;
  51944. begin
  51945. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51946. end;
  51947. function TINT_IPC7.getI2C4IP : TBits_3; inline;
  51948. begin
  51949. getI2C4IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51950. end;
  51951. procedure TINT_IPC7.setI2C2AIS(thebits : TBits_2); inline;
  51952. begin
  51953. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51954. end;
  51955. function TINT_IPC7.getI2C2AIS : TBits_2; inline;
  51956. begin
  51957. getI2C2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51958. end;
  51959. procedure TINT_IPC7.setI2C2AIP(thebits : TBits_3); inline;
  51960. begin
  51961. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51962. end;
  51963. function TINT_IPC7.getI2C2AIP : TBits_3; inline;
  51964. begin
  51965. getI2C2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51966. end;
  51967. procedure TINT_IPC7.setw(thebits : TBits_32); inline;
  51968. begin
  51969. pTDefRegMap(@Self)^.val := thebits;
  51970. end;
  51971. function TINT_IPC7.getw : TBits_32; inline;
  51972. begin
  51973. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51974. end;
  51975. procedure TINT_IPC8.setU2IS(thebits : TBits_2); inline;
  51976. begin
  51977. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51978. end;
  51979. function TINT_IPC8.getU2IS : TBits_2; inline;
  51980. begin
  51981. getU2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51982. end;
  51983. procedure TINT_IPC8.setU2IP(thebits : TBits_3); inline;
  51984. begin
  51985. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51986. end;
  51987. function TINT_IPC8.getU2IP : TBits_3; inline;
  51988. begin
  51989. getU2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51990. end;
  51991. procedure TINT_IPC8.setFSCMIS(thebits : TBits_2); inline;
  51992. begin
  51993. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51994. end;
  51995. function TINT_IPC8.getFSCMIS : TBits_2; inline;
  51996. begin
  51997. getFSCMIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51998. end;
  51999. procedure TINT_IPC8.setFSCMIP(thebits : TBits_3); inline;
  52000. begin
  52001. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  52002. end;
  52003. function TINT_IPC8.getFSCMIP : TBits_3; inline;
  52004. begin
  52005. getFSCMIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  52006. end;
  52007. procedure TINT_IPC8.setRTCCIS(thebits : TBits_2); inline;
  52008. begin
  52009. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  52010. end;
  52011. function TINT_IPC8.getRTCCIS : TBits_2; inline;
  52012. begin
  52013. getRTCCIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  52014. end;
  52015. procedure TINT_IPC8.setRTCCIP(thebits : TBits_3); inline;
  52016. begin
  52017. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  52018. end;
  52019. function TINT_IPC8.getRTCCIP : TBits_3; inline;
  52020. begin
  52021. getRTCCIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  52022. end;
  52023. procedure TINT_IPC8.setU3AIS(thebits : TBits_2); inline;
  52024. begin
  52025. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52026. end;
  52027. function TINT_IPC8.getU3AIS : TBits_2; inline;
  52028. begin
  52029. getU3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52030. end;
  52031. procedure TINT_IPC8.setU3AIP(thebits : TBits_3); inline;
  52032. begin
  52033. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  52034. end;
  52035. function TINT_IPC8.getU3AIP : TBits_3; inline;
  52036. begin
  52037. getU3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  52038. end;
  52039. procedure TINT_IPC8.setSPI4IS(thebits : TBits_2); inline;
  52040. begin
  52041. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52042. end;
  52043. function TINT_IPC8.getSPI4IS : TBits_2; inline;
  52044. begin
  52045. getSPI4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52046. end;
  52047. procedure TINT_IPC8.setSPI4IP(thebits : TBits_3); inline;
  52048. begin
  52049. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  52050. end;
  52051. function TINT_IPC8.getSPI4IP : TBits_3; inline;
  52052. begin
  52053. getSPI4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  52054. end;
  52055. procedure TINT_IPC8.setSPI3AIS(thebits : TBits_2); inline;
  52056. begin
  52057. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52058. end;
  52059. function TINT_IPC8.getSPI3AIS : TBits_2; inline;
  52060. begin
  52061. getSPI3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52062. end;
  52063. procedure TINT_IPC8.setSPI3AIP(thebits : TBits_3); inline;
  52064. begin
  52065. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  52066. end;
  52067. function TINT_IPC8.getSPI3AIP : TBits_3; inline;
  52068. begin
  52069. getSPI3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  52070. end;
  52071. procedure TINT_IPC8.setI2C5IS(thebits : TBits_2); inline;
  52072. begin
  52073. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52074. end;
  52075. function TINT_IPC8.getI2C5IS : TBits_2; inline;
  52076. begin
  52077. getI2C5IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52078. end;
  52079. procedure TINT_IPC8.setI2C5IP(thebits : TBits_3); inline;
  52080. begin
  52081. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  52082. end;
  52083. function TINT_IPC8.getI2C5IP : TBits_3; inline;
  52084. begin
  52085. getI2C5IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  52086. end;
  52087. procedure TINT_IPC8.setI2C3AIS(thebits : TBits_2); inline;
  52088. begin
  52089. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52090. end;
  52091. function TINT_IPC8.getI2C3AIS : TBits_2; inline;
  52092. begin
  52093. getI2C3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52094. end;
  52095. procedure TINT_IPC8.setI2C3AIP(thebits : TBits_3); inline;
  52096. begin
  52097. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  52098. end;
  52099. function TINT_IPC8.getI2C3AIP : TBits_3; inline;
  52100. begin
  52101. getI2C3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  52102. end;
  52103. procedure TINT_IPC8.setw(thebits : TBits_32); inline;
  52104. begin
  52105. pTDefRegMap(@Self)^.val := thebits;
  52106. end;
  52107. function TINT_IPC8.getw : TBits_32; inline;
  52108. begin
  52109. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52110. end;
  52111. procedure TINT_IPC9.setDMA0IS(thebits : TBits_2); inline;
  52112. begin
  52113. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52114. end;
  52115. function TINT_IPC9.getDMA0IS : TBits_2; inline;
  52116. begin
  52117. getDMA0IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52118. end;
  52119. procedure TINT_IPC9.setDMA0IP(thebits : TBits_3); inline;
  52120. begin
  52121. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  52122. end;
  52123. function TINT_IPC9.getDMA0IP : TBits_3; inline;
  52124. begin
  52125. getDMA0IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  52126. end;
  52127. procedure TINT_IPC9.setDMA1IS(thebits : TBits_2); inline;
  52128. begin
  52129. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  52130. end;
  52131. function TINT_IPC9.getDMA1IS : TBits_2; inline;
  52132. begin
  52133. getDMA1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  52134. end;
  52135. procedure TINT_IPC9.setDMA1IP(thebits : TBits_3); inline;
  52136. begin
  52137. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  52138. end;
  52139. function TINT_IPC9.getDMA1IP : TBits_3; inline;
  52140. begin
  52141. getDMA1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  52142. end;
  52143. procedure TINT_IPC9.setDMA2IS(thebits : TBits_2); inline;
  52144. begin
  52145. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  52146. end;
  52147. function TINT_IPC9.getDMA2IS : TBits_2; inline;
  52148. begin
  52149. getDMA2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  52150. end;
  52151. procedure TINT_IPC9.setDMA2IP(thebits : TBits_3); inline;
  52152. begin
  52153. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  52154. end;
  52155. function TINT_IPC9.getDMA2IP : TBits_3; inline;
  52156. begin
  52157. getDMA2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  52158. end;
  52159. procedure TINT_IPC9.setDMA3IS(thebits : TBits_2); inline;
  52160. begin
  52161. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  52162. end;
  52163. function TINT_IPC9.getDMA3IS : TBits_2; inline;
  52164. begin
  52165. getDMA3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  52166. end;
  52167. procedure TINT_IPC9.setDMA3IP(thebits : TBits_3); inline;
  52168. begin
  52169. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  52170. end;
  52171. function TINT_IPC9.getDMA3IP : TBits_3; inline;
  52172. begin
  52173. getDMA3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  52174. end;
  52175. procedure TINT_IPC9.setw(thebits : TBits_32); inline;
  52176. begin
  52177. pTDefRegMap(@Self)^.val := thebits;
  52178. end;
  52179. function TINT_IPC9.getw : TBits_32; inline;
  52180. begin
  52181. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52182. end;
  52183. procedure TINT_IPC11.setFCEIS(thebits : TBits_2); inline;
  52184. begin
  52185. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52186. end;
  52187. function TINT_IPC11.getFCEIS : TBits_2; inline;
  52188. begin
  52189. getFCEIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52190. end;
  52191. procedure TINT_IPC11.setFCEIP(thebits : TBits_3); inline;
  52192. begin
  52193. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  52194. end;
  52195. function TINT_IPC11.getFCEIP : TBits_3; inline;
  52196. begin
  52197. getFCEIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  52198. end;
  52199. procedure TINT_IPC11.setUSBIS(thebits : TBits_2); inline;
  52200. begin
  52201. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  52202. end;
  52203. function TINT_IPC11.getUSBIS : TBits_2; inline;
  52204. begin
  52205. getUSBIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  52206. end;
  52207. procedure TINT_IPC11.setUSBIP(thebits : TBits_3); inline;
  52208. begin
  52209. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  52210. end;
  52211. function TINT_IPC11.getUSBIP : TBits_3; inline;
  52212. begin
  52213. getUSBIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  52214. end;
  52215. procedure TINT_IPC11.setCAN1IS(thebits : TBits_2); inline;
  52216. begin
  52217. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  52218. end;
  52219. function TINT_IPC11.getCAN1IS : TBits_2; inline;
  52220. begin
  52221. getCAN1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  52222. end;
  52223. procedure TINT_IPC11.setCAN1IP(thebits : TBits_3); inline;
  52224. begin
  52225. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  52226. end;
  52227. function TINT_IPC11.getCAN1IP : TBits_3; inline;
  52228. begin
  52229. getCAN1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  52230. end;
  52231. procedure TINT_IPC11.setw(thebits : TBits_32); inline;
  52232. begin
  52233. pTDefRegMap(@Self)^.val := thebits;
  52234. end;
  52235. function TINT_IPC11.getw : TBits_32; inline;
  52236. begin
  52237. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52238. end;
  52239. procedure TINT_IPC12.setETHIS(thebits : TBits_2); inline;
  52240. begin
  52241. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52242. end;
  52243. function TINT_IPC12.getETHIS : TBits_2; inline;
  52244. begin
  52245. getETHIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52246. end;
  52247. procedure TINT_IPC12.setETHIP(thebits : TBits_3); inline;
  52248. begin
  52249. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  52250. end;
  52251. function TINT_IPC12.getETHIP : TBits_3; inline;
  52252. begin
  52253. getETHIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  52254. end;
  52255. procedure TINT_IPC12.setU4IS(thebits : TBits_2); inline;
  52256. begin
  52257. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  52258. end;
  52259. function TINT_IPC12.getU4IS : TBits_2; inline;
  52260. begin
  52261. getU4IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  52262. end;
  52263. procedure TINT_IPC12.setU4IP(thebits : TBits_3); inline;
  52264. begin
  52265. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  52266. end;
  52267. function TINT_IPC12.getU4IP : TBits_3; inline;
  52268. begin
  52269. getU4IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  52270. end;
  52271. procedure TINT_IPC12.setU6IS(thebits : TBits_2); inline;
  52272. begin
  52273. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  52274. end;
  52275. function TINT_IPC12.getU6IS : TBits_2; inline;
  52276. begin
  52277. getU6IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  52278. end;
  52279. procedure TINT_IPC12.setU6IP(thebits : TBits_3); inline;
  52280. begin
  52281. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  52282. end;
  52283. function TINT_IPC12.getU6IP : TBits_3; inline;
  52284. begin
  52285. getU6IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  52286. end;
  52287. procedure TINT_IPC12.setU5IS(thebits : TBits_2); inline;
  52288. begin
  52289. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  52290. end;
  52291. function TINT_IPC12.getU5IS : TBits_2; inline;
  52292. begin
  52293. getU5IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  52294. end;
  52295. procedure TINT_IPC12.setU5IP(thebits : TBits_3); inline;
  52296. begin
  52297. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  52298. end;
  52299. function TINT_IPC12.getU5IP : TBits_3; inline;
  52300. begin
  52301. getU5IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  52302. end;
  52303. procedure TINT_IPC12.setU1BIS(thebits : TBits_2); inline;
  52304. begin
  52305. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  52306. end;
  52307. function TINT_IPC12.getU1BIS : TBits_2; inline;
  52308. begin
  52309. getU1BIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  52310. end;
  52311. procedure TINT_IPC12.setU1BIP(thebits : TBits_3); inline;
  52312. begin
  52313. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  52314. end;
  52315. function TINT_IPC12.getU1BIP : TBits_3; inline;
  52316. begin
  52317. getU1BIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  52318. end;
  52319. procedure TINT_IPC12.setU2BIS(thebits : TBits_2); inline;
  52320. begin
  52321. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  52322. end;
  52323. function TINT_IPC12.getU2BIS : TBits_2; inline;
  52324. begin
  52325. getU2BIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  52326. end;
  52327. procedure TINT_IPC12.setU2BIP(thebits : TBits_3); inline;
  52328. begin
  52329. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  52330. end;
  52331. function TINT_IPC12.getU2BIP : TBits_3; inline;
  52332. begin
  52333. getU2BIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  52334. end;
  52335. procedure TINT_IPC12.setU3BIS(thebits : TBits_2); inline;
  52336. begin
  52337. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  52338. end;
  52339. function TINT_IPC12.getU3BIS : TBits_2; inline;
  52340. begin
  52341. getU3BIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  52342. end;
  52343. procedure TINT_IPC12.setU3BIP(thebits : TBits_3); inline;
  52344. begin
  52345. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  52346. end;
  52347. function TINT_IPC12.getU3BIP : TBits_3; inline;
  52348. begin
  52349. getU3BIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  52350. end;
  52351. procedure TINT_IPC12.setw(thebits : TBits_32); inline;
  52352. begin
  52353. pTDefRegMap(@Self)^.val := thebits;
  52354. end;
  52355. function TINT_IPC12.getw : TBits_32; inline;
  52356. begin
  52357. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52358. end;
  52359. procedure TBMX_BMXCON.setBMXARB(thebits : TBits_3); inline;
  52360. begin
  52361. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  52362. end;
  52363. function TBMX_BMXCON.getBMXARB : TBits_3; inline;
  52364. begin
  52365. getBMXARB := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  52366. end;
  52367. procedure TBMX_BMXCON.setBMXWSDRM; inline;
  52368. begin
  52369. pTDefRegMap(@Self)^.&set := $00000040;
  52370. end;
  52371. procedure TBMX_BMXCON.clearBMXWSDRM; inline;
  52372. begin
  52373. pTDefRegMap(@Self)^.clr := $00000040;
  52374. end;
  52375. procedure TBMX_BMXCON.setBMXWSDRM(thebits : TBits_1); inline;
  52376. begin
  52377. if thebits = 0 then
  52378. pTDefRegMap(@Self)^.clr := $00000040
  52379. else
  52380. pTDefRegMap(@Self)^.&set := $00000040;
  52381. end;
  52382. function TBMX_BMXCON.getBMXWSDRM : TBits_1; inline;
  52383. begin
  52384. getBMXWSDRM := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52385. end;
  52386. procedure TBMX_BMXCON.setBMXERRIS; inline;
  52387. begin
  52388. pTDefRegMap(@Self)^.&set := $00010000;
  52389. end;
  52390. procedure TBMX_BMXCON.clearBMXERRIS; inline;
  52391. begin
  52392. pTDefRegMap(@Self)^.clr := $00010000;
  52393. end;
  52394. procedure TBMX_BMXCON.setBMXERRIS(thebits : TBits_1); inline;
  52395. begin
  52396. if thebits = 0 then
  52397. pTDefRegMap(@Self)^.clr := $00010000
  52398. else
  52399. pTDefRegMap(@Self)^.&set := $00010000;
  52400. end;
  52401. function TBMX_BMXCON.getBMXERRIS : TBits_1; inline;
  52402. begin
  52403. getBMXERRIS := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  52404. end;
  52405. procedure TBMX_BMXCON.setBMXERRDS; inline;
  52406. begin
  52407. pTDefRegMap(@Self)^.&set := $00020000;
  52408. end;
  52409. procedure TBMX_BMXCON.clearBMXERRDS; inline;
  52410. begin
  52411. pTDefRegMap(@Self)^.clr := $00020000;
  52412. end;
  52413. procedure TBMX_BMXCON.setBMXERRDS(thebits : TBits_1); inline;
  52414. begin
  52415. if thebits = 0 then
  52416. pTDefRegMap(@Self)^.clr := $00020000
  52417. else
  52418. pTDefRegMap(@Self)^.&set := $00020000;
  52419. end;
  52420. function TBMX_BMXCON.getBMXERRDS : TBits_1; inline;
  52421. begin
  52422. getBMXERRDS := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  52423. end;
  52424. procedure TBMX_BMXCON.setBMXERRDMA; inline;
  52425. begin
  52426. pTDefRegMap(@Self)^.&set := $00040000;
  52427. end;
  52428. procedure TBMX_BMXCON.clearBMXERRDMA; inline;
  52429. begin
  52430. pTDefRegMap(@Self)^.clr := $00040000;
  52431. end;
  52432. procedure TBMX_BMXCON.setBMXERRDMA(thebits : TBits_1); inline;
  52433. begin
  52434. if thebits = 0 then
  52435. pTDefRegMap(@Self)^.clr := $00040000
  52436. else
  52437. pTDefRegMap(@Self)^.&set := $00040000;
  52438. end;
  52439. function TBMX_BMXCON.getBMXERRDMA : TBits_1; inline;
  52440. begin
  52441. getBMXERRDMA := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  52442. end;
  52443. procedure TBMX_BMXCON.setBMXERRICD; inline;
  52444. begin
  52445. pTDefRegMap(@Self)^.&set := $00080000;
  52446. end;
  52447. procedure TBMX_BMXCON.clearBMXERRICD; inline;
  52448. begin
  52449. pTDefRegMap(@Self)^.clr := $00080000;
  52450. end;
  52451. procedure TBMX_BMXCON.setBMXERRICD(thebits : TBits_1); inline;
  52452. begin
  52453. if thebits = 0 then
  52454. pTDefRegMap(@Self)^.clr := $00080000
  52455. else
  52456. pTDefRegMap(@Self)^.&set := $00080000;
  52457. end;
  52458. function TBMX_BMXCON.getBMXERRICD : TBits_1; inline;
  52459. begin
  52460. getBMXERRICD := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  52461. end;
  52462. procedure TBMX_BMXCON.setBMXERRIXI; inline;
  52463. begin
  52464. pTDefRegMap(@Self)^.&set := $00100000;
  52465. end;
  52466. procedure TBMX_BMXCON.clearBMXERRIXI; inline;
  52467. begin
  52468. pTDefRegMap(@Self)^.clr := $00100000;
  52469. end;
  52470. procedure TBMX_BMXCON.setBMXERRIXI(thebits : TBits_1); inline;
  52471. begin
  52472. if thebits = 0 then
  52473. pTDefRegMap(@Self)^.clr := $00100000
  52474. else
  52475. pTDefRegMap(@Self)^.&set := $00100000;
  52476. end;
  52477. function TBMX_BMXCON.getBMXERRIXI : TBits_1; inline;
  52478. begin
  52479. getBMXERRIXI := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  52480. end;
  52481. procedure TBMX_BMXCON.setBMXCHEDMA; inline;
  52482. begin
  52483. pTDefRegMap(@Self)^.&set := $04000000;
  52484. end;
  52485. procedure TBMX_BMXCON.clearBMXCHEDMA; inline;
  52486. begin
  52487. pTDefRegMap(@Self)^.clr := $04000000;
  52488. end;
  52489. procedure TBMX_BMXCON.setBMXCHEDMA(thebits : TBits_1); inline;
  52490. begin
  52491. if thebits = 0 then
  52492. pTDefRegMap(@Self)^.clr := $04000000
  52493. else
  52494. pTDefRegMap(@Self)^.&set := $04000000;
  52495. end;
  52496. function TBMX_BMXCON.getBMXCHEDMA : TBits_1; inline;
  52497. begin
  52498. getBMXCHEDMA := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  52499. end;
  52500. procedure TBMX_BMXCON.setw(thebits : TBits_32); inline;
  52501. begin
  52502. pTDefRegMap(@Self)^.val := thebits;
  52503. end;
  52504. function TBMX_BMXCON.getw : TBits_32; inline;
  52505. begin
  52506. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52507. end;
  52508. procedure TDMAC_DMACON.setDMABUSY; inline;
  52509. begin
  52510. pTDefRegMap(@Self)^.&set := $00000800;
  52511. end;
  52512. procedure TDMAC_DMACON.clearDMABUSY; inline;
  52513. begin
  52514. pTDefRegMap(@Self)^.clr := $00000800;
  52515. end;
  52516. procedure TDMAC_DMACON.setDMABUSY(thebits : TBits_1); inline;
  52517. begin
  52518. if thebits = 0 then
  52519. pTDefRegMap(@Self)^.clr := $00000800
  52520. else
  52521. pTDefRegMap(@Self)^.&set := $00000800;
  52522. end;
  52523. function TDMAC_DMACON.getDMABUSY : TBits_1; inline;
  52524. begin
  52525. getDMABUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  52526. end;
  52527. procedure TDMAC_DMACON.setSUSPEND; inline;
  52528. begin
  52529. pTDefRegMap(@Self)^.&set := $00001000;
  52530. end;
  52531. procedure TDMAC_DMACON.clearSUSPEND; inline;
  52532. begin
  52533. pTDefRegMap(@Self)^.clr := $00001000;
  52534. end;
  52535. procedure TDMAC_DMACON.setSUSPEND(thebits : TBits_1); inline;
  52536. begin
  52537. if thebits = 0 then
  52538. pTDefRegMap(@Self)^.clr := $00001000
  52539. else
  52540. pTDefRegMap(@Self)^.&set := $00001000;
  52541. end;
  52542. function TDMAC_DMACON.getSUSPEND : TBits_1; inline;
  52543. begin
  52544. getSUSPEND := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  52545. end;
  52546. procedure TDMAC_DMACON.setON; inline;
  52547. begin
  52548. pTDefRegMap(@Self)^.&set := $00008000;
  52549. end;
  52550. procedure TDMAC_DMACON.clearON; inline;
  52551. begin
  52552. pTDefRegMap(@Self)^.clr := $00008000;
  52553. end;
  52554. procedure TDMAC_DMACON.setON(thebits : TBits_1); inline;
  52555. begin
  52556. if thebits = 0 then
  52557. pTDefRegMap(@Self)^.clr := $00008000
  52558. else
  52559. pTDefRegMap(@Self)^.&set := $00008000;
  52560. end;
  52561. function TDMAC_DMACON.getON : TBits_1; inline;
  52562. begin
  52563. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52564. end;
  52565. procedure TDMAC_DMACON.setw(thebits : TBits_32); inline;
  52566. begin
  52567. pTDefRegMap(@Self)^.val := thebits;
  52568. end;
  52569. function TDMAC_DMACON.getw : TBits_32; inline;
  52570. begin
  52571. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52572. end;
  52573. procedure TDMAC_DMASTAT.setDMACH(thebits : TBits_3); inline;
  52574. begin
  52575. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  52576. end;
  52577. function TDMAC_DMASTAT.getDMACH : TBits_3; inline;
  52578. begin
  52579. getDMACH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  52580. end;
  52581. procedure TDMAC_DMASTAT.setRDWR; inline;
  52582. begin
  52583. pTDefRegMap(@Self)^.&set := $00000008;
  52584. end;
  52585. procedure TDMAC_DMASTAT.clearRDWR; inline;
  52586. begin
  52587. pTDefRegMap(@Self)^.clr := $00000008;
  52588. end;
  52589. procedure TDMAC_DMASTAT.setRDWR(thebits : TBits_1); inline;
  52590. begin
  52591. if thebits = 0 then
  52592. pTDefRegMap(@Self)^.clr := $00000008
  52593. else
  52594. pTDefRegMap(@Self)^.&set := $00000008;
  52595. end;
  52596. function TDMAC_DMASTAT.getRDWR : TBits_1; inline;
  52597. begin
  52598. getRDWR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52599. end;
  52600. procedure TDMAC_DMASTAT.setw(thebits : TBits_32); inline;
  52601. begin
  52602. pTDefRegMap(@Self)^.val := thebits;
  52603. end;
  52604. function TDMAC_DMASTAT.getw : TBits_32; inline;
  52605. begin
  52606. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52607. end;
  52608. procedure TDMAC_DCRCCON.setCRCCH(thebits : TBits_3); inline;
  52609. begin
  52610. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  52611. end;
  52612. function TDMAC_DCRCCON.getCRCCH : TBits_3; inline;
  52613. begin
  52614. getCRCCH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  52615. end;
  52616. procedure TDMAC_DCRCCON.setCRCTYP; inline;
  52617. begin
  52618. pTDefRegMap(@Self)^.&set := $00000020;
  52619. end;
  52620. procedure TDMAC_DCRCCON.clearCRCTYP; inline;
  52621. begin
  52622. pTDefRegMap(@Self)^.clr := $00000020;
  52623. end;
  52624. procedure TDMAC_DCRCCON.setCRCTYP(thebits : TBits_1); inline;
  52625. begin
  52626. if thebits = 0 then
  52627. pTDefRegMap(@Self)^.clr := $00000020
  52628. else
  52629. pTDefRegMap(@Self)^.&set := $00000020;
  52630. end;
  52631. function TDMAC_DCRCCON.getCRCTYP : TBits_1; inline;
  52632. begin
  52633. getCRCTYP := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52634. end;
  52635. procedure TDMAC_DCRCCON.setCRCAPP; inline;
  52636. begin
  52637. pTDefRegMap(@Self)^.&set := $00000040;
  52638. end;
  52639. procedure TDMAC_DCRCCON.clearCRCAPP; inline;
  52640. begin
  52641. pTDefRegMap(@Self)^.clr := $00000040;
  52642. end;
  52643. procedure TDMAC_DCRCCON.setCRCAPP(thebits : TBits_1); inline;
  52644. begin
  52645. if thebits = 0 then
  52646. pTDefRegMap(@Self)^.clr := $00000040
  52647. else
  52648. pTDefRegMap(@Self)^.&set := $00000040;
  52649. end;
  52650. function TDMAC_DCRCCON.getCRCAPP : TBits_1; inline;
  52651. begin
  52652. getCRCAPP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52653. end;
  52654. procedure TDMAC_DCRCCON.setCRCEN; inline;
  52655. begin
  52656. pTDefRegMap(@Self)^.&set := $00000080;
  52657. end;
  52658. procedure TDMAC_DCRCCON.clearCRCEN; inline;
  52659. begin
  52660. pTDefRegMap(@Self)^.clr := $00000080;
  52661. end;
  52662. procedure TDMAC_DCRCCON.setCRCEN(thebits : TBits_1); inline;
  52663. begin
  52664. if thebits = 0 then
  52665. pTDefRegMap(@Self)^.clr := $00000080
  52666. else
  52667. pTDefRegMap(@Self)^.&set := $00000080;
  52668. end;
  52669. function TDMAC_DCRCCON.getCRCEN : TBits_1; inline;
  52670. begin
  52671. getCRCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52672. end;
  52673. procedure TDMAC_DCRCCON.setPLEN(thebits : TBits_5); inline;
  52674. begin
  52675. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  52676. end;
  52677. function TDMAC_DCRCCON.getPLEN : TBits_5; inline;
  52678. begin
  52679. getPLEN := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  52680. end;
  52681. procedure TDMAC_DCRCCON.setBITO; inline;
  52682. begin
  52683. pTDefRegMap(@Self)^.&set := $01000000;
  52684. end;
  52685. procedure TDMAC_DCRCCON.clearBITO; inline;
  52686. begin
  52687. pTDefRegMap(@Self)^.clr := $01000000;
  52688. end;
  52689. procedure TDMAC_DCRCCON.setBITO(thebits : TBits_1); inline;
  52690. begin
  52691. if thebits = 0 then
  52692. pTDefRegMap(@Self)^.clr := $01000000
  52693. else
  52694. pTDefRegMap(@Self)^.&set := $01000000;
  52695. end;
  52696. function TDMAC_DCRCCON.getBITO : TBits_1; inline;
  52697. begin
  52698. getBITO := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  52699. end;
  52700. procedure TDMAC_DCRCCON.setWBO; inline;
  52701. begin
  52702. pTDefRegMap(@Self)^.&set := $08000000;
  52703. end;
  52704. procedure TDMAC_DCRCCON.clearWBO; inline;
  52705. begin
  52706. pTDefRegMap(@Self)^.clr := $08000000;
  52707. end;
  52708. procedure TDMAC_DCRCCON.setWBO(thebits : TBits_1); inline;
  52709. begin
  52710. if thebits = 0 then
  52711. pTDefRegMap(@Self)^.clr := $08000000
  52712. else
  52713. pTDefRegMap(@Self)^.&set := $08000000;
  52714. end;
  52715. function TDMAC_DCRCCON.getWBO : TBits_1; inline;
  52716. begin
  52717. getWBO := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  52718. end;
  52719. procedure TDMAC_DCRCCON.setBYTO(thebits : TBits_2); inline;
  52720. begin
  52721. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $CFFFFFFF or ( thebits shl 28 );
  52722. end;
  52723. function TDMAC_DCRCCON.getBYTO : TBits_2; inline;
  52724. begin
  52725. getBYTO := (pTDefRegMap(@Self)^.val and $30000000) shr 28;
  52726. end;
  52727. procedure TDMAC_DCRCCON.setw(thebits : TBits_32); inline;
  52728. begin
  52729. pTDefRegMap(@Self)^.val := thebits;
  52730. end;
  52731. function TDMAC_DCRCCON.getw : TBits_32; inline;
  52732. begin
  52733. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52734. end;
  52735. procedure TDMAC0_DCH0CON.setCHPRI(thebits : TBits_2); inline;
  52736. begin
  52737. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52738. end;
  52739. function TDMAC0_DCH0CON.getCHPRI : TBits_2; inline;
  52740. begin
  52741. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52742. end;
  52743. procedure TDMAC0_DCH0CON.setCHEDET; inline;
  52744. begin
  52745. pTDefRegMap(@Self)^.&set := $00000004;
  52746. end;
  52747. procedure TDMAC0_DCH0CON.clearCHEDET; inline;
  52748. begin
  52749. pTDefRegMap(@Self)^.clr := $00000004;
  52750. end;
  52751. procedure TDMAC0_DCH0CON.setCHEDET(thebits : TBits_1); inline;
  52752. begin
  52753. if thebits = 0 then
  52754. pTDefRegMap(@Self)^.clr := $00000004
  52755. else
  52756. pTDefRegMap(@Self)^.&set := $00000004;
  52757. end;
  52758. function TDMAC0_DCH0CON.getCHEDET : TBits_1; inline;
  52759. begin
  52760. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  52761. end;
  52762. procedure TDMAC0_DCH0CON.setCHAEN; inline;
  52763. begin
  52764. pTDefRegMap(@Self)^.&set := $00000010;
  52765. end;
  52766. procedure TDMAC0_DCH0CON.clearCHAEN; inline;
  52767. begin
  52768. pTDefRegMap(@Self)^.clr := $00000010;
  52769. end;
  52770. procedure TDMAC0_DCH0CON.setCHAEN(thebits : TBits_1); inline;
  52771. begin
  52772. if thebits = 0 then
  52773. pTDefRegMap(@Self)^.clr := $00000010
  52774. else
  52775. pTDefRegMap(@Self)^.&set := $00000010;
  52776. end;
  52777. function TDMAC0_DCH0CON.getCHAEN : TBits_1; inline;
  52778. begin
  52779. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52780. end;
  52781. procedure TDMAC0_DCH0CON.setCHCHN; inline;
  52782. begin
  52783. pTDefRegMap(@Self)^.&set := $00000020;
  52784. end;
  52785. procedure TDMAC0_DCH0CON.clearCHCHN; inline;
  52786. begin
  52787. pTDefRegMap(@Self)^.clr := $00000020;
  52788. end;
  52789. procedure TDMAC0_DCH0CON.setCHCHN(thebits : TBits_1); inline;
  52790. begin
  52791. if thebits = 0 then
  52792. pTDefRegMap(@Self)^.clr := $00000020
  52793. else
  52794. pTDefRegMap(@Self)^.&set := $00000020;
  52795. end;
  52796. function TDMAC0_DCH0CON.getCHCHN : TBits_1; inline;
  52797. begin
  52798. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52799. end;
  52800. procedure TDMAC0_DCH0CON.setCHAED; inline;
  52801. begin
  52802. pTDefRegMap(@Self)^.&set := $00000040;
  52803. end;
  52804. procedure TDMAC0_DCH0CON.clearCHAED; inline;
  52805. begin
  52806. pTDefRegMap(@Self)^.clr := $00000040;
  52807. end;
  52808. procedure TDMAC0_DCH0CON.setCHAED(thebits : TBits_1); inline;
  52809. begin
  52810. if thebits = 0 then
  52811. pTDefRegMap(@Self)^.clr := $00000040
  52812. else
  52813. pTDefRegMap(@Self)^.&set := $00000040;
  52814. end;
  52815. function TDMAC0_DCH0CON.getCHAED : TBits_1; inline;
  52816. begin
  52817. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52818. end;
  52819. procedure TDMAC0_DCH0CON.setCHEN; inline;
  52820. begin
  52821. pTDefRegMap(@Self)^.&set := $00000080;
  52822. end;
  52823. procedure TDMAC0_DCH0CON.clearCHEN; inline;
  52824. begin
  52825. pTDefRegMap(@Self)^.clr := $00000080;
  52826. end;
  52827. procedure TDMAC0_DCH0CON.setCHEN(thebits : TBits_1); inline;
  52828. begin
  52829. if thebits = 0 then
  52830. pTDefRegMap(@Self)^.clr := $00000080
  52831. else
  52832. pTDefRegMap(@Self)^.&set := $00000080;
  52833. end;
  52834. function TDMAC0_DCH0CON.getCHEN : TBits_1; inline;
  52835. begin
  52836. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52837. end;
  52838. procedure TDMAC0_DCH0CON.setCHCHNS; inline;
  52839. begin
  52840. pTDefRegMap(@Self)^.&set := $00000100;
  52841. end;
  52842. procedure TDMAC0_DCH0CON.clearCHCHNS; inline;
  52843. begin
  52844. pTDefRegMap(@Self)^.clr := $00000100;
  52845. end;
  52846. procedure TDMAC0_DCH0CON.setCHCHNS(thebits : TBits_1); inline;
  52847. begin
  52848. if thebits = 0 then
  52849. pTDefRegMap(@Self)^.clr := $00000100
  52850. else
  52851. pTDefRegMap(@Self)^.&set := $00000100;
  52852. end;
  52853. function TDMAC0_DCH0CON.getCHCHNS : TBits_1; inline;
  52854. begin
  52855. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  52856. end;
  52857. procedure TDMAC0_DCH0CON.setCHBUSY; inline;
  52858. begin
  52859. pTDefRegMap(@Self)^.&set := $00008000;
  52860. end;
  52861. procedure TDMAC0_DCH0CON.clearCHBUSY; inline;
  52862. begin
  52863. pTDefRegMap(@Self)^.clr := $00008000;
  52864. end;
  52865. procedure TDMAC0_DCH0CON.setCHBUSY(thebits : TBits_1); inline;
  52866. begin
  52867. if thebits = 0 then
  52868. pTDefRegMap(@Self)^.clr := $00008000
  52869. else
  52870. pTDefRegMap(@Self)^.&set := $00008000;
  52871. end;
  52872. function TDMAC0_DCH0CON.getCHBUSY : TBits_1; inline;
  52873. begin
  52874. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52875. end;
  52876. procedure TDMAC0_DCH0CON.setw(thebits : TBits_32); inline;
  52877. begin
  52878. pTDefRegMap(@Self)^.val := thebits;
  52879. end;
  52880. function TDMAC0_DCH0CON.getw : TBits_32; inline;
  52881. begin
  52882. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52883. end;
  52884. procedure TDMAC0_DCH0ECON.setAIRQEN; inline;
  52885. begin
  52886. pTDefRegMap(@Self)^.&set := $00000008;
  52887. end;
  52888. procedure TDMAC0_DCH0ECON.clearAIRQEN; inline;
  52889. begin
  52890. pTDefRegMap(@Self)^.clr := $00000008;
  52891. end;
  52892. procedure TDMAC0_DCH0ECON.setAIRQEN(thebits : TBits_1); inline;
  52893. begin
  52894. if thebits = 0 then
  52895. pTDefRegMap(@Self)^.clr := $00000008
  52896. else
  52897. pTDefRegMap(@Self)^.&set := $00000008;
  52898. end;
  52899. function TDMAC0_DCH0ECON.getAIRQEN : TBits_1; inline;
  52900. begin
  52901. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52902. end;
  52903. procedure TDMAC0_DCH0ECON.setSIRQEN; inline;
  52904. begin
  52905. pTDefRegMap(@Self)^.&set := $00000010;
  52906. end;
  52907. procedure TDMAC0_DCH0ECON.clearSIRQEN; inline;
  52908. begin
  52909. pTDefRegMap(@Self)^.clr := $00000010;
  52910. end;
  52911. procedure TDMAC0_DCH0ECON.setSIRQEN(thebits : TBits_1); inline;
  52912. begin
  52913. if thebits = 0 then
  52914. pTDefRegMap(@Self)^.clr := $00000010
  52915. else
  52916. pTDefRegMap(@Self)^.&set := $00000010;
  52917. end;
  52918. function TDMAC0_DCH0ECON.getSIRQEN : TBits_1; inline;
  52919. begin
  52920. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52921. end;
  52922. procedure TDMAC0_DCH0ECON.setPATEN; inline;
  52923. begin
  52924. pTDefRegMap(@Self)^.&set := $00000020;
  52925. end;
  52926. procedure TDMAC0_DCH0ECON.clearPATEN; inline;
  52927. begin
  52928. pTDefRegMap(@Self)^.clr := $00000020;
  52929. end;
  52930. procedure TDMAC0_DCH0ECON.setPATEN(thebits : TBits_1); inline;
  52931. begin
  52932. if thebits = 0 then
  52933. pTDefRegMap(@Self)^.clr := $00000020
  52934. else
  52935. pTDefRegMap(@Self)^.&set := $00000020;
  52936. end;
  52937. function TDMAC0_DCH0ECON.getPATEN : TBits_1; inline;
  52938. begin
  52939. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52940. end;
  52941. procedure TDMAC0_DCH0ECON.setCABORT; inline;
  52942. begin
  52943. pTDefRegMap(@Self)^.&set := $00000040;
  52944. end;
  52945. procedure TDMAC0_DCH0ECON.clearCABORT; inline;
  52946. begin
  52947. pTDefRegMap(@Self)^.clr := $00000040;
  52948. end;
  52949. procedure TDMAC0_DCH0ECON.setCABORT(thebits : TBits_1); inline;
  52950. begin
  52951. if thebits = 0 then
  52952. pTDefRegMap(@Self)^.clr := $00000040
  52953. else
  52954. pTDefRegMap(@Self)^.&set := $00000040;
  52955. end;
  52956. function TDMAC0_DCH0ECON.getCABORT : TBits_1; inline;
  52957. begin
  52958. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52959. end;
  52960. procedure TDMAC0_DCH0ECON.setCFORCE; inline;
  52961. begin
  52962. pTDefRegMap(@Self)^.&set := $00000080;
  52963. end;
  52964. procedure TDMAC0_DCH0ECON.clearCFORCE; inline;
  52965. begin
  52966. pTDefRegMap(@Self)^.clr := $00000080;
  52967. end;
  52968. procedure TDMAC0_DCH0ECON.setCFORCE(thebits : TBits_1); inline;
  52969. begin
  52970. if thebits = 0 then
  52971. pTDefRegMap(@Self)^.clr := $00000080
  52972. else
  52973. pTDefRegMap(@Self)^.&set := $00000080;
  52974. end;
  52975. function TDMAC0_DCH0ECON.getCFORCE : TBits_1; inline;
  52976. begin
  52977. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52978. end;
  52979. procedure TDMAC0_DCH0ECON.setCHSIRQ(thebits : TBits_8); inline;
  52980. begin
  52981. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  52982. end;
  52983. function TDMAC0_DCH0ECON.getCHSIRQ : TBits_8; inline;
  52984. begin
  52985. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  52986. end;
  52987. procedure TDMAC0_DCH0ECON.setCHAIRQ(thebits : TBits_8); inline;
  52988. begin
  52989. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  52990. end;
  52991. function TDMAC0_DCH0ECON.getCHAIRQ : TBits_8; inline;
  52992. begin
  52993. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  52994. end;
  52995. procedure TDMAC0_DCH0ECON.setw(thebits : TBits_32); inline;
  52996. begin
  52997. pTDefRegMap(@Self)^.val := thebits;
  52998. end;
  52999. function TDMAC0_DCH0ECON.getw : TBits_32; inline;
  53000. begin
  53001. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53002. end;
  53003. procedure TDMAC0_DCH0INT.setCHERIF; inline;
  53004. begin
  53005. pTDefRegMap(@Self)^.&set := $00000001;
  53006. end;
  53007. procedure TDMAC0_DCH0INT.clearCHERIF; inline;
  53008. begin
  53009. pTDefRegMap(@Self)^.clr := $00000001;
  53010. end;
  53011. procedure TDMAC0_DCH0INT.setCHERIF(thebits : TBits_1); inline;
  53012. begin
  53013. if thebits = 0 then
  53014. pTDefRegMap(@Self)^.clr := $00000001
  53015. else
  53016. pTDefRegMap(@Self)^.&set := $00000001;
  53017. end;
  53018. function TDMAC0_DCH0INT.getCHERIF : TBits_1; inline;
  53019. begin
  53020. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53021. end;
  53022. procedure TDMAC0_DCH0INT.setCHTAIF; inline;
  53023. begin
  53024. pTDefRegMap(@Self)^.&set := $00000002;
  53025. end;
  53026. procedure TDMAC0_DCH0INT.clearCHTAIF; inline;
  53027. begin
  53028. pTDefRegMap(@Self)^.clr := $00000002;
  53029. end;
  53030. procedure TDMAC0_DCH0INT.setCHTAIF(thebits : TBits_1); inline;
  53031. begin
  53032. if thebits = 0 then
  53033. pTDefRegMap(@Self)^.clr := $00000002
  53034. else
  53035. pTDefRegMap(@Self)^.&set := $00000002;
  53036. end;
  53037. function TDMAC0_DCH0INT.getCHTAIF : TBits_1; inline;
  53038. begin
  53039. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53040. end;
  53041. procedure TDMAC0_DCH0INT.setCHCCIF; inline;
  53042. begin
  53043. pTDefRegMap(@Self)^.&set := $00000004;
  53044. end;
  53045. procedure TDMAC0_DCH0INT.clearCHCCIF; inline;
  53046. begin
  53047. pTDefRegMap(@Self)^.clr := $00000004;
  53048. end;
  53049. procedure TDMAC0_DCH0INT.setCHCCIF(thebits : TBits_1); inline;
  53050. begin
  53051. if thebits = 0 then
  53052. pTDefRegMap(@Self)^.clr := $00000004
  53053. else
  53054. pTDefRegMap(@Self)^.&set := $00000004;
  53055. end;
  53056. function TDMAC0_DCH0INT.getCHCCIF : TBits_1; inline;
  53057. begin
  53058. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53059. end;
  53060. procedure TDMAC0_DCH0INT.setCHBCIF; inline;
  53061. begin
  53062. pTDefRegMap(@Self)^.&set := $00000008;
  53063. end;
  53064. procedure TDMAC0_DCH0INT.clearCHBCIF; inline;
  53065. begin
  53066. pTDefRegMap(@Self)^.clr := $00000008;
  53067. end;
  53068. procedure TDMAC0_DCH0INT.setCHBCIF(thebits : TBits_1); inline;
  53069. begin
  53070. if thebits = 0 then
  53071. pTDefRegMap(@Self)^.clr := $00000008
  53072. else
  53073. pTDefRegMap(@Self)^.&set := $00000008;
  53074. end;
  53075. function TDMAC0_DCH0INT.getCHBCIF : TBits_1; inline;
  53076. begin
  53077. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53078. end;
  53079. procedure TDMAC0_DCH0INT.setCHDHIF; inline;
  53080. begin
  53081. pTDefRegMap(@Self)^.&set := $00000010;
  53082. end;
  53083. procedure TDMAC0_DCH0INT.clearCHDHIF; inline;
  53084. begin
  53085. pTDefRegMap(@Self)^.clr := $00000010;
  53086. end;
  53087. procedure TDMAC0_DCH0INT.setCHDHIF(thebits : TBits_1); inline;
  53088. begin
  53089. if thebits = 0 then
  53090. pTDefRegMap(@Self)^.clr := $00000010
  53091. else
  53092. pTDefRegMap(@Self)^.&set := $00000010;
  53093. end;
  53094. function TDMAC0_DCH0INT.getCHDHIF : TBits_1; inline;
  53095. begin
  53096. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53097. end;
  53098. procedure TDMAC0_DCH0INT.setCHDDIF; inline;
  53099. begin
  53100. pTDefRegMap(@Self)^.&set := $00000020;
  53101. end;
  53102. procedure TDMAC0_DCH0INT.clearCHDDIF; inline;
  53103. begin
  53104. pTDefRegMap(@Self)^.clr := $00000020;
  53105. end;
  53106. procedure TDMAC0_DCH0INT.setCHDDIF(thebits : TBits_1); inline;
  53107. begin
  53108. if thebits = 0 then
  53109. pTDefRegMap(@Self)^.clr := $00000020
  53110. else
  53111. pTDefRegMap(@Self)^.&set := $00000020;
  53112. end;
  53113. function TDMAC0_DCH0INT.getCHDDIF : TBits_1; inline;
  53114. begin
  53115. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53116. end;
  53117. procedure TDMAC0_DCH0INT.setCHSHIF; inline;
  53118. begin
  53119. pTDefRegMap(@Self)^.&set := $00000040;
  53120. end;
  53121. procedure TDMAC0_DCH0INT.clearCHSHIF; inline;
  53122. begin
  53123. pTDefRegMap(@Self)^.clr := $00000040;
  53124. end;
  53125. procedure TDMAC0_DCH0INT.setCHSHIF(thebits : TBits_1); inline;
  53126. begin
  53127. if thebits = 0 then
  53128. pTDefRegMap(@Self)^.clr := $00000040
  53129. else
  53130. pTDefRegMap(@Self)^.&set := $00000040;
  53131. end;
  53132. function TDMAC0_DCH0INT.getCHSHIF : TBits_1; inline;
  53133. begin
  53134. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53135. end;
  53136. procedure TDMAC0_DCH0INT.setCHSDIF; inline;
  53137. begin
  53138. pTDefRegMap(@Self)^.&set := $00000080;
  53139. end;
  53140. procedure TDMAC0_DCH0INT.clearCHSDIF; inline;
  53141. begin
  53142. pTDefRegMap(@Self)^.clr := $00000080;
  53143. end;
  53144. procedure TDMAC0_DCH0INT.setCHSDIF(thebits : TBits_1); inline;
  53145. begin
  53146. if thebits = 0 then
  53147. pTDefRegMap(@Self)^.clr := $00000080
  53148. else
  53149. pTDefRegMap(@Self)^.&set := $00000080;
  53150. end;
  53151. function TDMAC0_DCH0INT.getCHSDIF : TBits_1; inline;
  53152. begin
  53153. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53154. end;
  53155. procedure TDMAC0_DCH0INT.setCHERIE; inline;
  53156. begin
  53157. pTDefRegMap(@Self)^.&set := $00010000;
  53158. end;
  53159. procedure TDMAC0_DCH0INT.clearCHERIE; inline;
  53160. begin
  53161. pTDefRegMap(@Self)^.clr := $00010000;
  53162. end;
  53163. procedure TDMAC0_DCH0INT.setCHERIE(thebits : TBits_1); inline;
  53164. begin
  53165. if thebits = 0 then
  53166. pTDefRegMap(@Self)^.clr := $00010000
  53167. else
  53168. pTDefRegMap(@Self)^.&set := $00010000;
  53169. end;
  53170. function TDMAC0_DCH0INT.getCHERIE : TBits_1; inline;
  53171. begin
  53172. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  53173. end;
  53174. procedure TDMAC0_DCH0INT.setCHTAIE; inline;
  53175. begin
  53176. pTDefRegMap(@Self)^.&set := $00020000;
  53177. end;
  53178. procedure TDMAC0_DCH0INT.clearCHTAIE; inline;
  53179. begin
  53180. pTDefRegMap(@Self)^.clr := $00020000;
  53181. end;
  53182. procedure TDMAC0_DCH0INT.setCHTAIE(thebits : TBits_1); inline;
  53183. begin
  53184. if thebits = 0 then
  53185. pTDefRegMap(@Self)^.clr := $00020000
  53186. else
  53187. pTDefRegMap(@Self)^.&set := $00020000;
  53188. end;
  53189. function TDMAC0_DCH0INT.getCHTAIE : TBits_1; inline;
  53190. begin
  53191. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  53192. end;
  53193. procedure TDMAC0_DCH0INT.setCHCCIE; inline;
  53194. begin
  53195. pTDefRegMap(@Self)^.&set := $00040000;
  53196. end;
  53197. procedure TDMAC0_DCH0INT.clearCHCCIE; inline;
  53198. begin
  53199. pTDefRegMap(@Self)^.clr := $00040000;
  53200. end;
  53201. procedure TDMAC0_DCH0INT.setCHCCIE(thebits : TBits_1); inline;
  53202. begin
  53203. if thebits = 0 then
  53204. pTDefRegMap(@Self)^.clr := $00040000
  53205. else
  53206. pTDefRegMap(@Self)^.&set := $00040000;
  53207. end;
  53208. function TDMAC0_DCH0INT.getCHCCIE : TBits_1; inline;
  53209. begin
  53210. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  53211. end;
  53212. procedure TDMAC0_DCH0INT.setCHBCIE; inline;
  53213. begin
  53214. pTDefRegMap(@Self)^.&set := $00080000;
  53215. end;
  53216. procedure TDMAC0_DCH0INT.clearCHBCIE; inline;
  53217. begin
  53218. pTDefRegMap(@Self)^.clr := $00080000;
  53219. end;
  53220. procedure TDMAC0_DCH0INT.setCHBCIE(thebits : TBits_1); inline;
  53221. begin
  53222. if thebits = 0 then
  53223. pTDefRegMap(@Self)^.clr := $00080000
  53224. else
  53225. pTDefRegMap(@Self)^.&set := $00080000;
  53226. end;
  53227. function TDMAC0_DCH0INT.getCHBCIE : TBits_1; inline;
  53228. begin
  53229. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  53230. end;
  53231. procedure TDMAC0_DCH0INT.setCHDHIE; inline;
  53232. begin
  53233. pTDefRegMap(@Self)^.&set := $00100000;
  53234. end;
  53235. procedure TDMAC0_DCH0INT.clearCHDHIE; inline;
  53236. begin
  53237. pTDefRegMap(@Self)^.clr := $00100000;
  53238. end;
  53239. procedure TDMAC0_DCH0INT.setCHDHIE(thebits : TBits_1); inline;
  53240. begin
  53241. if thebits = 0 then
  53242. pTDefRegMap(@Self)^.clr := $00100000
  53243. else
  53244. pTDefRegMap(@Self)^.&set := $00100000;
  53245. end;
  53246. function TDMAC0_DCH0INT.getCHDHIE : TBits_1; inline;
  53247. begin
  53248. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  53249. end;
  53250. procedure TDMAC0_DCH0INT.setCHDDIE; inline;
  53251. begin
  53252. pTDefRegMap(@Self)^.&set := $00200000;
  53253. end;
  53254. procedure TDMAC0_DCH0INT.clearCHDDIE; inline;
  53255. begin
  53256. pTDefRegMap(@Self)^.clr := $00200000;
  53257. end;
  53258. procedure TDMAC0_DCH0INT.setCHDDIE(thebits : TBits_1); inline;
  53259. begin
  53260. if thebits = 0 then
  53261. pTDefRegMap(@Self)^.clr := $00200000
  53262. else
  53263. pTDefRegMap(@Self)^.&set := $00200000;
  53264. end;
  53265. function TDMAC0_DCH0INT.getCHDDIE : TBits_1; inline;
  53266. begin
  53267. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  53268. end;
  53269. procedure TDMAC0_DCH0INT.setCHSHIE; inline;
  53270. begin
  53271. pTDefRegMap(@Self)^.&set := $00400000;
  53272. end;
  53273. procedure TDMAC0_DCH0INT.clearCHSHIE; inline;
  53274. begin
  53275. pTDefRegMap(@Self)^.clr := $00400000;
  53276. end;
  53277. procedure TDMAC0_DCH0INT.setCHSHIE(thebits : TBits_1); inline;
  53278. begin
  53279. if thebits = 0 then
  53280. pTDefRegMap(@Self)^.clr := $00400000
  53281. else
  53282. pTDefRegMap(@Self)^.&set := $00400000;
  53283. end;
  53284. function TDMAC0_DCH0INT.getCHSHIE : TBits_1; inline;
  53285. begin
  53286. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  53287. end;
  53288. procedure TDMAC0_DCH0INT.setCHSDIE; inline;
  53289. begin
  53290. pTDefRegMap(@Self)^.&set := $00800000;
  53291. end;
  53292. procedure TDMAC0_DCH0INT.clearCHSDIE; inline;
  53293. begin
  53294. pTDefRegMap(@Self)^.clr := $00800000;
  53295. end;
  53296. procedure TDMAC0_DCH0INT.setCHSDIE(thebits : TBits_1); inline;
  53297. begin
  53298. if thebits = 0 then
  53299. pTDefRegMap(@Self)^.clr := $00800000
  53300. else
  53301. pTDefRegMap(@Self)^.&set := $00800000;
  53302. end;
  53303. function TDMAC0_DCH0INT.getCHSDIE : TBits_1; inline;
  53304. begin
  53305. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  53306. end;
  53307. procedure TDMAC0_DCH0INT.setw(thebits : TBits_32); inline;
  53308. begin
  53309. pTDefRegMap(@Self)^.val := thebits;
  53310. end;
  53311. function TDMAC0_DCH0INT.getw : TBits_32; inline;
  53312. begin
  53313. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53314. end;
  53315. procedure TDMAC1_DCH1CON.setCHPRI(thebits : TBits_2); inline;
  53316. begin
  53317. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  53318. end;
  53319. function TDMAC1_DCH1CON.getCHPRI : TBits_2; inline;
  53320. begin
  53321. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  53322. end;
  53323. procedure TDMAC1_DCH1CON.setCHEDET; inline;
  53324. begin
  53325. pTDefRegMap(@Self)^.&set := $00000004;
  53326. end;
  53327. procedure TDMAC1_DCH1CON.clearCHEDET; inline;
  53328. begin
  53329. pTDefRegMap(@Self)^.clr := $00000004;
  53330. end;
  53331. procedure TDMAC1_DCH1CON.setCHEDET(thebits : TBits_1); inline;
  53332. begin
  53333. if thebits = 0 then
  53334. pTDefRegMap(@Self)^.clr := $00000004
  53335. else
  53336. pTDefRegMap(@Self)^.&set := $00000004;
  53337. end;
  53338. function TDMAC1_DCH1CON.getCHEDET : TBits_1; inline;
  53339. begin
  53340. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53341. end;
  53342. procedure TDMAC1_DCH1CON.setCHAEN; inline;
  53343. begin
  53344. pTDefRegMap(@Self)^.&set := $00000010;
  53345. end;
  53346. procedure TDMAC1_DCH1CON.clearCHAEN; inline;
  53347. begin
  53348. pTDefRegMap(@Self)^.clr := $00000010;
  53349. end;
  53350. procedure TDMAC1_DCH1CON.setCHAEN(thebits : TBits_1); inline;
  53351. begin
  53352. if thebits = 0 then
  53353. pTDefRegMap(@Self)^.clr := $00000010
  53354. else
  53355. pTDefRegMap(@Self)^.&set := $00000010;
  53356. end;
  53357. function TDMAC1_DCH1CON.getCHAEN : TBits_1; inline;
  53358. begin
  53359. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53360. end;
  53361. procedure TDMAC1_DCH1CON.setCHCHN; inline;
  53362. begin
  53363. pTDefRegMap(@Self)^.&set := $00000020;
  53364. end;
  53365. procedure TDMAC1_DCH1CON.clearCHCHN; inline;
  53366. begin
  53367. pTDefRegMap(@Self)^.clr := $00000020;
  53368. end;
  53369. procedure TDMAC1_DCH1CON.setCHCHN(thebits : TBits_1); inline;
  53370. begin
  53371. if thebits = 0 then
  53372. pTDefRegMap(@Self)^.clr := $00000020
  53373. else
  53374. pTDefRegMap(@Self)^.&set := $00000020;
  53375. end;
  53376. function TDMAC1_DCH1CON.getCHCHN : TBits_1; inline;
  53377. begin
  53378. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53379. end;
  53380. procedure TDMAC1_DCH1CON.setCHAED; inline;
  53381. begin
  53382. pTDefRegMap(@Self)^.&set := $00000040;
  53383. end;
  53384. procedure TDMAC1_DCH1CON.clearCHAED; inline;
  53385. begin
  53386. pTDefRegMap(@Self)^.clr := $00000040;
  53387. end;
  53388. procedure TDMAC1_DCH1CON.setCHAED(thebits : TBits_1); inline;
  53389. begin
  53390. if thebits = 0 then
  53391. pTDefRegMap(@Self)^.clr := $00000040
  53392. else
  53393. pTDefRegMap(@Self)^.&set := $00000040;
  53394. end;
  53395. function TDMAC1_DCH1CON.getCHAED : TBits_1; inline;
  53396. begin
  53397. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53398. end;
  53399. procedure TDMAC1_DCH1CON.setCHEN; inline;
  53400. begin
  53401. pTDefRegMap(@Self)^.&set := $00000080;
  53402. end;
  53403. procedure TDMAC1_DCH1CON.clearCHEN; inline;
  53404. begin
  53405. pTDefRegMap(@Self)^.clr := $00000080;
  53406. end;
  53407. procedure TDMAC1_DCH1CON.setCHEN(thebits : TBits_1); inline;
  53408. begin
  53409. if thebits = 0 then
  53410. pTDefRegMap(@Self)^.clr := $00000080
  53411. else
  53412. pTDefRegMap(@Self)^.&set := $00000080;
  53413. end;
  53414. function TDMAC1_DCH1CON.getCHEN : TBits_1; inline;
  53415. begin
  53416. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53417. end;
  53418. procedure TDMAC1_DCH1CON.setCHCHNS; inline;
  53419. begin
  53420. pTDefRegMap(@Self)^.&set := $00000100;
  53421. end;
  53422. procedure TDMAC1_DCH1CON.clearCHCHNS; inline;
  53423. begin
  53424. pTDefRegMap(@Self)^.clr := $00000100;
  53425. end;
  53426. procedure TDMAC1_DCH1CON.setCHCHNS(thebits : TBits_1); inline;
  53427. begin
  53428. if thebits = 0 then
  53429. pTDefRegMap(@Self)^.clr := $00000100
  53430. else
  53431. pTDefRegMap(@Self)^.&set := $00000100;
  53432. end;
  53433. function TDMAC1_DCH1CON.getCHCHNS : TBits_1; inline;
  53434. begin
  53435. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  53436. end;
  53437. procedure TDMAC1_DCH1CON.setCHBUSY; inline;
  53438. begin
  53439. pTDefRegMap(@Self)^.&set := $00008000;
  53440. end;
  53441. procedure TDMAC1_DCH1CON.clearCHBUSY; inline;
  53442. begin
  53443. pTDefRegMap(@Self)^.clr := $00008000;
  53444. end;
  53445. procedure TDMAC1_DCH1CON.setCHBUSY(thebits : TBits_1); inline;
  53446. begin
  53447. if thebits = 0 then
  53448. pTDefRegMap(@Self)^.clr := $00008000
  53449. else
  53450. pTDefRegMap(@Self)^.&set := $00008000;
  53451. end;
  53452. function TDMAC1_DCH1CON.getCHBUSY : TBits_1; inline;
  53453. begin
  53454. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  53455. end;
  53456. procedure TDMAC1_DCH1CON.setw(thebits : TBits_32); inline;
  53457. begin
  53458. pTDefRegMap(@Self)^.val := thebits;
  53459. end;
  53460. function TDMAC1_DCH1CON.getw : TBits_32; inline;
  53461. begin
  53462. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53463. end;
  53464. procedure TDMAC1_DCH1ECON.setAIRQEN; inline;
  53465. begin
  53466. pTDefRegMap(@Self)^.&set := $00000008;
  53467. end;
  53468. procedure TDMAC1_DCH1ECON.clearAIRQEN; inline;
  53469. begin
  53470. pTDefRegMap(@Self)^.clr := $00000008;
  53471. end;
  53472. procedure TDMAC1_DCH1ECON.setAIRQEN(thebits : TBits_1); inline;
  53473. begin
  53474. if thebits = 0 then
  53475. pTDefRegMap(@Self)^.clr := $00000008
  53476. else
  53477. pTDefRegMap(@Self)^.&set := $00000008;
  53478. end;
  53479. function TDMAC1_DCH1ECON.getAIRQEN : TBits_1; inline;
  53480. begin
  53481. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53482. end;
  53483. procedure TDMAC1_DCH1ECON.setSIRQEN; inline;
  53484. begin
  53485. pTDefRegMap(@Self)^.&set := $00000010;
  53486. end;
  53487. procedure TDMAC1_DCH1ECON.clearSIRQEN; inline;
  53488. begin
  53489. pTDefRegMap(@Self)^.clr := $00000010;
  53490. end;
  53491. procedure TDMAC1_DCH1ECON.setSIRQEN(thebits : TBits_1); inline;
  53492. begin
  53493. if thebits = 0 then
  53494. pTDefRegMap(@Self)^.clr := $00000010
  53495. else
  53496. pTDefRegMap(@Self)^.&set := $00000010;
  53497. end;
  53498. function TDMAC1_DCH1ECON.getSIRQEN : TBits_1; inline;
  53499. begin
  53500. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53501. end;
  53502. procedure TDMAC1_DCH1ECON.setPATEN; inline;
  53503. begin
  53504. pTDefRegMap(@Self)^.&set := $00000020;
  53505. end;
  53506. procedure TDMAC1_DCH1ECON.clearPATEN; inline;
  53507. begin
  53508. pTDefRegMap(@Self)^.clr := $00000020;
  53509. end;
  53510. procedure TDMAC1_DCH1ECON.setPATEN(thebits : TBits_1); inline;
  53511. begin
  53512. if thebits = 0 then
  53513. pTDefRegMap(@Self)^.clr := $00000020
  53514. else
  53515. pTDefRegMap(@Self)^.&set := $00000020;
  53516. end;
  53517. function TDMAC1_DCH1ECON.getPATEN : TBits_1; inline;
  53518. begin
  53519. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53520. end;
  53521. procedure TDMAC1_DCH1ECON.setCABORT; inline;
  53522. begin
  53523. pTDefRegMap(@Self)^.&set := $00000040;
  53524. end;
  53525. procedure TDMAC1_DCH1ECON.clearCABORT; inline;
  53526. begin
  53527. pTDefRegMap(@Self)^.clr := $00000040;
  53528. end;
  53529. procedure TDMAC1_DCH1ECON.setCABORT(thebits : TBits_1); inline;
  53530. begin
  53531. if thebits = 0 then
  53532. pTDefRegMap(@Self)^.clr := $00000040
  53533. else
  53534. pTDefRegMap(@Self)^.&set := $00000040;
  53535. end;
  53536. function TDMAC1_DCH1ECON.getCABORT : TBits_1; inline;
  53537. begin
  53538. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53539. end;
  53540. procedure TDMAC1_DCH1ECON.setCFORCE; inline;
  53541. begin
  53542. pTDefRegMap(@Self)^.&set := $00000080;
  53543. end;
  53544. procedure TDMAC1_DCH1ECON.clearCFORCE; inline;
  53545. begin
  53546. pTDefRegMap(@Self)^.clr := $00000080;
  53547. end;
  53548. procedure TDMAC1_DCH1ECON.setCFORCE(thebits : TBits_1); inline;
  53549. begin
  53550. if thebits = 0 then
  53551. pTDefRegMap(@Self)^.clr := $00000080
  53552. else
  53553. pTDefRegMap(@Self)^.&set := $00000080;
  53554. end;
  53555. function TDMAC1_DCH1ECON.getCFORCE : TBits_1; inline;
  53556. begin
  53557. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53558. end;
  53559. procedure TDMAC1_DCH1ECON.setCHSIRQ(thebits : TBits_8); inline;
  53560. begin
  53561. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  53562. end;
  53563. function TDMAC1_DCH1ECON.getCHSIRQ : TBits_8; inline;
  53564. begin
  53565. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  53566. end;
  53567. procedure TDMAC1_DCH1ECON.setCHAIRQ(thebits : TBits_8); inline;
  53568. begin
  53569. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  53570. end;
  53571. function TDMAC1_DCH1ECON.getCHAIRQ : TBits_8; inline;
  53572. begin
  53573. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  53574. end;
  53575. procedure TDMAC1_DCH1ECON.setw(thebits : TBits_32); inline;
  53576. begin
  53577. pTDefRegMap(@Self)^.val := thebits;
  53578. end;
  53579. function TDMAC1_DCH1ECON.getw : TBits_32; inline;
  53580. begin
  53581. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53582. end;
  53583. procedure TDMAC1_DCH1INT.setCHERIF; inline;
  53584. begin
  53585. pTDefRegMap(@Self)^.&set := $00000001;
  53586. end;
  53587. procedure TDMAC1_DCH1INT.clearCHERIF; inline;
  53588. begin
  53589. pTDefRegMap(@Self)^.clr := $00000001;
  53590. end;
  53591. procedure TDMAC1_DCH1INT.setCHERIF(thebits : TBits_1); inline;
  53592. begin
  53593. if thebits = 0 then
  53594. pTDefRegMap(@Self)^.clr := $00000001
  53595. else
  53596. pTDefRegMap(@Self)^.&set := $00000001;
  53597. end;
  53598. function TDMAC1_DCH1INT.getCHERIF : TBits_1; inline;
  53599. begin
  53600. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53601. end;
  53602. procedure TDMAC1_DCH1INT.setCHTAIF; inline;
  53603. begin
  53604. pTDefRegMap(@Self)^.&set := $00000002;
  53605. end;
  53606. procedure TDMAC1_DCH1INT.clearCHTAIF; inline;
  53607. begin
  53608. pTDefRegMap(@Self)^.clr := $00000002;
  53609. end;
  53610. procedure TDMAC1_DCH1INT.setCHTAIF(thebits : TBits_1); inline;
  53611. begin
  53612. if thebits = 0 then
  53613. pTDefRegMap(@Self)^.clr := $00000002
  53614. else
  53615. pTDefRegMap(@Self)^.&set := $00000002;
  53616. end;
  53617. function TDMAC1_DCH1INT.getCHTAIF : TBits_1; inline;
  53618. begin
  53619. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53620. end;
  53621. procedure TDMAC1_DCH1INT.setCHCCIF; inline;
  53622. begin
  53623. pTDefRegMap(@Self)^.&set := $00000004;
  53624. end;
  53625. procedure TDMAC1_DCH1INT.clearCHCCIF; inline;
  53626. begin
  53627. pTDefRegMap(@Self)^.clr := $00000004;
  53628. end;
  53629. procedure TDMAC1_DCH1INT.setCHCCIF(thebits : TBits_1); inline;
  53630. begin
  53631. if thebits = 0 then
  53632. pTDefRegMap(@Self)^.clr := $00000004
  53633. else
  53634. pTDefRegMap(@Self)^.&set := $00000004;
  53635. end;
  53636. function TDMAC1_DCH1INT.getCHCCIF : TBits_1; inline;
  53637. begin
  53638. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53639. end;
  53640. procedure TDMAC1_DCH1INT.setCHBCIF; inline;
  53641. begin
  53642. pTDefRegMap(@Self)^.&set := $00000008;
  53643. end;
  53644. procedure TDMAC1_DCH1INT.clearCHBCIF; inline;
  53645. begin
  53646. pTDefRegMap(@Self)^.clr := $00000008;
  53647. end;
  53648. procedure TDMAC1_DCH1INT.setCHBCIF(thebits : TBits_1); inline;
  53649. begin
  53650. if thebits = 0 then
  53651. pTDefRegMap(@Self)^.clr := $00000008
  53652. else
  53653. pTDefRegMap(@Self)^.&set := $00000008;
  53654. end;
  53655. function TDMAC1_DCH1INT.getCHBCIF : TBits_1; inline;
  53656. begin
  53657. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53658. end;
  53659. procedure TDMAC1_DCH1INT.setCHDHIF; inline;
  53660. begin
  53661. pTDefRegMap(@Self)^.&set := $00000010;
  53662. end;
  53663. procedure TDMAC1_DCH1INT.clearCHDHIF; inline;
  53664. begin
  53665. pTDefRegMap(@Self)^.clr := $00000010;
  53666. end;
  53667. procedure TDMAC1_DCH1INT.setCHDHIF(thebits : TBits_1); inline;
  53668. begin
  53669. if thebits = 0 then
  53670. pTDefRegMap(@Self)^.clr := $00000010
  53671. else
  53672. pTDefRegMap(@Self)^.&set := $00000010;
  53673. end;
  53674. function TDMAC1_DCH1INT.getCHDHIF : TBits_1; inline;
  53675. begin
  53676. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53677. end;
  53678. procedure TDMAC1_DCH1INT.setCHDDIF; inline;
  53679. begin
  53680. pTDefRegMap(@Self)^.&set := $00000020;
  53681. end;
  53682. procedure TDMAC1_DCH1INT.clearCHDDIF; inline;
  53683. begin
  53684. pTDefRegMap(@Self)^.clr := $00000020;
  53685. end;
  53686. procedure TDMAC1_DCH1INT.setCHDDIF(thebits : TBits_1); inline;
  53687. begin
  53688. if thebits = 0 then
  53689. pTDefRegMap(@Self)^.clr := $00000020
  53690. else
  53691. pTDefRegMap(@Self)^.&set := $00000020;
  53692. end;
  53693. function TDMAC1_DCH1INT.getCHDDIF : TBits_1; inline;
  53694. begin
  53695. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53696. end;
  53697. procedure TDMAC1_DCH1INT.setCHSHIF; inline;
  53698. begin
  53699. pTDefRegMap(@Self)^.&set := $00000040;
  53700. end;
  53701. procedure TDMAC1_DCH1INT.clearCHSHIF; inline;
  53702. begin
  53703. pTDefRegMap(@Self)^.clr := $00000040;
  53704. end;
  53705. procedure TDMAC1_DCH1INT.setCHSHIF(thebits : TBits_1); inline;
  53706. begin
  53707. if thebits = 0 then
  53708. pTDefRegMap(@Self)^.clr := $00000040
  53709. else
  53710. pTDefRegMap(@Self)^.&set := $00000040;
  53711. end;
  53712. function TDMAC1_DCH1INT.getCHSHIF : TBits_1; inline;
  53713. begin
  53714. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53715. end;
  53716. procedure TDMAC1_DCH1INT.setCHSDIF; inline;
  53717. begin
  53718. pTDefRegMap(@Self)^.&set := $00000080;
  53719. end;
  53720. procedure TDMAC1_DCH1INT.clearCHSDIF; inline;
  53721. begin
  53722. pTDefRegMap(@Self)^.clr := $00000080;
  53723. end;
  53724. procedure TDMAC1_DCH1INT.setCHSDIF(thebits : TBits_1); inline;
  53725. begin
  53726. if thebits = 0 then
  53727. pTDefRegMap(@Self)^.clr := $00000080
  53728. else
  53729. pTDefRegMap(@Self)^.&set := $00000080;
  53730. end;
  53731. function TDMAC1_DCH1INT.getCHSDIF : TBits_1; inline;
  53732. begin
  53733. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53734. end;
  53735. procedure TDMAC1_DCH1INT.setCHERIE; inline;
  53736. begin
  53737. pTDefRegMap(@Self)^.&set := $00010000;
  53738. end;
  53739. procedure TDMAC1_DCH1INT.clearCHERIE; inline;
  53740. begin
  53741. pTDefRegMap(@Self)^.clr := $00010000;
  53742. end;
  53743. procedure TDMAC1_DCH1INT.setCHERIE(thebits : TBits_1); inline;
  53744. begin
  53745. if thebits = 0 then
  53746. pTDefRegMap(@Self)^.clr := $00010000
  53747. else
  53748. pTDefRegMap(@Self)^.&set := $00010000;
  53749. end;
  53750. function TDMAC1_DCH1INT.getCHERIE : TBits_1; inline;
  53751. begin
  53752. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  53753. end;
  53754. procedure TDMAC1_DCH1INT.setCHTAIE; inline;
  53755. begin
  53756. pTDefRegMap(@Self)^.&set := $00020000;
  53757. end;
  53758. procedure TDMAC1_DCH1INT.clearCHTAIE; inline;
  53759. begin
  53760. pTDefRegMap(@Self)^.clr := $00020000;
  53761. end;
  53762. procedure TDMAC1_DCH1INT.setCHTAIE(thebits : TBits_1); inline;
  53763. begin
  53764. if thebits = 0 then
  53765. pTDefRegMap(@Self)^.clr := $00020000
  53766. else
  53767. pTDefRegMap(@Self)^.&set := $00020000;
  53768. end;
  53769. function TDMAC1_DCH1INT.getCHTAIE : TBits_1; inline;
  53770. begin
  53771. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  53772. end;
  53773. procedure TDMAC1_DCH1INT.setCHCCIE; inline;
  53774. begin
  53775. pTDefRegMap(@Self)^.&set := $00040000;
  53776. end;
  53777. procedure TDMAC1_DCH1INT.clearCHCCIE; inline;
  53778. begin
  53779. pTDefRegMap(@Self)^.clr := $00040000;
  53780. end;
  53781. procedure TDMAC1_DCH1INT.setCHCCIE(thebits : TBits_1); inline;
  53782. begin
  53783. if thebits = 0 then
  53784. pTDefRegMap(@Self)^.clr := $00040000
  53785. else
  53786. pTDefRegMap(@Self)^.&set := $00040000;
  53787. end;
  53788. function TDMAC1_DCH1INT.getCHCCIE : TBits_1; inline;
  53789. begin
  53790. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  53791. end;
  53792. procedure TDMAC1_DCH1INT.setCHBCIE; inline;
  53793. begin
  53794. pTDefRegMap(@Self)^.&set := $00080000;
  53795. end;
  53796. procedure TDMAC1_DCH1INT.clearCHBCIE; inline;
  53797. begin
  53798. pTDefRegMap(@Self)^.clr := $00080000;
  53799. end;
  53800. procedure TDMAC1_DCH1INT.setCHBCIE(thebits : TBits_1); inline;
  53801. begin
  53802. if thebits = 0 then
  53803. pTDefRegMap(@Self)^.clr := $00080000
  53804. else
  53805. pTDefRegMap(@Self)^.&set := $00080000;
  53806. end;
  53807. function TDMAC1_DCH1INT.getCHBCIE : TBits_1; inline;
  53808. begin
  53809. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  53810. end;
  53811. procedure TDMAC1_DCH1INT.setCHDHIE; inline;
  53812. begin
  53813. pTDefRegMap(@Self)^.&set := $00100000;
  53814. end;
  53815. procedure TDMAC1_DCH1INT.clearCHDHIE; inline;
  53816. begin
  53817. pTDefRegMap(@Self)^.clr := $00100000;
  53818. end;
  53819. procedure TDMAC1_DCH1INT.setCHDHIE(thebits : TBits_1); inline;
  53820. begin
  53821. if thebits = 0 then
  53822. pTDefRegMap(@Self)^.clr := $00100000
  53823. else
  53824. pTDefRegMap(@Self)^.&set := $00100000;
  53825. end;
  53826. function TDMAC1_DCH1INT.getCHDHIE : TBits_1; inline;
  53827. begin
  53828. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  53829. end;
  53830. procedure TDMAC1_DCH1INT.setCHDDIE; inline;
  53831. begin
  53832. pTDefRegMap(@Self)^.&set := $00200000;
  53833. end;
  53834. procedure TDMAC1_DCH1INT.clearCHDDIE; inline;
  53835. begin
  53836. pTDefRegMap(@Self)^.clr := $00200000;
  53837. end;
  53838. procedure TDMAC1_DCH1INT.setCHDDIE(thebits : TBits_1); inline;
  53839. begin
  53840. if thebits = 0 then
  53841. pTDefRegMap(@Self)^.clr := $00200000
  53842. else
  53843. pTDefRegMap(@Self)^.&set := $00200000;
  53844. end;
  53845. function TDMAC1_DCH1INT.getCHDDIE : TBits_1; inline;
  53846. begin
  53847. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  53848. end;
  53849. procedure TDMAC1_DCH1INT.setCHSHIE; inline;
  53850. begin
  53851. pTDefRegMap(@Self)^.&set := $00400000;
  53852. end;
  53853. procedure TDMAC1_DCH1INT.clearCHSHIE; inline;
  53854. begin
  53855. pTDefRegMap(@Self)^.clr := $00400000;
  53856. end;
  53857. procedure TDMAC1_DCH1INT.setCHSHIE(thebits : TBits_1); inline;
  53858. begin
  53859. if thebits = 0 then
  53860. pTDefRegMap(@Self)^.clr := $00400000
  53861. else
  53862. pTDefRegMap(@Self)^.&set := $00400000;
  53863. end;
  53864. function TDMAC1_DCH1INT.getCHSHIE : TBits_1; inline;
  53865. begin
  53866. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  53867. end;
  53868. procedure TDMAC1_DCH1INT.setCHSDIE; inline;
  53869. begin
  53870. pTDefRegMap(@Self)^.&set := $00800000;
  53871. end;
  53872. procedure TDMAC1_DCH1INT.clearCHSDIE; inline;
  53873. begin
  53874. pTDefRegMap(@Self)^.clr := $00800000;
  53875. end;
  53876. procedure TDMAC1_DCH1INT.setCHSDIE(thebits : TBits_1); inline;
  53877. begin
  53878. if thebits = 0 then
  53879. pTDefRegMap(@Self)^.clr := $00800000
  53880. else
  53881. pTDefRegMap(@Self)^.&set := $00800000;
  53882. end;
  53883. function TDMAC1_DCH1INT.getCHSDIE : TBits_1; inline;
  53884. begin
  53885. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  53886. end;
  53887. procedure TDMAC1_DCH1INT.setw(thebits : TBits_32); inline;
  53888. begin
  53889. pTDefRegMap(@Self)^.val := thebits;
  53890. end;
  53891. function TDMAC1_DCH1INT.getw : TBits_32; inline;
  53892. begin
  53893. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53894. end;
  53895. procedure TDMAC2_DCH2CON.setCHPRI(thebits : TBits_2); inline;
  53896. begin
  53897. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  53898. end;
  53899. function TDMAC2_DCH2CON.getCHPRI : TBits_2; inline;
  53900. begin
  53901. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  53902. end;
  53903. procedure TDMAC2_DCH2CON.setCHEDET; inline;
  53904. begin
  53905. pTDefRegMap(@Self)^.&set := $00000004;
  53906. end;
  53907. procedure TDMAC2_DCH2CON.clearCHEDET; inline;
  53908. begin
  53909. pTDefRegMap(@Self)^.clr := $00000004;
  53910. end;
  53911. procedure TDMAC2_DCH2CON.setCHEDET(thebits : TBits_1); inline;
  53912. begin
  53913. if thebits = 0 then
  53914. pTDefRegMap(@Self)^.clr := $00000004
  53915. else
  53916. pTDefRegMap(@Self)^.&set := $00000004;
  53917. end;
  53918. function TDMAC2_DCH2CON.getCHEDET : TBits_1; inline;
  53919. begin
  53920. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53921. end;
  53922. procedure TDMAC2_DCH2CON.setCHAEN; inline;
  53923. begin
  53924. pTDefRegMap(@Self)^.&set := $00000010;
  53925. end;
  53926. procedure TDMAC2_DCH2CON.clearCHAEN; inline;
  53927. begin
  53928. pTDefRegMap(@Self)^.clr := $00000010;
  53929. end;
  53930. procedure TDMAC2_DCH2CON.setCHAEN(thebits : TBits_1); inline;
  53931. begin
  53932. if thebits = 0 then
  53933. pTDefRegMap(@Self)^.clr := $00000010
  53934. else
  53935. pTDefRegMap(@Self)^.&set := $00000010;
  53936. end;
  53937. function TDMAC2_DCH2CON.getCHAEN : TBits_1; inline;
  53938. begin
  53939. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53940. end;
  53941. procedure TDMAC2_DCH2CON.setCHCHN; inline;
  53942. begin
  53943. pTDefRegMap(@Self)^.&set := $00000020;
  53944. end;
  53945. procedure TDMAC2_DCH2CON.clearCHCHN; inline;
  53946. begin
  53947. pTDefRegMap(@Self)^.clr := $00000020;
  53948. end;
  53949. procedure TDMAC2_DCH2CON.setCHCHN(thebits : TBits_1); inline;
  53950. begin
  53951. if thebits = 0 then
  53952. pTDefRegMap(@Self)^.clr := $00000020
  53953. else
  53954. pTDefRegMap(@Self)^.&set := $00000020;
  53955. end;
  53956. function TDMAC2_DCH2CON.getCHCHN : TBits_1; inline;
  53957. begin
  53958. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53959. end;
  53960. procedure TDMAC2_DCH2CON.setCHAED; inline;
  53961. begin
  53962. pTDefRegMap(@Self)^.&set := $00000040;
  53963. end;
  53964. procedure TDMAC2_DCH2CON.clearCHAED; inline;
  53965. begin
  53966. pTDefRegMap(@Self)^.clr := $00000040;
  53967. end;
  53968. procedure TDMAC2_DCH2CON.setCHAED(thebits : TBits_1); inline;
  53969. begin
  53970. if thebits = 0 then
  53971. pTDefRegMap(@Self)^.clr := $00000040
  53972. else
  53973. pTDefRegMap(@Self)^.&set := $00000040;
  53974. end;
  53975. function TDMAC2_DCH2CON.getCHAED : TBits_1; inline;
  53976. begin
  53977. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53978. end;
  53979. procedure TDMAC2_DCH2CON.setCHEN; inline;
  53980. begin
  53981. pTDefRegMap(@Self)^.&set := $00000080;
  53982. end;
  53983. procedure TDMAC2_DCH2CON.clearCHEN; inline;
  53984. begin
  53985. pTDefRegMap(@Self)^.clr := $00000080;
  53986. end;
  53987. procedure TDMAC2_DCH2CON.setCHEN(thebits : TBits_1); inline;
  53988. begin
  53989. if thebits = 0 then
  53990. pTDefRegMap(@Self)^.clr := $00000080
  53991. else
  53992. pTDefRegMap(@Self)^.&set := $00000080;
  53993. end;
  53994. function TDMAC2_DCH2CON.getCHEN : TBits_1; inline;
  53995. begin
  53996. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53997. end;
  53998. procedure TDMAC2_DCH2CON.setCHCHNS; inline;
  53999. begin
  54000. pTDefRegMap(@Self)^.&set := $00000100;
  54001. end;
  54002. procedure TDMAC2_DCH2CON.clearCHCHNS; inline;
  54003. begin
  54004. pTDefRegMap(@Self)^.clr := $00000100;
  54005. end;
  54006. procedure TDMAC2_DCH2CON.setCHCHNS(thebits : TBits_1); inline;
  54007. begin
  54008. if thebits = 0 then
  54009. pTDefRegMap(@Self)^.clr := $00000100
  54010. else
  54011. pTDefRegMap(@Self)^.&set := $00000100;
  54012. end;
  54013. function TDMAC2_DCH2CON.getCHCHNS : TBits_1; inline;
  54014. begin
  54015. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  54016. end;
  54017. procedure TDMAC2_DCH2CON.setCHBUSY; inline;
  54018. begin
  54019. pTDefRegMap(@Self)^.&set := $00008000;
  54020. end;
  54021. procedure TDMAC2_DCH2CON.clearCHBUSY; inline;
  54022. begin
  54023. pTDefRegMap(@Self)^.clr := $00008000;
  54024. end;
  54025. procedure TDMAC2_DCH2CON.setCHBUSY(thebits : TBits_1); inline;
  54026. begin
  54027. if thebits = 0 then
  54028. pTDefRegMap(@Self)^.clr := $00008000
  54029. else
  54030. pTDefRegMap(@Self)^.&set := $00008000;
  54031. end;
  54032. function TDMAC2_DCH2CON.getCHBUSY : TBits_1; inline;
  54033. begin
  54034. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  54035. end;
  54036. procedure TDMAC2_DCH2CON.setw(thebits : TBits_32); inline;
  54037. begin
  54038. pTDefRegMap(@Self)^.val := thebits;
  54039. end;
  54040. function TDMAC2_DCH2CON.getw : TBits_32; inline;
  54041. begin
  54042. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54043. end;
  54044. procedure TDMAC2_DCH2ECON.setAIRQEN; inline;
  54045. begin
  54046. pTDefRegMap(@Self)^.&set := $00000008;
  54047. end;
  54048. procedure TDMAC2_DCH2ECON.clearAIRQEN; inline;
  54049. begin
  54050. pTDefRegMap(@Self)^.clr := $00000008;
  54051. end;
  54052. procedure TDMAC2_DCH2ECON.setAIRQEN(thebits : TBits_1); inline;
  54053. begin
  54054. if thebits = 0 then
  54055. pTDefRegMap(@Self)^.clr := $00000008
  54056. else
  54057. pTDefRegMap(@Self)^.&set := $00000008;
  54058. end;
  54059. function TDMAC2_DCH2ECON.getAIRQEN : TBits_1; inline;
  54060. begin
  54061. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54062. end;
  54063. procedure TDMAC2_DCH2ECON.setSIRQEN; inline;
  54064. begin
  54065. pTDefRegMap(@Self)^.&set := $00000010;
  54066. end;
  54067. procedure TDMAC2_DCH2ECON.clearSIRQEN; inline;
  54068. begin
  54069. pTDefRegMap(@Self)^.clr := $00000010;
  54070. end;
  54071. procedure TDMAC2_DCH2ECON.setSIRQEN(thebits : TBits_1); inline;
  54072. begin
  54073. if thebits = 0 then
  54074. pTDefRegMap(@Self)^.clr := $00000010
  54075. else
  54076. pTDefRegMap(@Self)^.&set := $00000010;
  54077. end;
  54078. function TDMAC2_DCH2ECON.getSIRQEN : TBits_1; inline;
  54079. begin
  54080. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54081. end;
  54082. procedure TDMAC2_DCH2ECON.setPATEN; inline;
  54083. begin
  54084. pTDefRegMap(@Self)^.&set := $00000020;
  54085. end;
  54086. procedure TDMAC2_DCH2ECON.clearPATEN; inline;
  54087. begin
  54088. pTDefRegMap(@Self)^.clr := $00000020;
  54089. end;
  54090. procedure TDMAC2_DCH2ECON.setPATEN(thebits : TBits_1); inline;
  54091. begin
  54092. if thebits = 0 then
  54093. pTDefRegMap(@Self)^.clr := $00000020
  54094. else
  54095. pTDefRegMap(@Self)^.&set := $00000020;
  54096. end;
  54097. function TDMAC2_DCH2ECON.getPATEN : TBits_1; inline;
  54098. begin
  54099. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54100. end;
  54101. procedure TDMAC2_DCH2ECON.setCABORT; inline;
  54102. begin
  54103. pTDefRegMap(@Self)^.&set := $00000040;
  54104. end;
  54105. procedure TDMAC2_DCH2ECON.clearCABORT; inline;
  54106. begin
  54107. pTDefRegMap(@Self)^.clr := $00000040;
  54108. end;
  54109. procedure TDMAC2_DCH2ECON.setCABORT(thebits : TBits_1); inline;
  54110. begin
  54111. if thebits = 0 then
  54112. pTDefRegMap(@Self)^.clr := $00000040
  54113. else
  54114. pTDefRegMap(@Self)^.&set := $00000040;
  54115. end;
  54116. function TDMAC2_DCH2ECON.getCABORT : TBits_1; inline;
  54117. begin
  54118. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54119. end;
  54120. procedure TDMAC2_DCH2ECON.setCFORCE; inline;
  54121. begin
  54122. pTDefRegMap(@Self)^.&set := $00000080;
  54123. end;
  54124. procedure TDMAC2_DCH2ECON.clearCFORCE; inline;
  54125. begin
  54126. pTDefRegMap(@Self)^.clr := $00000080;
  54127. end;
  54128. procedure TDMAC2_DCH2ECON.setCFORCE(thebits : TBits_1); inline;
  54129. begin
  54130. if thebits = 0 then
  54131. pTDefRegMap(@Self)^.clr := $00000080
  54132. else
  54133. pTDefRegMap(@Self)^.&set := $00000080;
  54134. end;
  54135. function TDMAC2_DCH2ECON.getCFORCE : TBits_1; inline;
  54136. begin
  54137. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54138. end;
  54139. procedure TDMAC2_DCH2ECON.setCHSIRQ(thebits : TBits_8); inline;
  54140. begin
  54141. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  54142. end;
  54143. function TDMAC2_DCH2ECON.getCHSIRQ : TBits_8; inline;
  54144. begin
  54145. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  54146. end;
  54147. procedure TDMAC2_DCH2ECON.setCHAIRQ(thebits : TBits_8); inline;
  54148. begin
  54149. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  54150. end;
  54151. function TDMAC2_DCH2ECON.getCHAIRQ : TBits_8; inline;
  54152. begin
  54153. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  54154. end;
  54155. procedure TDMAC2_DCH2ECON.setw(thebits : TBits_32); inline;
  54156. begin
  54157. pTDefRegMap(@Self)^.val := thebits;
  54158. end;
  54159. function TDMAC2_DCH2ECON.getw : TBits_32; inline;
  54160. begin
  54161. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54162. end;
  54163. procedure TDMAC2_DCH2INT.setCHERIF; inline;
  54164. begin
  54165. pTDefRegMap(@Self)^.&set := $00000001;
  54166. end;
  54167. procedure TDMAC2_DCH2INT.clearCHERIF; inline;
  54168. begin
  54169. pTDefRegMap(@Self)^.clr := $00000001;
  54170. end;
  54171. procedure TDMAC2_DCH2INT.setCHERIF(thebits : TBits_1); inline;
  54172. begin
  54173. if thebits = 0 then
  54174. pTDefRegMap(@Self)^.clr := $00000001
  54175. else
  54176. pTDefRegMap(@Self)^.&set := $00000001;
  54177. end;
  54178. function TDMAC2_DCH2INT.getCHERIF : TBits_1; inline;
  54179. begin
  54180. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54181. end;
  54182. procedure TDMAC2_DCH2INT.setCHTAIF; inline;
  54183. begin
  54184. pTDefRegMap(@Self)^.&set := $00000002;
  54185. end;
  54186. procedure TDMAC2_DCH2INT.clearCHTAIF; inline;
  54187. begin
  54188. pTDefRegMap(@Self)^.clr := $00000002;
  54189. end;
  54190. procedure TDMAC2_DCH2INT.setCHTAIF(thebits : TBits_1); inline;
  54191. begin
  54192. if thebits = 0 then
  54193. pTDefRegMap(@Self)^.clr := $00000002
  54194. else
  54195. pTDefRegMap(@Self)^.&set := $00000002;
  54196. end;
  54197. function TDMAC2_DCH2INT.getCHTAIF : TBits_1; inline;
  54198. begin
  54199. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54200. end;
  54201. procedure TDMAC2_DCH2INT.setCHCCIF; inline;
  54202. begin
  54203. pTDefRegMap(@Self)^.&set := $00000004;
  54204. end;
  54205. procedure TDMAC2_DCH2INT.clearCHCCIF; inline;
  54206. begin
  54207. pTDefRegMap(@Self)^.clr := $00000004;
  54208. end;
  54209. procedure TDMAC2_DCH2INT.setCHCCIF(thebits : TBits_1); inline;
  54210. begin
  54211. if thebits = 0 then
  54212. pTDefRegMap(@Self)^.clr := $00000004
  54213. else
  54214. pTDefRegMap(@Self)^.&set := $00000004;
  54215. end;
  54216. function TDMAC2_DCH2INT.getCHCCIF : TBits_1; inline;
  54217. begin
  54218. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54219. end;
  54220. procedure TDMAC2_DCH2INT.setCHBCIF; inline;
  54221. begin
  54222. pTDefRegMap(@Self)^.&set := $00000008;
  54223. end;
  54224. procedure TDMAC2_DCH2INT.clearCHBCIF; inline;
  54225. begin
  54226. pTDefRegMap(@Self)^.clr := $00000008;
  54227. end;
  54228. procedure TDMAC2_DCH2INT.setCHBCIF(thebits : TBits_1); inline;
  54229. begin
  54230. if thebits = 0 then
  54231. pTDefRegMap(@Self)^.clr := $00000008
  54232. else
  54233. pTDefRegMap(@Self)^.&set := $00000008;
  54234. end;
  54235. function TDMAC2_DCH2INT.getCHBCIF : TBits_1; inline;
  54236. begin
  54237. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54238. end;
  54239. procedure TDMAC2_DCH2INT.setCHDHIF; inline;
  54240. begin
  54241. pTDefRegMap(@Self)^.&set := $00000010;
  54242. end;
  54243. procedure TDMAC2_DCH2INT.clearCHDHIF; inline;
  54244. begin
  54245. pTDefRegMap(@Self)^.clr := $00000010;
  54246. end;
  54247. procedure TDMAC2_DCH2INT.setCHDHIF(thebits : TBits_1); inline;
  54248. begin
  54249. if thebits = 0 then
  54250. pTDefRegMap(@Self)^.clr := $00000010
  54251. else
  54252. pTDefRegMap(@Self)^.&set := $00000010;
  54253. end;
  54254. function TDMAC2_DCH2INT.getCHDHIF : TBits_1; inline;
  54255. begin
  54256. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54257. end;
  54258. procedure TDMAC2_DCH2INT.setCHDDIF; inline;
  54259. begin
  54260. pTDefRegMap(@Self)^.&set := $00000020;
  54261. end;
  54262. procedure TDMAC2_DCH2INT.clearCHDDIF; inline;
  54263. begin
  54264. pTDefRegMap(@Self)^.clr := $00000020;
  54265. end;
  54266. procedure TDMAC2_DCH2INT.setCHDDIF(thebits : TBits_1); inline;
  54267. begin
  54268. if thebits = 0 then
  54269. pTDefRegMap(@Self)^.clr := $00000020
  54270. else
  54271. pTDefRegMap(@Self)^.&set := $00000020;
  54272. end;
  54273. function TDMAC2_DCH2INT.getCHDDIF : TBits_1; inline;
  54274. begin
  54275. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54276. end;
  54277. procedure TDMAC2_DCH2INT.setCHSHIF; inline;
  54278. begin
  54279. pTDefRegMap(@Self)^.&set := $00000040;
  54280. end;
  54281. procedure TDMAC2_DCH2INT.clearCHSHIF; inline;
  54282. begin
  54283. pTDefRegMap(@Self)^.clr := $00000040;
  54284. end;
  54285. procedure TDMAC2_DCH2INT.setCHSHIF(thebits : TBits_1); inline;
  54286. begin
  54287. if thebits = 0 then
  54288. pTDefRegMap(@Self)^.clr := $00000040
  54289. else
  54290. pTDefRegMap(@Self)^.&set := $00000040;
  54291. end;
  54292. function TDMAC2_DCH2INT.getCHSHIF : TBits_1; inline;
  54293. begin
  54294. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54295. end;
  54296. procedure TDMAC2_DCH2INT.setCHSDIF; inline;
  54297. begin
  54298. pTDefRegMap(@Self)^.&set := $00000080;
  54299. end;
  54300. procedure TDMAC2_DCH2INT.clearCHSDIF; inline;
  54301. begin
  54302. pTDefRegMap(@Self)^.clr := $00000080;
  54303. end;
  54304. procedure TDMAC2_DCH2INT.setCHSDIF(thebits : TBits_1); inline;
  54305. begin
  54306. if thebits = 0 then
  54307. pTDefRegMap(@Self)^.clr := $00000080
  54308. else
  54309. pTDefRegMap(@Self)^.&set := $00000080;
  54310. end;
  54311. function TDMAC2_DCH2INT.getCHSDIF : TBits_1; inline;
  54312. begin
  54313. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54314. end;
  54315. procedure TDMAC2_DCH2INT.setCHERIE; inline;
  54316. begin
  54317. pTDefRegMap(@Self)^.&set := $00010000;
  54318. end;
  54319. procedure TDMAC2_DCH2INT.clearCHERIE; inline;
  54320. begin
  54321. pTDefRegMap(@Self)^.clr := $00010000;
  54322. end;
  54323. procedure TDMAC2_DCH2INT.setCHERIE(thebits : TBits_1); inline;
  54324. begin
  54325. if thebits = 0 then
  54326. pTDefRegMap(@Self)^.clr := $00010000
  54327. else
  54328. pTDefRegMap(@Self)^.&set := $00010000;
  54329. end;
  54330. function TDMAC2_DCH2INT.getCHERIE : TBits_1; inline;
  54331. begin
  54332. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  54333. end;
  54334. procedure TDMAC2_DCH2INT.setCHTAIE; inline;
  54335. begin
  54336. pTDefRegMap(@Self)^.&set := $00020000;
  54337. end;
  54338. procedure TDMAC2_DCH2INT.clearCHTAIE; inline;
  54339. begin
  54340. pTDefRegMap(@Self)^.clr := $00020000;
  54341. end;
  54342. procedure TDMAC2_DCH2INT.setCHTAIE(thebits : TBits_1); inline;
  54343. begin
  54344. if thebits = 0 then
  54345. pTDefRegMap(@Self)^.clr := $00020000
  54346. else
  54347. pTDefRegMap(@Self)^.&set := $00020000;
  54348. end;
  54349. function TDMAC2_DCH2INT.getCHTAIE : TBits_1; inline;
  54350. begin
  54351. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  54352. end;
  54353. procedure TDMAC2_DCH2INT.setCHCCIE; inline;
  54354. begin
  54355. pTDefRegMap(@Self)^.&set := $00040000;
  54356. end;
  54357. procedure TDMAC2_DCH2INT.clearCHCCIE; inline;
  54358. begin
  54359. pTDefRegMap(@Self)^.clr := $00040000;
  54360. end;
  54361. procedure TDMAC2_DCH2INT.setCHCCIE(thebits : TBits_1); inline;
  54362. begin
  54363. if thebits = 0 then
  54364. pTDefRegMap(@Self)^.clr := $00040000
  54365. else
  54366. pTDefRegMap(@Self)^.&set := $00040000;
  54367. end;
  54368. function TDMAC2_DCH2INT.getCHCCIE : TBits_1; inline;
  54369. begin
  54370. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  54371. end;
  54372. procedure TDMAC2_DCH2INT.setCHBCIE; inline;
  54373. begin
  54374. pTDefRegMap(@Self)^.&set := $00080000;
  54375. end;
  54376. procedure TDMAC2_DCH2INT.clearCHBCIE; inline;
  54377. begin
  54378. pTDefRegMap(@Self)^.clr := $00080000;
  54379. end;
  54380. procedure TDMAC2_DCH2INT.setCHBCIE(thebits : TBits_1); inline;
  54381. begin
  54382. if thebits = 0 then
  54383. pTDefRegMap(@Self)^.clr := $00080000
  54384. else
  54385. pTDefRegMap(@Self)^.&set := $00080000;
  54386. end;
  54387. function TDMAC2_DCH2INT.getCHBCIE : TBits_1; inline;
  54388. begin
  54389. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  54390. end;
  54391. procedure TDMAC2_DCH2INT.setCHDHIE; inline;
  54392. begin
  54393. pTDefRegMap(@Self)^.&set := $00100000;
  54394. end;
  54395. procedure TDMAC2_DCH2INT.clearCHDHIE; inline;
  54396. begin
  54397. pTDefRegMap(@Self)^.clr := $00100000;
  54398. end;
  54399. procedure TDMAC2_DCH2INT.setCHDHIE(thebits : TBits_1); inline;
  54400. begin
  54401. if thebits = 0 then
  54402. pTDefRegMap(@Self)^.clr := $00100000
  54403. else
  54404. pTDefRegMap(@Self)^.&set := $00100000;
  54405. end;
  54406. function TDMAC2_DCH2INT.getCHDHIE : TBits_1; inline;
  54407. begin
  54408. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  54409. end;
  54410. procedure TDMAC2_DCH2INT.setCHDDIE; inline;
  54411. begin
  54412. pTDefRegMap(@Self)^.&set := $00200000;
  54413. end;
  54414. procedure TDMAC2_DCH2INT.clearCHDDIE; inline;
  54415. begin
  54416. pTDefRegMap(@Self)^.clr := $00200000;
  54417. end;
  54418. procedure TDMAC2_DCH2INT.setCHDDIE(thebits : TBits_1); inline;
  54419. begin
  54420. if thebits = 0 then
  54421. pTDefRegMap(@Self)^.clr := $00200000
  54422. else
  54423. pTDefRegMap(@Self)^.&set := $00200000;
  54424. end;
  54425. function TDMAC2_DCH2INT.getCHDDIE : TBits_1; inline;
  54426. begin
  54427. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  54428. end;
  54429. procedure TDMAC2_DCH2INT.setCHSHIE; inline;
  54430. begin
  54431. pTDefRegMap(@Self)^.&set := $00400000;
  54432. end;
  54433. procedure TDMAC2_DCH2INT.clearCHSHIE; inline;
  54434. begin
  54435. pTDefRegMap(@Self)^.clr := $00400000;
  54436. end;
  54437. procedure TDMAC2_DCH2INT.setCHSHIE(thebits : TBits_1); inline;
  54438. begin
  54439. if thebits = 0 then
  54440. pTDefRegMap(@Self)^.clr := $00400000
  54441. else
  54442. pTDefRegMap(@Self)^.&set := $00400000;
  54443. end;
  54444. function TDMAC2_DCH2INT.getCHSHIE : TBits_1; inline;
  54445. begin
  54446. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  54447. end;
  54448. procedure TDMAC2_DCH2INT.setCHSDIE; inline;
  54449. begin
  54450. pTDefRegMap(@Self)^.&set := $00800000;
  54451. end;
  54452. procedure TDMAC2_DCH2INT.clearCHSDIE; inline;
  54453. begin
  54454. pTDefRegMap(@Self)^.clr := $00800000;
  54455. end;
  54456. procedure TDMAC2_DCH2INT.setCHSDIE(thebits : TBits_1); inline;
  54457. begin
  54458. if thebits = 0 then
  54459. pTDefRegMap(@Self)^.clr := $00800000
  54460. else
  54461. pTDefRegMap(@Self)^.&set := $00800000;
  54462. end;
  54463. function TDMAC2_DCH2INT.getCHSDIE : TBits_1; inline;
  54464. begin
  54465. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  54466. end;
  54467. procedure TDMAC2_DCH2INT.setw(thebits : TBits_32); inline;
  54468. begin
  54469. pTDefRegMap(@Self)^.val := thebits;
  54470. end;
  54471. function TDMAC2_DCH2INT.getw : TBits_32; inline;
  54472. begin
  54473. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54474. end;
  54475. procedure TDMAC3_DCH3CON.setCHPRI(thebits : TBits_2); inline;
  54476. begin
  54477. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  54478. end;
  54479. function TDMAC3_DCH3CON.getCHPRI : TBits_2; inline;
  54480. begin
  54481. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  54482. end;
  54483. procedure TDMAC3_DCH3CON.setCHEDET; inline;
  54484. begin
  54485. pTDefRegMap(@Self)^.&set := $00000004;
  54486. end;
  54487. procedure TDMAC3_DCH3CON.clearCHEDET; inline;
  54488. begin
  54489. pTDefRegMap(@Self)^.clr := $00000004;
  54490. end;
  54491. procedure TDMAC3_DCH3CON.setCHEDET(thebits : TBits_1); inline;
  54492. begin
  54493. if thebits = 0 then
  54494. pTDefRegMap(@Self)^.clr := $00000004
  54495. else
  54496. pTDefRegMap(@Self)^.&set := $00000004;
  54497. end;
  54498. function TDMAC3_DCH3CON.getCHEDET : TBits_1; inline;
  54499. begin
  54500. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54501. end;
  54502. procedure TDMAC3_DCH3CON.setCHAEN; inline;
  54503. begin
  54504. pTDefRegMap(@Self)^.&set := $00000010;
  54505. end;
  54506. procedure TDMAC3_DCH3CON.clearCHAEN; inline;
  54507. begin
  54508. pTDefRegMap(@Self)^.clr := $00000010;
  54509. end;
  54510. procedure TDMAC3_DCH3CON.setCHAEN(thebits : TBits_1); inline;
  54511. begin
  54512. if thebits = 0 then
  54513. pTDefRegMap(@Self)^.clr := $00000010
  54514. else
  54515. pTDefRegMap(@Self)^.&set := $00000010;
  54516. end;
  54517. function TDMAC3_DCH3CON.getCHAEN : TBits_1; inline;
  54518. begin
  54519. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54520. end;
  54521. procedure TDMAC3_DCH3CON.setCHCHN; inline;
  54522. begin
  54523. pTDefRegMap(@Self)^.&set := $00000020;
  54524. end;
  54525. procedure TDMAC3_DCH3CON.clearCHCHN; inline;
  54526. begin
  54527. pTDefRegMap(@Self)^.clr := $00000020;
  54528. end;
  54529. procedure TDMAC3_DCH3CON.setCHCHN(thebits : TBits_1); inline;
  54530. begin
  54531. if thebits = 0 then
  54532. pTDefRegMap(@Self)^.clr := $00000020
  54533. else
  54534. pTDefRegMap(@Self)^.&set := $00000020;
  54535. end;
  54536. function TDMAC3_DCH3CON.getCHCHN : TBits_1; inline;
  54537. begin
  54538. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54539. end;
  54540. procedure TDMAC3_DCH3CON.setCHAED; inline;
  54541. begin
  54542. pTDefRegMap(@Self)^.&set := $00000040;
  54543. end;
  54544. procedure TDMAC3_DCH3CON.clearCHAED; inline;
  54545. begin
  54546. pTDefRegMap(@Self)^.clr := $00000040;
  54547. end;
  54548. procedure TDMAC3_DCH3CON.setCHAED(thebits : TBits_1); inline;
  54549. begin
  54550. if thebits = 0 then
  54551. pTDefRegMap(@Self)^.clr := $00000040
  54552. else
  54553. pTDefRegMap(@Self)^.&set := $00000040;
  54554. end;
  54555. function TDMAC3_DCH3CON.getCHAED : TBits_1; inline;
  54556. begin
  54557. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54558. end;
  54559. procedure TDMAC3_DCH3CON.setCHEN; inline;
  54560. begin
  54561. pTDefRegMap(@Self)^.&set := $00000080;
  54562. end;
  54563. procedure TDMAC3_DCH3CON.clearCHEN; inline;
  54564. begin
  54565. pTDefRegMap(@Self)^.clr := $00000080;
  54566. end;
  54567. procedure TDMAC3_DCH3CON.setCHEN(thebits : TBits_1); inline;
  54568. begin
  54569. if thebits = 0 then
  54570. pTDefRegMap(@Self)^.clr := $00000080
  54571. else
  54572. pTDefRegMap(@Self)^.&set := $00000080;
  54573. end;
  54574. function TDMAC3_DCH3CON.getCHEN : TBits_1; inline;
  54575. begin
  54576. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54577. end;
  54578. procedure TDMAC3_DCH3CON.setCHCHNS; inline;
  54579. begin
  54580. pTDefRegMap(@Self)^.&set := $00000100;
  54581. end;
  54582. procedure TDMAC3_DCH3CON.clearCHCHNS; inline;
  54583. begin
  54584. pTDefRegMap(@Self)^.clr := $00000100;
  54585. end;
  54586. procedure TDMAC3_DCH3CON.setCHCHNS(thebits : TBits_1); inline;
  54587. begin
  54588. if thebits = 0 then
  54589. pTDefRegMap(@Self)^.clr := $00000100
  54590. else
  54591. pTDefRegMap(@Self)^.&set := $00000100;
  54592. end;
  54593. function TDMAC3_DCH3CON.getCHCHNS : TBits_1; inline;
  54594. begin
  54595. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  54596. end;
  54597. procedure TDMAC3_DCH3CON.setCHBUSY; inline;
  54598. begin
  54599. pTDefRegMap(@Self)^.&set := $00008000;
  54600. end;
  54601. procedure TDMAC3_DCH3CON.clearCHBUSY; inline;
  54602. begin
  54603. pTDefRegMap(@Self)^.clr := $00008000;
  54604. end;
  54605. procedure TDMAC3_DCH3CON.setCHBUSY(thebits : TBits_1); inline;
  54606. begin
  54607. if thebits = 0 then
  54608. pTDefRegMap(@Self)^.clr := $00008000
  54609. else
  54610. pTDefRegMap(@Self)^.&set := $00008000;
  54611. end;
  54612. function TDMAC3_DCH3CON.getCHBUSY : TBits_1; inline;
  54613. begin
  54614. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  54615. end;
  54616. procedure TDMAC3_DCH3CON.setw(thebits : TBits_32); inline;
  54617. begin
  54618. pTDefRegMap(@Self)^.val := thebits;
  54619. end;
  54620. function TDMAC3_DCH3CON.getw : TBits_32; inline;
  54621. begin
  54622. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54623. end;
  54624. procedure TDMAC3_DCH3ECON.setAIRQEN; inline;
  54625. begin
  54626. pTDefRegMap(@Self)^.&set := $00000008;
  54627. end;
  54628. procedure TDMAC3_DCH3ECON.clearAIRQEN; inline;
  54629. begin
  54630. pTDefRegMap(@Self)^.clr := $00000008;
  54631. end;
  54632. procedure TDMAC3_DCH3ECON.setAIRQEN(thebits : TBits_1); inline;
  54633. begin
  54634. if thebits = 0 then
  54635. pTDefRegMap(@Self)^.clr := $00000008
  54636. else
  54637. pTDefRegMap(@Self)^.&set := $00000008;
  54638. end;
  54639. function TDMAC3_DCH3ECON.getAIRQEN : TBits_1; inline;
  54640. begin
  54641. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54642. end;
  54643. procedure TDMAC3_DCH3ECON.setSIRQEN; inline;
  54644. begin
  54645. pTDefRegMap(@Self)^.&set := $00000010;
  54646. end;
  54647. procedure TDMAC3_DCH3ECON.clearSIRQEN; inline;
  54648. begin
  54649. pTDefRegMap(@Self)^.clr := $00000010;
  54650. end;
  54651. procedure TDMAC3_DCH3ECON.setSIRQEN(thebits : TBits_1); inline;
  54652. begin
  54653. if thebits = 0 then
  54654. pTDefRegMap(@Self)^.clr := $00000010
  54655. else
  54656. pTDefRegMap(@Self)^.&set := $00000010;
  54657. end;
  54658. function TDMAC3_DCH3ECON.getSIRQEN : TBits_1; inline;
  54659. begin
  54660. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54661. end;
  54662. procedure TDMAC3_DCH3ECON.setPATEN; inline;
  54663. begin
  54664. pTDefRegMap(@Self)^.&set := $00000020;
  54665. end;
  54666. procedure TDMAC3_DCH3ECON.clearPATEN; inline;
  54667. begin
  54668. pTDefRegMap(@Self)^.clr := $00000020;
  54669. end;
  54670. procedure TDMAC3_DCH3ECON.setPATEN(thebits : TBits_1); inline;
  54671. begin
  54672. if thebits = 0 then
  54673. pTDefRegMap(@Self)^.clr := $00000020
  54674. else
  54675. pTDefRegMap(@Self)^.&set := $00000020;
  54676. end;
  54677. function TDMAC3_DCH3ECON.getPATEN : TBits_1; inline;
  54678. begin
  54679. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54680. end;
  54681. procedure TDMAC3_DCH3ECON.setCABORT; inline;
  54682. begin
  54683. pTDefRegMap(@Self)^.&set := $00000040;
  54684. end;
  54685. procedure TDMAC3_DCH3ECON.clearCABORT; inline;
  54686. begin
  54687. pTDefRegMap(@Self)^.clr := $00000040;
  54688. end;
  54689. procedure TDMAC3_DCH3ECON.setCABORT(thebits : TBits_1); inline;
  54690. begin
  54691. if thebits = 0 then
  54692. pTDefRegMap(@Self)^.clr := $00000040
  54693. else
  54694. pTDefRegMap(@Self)^.&set := $00000040;
  54695. end;
  54696. function TDMAC3_DCH3ECON.getCABORT : TBits_1; inline;
  54697. begin
  54698. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54699. end;
  54700. procedure TDMAC3_DCH3ECON.setCFORCE; inline;
  54701. begin
  54702. pTDefRegMap(@Self)^.&set := $00000080;
  54703. end;
  54704. procedure TDMAC3_DCH3ECON.clearCFORCE; inline;
  54705. begin
  54706. pTDefRegMap(@Self)^.clr := $00000080;
  54707. end;
  54708. procedure TDMAC3_DCH3ECON.setCFORCE(thebits : TBits_1); inline;
  54709. begin
  54710. if thebits = 0 then
  54711. pTDefRegMap(@Self)^.clr := $00000080
  54712. else
  54713. pTDefRegMap(@Self)^.&set := $00000080;
  54714. end;
  54715. function TDMAC3_DCH3ECON.getCFORCE : TBits_1; inline;
  54716. begin
  54717. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54718. end;
  54719. procedure TDMAC3_DCH3ECON.setCHSIRQ(thebits : TBits_8); inline;
  54720. begin
  54721. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  54722. end;
  54723. function TDMAC3_DCH3ECON.getCHSIRQ : TBits_8; inline;
  54724. begin
  54725. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  54726. end;
  54727. procedure TDMAC3_DCH3ECON.setCHAIRQ(thebits : TBits_8); inline;
  54728. begin
  54729. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  54730. end;
  54731. function TDMAC3_DCH3ECON.getCHAIRQ : TBits_8; inline;
  54732. begin
  54733. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  54734. end;
  54735. procedure TDMAC3_DCH3ECON.setw(thebits : TBits_32); inline;
  54736. begin
  54737. pTDefRegMap(@Self)^.val := thebits;
  54738. end;
  54739. function TDMAC3_DCH3ECON.getw : TBits_32; inline;
  54740. begin
  54741. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54742. end;
  54743. procedure TDMAC3_DCH3INT.setCHERIF; inline;
  54744. begin
  54745. pTDefRegMap(@Self)^.&set := $00000001;
  54746. end;
  54747. procedure TDMAC3_DCH3INT.clearCHERIF; inline;
  54748. begin
  54749. pTDefRegMap(@Self)^.clr := $00000001;
  54750. end;
  54751. procedure TDMAC3_DCH3INT.setCHERIF(thebits : TBits_1); inline;
  54752. begin
  54753. if thebits = 0 then
  54754. pTDefRegMap(@Self)^.clr := $00000001
  54755. else
  54756. pTDefRegMap(@Self)^.&set := $00000001;
  54757. end;
  54758. function TDMAC3_DCH3INT.getCHERIF : TBits_1; inline;
  54759. begin
  54760. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54761. end;
  54762. procedure TDMAC3_DCH3INT.setCHTAIF; inline;
  54763. begin
  54764. pTDefRegMap(@Self)^.&set := $00000002;
  54765. end;
  54766. procedure TDMAC3_DCH3INT.clearCHTAIF; inline;
  54767. begin
  54768. pTDefRegMap(@Self)^.clr := $00000002;
  54769. end;
  54770. procedure TDMAC3_DCH3INT.setCHTAIF(thebits : TBits_1); inline;
  54771. begin
  54772. if thebits = 0 then
  54773. pTDefRegMap(@Self)^.clr := $00000002
  54774. else
  54775. pTDefRegMap(@Self)^.&set := $00000002;
  54776. end;
  54777. function TDMAC3_DCH3INT.getCHTAIF : TBits_1; inline;
  54778. begin
  54779. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54780. end;
  54781. procedure TDMAC3_DCH3INT.setCHCCIF; inline;
  54782. begin
  54783. pTDefRegMap(@Self)^.&set := $00000004;
  54784. end;
  54785. procedure TDMAC3_DCH3INT.clearCHCCIF; inline;
  54786. begin
  54787. pTDefRegMap(@Self)^.clr := $00000004;
  54788. end;
  54789. procedure TDMAC3_DCH3INT.setCHCCIF(thebits : TBits_1); inline;
  54790. begin
  54791. if thebits = 0 then
  54792. pTDefRegMap(@Self)^.clr := $00000004
  54793. else
  54794. pTDefRegMap(@Self)^.&set := $00000004;
  54795. end;
  54796. function TDMAC3_DCH3INT.getCHCCIF : TBits_1; inline;
  54797. begin
  54798. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54799. end;
  54800. procedure TDMAC3_DCH3INT.setCHBCIF; inline;
  54801. begin
  54802. pTDefRegMap(@Self)^.&set := $00000008;
  54803. end;
  54804. procedure TDMAC3_DCH3INT.clearCHBCIF; inline;
  54805. begin
  54806. pTDefRegMap(@Self)^.clr := $00000008;
  54807. end;
  54808. procedure TDMAC3_DCH3INT.setCHBCIF(thebits : TBits_1); inline;
  54809. begin
  54810. if thebits = 0 then
  54811. pTDefRegMap(@Self)^.clr := $00000008
  54812. else
  54813. pTDefRegMap(@Self)^.&set := $00000008;
  54814. end;
  54815. function TDMAC3_DCH3INT.getCHBCIF : TBits_1; inline;
  54816. begin
  54817. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54818. end;
  54819. procedure TDMAC3_DCH3INT.setCHDHIF; inline;
  54820. begin
  54821. pTDefRegMap(@Self)^.&set := $00000010;
  54822. end;
  54823. procedure TDMAC3_DCH3INT.clearCHDHIF; inline;
  54824. begin
  54825. pTDefRegMap(@Self)^.clr := $00000010;
  54826. end;
  54827. procedure TDMAC3_DCH3INT.setCHDHIF(thebits : TBits_1); inline;
  54828. begin
  54829. if thebits = 0 then
  54830. pTDefRegMap(@Self)^.clr := $00000010
  54831. else
  54832. pTDefRegMap(@Self)^.&set := $00000010;
  54833. end;
  54834. function TDMAC3_DCH3INT.getCHDHIF : TBits_1; inline;
  54835. begin
  54836. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54837. end;
  54838. procedure TDMAC3_DCH3INT.setCHDDIF; inline;
  54839. begin
  54840. pTDefRegMap(@Self)^.&set := $00000020;
  54841. end;
  54842. procedure TDMAC3_DCH3INT.clearCHDDIF; inline;
  54843. begin
  54844. pTDefRegMap(@Self)^.clr := $00000020;
  54845. end;
  54846. procedure TDMAC3_DCH3INT.setCHDDIF(thebits : TBits_1); inline;
  54847. begin
  54848. if thebits = 0 then
  54849. pTDefRegMap(@Self)^.clr := $00000020
  54850. else
  54851. pTDefRegMap(@Self)^.&set := $00000020;
  54852. end;
  54853. function TDMAC3_DCH3INT.getCHDDIF : TBits_1; inline;
  54854. begin
  54855. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54856. end;
  54857. procedure TDMAC3_DCH3INT.setCHSHIF; inline;
  54858. begin
  54859. pTDefRegMap(@Self)^.&set := $00000040;
  54860. end;
  54861. procedure TDMAC3_DCH3INT.clearCHSHIF; inline;
  54862. begin
  54863. pTDefRegMap(@Self)^.clr := $00000040;
  54864. end;
  54865. procedure TDMAC3_DCH3INT.setCHSHIF(thebits : TBits_1); inline;
  54866. begin
  54867. if thebits = 0 then
  54868. pTDefRegMap(@Self)^.clr := $00000040
  54869. else
  54870. pTDefRegMap(@Self)^.&set := $00000040;
  54871. end;
  54872. function TDMAC3_DCH3INT.getCHSHIF : TBits_1; inline;
  54873. begin
  54874. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54875. end;
  54876. procedure TDMAC3_DCH3INT.setCHSDIF; inline;
  54877. begin
  54878. pTDefRegMap(@Self)^.&set := $00000080;
  54879. end;
  54880. procedure TDMAC3_DCH3INT.clearCHSDIF; inline;
  54881. begin
  54882. pTDefRegMap(@Self)^.clr := $00000080;
  54883. end;
  54884. procedure TDMAC3_DCH3INT.setCHSDIF(thebits : TBits_1); inline;
  54885. begin
  54886. if thebits = 0 then
  54887. pTDefRegMap(@Self)^.clr := $00000080
  54888. else
  54889. pTDefRegMap(@Self)^.&set := $00000080;
  54890. end;
  54891. function TDMAC3_DCH3INT.getCHSDIF : TBits_1; inline;
  54892. begin
  54893. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54894. end;
  54895. procedure TDMAC3_DCH3INT.setCHERIE; inline;
  54896. begin
  54897. pTDefRegMap(@Self)^.&set := $00010000;
  54898. end;
  54899. procedure TDMAC3_DCH3INT.clearCHERIE; inline;
  54900. begin
  54901. pTDefRegMap(@Self)^.clr := $00010000;
  54902. end;
  54903. procedure TDMAC3_DCH3INT.setCHERIE(thebits : TBits_1); inline;
  54904. begin
  54905. if thebits = 0 then
  54906. pTDefRegMap(@Self)^.clr := $00010000
  54907. else
  54908. pTDefRegMap(@Self)^.&set := $00010000;
  54909. end;
  54910. function TDMAC3_DCH3INT.getCHERIE : TBits_1; inline;
  54911. begin
  54912. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  54913. end;
  54914. procedure TDMAC3_DCH3INT.setCHTAIE; inline;
  54915. begin
  54916. pTDefRegMap(@Self)^.&set := $00020000;
  54917. end;
  54918. procedure TDMAC3_DCH3INT.clearCHTAIE; inline;
  54919. begin
  54920. pTDefRegMap(@Self)^.clr := $00020000;
  54921. end;
  54922. procedure TDMAC3_DCH3INT.setCHTAIE(thebits : TBits_1); inline;
  54923. begin
  54924. if thebits = 0 then
  54925. pTDefRegMap(@Self)^.clr := $00020000
  54926. else
  54927. pTDefRegMap(@Self)^.&set := $00020000;
  54928. end;
  54929. function TDMAC3_DCH3INT.getCHTAIE : TBits_1; inline;
  54930. begin
  54931. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  54932. end;
  54933. procedure TDMAC3_DCH3INT.setCHCCIE; inline;
  54934. begin
  54935. pTDefRegMap(@Self)^.&set := $00040000;
  54936. end;
  54937. procedure TDMAC3_DCH3INT.clearCHCCIE; inline;
  54938. begin
  54939. pTDefRegMap(@Self)^.clr := $00040000;
  54940. end;
  54941. procedure TDMAC3_DCH3INT.setCHCCIE(thebits : TBits_1); inline;
  54942. begin
  54943. if thebits = 0 then
  54944. pTDefRegMap(@Self)^.clr := $00040000
  54945. else
  54946. pTDefRegMap(@Self)^.&set := $00040000;
  54947. end;
  54948. function TDMAC3_DCH3INT.getCHCCIE : TBits_1; inline;
  54949. begin
  54950. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  54951. end;
  54952. procedure TDMAC3_DCH3INT.setCHBCIE; inline;
  54953. begin
  54954. pTDefRegMap(@Self)^.&set := $00080000;
  54955. end;
  54956. procedure TDMAC3_DCH3INT.clearCHBCIE; inline;
  54957. begin
  54958. pTDefRegMap(@Self)^.clr := $00080000;
  54959. end;
  54960. procedure TDMAC3_DCH3INT.setCHBCIE(thebits : TBits_1); inline;
  54961. begin
  54962. if thebits = 0 then
  54963. pTDefRegMap(@Self)^.clr := $00080000
  54964. else
  54965. pTDefRegMap(@Self)^.&set := $00080000;
  54966. end;
  54967. function TDMAC3_DCH3INT.getCHBCIE : TBits_1; inline;
  54968. begin
  54969. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  54970. end;
  54971. procedure TDMAC3_DCH3INT.setCHDHIE; inline;
  54972. begin
  54973. pTDefRegMap(@Self)^.&set := $00100000;
  54974. end;
  54975. procedure TDMAC3_DCH3INT.clearCHDHIE; inline;
  54976. begin
  54977. pTDefRegMap(@Self)^.clr := $00100000;
  54978. end;
  54979. procedure TDMAC3_DCH3INT.setCHDHIE(thebits : TBits_1); inline;
  54980. begin
  54981. if thebits = 0 then
  54982. pTDefRegMap(@Self)^.clr := $00100000
  54983. else
  54984. pTDefRegMap(@Self)^.&set := $00100000;
  54985. end;
  54986. function TDMAC3_DCH3INT.getCHDHIE : TBits_1; inline;
  54987. begin
  54988. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  54989. end;
  54990. procedure TDMAC3_DCH3INT.setCHDDIE; inline;
  54991. begin
  54992. pTDefRegMap(@Self)^.&set := $00200000;
  54993. end;
  54994. procedure TDMAC3_DCH3INT.clearCHDDIE; inline;
  54995. begin
  54996. pTDefRegMap(@Self)^.clr := $00200000;
  54997. end;
  54998. procedure TDMAC3_DCH3INT.setCHDDIE(thebits : TBits_1); inline;
  54999. begin
  55000. if thebits = 0 then
  55001. pTDefRegMap(@Self)^.clr := $00200000
  55002. else
  55003. pTDefRegMap(@Self)^.&set := $00200000;
  55004. end;
  55005. function TDMAC3_DCH3INT.getCHDDIE : TBits_1; inline;
  55006. begin
  55007. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  55008. end;
  55009. procedure TDMAC3_DCH3INT.setCHSHIE; inline;
  55010. begin
  55011. pTDefRegMap(@Self)^.&set := $00400000;
  55012. end;
  55013. procedure TDMAC3_DCH3INT.clearCHSHIE; inline;
  55014. begin
  55015. pTDefRegMap(@Self)^.clr := $00400000;
  55016. end;
  55017. procedure TDMAC3_DCH3INT.setCHSHIE(thebits : TBits_1); inline;
  55018. begin
  55019. if thebits = 0 then
  55020. pTDefRegMap(@Self)^.clr := $00400000
  55021. else
  55022. pTDefRegMap(@Self)^.&set := $00400000;
  55023. end;
  55024. function TDMAC3_DCH3INT.getCHSHIE : TBits_1; inline;
  55025. begin
  55026. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  55027. end;
  55028. procedure TDMAC3_DCH3INT.setCHSDIE; inline;
  55029. begin
  55030. pTDefRegMap(@Self)^.&set := $00800000;
  55031. end;
  55032. procedure TDMAC3_DCH3INT.clearCHSDIE; inline;
  55033. begin
  55034. pTDefRegMap(@Self)^.clr := $00800000;
  55035. end;
  55036. procedure TDMAC3_DCH3INT.setCHSDIE(thebits : TBits_1); inline;
  55037. begin
  55038. if thebits = 0 then
  55039. pTDefRegMap(@Self)^.clr := $00800000
  55040. else
  55041. pTDefRegMap(@Self)^.&set := $00800000;
  55042. end;
  55043. function TDMAC3_DCH3INT.getCHSDIE : TBits_1; inline;
  55044. begin
  55045. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  55046. end;
  55047. procedure TDMAC3_DCH3INT.setw(thebits : TBits_32); inline;
  55048. begin
  55049. pTDefRegMap(@Self)^.val := thebits;
  55050. end;
  55051. function TDMAC3_DCH3INT.getw : TBits_32; inline;
  55052. begin
  55053. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55054. end;
  55055. procedure TPCACHE_CHECON.setPFMWS(thebits : TBits_3); inline;
  55056. begin
  55057. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  55058. end;
  55059. function TPCACHE_CHECON.getPFMWS : TBits_3; inline;
  55060. begin
  55061. getPFMWS := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  55062. end;
  55063. procedure TPCACHE_CHECON.setPREFEN(thebits : TBits_2); inline;
  55064. begin
  55065. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFCF or ( thebits shl 4 );
  55066. end;
  55067. function TPCACHE_CHECON.getPREFEN : TBits_2; inline;
  55068. begin
  55069. getPREFEN := (pTDefRegMap(@Self)^.val and $00000030) shr 4;
  55070. end;
  55071. procedure TPCACHE_CHECON.setDCSZ(thebits : TBits_2); inline;
  55072. begin
  55073. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  55074. end;
  55075. function TPCACHE_CHECON.getDCSZ : TBits_2; inline;
  55076. begin
  55077. getDCSZ := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  55078. end;
  55079. procedure TPCACHE_CHECON.setCHECOH; inline;
  55080. begin
  55081. pTDefRegMap(@Self)^.&set := $00010000;
  55082. end;
  55083. procedure TPCACHE_CHECON.clearCHECOH; inline;
  55084. begin
  55085. pTDefRegMap(@Self)^.clr := $00010000;
  55086. end;
  55087. procedure TPCACHE_CHECON.setCHECOH(thebits : TBits_1); inline;
  55088. begin
  55089. if thebits = 0 then
  55090. pTDefRegMap(@Self)^.clr := $00010000
  55091. else
  55092. pTDefRegMap(@Self)^.&set := $00010000;
  55093. end;
  55094. function TPCACHE_CHECON.getCHECOH : TBits_1; inline;
  55095. begin
  55096. getCHECOH := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  55097. end;
  55098. procedure TPCACHE_CHECON.setw(thebits : TBits_32); inline;
  55099. begin
  55100. pTDefRegMap(@Self)^.val := thebits;
  55101. end;
  55102. function TPCACHE_CHECON.getw : TBits_32; inline;
  55103. begin
  55104. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55105. end;
  55106. procedure TPCACHE_CHETAG.setLTYPE; inline;
  55107. begin
  55108. pTDefRegMap(@Self)^.&set := $00000002;
  55109. end;
  55110. procedure TPCACHE_CHETAG.clearLTYPE; inline;
  55111. begin
  55112. pTDefRegMap(@Self)^.clr := $00000002;
  55113. end;
  55114. procedure TPCACHE_CHETAG.setLTYPE(thebits : TBits_1); inline;
  55115. begin
  55116. if thebits = 0 then
  55117. pTDefRegMap(@Self)^.clr := $00000002
  55118. else
  55119. pTDefRegMap(@Self)^.&set := $00000002;
  55120. end;
  55121. function TPCACHE_CHETAG.getLTYPE : TBits_1; inline;
  55122. begin
  55123. getLTYPE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55124. end;
  55125. procedure TPCACHE_CHETAG.setLLOCK; inline;
  55126. begin
  55127. pTDefRegMap(@Self)^.&set := $00000004;
  55128. end;
  55129. procedure TPCACHE_CHETAG.clearLLOCK; inline;
  55130. begin
  55131. pTDefRegMap(@Self)^.clr := $00000004;
  55132. end;
  55133. procedure TPCACHE_CHETAG.setLLOCK(thebits : TBits_1); inline;
  55134. begin
  55135. if thebits = 0 then
  55136. pTDefRegMap(@Self)^.clr := $00000004
  55137. else
  55138. pTDefRegMap(@Self)^.&set := $00000004;
  55139. end;
  55140. function TPCACHE_CHETAG.getLLOCK : TBits_1; inline;
  55141. begin
  55142. getLLOCK := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55143. end;
  55144. procedure TPCACHE_CHETAG.setLVALID; inline;
  55145. begin
  55146. pTDefRegMap(@Self)^.&set := $00000008;
  55147. end;
  55148. procedure TPCACHE_CHETAG.clearLVALID; inline;
  55149. begin
  55150. pTDefRegMap(@Self)^.clr := $00000008;
  55151. end;
  55152. procedure TPCACHE_CHETAG.setLVALID(thebits : TBits_1); inline;
  55153. begin
  55154. if thebits = 0 then
  55155. pTDefRegMap(@Self)^.clr := $00000008
  55156. else
  55157. pTDefRegMap(@Self)^.&set := $00000008;
  55158. end;
  55159. function TPCACHE_CHETAG.getLVALID : TBits_1; inline;
  55160. begin
  55161. getLVALID := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55162. end;
  55163. procedure TPCACHE_CHETAG.setLTAG(thebits : TBits_20); inline;
  55164. begin
  55165. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00000F or ( thebits shl 4 );
  55166. end;
  55167. function TPCACHE_CHETAG.getLTAG : TBits_20; inline;
  55168. begin
  55169. getLTAG := (pTDefRegMap(@Self)^.val and $00FFFFF0) shr 4;
  55170. end;
  55171. procedure TPCACHE_CHETAG.setLTAGBOOT; inline;
  55172. begin
  55173. pTDefRegMap(@Self)^.&set := $80000000;
  55174. end;
  55175. procedure TPCACHE_CHETAG.clearLTAGBOOT; inline;
  55176. begin
  55177. pTDefRegMap(@Self)^.clr := $80000000;
  55178. end;
  55179. procedure TPCACHE_CHETAG.setLTAGBOOT(thebits : TBits_1); inline;
  55180. begin
  55181. if thebits = 0 then
  55182. pTDefRegMap(@Self)^.clr := $80000000
  55183. else
  55184. pTDefRegMap(@Self)^.&set := $80000000;
  55185. end;
  55186. function TPCACHE_CHETAG.getLTAGBOOT : TBits_1; inline;
  55187. begin
  55188. getLTAGBOOT := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  55189. end;
  55190. procedure TPCACHE_CHETAG.setw(thebits : TBits_32); inline;
  55191. begin
  55192. pTDefRegMap(@Self)^.val := thebits;
  55193. end;
  55194. function TPCACHE_CHETAG.getw : TBits_32; inline;
  55195. begin
  55196. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55197. end;
  55198. procedure TUSB_U1IR.setURSTIF_DETACHIF; inline;
  55199. begin
  55200. pTDefRegMap(@Self)^.&set := $00000001;
  55201. end;
  55202. procedure TUSB_U1IR.clearURSTIF_DETACHIF; inline;
  55203. begin
  55204. pTDefRegMap(@Self)^.clr := $00000001;
  55205. end;
  55206. procedure TUSB_U1IR.setURSTIF_DETACHIF(thebits : TBits_1); inline;
  55207. begin
  55208. if thebits = 0 then
  55209. pTDefRegMap(@Self)^.clr := $00000001
  55210. else
  55211. pTDefRegMap(@Self)^.&set := $00000001;
  55212. end;
  55213. function TUSB_U1IR.getURSTIF_DETACHIF : TBits_1; inline;
  55214. begin
  55215. getURSTIF_DETACHIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55216. end;
  55217. procedure TUSB_U1IR.setUERRIF; inline;
  55218. begin
  55219. pTDefRegMap(@Self)^.&set := $00000002;
  55220. end;
  55221. procedure TUSB_U1IR.clearUERRIF; inline;
  55222. begin
  55223. pTDefRegMap(@Self)^.clr := $00000002;
  55224. end;
  55225. procedure TUSB_U1IR.setUERRIF(thebits : TBits_1); inline;
  55226. begin
  55227. if thebits = 0 then
  55228. pTDefRegMap(@Self)^.clr := $00000002
  55229. else
  55230. pTDefRegMap(@Self)^.&set := $00000002;
  55231. end;
  55232. function TUSB_U1IR.getUERRIF : TBits_1; inline;
  55233. begin
  55234. getUERRIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55235. end;
  55236. procedure TUSB_U1IR.setSOFIF; inline;
  55237. begin
  55238. pTDefRegMap(@Self)^.&set := $00000004;
  55239. end;
  55240. procedure TUSB_U1IR.clearSOFIF; inline;
  55241. begin
  55242. pTDefRegMap(@Self)^.clr := $00000004;
  55243. end;
  55244. procedure TUSB_U1IR.setSOFIF(thebits : TBits_1); inline;
  55245. begin
  55246. if thebits = 0 then
  55247. pTDefRegMap(@Self)^.clr := $00000004
  55248. else
  55249. pTDefRegMap(@Self)^.&set := $00000004;
  55250. end;
  55251. function TUSB_U1IR.getSOFIF : TBits_1; inline;
  55252. begin
  55253. getSOFIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55254. end;
  55255. procedure TUSB_U1IR.setTRNIF; inline;
  55256. begin
  55257. pTDefRegMap(@Self)^.&set := $00000008;
  55258. end;
  55259. procedure TUSB_U1IR.clearTRNIF; inline;
  55260. begin
  55261. pTDefRegMap(@Self)^.clr := $00000008;
  55262. end;
  55263. procedure TUSB_U1IR.setTRNIF(thebits : TBits_1); inline;
  55264. begin
  55265. if thebits = 0 then
  55266. pTDefRegMap(@Self)^.clr := $00000008
  55267. else
  55268. pTDefRegMap(@Self)^.&set := $00000008;
  55269. end;
  55270. function TUSB_U1IR.getTRNIF : TBits_1; inline;
  55271. begin
  55272. getTRNIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55273. end;
  55274. procedure TUSB_U1IR.setIDLEIF; inline;
  55275. begin
  55276. pTDefRegMap(@Self)^.&set := $00000010;
  55277. end;
  55278. procedure TUSB_U1IR.clearIDLEIF; inline;
  55279. begin
  55280. pTDefRegMap(@Self)^.clr := $00000010;
  55281. end;
  55282. procedure TUSB_U1IR.setIDLEIF(thebits : TBits_1); inline;
  55283. begin
  55284. if thebits = 0 then
  55285. pTDefRegMap(@Self)^.clr := $00000010
  55286. else
  55287. pTDefRegMap(@Self)^.&set := $00000010;
  55288. end;
  55289. function TUSB_U1IR.getIDLEIF : TBits_1; inline;
  55290. begin
  55291. getIDLEIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55292. end;
  55293. procedure TUSB_U1IR.setRESUMEIF; inline;
  55294. begin
  55295. pTDefRegMap(@Self)^.&set := $00000020;
  55296. end;
  55297. procedure TUSB_U1IR.clearRESUMEIF; inline;
  55298. begin
  55299. pTDefRegMap(@Self)^.clr := $00000020;
  55300. end;
  55301. procedure TUSB_U1IR.setRESUMEIF(thebits : TBits_1); inline;
  55302. begin
  55303. if thebits = 0 then
  55304. pTDefRegMap(@Self)^.clr := $00000020
  55305. else
  55306. pTDefRegMap(@Self)^.&set := $00000020;
  55307. end;
  55308. function TUSB_U1IR.getRESUMEIF : TBits_1; inline;
  55309. begin
  55310. getRESUMEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55311. end;
  55312. procedure TUSB_U1IR.setATTACHIF; inline;
  55313. begin
  55314. pTDefRegMap(@Self)^.&set := $00000040;
  55315. end;
  55316. procedure TUSB_U1IR.clearATTACHIF; inline;
  55317. begin
  55318. pTDefRegMap(@Self)^.clr := $00000040;
  55319. end;
  55320. procedure TUSB_U1IR.setATTACHIF(thebits : TBits_1); inline;
  55321. begin
  55322. if thebits = 0 then
  55323. pTDefRegMap(@Self)^.clr := $00000040
  55324. else
  55325. pTDefRegMap(@Self)^.&set := $00000040;
  55326. end;
  55327. function TUSB_U1IR.getATTACHIF : TBits_1; inline;
  55328. begin
  55329. getATTACHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55330. end;
  55331. procedure TUSB_U1IR.setSTALLIF; inline;
  55332. begin
  55333. pTDefRegMap(@Self)^.&set := $00000080;
  55334. end;
  55335. procedure TUSB_U1IR.clearSTALLIF; inline;
  55336. begin
  55337. pTDefRegMap(@Self)^.clr := $00000080;
  55338. end;
  55339. procedure TUSB_U1IR.setSTALLIF(thebits : TBits_1); inline;
  55340. begin
  55341. if thebits = 0 then
  55342. pTDefRegMap(@Self)^.clr := $00000080
  55343. else
  55344. pTDefRegMap(@Self)^.&set := $00000080;
  55345. end;
  55346. function TUSB_U1IR.getSTALLIF : TBits_1; inline;
  55347. begin
  55348. getSTALLIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55349. end;
  55350. procedure TUSB_U1IR.setDETACHIF; inline;
  55351. begin
  55352. pTDefRegMap(@Self)^.&set := $00000001;
  55353. end;
  55354. procedure TUSB_U1IR.clearDETACHIF; inline;
  55355. begin
  55356. pTDefRegMap(@Self)^.clr := $00000001;
  55357. end;
  55358. procedure TUSB_U1IR.setDETACHIF(thebits : TBits_1); inline;
  55359. begin
  55360. if thebits = 0 then
  55361. pTDefRegMap(@Self)^.clr := $00000001
  55362. else
  55363. pTDefRegMap(@Self)^.&set := $00000001;
  55364. end;
  55365. function TUSB_U1IR.getDETACHIF : TBits_1; inline;
  55366. begin
  55367. getDETACHIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55368. end;
  55369. procedure TUSB_U1IR.setURSTIF; inline;
  55370. begin
  55371. pTDefRegMap(@Self)^.&set := $00000001;
  55372. end;
  55373. procedure TUSB_U1IR.clearURSTIF; inline;
  55374. begin
  55375. pTDefRegMap(@Self)^.clr := $00000001;
  55376. end;
  55377. procedure TUSB_U1IR.setURSTIF(thebits : TBits_1); inline;
  55378. begin
  55379. if thebits = 0 then
  55380. pTDefRegMap(@Self)^.clr := $00000001
  55381. else
  55382. pTDefRegMap(@Self)^.&set := $00000001;
  55383. end;
  55384. function TUSB_U1IR.getURSTIF : TBits_1; inline;
  55385. begin
  55386. getURSTIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55387. end;
  55388. procedure TUSB_U1IE.setURSTIE_DETACHIE; inline;
  55389. begin
  55390. pTDefRegMap(@Self)^.&set := $00000001;
  55391. end;
  55392. procedure TUSB_U1IE.clearURSTIE_DETACHIE; inline;
  55393. begin
  55394. pTDefRegMap(@Self)^.clr := $00000001;
  55395. end;
  55396. procedure TUSB_U1IE.setURSTIE_DETACHIE(thebits : TBits_1); inline;
  55397. begin
  55398. if thebits = 0 then
  55399. pTDefRegMap(@Self)^.clr := $00000001
  55400. else
  55401. pTDefRegMap(@Self)^.&set := $00000001;
  55402. end;
  55403. function TUSB_U1IE.getURSTIE_DETACHIE : TBits_1; inline;
  55404. begin
  55405. getURSTIE_DETACHIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55406. end;
  55407. procedure TUSB_U1IE.setUERRIE; inline;
  55408. begin
  55409. pTDefRegMap(@Self)^.&set := $00000002;
  55410. end;
  55411. procedure TUSB_U1IE.clearUERRIE; inline;
  55412. begin
  55413. pTDefRegMap(@Self)^.clr := $00000002;
  55414. end;
  55415. procedure TUSB_U1IE.setUERRIE(thebits : TBits_1); inline;
  55416. begin
  55417. if thebits = 0 then
  55418. pTDefRegMap(@Self)^.clr := $00000002
  55419. else
  55420. pTDefRegMap(@Self)^.&set := $00000002;
  55421. end;
  55422. function TUSB_U1IE.getUERRIE : TBits_1; inline;
  55423. begin
  55424. getUERRIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55425. end;
  55426. procedure TUSB_U1IE.setSOFIE; inline;
  55427. begin
  55428. pTDefRegMap(@Self)^.&set := $00000004;
  55429. end;
  55430. procedure TUSB_U1IE.clearSOFIE; inline;
  55431. begin
  55432. pTDefRegMap(@Self)^.clr := $00000004;
  55433. end;
  55434. procedure TUSB_U1IE.setSOFIE(thebits : TBits_1); inline;
  55435. begin
  55436. if thebits = 0 then
  55437. pTDefRegMap(@Self)^.clr := $00000004
  55438. else
  55439. pTDefRegMap(@Self)^.&set := $00000004;
  55440. end;
  55441. function TUSB_U1IE.getSOFIE : TBits_1; inline;
  55442. begin
  55443. getSOFIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55444. end;
  55445. procedure TUSB_U1IE.setTRNIE; inline;
  55446. begin
  55447. pTDefRegMap(@Self)^.&set := $00000008;
  55448. end;
  55449. procedure TUSB_U1IE.clearTRNIE; inline;
  55450. begin
  55451. pTDefRegMap(@Self)^.clr := $00000008;
  55452. end;
  55453. procedure TUSB_U1IE.setTRNIE(thebits : TBits_1); inline;
  55454. begin
  55455. if thebits = 0 then
  55456. pTDefRegMap(@Self)^.clr := $00000008
  55457. else
  55458. pTDefRegMap(@Self)^.&set := $00000008;
  55459. end;
  55460. function TUSB_U1IE.getTRNIE : TBits_1; inline;
  55461. begin
  55462. getTRNIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55463. end;
  55464. procedure TUSB_U1IE.setIDLEIE; inline;
  55465. begin
  55466. pTDefRegMap(@Self)^.&set := $00000010;
  55467. end;
  55468. procedure TUSB_U1IE.clearIDLEIE; inline;
  55469. begin
  55470. pTDefRegMap(@Self)^.clr := $00000010;
  55471. end;
  55472. procedure TUSB_U1IE.setIDLEIE(thebits : TBits_1); inline;
  55473. begin
  55474. if thebits = 0 then
  55475. pTDefRegMap(@Self)^.clr := $00000010
  55476. else
  55477. pTDefRegMap(@Self)^.&set := $00000010;
  55478. end;
  55479. function TUSB_U1IE.getIDLEIE : TBits_1; inline;
  55480. begin
  55481. getIDLEIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55482. end;
  55483. procedure TUSB_U1IE.setRESUMEIE; inline;
  55484. begin
  55485. pTDefRegMap(@Self)^.&set := $00000020;
  55486. end;
  55487. procedure TUSB_U1IE.clearRESUMEIE; inline;
  55488. begin
  55489. pTDefRegMap(@Self)^.clr := $00000020;
  55490. end;
  55491. procedure TUSB_U1IE.setRESUMEIE(thebits : TBits_1); inline;
  55492. begin
  55493. if thebits = 0 then
  55494. pTDefRegMap(@Self)^.clr := $00000020
  55495. else
  55496. pTDefRegMap(@Self)^.&set := $00000020;
  55497. end;
  55498. function TUSB_U1IE.getRESUMEIE : TBits_1; inline;
  55499. begin
  55500. getRESUMEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55501. end;
  55502. procedure TUSB_U1IE.setATTACHIE; inline;
  55503. begin
  55504. pTDefRegMap(@Self)^.&set := $00000040;
  55505. end;
  55506. procedure TUSB_U1IE.clearATTACHIE; inline;
  55507. begin
  55508. pTDefRegMap(@Self)^.clr := $00000040;
  55509. end;
  55510. procedure TUSB_U1IE.setATTACHIE(thebits : TBits_1); inline;
  55511. begin
  55512. if thebits = 0 then
  55513. pTDefRegMap(@Self)^.clr := $00000040
  55514. else
  55515. pTDefRegMap(@Self)^.&set := $00000040;
  55516. end;
  55517. function TUSB_U1IE.getATTACHIE : TBits_1; inline;
  55518. begin
  55519. getATTACHIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55520. end;
  55521. procedure TUSB_U1IE.setSTALLIE; inline;
  55522. begin
  55523. pTDefRegMap(@Self)^.&set := $00000080;
  55524. end;
  55525. procedure TUSB_U1IE.clearSTALLIE; inline;
  55526. begin
  55527. pTDefRegMap(@Self)^.clr := $00000080;
  55528. end;
  55529. procedure TUSB_U1IE.setSTALLIE(thebits : TBits_1); inline;
  55530. begin
  55531. if thebits = 0 then
  55532. pTDefRegMap(@Self)^.clr := $00000080
  55533. else
  55534. pTDefRegMap(@Self)^.&set := $00000080;
  55535. end;
  55536. function TUSB_U1IE.getSTALLIE : TBits_1; inline;
  55537. begin
  55538. getSTALLIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55539. end;
  55540. procedure TUSB_U1IE.setDETACHIE; inline;
  55541. begin
  55542. pTDefRegMap(@Self)^.&set := $00000001;
  55543. end;
  55544. procedure TUSB_U1IE.clearDETACHIE; inline;
  55545. begin
  55546. pTDefRegMap(@Self)^.clr := $00000001;
  55547. end;
  55548. procedure TUSB_U1IE.setDETACHIE(thebits : TBits_1); inline;
  55549. begin
  55550. if thebits = 0 then
  55551. pTDefRegMap(@Self)^.clr := $00000001
  55552. else
  55553. pTDefRegMap(@Self)^.&set := $00000001;
  55554. end;
  55555. function TUSB_U1IE.getDETACHIE : TBits_1; inline;
  55556. begin
  55557. getDETACHIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55558. end;
  55559. procedure TUSB_U1IE.setURSTIE; inline;
  55560. begin
  55561. pTDefRegMap(@Self)^.&set := $00000001;
  55562. end;
  55563. procedure TUSB_U1IE.clearURSTIE; inline;
  55564. begin
  55565. pTDefRegMap(@Self)^.clr := $00000001;
  55566. end;
  55567. procedure TUSB_U1IE.setURSTIE(thebits : TBits_1); inline;
  55568. begin
  55569. if thebits = 0 then
  55570. pTDefRegMap(@Self)^.clr := $00000001
  55571. else
  55572. pTDefRegMap(@Self)^.&set := $00000001;
  55573. end;
  55574. function TUSB_U1IE.getURSTIE : TBits_1; inline;
  55575. begin
  55576. getURSTIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55577. end;
  55578. procedure TUSB_U1EIR.setPIDEF; inline;
  55579. begin
  55580. pTDefRegMap(@Self)^.&set := $00000001;
  55581. end;
  55582. procedure TUSB_U1EIR.clearPIDEF; inline;
  55583. begin
  55584. pTDefRegMap(@Self)^.clr := $00000001;
  55585. end;
  55586. procedure TUSB_U1EIR.setPIDEF(thebits : TBits_1); inline;
  55587. begin
  55588. if thebits = 0 then
  55589. pTDefRegMap(@Self)^.clr := $00000001
  55590. else
  55591. pTDefRegMap(@Self)^.&set := $00000001;
  55592. end;
  55593. function TUSB_U1EIR.getPIDEF : TBits_1; inline;
  55594. begin
  55595. getPIDEF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55596. end;
  55597. procedure TUSB_U1EIR.setCRC5EF_EOFEF; inline;
  55598. begin
  55599. pTDefRegMap(@Self)^.&set := $00000002;
  55600. end;
  55601. procedure TUSB_U1EIR.clearCRC5EF_EOFEF; inline;
  55602. begin
  55603. pTDefRegMap(@Self)^.clr := $00000002;
  55604. end;
  55605. procedure TUSB_U1EIR.setCRC5EF_EOFEF(thebits : TBits_1); inline;
  55606. begin
  55607. if thebits = 0 then
  55608. pTDefRegMap(@Self)^.clr := $00000002
  55609. else
  55610. pTDefRegMap(@Self)^.&set := $00000002;
  55611. end;
  55612. function TUSB_U1EIR.getCRC5EF_EOFEF : TBits_1; inline;
  55613. begin
  55614. getCRC5EF_EOFEF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55615. end;
  55616. procedure TUSB_U1EIR.setCRC16EF; inline;
  55617. begin
  55618. pTDefRegMap(@Self)^.&set := $00000004;
  55619. end;
  55620. procedure TUSB_U1EIR.clearCRC16EF; inline;
  55621. begin
  55622. pTDefRegMap(@Self)^.clr := $00000004;
  55623. end;
  55624. procedure TUSB_U1EIR.setCRC16EF(thebits : TBits_1); inline;
  55625. begin
  55626. if thebits = 0 then
  55627. pTDefRegMap(@Self)^.clr := $00000004
  55628. else
  55629. pTDefRegMap(@Self)^.&set := $00000004;
  55630. end;
  55631. function TUSB_U1EIR.getCRC16EF : TBits_1; inline;
  55632. begin
  55633. getCRC16EF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55634. end;
  55635. procedure TUSB_U1EIR.setDFN8EF; inline;
  55636. begin
  55637. pTDefRegMap(@Self)^.&set := $00000008;
  55638. end;
  55639. procedure TUSB_U1EIR.clearDFN8EF; inline;
  55640. begin
  55641. pTDefRegMap(@Self)^.clr := $00000008;
  55642. end;
  55643. procedure TUSB_U1EIR.setDFN8EF(thebits : TBits_1); inline;
  55644. begin
  55645. if thebits = 0 then
  55646. pTDefRegMap(@Self)^.clr := $00000008
  55647. else
  55648. pTDefRegMap(@Self)^.&set := $00000008;
  55649. end;
  55650. function TUSB_U1EIR.getDFN8EF : TBits_1; inline;
  55651. begin
  55652. getDFN8EF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55653. end;
  55654. procedure TUSB_U1EIR.setBTOEF; inline;
  55655. begin
  55656. pTDefRegMap(@Self)^.&set := $00000010;
  55657. end;
  55658. procedure TUSB_U1EIR.clearBTOEF; inline;
  55659. begin
  55660. pTDefRegMap(@Self)^.clr := $00000010;
  55661. end;
  55662. procedure TUSB_U1EIR.setBTOEF(thebits : TBits_1); inline;
  55663. begin
  55664. if thebits = 0 then
  55665. pTDefRegMap(@Self)^.clr := $00000010
  55666. else
  55667. pTDefRegMap(@Self)^.&set := $00000010;
  55668. end;
  55669. function TUSB_U1EIR.getBTOEF : TBits_1; inline;
  55670. begin
  55671. getBTOEF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55672. end;
  55673. procedure TUSB_U1EIR.setDMAEF; inline;
  55674. begin
  55675. pTDefRegMap(@Self)^.&set := $00000020;
  55676. end;
  55677. procedure TUSB_U1EIR.clearDMAEF; inline;
  55678. begin
  55679. pTDefRegMap(@Self)^.clr := $00000020;
  55680. end;
  55681. procedure TUSB_U1EIR.setDMAEF(thebits : TBits_1); inline;
  55682. begin
  55683. if thebits = 0 then
  55684. pTDefRegMap(@Self)^.clr := $00000020
  55685. else
  55686. pTDefRegMap(@Self)^.&set := $00000020;
  55687. end;
  55688. function TUSB_U1EIR.getDMAEF : TBits_1; inline;
  55689. begin
  55690. getDMAEF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55691. end;
  55692. procedure TUSB_U1EIR.setBMXEF; inline;
  55693. begin
  55694. pTDefRegMap(@Self)^.&set := $00000040;
  55695. end;
  55696. procedure TUSB_U1EIR.clearBMXEF; inline;
  55697. begin
  55698. pTDefRegMap(@Self)^.clr := $00000040;
  55699. end;
  55700. procedure TUSB_U1EIR.setBMXEF(thebits : TBits_1); inline;
  55701. begin
  55702. if thebits = 0 then
  55703. pTDefRegMap(@Self)^.clr := $00000040
  55704. else
  55705. pTDefRegMap(@Self)^.&set := $00000040;
  55706. end;
  55707. function TUSB_U1EIR.getBMXEF : TBits_1; inline;
  55708. begin
  55709. getBMXEF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55710. end;
  55711. procedure TUSB_U1EIR.setBTSEF; inline;
  55712. begin
  55713. pTDefRegMap(@Self)^.&set := $00000080;
  55714. end;
  55715. procedure TUSB_U1EIR.clearBTSEF; inline;
  55716. begin
  55717. pTDefRegMap(@Self)^.clr := $00000080;
  55718. end;
  55719. procedure TUSB_U1EIR.setBTSEF(thebits : TBits_1); inline;
  55720. begin
  55721. if thebits = 0 then
  55722. pTDefRegMap(@Self)^.clr := $00000080
  55723. else
  55724. pTDefRegMap(@Self)^.&set := $00000080;
  55725. end;
  55726. function TUSB_U1EIR.getBTSEF : TBits_1; inline;
  55727. begin
  55728. getBTSEF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55729. end;
  55730. procedure TUSB_U1EIR.setCRC5EF; inline;
  55731. begin
  55732. pTDefRegMap(@Self)^.&set := $00000002;
  55733. end;
  55734. procedure TUSB_U1EIR.clearCRC5EF; inline;
  55735. begin
  55736. pTDefRegMap(@Self)^.clr := $00000002;
  55737. end;
  55738. procedure TUSB_U1EIR.setCRC5EF(thebits : TBits_1); inline;
  55739. begin
  55740. if thebits = 0 then
  55741. pTDefRegMap(@Self)^.clr := $00000002
  55742. else
  55743. pTDefRegMap(@Self)^.&set := $00000002;
  55744. end;
  55745. function TUSB_U1EIR.getCRC5EF : TBits_1; inline;
  55746. begin
  55747. getCRC5EF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55748. end;
  55749. procedure TUSB_U1EIR.setEOFEF; inline;
  55750. begin
  55751. pTDefRegMap(@Self)^.&set := $00000002;
  55752. end;
  55753. procedure TUSB_U1EIR.clearEOFEF; inline;
  55754. begin
  55755. pTDefRegMap(@Self)^.clr := $00000002;
  55756. end;
  55757. procedure TUSB_U1EIR.setEOFEF(thebits : TBits_1); inline;
  55758. begin
  55759. if thebits = 0 then
  55760. pTDefRegMap(@Self)^.clr := $00000002
  55761. else
  55762. pTDefRegMap(@Self)^.&set := $00000002;
  55763. end;
  55764. function TUSB_U1EIR.getEOFEF : TBits_1; inline;
  55765. begin
  55766. getEOFEF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55767. end;
  55768. procedure TUSB_U1EIE.setPIDEE; inline;
  55769. begin
  55770. pTDefRegMap(@Self)^.&set := $00000001;
  55771. end;
  55772. procedure TUSB_U1EIE.clearPIDEE; inline;
  55773. begin
  55774. pTDefRegMap(@Self)^.clr := $00000001;
  55775. end;
  55776. procedure TUSB_U1EIE.setPIDEE(thebits : TBits_1); inline;
  55777. begin
  55778. if thebits = 0 then
  55779. pTDefRegMap(@Self)^.clr := $00000001
  55780. else
  55781. pTDefRegMap(@Self)^.&set := $00000001;
  55782. end;
  55783. function TUSB_U1EIE.getPIDEE : TBits_1; inline;
  55784. begin
  55785. getPIDEE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55786. end;
  55787. procedure TUSB_U1EIE.setCRC5EE_EOFEE; inline;
  55788. begin
  55789. pTDefRegMap(@Self)^.&set := $00000002;
  55790. end;
  55791. procedure TUSB_U1EIE.clearCRC5EE_EOFEE; inline;
  55792. begin
  55793. pTDefRegMap(@Self)^.clr := $00000002;
  55794. end;
  55795. procedure TUSB_U1EIE.setCRC5EE_EOFEE(thebits : TBits_1); inline;
  55796. begin
  55797. if thebits = 0 then
  55798. pTDefRegMap(@Self)^.clr := $00000002
  55799. else
  55800. pTDefRegMap(@Self)^.&set := $00000002;
  55801. end;
  55802. function TUSB_U1EIE.getCRC5EE_EOFEE : TBits_1; inline;
  55803. begin
  55804. getCRC5EE_EOFEE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55805. end;
  55806. procedure TUSB_U1EIE.setCRC16EE; inline;
  55807. begin
  55808. pTDefRegMap(@Self)^.&set := $00000004;
  55809. end;
  55810. procedure TUSB_U1EIE.clearCRC16EE; inline;
  55811. begin
  55812. pTDefRegMap(@Self)^.clr := $00000004;
  55813. end;
  55814. procedure TUSB_U1EIE.setCRC16EE(thebits : TBits_1); inline;
  55815. begin
  55816. if thebits = 0 then
  55817. pTDefRegMap(@Self)^.clr := $00000004
  55818. else
  55819. pTDefRegMap(@Self)^.&set := $00000004;
  55820. end;
  55821. function TUSB_U1EIE.getCRC16EE : TBits_1; inline;
  55822. begin
  55823. getCRC16EE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55824. end;
  55825. procedure TUSB_U1EIE.setDFN8EE; inline;
  55826. begin
  55827. pTDefRegMap(@Self)^.&set := $00000008;
  55828. end;
  55829. procedure TUSB_U1EIE.clearDFN8EE; inline;
  55830. begin
  55831. pTDefRegMap(@Self)^.clr := $00000008;
  55832. end;
  55833. procedure TUSB_U1EIE.setDFN8EE(thebits : TBits_1); inline;
  55834. begin
  55835. if thebits = 0 then
  55836. pTDefRegMap(@Self)^.clr := $00000008
  55837. else
  55838. pTDefRegMap(@Self)^.&set := $00000008;
  55839. end;
  55840. function TUSB_U1EIE.getDFN8EE : TBits_1; inline;
  55841. begin
  55842. getDFN8EE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55843. end;
  55844. procedure TUSB_U1EIE.setBTOEE; inline;
  55845. begin
  55846. pTDefRegMap(@Self)^.&set := $00000010;
  55847. end;
  55848. procedure TUSB_U1EIE.clearBTOEE; inline;
  55849. begin
  55850. pTDefRegMap(@Self)^.clr := $00000010;
  55851. end;
  55852. procedure TUSB_U1EIE.setBTOEE(thebits : TBits_1); inline;
  55853. begin
  55854. if thebits = 0 then
  55855. pTDefRegMap(@Self)^.clr := $00000010
  55856. else
  55857. pTDefRegMap(@Self)^.&set := $00000010;
  55858. end;
  55859. function TUSB_U1EIE.getBTOEE : TBits_1; inline;
  55860. begin
  55861. getBTOEE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55862. end;
  55863. procedure TUSB_U1EIE.setDMAEE; inline;
  55864. begin
  55865. pTDefRegMap(@Self)^.&set := $00000020;
  55866. end;
  55867. procedure TUSB_U1EIE.clearDMAEE; inline;
  55868. begin
  55869. pTDefRegMap(@Self)^.clr := $00000020;
  55870. end;
  55871. procedure TUSB_U1EIE.setDMAEE(thebits : TBits_1); inline;
  55872. begin
  55873. if thebits = 0 then
  55874. pTDefRegMap(@Self)^.clr := $00000020
  55875. else
  55876. pTDefRegMap(@Self)^.&set := $00000020;
  55877. end;
  55878. function TUSB_U1EIE.getDMAEE : TBits_1; inline;
  55879. begin
  55880. getDMAEE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55881. end;
  55882. procedure TUSB_U1EIE.setBMXEE; inline;
  55883. begin
  55884. pTDefRegMap(@Self)^.&set := $00000040;
  55885. end;
  55886. procedure TUSB_U1EIE.clearBMXEE; inline;
  55887. begin
  55888. pTDefRegMap(@Self)^.clr := $00000040;
  55889. end;
  55890. procedure TUSB_U1EIE.setBMXEE(thebits : TBits_1); inline;
  55891. begin
  55892. if thebits = 0 then
  55893. pTDefRegMap(@Self)^.clr := $00000040
  55894. else
  55895. pTDefRegMap(@Self)^.&set := $00000040;
  55896. end;
  55897. function TUSB_U1EIE.getBMXEE : TBits_1; inline;
  55898. begin
  55899. getBMXEE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55900. end;
  55901. procedure TUSB_U1EIE.setBTSEE; inline;
  55902. begin
  55903. pTDefRegMap(@Self)^.&set := $00000080;
  55904. end;
  55905. procedure TUSB_U1EIE.clearBTSEE; inline;
  55906. begin
  55907. pTDefRegMap(@Self)^.clr := $00000080;
  55908. end;
  55909. procedure TUSB_U1EIE.setBTSEE(thebits : TBits_1); inline;
  55910. begin
  55911. if thebits = 0 then
  55912. pTDefRegMap(@Self)^.clr := $00000080
  55913. else
  55914. pTDefRegMap(@Self)^.&set := $00000080;
  55915. end;
  55916. function TUSB_U1EIE.getBTSEE : TBits_1; inline;
  55917. begin
  55918. getBTSEE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55919. end;
  55920. procedure TUSB_U1EIE.setCRC5EE; inline;
  55921. begin
  55922. pTDefRegMap(@Self)^.&set := $00000002;
  55923. end;
  55924. procedure TUSB_U1EIE.clearCRC5EE; inline;
  55925. begin
  55926. pTDefRegMap(@Self)^.clr := $00000002;
  55927. end;
  55928. procedure TUSB_U1EIE.setCRC5EE(thebits : TBits_1); inline;
  55929. begin
  55930. if thebits = 0 then
  55931. pTDefRegMap(@Self)^.clr := $00000002
  55932. else
  55933. pTDefRegMap(@Self)^.&set := $00000002;
  55934. end;
  55935. function TUSB_U1EIE.getCRC5EE : TBits_1; inline;
  55936. begin
  55937. getCRC5EE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55938. end;
  55939. procedure TUSB_U1EIE.setEOFEE; inline;
  55940. begin
  55941. pTDefRegMap(@Self)^.&set := $00000002;
  55942. end;
  55943. procedure TUSB_U1EIE.clearEOFEE; inline;
  55944. begin
  55945. pTDefRegMap(@Self)^.clr := $00000002;
  55946. end;
  55947. procedure TUSB_U1EIE.setEOFEE(thebits : TBits_1); inline;
  55948. begin
  55949. if thebits = 0 then
  55950. pTDefRegMap(@Self)^.clr := $00000002
  55951. else
  55952. pTDefRegMap(@Self)^.&set := $00000002;
  55953. end;
  55954. function TUSB_U1EIE.getEOFEE : TBits_1; inline;
  55955. begin
  55956. getEOFEE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55957. end;
  55958. procedure TUSB_U1STAT.setPPBI; inline;
  55959. begin
  55960. pTDefRegMap(@Self)^.&set := $00000004;
  55961. end;
  55962. procedure TUSB_U1STAT.clearPPBI; inline;
  55963. begin
  55964. pTDefRegMap(@Self)^.clr := $00000004;
  55965. end;
  55966. procedure TUSB_U1STAT.setPPBI(thebits : TBits_1); inline;
  55967. begin
  55968. if thebits = 0 then
  55969. pTDefRegMap(@Self)^.clr := $00000004
  55970. else
  55971. pTDefRegMap(@Self)^.&set := $00000004;
  55972. end;
  55973. function TUSB_U1STAT.getPPBI : TBits_1; inline;
  55974. begin
  55975. getPPBI := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55976. end;
  55977. procedure TUSB_U1STAT.setDIR; inline;
  55978. begin
  55979. pTDefRegMap(@Self)^.&set := $00000008;
  55980. end;
  55981. procedure TUSB_U1STAT.clearDIR; inline;
  55982. begin
  55983. pTDefRegMap(@Self)^.clr := $00000008;
  55984. end;
  55985. procedure TUSB_U1STAT.setDIR(thebits : TBits_1); inline;
  55986. begin
  55987. if thebits = 0 then
  55988. pTDefRegMap(@Self)^.clr := $00000008
  55989. else
  55990. pTDefRegMap(@Self)^.&set := $00000008;
  55991. end;
  55992. function TUSB_U1STAT.getDIR : TBits_1; inline;
  55993. begin
  55994. getDIR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55995. end;
  55996. procedure TUSB_U1STAT.setENDPT(thebits : TBits_4); inline;
  55997. begin
  55998. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF0F or ( thebits shl 4 );
  55999. end;
  56000. function TUSB_U1STAT.getENDPT : TBits_4; inline;
  56001. begin
  56002. getENDPT := (pTDefRegMap(@Self)^.val and $000000F0) shr 4;
  56003. end;
  56004. procedure TUSB_U1STAT.setENDPT0; inline;
  56005. begin
  56006. pTDefRegMap(@Self)^.&set := $00000010;
  56007. end;
  56008. procedure TUSB_U1STAT.clearENDPT0; inline;
  56009. begin
  56010. pTDefRegMap(@Self)^.clr := $00000010;
  56011. end;
  56012. procedure TUSB_U1STAT.setENDPT0(thebits : TBits_1); inline;
  56013. begin
  56014. if thebits = 0 then
  56015. pTDefRegMap(@Self)^.clr := $00000010
  56016. else
  56017. pTDefRegMap(@Self)^.&set := $00000010;
  56018. end;
  56019. function TUSB_U1STAT.getENDPT0 : TBits_1; inline;
  56020. begin
  56021. getENDPT0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56022. end;
  56023. procedure TUSB_U1STAT.setENDPT1; inline;
  56024. begin
  56025. pTDefRegMap(@Self)^.&set := $00000020;
  56026. end;
  56027. procedure TUSB_U1STAT.clearENDPT1; inline;
  56028. begin
  56029. pTDefRegMap(@Self)^.clr := $00000020;
  56030. end;
  56031. procedure TUSB_U1STAT.setENDPT1(thebits : TBits_1); inline;
  56032. begin
  56033. if thebits = 0 then
  56034. pTDefRegMap(@Self)^.clr := $00000020
  56035. else
  56036. pTDefRegMap(@Self)^.&set := $00000020;
  56037. end;
  56038. function TUSB_U1STAT.getENDPT1 : TBits_1; inline;
  56039. begin
  56040. getENDPT1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56041. end;
  56042. procedure TUSB_U1STAT.setENDPT2; inline;
  56043. begin
  56044. pTDefRegMap(@Self)^.&set := $00000040;
  56045. end;
  56046. procedure TUSB_U1STAT.clearENDPT2; inline;
  56047. begin
  56048. pTDefRegMap(@Self)^.clr := $00000040;
  56049. end;
  56050. procedure TUSB_U1STAT.setENDPT2(thebits : TBits_1); inline;
  56051. begin
  56052. if thebits = 0 then
  56053. pTDefRegMap(@Self)^.clr := $00000040
  56054. else
  56055. pTDefRegMap(@Self)^.&set := $00000040;
  56056. end;
  56057. function TUSB_U1STAT.getENDPT2 : TBits_1; inline;
  56058. begin
  56059. getENDPT2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56060. end;
  56061. procedure TUSB_U1STAT.setENDPT3; inline;
  56062. begin
  56063. pTDefRegMap(@Self)^.&set := $00000080;
  56064. end;
  56065. procedure TUSB_U1STAT.clearENDPT3; inline;
  56066. begin
  56067. pTDefRegMap(@Self)^.clr := $00000080;
  56068. end;
  56069. procedure TUSB_U1STAT.setENDPT3(thebits : TBits_1); inline;
  56070. begin
  56071. if thebits = 0 then
  56072. pTDefRegMap(@Self)^.clr := $00000080
  56073. else
  56074. pTDefRegMap(@Self)^.&set := $00000080;
  56075. end;
  56076. function TUSB_U1STAT.getENDPT3 : TBits_1; inline;
  56077. begin
  56078. getENDPT3 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56079. end;
  56080. procedure TUSB_U1CON.setUSBEN_SOFEN; inline;
  56081. begin
  56082. pTDefRegMap(@Self)^.&set := $00000001;
  56083. end;
  56084. procedure TUSB_U1CON.clearUSBEN_SOFEN; inline;
  56085. begin
  56086. pTDefRegMap(@Self)^.clr := $00000001;
  56087. end;
  56088. procedure TUSB_U1CON.setUSBEN_SOFEN(thebits : TBits_1); inline;
  56089. begin
  56090. if thebits = 0 then
  56091. pTDefRegMap(@Self)^.clr := $00000001
  56092. else
  56093. pTDefRegMap(@Self)^.&set := $00000001;
  56094. end;
  56095. function TUSB_U1CON.getUSBEN_SOFEN : TBits_1; inline;
  56096. begin
  56097. getUSBEN_SOFEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56098. end;
  56099. procedure TUSB_U1CON.setPPBRST; inline;
  56100. begin
  56101. pTDefRegMap(@Self)^.&set := $00000002;
  56102. end;
  56103. procedure TUSB_U1CON.clearPPBRST; inline;
  56104. begin
  56105. pTDefRegMap(@Self)^.clr := $00000002;
  56106. end;
  56107. procedure TUSB_U1CON.setPPBRST(thebits : TBits_1); inline;
  56108. begin
  56109. if thebits = 0 then
  56110. pTDefRegMap(@Self)^.clr := $00000002
  56111. else
  56112. pTDefRegMap(@Self)^.&set := $00000002;
  56113. end;
  56114. function TUSB_U1CON.getPPBRST : TBits_1; inline;
  56115. begin
  56116. getPPBRST := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56117. end;
  56118. procedure TUSB_U1CON.setRESUME; inline;
  56119. begin
  56120. pTDefRegMap(@Self)^.&set := $00000004;
  56121. end;
  56122. procedure TUSB_U1CON.clearRESUME; inline;
  56123. begin
  56124. pTDefRegMap(@Self)^.clr := $00000004;
  56125. end;
  56126. procedure TUSB_U1CON.setRESUME(thebits : TBits_1); inline;
  56127. begin
  56128. if thebits = 0 then
  56129. pTDefRegMap(@Self)^.clr := $00000004
  56130. else
  56131. pTDefRegMap(@Self)^.&set := $00000004;
  56132. end;
  56133. function TUSB_U1CON.getRESUME : TBits_1; inline;
  56134. begin
  56135. getRESUME := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56136. end;
  56137. procedure TUSB_U1CON.setHOSTEN; inline;
  56138. begin
  56139. pTDefRegMap(@Self)^.&set := $00000008;
  56140. end;
  56141. procedure TUSB_U1CON.clearHOSTEN; inline;
  56142. begin
  56143. pTDefRegMap(@Self)^.clr := $00000008;
  56144. end;
  56145. procedure TUSB_U1CON.setHOSTEN(thebits : TBits_1); inline;
  56146. begin
  56147. if thebits = 0 then
  56148. pTDefRegMap(@Self)^.clr := $00000008
  56149. else
  56150. pTDefRegMap(@Self)^.&set := $00000008;
  56151. end;
  56152. function TUSB_U1CON.getHOSTEN : TBits_1; inline;
  56153. begin
  56154. getHOSTEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56155. end;
  56156. procedure TUSB_U1CON.setUSBRST; inline;
  56157. begin
  56158. pTDefRegMap(@Self)^.&set := $00000010;
  56159. end;
  56160. procedure TUSB_U1CON.clearUSBRST; inline;
  56161. begin
  56162. pTDefRegMap(@Self)^.clr := $00000010;
  56163. end;
  56164. procedure TUSB_U1CON.setUSBRST(thebits : TBits_1); inline;
  56165. begin
  56166. if thebits = 0 then
  56167. pTDefRegMap(@Self)^.clr := $00000010
  56168. else
  56169. pTDefRegMap(@Self)^.&set := $00000010;
  56170. end;
  56171. function TUSB_U1CON.getUSBRST : TBits_1; inline;
  56172. begin
  56173. getUSBRST := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56174. end;
  56175. procedure TUSB_U1CON.setPKTDIS_TOKBUSY; inline;
  56176. begin
  56177. pTDefRegMap(@Self)^.&set := $00000020;
  56178. end;
  56179. procedure TUSB_U1CON.clearPKTDIS_TOKBUSY; inline;
  56180. begin
  56181. pTDefRegMap(@Self)^.clr := $00000020;
  56182. end;
  56183. procedure TUSB_U1CON.setPKTDIS_TOKBUSY(thebits : TBits_1); inline;
  56184. begin
  56185. if thebits = 0 then
  56186. pTDefRegMap(@Self)^.clr := $00000020
  56187. else
  56188. pTDefRegMap(@Self)^.&set := $00000020;
  56189. end;
  56190. function TUSB_U1CON.getPKTDIS_TOKBUSY : TBits_1; inline;
  56191. begin
  56192. getPKTDIS_TOKBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56193. end;
  56194. procedure TUSB_U1CON.setSE0; inline;
  56195. begin
  56196. pTDefRegMap(@Self)^.&set := $00000040;
  56197. end;
  56198. procedure TUSB_U1CON.clearSE0; inline;
  56199. begin
  56200. pTDefRegMap(@Self)^.clr := $00000040;
  56201. end;
  56202. procedure TUSB_U1CON.setSE0(thebits : TBits_1); inline;
  56203. begin
  56204. if thebits = 0 then
  56205. pTDefRegMap(@Self)^.clr := $00000040
  56206. else
  56207. pTDefRegMap(@Self)^.&set := $00000040;
  56208. end;
  56209. function TUSB_U1CON.getSE0 : TBits_1; inline;
  56210. begin
  56211. getSE0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56212. end;
  56213. procedure TUSB_U1CON.setJSTATE; inline;
  56214. begin
  56215. pTDefRegMap(@Self)^.&set := $00000080;
  56216. end;
  56217. procedure TUSB_U1CON.clearJSTATE; inline;
  56218. begin
  56219. pTDefRegMap(@Self)^.clr := $00000080;
  56220. end;
  56221. procedure TUSB_U1CON.setJSTATE(thebits : TBits_1); inline;
  56222. begin
  56223. if thebits = 0 then
  56224. pTDefRegMap(@Self)^.clr := $00000080
  56225. else
  56226. pTDefRegMap(@Self)^.&set := $00000080;
  56227. end;
  56228. function TUSB_U1CON.getJSTATE : TBits_1; inline;
  56229. begin
  56230. getJSTATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56231. end;
  56232. procedure TUSB_U1CON.setUSBEN; inline;
  56233. begin
  56234. pTDefRegMap(@Self)^.&set := $00000001;
  56235. end;
  56236. procedure TUSB_U1CON.clearUSBEN; inline;
  56237. begin
  56238. pTDefRegMap(@Self)^.clr := $00000001;
  56239. end;
  56240. procedure TUSB_U1CON.setUSBEN(thebits : TBits_1); inline;
  56241. begin
  56242. if thebits = 0 then
  56243. pTDefRegMap(@Self)^.clr := $00000001
  56244. else
  56245. pTDefRegMap(@Self)^.&set := $00000001;
  56246. end;
  56247. function TUSB_U1CON.getUSBEN : TBits_1; inline;
  56248. begin
  56249. getUSBEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56250. end;
  56251. procedure TUSB_U1CON.setSOFEN; inline;
  56252. begin
  56253. pTDefRegMap(@Self)^.&set := $00000001;
  56254. end;
  56255. procedure TUSB_U1CON.clearSOFEN; inline;
  56256. begin
  56257. pTDefRegMap(@Self)^.clr := $00000001;
  56258. end;
  56259. procedure TUSB_U1CON.setSOFEN(thebits : TBits_1); inline;
  56260. begin
  56261. if thebits = 0 then
  56262. pTDefRegMap(@Self)^.clr := $00000001
  56263. else
  56264. pTDefRegMap(@Self)^.&set := $00000001;
  56265. end;
  56266. function TUSB_U1CON.getSOFEN : TBits_1; inline;
  56267. begin
  56268. getSOFEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56269. end;
  56270. procedure TUSB_U1CON.setPKTDIS; inline;
  56271. begin
  56272. pTDefRegMap(@Self)^.&set := $00000020;
  56273. end;
  56274. procedure TUSB_U1CON.clearPKTDIS; inline;
  56275. begin
  56276. pTDefRegMap(@Self)^.clr := $00000020;
  56277. end;
  56278. procedure TUSB_U1CON.setPKTDIS(thebits : TBits_1); inline;
  56279. begin
  56280. if thebits = 0 then
  56281. pTDefRegMap(@Self)^.clr := $00000020
  56282. else
  56283. pTDefRegMap(@Self)^.&set := $00000020;
  56284. end;
  56285. function TUSB_U1CON.getPKTDIS : TBits_1; inline;
  56286. begin
  56287. getPKTDIS := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56288. end;
  56289. procedure TUSB_U1CON.setTOKBUSY; inline;
  56290. begin
  56291. pTDefRegMap(@Self)^.&set := $00000020;
  56292. end;
  56293. procedure TUSB_U1CON.clearTOKBUSY; inline;
  56294. begin
  56295. pTDefRegMap(@Self)^.clr := $00000020;
  56296. end;
  56297. procedure TUSB_U1CON.setTOKBUSY(thebits : TBits_1); inline;
  56298. begin
  56299. if thebits = 0 then
  56300. pTDefRegMap(@Self)^.clr := $00000020
  56301. else
  56302. pTDefRegMap(@Self)^.&set := $00000020;
  56303. end;
  56304. function TUSB_U1CON.getTOKBUSY : TBits_1; inline;
  56305. begin
  56306. getTOKBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56307. end;
  56308. procedure TUSB_U1ADDR.setDEVADDR(thebits : TBits_7); inline;
  56309. begin
  56310. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  56311. end;
  56312. function TUSB_U1ADDR.getDEVADDR : TBits_7; inline;
  56313. begin
  56314. getDEVADDR := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  56315. end;
  56316. procedure TUSB_U1ADDR.setLSPDEN; inline;
  56317. begin
  56318. pTDefRegMap(@Self)^.&set := $00000080;
  56319. end;
  56320. procedure TUSB_U1ADDR.clearLSPDEN; inline;
  56321. begin
  56322. pTDefRegMap(@Self)^.clr := $00000080;
  56323. end;
  56324. procedure TUSB_U1ADDR.setLSPDEN(thebits : TBits_1); inline;
  56325. begin
  56326. if thebits = 0 then
  56327. pTDefRegMap(@Self)^.clr := $00000080
  56328. else
  56329. pTDefRegMap(@Self)^.&set := $00000080;
  56330. end;
  56331. function TUSB_U1ADDR.getLSPDEN : TBits_1; inline;
  56332. begin
  56333. getLSPDEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56334. end;
  56335. procedure TUSB_U1ADDR.setDEVADDR0; inline;
  56336. begin
  56337. pTDefRegMap(@Self)^.&set := $00000001;
  56338. end;
  56339. procedure TUSB_U1ADDR.clearDEVADDR0; inline;
  56340. begin
  56341. pTDefRegMap(@Self)^.clr := $00000001;
  56342. end;
  56343. procedure TUSB_U1ADDR.setDEVADDR0(thebits : TBits_1); inline;
  56344. begin
  56345. if thebits = 0 then
  56346. pTDefRegMap(@Self)^.clr := $00000001
  56347. else
  56348. pTDefRegMap(@Self)^.&set := $00000001;
  56349. end;
  56350. function TUSB_U1ADDR.getDEVADDR0 : TBits_1; inline;
  56351. begin
  56352. getDEVADDR0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56353. end;
  56354. procedure TUSB_U1ADDR.setDEVADDR1; inline;
  56355. begin
  56356. pTDefRegMap(@Self)^.&set := $00000002;
  56357. end;
  56358. procedure TUSB_U1ADDR.clearDEVADDR1; inline;
  56359. begin
  56360. pTDefRegMap(@Self)^.clr := $00000002;
  56361. end;
  56362. procedure TUSB_U1ADDR.setDEVADDR1(thebits : TBits_1); inline;
  56363. begin
  56364. if thebits = 0 then
  56365. pTDefRegMap(@Self)^.clr := $00000002
  56366. else
  56367. pTDefRegMap(@Self)^.&set := $00000002;
  56368. end;
  56369. function TUSB_U1ADDR.getDEVADDR1 : TBits_1; inline;
  56370. begin
  56371. getDEVADDR1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56372. end;
  56373. procedure TUSB_U1ADDR.setDEVADDR2; inline;
  56374. begin
  56375. pTDefRegMap(@Self)^.&set := $00000004;
  56376. end;
  56377. procedure TUSB_U1ADDR.clearDEVADDR2; inline;
  56378. begin
  56379. pTDefRegMap(@Self)^.clr := $00000004;
  56380. end;
  56381. procedure TUSB_U1ADDR.setDEVADDR2(thebits : TBits_1); inline;
  56382. begin
  56383. if thebits = 0 then
  56384. pTDefRegMap(@Self)^.clr := $00000004
  56385. else
  56386. pTDefRegMap(@Self)^.&set := $00000004;
  56387. end;
  56388. function TUSB_U1ADDR.getDEVADDR2 : TBits_1; inline;
  56389. begin
  56390. getDEVADDR2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56391. end;
  56392. procedure TUSB_U1ADDR.setDEVADDR3; inline;
  56393. begin
  56394. pTDefRegMap(@Self)^.&set := $00000008;
  56395. end;
  56396. procedure TUSB_U1ADDR.clearDEVADDR3; inline;
  56397. begin
  56398. pTDefRegMap(@Self)^.clr := $00000008;
  56399. end;
  56400. procedure TUSB_U1ADDR.setDEVADDR3(thebits : TBits_1); inline;
  56401. begin
  56402. if thebits = 0 then
  56403. pTDefRegMap(@Self)^.clr := $00000008
  56404. else
  56405. pTDefRegMap(@Self)^.&set := $00000008;
  56406. end;
  56407. function TUSB_U1ADDR.getDEVADDR3 : TBits_1; inline;
  56408. begin
  56409. getDEVADDR3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56410. end;
  56411. procedure TUSB_U1ADDR.setDEVADDR4; inline;
  56412. begin
  56413. pTDefRegMap(@Self)^.&set := $00000010;
  56414. end;
  56415. procedure TUSB_U1ADDR.clearDEVADDR4; inline;
  56416. begin
  56417. pTDefRegMap(@Self)^.clr := $00000010;
  56418. end;
  56419. procedure TUSB_U1ADDR.setDEVADDR4(thebits : TBits_1); inline;
  56420. begin
  56421. if thebits = 0 then
  56422. pTDefRegMap(@Self)^.clr := $00000010
  56423. else
  56424. pTDefRegMap(@Self)^.&set := $00000010;
  56425. end;
  56426. function TUSB_U1ADDR.getDEVADDR4 : TBits_1; inline;
  56427. begin
  56428. getDEVADDR4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56429. end;
  56430. procedure TUSB_U1ADDR.setDEVADDR5; inline;
  56431. begin
  56432. pTDefRegMap(@Self)^.&set := $00000020;
  56433. end;
  56434. procedure TUSB_U1ADDR.clearDEVADDR5; inline;
  56435. begin
  56436. pTDefRegMap(@Self)^.clr := $00000020;
  56437. end;
  56438. procedure TUSB_U1ADDR.setDEVADDR5(thebits : TBits_1); inline;
  56439. begin
  56440. if thebits = 0 then
  56441. pTDefRegMap(@Self)^.clr := $00000020
  56442. else
  56443. pTDefRegMap(@Self)^.&set := $00000020;
  56444. end;
  56445. function TUSB_U1ADDR.getDEVADDR5 : TBits_1; inline;
  56446. begin
  56447. getDEVADDR5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56448. end;
  56449. procedure TUSB_U1ADDR.setDEVADDR6; inline;
  56450. begin
  56451. pTDefRegMap(@Self)^.&set := $00000040;
  56452. end;
  56453. procedure TUSB_U1ADDR.clearDEVADDR6; inline;
  56454. begin
  56455. pTDefRegMap(@Self)^.clr := $00000040;
  56456. end;
  56457. procedure TUSB_U1ADDR.setDEVADDR6(thebits : TBits_1); inline;
  56458. begin
  56459. if thebits = 0 then
  56460. pTDefRegMap(@Self)^.clr := $00000040
  56461. else
  56462. pTDefRegMap(@Self)^.&set := $00000040;
  56463. end;
  56464. function TUSB_U1ADDR.getDEVADDR6 : TBits_1; inline;
  56465. begin
  56466. getDEVADDR6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56467. end;
  56468. procedure TUSB_U1FRML.setFRML(thebits : TBits_8); inline;
  56469. begin
  56470. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  56471. end;
  56472. function TUSB_U1FRML.getFRML : TBits_8; inline;
  56473. begin
  56474. getFRML := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  56475. end;
  56476. procedure TUSB_U1FRML.setFRM0; inline;
  56477. begin
  56478. pTDefRegMap(@Self)^.&set := $00000001;
  56479. end;
  56480. procedure TUSB_U1FRML.clearFRM0; inline;
  56481. begin
  56482. pTDefRegMap(@Self)^.clr := $00000001;
  56483. end;
  56484. procedure TUSB_U1FRML.setFRM0(thebits : TBits_1); inline;
  56485. begin
  56486. if thebits = 0 then
  56487. pTDefRegMap(@Self)^.clr := $00000001
  56488. else
  56489. pTDefRegMap(@Self)^.&set := $00000001;
  56490. end;
  56491. function TUSB_U1FRML.getFRM0 : TBits_1; inline;
  56492. begin
  56493. getFRM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56494. end;
  56495. procedure TUSB_U1FRML.setFRM1; inline;
  56496. begin
  56497. pTDefRegMap(@Self)^.&set := $00000002;
  56498. end;
  56499. procedure TUSB_U1FRML.clearFRM1; inline;
  56500. begin
  56501. pTDefRegMap(@Self)^.clr := $00000002;
  56502. end;
  56503. procedure TUSB_U1FRML.setFRM1(thebits : TBits_1); inline;
  56504. begin
  56505. if thebits = 0 then
  56506. pTDefRegMap(@Self)^.clr := $00000002
  56507. else
  56508. pTDefRegMap(@Self)^.&set := $00000002;
  56509. end;
  56510. function TUSB_U1FRML.getFRM1 : TBits_1; inline;
  56511. begin
  56512. getFRM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56513. end;
  56514. procedure TUSB_U1FRML.setFRM2; inline;
  56515. begin
  56516. pTDefRegMap(@Self)^.&set := $00000004;
  56517. end;
  56518. procedure TUSB_U1FRML.clearFRM2; inline;
  56519. begin
  56520. pTDefRegMap(@Self)^.clr := $00000004;
  56521. end;
  56522. procedure TUSB_U1FRML.setFRM2(thebits : TBits_1); inline;
  56523. begin
  56524. if thebits = 0 then
  56525. pTDefRegMap(@Self)^.clr := $00000004
  56526. else
  56527. pTDefRegMap(@Self)^.&set := $00000004;
  56528. end;
  56529. function TUSB_U1FRML.getFRM2 : TBits_1; inline;
  56530. begin
  56531. getFRM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56532. end;
  56533. procedure TUSB_U1FRML.setFRM3; inline;
  56534. begin
  56535. pTDefRegMap(@Self)^.&set := $00000008;
  56536. end;
  56537. procedure TUSB_U1FRML.clearFRM3; inline;
  56538. begin
  56539. pTDefRegMap(@Self)^.clr := $00000008;
  56540. end;
  56541. procedure TUSB_U1FRML.setFRM3(thebits : TBits_1); inline;
  56542. begin
  56543. if thebits = 0 then
  56544. pTDefRegMap(@Self)^.clr := $00000008
  56545. else
  56546. pTDefRegMap(@Self)^.&set := $00000008;
  56547. end;
  56548. function TUSB_U1FRML.getFRM3 : TBits_1; inline;
  56549. begin
  56550. getFRM3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56551. end;
  56552. procedure TUSB_U1FRML.setFRM4; inline;
  56553. begin
  56554. pTDefRegMap(@Self)^.&set := $00000010;
  56555. end;
  56556. procedure TUSB_U1FRML.clearFRM4; inline;
  56557. begin
  56558. pTDefRegMap(@Self)^.clr := $00000010;
  56559. end;
  56560. procedure TUSB_U1FRML.setFRM4(thebits : TBits_1); inline;
  56561. begin
  56562. if thebits = 0 then
  56563. pTDefRegMap(@Self)^.clr := $00000010
  56564. else
  56565. pTDefRegMap(@Self)^.&set := $00000010;
  56566. end;
  56567. function TUSB_U1FRML.getFRM4 : TBits_1; inline;
  56568. begin
  56569. getFRM4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56570. end;
  56571. procedure TUSB_U1FRML.setFRM5; inline;
  56572. begin
  56573. pTDefRegMap(@Self)^.&set := $00000020;
  56574. end;
  56575. procedure TUSB_U1FRML.clearFRM5; inline;
  56576. begin
  56577. pTDefRegMap(@Self)^.clr := $00000020;
  56578. end;
  56579. procedure TUSB_U1FRML.setFRM5(thebits : TBits_1); inline;
  56580. begin
  56581. if thebits = 0 then
  56582. pTDefRegMap(@Self)^.clr := $00000020
  56583. else
  56584. pTDefRegMap(@Self)^.&set := $00000020;
  56585. end;
  56586. function TUSB_U1FRML.getFRM5 : TBits_1; inline;
  56587. begin
  56588. getFRM5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56589. end;
  56590. procedure TUSB_U1FRML.setFRM6; inline;
  56591. begin
  56592. pTDefRegMap(@Self)^.&set := $00000040;
  56593. end;
  56594. procedure TUSB_U1FRML.clearFRM6; inline;
  56595. begin
  56596. pTDefRegMap(@Self)^.clr := $00000040;
  56597. end;
  56598. procedure TUSB_U1FRML.setFRM6(thebits : TBits_1); inline;
  56599. begin
  56600. if thebits = 0 then
  56601. pTDefRegMap(@Self)^.clr := $00000040
  56602. else
  56603. pTDefRegMap(@Self)^.&set := $00000040;
  56604. end;
  56605. function TUSB_U1FRML.getFRM6 : TBits_1; inline;
  56606. begin
  56607. getFRM6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56608. end;
  56609. procedure TUSB_U1FRML.setFRM7; inline;
  56610. begin
  56611. pTDefRegMap(@Self)^.&set := $00000080;
  56612. end;
  56613. procedure TUSB_U1FRML.clearFRM7; inline;
  56614. begin
  56615. pTDefRegMap(@Self)^.clr := $00000080;
  56616. end;
  56617. procedure TUSB_U1FRML.setFRM7(thebits : TBits_1); inline;
  56618. begin
  56619. if thebits = 0 then
  56620. pTDefRegMap(@Self)^.clr := $00000080
  56621. else
  56622. pTDefRegMap(@Self)^.&set := $00000080;
  56623. end;
  56624. function TUSB_U1FRML.getFRM7 : TBits_1; inline;
  56625. begin
  56626. getFRM7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56627. end;
  56628. procedure TUSB_U1FRMH.setFRMH(thebits : TBits_3); inline;
  56629. begin
  56630. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  56631. end;
  56632. function TUSB_U1FRMH.getFRMH : TBits_3; inline;
  56633. begin
  56634. getFRMH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  56635. end;
  56636. procedure TUSB_U1FRMH.setFRM8; inline;
  56637. begin
  56638. pTDefRegMap(@Self)^.&set := $00000001;
  56639. end;
  56640. procedure TUSB_U1FRMH.clearFRM8; inline;
  56641. begin
  56642. pTDefRegMap(@Self)^.clr := $00000001;
  56643. end;
  56644. procedure TUSB_U1FRMH.setFRM8(thebits : TBits_1); inline;
  56645. begin
  56646. if thebits = 0 then
  56647. pTDefRegMap(@Self)^.clr := $00000001
  56648. else
  56649. pTDefRegMap(@Self)^.&set := $00000001;
  56650. end;
  56651. function TUSB_U1FRMH.getFRM8 : TBits_1; inline;
  56652. begin
  56653. getFRM8 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56654. end;
  56655. procedure TUSB_U1FRMH.setFRM9; inline;
  56656. begin
  56657. pTDefRegMap(@Self)^.&set := $00000002;
  56658. end;
  56659. procedure TUSB_U1FRMH.clearFRM9; inline;
  56660. begin
  56661. pTDefRegMap(@Self)^.clr := $00000002;
  56662. end;
  56663. procedure TUSB_U1FRMH.setFRM9(thebits : TBits_1); inline;
  56664. begin
  56665. if thebits = 0 then
  56666. pTDefRegMap(@Self)^.clr := $00000002
  56667. else
  56668. pTDefRegMap(@Self)^.&set := $00000002;
  56669. end;
  56670. function TUSB_U1FRMH.getFRM9 : TBits_1; inline;
  56671. begin
  56672. getFRM9 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56673. end;
  56674. procedure TUSB_U1FRMH.setFRM10; inline;
  56675. begin
  56676. pTDefRegMap(@Self)^.&set := $00000004;
  56677. end;
  56678. procedure TUSB_U1FRMH.clearFRM10; inline;
  56679. begin
  56680. pTDefRegMap(@Self)^.clr := $00000004;
  56681. end;
  56682. procedure TUSB_U1FRMH.setFRM10(thebits : TBits_1); inline;
  56683. begin
  56684. if thebits = 0 then
  56685. pTDefRegMap(@Self)^.clr := $00000004
  56686. else
  56687. pTDefRegMap(@Self)^.&set := $00000004;
  56688. end;
  56689. function TUSB_U1FRMH.getFRM10 : TBits_1; inline;
  56690. begin
  56691. getFRM10 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56692. end;
  56693. procedure TUSB_U1TOK.setEP(thebits : TBits_4); inline;
  56694. begin
  56695. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  56696. end;
  56697. function TUSB_U1TOK.getEP : TBits_4; inline;
  56698. begin
  56699. getEP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  56700. end;
  56701. procedure TUSB_U1TOK.setPID(thebits : TBits_4); inline;
  56702. begin
  56703. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF0F or ( thebits shl 4 );
  56704. end;
  56705. function TUSB_U1TOK.getPID : TBits_4; inline;
  56706. begin
  56707. getPID := (pTDefRegMap(@Self)^.val and $000000F0) shr 4;
  56708. end;
  56709. procedure TUSB_U1TOK.setEP0; inline;
  56710. begin
  56711. pTDefRegMap(@Self)^.&set := $00000001;
  56712. end;
  56713. procedure TUSB_U1TOK.clearEP0; inline;
  56714. begin
  56715. pTDefRegMap(@Self)^.clr := $00000001;
  56716. end;
  56717. procedure TUSB_U1TOK.setEP0(thebits : TBits_1); inline;
  56718. begin
  56719. if thebits = 0 then
  56720. pTDefRegMap(@Self)^.clr := $00000001
  56721. else
  56722. pTDefRegMap(@Self)^.&set := $00000001;
  56723. end;
  56724. function TUSB_U1TOK.getEP0 : TBits_1; inline;
  56725. begin
  56726. getEP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56727. end;
  56728. procedure TUSB_U1TOK.setEP1; inline;
  56729. begin
  56730. pTDefRegMap(@Self)^.&set := $00000002;
  56731. end;
  56732. procedure TUSB_U1TOK.clearEP1; inline;
  56733. begin
  56734. pTDefRegMap(@Self)^.clr := $00000002;
  56735. end;
  56736. procedure TUSB_U1TOK.setEP1(thebits : TBits_1); inline;
  56737. begin
  56738. if thebits = 0 then
  56739. pTDefRegMap(@Self)^.clr := $00000002
  56740. else
  56741. pTDefRegMap(@Self)^.&set := $00000002;
  56742. end;
  56743. function TUSB_U1TOK.getEP1 : TBits_1; inline;
  56744. begin
  56745. getEP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56746. end;
  56747. procedure TUSB_U1TOK.setEP2; inline;
  56748. begin
  56749. pTDefRegMap(@Self)^.&set := $00000004;
  56750. end;
  56751. procedure TUSB_U1TOK.clearEP2; inline;
  56752. begin
  56753. pTDefRegMap(@Self)^.clr := $00000004;
  56754. end;
  56755. procedure TUSB_U1TOK.setEP2(thebits : TBits_1); inline;
  56756. begin
  56757. if thebits = 0 then
  56758. pTDefRegMap(@Self)^.clr := $00000004
  56759. else
  56760. pTDefRegMap(@Self)^.&set := $00000004;
  56761. end;
  56762. function TUSB_U1TOK.getEP2 : TBits_1; inline;
  56763. begin
  56764. getEP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56765. end;
  56766. procedure TUSB_U1TOK.setEP3; inline;
  56767. begin
  56768. pTDefRegMap(@Self)^.&set := $00000008;
  56769. end;
  56770. procedure TUSB_U1TOK.clearEP3; inline;
  56771. begin
  56772. pTDefRegMap(@Self)^.clr := $00000008;
  56773. end;
  56774. procedure TUSB_U1TOK.setEP3(thebits : TBits_1); inline;
  56775. begin
  56776. if thebits = 0 then
  56777. pTDefRegMap(@Self)^.clr := $00000008
  56778. else
  56779. pTDefRegMap(@Self)^.&set := $00000008;
  56780. end;
  56781. function TUSB_U1TOK.getEP3 : TBits_1; inline;
  56782. begin
  56783. getEP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56784. end;
  56785. procedure TUSB_U1TOK.setPID0; inline;
  56786. begin
  56787. pTDefRegMap(@Self)^.&set := $00000010;
  56788. end;
  56789. procedure TUSB_U1TOK.clearPID0; inline;
  56790. begin
  56791. pTDefRegMap(@Self)^.clr := $00000010;
  56792. end;
  56793. procedure TUSB_U1TOK.setPID0(thebits : TBits_1); inline;
  56794. begin
  56795. if thebits = 0 then
  56796. pTDefRegMap(@Self)^.clr := $00000010
  56797. else
  56798. pTDefRegMap(@Self)^.&set := $00000010;
  56799. end;
  56800. function TUSB_U1TOK.getPID0 : TBits_1; inline;
  56801. begin
  56802. getPID0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56803. end;
  56804. procedure TUSB_U1TOK.setPID1; inline;
  56805. begin
  56806. pTDefRegMap(@Self)^.&set := $00000020;
  56807. end;
  56808. procedure TUSB_U1TOK.clearPID1; inline;
  56809. begin
  56810. pTDefRegMap(@Self)^.clr := $00000020;
  56811. end;
  56812. procedure TUSB_U1TOK.setPID1(thebits : TBits_1); inline;
  56813. begin
  56814. if thebits = 0 then
  56815. pTDefRegMap(@Self)^.clr := $00000020
  56816. else
  56817. pTDefRegMap(@Self)^.&set := $00000020;
  56818. end;
  56819. function TUSB_U1TOK.getPID1 : TBits_1; inline;
  56820. begin
  56821. getPID1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56822. end;
  56823. procedure TUSB_U1TOK.setPID2; inline;
  56824. begin
  56825. pTDefRegMap(@Self)^.&set := $00000040;
  56826. end;
  56827. procedure TUSB_U1TOK.clearPID2; inline;
  56828. begin
  56829. pTDefRegMap(@Self)^.clr := $00000040;
  56830. end;
  56831. procedure TUSB_U1TOK.setPID2(thebits : TBits_1); inline;
  56832. begin
  56833. if thebits = 0 then
  56834. pTDefRegMap(@Self)^.clr := $00000040
  56835. else
  56836. pTDefRegMap(@Self)^.&set := $00000040;
  56837. end;
  56838. function TUSB_U1TOK.getPID2 : TBits_1; inline;
  56839. begin
  56840. getPID2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56841. end;
  56842. procedure TUSB_U1TOK.setPID3; inline;
  56843. begin
  56844. pTDefRegMap(@Self)^.&set := $00000080;
  56845. end;
  56846. procedure TUSB_U1TOK.clearPID3; inline;
  56847. begin
  56848. pTDefRegMap(@Self)^.clr := $00000080;
  56849. end;
  56850. procedure TUSB_U1TOK.setPID3(thebits : TBits_1); inline;
  56851. begin
  56852. if thebits = 0 then
  56853. pTDefRegMap(@Self)^.clr := $00000080
  56854. else
  56855. pTDefRegMap(@Self)^.&set := $00000080;
  56856. end;
  56857. function TUSB_U1TOK.getPID3 : TBits_1; inline;
  56858. begin
  56859. getPID3 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56860. end;
  56861. procedure TPORTB_TRISB.setTRISB0; inline;
  56862. begin
  56863. pTDefRegMap(@Self)^.&set := $00000001;
  56864. end;
  56865. procedure TPORTB_TRISB.clearTRISB0; inline;
  56866. begin
  56867. pTDefRegMap(@Self)^.clr := $00000001;
  56868. end;
  56869. procedure TPORTB_TRISB.setTRISB0(thebits : TBits_1); inline;
  56870. begin
  56871. if thebits = 0 then
  56872. pTDefRegMap(@Self)^.clr := $00000001
  56873. else
  56874. pTDefRegMap(@Self)^.&set := $00000001;
  56875. end;
  56876. function TPORTB_TRISB.getTRISB0 : TBits_1; inline;
  56877. begin
  56878. getTRISB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56879. end;
  56880. procedure TPORTB_TRISB.setTRISB1; inline;
  56881. begin
  56882. pTDefRegMap(@Self)^.&set := $00000002;
  56883. end;
  56884. procedure TPORTB_TRISB.clearTRISB1; inline;
  56885. begin
  56886. pTDefRegMap(@Self)^.clr := $00000002;
  56887. end;
  56888. procedure TPORTB_TRISB.setTRISB1(thebits : TBits_1); inline;
  56889. begin
  56890. if thebits = 0 then
  56891. pTDefRegMap(@Self)^.clr := $00000002
  56892. else
  56893. pTDefRegMap(@Self)^.&set := $00000002;
  56894. end;
  56895. function TPORTB_TRISB.getTRISB1 : TBits_1; inline;
  56896. begin
  56897. getTRISB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56898. end;
  56899. procedure TPORTB_TRISB.setTRISB2; inline;
  56900. begin
  56901. pTDefRegMap(@Self)^.&set := $00000004;
  56902. end;
  56903. procedure TPORTB_TRISB.clearTRISB2; inline;
  56904. begin
  56905. pTDefRegMap(@Self)^.clr := $00000004;
  56906. end;
  56907. procedure TPORTB_TRISB.setTRISB2(thebits : TBits_1); inline;
  56908. begin
  56909. if thebits = 0 then
  56910. pTDefRegMap(@Self)^.clr := $00000004
  56911. else
  56912. pTDefRegMap(@Self)^.&set := $00000004;
  56913. end;
  56914. function TPORTB_TRISB.getTRISB2 : TBits_1; inline;
  56915. begin
  56916. getTRISB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56917. end;
  56918. procedure TPORTB_TRISB.setTRISB3; inline;
  56919. begin
  56920. pTDefRegMap(@Self)^.&set := $00000008;
  56921. end;
  56922. procedure TPORTB_TRISB.clearTRISB3; inline;
  56923. begin
  56924. pTDefRegMap(@Self)^.clr := $00000008;
  56925. end;
  56926. procedure TPORTB_TRISB.setTRISB3(thebits : TBits_1); inline;
  56927. begin
  56928. if thebits = 0 then
  56929. pTDefRegMap(@Self)^.clr := $00000008
  56930. else
  56931. pTDefRegMap(@Self)^.&set := $00000008;
  56932. end;
  56933. function TPORTB_TRISB.getTRISB3 : TBits_1; inline;
  56934. begin
  56935. getTRISB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56936. end;
  56937. procedure TPORTB_TRISB.setTRISB4; inline;
  56938. begin
  56939. pTDefRegMap(@Self)^.&set := $00000010;
  56940. end;
  56941. procedure TPORTB_TRISB.clearTRISB4; inline;
  56942. begin
  56943. pTDefRegMap(@Self)^.clr := $00000010;
  56944. end;
  56945. procedure TPORTB_TRISB.setTRISB4(thebits : TBits_1); inline;
  56946. begin
  56947. if thebits = 0 then
  56948. pTDefRegMap(@Self)^.clr := $00000010
  56949. else
  56950. pTDefRegMap(@Self)^.&set := $00000010;
  56951. end;
  56952. function TPORTB_TRISB.getTRISB4 : TBits_1; inline;
  56953. begin
  56954. getTRISB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56955. end;
  56956. procedure TPORTB_TRISB.setTRISB5; inline;
  56957. begin
  56958. pTDefRegMap(@Self)^.&set := $00000020;
  56959. end;
  56960. procedure TPORTB_TRISB.clearTRISB5; inline;
  56961. begin
  56962. pTDefRegMap(@Self)^.clr := $00000020;
  56963. end;
  56964. procedure TPORTB_TRISB.setTRISB5(thebits : TBits_1); inline;
  56965. begin
  56966. if thebits = 0 then
  56967. pTDefRegMap(@Self)^.clr := $00000020
  56968. else
  56969. pTDefRegMap(@Self)^.&set := $00000020;
  56970. end;
  56971. function TPORTB_TRISB.getTRISB5 : TBits_1; inline;
  56972. begin
  56973. getTRISB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56974. end;
  56975. procedure TPORTB_TRISB.setTRISB6; inline;
  56976. begin
  56977. pTDefRegMap(@Self)^.&set := $00000040;
  56978. end;
  56979. procedure TPORTB_TRISB.clearTRISB6; inline;
  56980. begin
  56981. pTDefRegMap(@Self)^.clr := $00000040;
  56982. end;
  56983. procedure TPORTB_TRISB.setTRISB6(thebits : TBits_1); inline;
  56984. begin
  56985. if thebits = 0 then
  56986. pTDefRegMap(@Self)^.clr := $00000040
  56987. else
  56988. pTDefRegMap(@Self)^.&set := $00000040;
  56989. end;
  56990. function TPORTB_TRISB.getTRISB6 : TBits_1; inline;
  56991. begin
  56992. getTRISB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56993. end;
  56994. procedure TPORTB_TRISB.setTRISB7; inline;
  56995. begin
  56996. pTDefRegMap(@Self)^.&set := $00000080;
  56997. end;
  56998. procedure TPORTB_TRISB.clearTRISB7; inline;
  56999. begin
  57000. pTDefRegMap(@Self)^.clr := $00000080;
  57001. end;
  57002. procedure TPORTB_TRISB.setTRISB7(thebits : TBits_1); inline;
  57003. begin
  57004. if thebits = 0 then
  57005. pTDefRegMap(@Self)^.clr := $00000080
  57006. else
  57007. pTDefRegMap(@Self)^.&set := $00000080;
  57008. end;
  57009. function TPORTB_TRISB.getTRISB7 : TBits_1; inline;
  57010. begin
  57011. getTRISB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57012. end;
  57013. procedure TPORTB_TRISB.setTRISB8; inline;
  57014. begin
  57015. pTDefRegMap(@Self)^.&set := $00000100;
  57016. end;
  57017. procedure TPORTB_TRISB.clearTRISB8; inline;
  57018. begin
  57019. pTDefRegMap(@Self)^.clr := $00000100;
  57020. end;
  57021. procedure TPORTB_TRISB.setTRISB8(thebits : TBits_1); inline;
  57022. begin
  57023. if thebits = 0 then
  57024. pTDefRegMap(@Self)^.clr := $00000100
  57025. else
  57026. pTDefRegMap(@Self)^.&set := $00000100;
  57027. end;
  57028. function TPORTB_TRISB.getTRISB8 : TBits_1; inline;
  57029. begin
  57030. getTRISB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  57031. end;
  57032. procedure TPORTB_TRISB.setTRISB9; inline;
  57033. begin
  57034. pTDefRegMap(@Self)^.&set := $00000200;
  57035. end;
  57036. procedure TPORTB_TRISB.clearTRISB9; inline;
  57037. begin
  57038. pTDefRegMap(@Self)^.clr := $00000200;
  57039. end;
  57040. procedure TPORTB_TRISB.setTRISB9(thebits : TBits_1); inline;
  57041. begin
  57042. if thebits = 0 then
  57043. pTDefRegMap(@Self)^.clr := $00000200
  57044. else
  57045. pTDefRegMap(@Self)^.&set := $00000200;
  57046. end;
  57047. function TPORTB_TRISB.getTRISB9 : TBits_1; inline;
  57048. begin
  57049. getTRISB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  57050. end;
  57051. procedure TPORTB_TRISB.setTRISB10; inline;
  57052. begin
  57053. pTDefRegMap(@Self)^.&set := $00000400;
  57054. end;
  57055. procedure TPORTB_TRISB.clearTRISB10; inline;
  57056. begin
  57057. pTDefRegMap(@Self)^.clr := $00000400;
  57058. end;
  57059. procedure TPORTB_TRISB.setTRISB10(thebits : TBits_1); inline;
  57060. begin
  57061. if thebits = 0 then
  57062. pTDefRegMap(@Self)^.clr := $00000400
  57063. else
  57064. pTDefRegMap(@Self)^.&set := $00000400;
  57065. end;
  57066. function TPORTB_TRISB.getTRISB10 : TBits_1; inline;
  57067. begin
  57068. getTRISB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  57069. end;
  57070. procedure TPORTB_TRISB.setTRISB11; inline;
  57071. begin
  57072. pTDefRegMap(@Self)^.&set := $00000800;
  57073. end;
  57074. procedure TPORTB_TRISB.clearTRISB11; inline;
  57075. begin
  57076. pTDefRegMap(@Self)^.clr := $00000800;
  57077. end;
  57078. procedure TPORTB_TRISB.setTRISB11(thebits : TBits_1); inline;
  57079. begin
  57080. if thebits = 0 then
  57081. pTDefRegMap(@Self)^.clr := $00000800
  57082. else
  57083. pTDefRegMap(@Self)^.&set := $00000800;
  57084. end;
  57085. function TPORTB_TRISB.getTRISB11 : TBits_1; inline;
  57086. begin
  57087. getTRISB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  57088. end;
  57089. procedure TPORTB_TRISB.setTRISB12; inline;
  57090. begin
  57091. pTDefRegMap(@Self)^.&set := $00001000;
  57092. end;
  57093. procedure TPORTB_TRISB.clearTRISB12; inline;
  57094. begin
  57095. pTDefRegMap(@Self)^.clr := $00001000;
  57096. end;
  57097. procedure TPORTB_TRISB.setTRISB12(thebits : TBits_1); inline;
  57098. begin
  57099. if thebits = 0 then
  57100. pTDefRegMap(@Self)^.clr := $00001000
  57101. else
  57102. pTDefRegMap(@Self)^.&set := $00001000;
  57103. end;
  57104. function TPORTB_TRISB.getTRISB12 : TBits_1; inline;
  57105. begin
  57106. getTRISB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  57107. end;
  57108. procedure TPORTB_TRISB.setTRISB13; inline;
  57109. begin
  57110. pTDefRegMap(@Self)^.&set := $00002000;
  57111. end;
  57112. procedure TPORTB_TRISB.clearTRISB13; inline;
  57113. begin
  57114. pTDefRegMap(@Self)^.clr := $00002000;
  57115. end;
  57116. procedure TPORTB_TRISB.setTRISB13(thebits : TBits_1); inline;
  57117. begin
  57118. if thebits = 0 then
  57119. pTDefRegMap(@Self)^.clr := $00002000
  57120. else
  57121. pTDefRegMap(@Self)^.&set := $00002000;
  57122. end;
  57123. function TPORTB_TRISB.getTRISB13 : TBits_1; inline;
  57124. begin
  57125. getTRISB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  57126. end;
  57127. procedure TPORTB_TRISB.setTRISB14; inline;
  57128. begin
  57129. pTDefRegMap(@Self)^.&set := $00004000;
  57130. end;
  57131. procedure TPORTB_TRISB.clearTRISB14; inline;
  57132. begin
  57133. pTDefRegMap(@Self)^.clr := $00004000;
  57134. end;
  57135. procedure TPORTB_TRISB.setTRISB14(thebits : TBits_1); inline;
  57136. begin
  57137. if thebits = 0 then
  57138. pTDefRegMap(@Self)^.clr := $00004000
  57139. else
  57140. pTDefRegMap(@Self)^.&set := $00004000;
  57141. end;
  57142. function TPORTB_TRISB.getTRISB14 : TBits_1; inline;
  57143. begin
  57144. getTRISB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  57145. end;
  57146. procedure TPORTB_TRISB.setTRISB15; inline;
  57147. begin
  57148. pTDefRegMap(@Self)^.&set := $00008000;
  57149. end;
  57150. procedure TPORTB_TRISB.clearTRISB15; inline;
  57151. begin
  57152. pTDefRegMap(@Self)^.clr := $00008000;
  57153. end;
  57154. procedure TPORTB_TRISB.setTRISB15(thebits : TBits_1); inline;
  57155. begin
  57156. if thebits = 0 then
  57157. pTDefRegMap(@Self)^.clr := $00008000
  57158. else
  57159. pTDefRegMap(@Self)^.&set := $00008000;
  57160. end;
  57161. function TPORTB_TRISB.getTRISB15 : TBits_1; inline;
  57162. begin
  57163. getTRISB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  57164. end;
  57165. procedure TPORTB_TRISB.setw(thebits : TBits_32); inline;
  57166. begin
  57167. pTDefRegMap(@Self)^.val := thebits;
  57168. end;
  57169. function TPORTB_TRISB.getw : TBits_32; inline;
  57170. begin
  57171. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57172. end;
  57173. procedure TPORTB_PORTB.setRB0; inline;
  57174. begin
  57175. pTDefRegMap(@Self)^.&set := $00000001;
  57176. end;
  57177. procedure TPORTB_PORTB.clearRB0; inline;
  57178. begin
  57179. pTDefRegMap(@Self)^.clr := $00000001;
  57180. end;
  57181. procedure TPORTB_PORTB.setRB0(thebits : TBits_1); inline;
  57182. begin
  57183. if thebits = 0 then
  57184. pTDefRegMap(@Self)^.clr := $00000001
  57185. else
  57186. pTDefRegMap(@Self)^.&set := $00000001;
  57187. end;
  57188. function TPORTB_PORTB.getRB0 : TBits_1; inline;
  57189. begin
  57190. getRB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57191. end;
  57192. procedure TPORTB_PORTB.setRB1; inline;
  57193. begin
  57194. pTDefRegMap(@Self)^.&set := $00000002;
  57195. end;
  57196. procedure TPORTB_PORTB.clearRB1; inline;
  57197. begin
  57198. pTDefRegMap(@Self)^.clr := $00000002;
  57199. end;
  57200. procedure TPORTB_PORTB.setRB1(thebits : TBits_1); inline;
  57201. begin
  57202. if thebits = 0 then
  57203. pTDefRegMap(@Self)^.clr := $00000002
  57204. else
  57205. pTDefRegMap(@Self)^.&set := $00000002;
  57206. end;
  57207. function TPORTB_PORTB.getRB1 : TBits_1; inline;
  57208. begin
  57209. getRB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57210. end;
  57211. procedure TPORTB_PORTB.setRB2; inline;
  57212. begin
  57213. pTDefRegMap(@Self)^.&set := $00000004;
  57214. end;
  57215. procedure TPORTB_PORTB.clearRB2; inline;
  57216. begin
  57217. pTDefRegMap(@Self)^.clr := $00000004;
  57218. end;
  57219. procedure TPORTB_PORTB.setRB2(thebits : TBits_1); inline;
  57220. begin
  57221. if thebits = 0 then
  57222. pTDefRegMap(@Self)^.clr := $00000004
  57223. else
  57224. pTDefRegMap(@Self)^.&set := $00000004;
  57225. end;
  57226. function TPORTB_PORTB.getRB2 : TBits_1; inline;
  57227. begin
  57228. getRB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57229. end;
  57230. procedure TPORTB_PORTB.setRB3; inline;
  57231. begin
  57232. pTDefRegMap(@Self)^.&set := $00000008;
  57233. end;
  57234. procedure TPORTB_PORTB.clearRB3; inline;
  57235. begin
  57236. pTDefRegMap(@Self)^.clr := $00000008;
  57237. end;
  57238. procedure TPORTB_PORTB.setRB3(thebits : TBits_1); inline;
  57239. begin
  57240. if thebits = 0 then
  57241. pTDefRegMap(@Self)^.clr := $00000008
  57242. else
  57243. pTDefRegMap(@Self)^.&set := $00000008;
  57244. end;
  57245. function TPORTB_PORTB.getRB3 : TBits_1; inline;
  57246. begin
  57247. getRB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57248. end;
  57249. procedure TPORTB_PORTB.setRB4; inline;
  57250. begin
  57251. pTDefRegMap(@Self)^.&set := $00000010;
  57252. end;
  57253. procedure TPORTB_PORTB.clearRB4; inline;
  57254. begin
  57255. pTDefRegMap(@Self)^.clr := $00000010;
  57256. end;
  57257. procedure TPORTB_PORTB.setRB4(thebits : TBits_1); inline;
  57258. begin
  57259. if thebits = 0 then
  57260. pTDefRegMap(@Self)^.clr := $00000010
  57261. else
  57262. pTDefRegMap(@Self)^.&set := $00000010;
  57263. end;
  57264. function TPORTB_PORTB.getRB4 : TBits_1; inline;
  57265. begin
  57266. getRB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57267. end;
  57268. procedure TPORTB_PORTB.setRB5; inline;
  57269. begin
  57270. pTDefRegMap(@Self)^.&set := $00000020;
  57271. end;
  57272. procedure TPORTB_PORTB.clearRB5; inline;
  57273. begin
  57274. pTDefRegMap(@Self)^.clr := $00000020;
  57275. end;
  57276. procedure TPORTB_PORTB.setRB5(thebits : TBits_1); inline;
  57277. begin
  57278. if thebits = 0 then
  57279. pTDefRegMap(@Self)^.clr := $00000020
  57280. else
  57281. pTDefRegMap(@Self)^.&set := $00000020;
  57282. end;
  57283. function TPORTB_PORTB.getRB5 : TBits_1; inline;
  57284. begin
  57285. getRB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57286. end;
  57287. procedure TPORTB_PORTB.setRB6; inline;
  57288. begin
  57289. pTDefRegMap(@Self)^.&set := $00000040;
  57290. end;
  57291. procedure TPORTB_PORTB.clearRB6; inline;
  57292. begin
  57293. pTDefRegMap(@Self)^.clr := $00000040;
  57294. end;
  57295. procedure TPORTB_PORTB.setRB6(thebits : TBits_1); inline;
  57296. begin
  57297. if thebits = 0 then
  57298. pTDefRegMap(@Self)^.clr := $00000040
  57299. else
  57300. pTDefRegMap(@Self)^.&set := $00000040;
  57301. end;
  57302. function TPORTB_PORTB.getRB6 : TBits_1; inline;
  57303. begin
  57304. getRB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57305. end;
  57306. procedure TPORTB_PORTB.setRB7; inline;
  57307. begin
  57308. pTDefRegMap(@Self)^.&set := $00000080;
  57309. end;
  57310. procedure TPORTB_PORTB.clearRB7; inline;
  57311. begin
  57312. pTDefRegMap(@Self)^.clr := $00000080;
  57313. end;
  57314. procedure TPORTB_PORTB.setRB7(thebits : TBits_1); inline;
  57315. begin
  57316. if thebits = 0 then
  57317. pTDefRegMap(@Self)^.clr := $00000080
  57318. else
  57319. pTDefRegMap(@Self)^.&set := $00000080;
  57320. end;
  57321. function TPORTB_PORTB.getRB7 : TBits_1; inline;
  57322. begin
  57323. getRB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57324. end;
  57325. procedure TPORTB_PORTB.setRB8; inline;
  57326. begin
  57327. pTDefRegMap(@Self)^.&set := $00000100;
  57328. end;
  57329. procedure TPORTB_PORTB.clearRB8; inline;
  57330. begin
  57331. pTDefRegMap(@Self)^.clr := $00000100;
  57332. end;
  57333. procedure TPORTB_PORTB.setRB8(thebits : TBits_1); inline;
  57334. begin
  57335. if thebits = 0 then
  57336. pTDefRegMap(@Self)^.clr := $00000100
  57337. else
  57338. pTDefRegMap(@Self)^.&set := $00000100;
  57339. end;
  57340. function TPORTB_PORTB.getRB8 : TBits_1; inline;
  57341. begin
  57342. getRB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  57343. end;
  57344. procedure TPORTB_PORTB.setRB9; inline;
  57345. begin
  57346. pTDefRegMap(@Self)^.&set := $00000200;
  57347. end;
  57348. procedure TPORTB_PORTB.clearRB9; inline;
  57349. begin
  57350. pTDefRegMap(@Self)^.clr := $00000200;
  57351. end;
  57352. procedure TPORTB_PORTB.setRB9(thebits : TBits_1); inline;
  57353. begin
  57354. if thebits = 0 then
  57355. pTDefRegMap(@Self)^.clr := $00000200
  57356. else
  57357. pTDefRegMap(@Self)^.&set := $00000200;
  57358. end;
  57359. function TPORTB_PORTB.getRB9 : TBits_1; inline;
  57360. begin
  57361. getRB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  57362. end;
  57363. procedure TPORTB_PORTB.setRB10; inline;
  57364. begin
  57365. pTDefRegMap(@Self)^.&set := $00000400;
  57366. end;
  57367. procedure TPORTB_PORTB.clearRB10; inline;
  57368. begin
  57369. pTDefRegMap(@Self)^.clr := $00000400;
  57370. end;
  57371. procedure TPORTB_PORTB.setRB10(thebits : TBits_1); inline;
  57372. begin
  57373. if thebits = 0 then
  57374. pTDefRegMap(@Self)^.clr := $00000400
  57375. else
  57376. pTDefRegMap(@Self)^.&set := $00000400;
  57377. end;
  57378. function TPORTB_PORTB.getRB10 : TBits_1; inline;
  57379. begin
  57380. getRB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  57381. end;
  57382. procedure TPORTB_PORTB.setRB11; inline;
  57383. begin
  57384. pTDefRegMap(@Self)^.&set := $00000800;
  57385. end;
  57386. procedure TPORTB_PORTB.clearRB11; inline;
  57387. begin
  57388. pTDefRegMap(@Self)^.clr := $00000800;
  57389. end;
  57390. procedure TPORTB_PORTB.setRB11(thebits : TBits_1); inline;
  57391. begin
  57392. if thebits = 0 then
  57393. pTDefRegMap(@Self)^.clr := $00000800
  57394. else
  57395. pTDefRegMap(@Self)^.&set := $00000800;
  57396. end;
  57397. function TPORTB_PORTB.getRB11 : TBits_1; inline;
  57398. begin
  57399. getRB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  57400. end;
  57401. procedure TPORTB_PORTB.setRB12; inline;
  57402. begin
  57403. pTDefRegMap(@Self)^.&set := $00001000;
  57404. end;
  57405. procedure TPORTB_PORTB.clearRB12; inline;
  57406. begin
  57407. pTDefRegMap(@Self)^.clr := $00001000;
  57408. end;
  57409. procedure TPORTB_PORTB.setRB12(thebits : TBits_1); inline;
  57410. begin
  57411. if thebits = 0 then
  57412. pTDefRegMap(@Self)^.clr := $00001000
  57413. else
  57414. pTDefRegMap(@Self)^.&set := $00001000;
  57415. end;
  57416. function TPORTB_PORTB.getRB12 : TBits_1; inline;
  57417. begin
  57418. getRB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  57419. end;
  57420. procedure TPORTB_PORTB.setRB13; inline;
  57421. begin
  57422. pTDefRegMap(@Self)^.&set := $00002000;
  57423. end;
  57424. procedure TPORTB_PORTB.clearRB13; inline;
  57425. begin
  57426. pTDefRegMap(@Self)^.clr := $00002000;
  57427. end;
  57428. procedure TPORTB_PORTB.setRB13(thebits : TBits_1); inline;
  57429. begin
  57430. if thebits = 0 then
  57431. pTDefRegMap(@Self)^.clr := $00002000
  57432. else
  57433. pTDefRegMap(@Self)^.&set := $00002000;
  57434. end;
  57435. function TPORTB_PORTB.getRB13 : TBits_1; inline;
  57436. begin
  57437. getRB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  57438. end;
  57439. procedure TPORTB_PORTB.setRB14; inline;
  57440. begin
  57441. pTDefRegMap(@Self)^.&set := $00004000;
  57442. end;
  57443. procedure TPORTB_PORTB.clearRB14; inline;
  57444. begin
  57445. pTDefRegMap(@Self)^.clr := $00004000;
  57446. end;
  57447. procedure TPORTB_PORTB.setRB14(thebits : TBits_1); inline;
  57448. begin
  57449. if thebits = 0 then
  57450. pTDefRegMap(@Self)^.clr := $00004000
  57451. else
  57452. pTDefRegMap(@Self)^.&set := $00004000;
  57453. end;
  57454. function TPORTB_PORTB.getRB14 : TBits_1; inline;
  57455. begin
  57456. getRB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  57457. end;
  57458. procedure TPORTB_PORTB.setRB15; inline;
  57459. begin
  57460. pTDefRegMap(@Self)^.&set := $00008000;
  57461. end;
  57462. procedure TPORTB_PORTB.clearRB15; inline;
  57463. begin
  57464. pTDefRegMap(@Self)^.clr := $00008000;
  57465. end;
  57466. procedure TPORTB_PORTB.setRB15(thebits : TBits_1); inline;
  57467. begin
  57468. if thebits = 0 then
  57469. pTDefRegMap(@Self)^.clr := $00008000
  57470. else
  57471. pTDefRegMap(@Self)^.&set := $00008000;
  57472. end;
  57473. function TPORTB_PORTB.getRB15 : TBits_1; inline;
  57474. begin
  57475. getRB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  57476. end;
  57477. procedure TPORTB_PORTB.setw(thebits : TBits_32); inline;
  57478. begin
  57479. pTDefRegMap(@Self)^.val := thebits;
  57480. end;
  57481. function TPORTB_PORTB.getw : TBits_32; inline;
  57482. begin
  57483. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57484. end;
  57485. procedure TPORTB_LATB.setLATB0; inline;
  57486. begin
  57487. pTDefRegMap(@Self)^.&set := $00000001;
  57488. end;
  57489. procedure TPORTB_LATB.clearLATB0; inline;
  57490. begin
  57491. pTDefRegMap(@Self)^.clr := $00000001;
  57492. end;
  57493. procedure TPORTB_LATB.setLATB0(thebits : TBits_1); inline;
  57494. begin
  57495. if thebits = 0 then
  57496. pTDefRegMap(@Self)^.clr := $00000001
  57497. else
  57498. pTDefRegMap(@Self)^.&set := $00000001;
  57499. end;
  57500. function TPORTB_LATB.getLATB0 : TBits_1; inline;
  57501. begin
  57502. getLATB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57503. end;
  57504. procedure TPORTB_LATB.setLATB1; inline;
  57505. begin
  57506. pTDefRegMap(@Self)^.&set := $00000002;
  57507. end;
  57508. procedure TPORTB_LATB.clearLATB1; inline;
  57509. begin
  57510. pTDefRegMap(@Self)^.clr := $00000002;
  57511. end;
  57512. procedure TPORTB_LATB.setLATB1(thebits : TBits_1); inline;
  57513. begin
  57514. if thebits = 0 then
  57515. pTDefRegMap(@Self)^.clr := $00000002
  57516. else
  57517. pTDefRegMap(@Self)^.&set := $00000002;
  57518. end;
  57519. function TPORTB_LATB.getLATB1 : TBits_1; inline;
  57520. begin
  57521. getLATB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57522. end;
  57523. procedure TPORTB_LATB.setLATB2; inline;
  57524. begin
  57525. pTDefRegMap(@Self)^.&set := $00000004;
  57526. end;
  57527. procedure TPORTB_LATB.clearLATB2; inline;
  57528. begin
  57529. pTDefRegMap(@Self)^.clr := $00000004;
  57530. end;
  57531. procedure TPORTB_LATB.setLATB2(thebits : TBits_1); inline;
  57532. begin
  57533. if thebits = 0 then
  57534. pTDefRegMap(@Self)^.clr := $00000004
  57535. else
  57536. pTDefRegMap(@Self)^.&set := $00000004;
  57537. end;
  57538. function TPORTB_LATB.getLATB2 : TBits_1; inline;
  57539. begin
  57540. getLATB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57541. end;
  57542. procedure TPORTB_LATB.setLATB3; inline;
  57543. begin
  57544. pTDefRegMap(@Self)^.&set := $00000008;
  57545. end;
  57546. procedure TPORTB_LATB.clearLATB3; inline;
  57547. begin
  57548. pTDefRegMap(@Self)^.clr := $00000008;
  57549. end;
  57550. procedure TPORTB_LATB.setLATB3(thebits : TBits_1); inline;
  57551. begin
  57552. if thebits = 0 then
  57553. pTDefRegMap(@Self)^.clr := $00000008
  57554. else
  57555. pTDefRegMap(@Self)^.&set := $00000008;
  57556. end;
  57557. function TPORTB_LATB.getLATB3 : TBits_1; inline;
  57558. begin
  57559. getLATB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57560. end;
  57561. procedure TPORTB_LATB.setLATB4; inline;
  57562. begin
  57563. pTDefRegMap(@Self)^.&set := $00000010;
  57564. end;
  57565. procedure TPORTB_LATB.clearLATB4; inline;
  57566. begin
  57567. pTDefRegMap(@Self)^.clr := $00000010;
  57568. end;
  57569. procedure TPORTB_LATB.setLATB4(thebits : TBits_1); inline;
  57570. begin
  57571. if thebits = 0 then
  57572. pTDefRegMap(@Self)^.clr := $00000010
  57573. else
  57574. pTDefRegMap(@Self)^.&set := $00000010;
  57575. end;
  57576. function TPORTB_LATB.getLATB4 : TBits_1; inline;
  57577. begin
  57578. getLATB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57579. end;
  57580. procedure TPORTB_LATB.setLATB5; inline;
  57581. begin
  57582. pTDefRegMap(@Self)^.&set := $00000020;
  57583. end;
  57584. procedure TPORTB_LATB.clearLATB5; inline;
  57585. begin
  57586. pTDefRegMap(@Self)^.clr := $00000020;
  57587. end;
  57588. procedure TPORTB_LATB.setLATB5(thebits : TBits_1); inline;
  57589. begin
  57590. if thebits = 0 then
  57591. pTDefRegMap(@Self)^.clr := $00000020
  57592. else
  57593. pTDefRegMap(@Self)^.&set := $00000020;
  57594. end;
  57595. function TPORTB_LATB.getLATB5 : TBits_1; inline;
  57596. begin
  57597. getLATB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57598. end;
  57599. procedure TPORTB_LATB.setLATB6; inline;
  57600. begin
  57601. pTDefRegMap(@Self)^.&set := $00000040;
  57602. end;
  57603. procedure TPORTB_LATB.clearLATB6; inline;
  57604. begin
  57605. pTDefRegMap(@Self)^.clr := $00000040;
  57606. end;
  57607. procedure TPORTB_LATB.setLATB6(thebits : TBits_1); inline;
  57608. begin
  57609. if thebits = 0 then
  57610. pTDefRegMap(@Self)^.clr := $00000040
  57611. else
  57612. pTDefRegMap(@Self)^.&set := $00000040;
  57613. end;
  57614. function TPORTB_LATB.getLATB6 : TBits_1; inline;
  57615. begin
  57616. getLATB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57617. end;
  57618. procedure TPORTB_LATB.setLATB7; inline;
  57619. begin
  57620. pTDefRegMap(@Self)^.&set := $00000080;
  57621. end;
  57622. procedure TPORTB_LATB.clearLATB7; inline;
  57623. begin
  57624. pTDefRegMap(@Self)^.clr := $00000080;
  57625. end;
  57626. procedure TPORTB_LATB.setLATB7(thebits : TBits_1); inline;
  57627. begin
  57628. if thebits = 0 then
  57629. pTDefRegMap(@Self)^.clr := $00000080
  57630. else
  57631. pTDefRegMap(@Self)^.&set := $00000080;
  57632. end;
  57633. function TPORTB_LATB.getLATB7 : TBits_1; inline;
  57634. begin
  57635. getLATB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57636. end;
  57637. procedure TPORTB_LATB.setLATB8; inline;
  57638. begin
  57639. pTDefRegMap(@Self)^.&set := $00000100;
  57640. end;
  57641. procedure TPORTB_LATB.clearLATB8; inline;
  57642. begin
  57643. pTDefRegMap(@Self)^.clr := $00000100;
  57644. end;
  57645. procedure TPORTB_LATB.setLATB8(thebits : TBits_1); inline;
  57646. begin
  57647. if thebits = 0 then
  57648. pTDefRegMap(@Self)^.clr := $00000100
  57649. else
  57650. pTDefRegMap(@Self)^.&set := $00000100;
  57651. end;
  57652. function TPORTB_LATB.getLATB8 : TBits_1; inline;
  57653. begin
  57654. getLATB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  57655. end;
  57656. procedure TPORTB_LATB.setLATB9; inline;
  57657. begin
  57658. pTDefRegMap(@Self)^.&set := $00000200;
  57659. end;
  57660. procedure TPORTB_LATB.clearLATB9; inline;
  57661. begin
  57662. pTDefRegMap(@Self)^.clr := $00000200;
  57663. end;
  57664. procedure TPORTB_LATB.setLATB9(thebits : TBits_1); inline;
  57665. begin
  57666. if thebits = 0 then
  57667. pTDefRegMap(@Self)^.clr := $00000200
  57668. else
  57669. pTDefRegMap(@Self)^.&set := $00000200;
  57670. end;
  57671. function TPORTB_LATB.getLATB9 : TBits_1; inline;
  57672. begin
  57673. getLATB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  57674. end;
  57675. procedure TPORTB_LATB.setLATB10; inline;
  57676. begin
  57677. pTDefRegMap(@Self)^.&set := $00000400;
  57678. end;
  57679. procedure TPORTB_LATB.clearLATB10; inline;
  57680. begin
  57681. pTDefRegMap(@Self)^.clr := $00000400;
  57682. end;
  57683. procedure TPORTB_LATB.setLATB10(thebits : TBits_1); inline;
  57684. begin
  57685. if thebits = 0 then
  57686. pTDefRegMap(@Self)^.clr := $00000400
  57687. else
  57688. pTDefRegMap(@Self)^.&set := $00000400;
  57689. end;
  57690. function TPORTB_LATB.getLATB10 : TBits_1; inline;
  57691. begin
  57692. getLATB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  57693. end;
  57694. procedure TPORTB_LATB.setLATB11; inline;
  57695. begin
  57696. pTDefRegMap(@Self)^.&set := $00000800;
  57697. end;
  57698. procedure TPORTB_LATB.clearLATB11; inline;
  57699. begin
  57700. pTDefRegMap(@Self)^.clr := $00000800;
  57701. end;
  57702. procedure TPORTB_LATB.setLATB11(thebits : TBits_1); inline;
  57703. begin
  57704. if thebits = 0 then
  57705. pTDefRegMap(@Self)^.clr := $00000800
  57706. else
  57707. pTDefRegMap(@Self)^.&set := $00000800;
  57708. end;
  57709. function TPORTB_LATB.getLATB11 : TBits_1; inline;
  57710. begin
  57711. getLATB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  57712. end;
  57713. procedure TPORTB_LATB.setLATB12; inline;
  57714. begin
  57715. pTDefRegMap(@Self)^.&set := $00001000;
  57716. end;
  57717. procedure TPORTB_LATB.clearLATB12; inline;
  57718. begin
  57719. pTDefRegMap(@Self)^.clr := $00001000;
  57720. end;
  57721. procedure TPORTB_LATB.setLATB12(thebits : TBits_1); inline;
  57722. begin
  57723. if thebits = 0 then
  57724. pTDefRegMap(@Self)^.clr := $00001000
  57725. else
  57726. pTDefRegMap(@Self)^.&set := $00001000;
  57727. end;
  57728. function TPORTB_LATB.getLATB12 : TBits_1; inline;
  57729. begin
  57730. getLATB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  57731. end;
  57732. procedure TPORTB_LATB.setLATB13; inline;
  57733. begin
  57734. pTDefRegMap(@Self)^.&set := $00002000;
  57735. end;
  57736. procedure TPORTB_LATB.clearLATB13; inline;
  57737. begin
  57738. pTDefRegMap(@Self)^.clr := $00002000;
  57739. end;
  57740. procedure TPORTB_LATB.setLATB13(thebits : TBits_1); inline;
  57741. begin
  57742. if thebits = 0 then
  57743. pTDefRegMap(@Self)^.clr := $00002000
  57744. else
  57745. pTDefRegMap(@Self)^.&set := $00002000;
  57746. end;
  57747. function TPORTB_LATB.getLATB13 : TBits_1; inline;
  57748. begin
  57749. getLATB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  57750. end;
  57751. procedure TPORTB_LATB.setLATB14; inline;
  57752. begin
  57753. pTDefRegMap(@Self)^.&set := $00004000;
  57754. end;
  57755. procedure TPORTB_LATB.clearLATB14; inline;
  57756. begin
  57757. pTDefRegMap(@Self)^.clr := $00004000;
  57758. end;
  57759. procedure TPORTB_LATB.setLATB14(thebits : TBits_1); inline;
  57760. begin
  57761. if thebits = 0 then
  57762. pTDefRegMap(@Self)^.clr := $00004000
  57763. else
  57764. pTDefRegMap(@Self)^.&set := $00004000;
  57765. end;
  57766. function TPORTB_LATB.getLATB14 : TBits_1; inline;
  57767. begin
  57768. getLATB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  57769. end;
  57770. procedure TPORTB_LATB.setLATB15; inline;
  57771. begin
  57772. pTDefRegMap(@Self)^.&set := $00008000;
  57773. end;
  57774. procedure TPORTB_LATB.clearLATB15; inline;
  57775. begin
  57776. pTDefRegMap(@Self)^.clr := $00008000;
  57777. end;
  57778. procedure TPORTB_LATB.setLATB15(thebits : TBits_1); inline;
  57779. begin
  57780. if thebits = 0 then
  57781. pTDefRegMap(@Self)^.clr := $00008000
  57782. else
  57783. pTDefRegMap(@Self)^.&set := $00008000;
  57784. end;
  57785. function TPORTB_LATB.getLATB15 : TBits_1; inline;
  57786. begin
  57787. getLATB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  57788. end;
  57789. procedure TPORTB_LATB.setw(thebits : TBits_32); inline;
  57790. begin
  57791. pTDefRegMap(@Self)^.val := thebits;
  57792. end;
  57793. function TPORTB_LATB.getw : TBits_32; inline;
  57794. begin
  57795. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57796. end;
  57797. procedure TPORTB_ODCB.setODCB0; inline;
  57798. begin
  57799. pTDefRegMap(@Self)^.&set := $00000001;
  57800. end;
  57801. procedure TPORTB_ODCB.clearODCB0; inline;
  57802. begin
  57803. pTDefRegMap(@Self)^.clr := $00000001;
  57804. end;
  57805. procedure TPORTB_ODCB.setODCB0(thebits : TBits_1); inline;
  57806. begin
  57807. if thebits = 0 then
  57808. pTDefRegMap(@Self)^.clr := $00000001
  57809. else
  57810. pTDefRegMap(@Self)^.&set := $00000001;
  57811. end;
  57812. function TPORTB_ODCB.getODCB0 : TBits_1; inline;
  57813. begin
  57814. getODCB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57815. end;
  57816. procedure TPORTB_ODCB.setODCB1; inline;
  57817. begin
  57818. pTDefRegMap(@Self)^.&set := $00000002;
  57819. end;
  57820. procedure TPORTB_ODCB.clearODCB1; inline;
  57821. begin
  57822. pTDefRegMap(@Self)^.clr := $00000002;
  57823. end;
  57824. procedure TPORTB_ODCB.setODCB1(thebits : TBits_1); inline;
  57825. begin
  57826. if thebits = 0 then
  57827. pTDefRegMap(@Self)^.clr := $00000002
  57828. else
  57829. pTDefRegMap(@Self)^.&set := $00000002;
  57830. end;
  57831. function TPORTB_ODCB.getODCB1 : TBits_1; inline;
  57832. begin
  57833. getODCB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57834. end;
  57835. procedure TPORTB_ODCB.setODCB2; inline;
  57836. begin
  57837. pTDefRegMap(@Self)^.&set := $00000004;
  57838. end;
  57839. procedure TPORTB_ODCB.clearODCB2; inline;
  57840. begin
  57841. pTDefRegMap(@Self)^.clr := $00000004;
  57842. end;
  57843. procedure TPORTB_ODCB.setODCB2(thebits : TBits_1); inline;
  57844. begin
  57845. if thebits = 0 then
  57846. pTDefRegMap(@Self)^.clr := $00000004
  57847. else
  57848. pTDefRegMap(@Self)^.&set := $00000004;
  57849. end;
  57850. function TPORTB_ODCB.getODCB2 : TBits_1; inline;
  57851. begin
  57852. getODCB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57853. end;
  57854. procedure TPORTB_ODCB.setODCB3; inline;
  57855. begin
  57856. pTDefRegMap(@Self)^.&set := $00000008;
  57857. end;
  57858. procedure TPORTB_ODCB.clearODCB3; inline;
  57859. begin
  57860. pTDefRegMap(@Self)^.clr := $00000008;
  57861. end;
  57862. procedure TPORTB_ODCB.setODCB3(thebits : TBits_1); inline;
  57863. begin
  57864. if thebits = 0 then
  57865. pTDefRegMap(@Self)^.clr := $00000008
  57866. else
  57867. pTDefRegMap(@Self)^.&set := $00000008;
  57868. end;
  57869. function TPORTB_ODCB.getODCB3 : TBits_1; inline;
  57870. begin
  57871. getODCB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57872. end;
  57873. procedure TPORTB_ODCB.setODCB4; inline;
  57874. begin
  57875. pTDefRegMap(@Self)^.&set := $00000010;
  57876. end;
  57877. procedure TPORTB_ODCB.clearODCB4; inline;
  57878. begin
  57879. pTDefRegMap(@Self)^.clr := $00000010;
  57880. end;
  57881. procedure TPORTB_ODCB.setODCB4(thebits : TBits_1); inline;
  57882. begin
  57883. if thebits = 0 then
  57884. pTDefRegMap(@Self)^.clr := $00000010
  57885. else
  57886. pTDefRegMap(@Self)^.&set := $00000010;
  57887. end;
  57888. function TPORTB_ODCB.getODCB4 : TBits_1; inline;
  57889. begin
  57890. getODCB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57891. end;
  57892. procedure TPORTB_ODCB.setODCB5; inline;
  57893. begin
  57894. pTDefRegMap(@Self)^.&set := $00000020;
  57895. end;
  57896. procedure TPORTB_ODCB.clearODCB5; inline;
  57897. begin
  57898. pTDefRegMap(@Self)^.clr := $00000020;
  57899. end;
  57900. procedure TPORTB_ODCB.setODCB5(thebits : TBits_1); inline;
  57901. begin
  57902. if thebits = 0 then
  57903. pTDefRegMap(@Self)^.clr := $00000020
  57904. else
  57905. pTDefRegMap(@Self)^.&set := $00000020;
  57906. end;
  57907. function TPORTB_ODCB.getODCB5 : TBits_1; inline;
  57908. begin
  57909. getODCB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57910. end;
  57911. procedure TPORTB_ODCB.setODCB6; inline;
  57912. begin
  57913. pTDefRegMap(@Self)^.&set := $00000040;
  57914. end;
  57915. procedure TPORTB_ODCB.clearODCB6; inline;
  57916. begin
  57917. pTDefRegMap(@Self)^.clr := $00000040;
  57918. end;
  57919. procedure TPORTB_ODCB.setODCB6(thebits : TBits_1); inline;
  57920. begin
  57921. if thebits = 0 then
  57922. pTDefRegMap(@Self)^.clr := $00000040
  57923. else
  57924. pTDefRegMap(@Self)^.&set := $00000040;
  57925. end;
  57926. function TPORTB_ODCB.getODCB6 : TBits_1; inline;
  57927. begin
  57928. getODCB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57929. end;
  57930. procedure TPORTB_ODCB.setODCB7; inline;
  57931. begin
  57932. pTDefRegMap(@Self)^.&set := $00000080;
  57933. end;
  57934. procedure TPORTB_ODCB.clearODCB7; inline;
  57935. begin
  57936. pTDefRegMap(@Self)^.clr := $00000080;
  57937. end;
  57938. procedure TPORTB_ODCB.setODCB7(thebits : TBits_1); inline;
  57939. begin
  57940. if thebits = 0 then
  57941. pTDefRegMap(@Self)^.clr := $00000080
  57942. else
  57943. pTDefRegMap(@Self)^.&set := $00000080;
  57944. end;
  57945. function TPORTB_ODCB.getODCB7 : TBits_1; inline;
  57946. begin
  57947. getODCB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57948. end;
  57949. procedure TPORTB_ODCB.setODCB8; inline;
  57950. begin
  57951. pTDefRegMap(@Self)^.&set := $00000100;
  57952. end;
  57953. procedure TPORTB_ODCB.clearODCB8; inline;
  57954. begin
  57955. pTDefRegMap(@Self)^.clr := $00000100;
  57956. end;
  57957. procedure TPORTB_ODCB.setODCB8(thebits : TBits_1); inline;
  57958. begin
  57959. if thebits = 0 then
  57960. pTDefRegMap(@Self)^.clr := $00000100
  57961. else
  57962. pTDefRegMap(@Self)^.&set := $00000100;
  57963. end;
  57964. function TPORTB_ODCB.getODCB8 : TBits_1; inline;
  57965. begin
  57966. getODCB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  57967. end;
  57968. procedure TPORTB_ODCB.setODCB9; inline;
  57969. begin
  57970. pTDefRegMap(@Self)^.&set := $00000200;
  57971. end;
  57972. procedure TPORTB_ODCB.clearODCB9; inline;
  57973. begin
  57974. pTDefRegMap(@Self)^.clr := $00000200;
  57975. end;
  57976. procedure TPORTB_ODCB.setODCB9(thebits : TBits_1); inline;
  57977. begin
  57978. if thebits = 0 then
  57979. pTDefRegMap(@Self)^.clr := $00000200
  57980. else
  57981. pTDefRegMap(@Self)^.&set := $00000200;
  57982. end;
  57983. function TPORTB_ODCB.getODCB9 : TBits_1; inline;
  57984. begin
  57985. getODCB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  57986. end;
  57987. procedure TPORTB_ODCB.setODCB10; inline;
  57988. begin
  57989. pTDefRegMap(@Self)^.&set := $00000400;
  57990. end;
  57991. procedure TPORTB_ODCB.clearODCB10; inline;
  57992. begin
  57993. pTDefRegMap(@Self)^.clr := $00000400;
  57994. end;
  57995. procedure TPORTB_ODCB.setODCB10(thebits : TBits_1); inline;
  57996. begin
  57997. if thebits = 0 then
  57998. pTDefRegMap(@Self)^.clr := $00000400
  57999. else
  58000. pTDefRegMap(@Self)^.&set := $00000400;
  58001. end;
  58002. function TPORTB_ODCB.getODCB10 : TBits_1; inline;
  58003. begin
  58004. getODCB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  58005. end;
  58006. procedure TPORTB_ODCB.setODCB11; inline;
  58007. begin
  58008. pTDefRegMap(@Self)^.&set := $00000800;
  58009. end;
  58010. procedure TPORTB_ODCB.clearODCB11; inline;
  58011. begin
  58012. pTDefRegMap(@Self)^.clr := $00000800;
  58013. end;
  58014. procedure TPORTB_ODCB.setODCB11(thebits : TBits_1); inline;
  58015. begin
  58016. if thebits = 0 then
  58017. pTDefRegMap(@Self)^.clr := $00000800
  58018. else
  58019. pTDefRegMap(@Self)^.&set := $00000800;
  58020. end;
  58021. function TPORTB_ODCB.getODCB11 : TBits_1; inline;
  58022. begin
  58023. getODCB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  58024. end;
  58025. procedure TPORTB_ODCB.setODCB12; inline;
  58026. begin
  58027. pTDefRegMap(@Self)^.&set := $00001000;
  58028. end;
  58029. procedure TPORTB_ODCB.clearODCB12; inline;
  58030. begin
  58031. pTDefRegMap(@Self)^.clr := $00001000;
  58032. end;
  58033. procedure TPORTB_ODCB.setODCB12(thebits : TBits_1); inline;
  58034. begin
  58035. if thebits = 0 then
  58036. pTDefRegMap(@Self)^.clr := $00001000
  58037. else
  58038. pTDefRegMap(@Self)^.&set := $00001000;
  58039. end;
  58040. function TPORTB_ODCB.getODCB12 : TBits_1; inline;
  58041. begin
  58042. getODCB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  58043. end;
  58044. procedure TPORTB_ODCB.setODCB13; inline;
  58045. begin
  58046. pTDefRegMap(@Self)^.&set := $00002000;
  58047. end;
  58048. procedure TPORTB_ODCB.clearODCB13; inline;
  58049. begin
  58050. pTDefRegMap(@Self)^.clr := $00002000;
  58051. end;
  58052. procedure TPORTB_ODCB.setODCB13(thebits : TBits_1); inline;
  58053. begin
  58054. if thebits = 0 then
  58055. pTDefRegMap(@Self)^.clr := $00002000
  58056. else
  58057. pTDefRegMap(@Self)^.&set := $00002000;
  58058. end;
  58059. function TPORTB_ODCB.getODCB13 : TBits_1; inline;
  58060. begin
  58061. getODCB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  58062. end;
  58063. procedure TPORTB_ODCB.setODCB14; inline;
  58064. begin
  58065. pTDefRegMap(@Self)^.&set := $00004000;
  58066. end;
  58067. procedure TPORTB_ODCB.clearODCB14; inline;
  58068. begin
  58069. pTDefRegMap(@Self)^.clr := $00004000;
  58070. end;
  58071. procedure TPORTB_ODCB.setODCB14(thebits : TBits_1); inline;
  58072. begin
  58073. if thebits = 0 then
  58074. pTDefRegMap(@Self)^.clr := $00004000
  58075. else
  58076. pTDefRegMap(@Self)^.&set := $00004000;
  58077. end;
  58078. function TPORTB_ODCB.getODCB14 : TBits_1; inline;
  58079. begin
  58080. getODCB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  58081. end;
  58082. procedure TPORTB_ODCB.setODCB15; inline;
  58083. begin
  58084. pTDefRegMap(@Self)^.&set := $00008000;
  58085. end;
  58086. procedure TPORTB_ODCB.clearODCB15; inline;
  58087. begin
  58088. pTDefRegMap(@Self)^.clr := $00008000;
  58089. end;
  58090. procedure TPORTB_ODCB.setODCB15(thebits : TBits_1); inline;
  58091. begin
  58092. if thebits = 0 then
  58093. pTDefRegMap(@Self)^.clr := $00008000
  58094. else
  58095. pTDefRegMap(@Self)^.&set := $00008000;
  58096. end;
  58097. function TPORTB_ODCB.getODCB15 : TBits_1; inline;
  58098. begin
  58099. getODCB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  58100. end;
  58101. procedure TPORTB_ODCB.setw(thebits : TBits_32); inline;
  58102. begin
  58103. pTDefRegMap(@Self)^.val := thebits;
  58104. end;
  58105. function TPORTB_ODCB.getw : TBits_32; inline;
  58106. begin
  58107. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58108. end;
  58109. procedure TPORTC_TRISC.setTRISC12; inline;
  58110. begin
  58111. pTDefRegMap(@Self)^.&set := $00001000;
  58112. end;
  58113. procedure TPORTC_TRISC.clearTRISC12; inline;
  58114. begin
  58115. pTDefRegMap(@Self)^.clr := $00001000;
  58116. end;
  58117. procedure TPORTC_TRISC.setTRISC12(thebits : TBits_1); inline;
  58118. begin
  58119. if thebits = 0 then
  58120. pTDefRegMap(@Self)^.clr := $00001000
  58121. else
  58122. pTDefRegMap(@Self)^.&set := $00001000;
  58123. end;
  58124. function TPORTC_TRISC.getTRISC12 : TBits_1; inline;
  58125. begin
  58126. getTRISC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  58127. end;
  58128. procedure TPORTC_TRISC.setTRISC13; inline;
  58129. begin
  58130. pTDefRegMap(@Self)^.&set := $00002000;
  58131. end;
  58132. procedure TPORTC_TRISC.clearTRISC13; inline;
  58133. begin
  58134. pTDefRegMap(@Self)^.clr := $00002000;
  58135. end;
  58136. procedure TPORTC_TRISC.setTRISC13(thebits : TBits_1); inline;
  58137. begin
  58138. if thebits = 0 then
  58139. pTDefRegMap(@Self)^.clr := $00002000
  58140. else
  58141. pTDefRegMap(@Self)^.&set := $00002000;
  58142. end;
  58143. function TPORTC_TRISC.getTRISC13 : TBits_1; inline;
  58144. begin
  58145. getTRISC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  58146. end;
  58147. procedure TPORTC_TRISC.setTRISC14; inline;
  58148. begin
  58149. pTDefRegMap(@Self)^.&set := $00004000;
  58150. end;
  58151. procedure TPORTC_TRISC.clearTRISC14; inline;
  58152. begin
  58153. pTDefRegMap(@Self)^.clr := $00004000;
  58154. end;
  58155. procedure TPORTC_TRISC.setTRISC14(thebits : TBits_1); inline;
  58156. begin
  58157. if thebits = 0 then
  58158. pTDefRegMap(@Self)^.clr := $00004000
  58159. else
  58160. pTDefRegMap(@Self)^.&set := $00004000;
  58161. end;
  58162. function TPORTC_TRISC.getTRISC14 : TBits_1; inline;
  58163. begin
  58164. getTRISC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  58165. end;
  58166. procedure TPORTC_TRISC.setTRISC15; inline;
  58167. begin
  58168. pTDefRegMap(@Self)^.&set := $00008000;
  58169. end;
  58170. procedure TPORTC_TRISC.clearTRISC15; inline;
  58171. begin
  58172. pTDefRegMap(@Self)^.clr := $00008000;
  58173. end;
  58174. procedure TPORTC_TRISC.setTRISC15(thebits : TBits_1); inline;
  58175. begin
  58176. if thebits = 0 then
  58177. pTDefRegMap(@Self)^.clr := $00008000
  58178. else
  58179. pTDefRegMap(@Self)^.&set := $00008000;
  58180. end;
  58181. function TPORTC_TRISC.getTRISC15 : TBits_1; inline;
  58182. begin
  58183. getTRISC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  58184. end;
  58185. procedure TPORTC_TRISC.setw(thebits : TBits_32); inline;
  58186. begin
  58187. pTDefRegMap(@Self)^.val := thebits;
  58188. end;
  58189. function TPORTC_TRISC.getw : TBits_32; inline;
  58190. begin
  58191. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58192. end;
  58193. procedure TPORTC_PORTC.setRC12; inline;
  58194. begin
  58195. pTDefRegMap(@Self)^.&set := $00001000;
  58196. end;
  58197. procedure TPORTC_PORTC.clearRC12; inline;
  58198. begin
  58199. pTDefRegMap(@Self)^.clr := $00001000;
  58200. end;
  58201. procedure TPORTC_PORTC.setRC12(thebits : TBits_1); inline;
  58202. begin
  58203. if thebits = 0 then
  58204. pTDefRegMap(@Self)^.clr := $00001000
  58205. else
  58206. pTDefRegMap(@Self)^.&set := $00001000;
  58207. end;
  58208. function TPORTC_PORTC.getRC12 : TBits_1; inline;
  58209. begin
  58210. getRC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  58211. end;
  58212. procedure TPORTC_PORTC.setRC13; inline;
  58213. begin
  58214. pTDefRegMap(@Self)^.&set := $00002000;
  58215. end;
  58216. procedure TPORTC_PORTC.clearRC13; inline;
  58217. begin
  58218. pTDefRegMap(@Self)^.clr := $00002000;
  58219. end;
  58220. procedure TPORTC_PORTC.setRC13(thebits : TBits_1); inline;
  58221. begin
  58222. if thebits = 0 then
  58223. pTDefRegMap(@Self)^.clr := $00002000
  58224. else
  58225. pTDefRegMap(@Self)^.&set := $00002000;
  58226. end;
  58227. function TPORTC_PORTC.getRC13 : TBits_1; inline;
  58228. begin
  58229. getRC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  58230. end;
  58231. procedure TPORTC_PORTC.setRC14; inline;
  58232. begin
  58233. pTDefRegMap(@Self)^.&set := $00004000;
  58234. end;
  58235. procedure TPORTC_PORTC.clearRC14; inline;
  58236. begin
  58237. pTDefRegMap(@Self)^.clr := $00004000;
  58238. end;
  58239. procedure TPORTC_PORTC.setRC14(thebits : TBits_1); inline;
  58240. begin
  58241. if thebits = 0 then
  58242. pTDefRegMap(@Self)^.clr := $00004000
  58243. else
  58244. pTDefRegMap(@Self)^.&set := $00004000;
  58245. end;
  58246. function TPORTC_PORTC.getRC14 : TBits_1; inline;
  58247. begin
  58248. getRC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  58249. end;
  58250. procedure TPORTC_PORTC.setRC15; inline;
  58251. begin
  58252. pTDefRegMap(@Self)^.&set := $00008000;
  58253. end;
  58254. procedure TPORTC_PORTC.clearRC15; inline;
  58255. begin
  58256. pTDefRegMap(@Self)^.clr := $00008000;
  58257. end;
  58258. procedure TPORTC_PORTC.setRC15(thebits : TBits_1); inline;
  58259. begin
  58260. if thebits = 0 then
  58261. pTDefRegMap(@Self)^.clr := $00008000
  58262. else
  58263. pTDefRegMap(@Self)^.&set := $00008000;
  58264. end;
  58265. function TPORTC_PORTC.getRC15 : TBits_1; inline;
  58266. begin
  58267. getRC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  58268. end;
  58269. procedure TPORTC_PORTC.setw(thebits : TBits_32); inline;
  58270. begin
  58271. pTDefRegMap(@Self)^.val := thebits;
  58272. end;
  58273. function TPORTC_PORTC.getw : TBits_32; inline;
  58274. begin
  58275. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58276. end;
  58277. procedure TPORTC_LATC.setLATC12; inline;
  58278. begin
  58279. pTDefRegMap(@Self)^.&set := $00001000;
  58280. end;
  58281. procedure TPORTC_LATC.clearLATC12; inline;
  58282. begin
  58283. pTDefRegMap(@Self)^.clr := $00001000;
  58284. end;
  58285. procedure TPORTC_LATC.setLATC12(thebits : TBits_1); inline;
  58286. begin
  58287. if thebits = 0 then
  58288. pTDefRegMap(@Self)^.clr := $00001000
  58289. else
  58290. pTDefRegMap(@Self)^.&set := $00001000;
  58291. end;
  58292. function TPORTC_LATC.getLATC12 : TBits_1; inline;
  58293. begin
  58294. getLATC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  58295. end;
  58296. procedure TPORTC_LATC.setLATC13; inline;
  58297. begin
  58298. pTDefRegMap(@Self)^.&set := $00002000;
  58299. end;
  58300. procedure TPORTC_LATC.clearLATC13; inline;
  58301. begin
  58302. pTDefRegMap(@Self)^.clr := $00002000;
  58303. end;
  58304. procedure TPORTC_LATC.setLATC13(thebits : TBits_1); inline;
  58305. begin
  58306. if thebits = 0 then
  58307. pTDefRegMap(@Self)^.clr := $00002000
  58308. else
  58309. pTDefRegMap(@Self)^.&set := $00002000;
  58310. end;
  58311. function TPORTC_LATC.getLATC13 : TBits_1; inline;
  58312. begin
  58313. getLATC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  58314. end;
  58315. procedure TPORTC_LATC.setLATC14; inline;
  58316. begin
  58317. pTDefRegMap(@Self)^.&set := $00004000;
  58318. end;
  58319. procedure TPORTC_LATC.clearLATC14; inline;
  58320. begin
  58321. pTDefRegMap(@Self)^.clr := $00004000;
  58322. end;
  58323. procedure TPORTC_LATC.setLATC14(thebits : TBits_1); inline;
  58324. begin
  58325. if thebits = 0 then
  58326. pTDefRegMap(@Self)^.clr := $00004000
  58327. else
  58328. pTDefRegMap(@Self)^.&set := $00004000;
  58329. end;
  58330. function TPORTC_LATC.getLATC14 : TBits_1; inline;
  58331. begin
  58332. getLATC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  58333. end;
  58334. procedure TPORTC_LATC.setLATC15; inline;
  58335. begin
  58336. pTDefRegMap(@Self)^.&set := $00008000;
  58337. end;
  58338. procedure TPORTC_LATC.clearLATC15; inline;
  58339. begin
  58340. pTDefRegMap(@Self)^.clr := $00008000;
  58341. end;
  58342. procedure TPORTC_LATC.setLATC15(thebits : TBits_1); inline;
  58343. begin
  58344. if thebits = 0 then
  58345. pTDefRegMap(@Self)^.clr := $00008000
  58346. else
  58347. pTDefRegMap(@Self)^.&set := $00008000;
  58348. end;
  58349. function TPORTC_LATC.getLATC15 : TBits_1; inline;
  58350. begin
  58351. getLATC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  58352. end;
  58353. procedure TPORTC_LATC.setw(thebits : TBits_32); inline;
  58354. begin
  58355. pTDefRegMap(@Self)^.val := thebits;
  58356. end;
  58357. function TPORTC_LATC.getw : TBits_32; inline;
  58358. begin
  58359. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58360. end;
  58361. procedure TPORTC_ODCC.setODCC12; inline;
  58362. begin
  58363. pTDefRegMap(@Self)^.&set := $00001000;
  58364. end;
  58365. procedure TPORTC_ODCC.clearODCC12; inline;
  58366. begin
  58367. pTDefRegMap(@Self)^.clr := $00001000;
  58368. end;
  58369. procedure TPORTC_ODCC.setODCC12(thebits : TBits_1); inline;
  58370. begin
  58371. if thebits = 0 then
  58372. pTDefRegMap(@Self)^.clr := $00001000
  58373. else
  58374. pTDefRegMap(@Self)^.&set := $00001000;
  58375. end;
  58376. function TPORTC_ODCC.getODCC12 : TBits_1; inline;
  58377. begin
  58378. getODCC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  58379. end;
  58380. procedure TPORTC_ODCC.setODCC13; inline;
  58381. begin
  58382. pTDefRegMap(@Self)^.&set := $00002000;
  58383. end;
  58384. procedure TPORTC_ODCC.clearODCC13; inline;
  58385. begin
  58386. pTDefRegMap(@Self)^.clr := $00002000;
  58387. end;
  58388. procedure TPORTC_ODCC.setODCC13(thebits : TBits_1); inline;
  58389. begin
  58390. if thebits = 0 then
  58391. pTDefRegMap(@Self)^.clr := $00002000
  58392. else
  58393. pTDefRegMap(@Self)^.&set := $00002000;
  58394. end;
  58395. function TPORTC_ODCC.getODCC13 : TBits_1; inline;
  58396. begin
  58397. getODCC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  58398. end;
  58399. procedure TPORTC_ODCC.setODCC14; inline;
  58400. begin
  58401. pTDefRegMap(@Self)^.&set := $00004000;
  58402. end;
  58403. procedure TPORTC_ODCC.clearODCC14; inline;
  58404. begin
  58405. pTDefRegMap(@Self)^.clr := $00004000;
  58406. end;
  58407. procedure TPORTC_ODCC.setODCC14(thebits : TBits_1); inline;
  58408. begin
  58409. if thebits = 0 then
  58410. pTDefRegMap(@Self)^.clr := $00004000
  58411. else
  58412. pTDefRegMap(@Self)^.&set := $00004000;
  58413. end;
  58414. function TPORTC_ODCC.getODCC14 : TBits_1; inline;
  58415. begin
  58416. getODCC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  58417. end;
  58418. procedure TPORTC_ODCC.setODCC15; inline;
  58419. begin
  58420. pTDefRegMap(@Self)^.&set := $00008000;
  58421. end;
  58422. procedure TPORTC_ODCC.clearODCC15; inline;
  58423. begin
  58424. pTDefRegMap(@Self)^.clr := $00008000;
  58425. end;
  58426. procedure TPORTC_ODCC.setODCC15(thebits : TBits_1); inline;
  58427. begin
  58428. if thebits = 0 then
  58429. pTDefRegMap(@Self)^.clr := $00008000
  58430. else
  58431. pTDefRegMap(@Self)^.&set := $00008000;
  58432. end;
  58433. function TPORTC_ODCC.getODCC15 : TBits_1; inline;
  58434. begin
  58435. getODCC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  58436. end;
  58437. procedure TPORTC_ODCC.setw(thebits : TBits_32); inline;
  58438. begin
  58439. pTDefRegMap(@Self)^.val := thebits;
  58440. end;
  58441. function TPORTC_ODCC.getw : TBits_32; inline;
  58442. begin
  58443. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58444. end;
  58445. procedure TPORTD_TRISD.setTRISD0; inline;
  58446. begin
  58447. pTDefRegMap(@Self)^.&set := $00000001;
  58448. end;
  58449. procedure TPORTD_TRISD.clearTRISD0; inline;
  58450. begin
  58451. pTDefRegMap(@Self)^.clr := $00000001;
  58452. end;
  58453. procedure TPORTD_TRISD.setTRISD0(thebits : TBits_1); inline;
  58454. begin
  58455. if thebits = 0 then
  58456. pTDefRegMap(@Self)^.clr := $00000001
  58457. else
  58458. pTDefRegMap(@Self)^.&set := $00000001;
  58459. end;
  58460. function TPORTD_TRISD.getTRISD0 : TBits_1; inline;
  58461. begin
  58462. getTRISD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58463. end;
  58464. procedure TPORTD_TRISD.setTRISD1; inline;
  58465. begin
  58466. pTDefRegMap(@Self)^.&set := $00000002;
  58467. end;
  58468. procedure TPORTD_TRISD.clearTRISD1; inline;
  58469. begin
  58470. pTDefRegMap(@Self)^.clr := $00000002;
  58471. end;
  58472. procedure TPORTD_TRISD.setTRISD1(thebits : TBits_1); inline;
  58473. begin
  58474. if thebits = 0 then
  58475. pTDefRegMap(@Self)^.clr := $00000002
  58476. else
  58477. pTDefRegMap(@Self)^.&set := $00000002;
  58478. end;
  58479. function TPORTD_TRISD.getTRISD1 : TBits_1; inline;
  58480. begin
  58481. getTRISD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58482. end;
  58483. procedure TPORTD_TRISD.setTRISD2; inline;
  58484. begin
  58485. pTDefRegMap(@Self)^.&set := $00000004;
  58486. end;
  58487. procedure TPORTD_TRISD.clearTRISD2; inline;
  58488. begin
  58489. pTDefRegMap(@Self)^.clr := $00000004;
  58490. end;
  58491. procedure TPORTD_TRISD.setTRISD2(thebits : TBits_1); inline;
  58492. begin
  58493. if thebits = 0 then
  58494. pTDefRegMap(@Self)^.clr := $00000004
  58495. else
  58496. pTDefRegMap(@Self)^.&set := $00000004;
  58497. end;
  58498. function TPORTD_TRISD.getTRISD2 : TBits_1; inline;
  58499. begin
  58500. getTRISD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58501. end;
  58502. procedure TPORTD_TRISD.setTRISD3; inline;
  58503. begin
  58504. pTDefRegMap(@Self)^.&set := $00000008;
  58505. end;
  58506. procedure TPORTD_TRISD.clearTRISD3; inline;
  58507. begin
  58508. pTDefRegMap(@Self)^.clr := $00000008;
  58509. end;
  58510. procedure TPORTD_TRISD.setTRISD3(thebits : TBits_1); inline;
  58511. begin
  58512. if thebits = 0 then
  58513. pTDefRegMap(@Self)^.clr := $00000008
  58514. else
  58515. pTDefRegMap(@Self)^.&set := $00000008;
  58516. end;
  58517. function TPORTD_TRISD.getTRISD3 : TBits_1; inline;
  58518. begin
  58519. getTRISD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58520. end;
  58521. procedure TPORTD_TRISD.setTRISD4; inline;
  58522. begin
  58523. pTDefRegMap(@Self)^.&set := $00000010;
  58524. end;
  58525. procedure TPORTD_TRISD.clearTRISD4; inline;
  58526. begin
  58527. pTDefRegMap(@Self)^.clr := $00000010;
  58528. end;
  58529. procedure TPORTD_TRISD.setTRISD4(thebits : TBits_1); inline;
  58530. begin
  58531. if thebits = 0 then
  58532. pTDefRegMap(@Self)^.clr := $00000010
  58533. else
  58534. pTDefRegMap(@Self)^.&set := $00000010;
  58535. end;
  58536. function TPORTD_TRISD.getTRISD4 : TBits_1; inline;
  58537. begin
  58538. getTRISD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58539. end;
  58540. procedure TPORTD_TRISD.setTRISD5; inline;
  58541. begin
  58542. pTDefRegMap(@Self)^.&set := $00000020;
  58543. end;
  58544. procedure TPORTD_TRISD.clearTRISD5; inline;
  58545. begin
  58546. pTDefRegMap(@Self)^.clr := $00000020;
  58547. end;
  58548. procedure TPORTD_TRISD.setTRISD5(thebits : TBits_1); inline;
  58549. begin
  58550. if thebits = 0 then
  58551. pTDefRegMap(@Self)^.clr := $00000020
  58552. else
  58553. pTDefRegMap(@Self)^.&set := $00000020;
  58554. end;
  58555. function TPORTD_TRISD.getTRISD5 : TBits_1; inline;
  58556. begin
  58557. getTRISD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58558. end;
  58559. procedure TPORTD_TRISD.setTRISD6; inline;
  58560. begin
  58561. pTDefRegMap(@Self)^.&set := $00000040;
  58562. end;
  58563. procedure TPORTD_TRISD.clearTRISD6; inline;
  58564. begin
  58565. pTDefRegMap(@Self)^.clr := $00000040;
  58566. end;
  58567. procedure TPORTD_TRISD.setTRISD6(thebits : TBits_1); inline;
  58568. begin
  58569. if thebits = 0 then
  58570. pTDefRegMap(@Self)^.clr := $00000040
  58571. else
  58572. pTDefRegMap(@Self)^.&set := $00000040;
  58573. end;
  58574. function TPORTD_TRISD.getTRISD6 : TBits_1; inline;
  58575. begin
  58576. getTRISD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58577. end;
  58578. procedure TPORTD_TRISD.setTRISD7; inline;
  58579. begin
  58580. pTDefRegMap(@Self)^.&set := $00000080;
  58581. end;
  58582. procedure TPORTD_TRISD.clearTRISD7; inline;
  58583. begin
  58584. pTDefRegMap(@Self)^.clr := $00000080;
  58585. end;
  58586. procedure TPORTD_TRISD.setTRISD7(thebits : TBits_1); inline;
  58587. begin
  58588. if thebits = 0 then
  58589. pTDefRegMap(@Self)^.clr := $00000080
  58590. else
  58591. pTDefRegMap(@Self)^.&set := $00000080;
  58592. end;
  58593. function TPORTD_TRISD.getTRISD7 : TBits_1; inline;
  58594. begin
  58595. getTRISD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58596. end;
  58597. procedure TPORTD_TRISD.setTRISD8; inline;
  58598. begin
  58599. pTDefRegMap(@Self)^.&set := $00000100;
  58600. end;
  58601. procedure TPORTD_TRISD.clearTRISD8; inline;
  58602. begin
  58603. pTDefRegMap(@Self)^.clr := $00000100;
  58604. end;
  58605. procedure TPORTD_TRISD.setTRISD8(thebits : TBits_1); inline;
  58606. begin
  58607. if thebits = 0 then
  58608. pTDefRegMap(@Self)^.clr := $00000100
  58609. else
  58610. pTDefRegMap(@Self)^.&set := $00000100;
  58611. end;
  58612. function TPORTD_TRISD.getTRISD8 : TBits_1; inline;
  58613. begin
  58614. getTRISD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  58615. end;
  58616. procedure TPORTD_TRISD.setTRISD9; inline;
  58617. begin
  58618. pTDefRegMap(@Self)^.&set := $00000200;
  58619. end;
  58620. procedure TPORTD_TRISD.clearTRISD9; inline;
  58621. begin
  58622. pTDefRegMap(@Self)^.clr := $00000200;
  58623. end;
  58624. procedure TPORTD_TRISD.setTRISD9(thebits : TBits_1); inline;
  58625. begin
  58626. if thebits = 0 then
  58627. pTDefRegMap(@Self)^.clr := $00000200
  58628. else
  58629. pTDefRegMap(@Self)^.&set := $00000200;
  58630. end;
  58631. function TPORTD_TRISD.getTRISD9 : TBits_1; inline;
  58632. begin
  58633. getTRISD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  58634. end;
  58635. procedure TPORTD_TRISD.setTRISD10; inline;
  58636. begin
  58637. pTDefRegMap(@Self)^.&set := $00000400;
  58638. end;
  58639. procedure TPORTD_TRISD.clearTRISD10; inline;
  58640. begin
  58641. pTDefRegMap(@Self)^.clr := $00000400;
  58642. end;
  58643. procedure TPORTD_TRISD.setTRISD10(thebits : TBits_1); inline;
  58644. begin
  58645. if thebits = 0 then
  58646. pTDefRegMap(@Self)^.clr := $00000400
  58647. else
  58648. pTDefRegMap(@Self)^.&set := $00000400;
  58649. end;
  58650. function TPORTD_TRISD.getTRISD10 : TBits_1; inline;
  58651. begin
  58652. getTRISD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  58653. end;
  58654. procedure TPORTD_TRISD.setTRISD11; inline;
  58655. begin
  58656. pTDefRegMap(@Self)^.&set := $00000800;
  58657. end;
  58658. procedure TPORTD_TRISD.clearTRISD11; inline;
  58659. begin
  58660. pTDefRegMap(@Self)^.clr := $00000800;
  58661. end;
  58662. procedure TPORTD_TRISD.setTRISD11(thebits : TBits_1); inline;
  58663. begin
  58664. if thebits = 0 then
  58665. pTDefRegMap(@Self)^.clr := $00000800
  58666. else
  58667. pTDefRegMap(@Self)^.&set := $00000800;
  58668. end;
  58669. function TPORTD_TRISD.getTRISD11 : TBits_1; inline;
  58670. begin
  58671. getTRISD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  58672. end;
  58673. procedure TPORTD_TRISD.setw(thebits : TBits_32); inline;
  58674. begin
  58675. pTDefRegMap(@Self)^.val := thebits;
  58676. end;
  58677. function TPORTD_TRISD.getw : TBits_32; inline;
  58678. begin
  58679. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58680. end;
  58681. procedure TPORTD_PORTD.setRD0; inline;
  58682. begin
  58683. pTDefRegMap(@Self)^.&set := $00000001;
  58684. end;
  58685. procedure TPORTD_PORTD.clearRD0; inline;
  58686. begin
  58687. pTDefRegMap(@Self)^.clr := $00000001;
  58688. end;
  58689. procedure TPORTD_PORTD.setRD0(thebits : TBits_1); inline;
  58690. begin
  58691. if thebits = 0 then
  58692. pTDefRegMap(@Self)^.clr := $00000001
  58693. else
  58694. pTDefRegMap(@Self)^.&set := $00000001;
  58695. end;
  58696. function TPORTD_PORTD.getRD0 : TBits_1; inline;
  58697. begin
  58698. getRD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58699. end;
  58700. procedure TPORTD_PORTD.setRD1; inline;
  58701. begin
  58702. pTDefRegMap(@Self)^.&set := $00000002;
  58703. end;
  58704. procedure TPORTD_PORTD.clearRD1; inline;
  58705. begin
  58706. pTDefRegMap(@Self)^.clr := $00000002;
  58707. end;
  58708. procedure TPORTD_PORTD.setRD1(thebits : TBits_1); inline;
  58709. begin
  58710. if thebits = 0 then
  58711. pTDefRegMap(@Self)^.clr := $00000002
  58712. else
  58713. pTDefRegMap(@Self)^.&set := $00000002;
  58714. end;
  58715. function TPORTD_PORTD.getRD1 : TBits_1; inline;
  58716. begin
  58717. getRD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58718. end;
  58719. procedure TPORTD_PORTD.setRD2; inline;
  58720. begin
  58721. pTDefRegMap(@Self)^.&set := $00000004;
  58722. end;
  58723. procedure TPORTD_PORTD.clearRD2; inline;
  58724. begin
  58725. pTDefRegMap(@Self)^.clr := $00000004;
  58726. end;
  58727. procedure TPORTD_PORTD.setRD2(thebits : TBits_1); inline;
  58728. begin
  58729. if thebits = 0 then
  58730. pTDefRegMap(@Self)^.clr := $00000004
  58731. else
  58732. pTDefRegMap(@Self)^.&set := $00000004;
  58733. end;
  58734. function TPORTD_PORTD.getRD2 : TBits_1; inline;
  58735. begin
  58736. getRD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58737. end;
  58738. procedure TPORTD_PORTD.setRD3; inline;
  58739. begin
  58740. pTDefRegMap(@Self)^.&set := $00000008;
  58741. end;
  58742. procedure TPORTD_PORTD.clearRD3; inline;
  58743. begin
  58744. pTDefRegMap(@Self)^.clr := $00000008;
  58745. end;
  58746. procedure TPORTD_PORTD.setRD3(thebits : TBits_1); inline;
  58747. begin
  58748. if thebits = 0 then
  58749. pTDefRegMap(@Self)^.clr := $00000008
  58750. else
  58751. pTDefRegMap(@Self)^.&set := $00000008;
  58752. end;
  58753. function TPORTD_PORTD.getRD3 : TBits_1; inline;
  58754. begin
  58755. getRD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58756. end;
  58757. procedure TPORTD_PORTD.setRD4; inline;
  58758. begin
  58759. pTDefRegMap(@Self)^.&set := $00000010;
  58760. end;
  58761. procedure TPORTD_PORTD.clearRD4; inline;
  58762. begin
  58763. pTDefRegMap(@Self)^.clr := $00000010;
  58764. end;
  58765. procedure TPORTD_PORTD.setRD4(thebits : TBits_1); inline;
  58766. begin
  58767. if thebits = 0 then
  58768. pTDefRegMap(@Self)^.clr := $00000010
  58769. else
  58770. pTDefRegMap(@Self)^.&set := $00000010;
  58771. end;
  58772. function TPORTD_PORTD.getRD4 : TBits_1; inline;
  58773. begin
  58774. getRD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58775. end;
  58776. procedure TPORTD_PORTD.setRD5; inline;
  58777. begin
  58778. pTDefRegMap(@Self)^.&set := $00000020;
  58779. end;
  58780. procedure TPORTD_PORTD.clearRD5; inline;
  58781. begin
  58782. pTDefRegMap(@Self)^.clr := $00000020;
  58783. end;
  58784. procedure TPORTD_PORTD.setRD5(thebits : TBits_1); inline;
  58785. begin
  58786. if thebits = 0 then
  58787. pTDefRegMap(@Self)^.clr := $00000020
  58788. else
  58789. pTDefRegMap(@Self)^.&set := $00000020;
  58790. end;
  58791. function TPORTD_PORTD.getRD5 : TBits_1; inline;
  58792. begin
  58793. getRD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58794. end;
  58795. procedure TPORTD_PORTD.setRD6; inline;
  58796. begin
  58797. pTDefRegMap(@Self)^.&set := $00000040;
  58798. end;
  58799. procedure TPORTD_PORTD.clearRD6; inline;
  58800. begin
  58801. pTDefRegMap(@Self)^.clr := $00000040;
  58802. end;
  58803. procedure TPORTD_PORTD.setRD6(thebits : TBits_1); inline;
  58804. begin
  58805. if thebits = 0 then
  58806. pTDefRegMap(@Self)^.clr := $00000040
  58807. else
  58808. pTDefRegMap(@Self)^.&set := $00000040;
  58809. end;
  58810. function TPORTD_PORTD.getRD6 : TBits_1; inline;
  58811. begin
  58812. getRD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58813. end;
  58814. procedure TPORTD_PORTD.setRD7; inline;
  58815. begin
  58816. pTDefRegMap(@Self)^.&set := $00000080;
  58817. end;
  58818. procedure TPORTD_PORTD.clearRD7; inline;
  58819. begin
  58820. pTDefRegMap(@Self)^.clr := $00000080;
  58821. end;
  58822. procedure TPORTD_PORTD.setRD7(thebits : TBits_1); inline;
  58823. begin
  58824. if thebits = 0 then
  58825. pTDefRegMap(@Self)^.clr := $00000080
  58826. else
  58827. pTDefRegMap(@Self)^.&set := $00000080;
  58828. end;
  58829. function TPORTD_PORTD.getRD7 : TBits_1; inline;
  58830. begin
  58831. getRD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58832. end;
  58833. procedure TPORTD_PORTD.setRD8; inline;
  58834. begin
  58835. pTDefRegMap(@Self)^.&set := $00000100;
  58836. end;
  58837. procedure TPORTD_PORTD.clearRD8; inline;
  58838. begin
  58839. pTDefRegMap(@Self)^.clr := $00000100;
  58840. end;
  58841. procedure TPORTD_PORTD.setRD8(thebits : TBits_1); inline;
  58842. begin
  58843. if thebits = 0 then
  58844. pTDefRegMap(@Self)^.clr := $00000100
  58845. else
  58846. pTDefRegMap(@Self)^.&set := $00000100;
  58847. end;
  58848. function TPORTD_PORTD.getRD8 : TBits_1; inline;
  58849. begin
  58850. getRD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  58851. end;
  58852. procedure TPORTD_PORTD.setRD9; inline;
  58853. begin
  58854. pTDefRegMap(@Self)^.&set := $00000200;
  58855. end;
  58856. procedure TPORTD_PORTD.clearRD9; inline;
  58857. begin
  58858. pTDefRegMap(@Self)^.clr := $00000200;
  58859. end;
  58860. procedure TPORTD_PORTD.setRD9(thebits : TBits_1); inline;
  58861. begin
  58862. if thebits = 0 then
  58863. pTDefRegMap(@Self)^.clr := $00000200
  58864. else
  58865. pTDefRegMap(@Self)^.&set := $00000200;
  58866. end;
  58867. function TPORTD_PORTD.getRD9 : TBits_1; inline;
  58868. begin
  58869. getRD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  58870. end;
  58871. procedure TPORTD_PORTD.setRD10; inline;
  58872. begin
  58873. pTDefRegMap(@Self)^.&set := $00000400;
  58874. end;
  58875. procedure TPORTD_PORTD.clearRD10; inline;
  58876. begin
  58877. pTDefRegMap(@Self)^.clr := $00000400;
  58878. end;
  58879. procedure TPORTD_PORTD.setRD10(thebits : TBits_1); inline;
  58880. begin
  58881. if thebits = 0 then
  58882. pTDefRegMap(@Self)^.clr := $00000400
  58883. else
  58884. pTDefRegMap(@Self)^.&set := $00000400;
  58885. end;
  58886. function TPORTD_PORTD.getRD10 : TBits_1; inline;
  58887. begin
  58888. getRD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  58889. end;
  58890. procedure TPORTD_PORTD.setRD11; inline;
  58891. begin
  58892. pTDefRegMap(@Self)^.&set := $00000800;
  58893. end;
  58894. procedure TPORTD_PORTD.clearRD11; inline;
  58895. begin
  58896. pTDefRegMap(@Self)^.clr := $00000800;
  58897. end;
  58898. procedure TPORTD_PORTD.setRD11(thebits : TBits_1); inline;
  58899. begin
  58900. if thebits = 0 then
  58901. pTDefRegMap(@Self)^.clr := $00000800
  58902. else
  58903. pTDefRegMap(@Self)^.&set := $00000800;
  58904. end;
  58905. function TPORTD_PORTD.getRD11 : TBits_1; inline;
  58906. begin
  58907. getRD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  58908. end;
  58909. procedure TPORTD_PORTD.setw(thebits : TBits_32); inline;
  58910. begin
  58911. pTDefRegMap(@Self)^.val := thebits;
  58912. end;
  58913. function TPORTD_PORTD.getw : TBits_32; inline;
  58914. begin
  58915. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58916. end;
  58917. procedure TPORTD_LATD.setLATD0; inline;
  58918. begin
  58919. pTDefRegMap(@Self)^.&set := $00000001;
  58920. end;
  58921. procedure TPORTD_LATD.clearLATD0; inline;
  58922. begin
  58923. pTDefRegMap(@Self)^.clr := $00000001;
  58924. end;
  58925. procedure TPORTD_LATD.setLATD0(thebits : TBits_1); inline;
  58926. begin
  58927. if thebits = 0 then
  58928. pTDefRegMap(@Self)^.clr := $00000001
  58929. else
  58930. pTDefRegMap(@Self)^.&set := $00000001;
  58931. end;
  58932. function TPORTD_LATD.getLATD0 : TBits_1; inline;
  58933. begin
  58934. getLATD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58935. end;
  58936. procedure TPORTD_LATD.setLATD1; inline;
  58937. begin
  58938. pTDefRegMap(@Self)^.&set := $00000002;
  58939. end;
  58940. procedure TPORTD_LATD.clearLATD1; inline;
  58941. begin
  58942. pTDefRegMap(@Self)^.clr := $00000002;
  58943. end;
  58944. procedure TPORTD_LATD.setLATD1(thebits : TBits_1); inline;
  58945. begin
  58946. if thebits = 0 then
  58947. pTDefRegMap(@Self)^.clr := $00000002
  58948. else
  58949. pTDefRegMap(@Self)^.&set := $00000002;
  58950. end;
  58951. function TPORTD_LATD.getLATD1 : TBits_1; inline;
  58952. begin
  58953. getLATD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58954. end;
  58955. procedure TPORTD_LATD.setLATD2; inline;
  58956. begin
  58957. pTDefRegMap(@Self)^.&set := $00000004;
  58958. end;
  58959. procedure TPORTD_LATD.clearLATD2; inline;
  58960. begin
  58961. pTDefRegMap(@Self)^.clr := $00000004;
  58962. end;
  58963. procedure TPORTD_LATD.setLATD2(thebits : TBits_1); inline;
  58964. begin
  58965. if thebits = 0 then
  58966. pTDefRegMap(@Self)^.clr := $00000004
  58967. else
  58968. pTDefRegMap(@Self)^.&set := $00000004;
  58969. end;
  58970. function TPORTD_LATD.getLATD2 : TBits_1; inline;
  58971. begin
  58972. getLATD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58973. end;
  58974. procedure TPORTD_LATD.setLATD3; inline;
  58975. begin
  58976. pTDefRegMap(@Self)^.&set := $00000008;
  58977. end;
  58978. procedure TPORTD_LATD.clearLATD3; inline;
  58979. begin
  58980. pTDefRegMap(@Self)^.clr := $00000008;
  58981. end;
  58982. procedure TPORTD_LATD.setLATD3(thebits : TBits_1); inline;
  58983. begin
  58984. if thebits = 0 then
  58985. pTDefRegMap(@Self)^.clr := $00000008
  58986. else
  58987. pTDefRegMap(@Self)^.&set := $00000008;
  58988. end;
  58989. function TPORTD_LATD.getLATD3 : TBits_1; inline;
  58990. begin
  58991. getLATD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58992. end;
  58993. procedure TPORTD_LATD.setLATD4; inline;
  58994. begin
  58995. pTDefRegMap(@Self)^.&set := $00000010;
  58996. end;
  58997. procedure TPORTD_LATD.clearLATD4; inline;
  58998. begin
  58999. pTDefRegMap(@Self)^.clr := $00000010;
  59000. end;
  59001. procedure TPORTD_LATD.setLATD4(thebits : TBits_1); inline;
  59002. begin
  59003. if thebits = 0 then
  59004. pTDefRegMap(@Self)^.clr := $00000010
  59005. else
  59006. pTDefRegMap(@Self)^.&set := $00000010;
  59007. end;
  59008. function TPORTD_LATD.getLATD4 : TBits_1; inline;
  59009. begin
  59010. getLATD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59011. end;
  59012. procedure TPORTD_LATD.setLATD5; inline;
  59013. begin
  59014. pTDefRegMap(@Self)^.&set := $00000020;
  59015. end;
  59016. procedure TPORTD_LATD.clearLATD5; inline;
  59017. begin
  59018. pTDefRegMap(@Self)^.clr := $00000020;
  59019. end;
  59020. procedure TPORTD_LATD.setLATD5(thebits : TBits_1); inline;
  59021. begin
  59022. if thebits = 0 then
  59023. pTDefRegMap(@Self)^.clr := $00000020
  59024. else
  59025. pTDefRegMap(@Self)^.&set := $00000020;
  59026. end;
  59027. function TPORTD_LATD.getLATD5 : TBits_1; inline;
  59028. begin
  59029. getLATD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59030. end;
  59031. procedure TPORTD_LATD.setLATD6; inline;
  59032. begin
  59033. pTDefRegMap(@Self)^.&set := $00000040;
  59034. end;
  59035. procedure TPORTD_LATD.clearLATD6; inline;
  59036. begin
  59037. pTDefRegMap(@Self)^.clr := $00000040;
  59038. end;
  59039. procedure TPORTD_LATD.setLATD6(thebits : TBits_1); inline;
  59040. begin
  59041. if thebits = 0 then
  59042. pTDefRegMap(@Self)^.clr := $00000040
  59043. else
  59044. pTDefRegMap(@Self)^.&set := $00000040;
  59045. end;
  59046. function TPORTD_LATD.getLATD6 : TBits_1; inline;
  59047. begin
  59048. getLATD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59049. end;
  59050. procedure TPORTD_LATD.setLATD7; inline;
  59051. begin
  59052. pTDefRegMap(@Self)^.&set := $00000080;
  59053. end;
  59054. procedure TPORTD_LATD.clearLATD7; inline;
  59055. begin
  59056. pTDefRegMap(@Self)^.clr := $00000080;
  59057. end;
  59058. procedure TPORTD_LATD.setLATD7(thebits : TBits_1); inline;
  59059. begin
  59060. if thebits = 0 then
  59061. pTDefRegMap(@Self)^.clr := $00000080
  59062. else
  59063. pTDefRegMap(@Self)^.&set := $00000080;
  59064. end;
  59065. function TPORTD_LATD.getLATD7 : TBits_1; inline;
  59066. begin
  59067. getLATD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59068. end;
  59069. procedure TPORTD_LATD.setLATD8; inline;
  59070. begin
  59071. pTDefRegMap(@Self)^.&set := $00000100;
  59072. end;
  59073. procedure TPORTD_LATD.clearLATD8; inline;
  59074. begin
  59075. pTDefRegMap(@Self)^.clr := $00000100;
  59076. end;
  59077. procedure TPORTD_LATD.setLATD8(thebits : TBits_1); inline;
  59078. begin
  59079. if thebits = 0 then
  59080. pTDefRegMap(@Self)^.clr := $00000100
  59081. else
  59082. pTDefRegMap(@Self)^.&set := $00000100;
  59083. end;
  59084. function TPORTD_LATD.getLATD8 : TBits_1; inline;
  59085. begin
  59086. getLATD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59087. end;
  59088. procedure TPORTD_LATD.setLATD9; inline;
  59089. begin
  59090. pTDefRegMap(@Self)^.&set := $00000200;
  59091. end;
  59092. procedure TPORTD_LATD.clearLATD9; inline;
  59093. begin
  59094. pTDefRegMap(@Self)^.clr := $00000200;
  59095. end;
  59096. procedure TPORTD_LATD.setLATD9(thebits : TBits_1); inline;
  59097. begin
  59098. if thebits = 0 then
  59099. pTDefRegMap(@Self)^.clr := $00000200
  59100. else
  59101. pTDefRegMap(@Self)^.&set := $00000200;
  59102. end;
  59103. function TPORTD_LATD.getLATD9 : TBits_1; inline;
  59104. begin
  59105. getLATD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59106. end;
  59107. procedure TPORTD_LATD.setLATD10; inline;
  59108. begin
  59109. pTDefRegMap(@Self)^.&set := $00000400;
  59110. end;
  59111. procedure TPORTD_LATD.clearLATD10; inline;
  59112. begin
  59113. pTDefRegMap(@Self)^.clr := $00000400;
  59114. end;
  59115. procedure TPORTD_LATD.setLATD10(thebits : TBits_1); inline;
  59116. begin
  59117. if thebits = 0 then
  59118. pTDefRegMap(@Self)^.clr := $00000400
  59119. else
  59120. pTDefRegMap(@Self)^.&set := $00000400;
  59121. end;
  59122. function TPORTD_LATD.getLATD10 : TBits_1; inline;
  59123. begin
  59124. getLATD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59125. end;
  59126. procedure TPORTD_LATD.setLATD11; inline;
  59127. begin
  59128. pTDefRegMap(@Self)^.&set := $00000800;
  59129. end;
  59130. procedure TPORTD_LATD.clearLATD11; inline;
  59131. begin
  59132. pTDefRegMap(@Self)^.clr := $00000800;
  59133. end;
  59134. procedure TPORTD_LATD.setLATD11(thebits : TBits_1); inline;
  59135. begin
  59136. if thebits = 0 then
  59137. pTDefRegMap(@Self)^.clr := $00000800
  59138. else
  59139. pTDefRegMap(@Self)^.&set := $00000800;
  59140. end;
  59141. function TPORTD_LATD.getLATD11 : TBits_1; inline;
  59142. begin
  59143. getLATD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  59144. end;
  59145. procedure TPORTD_LATD.setw(thebits : TBits_32); inline;
  59146. begin
  59147. pTDefRegMap(@Self)^.val := thebits;
  59148. end;
  59149. function TPORTD_LATD.getw : TBits_32; inline;
  59150. begin
  59151. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59152. end;
  59153. procedure TPORTD_ODCD.setODCD0; inline;
  59154. begin
  59155. pTDefRegMap(@Self)^.&set := $00000001;
  59156. end;
  59157. procedure TPORTD_ODCD.clearODCD0; inline;
  59158. begin
  59159. pTDefRegMap(@Self)^.clr := $00000001;
  59160. end;
  59161. procedure TPORTD_ODCD.setODCD0(thebits : TBits_1); inline;
  59162. begin
  59163. if thebits = 0 then
  59164. pTDefRegMap(@Self)^.clr := $00000001
  59165. else
  59166. pTDefRegMap(@Self)^.&set := $00000001;
  59167. end;
  59168. function TPORTD_ODCD.getODCD0 : TBits_1; inline;
  59169. begin
  59170. getODCD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59171. end;
  59172. procedure TPORTD_ODCD.setODCD1; inline;
  59173. begin
  59174. pTDefRegMap(@Self)^.&set := $00000002;
  59175. end;
  59176. procedure TPORTD_ODCD.clearODCD1; inline;
  59177. begin
  59178. pTDefRegMap(@Self)^.clr := $00000002;
  59179. end;
  59180. procedure TPORTD_ODCD.setODCD1(thebits : TBits_1); inline;
  59181. begin
  59182. if thebits = 0 then
  59183. pTDefRegMap(@Self)^.clr := $00000002
  59184. else
  59185. pTDefRegMap(@Self)^.&set := $00000002;
  59186. end;
  59187. function TPORTD_ODCD.getODCD1 : TBits_1; inline;
  59188. begin
  59189. getODCD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59190. end;
  59191. procedure TPORTD_ODCD.setODCD2; inline;
  59192. begin
  59193. pTDefRegMap(@Self)^.&set := $00000004;
  59194. end;
  59195. procedure TPORTD_ODCD.clearODCD2; inline;
  59196. begin
  59197. pTDefRegMap(@Self)^.clr := $00000004;
  59198. end;
  59199. procedure TPORTD_ODCD.setODCD2(thebits : TBits_1); inline;
  59200. begin
  59201. if thebits = 0 then
  59202. pTDefRegMap(@Self)^.clr := $00000004
  59203. else
  59204. pTDefRegMap(@Self)^.&set := $00000004;
  59205. end;
  59206. function TPORTD_ODCD.getODCD2 : TBits_1; inline;
  59207. begin
  59208. getODCD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59209. end;
  59210. procedure TPORTD_ODCD.setODCD3; inline;
  59211. begin
  59212. pTDefRegMap(@Self)^.&set := $00000008;
  59213. end;
  59214. procedure TPORTD_ODCD.clearODCD3; inline;
  59215. begin
  59216. pTDefRegMap(@Self)^.clr := $00000008;
  59217. end;
  59218. procedure TPORTD_ODCD.setODCD3(thebits : TBits_1); inline;
  59219. begin
  59220. if thebits = 0 then
  59221. pTDefRegMap(@Self)^.clr := $00000008
  59222. else
  59223. pTDefRegMap(@Self)^.&set := $00000008;
  59224. end;
  59225. function TPORTD_ODCD.getODCD3 : TBits_1; inline;
  59226. begin
  59227. getODCD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59228. end;
  59229. procedure TPORTD_ODCD.setODCD4; inline;
  59230. begin
  59231. pTDefRegMap(@Self)^.&set := $00000010;
  59232. end;
  59233. procedure TPORTD_ODCD.clearODCD4; inline;
  59234. begin
  59235. pTDefRegMap(@Self)^.clr := $00000010;
  59236. end;
  59237. procedure TPORTD_ODCD.setODCD4(thebits : TBits_1); inline;
  59238. begin
  59239. if thebits = 0 then
  59240. pTDefRegMap(@Self)^.clr := $00000010
  59241. else
  59242. pTDefRegMap(@Self)^.&set := $00000010;
  59243. end;
  59244. function TPORTD_ODCD.getODCD4 : TBits_1; inline;
  59245. begin
  59246. getODCD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59247. end;
  59248. procedure TPORTD_ODCD.setODCD5; inline;
  59249. begin
  59250. pTDefRegMap(@Self)^.&set := $00000020;
  59251. end;
  59252. procedure TPORTD_ODCD.clearODCD5; inline;
  59253. begin
  59254. pTDefRegMap(@Self)^.clr := $00000020;
  59255. end;
  59256. procedure TPORTD_ODCD.setODCD5(thebits : TBits_1); inline;
  59257. begin
  59258. if thebits = 0 then
  59259. pTDefRegMap(@Self)^.clr := $00000020
  59260. else
  59261. pTDefRegMap(@Self)^.&set := $00000020;
  59262. end;
  59263. function TPORTD_ODCD.getODCD5 : TBits_1; inline;
  59264. begin
  59265. getODCD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59266. end;
  59267. procedure TPORTD_ODCD.setODCD6; inline;
  59268. begin
  59269. pTDefRegMap(@Self)^.&set := $00000040;
  59270. end;
  59271. procedure TPORTD_ODCD.clearODCD6; inline;
  59272. begin
  59273. pTDefRegMap(@Self)^.clr := $00000040;
  59274. end;
  59275. procedure TPORTD_ODCD.setODCD6(thebits : TBits_1); inline;
  59276. begin
  59277. if thebits = 0 then
  59278. pTDefRegMap(@Self)^.clr := $00000040
  59279. else
  59280. pTDefRegMap(@Self)^.&set := $00000040;
  59281. end;
  59282. function TPORTD_ODCD.getODCD6 : TBits_1; inline;
  59283. begin
  59284. getODCD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59285. end;
  59286. procedure TPORTD_ODCD.setODCD7; inline;
  59287. begin
  59288. pTDefRegMap(@Self)^.&set := $00000080;
  59289. end;
  59290. procedure TPORTD_ODCD.clearODCD7; inline;
  59291. begin
  59292. pTDefRegMap(@Self)^.clr := $00000080;
  59293. end;
  59294. procedure TPORTD_ODCD.setODCD7(thebits : TBits_1); inline;
  59295. begin
  59296. if thebits = 0 then
  59297. pTDefRegMap(@Self)^.clr := $00000080
  59298. else
  59299. pTDefRegMap(@Self)^.&set := $00000080;
  59300. end;
  59301. function TPORTD_ODCD.getODCD7 : TBits_1; inline;
  59302. begin
  59303. getODCD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59304. end;
  59305. procedure TPORTD_ODCD.setODCD8; inline;
  59306. begin
  59307. pTDefRegMap(@Self)^.&set := $00000100;
  59308. end;
  59309. procedure TPORTD_ODCD.clearODCD8; inline;
  59310. begin
  59311. pTDefRegMap(@Self)^.clr := $00000100;
  59312. end;
  59313. procedure TPORTD_ODCD.setODCD8(thebits : TBits_1); inline;
  59314. begin
  59315. if thebits = 0 then
  59316. pTDefRegMap(@Self)^.clr := $00000100
  59317. else
  59318. pTDefRegMap(@Self)^.&set := $00000100;
  59319. end;
  59320. function TPORTD_ODCD.getODCD8 : TBits_1; inline;
  59321. begin
  59322. getODCD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59323. end;
  59324. procedure TPORTD_ODCD.setODCD9; inline;
  59325. begin
  59326. pTDefRegMap(@Self)^.&set := $00000200;
  59327. end;
  59328. procedure TPORTD_ODCD.clearODCD9; inline;
  59329. begin
  59330. pTDefRegMap(@Self)^.clr := $00000200;
  59331. end;
  59332. procedure TPORTD_ODCD.setODCD9(thebits : TBits_1); inline;
  59333. begin
  59334. if thebits = 0 then
  59335. pTDefRegMap(@Self)^.clr := $00000200
  59336. else
  59337. pTDefRegMap(@Self)^.&set := $00000200;
  59338. end;
  59339. function TPORTD_ODCD.getODCD9 : TBits_1; inline;
  59340. begin
  59341. getODCD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59342. end;
  59343. procedure TPORTD_ODCD.setODCD10; inline;
  59344. begin
  59345. pTDefRegMap(@Self)^.&set := $00000400;
  59346. end;
  59347. procedure TPORTD_ODCD.clearODCD10; inline;
  59348. begin
  59349. pTDefRegMap(@Self)^.clr := $00000400;
  59350. end;
  59351. procedure TPORTD_ODCD.setODCD10(thebits : TBits_1); inline;
  59352. begin
  59353. if thebits = 0 then
  59354. pTDefRegMap(@Self)^.clr := $00000400
  59355. else
  59356. pTDefRegMap(@Self)^.&set := $00000400;
  59357. end;
  59358. function TPORTD_ODCD.getODCD10 : TBits_1; inline;
  59359. begin
  59360. getODCD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59361. end;
  59362. procedure TPORTD_ODCD.setODCD11; inline;
  59363. begin
  59364. pTDefRegMap(@Self)^.&set := $00000800;
  59365. end;
  59366. procedure TPORTD_ODCD.clearODCD11; inline;
  59367. begin
  59368. pTDefRegMap(@Self)^.clr := $00000800;
  59369. end;
  59370. procedure TPORTD_ODCD.setODCD11(thebits : TBits_1); inline;
  59371. begin
  59372. if thebits = 0 then
  59373. pTDefRegMap(@Self)^.clr := $00000800
  59374. else
  59375. pTDefRegMap(@Self)^.&set := $00000800;
  59376. end;
  59377. function TPORTD_ODCD.getODCD11 : TBits_1; inline;
  59378. begin
  59379. getODCD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  59380. end;
  59381. procedure TPORTD_ODCD.setw(thebits : TBits_32); inline;
  59382. begin
  59383. pTDefRegMap(@Self)^.val := thebits;
  59384. end;
  59385. function TPORTD_ODCD.getw : TBits_32; inline;
  59386. begin
  59387. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59388. end;
  59389. procedure TPORTE_TRISE.setTRISE0; inline;
  59390. begin
  59391. pTDefRegMap(@Self)^.&set := $00000001;
  59392. end;
  59393. procedure TPORTE_TRISE.clearTRISE0; inline;
  59394. begin
  59395. pTDefRegMap(@Self)^.clr := $00000001;
  59396. end;
  59397. procedure TPORTE_TRISE.setTRISE0(thebits : TBits_1); inline;
  59398. begin
  59399. if thebits = 0 then
  59400. pTDefRegMap(@Self)^.clr := $00000001
  59401. else
  59402. pTDefRegMap(@Self)^.&set := $00000001;
  59403. end;
  59404. function TPORTE_TRISE.getTRISE0 : TBits_1; inline;
  59405. begin
  59406. getTRISE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59407. end;
  59408. procedure TPORTE_TRISE.setTRISE1; inline;
  59409. begin
  59410. pTDefRegMap(@Self)^.&set := $00000002;
  59411. end;
  59412. procedure TPORTE_TRISE.clearTRISE1; inline;
  59413. begin
  59414. pTDefRegMap(@Self)^.clr := $00000002;
  59415. end;
  59416. procedure TPORTE_TRISE.setTRISE1(thebits : TBits_1); inline;
  59417. begin
  59418. if thebits = 0 then
  59419. pTDefRegMap(@Self)^.clr := $00000002
  59420. else
  59421. pTDefRegMap(@Self)^.&set := $00000002;
  59422. end;
  59423. function TPORTE_TRISE.getTRISE1 : TBits_1; inline;
  59424. begin
  59425. getTRISE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59426. end;
  59427. procedure TPORTE_TRISE.setTRISE2; inline;
  59428. begin
  59429. pTDefRegMap(@Self)^.&set := $00000004;
  59430. end;
  59431. procedure TPORTE_TRISE.clearTRISE2; inline;
  59432. begin
  59433. pTDefRegMap(@Self)^.clr := $00000004;
  59434. end;
  59435. procedure TPORTE_TRISE.setTRISE2(thebits : TBits_1); inline;
  59436. begin
  59437. if thebits = 0 then
  59438. pTDefRegMap(@Self)^.clr := $00000004
  59439. else
  59440. pTDefRegMap(@Self)^.&set := $00000004;
  59441. end;
  59442. function TPORTE_TRISE.getTRISE2 : TBits_1; inline;
  59443. begin
  59444. getTRISE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59445. end;
  59446. procedure TPORTE_TRISE.setTRISE3; inline;
  59447. begin
  59448. pTDefRegMap(@Self)^.&set := $00000008;
  59449. end;
  59450. procedure TPORTE_TRISE.clearTRISE3; inline;
  59451. begin
  59452. pTDefRegMap(@Self)^.clr := $00000008;
  59453. end;
  59454. procedure TPORTE_TRISE.setTRISE3(thebits : TBits_1); inline;
  59455. begin
  59456. if thebits = 0 then
  59457. pTDefRegMap(@Self)^.clr := $00000008
  59458. else
  59459. pTDefRegMap(@Self)^.&set := $00000008;
  59460. end;
  59461. function TPORTE_TRISE.getTRISE3 : TBits_1; inline;
  59462. begin
  59463. getTRISE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59464. end;
  59465. procedure TPORTE_TRISE.setTRISE4; inline;
  59466. begin
  59467. pTDefRegMap(@Self)^.&set := $00000010;
  59468. end;
  59469. procedure TPORTE_TRISE.clearTRISE4; inline;
  59470. begin
  59471. pTDefRegMap(@Self)^.clr := $00000010;
  59472. end;
  59473. procedure TPORTE_TRISE.setTRISE4(thebits : TBits_1); inline;
  59474. begin
  59475. if thebits = 0 then
  59476. pTDefRegMap(@Self)^.clr := $00000010
  59477. else
  59478. pTDefRegMap(@Self)^.&set := $00000010;
  59479. end;
  59480. function TPORTE_TRISE.getTRISE4 : TBits_1; inline;
  59481. begin
  59482. getTRISE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59483. end;
  59484. procedure TPORTE_TRISE.setTRISE5; inline;
  59485. begin
  59486. pTDefRegMap(@Self)^.&set := $00000020;
  59487. end;
  59488. procedure TPORTE_TRISE.clearTRISE5; inline;
  59489. begin
  59490. pTDefRegMap(@Self)^.clr := $00000020;
  59491. end;
  59492. procedure TPORTE_TRISE.setTRISE5(thebits : TBits_1); inline;
  59493. begin
  59494. if thebits = 0 then
  59495. pTDefRegMap(@Self)^.clr := $00000020
  59496. else
  59497. pTDefRegMap(@Self)^.&set := $00000020;
  59498. end;
  59499. function TPORTE_TRISE.getTRISE5 : TBits_1; inline;
  59500. begin
  59501. getTRISE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59502. end;
  59503. procedure TPORTE_TRISE.setTRISE6; inline;
  59504. begin
  59505. pTDefRegMap(@Self)^.&set := $00000040;
  59506. end;
  59507. procedure TPORTE_TRISE.clearTRISE6; inline;
  59508. begin
  59509. pTDefRegMap(@Self)^.clr := $00000040;
  59510. end;
  59511. procedure TPORTE_TRISE.setTRISE6(thebits : TBits_1); inline;
  59512. begin
  59513. if thebits = 0 then
  59514. pTDefRegMap(@Self)^.clr := $00000040
  59515. else
  59516. pTDefRegMap(@Self)^.&set := $00000040;
  59517. end;
  59518. function TPORTE_TRISE.getTRISE6 : TBits_1; inline;
  59519. begin
  59520. getTRISE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59521. end;
  59522. procedure TPORTE_TRISE.setTRISE7; inline;
  59523. begin
  59524. pTDefRegMap(@Self)^.&set := $00000080;
  59525. end;
  59526. procedure TPORTE_TRISE.clearTRISE7; inline;
  59527. begin
  59528. pTDefRegMap(@Self)^.clr := $00000080;
  59529. end;
  59530. procedure TPORTE_TRISE.setTRISE7(thebits : TBits_1); inline;
  59531. begin
  59532. if thebits = 0 then
  59533. pTDefRegMap(@Self)^.clr := $00000080
  59534. else
  59535. pTDefRegMap(@Self)^.&set := $00000080;
  59536. end;
  59537. function TPORTE_TRISE.getTRISE7 : TBits_1; inline;
  59538. begin
  59539. getTRISE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59540. end;
  59541. procedure TPORTE_TRISE.setw(thebits : TBits_32); inline;
  59542. begin
  59543. pTDefRegMap(@Self)^.val := thebits;
  59544. end;
  59545. function TPORTE_TRISE.getw : TBits_32; inline;
  59546. begin
  59547. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59548. end;
  59549. procedure TPORTE_PORTE.setRE0; inline;
  59550. begin
  59551. pTDefRegMap(@Self)^.&set := $00000001;
  59552. end;
  59553. procedure TPORTE_PORTE.clearRE0; inline;
  59554. begin
  59555. pTDefRegMap(@Self)^.clr := $00000001;
  59556. end;
  59557. procedure TPORTE_PORTE.setRE0(thebits : TBits_1); inline;
  59558. begin
  59559. if thebits = 0 then
  59560. pTDefRegMap(@Self)^.clr := $00000001
  59561. else
  59562. pTDefRegMap(@Self)^.&set := $00000001;
  59563. end;
  59564. function TPORTE_PORTE.getRE0 : TBits_1; inline;
  59565. begin
  59566. getRE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59567. end;
  59568. procedure TPORTE_PORTE.setRE1; inline;
  59569. begin
  59570. pTDefRegMap(@Self)^.&set := $00000002;
  59571. end;
  59572. procedure TPORTE_PORTE.clearRE1; inline;
  59573. begin
  59574. pTDefRegMap(@Self)^.clr := $00000002;
  59575. end;
  59576. procedure TPORTE_PORTE.setRE1(thebits : TBits_1); inline;
  59577. begin
  59578. if thebits = 0 then
  59579. pTDefRegMap(@Self)^.clr := $00000002
  59580. else
  59581. pTDefRegMap(@Self)^.&set := $00000002;
  59582. end;
  59583. function TPORTE_PORTE.getRE1 : TBits_1; inline;
  59584. begin
  59585. getRE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59586. end;
  59587. procedure TPORTE_PORTE.setRE2; inline;
  59588. begin
  59589. pTDefRegMap(@Self)^.&set := $00000004;
  59590. end;
  59591. procedure TPORTE_PORTE.clearRE2; inline;
  59592. begin
  59593. pTDefRegMap(@Self)^.clr := $00000004;
  59594. end;
  59595. procedure TPORTE_PORTE.setRE2(thebits : TBits_1); inline;
  59596. begin
  59597. if thebits = 0 then
  59598. pTDefRegMap(@Self)^.clr := $00000004
  59599. else
  59600. pTDefRegMap(@Self)^.&set := $00000004;
  59601. end;
  59602. function TPORTE_PORTE.getRE2 : TBits_1; inline;
  59603. begin
  59604. getRE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59605. end;
  59606. procedure TPORTE_PORTE.setRE3; inline;
  59607. begin
  59608. pTDefRegMap(@Self)^.&set := $00000008;
  59609. end;
  59610. procedure TPORTE_PORTE.clearRE3; inline;
  59611. begin
  59612. pTDefRegMap(@Self)^.clr := $00000008;
  59613. end;
  59614. procedure TPORTE_PORTE.setRE3(thebits : TBits_1); inline;
  59615. begin
  59616. if thebits = 0 then
  59617. pTDefRegMap(@Self)^.clr := $00000008
  59618. else
  59619. pTDefRegMap(@Self)^.&set := $00000008;
  59620. end;
  59621. function TPORTE_PORTE.getRE3 : TBits_1; inline;
  59622. begin
  59623. getRE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59624. end;
  59625. procedure TPORTE_PORTE.setRE4; inline;
  59626. begin
  59627. pTDefRegMap(@Self)^.&set := $00000010;
  59628. end;
  59629. procedure TPORTE_PORTE.clearRE4; inline;
  59630. begin
  59631. pTDefRegMap(@Self)^.clr := $00000010;
  59632. end;
  59633. procedure TPORTE_PORTE.setRE4(thebits : TBits_1); inline;
  59634. begin
  59635. if thebits = 0 then
  59636. pTDefRegMap(@Self)^.clr := $00000010
  59637. else
  59638. pTDefRegMap(@Self)^.&set := $00000010;
  59639. end;
  59640. function TPORTE_PORTE.getRE4 : TBits_1; inline;
  59641. begin
  59642. getRE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59643. end;
  59644. procedure TPORTE_PORTE.setRE5; inline;
  59645. begin
  59646. pTDefRegMap(@Self)^.&set := $00000020;
  59647. end;
  59648. procedure TPORTE_PORTE.clearRE5; inline;
  59649. begin
  59650. pTDefRegMap(@Self)^.clr := $00000020;
  59651. end;
  59652. procedure TPORTE_PORTE.setRE5(thebits : TBits_1); inline;
  59653. begin
  59654. if thebits = 0 then
  59655. pTDefRegMap(@Self)^.clr := $00000020
  59656. else
  59657. pTDefRegMap(@Self)^.&set := $00000020;
  59658. end;
  59659. function TPORTE_PORTE.getRE5 : TBits_1; inline;
  59660. begin
  59661. getRE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59662. end;
  59663. procedure TPORTE_PORTE.setRE6; inline;
  59664. begin
  59665. pTDefRegMap(@Self)^.&set := $00000040;
  59666. end;
  59667. procedure TPORTE_PORTE.clearRE6; inline;
  59668. begin
  59669. pTDefRegMap(@Self)^.clr := $00000040;
  59670. end;
  59671. procedure TPORTE_PORTE.setRE6(thebits : TBits_1); inline;
  59672. begin
  59673. if thebits = 0 then
  59674. pTDefRegMap(@Self)^.clr := $00000040
  59675. else
  59676. pTDefRegMap(@Self)^.&set := $00000040;
  59677. end;
  59678. function TPORTE_PORTE.getRE6 : TBits_1; inline;
  59679. begin
  59680. getRE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59681. end;
  59682. procedure TPORTE_PORTE.setRE7; inline;
  59683. begin
  59684. pTDefRegMap(@Self)^.&set := $00000080;
  59685. end;
  59686. procedure TPORTE_PORTE.clearRE7; inline;
  59687. begin
  59688. pTDefRegMap(@Self)^.clr := $00000080;
  59689. end;
  59690. procedure TPORTE_PORTE.setRE7(thebits : TBits_1); inline;
  59691. begin
  59692. if thebits = 0 then
  59693. pTDefRegMap(@Self)^.clr := $00000080
  59694. else
  59695. pTDefRegMap(@Self)^.&set := $00000080;
  59696. end;
  59697. function TPORTE_PORTE.getRE7 : TBits_1; inline;
  59698. begin
  59699. getRE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59700. end;
  59701. procedure TPORTE_PORTE.setw(thebits : TBits_32); inline;
  59702. begin
  59703. pTDefRegMap(@Self)^.val := thebits;
  59704. end;
  59705. function TPORTE_PORTE.getw : TBits_32; inline;
  59706. begin
  59707. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59708. end;
  59709. procedure TPORTE_LATE.setLATE0; inline;
  59710. begin
  59711. pTDefRegMap(@Self)^.&set := $00000001;
  59712. end;
  59713. procedure TPORTE_LATE.clearLATE0; inline;
  59714. begin
  59715. pTDefRegMap(@Self)^.clr := $00000001;
  59716. end;
  59717. procedure TPORTE_LATE.setLATE0(thebits : TBits_1); inline;
  59718. begin
  59719. if thebits = 0 then
  59720. pTDefRegMap(@Self)^.clr := $00000001
  59721. else
  59722. pTDefRegMap(@Self)^.&set := $00000001;
  59723. end;
  59724. function TPORTE_LATE.getLATE0 : TBits_1; inline;
  59725. begin
  59726. getLATE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59727. end;
  59728. procedure TPORTE_LATE.setLATE1; inline;
  59729. begin
  59730. pTDefRegMap(@Self)^.&set := $00000002;
  59731. end;
  59732. procedure TPORTE_LATE.clearLATE1; inline;
  59733. begin
  59734. pTDefRegMap(@Self)^.clr := $00000002;
  59735. end;
  59736. procedure TPORTE_LATE.setLATE1(thebits : TBits_1); inline;
  59737. begin
  59738. if thebits = 0 then
  59739. pTDefRegMap(@Self)^.clr := $00000002
  59740. else
  59741. pTDefRegMap(@Self)^.&set := $00000002;
  59742. end;
  59743. function TPORTE_LATE.getLATE1 : TBits_1; inline;
  59744. begin
  59745. getLATE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59746. end;
  59747. procedure TPORTE_LATE.setLATE2; inline;
  59748. begin
  59749. pTDefRegMap(@Self)^.&set := $00000004;
  59750. end;
  59751. procedure TPORTE_LATE.clearLATE2; inline;
  59752. begin
  59753. pTDefRegMap(@Self)^.clr := $00000004;
  59754. end;
  59755. procedure TPORTE_LATE.setLATE2(thebits : TBits_1); inline;
  59756. begin
  59757. if thebits = 0 then
  59758. pTDefRegMap(@Self)^.clr := $00000004
  59759. else
  59760. pTDefRegMap(@Self)^.&set := $00000004;
  59761. end;
  59762. function TPORTE_LATE.getLATE2 : TBits_1; inline;
  59763. begin
  59764. getLATE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59765. end;
  59766. procedure TPORTE_LATE.setLATE3; inline;
  59767. begin
  59768. pTDefRegMap(@Self)^.&set := $00000008;
  59769. end;
  59770. procedure TPORTE_LATE.clearLATE3; inline;
  59771. begin
  59772. pTDefRegMap(@Self)^.clr := $00000008;
  59773. end;
  59774. procedure TPORTE_LATE.setLATE3(thebits : TBits_1); inline;
  59775. begin
  59776. if thebits = 0 then
  59777. pTDefRegMap(@Self)^.clr := $00000008
  59778. else
  59779. pTDefRegMap(@Self)^.&set := $00000008;
  59780. end;
  59781. function TPORTE_LATE.getLATE3 : TBits_1; inline;
  59782. begin
  59783. getLATE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59784. end;
  59785. procedure TPORTE_LATE.setLATE4; inline;
  59786. begin
  59787. pTDefRegMap(@Self)^.&set := $00000010;
  59788. end;
  59789. procedure TPORTE_LATE.clearLATE4; inline;
  59790. begin
  59791. pTDefRegMap(@Self)^.clr := $00000010;
  59792. end;
  59793. procedure TPORTE_LATE.setLATE4(thebits : TBits_1); inline;
  59794. begin
  59795. if thebits = 0 then
  59796. pTDefRegMap(@Self)^.clr := $00000010
  59797. else
  59798. pTDefRegMap(@Self)^.&set := $00000010;
  59799. end;
  59800. function TPORTE_LATE.getLATE4 : TBits_1; inline;
  59801. begin
  59802. getLATE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59803. end;
  59804. procedure TPORTE_LATE.setLATE5; inline;
  59805. begin
  59806. pTDefRegMap(@Self)^.&set := $00000020;
  59807. end;
  59808. procedure TPORTE_LATE.clearLATE5; inline;
  59809. begin
  59810. pTDefRegMap(@Self)^.clr := $00000020;
  59811. end;
  59812. procedure TPORTE_LATE.setLATE5(thebits : TBits_1); inline;
  59813. begin
  59814. if thebits = 0 then
  59815. pTDefRegMap(@Self)^.clr := $00000020
  59816. else
  59817. pTDefRegMap(@Self)^.&set := $00000020;
  59818. end;
  59819. function TPORTE_LATE.getLATE5 : TBits_1; inline;
  59820. begin
  59821. getLATE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59822. end;
  59823. procedure TPORTE_LATE.setLATE6; inline;
  59824. begin
  59825. pTDefRegMap(@Self)^.&set := $00000040;
  59826. end;
  59827. procedure TPORTE_LATE.clearLATE6; inline;
  59828. begin
  59829. pTDefRegMap(@Self)^.clr := $00000040;
  59830. end;
  59831. procedure TPORTE_LATE.setLATE6(thebits : TBits_1); inline;
  59832. begin
  59833. if thebits = 0 then
  59834. pTDefRegMap(@Self)^.clr := $00000040
  59835. else
  59836. pTDefRegMap(@Self)^.&set := $00000040;
  59837. end;
  59838. function TPORTE_LATE.getLATE6 : TBits_1; inline;
  59839. begin
  59840. getLATE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59841. end;
  59842. procedure TPORTE_LATE.setLATE7; inline;
  59843. begin
  59844. pTDefRegMap(@Self)^.&set := $00000080;
  59845. end;
  59846. procedure TPORTE_LATE.clearLATE7; inline;
  59847. begin
  59848. pTDefRegMap(@Self)^.clr := $00000080;
  59849. end;
  59850. procedure TPORTE_LATE.setLATE7(thebits : TBits_1); inline;
  59851. begin
  59852. if thebits = 0 then
  59853. pTDefRegMap(@Self)^.clr := $00000080
  59854. else
  59855. pTDefRegMap(@Self)^.&set := $00000080;
  59856. end;
  59857. function TPORTE_LATE.getLATE7 : TBits_1; inline;
  59858. begin
  59859. getLATE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59860. end;
  59861. procedure TPORTE_LATE.setw(thebits : TBits_32); inline;
  59862. begin
  59863. pTDefRegMap(@Self)^.val := thebits;
  59864. end;
  59865. function TPORTE_LATE.getw : TBits_32; inline;
  59866. begin
  59867. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59868. end;
  59869. procedure TPORTE_ODCE.setODCE0; inline;
  59870. begin
  59871. pTDefRegMap(@Self)^.&set := $00000001;
  59872. end;
  59873. procedure TPORTE_ODCE.clearODCE0; inline;
  59874. begin
  59875. pTDefRegMap(@Self)^.clr := $00000001;
  59876. end;
  59877. procedure TPORTE_ODCE.setODCE0(thebits : TBits_1); inline;
  59878. begin
  59879. if thebits = 0 then
  59880. pTDefRegMap(@Self)^.clr := $00000001
  59881. else
  59882. pTDefRegMap(@Self)^.&set := $00000001;
  59883. end;
  59884. function TPORTE_ODCE.getODCE0 : TBits_1; inline;
  59885. begin
  59886. getODCE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59887. end;
  59888. procedure TPORTE_ODCE.setODCE1; inline;
  59889. begin
  59890. pTDefRegMap(@Self)^.&set := $00000002;
  59891. end;
  59892. procedure TPORTE_ODCE.clearODCE1; inline;
  59893. begin
  59894. pTDefRegMap(@Self)^.clr := $00000002;
  59895. end;
  59896. procedure TPORTE_ODCE.setODCE1(thebits : TBits_1); inline;
  59897. begin
  59898. if thebits = 0 then
  59899. pTDefRegMap(@Self)^.clr := $00000002
  59900. else
  59901. pTDefRegMap(@Self)^.&set := $00000002;
  59902. end;
  59903. function TPORTE_ODCE.getODCE1 : TBits_1; inline;
  59904. begin
  59905. getODCE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59906. end;
  59907. procedure TPORTE_ODCE.setODCE2; inline;
  59908. begin
  59909. pTDefRegMap(@Self)^.&set := $00000004;
  59910. end;
  59911. procedure TPORTE_ODCE.clearODCE2; inline;
  59912. begin
  59913. pTDefRegMap(@Self)^.clr := $00000004;
  59914. end;
  59915. procedure TPORTE_ODCE.setODCE2(thebits : TBits_1); inline;
  59916. begin
  59917. if thebits = 0 then
  59918. pTDefRegMap(@Self)^.clr := $00000004
  59919. else
  59920. pTDefRegMap(@Self)^.&set := $00000004;
  59921. end;
  59922. function TPORTE_ODCE.getODCE2 : TBits_1; inline;
  59923. begin
  59924. getODCE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59925. end;
  59926. procedure TPORTE_ODCE.setODCE3; inline;
  59927. begin
  59928. pTDefRegMap(@Self)^.&set := $00000008;
  59929. end;
  59930. procedure TPORTE_ODCE.clearODCE3; inline;
  59931. begin
  59932. pTDefRegMap(@Self)^.clr := $00000008;
  59933. end;
  59934. procedure TPORTE_ODCE.setODCE3(thebits : TBits_1); inline;
  59935. begin
  59936. if thebits = 0 then
  59937. pTDefRegMap(@Self)^.clr := $00000008
  59938. else
  59939. pTDefRegMap(@Self)^.&set := $00000008;
  59940. end;
  59941. function TPORTE_ODCE.getODCE3 : TBits_1; inline;
  59942. begin
  59943. getODCE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59944. end;
  59945. procedure TPORTE_ODCE.setODCE4; inline;
  59946. begin
  59947. pTDefRegMap(@Self)^.&set := $00000010;
  59948. end;
  59949. procedure TPORTE_ODCE.clearODCE4; inline;
  59950. begin
  59951. pTDefRegMap(@Self)^.clr := $00000010;
  59952. end;
  59953. procedure TPORTE_ODCE.setODCE4(thebits : TBits_1); inline;
  59954. begin
  59955. if thebits = 0 then
  59956. pTDefRegMap(@Self)^.clr := $00000010
  59957. else
  59958. pTDefRegMap(@Self)^.&set := $00000010;
  59959. end;
  59960. function TPORTE_ODCE.getODCE4 : TBits_1; inline;
  59961. begin
  59962. getODCE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59963. end;
  59964. procedure TPORTE_ODCE.setODCE5; inline;
  59965. begin
  59966. pTDefRegMap(@Self)^.&set := $00000020;
  59967. end;
  59968. procedure TPORTE_ODCE.clearODCE5; inline;
  59969. begin
  59970. pTDefRegMap(@Self)^.clr := $00000020;
  59971. end;
  59972. procedure TPORTE_ODCE.setODCE5(thebits : TBits_1); inline;
  59973. begin
  59974. if thebits = 0 then
  59975. pTDefRegMap(@Self)^.clr := $00000020
  59976. else
  59977. pTDefRegMap(@Self)^.&set := $00000020;
  59978. end;
  59979. function TPORTE_ODCE.getODCE5 : TBits_1; inline;
  59980. begin
  59981. getODCE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59982. end;
  59983. procedure TPORTE_ODCE.setODCE6; inline;
  59984. begin
  59985. pTDefRegMap(@Self)^.&set := $00000040;
  59986. end;
  59987. procedure TPORTE_ODCE.clearODCE6; inline;
  59988. begin
  59989. pTDefRegMap(@Self)^.clr := $00000040;
  59990. end;
  59991. procedure TPORTE_ODCE.setODCE6(thebits : TBits_1); inline;
  59992. begin
  59993. if thebits = 0 then
  59994. pTDefRegMap(@Self)^.clr := $00000040
  59995. else
  59996. pTDefRegMap(@Self)^.&set := $00000040;
  59997. end;
  59998. function TPORTE_ODCE.getODCE6 : TBits_1; inline;
  59999. begin
  60000. getODCE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  60001. end;
  60002. procedure TPORTE_ODCE.setODCE7; inline;
  60003. begin
  60004. pTDefRegMap(@Self)^.&set := $00000080;
  60005. end;
  60006. procedure TPORTE_ODCE.clearODCE7; inline;
  60007. begin
  60008. pTDefRegMap(@Self)^.clr := $00000080;
  60009. end;
  60010. procedure TPORTE_ODCE.setODCE7(thebits : TBits_1); inline;
  60011. begin
  60012. if thebits = 0 then
  60013. pTDefRegMap(@Self)^.clr := $00000080
  60014. else
  60015. pTDefRegMap(@Self)^.&set := $00000080;
  60016. end;
  60017. function TPORTE_ODCE.getODCE7 : TBits_1; inline;
  60018. begin
  60019. getODCE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  60020. end;
  60021. procedure TPORTE_ODCE.setw(thebits : TBits_32); inline;
  60022. begin
  60023. pTDefRegMap(@Self)^.val := thebits;
  60024. end;
  60025. function TPORTE_ODCE.getw : TBits_32; inline;
  60026. begin
  60027. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60028. end;
  60029. procedure TPORTF_TRISF.setTRISF0; inline;
  60030. begin
  60031. pTDefRegMap(@Self)^.&set := $00000001;
  60032. end;
  60033. procedure TPORTF_TRISF.clearTRISF0; inline;
  60034. begin
  60035. pTDefRegMap(@Self)^.clr := $00000001;
  60036. end;
  60037. procedure TPORTF_TRISF.setTRISF0(thebits : TBits_1); inline;
  60038. begin
  60039. if thebits = 0 then
  60040. pTDefRegMap(@Self)^.clr := $00000001
  60041. else
  60042. pTDefRegMap(@Self)^.&set := $00000001;
  60043. end;
  60044. function TPORTF_TRISF.getTRISF0 : TBits_1; inline;
  60045. begin
  60046. getTRISF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  60047. end;
  60048. procedure TPORTF_TRISF.setTRISF1; inline;
  60049. begin
  60050. pTDefRegMap(@Self)^.&set := $00000002;
  60051. end;
  60052. procedure TPORTF_TRISF.clearTRISF1; inline;
  60053. begin
  60054. pTDefRegMap(@Self)^.clr := $00000002;
  60055. end;
  60056. procedure TPORTF_TRISF.setTRISF1(thebits : TBits_1); inline;
  60057. begin
  60058. if thebits = 0 then
  60059. pTDefRegMap(@Self)^.clr := $00000002
  60060. else
  60061. pTDefRegMap(@Self)^.&set := $00000002;
  60062. end;
  60063. function TPORTF_TRISF.getTRISF1 : TBits_1; inline;
  60064. begin
  60065. getTRISF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  60066. end;
  60067. procedure TPORTF_TRISF.setTRISF2; inline;
  60068. begin
  60069. pTDefRegMap(@Self)^.&set := $00000004;
  60070. end;
  60071. procedure TPORTF_TRISF.clearTRISF2; inline;
  60072. begin
  60073. pTDefRegMap(@Self)^.clr := $00000004;
  60074. end;
  60075. procedure TPORTF_TRISF.setTRISF2(thebits : TBits_1); inline;
  60076. begin
  60077. if thebits = 0 then
  60078. pTDefRegMap(@Self)^.clr := $00000004
  60079. else
  60080. pTDefRegMap(@Self)^.&set := $00000004;
  60081. end;
  60082. function TPORTF_TRISF.getTRISF2 : TBits_1; inline;
  60083. begin
  60084. getTRISF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60085. end;
  60086. procedure TPORTF_TRISF.setTRISF3; inline;
  60087. begin
  60088. pTDefRegMap(@Self)^.&set := $00000008;
  60089. end;
  60090. procedure TPORTF_TRISF.clearTRISF3; inline;
  60091. begin
  60092. pTDefRegMap(@Self)^.clr := $00000008;
  60093. end;
  60094. procedure TPORTF_TRISF.setTRISF3(thebits : TBits_1); inline;
  60095. begin
  60096. if thebits = 0 then
  60097. pTDefRegMap(@Self)^.clr := $00000008
  60098. else
  60099. pTDefRegMap(@Self)^.&set := $00000008;
  60100. end;
  60101. function TPORTF_TRISF.getTRISF3 : TBits_1; inline;
  60102. begin
  60103. getTRISF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60104. end;
  60105. procedure TPORTF_TRISF.setTRISF4; inline;
  60106. begin
  60107. pTDefRegMap(@Self)^.&set := $00000010;
  60108. end;
  60109. procedure TPORTF_TRISF.clearTRISF4; inline;
  60110. begin
  60111. pTDefRegMap(@Self)^.clr := $00000010;
  60112. end;
  60113. procedure TPORTF_TRISF.setTRISF4(thebits : TBits_1); inline;
  60114. begin
  60115. if thebits = 0 then
  60116. pTDefRegMap(@Self)^.clr := $00000010
  60117. else
  60118. pTDefRegMap(@Self)^.&set := $00000010;
  60119. end;
  60120. function TPORTF_TRISF.getTRISF4 : TBits_1; inline;
  60121. begin
  60122. getTRISF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  60123. end;
  60124. procedure TPORTF_TRISF.setTRISF5; inline;
  60125. begin
  60126. pTDefRegMap(@Self)^.&set := $00000020;
  60127. end;
  60128. procedure TPORTF_TRISF.clearTRISF5; inline;
  60129. begin
  60130. pTDefRegMap(@Self)^.clr := $00000020;
  60131. end;
  60132. procedure TPORTF_TRISF.setTRISF5(thebits : TBits_1); inline;
  60133. begin
  60134. if thebits = 0 then
  60135. pTDefRegMap(@Self)^.clr := $00000020
  60136. else
  60137. pTDefRegMap(@Self)^.&set := $00000020;
  60138. end;
  60139. function TPORTF_TRISF.getTRISF5 : TBits_1; inline;
  60140. begin
  60141. getTRISF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  60142. end;
  60143. procedure TPORTF_TRISF.setw(thebits : TBits_32); inline;
  60144. begin
  60145. pTDefRegMap(@Self)^.val := thebits;
  60146. end;
  60147. function TPORTF_TRISF.getw : TBits_32; inline;
  60148. begin
  60149. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60150. end;
  60151. procedure TPORTF_PORTF.setRF0; inline;
  60152. begin
  60153. pTDefRegMap(@Self)^.&set := $00000001;
  60154. end;
  60155. procedure TPORTF_PORTF.clearRF0; inline;
  60156. begin
  60157. pTDefRegMap(@Self)^.clr := $00000001;
  60158. end;
  60159. procedure TPORTF_PORTF.setRF0(thebits : TBits_1); inline;
  60160. begin
  60161. if thebits = 0 then
  60162. pTDefRegMap(@Self)^.clr := $00000001
  60163. else
  60164. pTDefRegMap(@Self)^.&set := $00000001;
  60165. end;
  60166. function TPORTF_PORTF.getRF0 : TBits_1; inline;
  60167. begin
  60168. getRF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  60169. end;
  60170. procedure TPORTF_PORTF.setRF1; inline;
  60171. begin
  60172. pTDefRegMap(@Self)^.&set := $00000002;
  60173. end;
  60174. procedure TPORTF_PORTF.clearRF1; inline;
  60175. begin
  60176. pTDefRegMap(@Self)^.clr := $00000002;
  60177. end;
  60178. procedure TPORTF_PORTF.setRF1(thebits : TBits_1); inline;
  60179. begin
  60180. if thebits = 0 then
  60181. pTDefRegMap(@Self)^.clr := $00000002
  60182. else
  60183. pTDefRegMap(@Self)^.&set := $00000002;
  60184. end;
  60185. function TPORTF_PORTF.getRF1 : TBits_1; inline;
  60186. begin
  60187. getRF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  60188. end;
  60189. procedure TPORTF_PORTF.setRF2; inline;
  60190. begin
  60191. pTDefRegMap(@Self)^.&set := $00000004;
  60192. end;
  60193. procedure TPORTF_PORTF.clearRF2; inline;
  60194. begin
  60195. pTDefRegMap(@Self)^.clr := $00000004;
  60196. end;
  60197. procedure TPORTF_PORTF.setRF2(thebits : TBits_1); inline;
  60198. begin
  60199. if thebits = 0 then
  60200. pTDefRegMap(@Self)^.clr := $00000004
  60201. else
  60202. pTDefRegMap(@Self)^.&set := $00000004;
  60203. end;
  60204. function TPORTF_PORTF.getRF2 : TBits_1; inline;
  60205. begin
  60206. getRF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60207. end;
  60208. procedure TPORTF_PORTF.setRF3; inline;
  60209. begin
  60210. pTDefRegMap(@Self)^.&set := $00000008;
  60211. end;
  60212. procedure TPORTF_PORTF.clearRF3; inline;
  60213. begin
  60214. pTDefRegMap(@Self)^.clr := $00000008;
  60215. end;
  60216. procedure TPORTF_PORTF.setRF3(thebits : TBits_1); inline;
  60217. begin
  60218. if thebits = 0 then
  60219. pTDefRegMap(@Self)^.clr := $00000008
  60220. else
  60221. pTDefRegMap(@Self)^.&set := $00000008;
  60222. end;
  60223. function TPORTF_PORTF.getRF3 : TBits_1; inline;
  60224. begin
  60225. getRF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60226. end;
  60227. procedure TPORTF_PORTF.setRF4; inline;
  60228. begin
  60229. pTDefRegMap(@Self)^.&set := $00000010;
  60230. end;
  60231. procedure TPORTF_PORTF.clearRF4; inline;
  60232. begin
  60233. pTDefRegMap(@Self)^.clr := $00000010;
  60234. end;
  60235. procedure TPORTF_PORTF.setRF4(thebits : TBits_1); inline;
  60236. begin
  60237. if thebits = 0 then
  60238. pTDefRegMap(@Self)^.clr := $00000010
  60239. else
  60240. pTDefRegMap(@Self)^.&set := $00000010;
  60241. end;
  60242. function TPORTF_PORTF.getRF4 : TBits_1; inline;
  60243. begin
  60244. getRF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  60245. end;
  60246. procedure TPORTF_PORTF.setRF5; inline;
  60247. begin
  60248. pTDefRegMap(@Self)^.&set := $00000020;
  60249. end;
  60250. procedure TPORTF_PORTF.clearRF5; inline;
  60251. begin
  60252. pTDefRegMap(@Self)^.clr := $00000020;
  60253. end;
  60254. procedure TPORTF_PORTF.setRF5(thebits : TBits_1); inline;
  60255. begin
  60256. if thebits = 0 then
  60257. pTDefRegMap(@Self)^.clr := $00000020
  60258. else
  60259. pTDefRegMap(@Self)^.&set := $00000020;
  60260. end;
  60261. function TPORTF_PORTF.getRF5 : TBits_1; inline;
  60262. begin
  60263. getRF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  60264. end;
  60265. procedure TPORTF_PORTF.setw(thebits : TBits_32); inline;
  60266. begin
  60267. pTDefRegMap(@Self)^.val := thebits;
  60268. end;
  60269. function TPORTF_PORTF.getw : TBits_32; inline;
  60270. begin
  60271. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60272. end;
  60273. procedure TPORTF_LATF.setLATF0; inline;
  60274. begin
  60275. pTDefRegMap(@Self)^.&set := $00000001;
  60276. end;
  60277. procedure TPORTF_LATF.clearLATF0; inline;
  60278. begin
  60279. pTDefRegMap(@Self)^.clr := $00000001;
  60280. end;
  60281. procedure TPORTF_LATF.setLATF0(thebits : TBits_1); inline;
  60282. begin
  60283. if thebits = 0 then
  60284. pTDefRegMap(@Self)^.clr := $00000001
  60285. else
  60286. pTDefRegMap(@Self)^.&set := $00000001;
  60287. end;
  60288. function TPORTF_LATF.getLATF0 : TBits_1; inline;
  60289. begin
  60290. getLATF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  60291. end;
  60292. procedure TPORTF_LATF.setLATF1; inline;
  60293. begin
  60294. pTDefRegMap(@Self)^.&set := $00000002;
  60295. end;
  60296. procedure TPORTF_LATF.clearLATF1; inline;
  60297. begin
  60298. pTDefRegMap(@Self)^.clr := $00000002;
  60299. end;
  60300. procedure TPORTF_LATF.setLATF1(thebits : TBits_1); inline;
  60301. begin
  60302. if thebits = 0 then
  60303. pTDefRegMap(@Self)^.clr := $00000002
  60304. else
  60305. pTDefRegMap(@Self)^.&set := $00000002;
  60306. end;
  60307. function TPORTF_LATF.getLATF1 : TBits_1; inline;
  60308. begin
  60309. getLATF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  60310. end;
  60311. procedure TPORTF_LATF.setLATF2; inline;
  60312. begin
  60313. pTDefRegMap(@Self)^.&set := $00000004;
  60314. end;
  60315. procedure TPORTF_LATF.clearLATF2; inline;
  60316. begin
  60317. pTDefRegMap(@Self)^.clr := $00000004;
  60318. end;
  60319. procedure TPORTF_LATF.setLATF2(thebits : TBits_1); inline;
  60320. begin
  60321. if thebits = 0 then
  60322. pTDefRegMap(@Self)^.clr := $00000004
  60323. else
  60324. pTDefRegMap(@Self)^.&set := $00000004;
  60325. end;
  60326. function TPORTF_LATF.getLATF2 : TBits_1; inline;
  60327. begin
  60328. getLATF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60329. end;
  60330. procedure TPORTF_LATF.setLATF3; inline;
  60331. begin
  60332. pTDefRegMap(@Self)^.&set := $00000008;
  60333. end;
  60334. procedure TPORTF_LATF.clearLATF3; inline;
  60335. begin
  60336. pTDefRegMap(@Self)^.clr := $00000008;
  60337. end;
  60338. procedure TPORTF_LATF.setLATF3(thebits : TBits_1); inline;
  60339. begin
  60340. if thebits = 0 then
  60341. pTDefRegMap(@Self)^.clr := $00000008
  60342. else
  60343. pTDefRegMap(@Self)^.&set := $00000008;
  60344. end;
  60345. function TPORTF_LATF.getLATF3 : TBits_1; inline;
  60346. begin
  60347. getLATF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60348. end;
  60349. procedure TPORTF_LATF.setLATF4; inline;
  60350. begin
  60351. pTDefRegMap(@Self)^.&set := $00000010;
  60352. end;
  60353. procedure TPORTF_LATF.clearLATF4; inline;
  60354. begin
  60355. pTDefRegMap(@Self)^.clr := $00000010;
  60356. end;
  60357. procedure TPORTF_LATF.setLATF4(thebits : TBits_1); inline;
  60358. begin
  60359. if thebits = 0 then
  60360. pTDefRegMap(@Self)^.clr := $00000010
  60361. else
  60362. pTDefRegMap(@Self)^.&set := $00000010;
  60363. end;
  60364. function TPORTF_LATF.getLATF4 : TBits_1; inline;
  60365. begin
  60366. getLATF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  60367. end;
  60368. procedure TPORTF_LATF.setLATF5; inline;
  60369. begin
  60370. pTDefRegMap(@Self)^.&set := $00000020;
  60371. end;
  60372. procedure TPORTF_LATF.clearLATF5; inline;
  60373. begin
  60374. pTDefRegMap(@Self)^.clr := $00000020;
  60375. end;
  60376. procedure TPORTF_LATF.setLATF5(thebits : TBits_1); inline;
  60377. begin
  60378. if thebits = 0 then
  60379. pTDefRegMap(@Self)^.clr := $00000020
  60380. else
  60381. pTDefRegMap(@Self)^.&set := $00000020;
  60382. end;
  60383. function TPORTF_LATF.getLATF5 : TBits_1; inline;
  60384. begin
  60385. getLATF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  60386. end;
  60387. procedure TPORTF_LATF.setw(thebits : TBits_32); inline;
  60388. begin
  60389. pTDefRegMap(@Self)^.val := thebits;
  60390. end;
  60391. function TPORTF_LATF.getw : TBits_32; inline;
  60392. begin
  60393. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60394. end;
  60395. procedure TPORTF_ODCF.setODCF0; inline;
  60396. begin
  60397. pTDefRegMap(@Self)^.&set := $00000001;
  60398. end;
  60399. procedure TPORTF_ODCF.clearODCF0; inline;
  60400. begin
  60401. pTDefRegMap(@Self)^.clr := $00000001;
  60402. end;
  60403. procedure TPORTF_ODCF.setODCF0(thebits : TBits_1); inline;
  60404. begin
  60405. if thebits = 0 then
  60406. pTDefRegMap(@Self)^.clr := $00000001
  60407. else
  60408. pTDefRegMap(@Self)^.&set := $00000001;
  60409. end;
  60410. function TPORTF_ODCF.getODCF0 : TBits_1; inline;
  60411. begin
  60412. getODCF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  60413. end;
  60414. procedure TPORTF_ODCF.setODCF1; inline;
  60415. begin
  60416. pTDefRegMap(@Self)^.&set := $00000002;
  60417. end;
  60418. procedure TPORTF_ODCF.clearODCF1; inline;
  60419. begin
  60420. pTDefRegMap(@Self)^.clr := $00000002;
  60421. end;
  60422. procedure TPORTF_ODCF.setODCF1(thebits : TBits_1); inline;
  60423. begin
  60424. if thebits = 0 then
  60425. pTDefRegMap(@Self)^.clr := $00000002
  60426. else
  60427. pTDefRegMap(@Self)^.&set := $00000002;
  60428. end;
  60429. function TPORTF_ODCF.getODCF1 : TBits_1; inline;
  60430. begin
  60431. getODCF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  60432. end;
  60433. procedure TPORTF_ODCF.setODCF2; inline;
  60434. begin
  60435. pTDefRegMap(@Self)^.&set := $00000004;
  60436. end;
  60437. procedure TPORTF_ODCF.clearODCF2; inline;
  60438. begin
  60439. pTDefRegMap(@Self)^.clr := $00000004;
  60440. end;
  60441. procedure TPORTF_ODCF.setODCF2(thebits : TBits_1); inline;
  60442. begin
  60443. if thebits = 0 then
  60444. pTDefRegMap(@Self)^.clr := $00000004
  60445. else
  60446. pTDefRegMap(@Self)^.&set := $00000004;
  60447. end;
  60448. function TPORTF_ODCF.getODCF2 : TBits_1; inline;
  60449. begin
  60450. getODCF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60451. end;
  60452. procedure TPORTF_ODCF.setODCF3; inline;
  60453. begin
  60454. pTDefRegMap(@Self)^.&set := $00000008;
  60455. end;
  60456. procedure TPORTF_ODCF.clearODCF3; inline;
  60457. begin
  60458. pTDefRegMap(@Self)^.clr := $00000008;
  60459. end;
  60460. procedure TPORTF_ODCF.setODCF3(thebits : TBits_1); inline;
  60461. begin
  60462. if thebits = 0 then
  60463. pTDefRegMap(@Self)^.clr := $00000008
  60464. else
  60465. pTDefRegMap(@Self)^.&set := $00000008;
  60466. end;
  60467. function TPORTF_ODCF.getODCF3 : TBits_1; inline;
  60468. begin
  60469. getODCF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60470. end;
  60471. procedure TPORTF_ODCF.setODCF4; inline;
  60472. begin
  60473. pTDefRegMap(@Self)^.&set := $00000010;
  60474. end;
  60475. procedure TPORTF_ODCF.clearODCF4; inline;
  60476. begin
  60477. pTDefRegMap(@Self)^.clr := $00000010;
  60478. end;
  60479. procedure TPORTF_ODCF.setODCF4(thebits : TBits_1); inline;
  60480. begin
  60481. if thebits = 0 then
  60482. pTDefRegMap(@Self)^.clr := $00000010
  60483. else
  60484. pTDefRegMap(@Self)^.&set := $00000010;
  60485. end;
  60486. function TPORTF_ODCF.getODCF4 : TBits_1; inline;
  60487. begin
  60488. getODCF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  60489. end;
  60490. procedure TPORTF_ODCF.setODCF5; inline;
  60491. begin
  60492. pTDefRegMap(@Self)^.&set := $00000020;
  60493. end;
  60494. procedure TPORTF_ODCF.clearODCF5; inline;
  60495. begin
  60496. pTDefRegMap(@Self)^.clr := $00000020;
  60497. end;
  60498. procedure TPORTF_ODCF.setODCF5(thebits : TBits_1); inline;
  60499. begin
  60500. if thebits = 0 then
  60501. pTDefRegMap(@Self)^.clr := $00000020
  60502. else
  60503. pTDefRegMap(@Self)^.&set := $00000020;
  60504. end;
  60505. function TPORTF_ODCF.getODCF5 : TBits_1; inline;
  60506. begin
  60507. getODCF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  60508. end;
  60509. procedure TPORTF_ODCF.setw(thebits : TBits_32); inline;
  60510. begin
  60511. pTDefRegMap(@Self)^.val := thebits;
  60512. end;
  60513. function TPORTF_ODCF.getw : TBits_32; inline;
  60514. begin
  60515. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60516. end;
  60517. procedure TPORTG_TRISG.setTRISG2; inline;
  60518. begin
  60519. pTDefRegMap(@Self)^.&set := $00000004;
  60520. end;
  60521. procedure TPORTG_TRISG.clearTRISG2; inline;
  60522. begin
  60523. pTDefRegMap(@Self)^.clr := $00000004;
  60524. end;
  60525. procedure TPORTG_TRISG.setTRISG2(thebits : TBits_1); inline;
  60526. begin
  60527. if thebits = 0 then
  60528. pTDefRegMap(@Self)^.clr := $00000004
  60529. else
  60530. pTDefRegMap(@Self)^.&set := $00000004;
  60531. end;
  60532. function TPORTG_TRISG.getTRISG2 : TBits_1; inline;
  60533. begin
  60534. getTRISG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60535. end;
  60536. procedure TPORTG_TRISG.setTRISG3; inline;
  60537. begin
  60538. pTDefRegMap(@Self)^.&set := $00000008;
  60539. end;
  60540. procedure TPORTG_TRISG.clearTRISG3; inline;
  60541. begin
  60542. pTDefRegMap(@Self)^.clr := $00000008;
  60543. end;
  60544. procedure TPORTG_TRISG.setTRISG3(thebits : TBits_1); inline;
  60545. begin
  60546. if thebits = 0 then
  60547. pTDefRegMap(@Self)^.clr := $00000008
  60548. else
  60549. pTDefRegMap(@Self)^.&set := $00000008;
  60550. end;
  60551. function TPORTG_TRISG.getTRISG3 : TBits_1; inline;
  60552. begin
  60553. getTRISG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60554. end;
  60555. procedure TPORTG_TRISG.setTRISG6; inline;
  60556. begin
  60557. pTDefRegMap(@Self)^.&set := $00000040;
  60558. end;
  60559. procedure TPORTG_TRISG.clearTRISG6; inline;
  60560. begin
  60561. pTDefRegMap(@Self)^.clr := $00000040;
  60562. end;
  60563. procedure TPORTG_TRISG.setTRISG6(thebits : TBits_1); inline;
  60564. begin
  60565. if thebits = 0 then
  60566. pTDefRegMap(@Self)^.clr := $00000040
  60567. else
  60568. pTDefRegMap(@Self)^.&set := $00000040;
  60569. end;
  60570. function TPORTG_TRISG.getTRISG6 : TBits_1; inline;
  60571. begin
  60572. getTRISG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  60573. end;
  60574. procedure TPORTG_TRISG.setTRISG7; inline;
  60575. begin
  60576. pTDefRegMap(@Self)^.&set := $00000080;
  60577. end;
  60578. procedure TPORTG_TRISG.clearTRISG7; inline;
  60579. begin
  60580. pTDefRegMap(@Self)^.clr := $00000080;
  60581. end;
  60582. procedure TPORTG_TRISG.setTRISG7(thebits : TBits_1); inline;
  60583. begin
  60584. if thebits = 0 then
  60585. pTDefRegMap(@Self)^.clr := $00000080
  60586. else
  60587. pTDefRegMap(@Self)^.&set := $00000080;
  60588. end;
  60589. function TPORTG_TRISG.getTRISG7 : TBits_1; inline;
  60590. begin
  60591. getTRISG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  60592. end;
  60593. procedure TPORTG_TRISG.setTRISG8; inline;
  60594. begin
  60595. pTDefRegMap(@Self)^.&set := $00000100;
  60596. end;
  60597. procedure TPORTG_TRISG.clearTRISG8; inline;
  60598. begin
  60599. pTDefRegMap(@Self)^.clr := $00000100;
  60600. end;
  60601. procedure TPORTG_TRISG.setTRISG8(thebits : TBits_1); inline;
  60602. begin
  60603. if thebits = 0 then
  60604. pTDefRegMap(@Self)^.clr := $00000100
  60605. else
  60606. pTDefRegMap(@Self)^.&set := $00000100;
  60607. end;
  60608. function TPORTG_TRISG.getTRISG8 : TBits_1; inline;
  60609. begin
  60610. getTRISG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  60611. end;
  60612. procedure TPORTG_TRISG.setTRISG9; inline;
  60613. begin
  60614. pTDefRegMap(@Self)^.&set := $00000200;
  60615. end;
  60616. procedure TPORTG_TRISG.clearTRISG9; inline;
  60617. begin
  60618. pTDefRegMap(@Self)^.clr := $00000200;
  60619. end;
  60620. procedure TPORTG_TRISG.setTRISG9(thebits : TBits_1); inline;
  60621. begin
  60622. if thebits = 0 then
  60623. pTDefRegMap(@Self)^.clr := $00000200
  60624. else
  60625. pTDefRegMap(@Self)^.&set := $00000200;
  60626. end;
  60627. function TPORTG_TRISG.getTRISG9 : TBits_1; inline;
  60628. begin
  60629. getTRISG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  60630. end;
  60631. procedure TPORTG_TRISG.setw(thebits : TBits_32); inline;
  60632. begin
  60633. pTDefRegMap(@Self)^.val := thebits;
  60634. end;
  60635. function TPORTG_TRISG.getw : TBits_32; inline;
  60636. begin
  60637. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60638. end;
  60639. procedure TPORTG_PORTG.setRG2; inline;
  60640. begin
  60641. pTDefRegMap(@Self)^.&set := $00000004;
  60642. end;
  60643. procedure TPORTG_PORTG.clearRG2; inline;
  60644. begin
  60645. pTDefRegMap(@Self)^.clr := $00000004;
  60646. end;
  60647. procedure TPORTG_PORTG.setRG2(thebits : TBits_1); inline;
  60648. begin
  60649. if thebits = 0 then
  60650. pTDefRegMap(@Self)^.clr := $00000004
  60651. else
  60652. pTDefRegMap(@Self)^.&set := $00000004;
  60653. end;
  60654. function TPORTG_PORTG.getRG2 : TBits_1; inline;
  60655. begin
  60656. getRG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60657. end;
  60658. procedure TPORTG_PORTG.setRG3; inline;
  60659. begin
  60660. pTDefRegMap(@Self)^.&set := $00000008;
  60661. end;
  60662. procedure TPORTG_PORTG.clearRG3; inline;
  60663. begin
  60664. pTDefRegMap(@Self)^.clr := $00000008;
  60665. end;
  60666. procedure TPORTG_PORTG.setRG3(thebits : TBits_1); inline;
  60667. begin
  60668. if thebits = 0 then
  60669. pTDefRegMap(@Self)^.clr := $00000008
  60670. else
  60671. pTDefRegMap(@Self)^.&set := $00000008;
  60672. end;
  60673. function TPORTG_PORTG.getRG3 : TBits_1; inline;
  60674. begin
  60675. getRG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60676. end;
  60677. procedure TPORTG_PORTG.setRG6; inline;
  60678. begin
  60679. pTDefRegMap(@Self)^.&set := $00000040;
  60680. end;
  60681. procedure TPORTG_PORTG.clearRG6; inline;
  60682. begin
  60683. pTDefRegMap(@Self)^.clr := $00000040;
  60684. end;
  60685. procedure TPORTG_PORTG.setRG6(thebits : TBits_1); inline;
  60686. begin
  60687. if thebits = 0 then
  60688. pTDefRegMap(@Self)^.clr := $00000040
  60689. else
  60690. pTDefRegMap(@Self)^.&set := $00000040;
  60691. end;
  60692. function TPORTG_PORTG.getRG6 : TBits_1; inline;
  60693. begin
  60694. getRG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  60695. end;
  60696. procedure TPORTG_PORTG.setRG7; inline;
  60697. begin
  60698. pTDefRegMap(@Self)^.&set := $00000080;
  60699. end;
  60700. procedure TPORTG_PORTG.clearRG7; inline;
  60701. begin
  60702. pTDefRegMap(@Self)^.clr := $00000080;
  60703. end;
  60704. procedure TPORTG_PORTG.setRG7(thebits : TBits_1); inline;
  60705. begin
  60706. if thebits = 0 then
  60707. pTDefRegMap(@Self)^.clr := $00000080
  60708. else
  60709. pTDefRegMap(@Self)^.&set := $00000080;
  60710. end;
  60711. function TPORTG_PORTG.getRG7 : TBits_1; inline;
  60712. begin
  60713. getRG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  60714. end;
  60715. procedure TPORTG_PORTG.setRG8; inline;
  60716. begin
  60717. pTDefRegMap(@Self)^.&set := $00000100;
  60718. end;
  60719. procedure TPORTG_PORTG.clearRG8; inline;
  60720. begin
  60721. pTDefRegMap(@Self)^.clr := $00000100;
  60722. end;
  60723. procedure TPORTG_PORTG.setRG8(thebits : TBits_1); inline;
  60724. begin
  60725. if thebits = 0 then
  60726. pTDefRegMap(@Self)^.clr := $00000100
  60727. else
  60728. pTDefRegMap(@Self)^.&set := $00000100;
  60729. end;
  60730. function TPORTG_PORTG.getRG8 : TBits_1; inline;
  60731. begin
  60732. getRG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  60733. end;
  60734. procedure TPORTG_PORTG.setRG9; inline;
  60735. begin
  60736. pTDefRegMap(@Self)^.&set := $00000200;
  60737. end;
  60738. procedure TPORTG_PORTG.clearRG9; inline;
  60739. begin
  60740. pTDefRegMap(@Self)^.clr := $00000200;
  60741. end;
  60742. procedure TPORTG_PORTG.setRG9(thebits : TBits_1); inline;
  60743. begin
  60744. if thebits = 0 then
  60745. pTDefRegMap(@Self)^.clr := $00000200
  60746. else
  60747. pTDefRegMap(@Self)^.&set := $00000200;
  60748. end;
  60749. function TPORTG_PORTG.getRG9 : TBits_1; inline;
  60750. begin
  60751. getRG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  60752. end;
  60753. procedure TPORTG_PORTG.setw(thebits : TBits_32); inline;
  60754. begin
  60755. pTDefRegMap(@Self)^.val := thebits;
  60756. end;
  60757. function TPORTG_PORTG.getw : TBits_32; inline;
  60758. begin
  60759. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60760. end;
  60761. procedure TPORTG_LATG.setLATG2; inline;
  60762. begin
  60763. pTDefRegMap(@Self)^.&set := $00000004;
  60764. end;
  60765. procedure TPORTG_LATG.clearLATG2; inline;
  60766. begin
  60767. pTDefRegMap(@Self)^.clr := $00000004;
  60768. end;
  60769. procedure TPORTG_LATG.setLATG2(thebits : TBits_1); inline;
  60770. begin
  60771. if thebits = 0 then
  60772. pTDefRegMap(@Self)^.clr := $00000004
  60773. else
  60774. pTDefRegMap(@Self)^.&set := $00000004;
  60775. end;
  60776. function TPORTG_LATG.getLATG2 : TBits_1; inline;
  60777. begin
  60778. getLATG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60779. end;
  60780. procedure TPORTG_LATG.setLATG3; inline;
  60781. begin
  60782. pTDefRegMap(@Self)^.&set := $00000008;
  60783. end;
  60784. procedure TPORTG_LATG.clearLATG3; inline;
  60785. begin
  60786. pTDefRegMap(@Self)^.clr := $00000008;
  60787. end;
  60788. procedure TPORTG_LATG.setLATG3(thebits : TBits_1); inline;
  60789. begin
  60790. if thebits = 0 then
  60791. pTDefRegMap(@Self)^.clr := $00000008
  60792. else
  60793. pTDefRegMap(@Self)^.&set := $00000008;
  60794. end;
  60795. function TPORTG_LATG.getLATG3 : TBits_1; inline;
  60796. begin
  60797. getLATG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60798. end;
  60799. procedure TPORTG_LATG.setLATG6; inline;
  60800. begin
  60801. pTDefRegMap(@Self)^.&set := $00000040;
  60802. end;
  60803. procedure TPORTG_LATG.clearLATG6; inline;
  60804. begin
  60805. pTDefRegMap(@Self)^.clr := $00000040;
  60806. end;
  60807. procedure TPORTG_LATG.setLATG6(thebits : TBits_1); inline;
  60808. begin
  60809. if thebits = 0 then
  60810. pTDefRegMap(@Self)^.clr := $00000040
  60811. else
  60812. pTDefRegMap(@Self)^.&set := $00000040;
  60813. end;
  60814. function TPORTG_LATG.getLATG6 : TBits_1; inline;
  60815. begin
  60816. getLATG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  60817. end;
  60818. procedure TPORTG_LATG.setLATG7; inline;
  60819. begin
  60820. pTDefRegMap(@Self)^.&set := $00000080;
  60821. end;
  60822. procedure TPORTG_LATG.clearLATG7; inline;
  60823. begin
  60824. pTDefRegMap(@Self)^.clr := $00000080;
  60825. end;
  60826. procedure TPORTG_LATG.setLATG7(thebits : TBits_1); inline;
  60827. begin
  60828. if thebits = 0 then
  60829. pTDefRegMap(@Self)^.clr := $00000080
  60830. else
  60831. pTDefRegMap(@Self)^.&set := $00000080;
  60832. end;
  60833. function TPORTG_LATG.getLATG7 : TBits_1; inline;
  60834. begin
  60835. getLATG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  60836. end;
  60837. procedure TPORTG_LATG.setLATG8; inline;
  60838. begin
  60839. pTDefRegMap(@Self)^.&set := $00000100;
  60840. end;
  60841. procedure TPORTG_LATG.clearLATG8; inline;
  60842. begin
  60843. pTDefRegMap(@Self)^.clr := $00000100;
  60844. end;
  60845. procedure TPORTG_LATG.setLATG8(thebits : TBits_1); inline;
  60846. begin
  60847. if thebits = 0 then
  60848. pTDefRegMap(@Self)^.clr := $00000100
  60849. else
  60850. pTDefRegMap(@Self)^.&set := $00000100;
  60851. end;
  60852. function TPORTG_LATG.getLATG8 : TBits_1; inline;
  60853. begin
  60854. getLATG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  60855. end;
  60856. procedure TPORTG_LATG.setLATG9; inline;
  60857. begin
  60858. pTDefRegMap(@Self)^.&set := $00000200;
  60859. end;
  60860. procedure TPORTG_LATG.clearLATG9; inline;
  60861. begin
  60862. pTDefRegMap(@Self)^.clr := $00000200;
  60863. end;
  60864. procedure TPORTG_LATG.setLATG9(thebits : TBits_1); inline;
  60865. begin
  60866. if thebits = 0 then
  60867. pTDefRegMap(@Self)^.clr := $00000200
  60868. else
  60869. pTDefRegMap(@Self)^.&set := $00000200;
  60870. end;
  60871. function TPORTG_LATG.getLATG9 : TBits_1; inline;
  60872. begin
  60873. getLATG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  60874. end;
  60875. procedure TPORTG_LATG.setw(thebits : TBits_32); inline;
  60876. begin
  60877. pTDefRegMap(@Self)^.val := thebits;
  60878. end;
  60879. function TPORTG_LATG.getw : TBits_32; inline;
  60880. begin
  60881. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60882. end;
  60883. procedure TPORTG_ODCG.setODCG2; inline;
  60884. begin
  60885. pTDefRegMap(@Self)^.&set := $00000004;
  60886. end;
  60887. procedure TPORTG_ODCG.clearODCG2; inline;
  60888. begin
  60889. pTDefRegMap(@Self)^.clr := $00000004;
  60890. end;
  60891. procedure TPORTG_ODCG.setODCG2(thebits : TBits_1); inline;
  60892. begin
  60893. if thebits = 0 then
  60894. pTDefRegMap(@Self)^.clr := $00000004
  60895. else
  60896. pTDefRegMap(@Self)^.&set := $00000004;
  60897. end;
  60898. function TPORTG_ODCG.getODCG2 : TBits_1; inline;
  60899. begin
  60900. getODCG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60901. end;
  60902. procedure TPORTG_ODCG.setODCG3; inline;
  60903. begin
  60904. pTDefRegMap(@Self)^.&set := $00000008;
  60905. end;
  60906. procedure TPORTG_ODCG.clearODCG3; inline;
  60907. begin
  60908. pTDefRegMap(@Self)^.clr := $00000008;
  60909. end;
  60910. procedure TPORTG_ODCG.setODCG3(thebits : TBits_1); inline;
  60911. begin
  60912. if thebits = 0 then
  60913. pTDefRegMap(@Self)^.clr := $00000008
  60914. else
  60915. pTDefRegMap(@Self)^.&set := $00000008;
  60916. end;
  60917. function TPORTG_ODCG.getODCG3 : TBits_1; inline;
  60918. begin
  60919. getODCG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60920. end;
  60921. procedure TPORTG_ODCG.setODCG6; inline;
  60922. begin
  60923. pTDefRegMap(@Self)^.&set := $00000040;
  60924. end;
  60925. procedure TPORTG_ODCG.clearODCG6; inline;
  60926. begin
  60927. pTDefRegMap(@Self)^.clr := $00000040;
  60928. end;
  60929. procedure TPORTG_ODCG.setODCG6(thebits : TBits_1); inline;
  60930. begin
  60931. if thebits = 0 then
  60932. pTDefRegMap(@Self)^.clr := $00000040
  60933. else
  60934. pTDefRegMap(@Self)^.&set := $00000040;
  60935. end;
  60936. function TPORTG_ODCG.getODCG6 : TBits_1; inline;
  60937. begin
  60938. getODCG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  60939. end;
  60940. procedure TPORTG_ODCG.setODCG7; inline;
  60941. begin
  60942. pTDefRegMap(@Self)^.&set := $00000080;
  60943. end;
  60944. procedure TPORTG_ODCG.clearODCG7; inline;
  60945. begin
  60946. pTDefRegMap(@Self)^.clr := $00000080;
  60947. end;
  60948. procedure TPORTG_ODCG.setODCG7(thebits : TBits_1); inline;
  60949. begin
  60950. if thebits = 0 then
  60951. pTDefRegMap(@Self)^.clr := $00000080
  60952. else
  60953. pTDefRegMap(@Self)^.&set := $00000080;
  60954. end;
  60955. function TPORTG_ODCG.getODCG7 : TBits_1; inline;
  60956. begin
  60957. getODCG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  60958. end;
  60959. procedure TPORTG_ODCG.setODCG8; inline;
  60960. begin
  60961. pTDefRegMap(@Self)^.&set := $00000100;
  60962. end;
  60963. procedure TPORTG_ODCG.clearODCG8; inline;
  60964. begin
  60965. pTDefRegMap(@Self)^.clr := $00000100;
  60966. end;
  60967. procedure TPORTG_ODCG.setODCG8(thebits : TBits_1); inline;
  60968. begin
  60969. if thebits = 0 then
  60970. pTDefRegMap(@Self)^.clr := $00000100
  60971. else
  60972. pTDefRegMap(@Self)^.&set := $00000100;
  60973. end;
  60974. function TPORTG_ODCG.getODCG8 : TBits_1; inline;
  60975. begin
  60976. getODCG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  60977. end;
  60978. procedure TPORTG_ODCG.setODCG9; inline;
  60979. begin
  60980. pTDefRegMap(@Self)^.&set := $00000200;
  60981. end;
  60982. procedure TPORTG_ODCG.clearODCG9; inline;
  60983. begin
  60984. pTDefRegMap(@Self)^.clr := $00000200;
  60985. end;
  60986. procedure TPORTG_ODCG.setODCG9(thebits : TBits_1); inline;
  60987. begin
  60988. if thebits = 0 then
  60989. pTDefRegMap(@Self)^.clr := $00000200
  60990. else
  60991. pTDefRegMap(@Self)^.&set := $00000200;
  60992. end;
  60993. function TPORTG_ODCG.getODCG9 : TBits_1; inline;
  60994. begin
  60995. getODCG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  60996. end;
  60997. procedure TPORTG_ODCG.setw(thebits : TBits_32); inline;
  60998. begin
  60999. pTDefRegMap(@Self)^.val := thebits;
  61000. end;
  61001. function TPORTG_ODCG.getw : TBits_32; inline;
  61002. begin
  61003. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61004. end;
  61005. procedure TPORTG_CNCON.setSIDL; inline;
  61006. begin
  61007. pTDefRegMap(@Self)^.&set := $00002000;
  61008. end;
  61009. procedure TPORTG_CNCON.clearSIDL; inline;
  61010. begin
  61011. pTDefRegMap(@Self)^.clr := $00002000;
  61012. end;
  61013. procedure TPORTG_CNCON.setSIDL(thebits : TBits_1); inline;
  61014. begin
  61015. if thebits = 0 then
  61016. pTDefRegMap(@Self)^.clr := $00002000
  61017. else
  61018. pTDefRegMap(@Self)^.&set := $00002000;
  61019. end;
  61020. function TPORTG_CNCON.getSIDL : TBits_1; inline;
  61021. begin
  61022. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  61023. end;
  61024. procedure TPORTG_CNCON.setON; inline;
  61025. begin
  61026. pTDefRegMap(@Self)^.&set := $00008000;
  61027. end;
  61028. procedure TPORTG_CNCON.clearON; inline;
  61029. begin
  61030. pTDefRegMap(@Self)^.clr := $00008000;
  61031. end;
  61032. procedure TPORTG_CNCON.setON(thebits : TBits_1); inline;
  61033. begin
  61034. if thebits = 0 then
  61035. pTDefRegMap(@Self)^.clr := $00008000
  61036. else
  61037. pTDefRegMap(@Self)^.&set := $00008000;
  61038. end;
  61039. function TPORTG_CNCON.getON : TBits_1; inline;
  61040. begin
  61041. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  61042. end;
  61043. procedure TPORTG_CNCON.setw(thebits : TBits_32); inline;
  61044. begin
  61045. pTDefRegMap(@Self)^.val := thebits;
  61046. end;
  61047. function TPORTG_CNCON.getw : TBits_32; inline;
  61048. begin
  61049. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61050. end;
  61051. procedure TPORTG_CNEN.setCNEN0; inline;
  61052. begin
  61053. pTDefRegMap(@Self)^.&set := $00000001;
  61054. end;
  61055. procedure TPORTG_CNEN.clearCNEN0; inline;
  61056. begin
  61057. pTDefRegMap(@Self)^.clr := $00000001;
  61058. end;
  61059. procedure TPORTG_CNEN.setCNEN0(thebits : TBits_1); inline;
  61060. begin
  61061. if thebits = 0 then
  61062. pTDefRegMap(@Self)^.clr := $00000001
  61063. else
  61064. pTDefRegMap(@Self)^.&set := $00000001;
  61065. end;
  61066. function TPORTG_CNEN.getCNEN0 : TBits_1; inline;
  61067. begin
  61068. getCNEN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61069. end;
  61070. procedure TPORTG_CNEN.setCNEN1; inline;
  61071. begin
  61072. pTDefRegMap(@Self)^.&set := $00000002;
  61073. end;
  61074. procedure TPORTG_CNEN.clearCNEN1; inline;
  61075. begin
  61076. pTDefRegMap(@Self)^.clr := $00000002;
  61077. end;
  61078. procedure TPORTG_CNEN.setCNEN1(thebits : TBits_1); inline;
  61079. begin
  61080. if thebits = 0 then
  61081. pTDefRegMap(@Self)^.clr := $00000002
  61082. else
  61083. pTDefRegMap(@Self)^.&set := $00000002;
  61084. end;
  61085. function TPORTG_CNEN.getCNEN1 : TBits_1; inline;
  61086. begin
  61087. getCNEN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61088. end;
  61089. procedure TPORTG_CNEN.setCNEN2; inline;
  61090. begin
  61091. pTDefRegMap(@Self)^.&set := $00000004;
  61092. end;
  61093. procedure TPORTG_CNEN.clearCNEN2; inline;
  61094. begin
  61095. pTDefRegMap(@Self)^.clr := $00000004;
  61096. end;
  61097. procedure TPORTG_CNEN.setCNEN2(thebits : TBits_1); inline;
  61098. begin
  61099. if thebits = 0 then
  61100. pTDefRegMap(@Self)^.clr := $00000004
  61101. else
  61102. pTDefRegMap(@Self)^.&set := $00000004;
  61103. end;
  61104. function TPORTG_CNEN.getCNEN2 : TBits_1; inline;
  61105. begin
  61106. getCNEN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61107. end;
  61108. procedure TPORTG_CNEN.setCNEN3; inline;
  61109. begin
  61110. pTDefRegMap(@Self)^.&set := $00000008;
  61111. end;
  61112. procedure TPORTG_CNEN.clearCNEN3; inline;
  61113. begin
  61114. pTDefRegMap(@Self)^.clr := $00000008;
  61115. end;
  61116. procedure TPORTG_CNEN.setCNEN3(thebits : TBits_1); inline;
  61117. begin
  61118. if thebits = 0 then
  61119. pTDefRegMap(@Self)^.clr := $00000008
  61120. else
  61121. pTDefRegMap(@Self)^.&set := $00000008;
  61122. end;
  61123. function TPORTG_CNEN.getCNEN3 : TBits_1; inline;
  61124. begin
  61125. getCNEN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61126. end;
  61127. procedure TPORTG_CNEN.setCNEN4; inline;
  61128. begin
  61129. pTDefRegMap(@Self)^.&set := $00000010;
  61130. end;
  61131. procedure TPORTG_CNEN.clearCNEN4; inline;
  61132. begin
  61133. pTDefRegMap(@Self)^.clr := $00000010;
  61134. end;
  61135. procedure TPORTG_CNEN.setCNEN4(thebits : TBits_1); inline;
  61136. begin
  61137. if thebits = 0 then
  61138. pTDefRegMap(@Self)^.clr := $00000010
  61139. else
  61140. pTDefRegMap(@Self)^.&set := $00000010;
  61141. end;
  61142. function TPORTG_CNEN.getCNEN4 : TBits_1; inline;
  61143. begin
  61144. getCNEN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61145. end;
  61146. procedure TPORTG_CNEN.setCNEN5; inline;
  61147. begin
  61148. pTDefRegMap(@Self)^.&set := $00000020;
  61149. end;
  61150. procedure TPORTG_CNEN.clearCNEN5; inline;
  61151. begin
  61152. pTDefRegMap(@Self)^.clr := $00000020;
  61153. end;
  61154. procedure TPORTG_CNEN.setCNEN5(thebits : TBits_1); inline;
  61155. begin
  61156. if thebits = 0 then
  61157. pTDefRegMap(@Self)^.clr := $00000020
  61158. else
  61159. pTDefRegMap(@Self)^.&set := $00000020;
  61160. end;
  61161. function TPORTG_CNEN.getCNEN5 : TBits_1; inline;
  61162. begin
  61163. getCNEN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61164. end;
  61165. procedure TPORTG_CNEN.setCNEN6; inline;
  61166. begin
  61167. pTDefRegMap(@Self)^.&set := $00000040;
  61168. end;
  61169. procedure TPORTG_CNEN.clearCNEN6; inline;
  61170. begin
  61171. pTDefRegMap(@Self)^.clr := $00000040;
  61172. end;
  61173. procedure TPORTG_CNEN.setCNEN6(thebits : TBits_1); inline;
  61174. begin
  61175. if thebits = 0 then
  61176. pTDefRegMap(@Self)^.clr := $00000040
  61177. else
  61178. pTDefRegMap(@Self)^.&set := $00000040;
  61179. end;
  61180. function TPORTG_CNEN.getCNEN6 : TBits_1; inline;
  61181. begin
  61182. getCNEN6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61183. end;
  61184. procedure TPORTG_CNEN.setCNEN7; inline;
  61185. begin
  61186. pTDefRegMap(@Self)^.&set := $00000080;
  61187. end;
  61188. procedure TPORTG_CNEN.clearCNEN7; inline;
  61189. begin
  61190. pTDefRegMap(@Self)^.clr := $00000080;
  61191. end;
  61192. procedure TPORTG_CNEN.setCNEN7(thebits : TBits_1); inline;
  61193. begin
  61194. if thebits = 0 then
  61195. pTDefRegMap(@Self)^.clr := $00000080
  61196. else
  61197. pTDefRegMap(@Self)^.&set := $00000080;
  61198. end;
  61199. function TPORTG_CNEN.getCNEN7 : TBits_1; inline;
  61200. begin
  61201. getCNEN7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61202. end;
  61203. procedure TPORTG_CNEN.setCNEN8; inline;
  61204. begin
  61205. pTDefRegMap(@Self)^.&set := $00000100;
  61206. end;
  61207. procedure TPORTG_CNEN.clearCNEN8; inline;
  61208. begin
  61209. pTDefRegMap(@Self)^.clr := $00000100;
  61210. end;
  61211. procedure TPORTG_CNEN.setCNEN8(thebits : TBits_1); inline;
  61212. begin
  61213. if thebits = 0 then
  61214. pTDefRegMap(@Self)^.clr := $00000100
  61215. else
  61216. pTDefRegMap(@Self)^.&set := $00000100;
  61217. end;
  61218. function TPORTG_CNEN.getCNEN8 : TBits_1; inline;
  61219. begin
  61220. getCNEN8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61221. end;
  61222. procedure TPORTG_CNEN.setCNEN9; inline;
  61223. begin
  61224. pTDefRegMap(@Self)^.&set := $00000200;
  61225. end;
  61226. procedure TPORTG_CNEN.clearCNEN9; inline;
  61227. begin
  61228. pTDefRegMap(@Self)^.clr := $00000200;
  61229. end;
  61230. procedure TPORTG_CNEN.setCNEN9(thebits : TBits_1); inline;
  61231. begin
  61232. if thebits = 0 then
  61233. pTDefRegMap(@Self)^.clr := $00000200
  61234. else
  61235. pTDefRegMap(@Self)^.&set := $00000200;
  61236. end;
  61237. function TPORTG_CNEN.getCNEN9 : TBits_1; inline;
  61238. begin
  61239. getCNEN9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61240. end;
  61241. procedure TPORTG_CNEN.setCNEN10; inline;
  61242. begin
  61243. pTDefRegMap(@Self)^.&set := $00000400;
  61244. end;
  61245. procedure TPORTG_CNEN.clearCNEN10; inline;
  61246. begin
  61247. pTDefRegMap(@Self)^.clr := $00000400;
  61248. end;
  61249. procedure TPORTG_CNEN.setCNEN10(thebits : TBits_1); inline;
  61250. begin
  61251. if thebits = 0 then
  61252. pTDefRegMap(@Self)^.clr := $00000400
  61253. else
  61254. pTDefRegMap(@Self)^.&set := $00000400;
  61255. end;
  61256. function TPORTG_CNEN.getCNEN10 : TBits_1; inline;
  61257. begin
  61258. getCNEN10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  61259. end;
  61260. procedure TPORTG_CNEN.setCNEN11; inline;
  61261. begin
  61262. pTDefRegMap(@Self)^.&set := $00000800;
  61263. end;
  61264. procedure TPORTG_CNEN.clearCNEN11; inline;
  61265. begin
  61266. pTDefRegMap(@Self)^.clr := $00000800;
  61267. end;
  61268. procedure TPORTG_CNEN.setCNEN11(thebits : TBits_1); inline;
  61269. begin
  61270. if thebits = 0 then
  61271. pTDefRegMap(@Self)^.clr := $00000800
  61272. else
  61273. pTDefRegMap(@Self)^.&set := $00000800;
  61274. end;
  61275. function TPORTG_CNEN.getCNEN11 : TBits_1; inline;
  61276. begin
  61277. getCNEN11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  61278. end;
  61279. procedure TPORTG_CNEN.setCNEN12; inline;
  61280. begin
  61281. pTDefRegMap(@Self)^.&set := $00001000;
  61282. end;
  61283. procedure TPORTG_CNEN.clearCNEN12; inline;
  61284. begin
  61285. pTDefRegMap(@Self)^.clr := $00001000;
  61286. end;
  61287. procedure TPORTG_CNEN.setCNEN12(thebits : TBits_1); inline;
  61288. begin
  61289. if thebits = 0 then
  61290. pTDefRegMap(@Self)^.clr := $00001000
  61291. else
  61292. pTDefRegMap(@Self)^.&set := $00001000;
  61293. end;
  61294. function TPORTG_CNEN.getCNEN12 : TBits_1; inline;
  61295. begin
  61296. getCNEN12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  61297. end;
  61298. procedure TPORTG_CNEN.setCNEN13; inline;
  61299. begin
  61300. pTDefRegMap(@Self)^.&set := $00002000;
  61301. end;
  61302. procedure TPORTG_CNEN.clearCNEN13; inline;
  61303. begin
  61304. pTDefRegMap(@Self)^.clr := $00002000;
  61305. end;
  61306. procedure TPORTG_CNEN.setCNEN13(thebits : TBits_1); inline;
  61307. begin
  61308. if thebits = 0 then
  61309. pTDefRegMap(@Self)^.clr := $00002000
  61310. else
  61311. pTDefRegMap(@Self)^.&set := $00002000;
  61312. end;
  61313. function TPORTG_CNEN.getCNEN13 : TBits_1; inline;
  61314. begin
  61315. getCNEN13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  61316. end;
  61317. procedure TPORTG_CNEN.setCNEN14; inline;
  61318. begin
  61319. pTDefRegMap(@Self)^.&set := $00004000;
  61320. end;
  61321. procedure TPORTG_CNEN.clearCNEN14; inline;
  61322. begin
  61323. pTDefRegMap(@Self)^.clr := $00004000;
  61324. end;
  61325. procedure TPORTG_CNEN.setCNEN14(thebits : TBits_1); inline;
  61326. begin
  61327. if thebits = 0 then
  61328. pTDefRegMap(@Self)^.clr := $00004000
  61329. else
  61330. pTDefRegMap(@Self)^.&set := $00004000;
  61331. end;
  61332. function TPORTG_CNEN.getCNEN14 : TBits_1; inline;
  61333. begin
  61334. getCNEN14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  61335. end;
  61336. procedure TPORTG_CNEN.setCNEN15; inline;
  61337. begin
  61338. pTDefRegMap(@Self)^.&set := $00008000;
  61339. end;
  61340. procedure TPORTG_CNEN.clearCNEN15; inline;
  61341. begin
  61342. pTDefRegMap(@Self)^.clr := $00008000;
  61343. end;
  61344. procedure TPORTG_CNEN.setCNEN15(thebits : TBits_1); inline;
  61345. begin
  61346. if thebits = 0 then
  61347. pTDefRegMap(@Self)^.clr := $00008000
  61348. else
  61349. pTDefRegMap(@Self)^.&set := $00008000;
  61350. end;
  61351. function TPORTG_CNEN.getCNEN15 : TBits_1; inline;
  61352. begin
  61353. getCNEN15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  61354. end;
  61355. procedure TPORTG_CNEN.setCNEN16; inline;
  61356. begin
  61357. pTDefRegMap(@Self)^.&set := $00010000;
  61358. end;
  61359. procedure TPORTG_CNEN.clearCNEN16; inline;
  61360. begin
  61361. pTDefRegMap(@Self)^.clr := $00010000;
  61362. end;
  61363. procedure TPORTG_CNEN.setCNEN16(thebits : TBits_1); inline;
  61364. begin
  61365. if thebits = 0 then
  61366. pTDefRegMap(@Self)^.clr := $00010000
  61367. else
  61368. pTDefRegMap(@Self)^.&set := $00010000;
  61369. end;
  61370. function TPORTG_CNEN.getCNEN16 : TBits_1; inline;
  61371. begin
  61372. getCNEN16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  61373. end;
  61374. procedure TPORTG_CNEN.setCNEN17; inline;
  61375. begin
  61376. pTDefRegMap(@Self)^.&set := $00020000;
  61377. end;
  61378. procedure TPORTG_CNEN.clearCNEN17; inline;
  61379. begin
  61380. pTDefRegMap(@Self)^.clr := $00020000;
  61381. end;
  61382. procedure TPORTG_CNEN.setCNEN17(thebits : TBits_1); inline;
  61383. begin
  61384. if thebits = 0 then
  61385. pTDefRegMap(@Self)^.clr := $00020000
  61386. else
  61387. pTDefRegMap(@Self)^.&set := $00020000;
  61388. end;
  61389. function TPORTG_CNEN.getCNEN17 : TBits_1; inline;
  61390. begin
  61391. getCNEN17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  61392. end;
  61393. procedure TPORTG_CNEN.setCNEN18; inline;
  61394. begin
  61395. pTDefRegMap(@Self)^.&set := $00040000;
  61396. end;
  61397. procedure TPORTG_CNEN.clearCNEN18; inline;
  61398. begin
  61399. pTDefRegMap(@Self)^.clr := $00040000;
  61400. end;
  61401. procedure TPORTG_CNEN.setCNEN18(thebits : TBits_1); inline;
  61402. begin
  61403. if thebits = 0 then
  61404. pTDefRegMap(@Self)^.clr := $00040000
  61405. else
  61406. pTDefRegMap(@Self)^.&set := $00040000;
  61407. end;
  61408. function TPORTG_CNEN.getCNEN18 : TBits_1; inline;
  61409. begin
  61410. getCNEN18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  61411. end;
  61412. procedure TPORTG_CNEN.setw(thebits : TBits_32); inline;
  61413. begin
  61414. pTDefRegMap(@Self)^.val := thebits;
  61415. end;
  61416. function TPORTG_CNEN.getw : TBits_32; inline;
  61417. begin
  61418. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61419. end;
  61420. procedure TPORTG_CNPUE.setCNPUE0; inline;
  61421. begin
  61422. pTDefRegMap(@Self)^.&set := $00000001;
  61423. end;
  61424. procedure TPORTG_CNPUE.clearCNPUE0; inline;
  61425. begin
  61426. pTDefRegMap(@Self)^.clr := $00000001;
  61427. end;
  61428. procedure TPORTG_CNPUE.setCNPUE0(thebits : TBits_1); inline;
  61429. begin
  61430. if thebits = 0 then
  61431. pTDefRegMap(@Self)^.clr := $00000001
  61432. else
  61433. pTDefRegMap(@Self)^.&set := $00000001;
  61434. end;
  61435. function TPORTG_CNPUE.getCNPUE0 : TBits_1; inline;
  61436. begin
  61437. getCNPUE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61438. end;
  61439. procedure TPORTG_CNPUE.setCNPUE1; inline;
  61440. begin
  61441. pTDefRegMap(@Self)^.&set := $00000002;
  61442. end;
  61443. procedure TPORTG_CNPUE.clearCNPUE1; inline;
  61444. begin
  61445. pTDefRegMap(@Self)^.clr := $00000002;
  61446. end;
  61447. procedure TPORTG_CNPUE.setCNPUE1(thebits : TBits_1); inline;
  61448. begin
  61449. if thebits = 0 then
  61450. pTDefRegMap(@Self)^.clr := $00000002
  61451. else
  61452. pTDefRegMap(@Self)^.&set := $00000002;
  61453. end;
  61454. function TPORTG_CNPUE.getCNPUE1 : TBits_1; inline;
  61455. begin
  61456. getCNPUE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61457. end;
  61458. procedure TPORTG_CNPUE.setCNPUE2; inline;
  61459. begin
  61460. pTDefRegMap(@Self)^.&set := $00000004;
  61461. end;
  61462. procedure TPORTG_CNPUE.clearCNPUE2; inline;
  61463. begin
  61464. pTDefRegMap(@Self)^.clr := $00000004;
  61465. end;
  61466. procedure TPORTG_CNPUE.setCNPUE2(thebits : TBits_1); inline;
  61467. begin
  61468. if thebits = 0 then
  61469. pTDefRegMap(@Self)^.clr := $00000004
  61470. else
  61471. pTDefRegMap(@Self)^.&set := $00000004;
  61472. end;
  61473. function TPORTG_CNPUE.getCNPUE2 : TBits_1; inline;
  61474. begin
  61475. getCNPUE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61476. end;
  61477. procedure TPORTG_CNPUE.setCNPUE3; inline;
  61478. begin
  61479. pTDefRegMap(@Self)^.&set := $00000008;
  61480. end;
  61481. procedure TPORTG_CNPUE.clearCNPUE3; inline;
  61482. begin
  61483. pTDefRegMap(@Self)^.clr := $00000008;
  61484. end;
  61485. procedure TPORTG_CNPUE.setCNPUE3(thebits : TBits_1); inline;
  61486. begin
  61487. if thebits = 0 then
  61488. pTDefRegMap(@Self)^.clr := $00000008
  61489. else
  61490. pTDefRegMap(@Self)^.&set := $00000008;
  61491. end;
  61492. function TPORTG_CNPUE.getCNPUE3 : TBits_1; inline;
  61493. begin
  61494. getCNPUE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61495. end;
  61496. procedure TPORTG_CNPUE.setCNPUE4; inline;
  61497. begin
  61498. pTDefRegMap(@Self)^.&set := $00000010;
  61499. end;
  61500. procedure TPORTG_CNPUE.clearCNPUE4; inline;
  61501. begin
  61502. pTDefRegMap(@Self)^.clr := $00000010;
  61503. end;
  61504. procedure TPORTG_CNPUE.setCNPUE4(thebits : TBits_1); inline;
  61505. begin
  61506. if thebits = 0 then
  61507. pTDefRegMap(@Self)^.clr := $00000010
  61508. else
  61509. pTDefRegMap(@Self)^.&set := $00000010;
  61510. end;
  61511. function TPORTG_CNPUE.getCNPUE4 : TBits_1; inline;
  61512. begin
  61513. getCNPUE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61514. end;
  61515. procedure TPORTG_CNPUE.setCNPUE5; inline;
  61516. begin
  61517. pTDefRegMap(@Self)^.&set := $00000020;
  61518. end;
  61519. procedure TPORTG_CNPUE.clearCNPUE5; inline;
  61520. begin
  61521. pTDefRegMap(@Self)^.clr := $00000020;
  61522. end;
  61523. procedure TPORTG_CNPUE.setCNPUE5(thebits : TBits_1); inline;
  61524. begin
  61525. if thebits = 0 then
  61526. pTDefRegMap(@Self)^.clr := $00000020
  61527. else
  61528. pTDefRegMap(@Self)^.&set := $00000020;
  61529. end;
  61530. function TPORTG_CNPUE.getCNPUE5 : TBits_1; inline;
  61531. begin
  61532. getCNPUE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61533. end;
  61534. procedure TPORTG_CNPUE.setCNPUE6; inline;
  61535. begin
  61536. pTDefRegMap(@Self)^.&set := $00000040;
  61537. end;
  61538. procedure TPORTG_CNPUE.clearCNPUE6; inline;
  61539. begin
  61540. pTDefRegMap(@Self)^.clr := $00000040;
  61541. end;
  61542. procedure TPORTG_CNPUE.setCNPUE6(thebits : TBits_1); inline;
  61543. begin
  61544. if thebits = 0 then
  61545. pTDefRegMap(@Self)^.clr := $00000040
  61546. else
  61547. pTDefRegMap(@Self)^.&set := $00000040;
  61548. end;
  61549. function TPORTG_CNPUE.getCNPUE6 : TBits_1; inline;
  61550. begin
  61551. getCNPUE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61552. end;
  61553. procedure TPORTG_CNPUE.setCNPUE7; inline;
  61554. begin
  61555. pTDefRegMap(@Self)^.&set := $00000080;
  61556. end;
  61557. procedure TPORTG_CNPUE.clearCNPUE7; inline;
  61558. begin
  61559. pTDefRegMap(@Self)^.clr := $00000080;
  61560. end;
  61561. procedure TPORTG_CNPUE.setCNPUE7(thebits : TBits_1); inline;
  61562. begin
  61563. if thebits = 0 then
  61564. pTDefRegMap(@Self)^.clr := $00000080
  61565. else
  61566. pTDefRegMap(@Self)^.&set := $00000080;
  61567. end;
  61568. function TPORTG_CNPUE.getCNPUE7 : TBits_1; inline;
  61569. begin
  61570. getCNPUE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61571. end;
  61572. procedure TPORTG_CNPUE.setCNPUE8; inline;
  61573. begin
  61574. pTDefRegMap(@Self)^.&set := $00000100;
  61575. end;
  61576. procedure TPORTG_CNPUE.clearCNPUE8; inline;
  61577. begin
  61578. pTDefRegMap(@Self)^.clr := $00000100;
  61579. end;
  61580. procedure TPORTG_CNPUE.setCNPUE8(thebits : TBits_1); inline;
  61581. begin
  61582. if thebits = 0 then
  61583. pTDefRegMap(@Self)^.clr := $00000100
  61584. else
  61585. pTDefRegMap(@Self)^.&set := $00000100;
  61586. end;
  61587. function TPORTG_CNPUE.getCNPUE8 : TBits_1; inline;
  61588. begin
  61589. getCNPUE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61590. end;
  61591. procedure TPORTG_CNPUE.setCNPUE9; inline;
  61592. begin
  61593. pTDefRegMap(@Self)^.&set := $00000200;
  61594. end;
  61595. procedure TPORTG_CNPUE.clearCNPUE9; inline;
  61596. begin
  61597. pTDefRegMap(@Self)^.clr := $00000200;
  61598. end;
  61599. procedure TPORTG_CNPUE.setCNPUE9(thebits : TBits_1); inline;
  61600. begin
  61601. if thebits = 0 then
  61602. pTDefRegMap(@Self)^.clr := $00000200
  61603. else
  61604. pTDefRegMap(@Self)^.&set := $00000200;
  61605. end;
  61606. function TPORTG_CNPUE.getCNPUE9 : TBits_1; inline;
  61607. begin
  61608. getCNPUE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61609. end;
  61610. procedure TPORTG_CNPUE.setCNPUE10; inline;
  61611. begin
  61612. pTDefRegMap(@Self)^.&set := $00000400;
  61613. end;
  61614. procedure TPORTG_CNPUE.clearCNPUE10; inline;
  61615. begin
  61616. pTDefRegMap(@Self)^.clr := $00000400;
  61617. end;
  61618. procedure TPORTG_CNPUE.setCNPUE10(thebits : TBits_1); inline;
  61619. begin
  61620. if thebits = 0 then
  61621. pTDefRegMap(@Self)^.clr := $00000400
  61622. else
  61623. pTDefRegMap(@Self)^.&set := $00000400;
  61624. end;
  61625. function TPORTG_CNPUE.getCNPUE10 : TBits_1; inline;
  61626. begin
  61627. getCNPUE10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  61628. end;
  61629. procedure TPORTG_CNPUE.setCNPUE11; inline;
  61630. begin
  61631. pTDefRegMap(@Self)^.&set := $00000800;
  61632. end;
  61633. procedure TPORTG_CNPUE.clearCNPUE11; inline;
  61634. begin
  61635. pTDefRegMap(@Self)^.clr := $00000800;
  61636. end;
  61637. procedure TPORTG_CNPUE.setCNPUE11(thebits : TBits_1); inline;
  61638. begin
  61639. if thebits = 0 then
  61640. pTDefRegMap(@Self)^.clr := $00000800
  61641. else
  61642. pTDefRegMap(@Self)^.&set := $00000800;
  61643. end;
  61644. function TPORTG_CNPUE.getCNPUE11 : TBits_1; inline;
  61645. begin
  61646. getCNPUE11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  61647. end;
  61648. procedure TPORTG_CNPUE.setCNPUE12; inline;
  61649. begin
  61650. pTDefRegMap(@Self)^.&set := $00001000;
  61651. end;
  61652. procedure TPORTG_CNPUE.clearCNPUE12; inline;
  61653. begin
  61654. pTDefRegMap(@Self)^.clr := $00001000;
  61655. end;
  61656. procedure TPORTG_CNPUE.setCNPUE12(thebits : TBits_1); inline;
  61657. begin
  61658. if thebits = 0 then
  61659. pTDefRegMap(@Self)^.clr := $00001000
  61660. else
  61661. pTDefRegMap(@Self)^.&set := $00001000;
  61662. end;
  61663. function TPORTG_CNPUE.getCNPUE12 : TBits_1; inline;
  61664. begin
  61665. getCNPUE12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  61666. end;
  61667. procedure TPORTG_CNPUE.setCNPUE13; inline;
  61668. begin
  61669. pTDefRegMap(@Self)^.&set := $00002000;
  61670. end;
  61671. procedure TPORTG_CNPUE.clearCNPUE13; inline;
  61672. begin
  61673. pTDefRegMap(@Self)^.clr := $00002000;
  61674. end;
  61675. procedure TPORTG_CNPUE.setCNPUE13(thebits : TBits_1); inline;
  61676. begin
  61677. if thebits = 0 then
  61678. pTDefRegMap(@Self)^.clr := $00002000
  61679. else
  61680. pTDefRegMap(@Self)^.&set := $00002000;
  61681. end;
  61682. function TPORTG_CNPUE.getCNPUE13 : TBits_1; inline;
  61683. begin
  61684. getCNPUE13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  61685. end;
  61686. procedure TPORTG_CNPUE.setCNPUE14; inline;
  61687. begin
  61688. pTDefRegMap(@Self)^.&set := $00004000;
  61689. end;
  61690. procedure TPORTG_CNPUE.clearCNPUE14; inline;
  61691. begin
  61692. pTDefRegMap(@Self)^.clr := $00004000;
  61693. end;
  61694. procedure TPORTG_CNPUE.setCNPUE14(thebits : TBits_1); inline;
  61695. begin
  61696. if thebits = 0 then
  61697. pTDefRegMap(@Self)^.clr := $00004000
  61698. else
  61699. pTDefRegMap(@Self)^.&set := $00004000;
  61700. end;
  61701. function TPORTG_CNPUE.getCNPUE14 : TBits_1; inline;
  61702. begin
  61703. getCNPUE14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  61704. end;
  61705. procedure TPORTG_CNPUE.setCNPUE15; inline;
  61706. begin
  61707. pTDefRegMap(@Self)^.&set := $00008000;
  61708. end;
  61709. procedure TPORTG_CNPUE.clearCNPUE15; inline;
  61710. begin
  61711. pTDefRegMap(@Self)^.clr := $00008000;
  61712. end;
  61713. procedure TPORTG_CNPUE.setCNPUE15(thebits : TBits_1); inline;
  61714. begin
  61715. if thebits = 0 then
  61716. pTDefRegMap(@Self)^.clr := $00008000
  61717. else
  61718. pTDefRegMap(@Self)^.&set := $00008000;
  61719. end;
  61720. function TPORTG_CNPUE.getCNPUE15 : TBits_1; inline;
  61721. begin
  61722. getCNPUE15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  61723. end;
  61724. procedure TPORTG_CNPUE.setCNPUE16; inline;
  61725. begin
  61726. pTDefRegMap(@Self)^.&set := $00010000;
  61727. end;
  61728. procedure TPORTG_CNPUE.clearCNPUE16; inline;
  61729. begin
  61730. pTDefRegMap(@Self)^.clr := $00010000;
  61731. end;
  61732. procedure TPORTG_CNPUE.setCNPUE16(thebits : TBits_1); inline;
  61733. begin
  61734. if thebits = 0 then
  61735. pTDefRegMap(@Self)^.clr := $00010000
  61736. else
  61737. pTDefRegMap(@Self)^.&set := $00010000;
  61738. end;
  61739. function TPORTG_CNPUE.getCNPUE16 : TBits_1; inline;
  61740. begin
  61741. getCNPUE16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  61742. end;
  61743. procedure TPORTG_CNPUE.setCNPUE17; inline;
  61744. begin
  61745. pTDefRegMap(@Self)^.&set := $00020000;
  61746. end;
  61747. procedure TPORTG_CNPUE.clearCNPUE17; inline;
  61748. begin
  61749. pTDefRegMap(@Self)^.clr := $00020000;
  61750. end;
  61751. procedure TPORTG_CNPUE.setCNPUE17(thebits : TBits_1); inline;
  61752. begin
  61753. if thebits = 0 then
  61754. pTDefRegMap(@Self)^.clr := $00020000
  61755. else
  61756. pTDefRegMap(@Self)^.&set := $00020000;
  61757. end;
  61758. function TPORTG_CNPUE.getCNPUE17 : TBits_1; inline;
  61759. begin
  61760. getCNPUE17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  61761. end;
  61762. procedure TPORTG_CNPUE.setCNPUE18; inline;
  61763. begin
  61764. pTDefRegMap(@Self)^.&set := $00040000;
  61765. end;
  61766. procedure TPORTG_CNPUE.clearCNPUE18; inline;
  61767. begin
  61768. pTDefRegMap(@Self)^.clr := $00040000;
  61769. end;
  61770. procedure TPORTG_CNPUE.setCNPUE18(thebits : TBits_1); inline;
  61771. begin
  61772. if thebits = 0 then
  61773. pTDefRegMap(@Self)^.clr := $00040000
  61774. else
  61775. pTDefRegMap(@Self)^.&set := $00040000;
  61776. end;
  61777. function TPORTG_CNPUE.getCNPUE18 : TBits_1; inline;
  61778. begin
  61779. getCNPUE18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  61780. end;
  61781. procedure TPORTG_CNPUE.setw(thebits : TBits_32); inline;
  61782. begin
  61783. pTDefRegMap(@Self)^.val := thebits;
  61784. end;
  61785. function TPORTG_CNPUE.getw : TBits_32; inline;
  61786. begin
  61787. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61788. end;
  61789. procedure TETH_ETHCON1.setBUFCDEC; inline;
  61790. begin
  61791. pTDefRegMap(@Self)^.&set := $00000001;
  61792. end;
  61793. procedure TETH_ETHCON1.clearBUFCDEC; inline;
  61794. begin
  61795. pTDefRegMap(@Self)^.clr := $00000001;
  61796. end;
  61797. procedure TETH_ETHCON1.setBUFCDEC(thebits : TBits_1); inline;
  61798. begin
  61799. if thebits = 0 then
  61800. pTDefRegMap(@Self)^.clr := $00000001
  61801. else
  61802. pTDefRegMap(@Self)^.&set := $00000001;
  61803. end;
  61804. function TETH_ETHCON1.getBUFCDEC : TBits_1; inline;
  61805. begin
  61806. getBUFCDEC := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61807. end;
  61808. procedure TETH_ETHCON1.setMANFC; inline;
  61809. begin
  61810. pTDefRegMap(@Self)^.&set := $00000010;
  61811. end;
  61812. procedure TETH_ETHCON1.clearMANFC; inline;
  61813. begin
  61814. pTDefRegMap(@Self)^.clr := $00000010;
  61815. end;
  61816. procedure TETH_ETHCON1.setMANFC(thebits : TBits_1); inline;
  61817. begin
  61818. if thebits = 0 then
  61819. pTDefRegMap(@Self)^.clr := $00000010
  61820. else
  61821. pTDefRegMap(@Self)^.&set := $00000010;
  61822. end;
  61823. function TETH_ETHCON1.getMANFC : TBits_1; inline;
  61824. begin
  61825. getMANFC := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61826. end;
  61827. procedure TETH_ETHCON1.setAUTOFC; inline;
  61828. begin
  61829. pTDefRegMap(@Self)^.&set := $00000080;
  61830. end;
  61831. procedure TETH_ETHCON1.clearAUTOFC; inline;
  61832. begin
  61833. pTDefRegMap(@Self)^.clr := $00000080;
  61834. end;
  61835. procedure TETH_ETHCON1.setAUTOFC(thebits : TBits_1); inline;
  61836. begin
  61837. if thebits = 0 then
  61838. pTDefRegMap(@Self)^.clr := $00000080
  61839. else
  61840. pTDefRegMap(@Self)^.&set := $00000080;
  61841. end;
  61842. function TETH_ETHCON1.getAUTOFC : TBits_1; inline;
  61843. begin
  61844. getAUTOFC := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61845. end;
  61846. procedure TETH_ETHCON1.setRXEN; inline;
  61847. begin
  61848. pTDefRegMap(@Self)^.&set := $00000100;
  61849. end;
  61850. procedure TETH_ETHCON1.clearRXEN; inline;
  61851. begin
  61852. pTDefRegMap(@Self)^.clr := $00000100;
  61853. end;
  61854. procedure TETH_ETHCON1.setRXEN(thebits : TBits_1); inline;
  61855. begin
  61856. if thebits = 0 then
  61857. pTDefRegMap(@Self)^.clr := $00000100
  61858. else
  61859. pTDefRegMap(@Self)^.&set := $00000100;
  61860. end;
  61861. function TETH_ETHCON1.getRXEN : TBits_1; inline;
  61862. begin
  61863. getRXEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61864. end;
  61865. procedure TETH_ETHCON1.setTXRTS; inline;
  61866. begin
  61867. pTDefRegMap(@Self)^.&set := $00000200;
  61868. end;
  61869. procedure TETH_ETHCON1.clearTXRTS; inline;
  61870. begin
  61871. pTDefRegMap(@Self)^.clr := $00000200;
  61872. end;
  61873. procedure TETH_ETHCON1.setTXRTS(thebits : TBits_1); inline;
  61874. begin
  61875. if thebits = 0 then
  61876. pTDefRegMap(@Self)^.clr := $00000200
  61877. else
  61878. pTDefRegMap(@Self)^.&set := $00000200;
  61879. end;
  61880. function TETH_ETHCON1.getTXRTS : TBits_1; inline;
  61881. begin
  61882. getTXRTS := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61883. end;
  61884. procedure TETH_ETHCON1.setSIDL; inline;
  61885. begin
  61886. pTDefRegMap(@Self)^.&set := $00002000;
  61887. end;
  61888. procedure TETH_ETHCON1.clearSIDL; inline;
  61889. begin
  61890. pTDefRegMap(@Self)^.clr := $00002000;
  61891. end;
  61892. procedure TETH_ETHCON1.setSIDL(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 TETH_ETHCON1.getSIDL : TBits_1; inline;
  61900. begin
  61901. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  61902. end;
  61903. procedure TETH_ETHCON1.setON; inline;
  61904. begin
  61905. pTDefRegMap(@Self)^.&set := $00008000;
  61906. end;
  61907. procedure TETH_ETHCON1.clearON; inline;
  61908. begin
  61909. pTDefRegMap(@Self)^.clr := $00008000;
  61910. end;
  61911. procedure TETH_ETHCON1.setON(thebits : TBits_1); inline;
  61912. begin
  61913. if thebits = 0 then
  61914. pTDefRegMap(@Self)^.clr := $00008000
  61915. else
  61916. pTDefRegMap(@Self)^.&set := $00008000;
  61917. end;
  61918. function TETH_ETHCON1.getON : TBits_1; inline;
  61919. begin
  61920. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  61921. end;
  61922. procedure TETH_ETHCON1.setPTV(thebits : TBits_16); inline;
  61923. begin
  61924. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0000FFFF or ( thebits shl 16 );
  61925. end;
  61926. function TETH_ETHCON1.getPTV : TBits_16; inline;
  61927. begin
  61928. getPTV := (pTDefRegMap(@Self)^.val and $FFFF0000) shr 16;
  61929. end;
  61930. procedure TETH_ETHCON1.setw(thebits : TBits_32); inline;
  61931. begin
  61932. pTDefRegMap(@Self)^.val := thebits;
  61933. end;
  61934. function TETH_ETHCON1.getw : TBits_32; inline;
  61935. begin
  61936. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61937. end;
  61938. procedure TETH_ETHCON2.setRXBUF_SZ(thebits : TBits_7); inline;
  61939. begin
  61940. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF80F or ( thebits shl 4 );
  61941. end;
  61942. function TETH_ETHCON2.getRXBUF_SZ : TBits_7; inline;
  61943. begin
  61944. getRXBUF_SZ := (pTDefRegMap(@Self)^.val and $000007F0) shr 4;
  61945. end;
  61946. procedure TETH_ETHCON2.setw(thebits : TBits_32); inline;
  61947. begin
  61948. pTDefRegMap(@Self)^.val := thebits;
  61949. end;
  61950. function TETH_ETHCON2.getw : TBits_32; inline;
  61951. begin
  61952. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61953. end;
  61954. procedure TETH_ETHTXST.setTXSTADDR(thebits : TBits_30); inline;
  61955. begin
  61956. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $00000003 or ( thebits shl 2 );
  61957. end;
  61958. function TETH_ETHTXST.getTXSTADDR : TBits_30; inline;
  61959. begin
  61960. getTXSTADDR := (pTDefRegMap(@Self)^.val and $FFFFFFFC) shr 2;
  61961. end;
  61962. procedure TETH_ETHTXST.setw(thebits : TBits_32); inline;
  61963. begin
  61964. pTDefRegMap(@Self)^.val := thebits;
  61965. end;
  61966. function TETH_ETHTXST.getw : TBits_32; inline;
  61967. begin
  61968. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61969. end;
  61970. procedure TETH_ETHRXST.setRXSTADDR(thebits : TBits_30); inline;
  61971. begin
  61972. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $00000003 or ( thebits shl 2 );
  61973. end;
  61974. function TETH_ETHRXST.getRXSTADDR : TBits_30; inline;
  61975. begin
  61976. getRXSTADDR := (pTDefRegMap(@Self)^.val and $FFFFFFFC) shr 2;
  61977. end;
  61978. procedure TETH_ETHRXST.setw(thebits : TBits_32); inline;
  61979. begin
  61980. pTDefRegMap(@Self)^.val := thebits;
  61981. end;
  61982. function TETH_ETHRXST.getw : TBits_32; inline;
  61983. begin
  61984. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61985. end;
  61986. procedure TETH_ETHHT0.setw(thebits : TBits_32); inline;
  61987. begin
  61988. pTDefRegMap(@Self)^.val := thebits;
  61989. end;
  61990. function TETH_ETHHT0.getw : TBits_32; inline;
  61991. begin
  61992. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61993. end;
  61994. procedure TETH_ETHHT0.setHTLOWER(thebits : TBits_32); inline;
  61995. begin
  61996. pTDefRegMap(@Self)^.val := thebits;
  61997. end;
  61998. function TETH_ETHHT0.getHTLOWER : TBits_32; inline;
  61999. begin
  62000. getHTLOWER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62001. end;
  62002. procedure TETH_ETHHT1.setw(thebits : TBits_32); inline;
  62003. begin
  62004. pTDefRegMap(@Self)^.val := thebits;
  62005. end;
  62006. function TETH_ETHHT1.getw : TBits_32; inline;
  62007. begin
  62008. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62009. end;
  62010. procedure TETH_ETHHT1.setHTUPPER(thebits : TBits_32); inline;
  62011. begin
  62012. pTDefRegMap(@Self)^.val := thebits;
  62013. end;
  62014. function TETH_ETHHT1.getHTUPPER : TBits_32; inline;
  62015. begin
  62016. getHTUPPER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62017. end;
  62018. procedure TETH_ETHPMM0.setw(thebits : TBits_32); inline;
  62019. begin
  62020. pTDefRegMap(@Self)^.val := thebits;
  62021. end;
  62022. function TETH_ETHPMM0.getw : TBits_32; inline;
  62023. begin
  62024. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62025. end;
  62026. procedure TETH_ETHPMM0.setPMMLOWER(thebits : TBits_32); inline;
  62027. begin
  62028. pTDefRegMap(@Self)^.val := thebits;
  62029. end;
  62030. function TETH_ETHPMM0.getPMMLOWER : TBits_32; inline;
  62031. begin
  62032. getPMMLOWER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62033. end;
  62034. procedure TETH_ETHPMM1.setw(thebits : TBits_32); inline;
  62035. begin
  62036. pTDefRegMap(@Self)^.val := thebits;
  62037. end;
  62038. function TETH_ETHPMM1.getw : TBits_32; inline;
  62039. begin
  62040. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62041. end;
  62042. procedure TETH_ETHPMM1.setPMMUPPER(thebits : TBits_32); inline;
  62043. begin
  62044. pTDefRegMap(@Self)^.val := thebits;
  62045. end;
  62046. function TETH_ETHPMM1.getPMMUPPER : TBits_32; inline;
  62047. begin
  62048. getPMMUPPER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62049. end;
  62050. procedure TETH_ETHPMCS.setPMCS(thebits : TBits_16); inline;
  62051. begin
  62052. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  62053. end;
  62054. function TETH_ETHPMCS.getPMCS : TBits_16; inline;
  62055. begin
  62056. getPMCS := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  62057. end;
  62058. procedure TETH_ETHPMCS.setw(thebits : TBits_32); inline;
  62059. begin
  62060. pTDefRegMap(@Self)^.val := thebits;
  62061. end;
  62062. function TETH_ETHPMCS.getw : TBits_32; inline;
  62063. begin
  62064. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62065. end;
  62066. procedure TETH_ETHPMO.setPMO(thebits : TBits_16); inline;
  62067. begin
  62068. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  62069. end;
  62070. function TETH_ETHPMO.getPMO : TBits_16; inline;
  62071. begin
  62072. getPMO := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  62073. end;
  62074. procedure TETH_ETHPMO.setw(thebits : TBits_32); inline;
  62075. begin
  62076. pTDefRegMap(@Self)^.val := thebits;
  62077. end;
  62078. function TETH_ETHPMO.getw : TBits_32; inline;
  62079. begin
  62080. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62081. end;
  62082. procedure TETH_ETHRXFC.setBCEN; inline;
  62083. begin
  62084. pTDefRegMap(@Self)^.&set := $00000001;
  62085. end;
  62086. procedure TETH_ETHRXFC.clearBCEN; inline;
  62087. begin
  62088. pTDefRegMap(@Self)^.clr := $00000001;
  62089. end;
  62090. procedure TETH_ETHRXFC.setBCEN(thebits : TBits_1); inline;
  62091. begin
  62092. if thebits = 0 then
  62093. pTDefRegMap(@Self)^.clr := $00000001
  62094. else
  62095. pTDefRegMap(@Self)^.&set := $00000001;
  62096. end;
  62097. function TETH_ETHRXFC.getBCEN : TBits_1; inline;
  62098. begin
  62099. getBCEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  62100. end;
  62101. procedure TETH_ETHRXFC.setMCEN; inline;
  62102. begin
  62103. pTDefRegMap(@Self)^.&set := $00000002;
  62104. end;
  62105. procedure TETH_ETHRXFC.clearMCEN; inline;
  62106. begin
  62107. pTDefRegMap(@Self)^.clr := $00000002;
  62108. end;
  62109. procedure TETH_ETHRXFC.setMCEN(thebits : TBits_1); inline;
  62110. begin
  62111. if thebits = 0 then
  62112. pTDefRegMap(@Self)^.clr := $00000002
  62113. else
  62114. pTDefRegMap(@Self)^.&set := $00000002;
  62115. end;
  62116. function TETH_ETHRXFC.getMCEN : TBits_1; inline;
  62117. begin
  62118. getMCEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  62119. end;
  62120. procedure TETH_ETHRXFC.setNOTMEEN; inline;
  62121. begin
  62122. pTDefRegMap(@Self)^.&set := $00000004;
  62123. end;
  62124. procedure TETH_ETHRXFC.clearNOTMEEN; inline;
  62125. begin
  62126. pTDefRegMap(@Self)^.clr := $00000004;
  62127. end;
  62128. procedure TETH_ETHRXFC.setNOTMEEN(thebits : TBits_1); inline;
  62129. begin
  62130. if thebits = 0 then
  62131. pTDefRegMap(@Self)^.clr := $00000004
  62132. else
  62133. pTDefRegMap(@Self)^.&set := $00000004;
  62134. end;
  62135. function TETH_ETHRXFC.getNOTMEEN : TBits_1; inline;
  62136. begin
  62137. getNOTMEEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62138. end;
  62139. procedure TETH_ETHRXFC.setUCEN; inline;
  62140. begin
  62141. pTDefRegMap(@Self)^.&set := $00000008;
  62142. end;
  62143. procedure TETH_ETHRXFC.clearUCEN; inline;
  62144. begin
  62145. pTDefRegMap(@Self)^.clr := $00000008;
  62146. end;
  62147. procedure TETH_ETHRXFC.setUCEN(thebits : TBits_1); inline;
  62148. begin
  62149. if thebits = 0 then
  62150. pTDefRegMap(@Self)^.clr := $00000008
  62151. else
  62152. pTDefRegMap(@Self)^.&set := $00000008;
  62153. end;
  62154. function TETH_ETHRXFC.getUCEN : TBits_1; inline;
  62155. begin
  62156. getUCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62157. end;
  62158. procedure TETH_ETHRXFC.setRUNTEN; inline;
  62159. begin
  62160. pTDefRegMap(@Self)^.&set := $00000010;
  62161. end;
  62162. procedure TETH_ETHRXFC.clearRUNTEN; inline;
  62163. begin
  62164. pTDefRegMap(@Self)^.clr := $00000010;
  62165. end;
  62166. procedure TETH_ETHRXFC.setRUNTEN(thebits : TBits_1); inline;
  62167. begin
  62168. if thebits = 0 then
  62169. pTDefRegMap(@Self)^.clr := $00000010
  62170. else
  62171. pTDefRegMap(@Self)^.&set := $00000010;
  62172. end;
  62173. function TETH_ETHRXFC.getRUNTEN : TBits_1; inline;
  62174. begin
  62175. getRUNTEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  62176. end;
  62177. procedure TETH_ETHRXFC.setRUNTERREN; inline;
  62178. begin
  62179. pTDefRegMap(@Self)^.&set := $00000020;
  62180. end;
  62181. procedure TETH_ETHRXFC.clearRUNTERREN; inline;
  62182. begin
  62183. pTDefRegMap(@Self)^.clr := $00000020;
  62184. end;
  62185. procedure TETH_ETHRXFC.setRUNTERREN(thebits : TBits_1); inline;
  62186. begin
  62187. if thebits = 0 then
  62188. pTDefRegMap(@Self)^.clr := $00000020
  62189. else
  62190. pTDefRegMap(@Self)^.&set := $00000020;
  62191. end;
  62192. function TETH_ETHRXFC.getRUNTERREN : TBits_1; inline;
  62193. begin
  62194. getRUNTERREN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62195. end;
  62196. procedure TETH_ETHRXFC.setCRCOKEN; inline;
  62197. begin
  62198. pTDefRegMap(@Self)^.&set := $00000040;
  62199. end;
  62200. procedure TETH_ETHRXFC.clearCRCOKEN; inline;
  62201. begin
  62202. pTDefRegMap(@Self)^.clr := $00000040;
  62203. end;
  62204. procedure TETH_ETHRXFC.setCRCOKEN(thebits : TBits_1); inline;
  62205. begin
  62206. if thebits = 0 then
  62207. pTDefRegMap(@Self)^.clr := $00000040
  62208. else
  62209. pTDefRegMap(@Self)^.&set := $00000040;
  62210. end;
  62211. function TETH_ETHRXFC.getCRCOKEN : TBits_1; inline;
  62212. begin
  62213. getCRCOKEN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62214. end;
  62215. procedure TETH_ETHRXFC.setCRCERREN; inline;
  62216. begin
  62217. pTDefRegMap(@Self)^.&set := $00000080;
  62218. end;
  62219. procedure TETH_ETHRXFC.clearCRCERREN; inline;
  62220. begin
  62221. pTDefRegMap(@Self)^.clr := $00000080;
  62222. end;
  62223. procedure TETH_ETHRXFC.setCRCERREN(thebits : TBits_1); inline;
  62224. begin
  62225. if thebits = 0 then
  62226. pTDefRegMap(@Self)^.clr := $00000080
  62227. else
  62228. pTDefRegMap(@Self)^.&set := $00000080;
  62229. end;
  62230. function TETH_ETHRXFC.getCRCERREN : TBits_1; inline;
  62231. begin
  62232. getCRCERREN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62233. end;
  62234. procedure TETH_ETHRXFC.setPMMODE(thebits : TBits_4); inline;
  62235. begin
  62236. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  62237. end;
  62238. function TETH_ETHRXFC.getPMMODE : TBits_4; inline;
  62239. begin
  62240. getPMMODE := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  62241. end;
  62242. procedure TETH_ETHRXFC.setNOTPM; inline;
  62243. begin
  62244. pTDefRegMap(@Self)^.&set := $00001000;
  62245. end;
  62246. procedure TETH_ETHRXFC.clearNOTPM; inline;
  62247. begin
  62248. pTDefRegMap(@Self)^.clr := $00001000;
  62249. end;
  62250. procedure TETH_ETHRXFC.setNOTPM(thebits : TBits_1); inline;
  62251. begin
  62252. if thebits = 0 then
  62253. pTDefRegMap(@Self)^.clr := $00001000
  62254. else
  62255. pTDefRegMap(@Self)^.&set := $00001000;
  62256. end;
  62257. function TETH_ETHRXFC.getNOTPM : TBits_1; inline;
  62258. begin
  62259. getNOTPM := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  62260. end;
  62261. procedure TETH_ETHRXFC.setMPEN; inline;
  62262. begin
  62263. pTDefRegMap(@Self)^.&set := $00004000;
  62264. end;
  62265. procedure TETH_ETHRXFC.clearMPEN; inline;
  62266. begin
  62267. pTDefRegMap(@Self)^.clr := $00004000;
  62268. end;
  62269. procedure TETH_ETHRXFC.setMPEN(thebits : TBits_1); inline;
  62270. begin
  62271. if thebits = 0 then
  62272. pTDefRegMap(@Self)^.clr := $00004000
  62273. else
  62274. pTDefRegMap(@Self)^.&set := $00004000;
  62275. end;
  62276. function TETH_ETHRXFC.getMPEN : TBits_1; inline;
  62277. begin
  62278. getMPEN := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  62279. end;
  62280. procedure TETH_ETHRXFC.setHTEN; inline;
  62281. begin
  62282. pTDefRegMap(@Self)^.&set := $00008000;
  62283. end;
  62284. procedure TETH_ETHRXFC.clearHTEN; inline;
  62285. begin
  62286. pTDefRegMap(@Self)^.clr := $00008000;
  62287. end;
  62288. procedure TETH_ETHRXFC.setHTEN(thebits : TBits_1); inline;
  62289. begin
  62290. if thebits = 0 then
  62291. pTDefRegMap(@Self)^.clr := $00008000
  62292. else
  62293. pTDefRegMap(@Self)^.&set := $00008000;
  62294. end;
  62295. function TETH_ETHRXFC.getHTEN : TBits_1; inline;
  62296. begin
  62297. getHTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  62298. end;
  62299. procedure TETH_ETHRXFC.setw(thebits : TBits_32); inline;
  62300. begin
  62301. pTDefRegMap(@Self)^.val := thebits;
  62302. end;
  62303. function TETH_ETHRXFC.getw : TBits_32; inline;
  62304. begin
  62305. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62306. end;
  62307. procedure TETH_ETHRXWM.setRXEWM(thebits : TBits_8); inline;
  62308. begin
  62309. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  62310. end;
  62311. function TETH_ETHRXWM.getRXEWM : TBits_8; inline;
  62312. begin
  62313. getRXEWM := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  62314. end;
  62315. procedure TETH_ETHRXWM.setRXFWM(thebits : TBits_8); inline;
  62316. begin
  62317. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  62318. end;
  62319. function TETH_ETHRXWM.getRXFWM : TBits_8; inline;
  62320. begin
  62321. getRXFWM := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  62322. end;
  62323. procedure TETH_ETHRXWM.setw(thebits : TBits_32); inline;
  62324. begin
  62325. pTDefRegMap(@Self)^.val := thebits;
  62326. end;
  62327. function TETH_ETHRXWM.getw : TBits_32; inline;
  62328. begin
  62329. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62330. end;
  62331. procedure TETH_ETHIEN.setRXOVFLWIE; inline;
  62332. begin
  62333. pTDefRegMap(@Self)^.&set := $00000001;
  62334. end;
  62335. procedure TETH_ETHIEN.clearRXOVFLWIE; inline;
  62336. begin
  62337. pTDefRegMap(@Self)^.clr := $00000001;
  62338. end;
  62339. procedure TETH_ETHIEN.setRXOVFLWIE(thebits : TBits_1); inline;
  62340. begin
  62341. if thebits = 0 then
  62342. pTDefRegMap(@Self)^.clr := $00000001
  62343. else
  62344. pTDefRegMap(@Self)^.&set := $00000001;
  62345. end;
  62346. function TETH_ETHIEN.getRXOVFLWIE : TBits_1; inline;
  62347. begin
  62348. getRXOVFLWIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  62349. end;
  62350. procedure TETH_ETHIEN.setRXBUFNAIE; inline;
  62351. begin
  62352. pTDefRegMap(@Self)^.&set := $00000002;
  62353. end;
  62354. procedure TETH_ETHIEN.clearRXBUFNAIE; inline;
  62355. begin
  62356. pTDefRegMap(@Self)^.clr := $00000002;
  62357. end;
  62358. procedure TETH_ETHIEN.setRXBUFNAIE(thebits : TBits_1); inline;
  62359. begin
  62360. if thebits = 0 then
  62361. pTDefRegMap(@Self)^.clr := $00000002
  62362. else
  62363. pTDefRegMap(@Self)^.&set := $00000002;
  62364. end;
  62365. function TETH_ETHIEN.getRXBUFNAIE : TBits_1; inline;
  62366. begin
  62367. getRXBUFNAIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  62368. end;
  62369. procedure TETH_ETHIEN.setTXABORTIE; inline;
  62370. begin
  62371. pTDefRegMap(@Self)^.&set := $00000004;
  62372. end;
  62373. procedure TETH_ETHIEN.clearTXABORTIE; inline;
  62374. begin
  62375. pTDefRegMap(@Self)^.clr := $00000004;
  62376. end;
  62377. procedure TETH_ETHIEN.setTXABORTIE(thebits : TBits_1); inline;
  62378. begin
  62379. if thebits = 0 then
  62380. pTDefRegMap(@Self)^.clr := $00000004
  62381. else
  62382. pTDefRegMap(@Self)^.&set := $00000004;
  62383. end;
  62384. function TETH_ETHIEN.getTXABORTIE : TBits_1; inline;
  62385. begin
  62386. getTXABORTIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62387. end;
  62388. procedure TETH_ETHIEN.setTXDONEIE; inline;
  62389. begin
  62390. pTDefRegMap(@Self)^.&set := $00000008;
  62391. end;
  62392. procedure TETH_ETHIEN.clearTXDONEIE; inline;
  62393. begin
  62394. pTDefRegMap(@Self)^.clr := $00000008;
  62395. end;
  62396. procedure TETH_ETHIEN.setTXDONEIE(thebits : TBits_1); inline;
  62397. begin
  62398. if thebits = 0 then
  62399. pTDefRegMap(@Self)^.clr := $00000008
  62400. else
  62401. pTDefRegMap(@Self)^.&set := $00000008;
  62402. end;
  62403. function TETH_ETHIEN.getTXDONEIE : TBits_1; inline;
  62404. begin
  62405. getTXDONEIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62406. end;
  62407. procedure TETH_ETHIEN.setRXACTIE; inline;
  62408. begin
  62409. pTDefRegMap(@Self)^.&set := $00000020;
  62410. end;
  62411. procedure TETH_ETHIEN.clearRXACTIE; inline;
  62412. begin
  62413. pTDefRegMap(@Self)^.clr := $00000020;
  62414. end;
  62415. procedure TETH_ETHIEN.setRXACTIE(thebits : TBits_1); inline;
  62416. begin
  62417. if thebits = 0 then
  62418. pTDefRegMap(@Self)^.clr := $00000020
  62419. else
  62420. pTDefRegMap(@Self)^.&set := $00000020;
  62421. end;
  62422. function TETH_ETHIEN.getRXACTIE : TBits_1; inline;
  62423. begin
  62424. getRXACTIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62425. end;
  62426. procedure TETH_ETHIEN.setPKTPENDIE; inline;
  62427. begin
  62428. pTDefRegMap(@Self)^.&set := $00000040;
  62429. end;
  62430. procedure TETH_ETHIEN.clearPKTPENDIE; inline;
  62431. begin
  62432. pTDefRegMap(@Self)^.clr := $00000040;
  62433. end;
  62434. procedure TETH_ETHIEN.setPKTPENDIE(thebits : TBits_1); inline;
  62435. begin
  62436. if thebits = 0 then
  62437. pTDefRegMap(@Self)^.clr := $00000040
  62438. else
  62439. pTDefRegMap(@Self)^.&set := $00000040;
  62440. end;
  62441. function TETH_ETHIEN.getPKTPENDIE : TBits_1; inline;
  62442. begin
  62443. getPKTPENDIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62444. end;
  62445. procedure TETH_ETHIEN.setRXDONEIE; inline;
  62446. begin
  62447. pTDefRegMap(@Self)^.&set := $00000080;
  62448. end;
  62449. procedure TETH_ETHIEN.clearRXDONEIE; inline;
  62450. begin
  62451. pTDefRegMap(@Self)^.clr := $00000080;
  62452. end;
  62453. procedure TETH_ETHIEN.setRXDONEIE(thebits : TBits_1); inline;
  62454. begin
  62455. if thebits = 0 then
  62456. pTDefRegMap(@Self)^.clr := $00000080
  62457. else
  62458. pTDefRegMap(@Self)^.&set := $00000080;
  62459. end;
  62460. function TETH_ETHIEN.getRXDONEIE : TBits_1; inline;
  62461. begin
  62462. getRXDONEIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62463. end;
  62464. procedure TETH_ETHIEN.setFWMARKIE; inline;
  62465. begin
  62466. pTDefRegMap(@Self)^.&set := $00000100;
  62467. end;
  62468. procedure TETH_ETHIEN.clearFWMARKIE; inline;
  62469. begin
  62470. pTDefRegMap(@Self)^.clr := $00000100;
  62471. end;
  62472. procedure TETH_ETHIEN.setFWMARKIE(thebits : TBits_1); inline;
  62473. begin
  62474. if thebits = 0 then
  62475. pTDefRegMap(@Self)^.clr := $00000100
  62476. else
  62477. pTDefRegMap(@Self)^.&set := $00000100;
  62478. end;
  62479. function TETH_ETHIEN.getFWMARKIE : TBits_1; inline;
  62480. begin
  62481. getFWMARKIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  62482. end;
  62483. procedure TETH_ETHIEN.setEWMARKIE; inline;
  62484. begin
  62485. pTDefRegMap(@Self)^.&set := $00000200;
  62486. end;
  62487. procedure TETH_ETHIEN.clearEWMARKIE; inline;
  62488. begin
  62489. pTDefRegMap(@Self)^.clr := $00000200;
  62490. end;
  62491. procedure TETH_ETHIEN.setEWMARKIE(thebits : TBits_1); inline;
  62492. begin
  62493. if thebits = 0 then
  62494. pTDefRegMap(@Self)^.clr := $00000200
  62495. else
  62496. pTDefRegMap(@Self)^.&set := $00000200;
  62497. end;
  62498. function TETH_ETHIEN.getEWMARKIE : TBits_1; inline;
  62499. begin
  62500. getEWMARKIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  62501. end;
  62502. procedure TETH_ETHIEN.setRXBUSEIE; inline;
  62503. begin
  62504. pTDefRegMap(@Self)^.&set := $00002000;
  62505. end;
  62506. procedure TETH_ETHIEN.clearRXBUSEIE; inline;
  62507. begin
  62508. pTDefRegMap(@Self)^.clr := $00002000;
  62509. end;
  62510. procedure TETH_ETHIEN.setRXBUSEIE(thebits : TBits_1); inline;
  62511. begin
  62512. if thebits = 0 then
  62513. pTDefRegMap(@Self)^.clr := $00002000
  62514. else
  62515. pTDefRegMap(@Self)^.&set := $00002000;
  62516. end;
  62517. function TETH_ETHIEN.getRXBUSEIE : TBits_1; inline;
  62518. begin
  62519. getRXBUSEIE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  62520. end;
  62521. procedure TETH_ETHIEN.setTXBUSEIE; inline;
  62522. begin
  62523. pTDefRegMap(@Self)^.&set := $00004000;
  62524. end;
  62525. procedure TETH_ETHIEN.clearTXBUSEIE; inline;
  62526. begin
  62527. pTDefRegMap(@Self)^.clr := $00004000;
  62528. end;
  62529. procedure TETH_ETHIEN.setTXBUSEIE(thebits : TBits_1); inline;
  62530. begin
  62531. if thebits = 0 then
  62532. pTDefRegMap(@Self)^.clr := $00004000
  62533. else
  62534. pTDefRegMap(@Self)^.&set := $00004000;
  62535. end;
  62536. function TETH_ETHIEN.getTXBUSEIE : TBits_1; inline;
  62537. begin
  62538. getTXBUSEIE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  62539. end;
  62540. procedure TETH_ETHIEN.setw(thebits : TBits_32); inline;
  62541. begin
  62542. pTDefRegMap(@Self)^.val := thebits;
  62543. end;
  62544. function TETH_ETHIEN.getw : TBits_32; inline;
  62545. begin
  62546. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62547. end;
  62548. procedure TETH_ETHIRQ.setRXOVFLW; inline;
  62549. begin
  62550. pTDefRegMap(@Self)^.&set := $00000001;
  62551. end;
  62552. procedure TETH_ETHIRQ.clearRXOVFLW; inline;
  62553. begin
  62554. pTDefRegMap(@Self)^.clr := $00000001;
  62555. end;
  62556. procedure TETH_ETHIRQ.setRXOVFLW(thebits : TBits_1); inline;
  62557. begin
  62558. if thebits = 0 then
  62559. pTDefRegMap(@Self)^.clr := $00000001
  62560. else
  62561. pTDefRegMap(@Self)^.&set := $00000001;
  62562. end;
  62563. function TETH_ETHIRQ.getRXOVFLW : TBits_1; inline;
  62564. begin
  62565. getRXOVFLW := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  62566. end;
  62567. procedure TETH_ETHIRQ.setRXBUFNA; inline;
  62568. begin
  62569. pTDefRegMap(@Self)^.&set := $00000002;
  62570. end;
  62571. procedure TETH_ETHIRQ.clearRXBUFNA; inline;
  62572. begin
  62573. pTDefRegMap(@Self)^.clr := $00000002;
  62574. end;
  62575. procedure TETH_ETHIRQ.setRXBUFNA(thebits : TBits_1); inline;
  62576. begin
  62577. if thebits = 0 then
  62578. pTDefRegMap(@Self)^.clr := $00000002
  62579. else
  62580. pTDefRegMap(@Self)^.&set := $00000002;
  62581. end;
  62582. function TETH_ETHIRQ.getRXBUFNA : TBits_1; inline;
  62583. begin
  62584. getRXBUFNA := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  62585. end;
  62586. procedure TETH_ETHIRQ.setTXABORT; inline;
  62587. begin
  62588. pTDefRegMap(@Self)^.&set := $00000004;
  62589. end;
  62590. procedure TETH_ETHIRQ.clearTXABORT; inline;
  62591. begin
  62592. pTDefRegMap(@Self)^.clr := $00000004;
  62593. end;
  62594. procedure TETH_ETHIRQ.setTXABORT(thebits : TBits_1); inline;
  62595. begin
  62596. if thebits = 0 then
  62597. pTDefRegMap(@Self)^.clr := $00000004
  62598. else
  62599. pTDefRegMap(@Self)^.&set := $00000004;
  62600. end;
  62601. function TETH_ETHIRQ.getTXABORT : TBits_1; inline;
  62602. begin
  62603. getTXABORT := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62604. end;
  62605. procedure TETH_ETHIRQ.setTXDONE; inline;
  62606. begin
  62607. pTDefRegMap(@Self)^.&set := $00000008;
  62608. end;
  62609. procedure TETH_ETHIRQ.clearTXDONE; inline;
  62610. begin
  62611. pTDefRegMap(@Self)^.clr := $00000008;
  62612. end;
  62613. procedure TETH_ETHIRQ.setTXDONE(thebits : TBits_1); inline;
  62614. begin
  62615. if thebits = 0 then
  62616. pTDefRegMap(@Self)^.clr := $00000008
  62617. else
  62618. pTDefRegMap(@Self)^.&set := $00000008;
  62619. end;
  62620. function TETH_ETHIRQ.getTXDONE : TBits_1; inline;
  62621. begin
  62622. getTXDONE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62623. end;
  62624. procedure TETH_ETHIRQ.setRXACT; inline;
  62625. begin
  62626. pTDefRegMap(@Self)^.&set := $00000020;
  62627. end;
  62628. procedure TETH_ETHIRQ.clearRXACT; inline;
  62629. begin
  62630. pTDefRegMap(@Self)^.clr := $00000020;
  62631. end;
  62632. procedure TETH_ETHIRQ.setRXACT(thebits : TBits_1); inline;
  62633. begin
  62634. if thebits = 0 then
  62635. pTDefRegMap(@Self)^.clr := $00000020
  62636. else
  62637. pTDefRegMap(@Self)^.&set := $00000020;
  62638. end;
  62639. function TETH_ETHIRQ.getRXACT : TBits_1; inline;
  62640. begin
  62641. getRXACT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62642. end;
  62643. procedure TETH_ETHIRQ.setPKTPEND; inline;
  62644. begin
  62645. pTDefRegMap(@Self)^.&set := $00000040;
  62646. end;
  62647. procedure TETH_ETHIRQ.clearPKTPEND; inline;
  62648. begin
  62649. pTDefRegMap(@Self)^.clr := $00000040;
  62650. end;
  62651. procedure TETH_ETHIRQ.setPKTPEND(thebits : TBits_1); inline;
  62652. begin
  62653. if thebits = 0 then
  62654. pTDefRegMap(@Self)^.clr := $00000040
  62655. else
  62656. pTDefRegMap(@Self)^.&set := $00000040;
  62657. end;
  62658. function TETH_ETHIRQ.getPKTPEND : TBits_1; inline;
  62659. begin
  62660. getPKTPEND := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62661. end;
  62662. procedure TETH_ETHIRQ.setRXDONE; inline;
  62663. begin
  62664. pTDefRegMap(@Self)^.&set := $00000080;
  62665. end;
  62666. procedure TETH_ETHIRQ.clearRXDONE; inline;
  62667. begin
  62668. pTDefRegMap(@Self)^.clr := $00000080;
  62669. end;
  62670. procedure TETH_ETHIRQ.setRXDONE(thebits : TBits_1); inline;
  62671. begin
  62672. if thebits = 0 then
  62673. pTDefRegMap(@Self)^.clr := $00000080
  62674. else
  62675. pTDefRegMap(@Self)^.&set := $00000080;
  62676. end;
  62677. function TETH_ETHIRQ.getRXDONE : TBits_1; inline;
  62678. begin
  62679. getRXDONE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62680. end;
  62681. procedure TETH_ETHIRQ.setFWMARK; inline;
  62682. begin
  62683. pTDefRegMap(@Self)^.&set := $00000100;
  62684. end;
  62685. procedure TETH_ETHIRQ.clearFWMARK; inline;
  62686. begin
  62687. pTDefRegMap(@Self)^.clr := $00000100;
  62688. end;
  62689. procedure TETH_ETHIRQ.setFWMARK(thebits : TBits_1); inline;
  62690. begin
  62691. if thebits = 0 then
  62692. pTDefRegMap(@Self)^.clr := $00000100
  62693. else
  62694. pTDefRegMap(@Self)^.&set := $00000100;
  62695. end;
  62696. function TETH_ETHIRQ.getFWMARK : TBits_1; inline;
  62697. begin
  62698. getFWMARK := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  62699. end;
  62700. procedure TETH_ETHIRQ.setEWMARK; inline;
  62701. begin
  62702. pTDefRegMap(@Self)^.&set := $00000200;
  62703. end;
  62704. procedure TETH_ETHIRQ.clearEWMARK; inline;
  62705. begin
  62706. pTDefRegMap(@Self)^.clr := $00000200;
  62707. end;
  62708. procedure TETH_ETHIRQ.setEWMARK(thebits : TBits_1); inline;
  62709. begin
  62710. if thebits = 0 then
  62711. pTDefRegMap(@Self)^.clr := $00000200
  62712. else
  62713. pTDefRegMap(@Self)^.&set := $00000200;
  62714. end;
  62715. function TETH_ETHIRQ.getEWMARK : TBits_1; inline;
  62716. begin
  62717. getEWMARK := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  62718. end;
  62719. procedure TETH_ETHIRQ.setRXBUSE; inline;
  62720. begin
  62721. pTDefRegMap(@Self)^.&set := $00002000;
  62722. end;
  62723. procedure TETH_ETHIRQ.clearRXBUSE; inline;
  62724. begin
  62725. pTDefRegMap(@Self)^.clr := $00002000;
  62726. end;
  62727. procedure TETH_ETHIRQ.setRXBUSE(thebits : TBits_1); inline;
  62728. begin
  62729. if thebits = 0 then
  62730. pTDefRegMap(@Self)^.clr := $00002000
  62731. else
  62732. pTDefRegMap(@Self)^.&set := $00002000;
  62733. end;
  62734. function TETH_ETHIRQ.getRXBUSE : TBits_1; inline;
  62735. begin
  62736. getRXBUSE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  62737. end;
  62738. procedure TETH_ETHIRQ.setTXBUSE; inline;
  62739. begin
  62740. pTDefRegMap(@Self)^.&set := $00004000;
  62741. end;
  62742. procedure TETH_ETHIRQ.clearTXBUSE; inline;
  62743. begin
  62744. pTDefRegMap(@Self)^.clr := $00004000;
  62745. end;
  62746. procedure TETH_ETHIRQ.setTXBUSE(thebits : TBits_1); inline;
  62747. begin
  62748. if thebits = 0 then
  62749. pTDefRegMap(@Self)^.clr := $00004000
  62750. else
  62751. pTDefRegMap(@Self)^.&set := $00004000;
  62752. end;
  62753. function TETH_ETHIRQ.getTXBUSE : TBits_1; inline;
  62754. begin
  62755. getTXBUSE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  62756. end;
  62757. procedure TETH_ETHIRQ.setw(thebits : TBits_32); inline;
  62758. begin
  62759. pTDefRegMap(@Self)^.val := thebits;
  62760. end;
  62761. function TETH_ETHIRQ.getw : TBits_32; inline;
  62762. begin
  62763. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62764. end;
  62765. procedure TETH_ETHSTAT.setRXBUSY; inline;
  62766. begin
  62767. pTDefRegMap(@Self)^.&set := $00000020;
  62768. end;
  62769. procedure TETH_ETHSTAT.clearRXBUSY; inline;
  62770. begin
  62771. pTDefRegMap(@Self)^.clr := $00000020;
  62772. end;
  62773. procedure TETH_ETHSTAT.setRXBUSY(thebits : TBits_1); inline;
  62774. begin
  62775. if thebits = 0 then
  62776. pTDefRegMap(@Self)^.clr := $00000020
  62777. else
  62778. pTDefRegMap(@Self)^.&set := $00000020;
  62779. end;
  62780. function TETH_ETHSTAT.getRXBUSY : TBits_1; inline;
  62781. begin
  62782. getRXBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62783. end;
  62784. procedure TETH_ETHSTAT.setTXBUSY; inline;
  62785. begin
  62786. pTDefRegMap(@Self)^.&set := $00000040;
  62787. end;
  62788. procedure TETH_ETHSTAT.clearTXBUSY; inline;
  62789. begin
  62790. pTDefRegMap(@Self)^.clr := $00000040;
  62791. end;
  62792. procedure TETH_ETHSTAT.setTXBUSY(thebits : TBits_1); inline;
  62793. begin
  62794. if thebits = 0 then
  62795. pTDefRegMap(@Self)^.clr := $00000040
  62796. else
  62797. pTDefRegMap(@Self)^.&set := $00000040;
  62798. end;
  62799. function TETH_ETHSTAT.getTXBUSY : TBits_1; inline;
  62800. begin
  62801. getTXBUSY := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62802. end;
  62803. procedure TETH_ETHSTAT.setBUSY; inline;
  62804. begin
  62805. pTDefRegMap(@Self)^.&set := $00000080;
  62806. end;
  62807. procedure TETH_ETHSTAT.clearBUSY; inline;
  62808. begin
  62809. pTDefRegMap(@Self)^.clr := $00000080;
  62810. end;
  62811. procedure TETH_ETHSTAT.setBUSY(thebits : TBits_1); inline;
  62812. begin
  62813. if thebits = 0 then
  62814. pTDefRegMap(@Self)^.clr := $00000080
  62815. else
  62816. pTDefRegMap(@Self)^.&set := $00000080;
  62817. end;
  62818. function TETH_ETHSTAT.getBUSY : TBits_1; inline;
  62819. begin
  62820. getBUSY := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62821. end;
  62822. procedure TETH_ETHSTAT.setBUFCNT(thebits : TBits_8); inline;
  62823. begin
  62824. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  62825. end;
  62826. function TETH_ETHSTAT.getBUFCNT : TBits_8; inline;
  62827. begin
  62828. getBUFCNT := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  62829. end;
  62830. procedure TETH_ETHSTAT.setETHBUSY; inline;
  62831. begin
  62832. pTDefRegMap(@Self)^.&set := $00000080;
  62833. end;
  62834. procedure TETH_ETHSTAT.clearETHBUSY; inline;
  62835. begin
  62836. pTDefRegMap(@Self)^.clr := $00000080;
  62837. end;
  62838. procedure TETH_ETHSTAT.setETHBUSY(thebits : TBits_1); inline;
  62839. begin
  62840. if thebits = 0 then
  62841. pTDefRegMap(@Self)^.clr := $00000080
  62842. else
  62843. pTDefRegMap(@Self)^.&set := $00000080;
  62844. end;
  62845. function TETH_ETHSTAT.getETHBUSY : TBits_1; inline;
  62846. begin
  62847. getETHBUSY := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62848. end;
  62849. procedure TETH_ETHSTAT.setw(thebits : TBits_32); inline;
  62850. begin
  62851. pTDefRegMap(@Self)^.val := thebits;
  62852. end;
  62853. function TETH_ETHSTAT.getw : TBits_32; inline;
  62854. begin
  62855. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62856. end;
  62857. procedure TETH_ETHRXOVFLOW.setRXOVFLWCNT(thebits : TBits_16); inline;
  62858. begin
  62859. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  62860. end;
  62861. function TETH_ETHRXOVFLOW.getRXOVFLWCNT : TBits_16; inline;
  62862. begin
  62863. getRXOVFLWCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  62864. end;
  62865. procedure TETH_ETHRXOVFLOW.setw(thebits : TBits_32); inline;
  62866. begin
  62867. pTDefRegMap(@Self)^.val := thebits;
  62868. end;
  62869. function TETH_ETHRXOVFLOW.getw : TBits_32; inline;
  62870. begin
  62871. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62872. end;
  62873. procedure TETH_ETHFRMTXOK.setFRMTXOKCNT(thebits : TBits_16); inline;
  62874. begin
  62875. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  62876. end;
  62877. function TETH_ETHFRMTXOK.getFRMTXOKCNT : TBits_16; inline;
  62878. begin
  62879. getFRMTXOKCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  62880. end;
  62881. procedure TETH_ETHFRMTXOK.setw(thebits : TBits_32); inline;
  62882. begin
  62883. pTDefRegMap(@Self)^.val := thebits;
  62884. end;
  62885. function TETH_ETHFRMTXOK.getw : TBits_32; inline;
  62886. begin
  62887. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62888. end;
  62889. procedure TETH_ETHSCOLFRM.setSCOLFRMCNT(thebits : TBits_16); inline;
  62890. begin
  62891. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  62892. end;
  62893. function TETH_ETHSCOLFRM.getSCOLFRMCNT : TBits_16; inline;
  62894. begin
  62895. getSCOLFRMCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  62896. end;
  62897. procedure TETH_ETHSCOLFRM.setw(thebits : TBits_32); inline;
  62898. begin
  62899. pTDefRegMap(@Self)^.val := thebits;
  62900. end;
  62901. function TETH_ETHSCOLFRM.getw : TBits_32; inline;
  62902. begin
  62903. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62904. end;
  62905. procedure TETH_ETHMCOLFRM.setMCOLFRMCNT(thebits : TBits_16); inline;
  62906. begin
  62907. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  62908. end;
  62909. function TETH_ETHMCOLFRM.getMCOLFRMCNT : TBits_16; inline;
  62910. begin
  62911. getMCOLFRMCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  62912. end;
  62913. procedure TETH_ETHMCOLFRM.setMCOLFRM_CNT(thebits : TBits_16); inline;
  62914. begin
  62915. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  62916. end;
  62917. function TETH_ETHMCOLFRM.getMCOLFRM_CNT : TBits_16; inline;
  62918. begin
  62919. getMCOLFRM_CNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  62920. end;
  62921. procedure TETH_ETHMCOLFRM.setw(thebits : TBits_32); inline;
  62922. begin
  62923. pTDefRegMap(@Self)^.val := thebits;
  62924. end;
  62925. function TETH_ETHMCOLFRM.getw : TBits_32; inline;
  62926. begin
  62927. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62928. end;
  62929. procedure TETH_ETHFRMRXOK.setFRMRXOKCNT(thebits : TBits_16); inline;
  62930. begin
  62931. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  62932. end;
  62933. function TETH_ETHFRMRXOK.getFRMRXOKCNT : TBits_16; inline;
  62934. begin
  62935. getFRMRXOKCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  62936. end;
  62937. procedure TETH_ETHFRMRXOK.setw(thebits : TBits_32); inline;
  62938. begin
  62939. pTDefRegMap(@Self)^.val := thebits;
  62940. end;
  62941. function TETH_ETHFRMRXOK.getw : TBits_32; inline;
  62942. begin
  62943. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62944. end;
  62945. procedure TETH_ETHFCSERR.setFCSERRCNT(thebits : TBits_16); inline;
  62946. begin
  62947. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  62948. end;
  62949. function TETH_ETHFCSERR.getFCSERRCNT : TBits_16; inline;
  62950. begin
  62951. getFCSERRCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  62952. end;
  62953. procedure TETH_ETHFCSERR.setw(thebits : TBits_32); inline;
  62954. begin
  62955. pTDefRegMap(@Self)^.val := thebits;
  62956. end;
  62957. function TETH_ETHFCSERR.getw : TBits_32; inline;
  62958. begin
  62959. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62960. end;
  62961. procedure TETH_ETHALGNERR.setALGNERRCNT(thebits : TBits_16); inline;
  62962. begin
  62963. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  62964. end;
  62965. function TETH_ETHALGNERR.getALGNERRCNT : TBits_16; inline;
  62966. begin
  62967. getALGNERRCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  62968. end;
  62969. procedure TETH_ETHALGNERR.setw(thebits : TBits_32); inline;
  62970. begin
  62971. pTDefRegMap(@Self)^.val := thebits;
  62972. end;
  62973. function TETH_ETHALGNERR.getw : TBits_32; inline;
  62974. begin
  62975. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62976. end;
  62977. procedure TETH_EMAC1CFG1.setRXENABLE; inline;
  62978. begin
  62979. pTDefRegMap(@Self)^.&set := $00000001;
  62980. end;
  62981. procedure TETH_EMAC1CFG1.clearRXENABLE; inline;
  62982. begin
  62983. pTDefRegMap(@Self)^.clr := $00000001;
  62984. end;
  62985. procedure TETH_EMAC1CFG1.setRXENABLE(thebits : TBits_1); inline;
  62986. begin
  62987. if thebits = 0 then
  62988. pTDefRegMap(@Self)^.clr := $00000001
  62989. else
  62990. pTDefRegMap(@Self)^.&set := $00000001;
  62991. end;
  62992. function TETH_EMAC1CFG1.getRXENABLE : TBits_1; inline;
  62993. begin
  62994. getRXENABLE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  62995. end;
  62996. procedure TETH_EMAC1CFG1.setPASSALL; inline;
  62997. begin
  62998. pTDefRegMap(@Self)^.&set := $00000002;
  62999. end;
  63000. procedure TETH_EMAC1CFG1.clearPASSALL; inline;
  63001. begin
  63002. pTDefRegMap(@Self)^.clr := $00000002;
  63003. end;
  63004. procedure TETH_EMAC1CFG1.setPASSALL(thebits : TBits_1); inline;
  63005. begin
  63006. if thebits = 0 then
  63007. pTDefRegMap(@Self)^.clr := $00000002
  63008. else
  63009. pTDefRegMap(@Self)^.&set := $00000002;
  63010. end;
  63011. function TETH_EMAC1CFG1.getPASSALL : TBits_1; inline;
  63012. begin
  63013. getPASSALL := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  63014. end;
  63015. procedure TETH_EMAC1CFG1.setRXPAUSE; inline;
  63016. begin
  63017. pTDefRegMap(@Self)^.&set := $00000004;
  63018. end;
  63019. procedure TETH_EMAC1CFG1.clearRXPAUSE; inline;
  63020. begin
  63021. pTDefRegMap(@Self)^.clr := $00000004;
  63022. end;
  63023. procedure TETH_EMAC1CFG1.setRXPAUSE(thebits : TBits_1); inline;
  63024. begin
  63025. if thebits = 0 then
  63026. pTDefRegMap(@Self)^.clr := $00000004
  63027. else
  63028. pTDefRegMap(@Self)^.&set := $00000004;
  63029. end;
  63030. function TETH_EMAC1CFG1.getRXPAUSE : TBits_1; inline;
  63031. begin
  63032. getRXPAUSE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  63033. end;
  63034. procedure TETH_EMAC1CFG1.setTXPAUSE; inline;
  63035. begin
  63036. pTDefRegMap(@Self)^.&set := $00000008;
  63037. end;
  63038. procedure TETH_EMAC1CFG1.clearTXPAUSE; inline;
  63039. begin
  63040. pTDefRegMap(@Self)^.clr := $00000008;
  63041. end;
  63042. procedure TETH_EMAC1CFG1.setTXPAUSE(thebits : TBits_1); inline;
  63043. begin
  63044. if thebits = 0 then
  63045. pTDefRegMap(@Self)^.clr := $00000008
  63046. else
  63047. pTDefRegMap(@Self)^.&set := $00000008;
  63048. end;
  63049. function TETH_EMAC1CFG1.getTXPAUSE : TBits_1; inline;
  63050. begin
  63051. getTXPAUSE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  63052. end;
  63053. procedure TETH_EMAC1CFG1.setLOOPBACK; inline;
  63054. begin
  63055. pTDefRegMap(@Self)^.&set := $00000010;
  63056. end;
  63057. procedure TETH_EMAC1CFG1.clearLOOPBACK; inline;
  63058. begin
  63059. pTDefRegMap(@Self)^.clr := $00000010;
  63060. end;
  63061. procedure TETH_EMAC1CFG1.setLOOPBACK(thebits : TBits_1); inline;
  63062. begin
  63063. if thebits = 0 then
  63064. pTDefRegMap(@Self)^.clr := $00000010
  63065. else
  63066. pTDefRegMap(@Self)^.&set := $00000010;
  63067. end;
  63068. function TETH_EMAC1CFG1.getLOOPBACK : TBits_1; inline;
  63069. begin
  63070. getLOOPBACK := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63071. end;
  63072. procedure TETH_EMAC1CFG1.setRESETTFUN; inline;
  63073. begin
  63074. pTDefRegMap(@Self)^.&set := $00000100;
  63075. end;
  63076. procedure TETH_EMAC1CFG1.clearRESETTFUN; inline;
  63077. begin
  63078. pTDefRegMap(@Self)^.clr := $00000100;
  63079. end;
  63080. procedure TETH_EMAC1CFG1.setRESETTFUN(thebits : TBits_1); inline;
  63081. begin
  63082. if thebits = 0 then
  63083. pTDefRegMap(@Self)^.clr := $00000100
  63084. else
  63085. pTDefRegMap(@Self)^.&set := $00000100;
  63086. end;
  63087. function TETH_EMAC1CFG1.getRESETTFUN : TBits_1; inline;
  63088. begin
  63089. getRESETTFUN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  63090. end;
  63091. procedure TETH_EMAC1CFG1.setRESETTMCS; inline;
  63092. begin
  63093. pTDefRegMap(@Self)^.&set := $00000200;
  63094. end;
  63095. procedure TETH_EMAC1CFG1.clearRESETTMCS; inline;
  63096. begin
  63097. pTDefRegMap(@Self)^.clr := $00000200;
  63098. end;
  63099. procedure TETH_EMAC1CFG1.setRESETTMCS(thebits : TBits_1); inline;
  63100. begin
  63101. if thebits = 0 then
  63102. pTDefRegMap(@Self)^.clr := $00000200
  63103. else
  63104. pTDefRegMap(@Self)^.&set := $00000200;
  63105. end;
  63106. function TETH_EMAC1CFG1.getRESETTMCS : TBits_1; inline;
  63107. begin
  63108. getRESETTMCS := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  63109. end;
  63110. procedure TETH_EMAC1CFG1.setRESETRFUN; inline;
  63111. begin
  63112. pTDefRegMap(@Self)^.&set := $00000400;
  63113. end;
  63114. procedure TETH_EMAC1CFG1.clearRESETRFUN; inline;
  63115. begin
  63116. pTDefRegMap(@Self)^.clr := $00000400;
  63117. end;
  63118. procedure TETH_EMAC1CFG1.setRESETRFUN(thebits : TBits_1); inline;
  63119. begin
  63120. if thebits = 0 then
  63121. pTDefRegMap(@Self)^.clr := $00000400
  63122. else
  63123. pTDefRegMap(@Self)^.&set := $00000400;
  63124. end;
  63125. function TETH_EMAC1CFG1.getRESETRFUN : TBits_1; inline;
  63126. begin
  63127. getRESETRFUN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  63128. end;
  63129. procedure TETH_EMAC1CFG1.setRESETRMCS; inline;
  63130. begin
  63131. pTDefRegMap(@Self)^.&set := $00000800;
  63132. end;
  63133. procedure TETH_EMAC1CFG1.clearRESETRMCS; inline;
  63134. begin
  63135. pTDefRegMap(@Self)^.clr := $00000800;
  63136. end;
  63137. procedure TETH_EMAC1CFG1.setRESETRMCS(thebits : TBits_1); inline;
  63138. begin
  63139. if thebits = 0 then
  63140. pTDefRegMap(@Self)^.clr := $00000800
  63141. else
  63142. pTDefRegMap(@Self)^.&set := $00000800;
  63143. end;
  63144. function TETH_EMAC1CFG1.getRESETRMCS : TBits_1; inline;
  63145. begin
  63146. getRESETRMCS := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  63147. end;
  63148. procedure TETH_EMAC1CFG1.setSIMRESET; inline;
  63149. begin
  63150. pTDefRegMap(@Self)^.&set := $00004000;
  63151. end;
  63152. procedure TETH_EMAC1CFG1.clearSIMRESET; inline;
  63153. begin
  63154. pTDefRegMap(@Self)^.clr := $00004000;
  63155. end;
  63156. procedure TETH_EMAC1CFG1.setSIMRESET(thebits : TBits_1); inline;
  63157. begin
  63158. if thebits = 0 then
  63159. pTDefRegMap(@Self)^.clr := $00004000
  63160. else
  63161. pTDefRegMap(@Self)^.&set := $00004000;
  63162. end;
  63163. function TETH_EMAC1CFG1.getSIMRESET : TBits_1; inline;
  63164. begin
  63165. getSIMRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  63166. end;
  63167. procedure TETH_EMAC1CFG1.setSOFTRESET; inline;
  63168. begin
  63169. pTDefRegMap(@Self)^.&set := $00008000;
  63170. end;
  63171. procedure TETH_EMAC1CFG1.clearSOFTRESET; inline;
  63172. begin
  63173. pTDefRegMap(@Self)^.clr := $00008000;
  63174. end;
  63175. procedure TETH_EMAC1CFG1.setSOFTRESET(thebits : TBits_1); inline;
  63176. begin
  63177. if thebits = 0 then
  63178. pTDefRegMap(@Self)^.clr := $00008000
  63179. else
  63180. pTDefRegMap(@Self)^.&set := $00008000;
  63181. end;
  63182. function TETH_EMAC1CFG1.getSOFTRESET : TBits_1; inline;
  63183. begin
  63184. getSOFTRESET := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63185. end;
  63186. procedure TETH_EMAC1CFG1.setw(thebits : TBits_32); inline;
  63187. begin
  63188. pTDefRegMap(@Self)^.val := thebits;
  63189. end;
  63190. function TETH_EMAC1CFG1.getw : TBits_32; inline;
  63191. begin
  63192. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63193. end;
  63194. procedure TETH_EMACxCFG1.setRXENABLE; inline;
  63195. begin
  63196. pTDefRegMap(@Self)^.&set := $00000001;
  63197. end;
  63198. procedure TETH_EMACxCFG1.clearRXENABLE; inline;
  63199. begin
  63200. pTDefRegMap(@Self)^.clr := $00000001;
  63201. end;
  63202. procedure TETH_EMACxCFG1.setRXENABLE(thebits : TBits_1); inline;
  63203. begin
  63204. if thebits = 0 then
  63205. pTDefRegMap(@Self)^.clr := $00000001
  63206. else
  63207. pTDefRegMap(@Self)^.&set := $00000001;
  63208. end;
  63209. function TETH_EMACxCFG1.getRXENABLE : TBits_1; inline;
  63210. begin
  63211. getRXENABLE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  63212. end;
  63213. procedure TETH_EMACxCFG1.setPASSALL; inline;
  63214. begin
  63215. pTDefRegMap(@Self)^.&set := $00000002;
  63216. end;
  63217. procedure TETH_EMACxCFG1.clearPASSALL; inline;
  63218. begin
  63219. pTDefRegMap(@Self)^.clr := $00000002;
  63220. end;
  63221. procedure TETH_EMACxCFG1.setPASSALL(thebits : TBits_1); inline;
  63222. begin
  63223. if thebits = 0 then
  63224. pTDefRegMap(@Self)^.clr := $00000002
  63225. else
  63226. pTDefRegMap(@Self)^.&set := $00000002;
  63227. end;
  63228. function TETH_EMACxCFG1.getPASSALL : TBits_1; inline;
  63229. begin
  63230. getPASSALL := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  63231. end;
  63232. procedure TETH_EMACxCFG1.setRXPAUSE; inline;
  63233. begin
  63234. pTDefRegMap(@Self)^.&set := $00000004;
  63235. end;
  63236. procedure TETH_EMACxCFG1.clearRXPAUSE; inline;
  63237. begin
  63238. pTDefRegMap(@Self)^.clr := $00000004;
  63239. end;
  63240. procedure TETH_EMACxCFG1.setRXPAUSE(thebits : TBits_1); inline;
  63241. begin
  63242. if thebits = 0 then
  63243. pTDefRegMap(@Self)^.clr := $00000004
  63244. else
  63245. pTDefRegMap(@Self)^.&set := $00000004;
  63246. end;
  63247. function TETH_EMACxCFG1.getRXPAUSE : TBits_1; inline;
  63248. begin
  63249. getRXPAUSE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  63250. end;
  63251. procedure TETH_EMACxCFG1.setTXPAUSE; inline;
  63252. begin
  63253. pTDefRegMap(@Self)^.&set := $00000008;
  63254. end;
  63255. procedure TETH_EMACxCFG1.clearTXPAUSE; inline;
  63256. begin
  63257. pTDefRegMap(@Self)^.clr := $00000008;
  63258. end;
  63259. procedure TETH_EMACxCFG1.setTXPAUSE(thebits : TBits_1); inline;
  63260. begin
  63261. if thebits = 0 then
  63262. pTDefRegMap(@Self)^.clr := $00000008
  63263. else
  63264. pTDefRegMap(@Self)^.&set := $00000008;
  63265. end;
  63266. function TETH_EMACxCFG1.getTXPAUSE : TBits_1; inline;
  63267. begin
  63268. getTXPAUSE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  63269. end;
  63270. procedure TETH_EMACxCFG1.setLOOPBACK; inline;
  63271. begin
  63272. pTDefRegMap(@Self)^.&set := $00000010;
  63273. end;
  63274. procedure TETH_EMACxCFG1.clearLOOPBACK; inline;
  63275. begin
  63276. pTDefRegMap(@Self)^.clr := $00000010;
  63277. end;
  63278. procedure TETH_EMACxCFG1.setLOOPBACK(thebits : TBits_1); inline;
  63279. begin
  63280. if thebits = 0 then
  63281. pTDefRegMap(@Self)^.clr := $00000010
  63282. else
  63283. pTDefRegMap(@Self)^.&set := $00000010;
  63284. end;
  63285. function TETH_EMACxCFG1.getLOOPBACK : TBits_1; inline;
  63286. begin
  63287. getLOOPBACK := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63288. end;
  63289. procedure TETH_EMACxCFG1.setRESETTFUN; inline;
  63290. begin
  63291. pTDefRegMap(@Self)^.&set := $00000100;
  63292. end;
  63293. procedure TETH_EMACxCFG1.clearRESETTFUN; inline;
  63294. begin
  63295. pTDefRegMap(@Self)^.clr := $00000100;
  63296. end;
  63297. procedure TETH_EMACxCFG1.setRESETTFUN(thebits : TBits_1); inline;
  63298. begin
  63299. if thebits = 0 then
  63300. pTDefRegMap(@Self)^.clr := $00000100
  63301. else
  63302. pTDefRegMap(@Self)^.&set := $00000100;
  63303. end;
  63304. function TETH_EMACxCFG1.getRESETTFUN : TBits_1; inline;
  63305. begin
  63306. getRESETTFUN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  63307. end;
  63308. procedure TETH_EMACxCFG1.setRESETTMCS; inline;
  63309. begin
  63310. pTDefRegMap(@Self)^.&set := $00000200;
  63311. end;
  63312. procedure TETH_EMACxCFG1.clearRESETTMCS; inline;
  63313. begin
  63314. pTDefRegMap(@Self)^.clr := $00000200;
  63315. end;
  63316. procedure TETH_EMACxCFG1.setRESETTMCS(thebits : TBits_1); inline;
  63317. begin
  63318. if thebits = 0 then
  63319. pTDefRegMap(@Self)^.clr := $00000200
  63320. else
  63321. pTDefRegMap(@Self)^.&set := $00000200;
  63322. end;
  63323. function TETH_EMACxCFG1.getRESETTMCS : TBits_1; inline;
  63324. begin
  63325. getRESETTMCS := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  63326. end;
  63327. procedure TETH_EMACxCFG1.setRESETRFUN; inline;
  63328. begin
  63329. pTDefRegMap(@Self)^.&set := $00000400;
  63330. end;
  63331. procedure TETH_EMACxCFG1.clearRESETRFUN; inline;
  63332. begin
  63333. pTDefRegMap(@Self)^.clr := $00000400;
  63334. end;
  63335. procedure TETH_EMACxCFG1.setRESETRFUN(thebits : TBits_1); inline;
  63336. begin
  63337. if thebits = 0 then
  63338. pTDefRegMap(@Self)^.clr := $00000400
  63339. else
  63340. pTDefRegMap(@Self)^.&set := $00000400;
  63341. end;
  63342. function TETH_EMACxCFG1.getRESETRFUN : TBits_1; inline;
  63343. begin
  63344. getRESETRFUN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  63345. end;
  63346. procedure TETH_EMACxCFG1.setRESETRMCS; inline;
  63347. begin
  63348. pTDefRegMap(@Self)^.&set := $00000800;
  63349. end;
  63350. procedure TETH_EMACxCFG1.clearRESETRMCS; inline;
  63351. begin
  63352. pTDefRegMap(@Self)^.clr := $00000800;
  63353. end;
  63354. procedure TETH_EMACxCFG1.setRESETRMCS(thebits : TBits_1); inline;
  63355. begin
  63356. if thebits = 0 then
  63357. pTDefRegMap(@Self)^.clr := $00000800
  63358. else
  63359. pTDefRegMap(@Self)^.&set := $00000800;
  63360. end;
  63361. function TETH_EMACxCFG1.getRESETRMCS : TBits_1; inline;
  63362. begin
  63363. getRESETRMCS := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  63364. end;
  63365. procedure TETH_EMACxCFG1.setSIMRESET; inline;
  63366. begin
  63367. pTDefRegMap(@Self)^.&set := $00004000;
  63368. end;
  63369. procedure TETH_EMACxCFG1.clearSIMRESET; inline;
  63370. begin
  63371. pTDefRegMap(@Self)^.clr := $00004000;
  63372. end;
  63373. procedure TETH_EMACxCFG1.setSIMRESET(thebits : TBits_1); inline;
  63374. begin
  63375. if thebits = 0 then
  63376. pTDefRegMap(@Self)^.clr := $00004000
  63377. else
  63378. pTDefRegMap(@Self)^.&set := $00004000;
  63379. end;
  63380. function TETH_EMACxCFG1.getSIMRESET : TBits_1; inline;
  63381. begin
  63382. getSIMRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  63383. end;
  63384. procedure TETH_EMACxCFG1.setSOFTRESET; inline;
  63385. begin
  63386. pTDefRegMap(@Self)^.&set := $00008000;
  63387. end;
  63388. procedure TETH_EMACxCFG1.clearSOFTRESET; inline;
  63389. begin
  63390. pTDefRegMap(@Self)^.clr := $00008000;
  63391. end;
  63392. procedure TETH_EMACxCFG1.setSOFTRESET(thebits : TBits_1); inline;
  63393. begin
  63394. if thebits = 0 then
  63395. pTDefRegMap(@Self)^.clr := $00008000
  63396. else
  63397. pTDefRegMap(@Self)^.&set := $00008000;
  63398. end;
  63399. function TETH_EMACxCFG1.getSOFTRESET : TBits_1; inline;
  63400. begin
  63401. getSOFTRESET := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63402. end;
  63403. procedure TETH_EMACxCFG1.setw(thebits : TBits_32); inline;
  63404. begin
  63405. pTDefRegMap(@Self)^.val := thebits;
  63406. end;
  63407. function TETH_EMACxCFG1.getw : TBits_32; inline;
  63408. begin
  63409. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63410. end;
  63411. procedure TETH_EMAC1CFG2.setFULLDPLX; inline;
  63412. begin
  63413. pTDefRegMap(@Self)^.&set := $00000001;
  63414. end;
  63415. procedure TETH_EMAC1CFG2.clearFULLDPLX; inline;
  63416. begin
  63417. pTDefRegMap(@Self)^.clr := $00000001;
  63418. end;
  63419. procedure TETH_EMAC1CFG2.setFULLDPLX(thebits : TBits_1); inline;
  63420. begin
  63421. if thebits = 0 then
  63422. pTDefRegMap(@Self)^.clr := $00000001
  63423. else
  63424. pTDefRegMap(@Self)^.&set := $00000001;
  63425. end;
  63426. function TETH_EMAC1CFG2.getFULLDPLX : TBits_1; inline;
  63427. begin
  63428. getFULLDPLX := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  63429. end;
  63430. procedure TETH_EMAC1CFG2.setLENGTHCK; inline;
  63431. begin
  63432. pTDefRegMap(@Self)^.&set := $00000002;
  63433. end;
  63434. procedure TETH_EMAC1CFG2.clearLENGTHCK; inline;
  63435. begin
  63436. pTDefRegMap(@Self)^.clr := $00000002;
  63437. end;
  63438. procedure TETH_EMAC1CFG2.setLENGTHCK(thebits : TBits_1); inline;
  63439. begin
  63440. if thebits = 0 then
  63441. pTDefRegMap(@Self)^.clr := $00000002
  63442. else
  63443. pTDefRegMap(@Self)^.&set := $00000002;
  63444. end;
  63445. function TETH_EMAC1CFG2.getLENGTHCK : TBits_1; inline;
  63446. begin
  63447. getLENGTHCK := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  63448. end;
  63449. procedure TETH_EMAC1CFG2.setHUGEFRM; inline;
  63450. begin
  63451. pTDefRegMap(@Self)^.&set := $00000004;
  63452. end;
  63453. procedure TETH_EMAC1CFG2.clearHUGEFRM; inline;
  63454. begin
  63455. pTDefRegMap(@Self)^.clr := $00000004;
  63456. end;
  63457. procedure TETH_EMAC1CFG2.setHUGEFRM(thebits : TBits_1); inline;
  63458. begin
  63459. if thebits = 0 then
  63460. pTDefRegMap(@Self)^.clr := $00000004
  63461. else
  63462. pTDefRegMap(@Self)^.&set := $00000004;
  63463. end;
  63464. function TETH_EMAC1CFG2.getHUGEFRM : TBits_1; inline;
  63465. begin
  63466. getHUGEFRM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  63467. end;
  63468. procedure TETH_EMAC1CFG2.setDELAYCRC; inline;
  63469. begin
  63470. pTDefRegMap(@Self)^.&set := $00000008;
  63471. end;
  63472. procedure TETH_EMAC1CFG2.clearDELAYCRC; inline;
  63473. begin
  63474. pTDefRegMap(@Self)^.clr := $00000008;
  63475. end;
  63476. procedure TETH_EMAC1CFG2.setDELAYCRC(thebits : TBits_1); inline;
  63477. begin
  63478. if thebits = 0 then
  63479. pTDefRegMap(@Self)^.clr := $00000008
  63480. else
  63481. pTDefRegMap(@Self)^.&set := $00000008;
  63482. end;
  63483. function TETH_EMAC1CFG2.getDELAYCRC : TBits_1; inline;
  63484. begin
  63485. getDELAYCRC := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  63486. end;
  63487. procedure TETH_EMAC1CFG2.setCRCENABLE; inline;
  63488. begin
  63489. pTDefRegMap(@Self)^.&set := $00000010;
  63490. end;
  63491. procedure TETH_EMAC1CFG2.clearCRCENABLE; inline;
  63492. begin
  63493. pTDefRegMap(@Self)^.clr := $00000010;
  63494. end;
  63495. procedure TETH_EMAC1CFG2.setCRCENABLE(thebits : TBits_1); inline;
  63496. begin
  63497. if thebits = 0 then
  63498. pTDefRegMap(@Self)^.clr := $00000010
  63499. else
  63500. pTDefRegMap(@Self)^.&set := $00000010;
  63501. end;
  63502. function TETH_EMAC1CFG2.getCRCENABLE : TBits_1; inline;
  63503. begin
  63504. getCRCENABLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63505. end;
  63506. procedure TETH_EMAC1CFG2.setPADENABLE; inline;
  63507. begin
  63508. pTDefRegMap(@Self)^.&set := $00000020;
  63509. end;
  63510. procedure TETH_EMAC1CFG2.clearPADENABLE; inline;
  63511. begin
  63512. pTDefRegMap(@Self)^.clr := $00000020;
  63513. end;
  63514. procedure TETH_EMAC1CFG2.setPADENABLE(thebits : TBits_1); inline;
  63515. begin
  63516. if thebits = 0 then
  63517. pTDefRegMap(@Self)^.clr := $00000020
  63518. else
  63519. pTDefRegMap(@Self)^.&set := $00000020;
  63520. end;
  63521. function TETH_EMAC1CFG2.getPADENABLE : TBits_1; inline;
  63522. begin
  63523. getPADENABLE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  63524. end;
  63525. procedure TETH_EMAC1CFG2.setVLANPAD; inline;
  63526. begin
  63527. pTDefRegMap(@Self)^.&set := $00000040;
  63528. end;
  63529. procedure TETH_EMAC1CFG2.clearVLANPAD; inline;
  63530. begin
  63531. pTDefRegMap(@Self)^.clr := $00000040;
  63532. end;
  63533. procedure TETH_EMAC1CFG2.setVLANPAD(thebits : TBits_1); inline;
  63534. begin
  63535. if thebits = 0 then
  63536. pTDefRegMap(@Self)^.clr := $00000040
  63537. else
  63538. pTDefRegMap(@Self)^.&set := $00000040;
  63539. end;
  63540. function TETH_EMAC1CFG2.getVLANPAD : TBits_1; inline;
  63541. begin
  63542. getVLANPAD := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63543. end;
  63544. procedure TETH_EMAC1CFG2.setAUTOPAD; inline;
  63545. begin
  63546. pTDefRegMap(@Self)^.&set := $00000080;
  63547. end;
  63548. procedure TETH_EMAC1CFG2.clearAUTOPAD; inline;
  63549. begin
  63550. pTDefRegMap(@Self)^.clr := $00000080;
  63551. end;
  63552. procedure TETH_EMAC1CFG2.setAUTOPAD(thebits : TBits_1); inline;
  63553. begin
  63554. if thebits = 0 then
  63555. pTDefRegMap(@Self)^.clr := $00000080
  63556. else
  63557. pTDefRegMap(@Self)^.&set := $00000080;
  63558. end;
  63559. function TETH_EMAC1CFG2.getAUTOPAD : TBits_1; inline;
  63560. begin
  63561. getAUTOPAD := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63562. end;
  63563. procedure TETH_EMAC1CFG2.setPUREPRE; inline;
  63564. begin
  63565. pTDefRegMap(@Self)^.&set := $00000100;
  63566. end;
  63567. procedure TETH_EMAC1CFG2.clearPUREPRE; inline;
  63568. begin
  63569. pTDefRegMap(@Self)^.clr := $00000100;
  63570. end;
  63571. procedure TETH_EMAC1CFG2.setPUREPRE(thebits : TBits_1); inline;
  63572. begin
  63573. if thebits = 0 then
  63574. pTDefRegMap(@Self)^.clr := $00000100
  63575. else
  63576. pTDefRegMap(@Self)^.&set := $00000100;
  63577. end;
  63578. function TETH_EMAC1CFG2.getPUREPRE : TBits_1; inline;
  63579. begin
  63580. getPUREPRE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  63581. end;
  63582. procedure TETH_EMAC1CFG2.setLONGPRE; inline;
  63583. begin
  63584. pTDefRegMap(@Self)^.&set := $00000200;
  63585. end;
  63586. procedure TETH_EMAC1CFG2.clearLONGPRE; inline;
  63587. begin
  63588. pTDefRegMap(@Self)^.clr := $00000200;
  63589. end;
  63590. procedure TETH_EMAC1CFG2.setLONGPRE(thebits : TBits_1); inline;
  63591. begin
  63592. if thebits = 0 then
  63593. pTDefRegMap(@Self)^.clr := $00000200
  63594. else
  63595. pTDefRegMap(@Self)^.&set := $00000200;
  63596. end;
  63597. function TETH_EMAC1CFG2.getLONGPRE : TBits_1; inline;
  63598. begin
  63599. getLONGPRE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  63600. end;
  63601. procedure TETH_EMAC1CFG2.setNOBKOFF; inline;
  63602. begin
  63603. pTDefRegMap(@Self)^.&set := $00001000;
  63604. end;
  63605. procedure TETH_EMAC1CFG2.clearNOBKOFF; inline;
  63606. begin
  63607. pTDefRegMap(@Self)^.clr := $00001000;
  63608. end;
  63609. procedure TETH_EMAC1CFG2.setNOBKOFF(thebits : TBits_1); inline;
  63610. begin
  63611. if thebits = 0 then
  63612. pTDefRegMap(@Self)^.clr := $00001000
  63613. else
  63614. pTDefRegMap(@Self)^.&set := $00001000;
  63615. end;
  63616. function TETH_EMAC1CFG2.getNOBKOFF : TBits_1; inline;
  63617. begin
  63618. getNOBKOFF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  63619. end;
  63620. procedure TETH_EMAC1CFG2.setBPNOBKOFF; inline;
  63621. begin
  63622. pTDefRegMap(@Self)^.&set := $00002000;
  63623. end;
  63624. procedure TETH_EMAC1CFG2.clearBPNOBKOFF; inline;
  63625. begin
  63626. pTDefRegMap(@Self)^.clr := $00002000;
  63627. end;
  63628. procedure TETH_EMAC1CFG2.setBPNOBKOFF(thebits : TBits_1); inline;
  63629. begin
  63630. if thebits = 0 then
  63631. pTDefRegMap(@Self)^.clr := $00002000
  63632. else
  63633. pTDefRegMap(@Self)^.&set := $00002000;
  63634. end;
  63635. function TETH_EMAC1CFG2.getBPNOBKOFF : TBits_1; inline;
  63636. begin
  63637. getBPNOBKOFF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  63638. end;
  63639. procedure TETH_EMAC1CFG2.setEXCESSDFR; inline;
  63640. begin
  63641. pTDefRegMap(@Self)^.&set := $00004000;
  63642. end;
  63643. procedure TETH_EMAC1CFG2.clearEXCESSDFR; inline;
  63644. begin
  63645. pTDefRegMap(@Self)^.clr := $00004000;
  63646. end;
  63647. procedure TETH_EMAC1CFG2.setEXCESSDFR(thebits : TBits_1); inline;
  63648. begin
  63649. if thebits = 0 then
  63650. pTDefRegMap(@Self)^.clr := $00004000
  63651. else
  63652. pTDefRegMap(@Self)^.&set := $00004000;
  63653. end;
  63654. function TETH_EMAC1CFG2.getEXCESSDFR : TBits_1; inline;
  63655. begin
  63656. getEXCESSDFR := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  63657. end;
  63658. procedure TETH_EMAC1CFG2.setw(thebits : TBits_32); inline;
  63659. begin
  63660. pTDefRegMap(@Self)^.val := thebits;
  63661. end;
  63662. function TETH_EMAC1CFG2.getw : TBits_32; inline;
  63663. begin
  63664. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63665. end;
  63666. procedure TETH_EMACxCFG2.setFULLDPLX; inline;
  63667. begin
  63668. pTDefRegMap(@Self)^.&set := $00000001;
  63669. end;
  63670. procedure TETH_EMACxCFG2.clearFULLDPLX; inline;
  63671. begin
  63672. pTDefRegMap(@Self)^.clr := $00000001;
  63673. end;
  63674. procedure TETH_EMACxCFG2.setFULLDPLX(thebits : TBits_1); inline;
  63675. begin
  63676. if thebits = 0 then
  63677. pTDefRegMap(@Self)^.clr := $00000001
  63678. else
  63679. pTDefRegMap(@Self)^.&set := $00000001;
  63680. end;
  63681. function TETH_EMACxCFG2.getFULLDPLX : TBits_1; inline;
  63682. begin
  63683. getFULLDPLX := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  63684. end;
  63685. procedure TETH_EMACxCFG2.setLENGTHCK; inline;
  63686. begin
  63687. pTDefRegMap(@Self)^.&set := $00000002;
  63688. end;
  63689. procedure TETH_EMACxCFG2.clearLENGTHCK; inline;
  63690. begin
  63691. pTDefRegMap(@Self)^.clr := $00000002;
  63692. end;
  63693. procedure TETH_EMACxCFG2.setLENGTHCK(thebits : TBits_1); inline;
  63694. begin
  63695. if thebits = 0 then
  63696. pTDefRegMap(@Self)^.clr := $00000002
  63697. else
  63698. pTDefRegMap(@Self)^.&set := $00000002;
  63699. end;
  63700. function TETH_EMACxCFG2.getLENGTHCK : TBits_1; inline;
  63701. begin
  63702. getLENGTHCK := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  63703. end;
  63704. procedure TETH_EMACxCFG2.setHUGEFRM; inline;
  63705. begin
  63706. pTDefRegMap(@Self)^.&set := $00000004;
  63707. end;
  63708. procedure TETH_EMACxCFG2.clearHUGEFRM; inline;
  63709. begin
  63710. pTDefRegMap(@Self)^.clr := $00000004;
  63711. end;
  63712. procedure TETH_EMACxCFG2.setHUGEFRM(thebits : TBits_1); inline;
  63713. begin
  63714. if thebits = 0 then
  63715. pTDefRegMap(@Self)^.clr := $00000004
  63716. else
  63717. pTDefRegMap(@Self)^.&set := $00000004;
  63718. end;
  63719. function TETH_EMACxCFG2.getHUGEFRM : TBits_1; inline;
  63720. begin
  63721. getHUGEFRM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  63722. end;
  63723. procedure TETH_EMACxCFG2.setDELAYCRC; inline;
  63724. begin
  63725. pTDefRegMap(@Self)^.&set := $00000008;
  63726. end;
  63727. procedure TETH_EMACxCFG2.clearDELAYCRC; inline;
  63728. begin
  63729. pTDefRegMap(@Self)^.clr := $00000008;
  63730. end;
  63731. procedure TETH_EMACxCFG2.setDELAYCRC(thebits : TBits_1); inline;
  63732. begin
  63733. if thebits = 0 then
  63734. pTDefRegMap(@Self)^.clr := $00000008
  63735. else
  63736. pTDefRegMap(@Self)^.&set := $00000008;
  63737. end;
  63738. function TETH_EMACxCFG2.getDELAYCRC : TBits_1; inline;
  63739. begin
  63740. getDELAYCRC := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  63741. end;
  63742. procedure TETH_EMACxCFG2.setCRCENABLE; inline;
  63743. begin
  63744. pTDefRegMap(@Self)^.&set := $00000010;
  63745. end;
  63746. procedure TETH_EMACxCFG2.clearCRCENABLE; inline;
  63747. begin
  63748. pTDefRegMap(@Self)^.clr := $00000010;
  63749. end;
  63750. procedure TETH_EMACxCFG2.setCRCENABLE(thebits : TBits_1); inline;
  63751. begin
  63752. if thebits = 0 then
  63753. pTDefRegMap(@Self)^.clr := $00000010
  63754. else
  63755. pTDefRegMap(@Self)^.&set := $00000010;
  63756. end;
  63757. function TETH_EMACxCFG2.getCRCENABLE : TBits_1; inline;
  63758. begin
  63759. getCRCENABLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63760. end;
  63761. procedure TETH_EMACxCFG2.setPADENABLE; inline;
  63762. begin
  63763. pTDefRegMap(@Self)^.&set := $00000020;
  63764. end;
  63765. procedure TETH_EMACxCFG2.clearPADENABLE; inline;
  63766. begin
  63767. pTDefRegMap(@Self)^.clr := $00000020;
  63768. end;
  63769. procedure TETH_EMACxCFG2.setPADENABLE(thebits : TBits_1); inline;
  63770. begin
  63771. if thebits = 0 then
  63772. pTDefRegMap(@Self)^.clr := $00000020
  63773. else
  63774. pTDefRegMap(@Self)^.&set := $00000020;
  63775. end;
  63776. function TETH_EMACxCFG2.getPADENABLE : TBits_1; inline;
  63777. begin
  63778. getPADENABLE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  63779. end;
  63780. procedure TETH_EMACxCFG2.setVLANPAD; inline;
  63781. begin
  63782. pTDefRegMap(@Self)^.&set := $00000040;
  63783. end;
  63784. procedure TETH_EMACxCFG2.clearVLANPAD; inline;
  63785. begin
  63786. pTDefRegMap(@Self)^.clr := $00000040;
  63787. end;
  63788. procedure TETH_EMACxCFG2.setVLANPAD(thebits : TBits_1); inline;
  63789. begin
  63790. if thebits = 0 then
  63791. pTDefRegMap(@Self)^.clr := $00000040
  63792. else
  63793. pTDefRegMap(@Self)^.&set := $00000040;
  63794. end;
  63795. function TETH_EMACxCFG2.getVLANPAD : TBits_1; inline;
  63796. begin
  63797. getVLANPAD := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63798. end;
  63799. procedure TETH_EMACxCFG2.setAUTOPAD; inline;
  63800. begin
  63801. pTDefRegMap(@Self)^.&set := $00000080;
  63802. end;
  63803. procedure TETH_EMACxCFG2.clearAUTOPAD; inline;
  63804. begin
  63805. pTDefRegMap(@Self)^.clr := $00000080;
  63806. end;
  63807. procedure TETH_EMACxCFG2.setAUTOPAD(thebits : TBits_1); inline;
  63808. begin
  63809. if thebits = 0 then
  63810. pTDefRegMap(@Self)^.clr := $00000080
  63811. else
  63812. pTDefRegMap(@Self)^.&set := $00000080;
  63813. end;
  63814. function TETH_EMACxCFG2.getAUTOPAD : TBits_1; inline;
  63815. begin
  63816. getAUTOPAD := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63817. end;
  63818. procedure TETH_EMACxCFG2.setPUREPRE; inline;
  63819. begin
  63820. pTDefRegMap(@Self)^.&set := $00000100;
  63821. end;
  63822. procedure TETH_EMACxCFG2.clearPUREPRE; inline;
  63823. begin
  63824. pTDefRegMap(@Self)^.clr := $00000100;
  63825. end;
  63826. procedure TETH_EMACxCFG2.setPUREPRE(thebits : TBits_1); inline;
  63827. begin
  63828. if thebits = 0 then
  63829. pTDefRegMap(@Self)^.clr := $00000100
  63830. else
  63831. pTDefRegMap(@Self)^.&set := $00000100;
  63832. end;
  63833. function TETH_EMACxCFG2.getPUREPRE : TBits_1; inline;
  63834. begin
  63835. getPUREPRE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  63836. end;
  63837. procedure TETH_EMACxCFG2.setLONGPRE; inline;
  63838. begin
  63839. pTDefRegMap(@Self)^.&set := $00000200;
  63840. end;
  63841. procedure TETH_EMACxCFG2.clearLONGPRE; inline;
  63842. begin
  63843. pTDefRegMap(@Self)^.clr := $00000200;
  63844. end;
  63845. procedure TETH_EMACxCFG2.setLONGPRE(thebits : TBits_1); inline;
  63846. begin
  63847. if thebits = 0 then
  63848. pTDefRegMap(@Self)^.clr := $00000200
  63849. else
  63850. pTDefRegMap(@Self)^.&set := $00000200;
  63851. end;
  63852. function TETH_EMACxCFG2.getLONGPRE : TBits_1; inline;
  63853. begin
  63854. getLONGPRE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  63855. end;
  63856. procedure TETH_EMACxCFG2.setNOBKOFF; inline;
  63857. begin
  63858. pTDefRegMap(@Self)^.&set := $00001000;
  63859. end;
  63860. procedure TETH_EMACxCFG2.clearNOBKOFF; inline;
  63861. begin
  63862. pTDefRegMap(@Self)^.clr := $00001000;
  63863. end;
  63864. procedure TETH_EMACxCFG2.setNOBKOFF(thebits : TBits_1); inline;
  63865. begin
  63866. if thebits = 0 then
  63867. pTDefRegMap(@Self)^.clr := $00001000
  63868. else
  63869. pTDefRegMap(@Self)^.&set := $00001000;
  63870. end;
  63871. function TETH_EMACxCFG2.getNOBKOFF : TBits_1; inline;
  63872. begin
  63873. getNOBKOFF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  63874. end;
  63875. procedure TETH_EMACxCFG2.setBPNOBKOFF; inline;
  63876. begin
  63877. pTDefRegMap(@Self)^.&set := $00002000;
  63878. end;
  63879. procedure TETH_EMACxCFG2.clearBPNOBKOFF; inline;
  63880. begin
  63881. pTDefRegMap(@Self)^.clr := $00002000;
  63882. end;
  63883. procedure TETH_EMACxCFG2.setBPNOBKOFF(thebits : TBits_1); inline;
  63884. begin
  63885. if thebits = 0 then
  63886. pTDefRegMap(@Self)^.clr := $00002000
  63887. else
  63888. pTDefRegMap(@Self)^.&set := $00002000;
  63889. end;
  63890. function TETH_EMACxCFG2.getBPNOBKOFF : TBits_1; inline;
  63891. begin
  63892. getBPNOBKOFF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  63893. end;
  63894. procedure TETH_EMACxCFG2.setEXCESSDFR; inline;
  63895. begin
  63896. pTDefRegMap(@Self)^.&set := $00004000;
  63897. end;
  63898. procedure TETH_EMACxCFG2.clearEXCESSDFR; inline;
  63899. begin
  63900. pTDefRegMap(@Self)^.clr := $00004000;
  63901. end;
  63902. procedure TETH_EMACxCFG2.setEXCESSDFR(thebits : TBits_1); inline;
  63903. begin
  63904. if thebits = 0 then
  63905. pTDefRegMap(@Self)^.clr := $00004000
  63906. else
  63907. pTDefRegMap(@Self)^.&set := $00004000;
  63908. end;
  63909. function TETH_EMACxCFG2.getEXCESSDFR : TBits_1; inline;
  63910. begin
  63911. getEXCESSDFR := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  63912. end;
  63913. procedure TETH_EMACxCFG2.setw(thebits : TBits_32); inline;
  63914. begin
  63915. pTDefRegMap(@Self)^.val := thebits;
  63916. end;
  63917. function TETH_EMACxCFG2.getw : TBits_32; inline;
  63918. begin
  63919. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63920. end;
  63921. procedure TETH_EMAC1IPGT.setB2BIPKTGP(thebits : TBits_7); inline;
  63922. begin
  63923. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  63924. end;
  63925. function TETH_EMAC1IPGT.getB2BIPKTGP : TBits_7; inline;
  63926. begin
  63927. getB2BIPKTGP := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  63928. end;
  63929. procedure TETH_EMAC1IPGT.setw(thebits : TBits_32); inline;
  63930. begin
  63931. pTDefRegMap(@Self)^.val := thebits;
  63932. end;
  63933. function TETH_EMAC1IPGT.getw : TBits_32; inline;
  63934. begin
  63935. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63936. end;
  63937. procedure TETH_EMACxIPGT.setB2BIPKTGP(thebits : TBits_7); inline;
  63938. begin
  63939. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  63940. end;
  63941. function TETH_EMACxIPGT.getB2BIPKTGP : TBits_7; inline;
  63942. begin
  63943. getB2BIPKTGP := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  63944. end;
  63945. procedure TETH_EMACxIPGT.setw(thebits : TBits_32); inline;
  63946. begin
  63947. pTDefRegMap(@Self)^.val := thebits;
  63948. end;
  63949. function TETH_EMACxIPGT.getw : TBits_32; inline;
  63950. begin
  63951. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63952. end;
  63953. procedure TETH_EMAC1IPGR.setNB2BIPKTGP2(thebits : TBits_7); inline;
  63954. begin
  63955. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  63956. end;
  63957. function TETH_EMAC1IPGR.getNB2BIPKTGP2 : TBits_7; inline;
  63958. begin
  63959. getNB2BIPKTGP2 := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  63960. end;
  63961. procedure TETH_EMAC1IPGR.setNB2BIPKTGP1(thebits : TBits_7); inline;
  63962. begin
  63963. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF80FF or ( thebits shl 8 );
  63964. end;
  63965. function TETH_EMAC1IPGR.getNB2BIPKTGP1 : TBits_7; inline;
  63966. begin
  63967. getNB2BIPKTGP1 := (pTDefRegMap(@Self)^.val and $00007F00) shr 8;
  63968. end;
  63969. procedure TETH_EMAC1IPGR.setw(thebits : TBits_32); inline;
  63970. begin
  63971. pTDefRegMap(@Self)^.val := thebits;
  63972. end;
  63973. function TETH_EMAC1IPGR.getw : TBits_32; inline;
  63974. begin
  63975. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63976. end;
  63977. procedure TETH_EMACxIPGR.setNB2BIPKTGP2(thebits : TBits_7); inline;
  63978. begin
  63979. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  63980. end;
  63981. function TETH_EMACxIPGR.getNB2BIPKTGP2 : TBits_7; inline;
  63982. begin
  63983. getNB2BIPKTGP2 := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  63984. end;
  63985. procedure TETH_EMACxIPGR.setNB2BIPKTGP1(thebits : TBits_7); inline;
  63986. begin
  63987. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF80FF or ( thebits shl 8 );
  63988. end;
  63989. function TETH_EMACxIPGR.getNB2BIPKTGP1 : TBits_7; inline;
  63990. begin
  63991. getNB2BIPKTGP1 := (pTDefRegMap(@Self)^.val and $00007F00) shr 8;
  63992. end;
  63993. procedure TETH_EMACxIPGR.setw(thebits : TBits_32); inline;
  63994. begin
  63995. pTDefRegMap(@Self)^.val := thebits;
  63996. end;
  63997. function TETH_EMACxIPGR.getw : TBits_32; inline;
  63998. begin
  63999. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64000. end;
  64001. procedure TETH_EMAC1CLRT.setRETX(thebits : TBits_4); inline;
  64002. begin
  64003. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  64004. end;
  64005. function TETH_EMAC1CLRT.getRETX : TBits_4; inline;
  64006. begin
  64007. getRETX := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  64008. end;
  64009. procedure TETH_EMAC1CLRT.setCWINDOW(thebits : TBits_6); inline;
  64010. begin
  64011. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC0FF or ( thebits shl 8 );
  64012. end;
  64013. function TETH_EMAC1CLRT.getCWINDOW : TBits_6; inline;
  64014. begin
  64015. getCWINDOW := (pTDefRegMap(@Self)^.val and $00003F00) shr 8;
  64016. end;
  64017. procedure TETH_EMAC1CLRT.setw(thebits : TBits_32); inline;
  64018. begin
  64019. pTDefRegMap(@Self)^.val := thebits;
  64020. end;
  64021. function TETH_EMAC1CLRT.getw : TBits_32; inline;
  64022. begin
  64023. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64024. end;
  64025. procedure TETH_EMACxCLRT.setRETX(thebits : TBits_4); inline;
  64026. begin
  64027. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  64028. end;
  64029. function TETH_EMACxCLRT.getRETX : TBits_4; inline;
  64030. begin
  64031. getRETX := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  64032. end;
  64033. procedure TETH_EMACxCLRT.setCWINDOW(thebits : TBits_6); inline;
  64034. begin
  64035. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC0FF or ( thebits shl 8 );
  64036. end;
  64037. function TETH_EMACxCLRT.getCWINDOW : TBits_6; inline;
  64038. begin
  64039. getCWINDOW := (pTDefRegMap(@Self)^.val and $00003F00) shr 8;
  64040. end;
  64041. procedure TETH_EMACxCLRT.setw(thebits : TBits_32); inline;
  64042. begin
  64043. pTDefRegMap(@Self)^.val := thebits;
  64044. end;
  64045. function TETH_EMACxCLRT.getw : TBits_32; inline;
  64046. begin
  64047. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64048. end;
  64049. procedure TETH_EMAC1MAXF.setMACMAXF(thebits : TBits_16); inline;
  64050. begin
  64051. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  64052. end;
  64053. function TETH_EMAC1MAXF.getMACMAXF : TBits_16; inline;
  64054. begin
  64055. getMACMAXF := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  64056. end;
  64057. procedure TETH_EMAC1MAXF.setw(thebits : TBits_32); inline;
  64058. begin
  64059. pTDefRegMap(@Self)^.val := thebits;
  64060. end;
  64061. function TETH_EMAC1MAXF.getw : TBits_32; inline;
  64062. begin
  64063. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64064. end;
  64065. procedure TETH_EMACxMAXF.setMACMAXF(thebits : TBits_16); inline;
  64066. begin
  64067. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  64068. end;
  64069. function TETH_EMACxMAXF.getMACMAXF : TBits_16; inline;
  64070. begin
  64071. getMACMAXF := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  64072. end;
  64073. procedure TETH_EMACxMAXF.setw(thebits : TBits_32); inline;
  64074. begin
  64075. pTDefRegMap(@Self)^.val := thebits;
  64076. end;
  64077. function TETH_EMACxMAXF.getw : TBits_32; inline;
  64078. begin
  64079. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64080. end;
  64081. procedure TETH_EMAC1SUPP.setSPEEDRMII; inline;
  64082. begin
  64083. pTDefRegMap(@Self)^.&set := $00000100;
  64084. end;
  64085. procedure TETH_EMAC1SUPP.clearSPEEDRMII; inline;
  64086. begin
  64087. pTDefRegMap(@Self)^.clr := $00000100;
  64088. end;
  64089. procedure TETH_EMAC1SUPP.setSPEEDRMII(thebits : TBits_1); inline;
  64090. begin
  64091. if thebits = 0 then
  64092. pTDefRegMap(@Self)^.clr := $00000100
  64093. else
  64094. pTDefRegMap(@Self)^.&set := $00000100;
  64095. end;
  64096. function TETH_EMAC1SUPP.getSPEEDRMII : TBits_1; inline;
  64097. begin
  64098. getSPEEDRMII := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  64099. end;
  64100. procedure TETH_EMAC1SUPP.setRESETRMII; inline;
  64101. begin
  64102. pTDefRegMap(@Self)^.&set := $00000800;
  64103. end;
  64104. procedure TETH_EMAC1SUPP.clearRESETRMII; inline;
  64105. begin
  64106. pTDefRegMap(@Self)^.clr := $00000800;
  64107. end;
  64108. procedure TETH_EMAC1SUPP.setRESETRMII(thebits : TBits_1); inline;
  64109. begin
  64110. if thebits = 0 then
  64111. pTDefRegMap(@Self)^.clr := $00000800
  64112. else
  64113. pTDefRegMap(@Self)^.&set := $00000800;
  64114. end;
  64115. function TETH_EMAC1SUPP.getRESETRMII : TBits_1; inline;
  64116. begin
  64117. getRESETRMII := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  64118. end;
  64119. procedure TETH_EMAC1SUPP.setw(thebits : TBits_32); inline;
  64120. begin
  64121. pTDefRegMap(@Self)^.val := thebits;
  64122. end;
  64123. function TETH_EMAC1SUPP.getw : TBits_32; inline;
  64124. begin
  64125. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64126. end;
  64127. procedure TETH_EMACxSUPP.setSPEEDRMII; inline;
  64128. begin
  64129. pTDefRegMap(@Self)^.&set := $00000100;
  64130. end;
  64131. procedure TETH_EMACxSUPP.clearSPEEDRMII; inline;
  64132. begin
  64133. pTDefRegMap(@Self)^.clr := $00000100;
  64134. end;
  64135. procedure TETH_EMACxSUPP.setSPEEDRMII(thebits : TBits_1); inline;
  64136. begin
  64137. if thebits = 0 then
  64138. pTDefRegMap(@Self)^.clr := $00000100
  64139. else
  64140. pTDefRegMap(@Self)^.&set := $00000100;
  64141. end;
  64142. function TETH_EMACxSUPP.getSPEEDRMII : TBits_1; inline;
  64143. begin
  64144. getSPEEDRMII := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  64145. end;
  64146. procedure TETH_EMACxSUPP.setRESETRMII; inline;
  64147. begin
  64148. pTDefRegMap(@Self)^.&set := $00000800;
  64149. end;
  64150. procedure TETH_EMACxSUPP.clearRESETRMII; inline;
  64151. begin
  64152. pTDefRegMap(@Self)^.clr := $00000800;
  64153. end;
  64154. procedure TETH_EMACxSUPP.setRESETRMII(thebits : TBits_1); inline;
  64155. begin
  64156. if thebits = 0 then
  64157. pTDefRegMap(@Self)^.clr := $00000800
  64158. else
  64159. pTDefRegMap(@Self)^.&set := $00000800;
  64160. end;
  64161. function TETH_EMACxSUPP.getRESETRMII : TBits_1; inline;
  64162. begin
  64163. getRESETRMII := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  64164. end;
  64165. procedure TETH_EMACxSUPP.setw(thebits : TBits_32); inline;
  64166. begin
  64167. pTDefRegMap(@Self)^.val := thebits;
  64168. end;
  64169. function TETH_EMACxSUPP.getw : TBits_32; inline;
  64170. begin
  64171. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64172. end;
  64173. procedure TETH_EMAC1TEST.setSHRTQNTA; inline;
  64174. begin
  64175. pTDefRegMap(@Self)^.&set := $00000001;
  64176. end;
  64177. procedure TETH_EMAC1TEST.clearSHRTQNTA; inline;
  64178. begin
  64179. pTDefRegMap(@Self)^.clr := $00000001;
  64180. end;
  64181. procedure TETH_EMAC1TEST.setSHRTQNTA(thebits : TBits_1); inline;
  64182. begin
  64183. if thebits = 0 then
  64184. pTDefRegMap(@Self)^.clr := $00000001
  64185. else
  64186. pTDefRegMap(@Self)^.&set := $00000001;
  64187. end;
  64188. function TETH_EMAC1TEST.getSHRTQNTA : TBits_1; inline;
  64189. begin
  64190. getSHRTQNTA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64191. end;
  64192. procedure TETH_EMAC1TEST.setTESTPAUSE; inline;
  64193. begin
  64194. pTDefRegMap(@Self)^.&set := $00000002;
  64195. end;
  64196. procedure TETH_EMAC1TEST.clearTESTPAUSE; inline;
  64197. begin
  64198. pTDefRegMap(@Self)^.clr := $00000002;
  64199. end;
  64200. procedure TETH_EMAC1TEST.setTESTPAUSE(thebits : TBits_1); inline;
  64201. begin
  64202. if thebits = 0 then
  64203. pTDefRegMap(@Self)^.clr := $00000002
  64204. else
  64205. pTDefRegMap(@Self)^.&set := $00000002;
  64206. end;
  64207. function TETH_EMAC1TEST.getTESTPAUSE : TBits_1; inline;
  64208. begin
  64209. getTESTPAUSE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64210. end;
  64211. procedure TETH_EMAC1TEST.setTESTBP; inline;
  64212. begin
  64213. pTDefRegMap(@Self)^.&set := $00000004;
  64214. end;
  64215. procedure TETH_EMAC1TEST.clearTESTBP; inline;
  64216. begin
  64217. pTDefRegMap(@Self)^.clr := $00000004;
  64218. end;
  64219. procedure TETH_EMAC1TEST.setTESTBP(thebits : TBits_1); inline;
  64220. begin
  64221. if thebits = 0 then
  64222. pTDefRegMap(@Self)^.clr := $00000004
  64223. else
  64224. pTDefRegMap(@Self)^.&set := $00000004;
  64225. end;
  64226. function TETH_EMAC1TEST.getTESTBP : TBits_1; inline;
  64227. begin
  64228. getTESTBP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64229. end;
  64230. procedure TETH_EMAC1TEST.setw(thebits : TBits_32); inline;
  64231. begin
  64232. pTDefRegMap(@Self)^.val := thebits;
  64233. end;
  64234. function TETH_EMAC1TEST.getw : TBits_32; inline;
  64235. begin
  64236. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64237. end;
  64238. procedure TETH_EMACxTEST.setSHRTQNTA; inline;
  64239. begin
  64240. pTDefRegMap(@Self)^.&set := $00000001;
  64241. end;
  64242. procedure TETH_EMACxTEST.clearSHRTQNTA; inline;
  64243. begin
  64244. pTDefRegMap(@Self)^.clr := $00000001;
  64245. end;
  64246. procedure TETH_EMACxTEST.setSHRTQNTA(thebits : TBits_1); inline;
  64247. begin
  64248. if thebits = 0 then
  64249. pTDefRegMap(@Self)^.clr := $00000001
  64250. else
  64251. pTDefRegMap(@Self)^.&set := $00000001;
  64252. end;
  64253. function TETH_EMACxTEST.getSHRTQNTA : TBits_1; inline;
  64254. begin
  64255. getSHRTQNTA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64256. end;
  64257. procedure TETH_EMACxTEST.setTESTPAUSE; inline;
  64258. begin
  64259. pTDefRegMap(@Self)^.&set := $00000002;
  64260. end;
  64261. procedure TETH_EMACxTEST.clearTESTPAUSE; inline;
  64262. begin
  64263. pTDefRegMap(@Self)^.clr := $00000002;
  64264. end;
  64265. procedure TETH_EMACxTEST.setTESTPAUSE(thebits : TBits_1); inline;
  64266. begin
  64267. if thebits = 0 then
  64268. pTDefRegMap(@Self)^.clr := $00000002
  64269. else
  64270. pTDefRegMap(@Self)^.&set := $00000002;
  64271. end;
  64272. function TETH_EMACxTEST.getTESTPAUSE : TBits_1; inline;
  64273. begin
  64274. getTESTPAUSE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64275. end;
  64276. procedure TETH_EMACxTEST.setTESTBP; inline;
  64277. begin
  64278. pTDefRegMap(@Self)^.&set := $00000004;
  64279. end;
  64280. procedure TETH_EMACxTEST.clearTESTBP; inline;
  64281. begin
  64282. pTDefRegMap(@Self)^.clr := $00000004;
  64283. end;
  64284. procedure TETH_EMACxTEST.setTESTBP(thebits : TBits_1); inline;
  64285. begin
  64286. if thebits = 0 then
  64287. pTDefRegMap(@Self)^.clr := $00000004
  64288. else
  64289. pTDefRegMap(@Self)^.&set := $00000004;
  64290. end;
  64291. function TETH_EMACxTEST.getTESTBP : TBits_1; inline;
  64292. begin
  64293. getTESTBP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64294. end;
  64295. procedure TETH_EMACxTEST.setw(thebits : TBits_32); inline;
  64296. begin
  64297. pTDefRegMap(@Self)^.val := thebits;
  64298. end;
  64299. function TETH_EMACxTEST.getw : TBits_32; inline;
  64300. begin
  64301. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64302. end;
  64303. procedure TETH_EMAC1MCFG.setSCANINC; inline;
  64304. begin
  64305. pTDefRegMap(@Self)^.&set := $00000001;
  64306. end;
  64307. procedure TETH_EMAC1MCFG.clearSCANINC; inline;
  64308. begin
  64309. pTDefRegMap(@Self)^.clr := $00000001;
  64310. end;
  64311. procedure TETH_EMAC1MCFG.setSCANINC(thebits : TBits_1); inline;
  64312. begin
  64313. if thebits = 0 then
  64314. pTDefRegMap(@Self)^.clr := $00000001
  64315. else
  64316. pTDefRegMap(@Self)^.&set := $00000001;
  64317. end;
  64318. function TETH_EMAC1MCFG.getSCANINC : TBits_1; inline;
  64319. begin
  64320. getSCANINC := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64321. end;
  64322. procedure TETH_EMAC1MCFG.setNOPRE; inline;
  64323. begin
  64324. pTDefRegMap(@Self)^.&set := $00000002;
  64325. end;
  64326. procedure TETH_EMAC1MCFG.clearNOPRE; inline;
  64327. begin
  64328. pTDefRegMap(@Self)^.clr := $00000002;
  64329. end;
  64330. procedure TETH_EMAC1MCFG.setNOPRE(thebits : TBits_1); inline;
  64331. begin
  64332. if thebits = 0 then
  64333. pTDefRegMap(@Self)^.clr := $00000002
  64334. else
  64335. pTDefRegMap(@Self)^.&set := $00000002;
  64336. end;
  64337. function TETH_EMAC1MCFG.getNOPRE : TBits_1; inline;
  64338. begin
  64339. getNOPRE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64340. end;
  64341. procedure TETH_EMAC1MCFG.setCLKSEL(thebits : TBits_4); inline;
  64342. begin
  64343. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  64344. end;
  64345. function TETH_EMAC1MCFG.getCLKSEL : TBits_4; inline;
  64346. begin
  64347. getCLKSEL := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  64348. end;
  64349. procedure TETH_EMAC1MCFG.setRESETMGMT; inline;
  64350. begin
  64351. pTDefRegMap(@Self)^.&set := $00008000;
  64352. end;
  64353. procedure TETH_EMAC1MCFG.clearRESETMGMT; inline;
  64354. begin
  64355. pTDefRegMap(@Self)^.clr := $00008000;
  64356. end;
  64357. procedure TETH_EMAC1MCFG.setRESETMGMT(thebits : TBits_1); inline;
  64358. begin
  64359. if thebits = 0 then
  64360. pTDefRegMap(@Self)^.clr := $00008000
  64361. else
  64362. pTDefRegMap(@Self)^.&set := $00008000;
  64363. end;
  64364. function TETH_EMAC1MCFG.getRESETMGMT : TBits_1; inline;
  64365. begin
  64366. getRESETMGMT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  64367. end;
  64368. procedure TETH_EMAC1MCFG.setw(thebits : TBits_32); inline;
  64369. begin
  64370. pTDefRegMap(@Self)^.val := thebits;
  64371. end;
  64372. function TETH_EMAC1MCFG.getw : TBits_32; inline;
  64373. begin
  64374. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64375. end;
  64376. procedure TETH_EMACxMCFG.setSCANINC; inline;
  64377. begin
  64378. pTDefRegMap(@Self)^.&set := $00000001;
  64379. end;
  64380. procedure TETH_EMACxMCFG.clearSCANINC; inline;
  64381. begin
  64382. pTDefRegMap(@Self)^.clr := $00000001;
  64383. end;
  64384. procedure TETH_EMACxMCFG.setSCANINC(thebits : TBits_1); inline;
  64385. begin
  64386. if thebits = 0 then
  64387. pTDefRegMap(@Self)^.clr := $00000001
  64388. else
  64389. pTDefRegMap(@Self)^.&set := $00000001;
  64390. end;
  64391. function TETH_EMACxMCFG.getSCANINC : TBits_1; inline;
  64392. begin
  64393. getSCANINC := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64394. end;
  64395. procedure TETH_EMACxMCFG.setNOPRE; inline;
  64396. begin
  64397. pTDefRegMap(@Self)^.&set := $00000002;
  64398. end;
  64399. procedure TETH_EMACxMCFG.clearNOPRE; inline;
  64400. begin
  64401. pTDefRegMap(@Self)^.clr := $00000002;
  64402. end;
  64403. procedure TETH_EMACxMCFG.setNOPRE(thebits : TBits_1); inline;
  64404. begin
  64405. if thebits = 0 then
  64406. pTDefRegMap(@Self)^.clr := $00000002
  64407. else
  64408. pTDefRegMap(@Self)^.&set := $00000002;
  64409. end;
  64410. function TETH_EMACxMCFG.getNOPRE : TBits_1; inline;
  64411. begin
  64412. getNOPRE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64413. end;
  64414. procedure TETH_EMACxMCFG.setCLKSEL(thebits : TBits_4); inline;
  64415. begin
  64416. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  64417. end;
  64418. function TETH_EMACxMCFG.getCLKSEL : TBits_4; inline;
  64419. begin
  64420. getCLKSEL := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  64421. end;
  64422. procedure TETH_EMACxMCFG.setRESETMGMT; inline;
  64423. begin
  64424. pTDefRegMap(@Self)^.&set := $00008000;
  64425. end;
  64426. procedure TETH_EMACxMCFG.clearRESETMGMT; inline;
  64427. begin
  64428. pTDefRegMap(@Self)^.clr := $00008000;
  64429. end;
  64430. procedure TETH_EMACxMCFG.setRESETMGMT(thebits : TBits_1); inline;
  64431. begin
  64432. if thebits = 0 then
  64433. pTDefRegMap(@Self)^.clr := $00008000
  64434. else
  64435. pTDefRegMap(@Self)^.&set := $00008000;
  64436. end;
  64437. function TETH_EMACxMCFG.getRESETMGMT : TBits_1; inline;
  64438. begin
  64439. getRESETMGMT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  64440. end;
  64441. procedure TETH_EMACxMCFG.setw(thebits : TBits_32); inline;
  64442. begin
  64443. pTDefRegMap(@Self)^.val := thebits;
  64444. end;
  64445. function TETH_EMACxMCFG.getw : TBits_32; inline;
  64446. begin
  64447. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64448. end;
  64449. procedure TETH_EMAC1MCMD.setREAD; inline;
  64450. begin
  64451. pTDefRegMap(@Self)^.&set := $00000001;
  64452. end;
  64453. procedure TETH_EMAC1MCMD.clearREAD; inline;
  64454. begin
  64455. pTDefRegMap(@Self)^.clr := $00000001;
  64456. end;
  64457. procedure TETH_EMAC1MCMD.setREAD(thebits : TBits_1); inline;
  64458. begin
  64459. if thebits = 0 then
  64460. pTDefRegMap(@Self)^.clr := $00000001
  64461. else
  64462. pTDefRegMap(@Self)^.&set := $00000001;
  64463. end;
  64464. function TETH_EMAC1MCMD.getREAD : TBits_1; inline;
  64465. begin
  64466. getREAD := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64467. end;
  64468. procedure TETH_EMAC1MCMD.setSCAN; inline;
  64469. begin
  64470. pTDefRegMap(@Self)^.&set := $00000002;
  64471. end;
  64472. procedure TETH_EMAC1MCMD.clearSCAN; inline;
  64473. begin
  64474. pTDefRegMap(@Self)^.clr := $00000002;
  64475. end;
  64476. procedure TETH_EMAC1MCMD.setSCAN(thebits : TBits_1); inline;
  64477. begin
  64478. if thebits = 0 then
  64479. pTDefRegMap(@Self)^.clr := $00000002
  64480. else
  64481. pTDefRegMap(@Self)^.&set := $00000002;
  64482. end;
  64483. function TETH_EMAC1MCMD.getSCAN : TBits_1; inline;
  64484. begin
  64485. getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64486. end;
  64487. procedure TETH_EMAC1MCMD.setw(thebits : TBits_32); inline;
  64488. begin
  64489. pTDefRegMap(@Self)^.val := thebits;
  64490. end;
  64491. function TETH_EMAC1MCMD.getw : TBits_32; inline;
  64492. begin
  64493. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64494. end;
  64495. procedure TETH_EMACxMCMD.setREAD; inline;
  64496. begin
  64497. pTDefRegMap(@Self)^.&set := $00000001;
  64498. end;
  64499. procedure TETH_EMACxMCMD.clearREAD; inline;
  64500. begin
  64501. pTDefRegMap(@Self)^.clr := $00000001;
  64502. end;
  64503. procedure TETH_EMACxMCMD.setREAD(thebits : TBits_1); inline;
  64504. begin
  64505. if thebits = 0 then
  64506. pTDefRegMap(@Self)^.clr := $00000001
  64507. else
  64508. pTDefRegMap(@Self)^.&set := $00000001;
  64509. end;
  64510. function TETH_EMACxMCMD.getREAD : TBits_1; inline;
  64511. begin
  64512. getREAD := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64513. end;
  64514. procedure TETH_EMACxMCMD.setSCAN; inline;
  64515. begin
  64516. pTDefRegMap(@Self)^.&set := $00000002;
  64517. end;
  64518. procedure TETH_EMACxMCMD.clearSCAN; inline;
  64519. begin
  64520. pTDefRegMap(@Self)^.clr := $00000002;
  64521. end;
  64522. procedure TETH_EMACxMCMD.setSCAN(thebits : TBits_1); inline;
  64523. begin
  64524. if thebits = 0 then
  64525. pTDefRegMap(@Self)^.clr := $00000002
  64526. else
  64527. pTDefRegMap(@Self)^.&set := $00000002;
  64528. end;
  64529. function TETH_EMACxMCMD.getSCAN : TBits_1; inline;
  64530. begin
  64531. getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64532. end;
  64533. procedure TETH_EMACxMCMD.setw(thebits : TBits_32); inline;
  64534. begin
  64535. pTDefRegMap(@Self)^.val := thebits;
  64536. end;
  64537. function TETH_EMACxMCMD.getw : TBits_32; inline;
  64538. begin
  64539. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64540. end;
  64541. procedure TETH_EMAC1MADR.setREGADDR(thebits : TBits_5); inline;
  64542. begin
  64543. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  64544. end;
  64545. function TETH_EMAC1MADR.getREGADDR : TBits_5; inline;
  64546. begin
  64547. getREGADDR := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  64548. end;
  64549. procedure TETH_EMAC1MADR.setPHYADDR(thebits : TBits_5); inline;
  64550. begin
  64551. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  64552. end;
  64553. function TETH_EMAC1MADR.getPHYADDR : TBits_5; inline;
  64554. begin
  64555. getPHYADDR := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  64556. end;
  64557. procedure TETH_EMAC1MADR.setw(thebits : TBits_32); inline;
  64558. begin
  64559. pTDefRegMap(@Self)^.val := thebits;
  64560. end;
  64561. function TETH_EMAC1MADR.getw : TBits_32; inline;
  64562. begin
  64563. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64564. end;
  64565. procedure TETH_EMACxMADR.setREGADDR(thebits : TBits_5); inline;
  64566. begin
  64567. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  64568. end;
  64569. function TETH_EMACxMADR.getREGADDR : TBits_5; inline;
  64570. begin
  64571. getREGADDR := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  64572. end;
  64573. procedure TETH_EMACxMADR.setPHYADDR(thebits : TBits_5); inline;
  64574. begin
  64575. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  64576. end;
  64577. function TETH_EMACxMADR.getPHYADDR : TBits_5; inline;
  64578. begin
  64579. getPHYADDR := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  64580. end;
  64581. procedure TETH_EMACxMADR.setw(thebits : TBits_32); inline;
  64582. begin
  64583. pTDefRegMap(@Self)^.val := thebits;
  64584. end;
  64585. function TETH_EMACxMADR.getw : TBits_32; inline;
  64586. begin
  64587. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64588. end;
  64589. procedure TETH_EMAC1MWTD.setMWTD(thebits : TBits_16); inline;
  64590. begin
  64591. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  64592. end;
  64593. function TETH_EMAC1MWTD.getMWTD : TBits_16; inline;
  64594. begin
  64595. getMWTD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  64596. end;
  64597. procedure TETH_EMAC1MWTD.setw(thebits : TBits_32); inline;
  64598. begin
  64599. pTDefRegMap(@Self)^.val := thebits;
  64600. end;
  64601. function TETH_EMAC1MWTD.getw : TBits_32; inline;
  64602. begin
  64603. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64604. end;
  64605. procedure TETH_EMACxMWTD.setMWTD(thebits : TBits_16); inline;
  64606. begin
  64607. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  64608. end;
  64609. function TETH_EMACxMWTD.getMWTD : TBits_16; inline;
  64610. begin
  64611. getMWTD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  64612. end;
  64613. procedure TETH_EMACxMWTD.setw(thebits : TBits_32); inline;
  64614. begin
  64615. pTDefRegMap(@Self)^.val := thebits;
  64616. end;
  64617. function TETH_EMACxMWTD.getw : TBits_32; inline;
  64618. begin
  64619. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64620. end;
  64621. procedure TETH_EMAC1MRDD.setMRDD(thebits : TBits_16); inline;
  64622. begin
  64623. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  64624. end;
  64625. function TETH_EMAC1MRDD.getMRDD : TBits_16; inline;
  64626. begin
  64627. getMRDD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  64628. end;
  64629. procedure TETH_EMAC1MRDD.setw(thebits : TBits_32); inline;
  64630. begin
  64631. pTDefRegMap(@Self)^.val := thebits;
  64632. end;
  64633. function TETH_EMAC1MRDD.getw : TBits_32; inline;
  64634. begin
  64635. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64636. end;
  64637. procedure TETH_EMACxMRDD.setMRDD(thebits : TBits_16); inline;
  64638. begin
  64639. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  64640. end;
  64641. function TETH_EMACxMRDD.getMRDD : TBits_16; inline;
  64642. begin
  64643. getMRDD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  64644. end;
  64645. procedure TETH_EMACxMRDD.setw(thebits : TBits_32); inline;
  64646. begin
  64647. pTDefRegMap(@Self)^.val := thebits;
  64648. end;
  64649. function TETH_EMACxMRDD.getw : TBits_32; inline;
  64650. begin
  64651. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64652. end;
  64653. procedure TETH_EMAC1MIND.setMIIMBUSY; inline;
  64654. begin
  64655. pTDefRegMap(@Self)^.&set := $00000001;
  64656. end;
  64657. procedure TETH_EMAC1MIND.clearMIIMBUSY; inline;
  64658. begin
  64659. pTDefRegMap(@Self)^.clr := $00000001;
  64660. end;
  64661. procedure TETH_EMAC1MIND.setMIIMBUSY(thebits : TBits_1); inline;
  64662. begin
  64663. if thebits = 0 then
  64664. pTDefRegMap(@Self)^.clr := $00000001
  64665. else
  64666. pTDefRegMap(@Self)^.&set := $00000001;
  64667. end;
  64668. function TETH_EMAC1MIND.getMIIMBUSY : TBits_1; inline;
  64669. begin
  64670. getMIIMBUSY := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64671. end;
  64672. procedure TETH_EMAC1MIND.setSCAN; inline;
  64673. begin
  64674. pTDefRegMap(@Self)^.&set := $00000002;
  64675. end;
  64676. procedure TETH_EMAC1MIND.clearSCAN; inline;
  64677. begin
  64678. pTDefRegMap(@Self)^.clr := $00000002;
  64679. end;
  64680. procedure TETH_EMAC1MIND.setSCAN(thebits : TBits_1); inline;
  64681. begin
  64682. if thebits = 0 then
  64683. pTDefRegMap(@Self)^.clr := $00000002
  64684. else
  64685. pTDefRegMap(@Self)^.&set := $00000002;
  64686. end;
  64687. function TETH_EMAC1MIND.getSCAN : TBits_1; inline;
  64688. begin
  64689. getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64690. end;
  64691. procedure TETH_EMAC1MIND.setNOTVALID; inline;
  64692. begin
  64693. pTDefRegMap(@Self)^.&set := $00000004;
  64694. end;
  64695. procedure TETH_EMAC1MIND.clearNOTVALID; inline;
  64696. begin
  64697. pTDefRegMap(@Self)^.clr := $00000004;
  64698. end;
  64699. procedure TETH_EMAC1MIND.setNOTVALID(thebits : TBits_1); inline;
  64700. begin
  64701. if thebits = 0 then
  64702. pTDefRegMap(@Self)^.clr := $00000004
  64703. else
  64704. pTDefRegMap(@Self)^.&set := $00000004;
  64705. end;
  64706. function TETH_EMAC1MIND.getNOTVALID : TBits_1; inline;
  64707. begin
  64708. getNOTVALID := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64709. end;
  64710. procedure TETH_EMAC1MIND.setLINKFAIL; inline;
  64711. begin
  64712. pTDefRegMap(@Self)^.&set := $00000008;
  64713. end;
  64714. procedure TETH_EMAC1MIND.clearLINKFAIL; inline;
  64715. begin
  64716. pTDefRegMap(@Self)^.clr := $00000008;
  64717. end;
  64718. procedure TETH_EMAC1MIND.setLINKFAIL(thebits : TBits_1); inline;
  64719. begin
  64720. if thebits = 0 then
  64721. pTDefRegMap(@Self)^.clr := $00000008
  64722. else
  64723. pTDefRegMap(@Self)^.&set := $00000008;
  64724. end;
  64725. function TETH_EMAC1MIND.getLINKFAIL : TBits_1; inline;
  64726. begin
  64727. getLINKFAIL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  64728. end;
  64729. procedure TETH_EMAC1MIND.setw(thebits : TBits_32); inline;
  64730. begin
  64731. pTDefRegMap(@Self)^.val := thebits;
  64732. end;
  64733. function TETH_EMAC1MIND.getw : TBits_32; inline;
  64734. begin
  64735. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64736. end;
  64737. procedure TETH_EMACxMIND.setMIIMBUSY; inline;
  64738. begin
  64739. pTDefRegMap(@Self)^.&set := $00000001;
  64740. end;
  64741. procedure TETH_EMACxMIND.clearMIIMBUSY; inline;
  64742. begin
  64743. pTDefRegMap(@Self)^.clr := $00000001;
  64744. end;
  64745. procedure TETH_EMACxMIND.setMIIMBUSY(thebits : TBits_1); inline;
  64746. begin
  64747. if thebits = 0 then
  64748. pTDefRegMap(@Self)^.clr := $00000001
  64749. else
  64750. pTDefRegMap(@Self)^.&set := $00000001;
  64751. end;
  64752. function TETH_EMACxMIND.getMIIMBUSY : TBits_1; inline;
  64753. begin
  64754. getMIIMBUSY := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64755. end;
  64756. procedure TETH_EMACxMIND.setSCAN; inline;
  64757. begin
  64758. pTDefRegMap(@Self)^.&set := $00000002;
  64759. end;
  64760. procedure TETH_EMACxMIND.clearSCAN; inline;
  64761. begin
  64762. pTDefRegMap(@Self)^.clr := $00000002;
  64763. end;
  64764. procedure TETH_EMACxMIND.setSCAN(thebits : TBits_1); inline;
  64765. begin
  64766. if thebits = 0 then
  64767. pTDefRegMap(@Self)^.clr := $00000002
  64768. else
  64769. pTDefRegMap(@Self)^.&set := $00000002;
  64770. end;
  64771. function TETH_EMACxMIND.getSCAN : TBits_1; inline;
  64772. begin
  64773. getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64774. end;
  64775. procedure TETH_EMACxMIND.setNOTVALID; inline;
  64776. begin
  64777. pTDefRegMap(@Self)^.&set := $00000004;
  64778. end;
  64779. procedure TETH_EMACxMIND.clearNOTVALID; inline;
  64780. begin
  64781. pTDefRegMap(@Self)^.clr := $00000004;
  64782. end;
  64783. procedure TETH_EMACxMIND.setNOTVALID(thebits : TBits_1); inline;
  64784. begin
  64785. if thebits = 0 then
  64786. pTDefRegMap(@Self)^.clr := $00000004
  64787. else
  64788. pTDefRegMap(@Self)^.&set := $00000004;
  64789. end;
  64790. function TETH_EMACxMIND.getNOTVALID : TBits_1; inline;
  64791. begin
  64792. getNOTVALID := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64793. end;
  64794. procedure TETH_EMACxMIND.setLINKFAIL; inline;
  64795. begin
  64796. pTDefRegMap(@Self)^.&set := $00000008;
  64797. end;
  64798. procedure TETH_EMACxMIND.clearLINKFAIL; inline;
  64799. begin
  64800. pTDefRegMap(@Self)^.clr := $00000008;
  64801. end;
  64802. procedure TETH_EMACxMIND.setLINKFAIL(thebits : TBits_1); inline;
  64803. begin
  64804. if thebits = 0 then
  64805. pTDefRegMap(@Self)^.clr := $00000008
  64806. else
  64807. pTDefRegMap(@Self)^.&set := $00000008;
  64808. end;
  64809. function TETH_EMACxMIND.getLINKFAIL : TBits_1; inline;
  64810. begin
  64811. getLINKFAIL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  64812. end;
  64813. procedure TETH_EMACxMIND.setw(thebits : TBits_32); inline;
  64814. begin
  64815. pTDefRegMap(@Self)^.val := thebits;
  64816. end;
  64817. function TETH_EMACxMIND.getw : TBits_32; inline;
  64818. begin
  64819. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64820. end;
  64821. procedure TETH_EMAC1SA0.setSTNADDR5(thebits : TBits_8); inline;
  64822. begin
  64823. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  64824. end;
  64825. function TETH_EMAC1SA0.getSTNADDR5 : TBits_8; inline;
  64826. begin
  64827. getSTNADDR5 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  64828. end;
  64829. procedure TETH_EMAC1SA0.setSTNADDR6(thebits : TBits_8); inline;
  64830. begin
  64831. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  64832. end;
  64833. function TETH_EMAC1SA0.getSTNADDR6 : TBits_8; inline;
  64834. begin
  64835. getSTNADDR6 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  64836. end;
  64837. procedure TETH_EMAC1SA0.setw(thebits : TBits_32); inline;
  64838. begin
  64839. pTDefRegMap(@Self)^.val := thebits;
  64840. end;
  64841. function TETH_EMAC1SA0.getw : TBits_32; inline;
  64842. begin
  64843. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64844. end;
  64845. procedure TETH_EMACxSA0.setSTNADDR5(thebits : TBits_8); inline;
  64846. begin
  64847. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  64848. end;
  64849. function TETH_EMACxSA0.getSTNADDR5 : TBits_8; inline;
  64850. begin
  64851. getSTNADDR5 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  64852. end;
  64853. procedure TETH_EMACxSA0.setSTNADDR6(thebits : TBits_8); inline;
  64854. begin
  64855. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  64856. end;
  64857. function TETH_EMACxSA0.getSTNADDR6 : TBits_8; inline;
  64858. begin
  64859. getSTNADDR6 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  64860. end;
  64861. procedure TETH_EMACxSA0.setw(thebits : TBits_32); inline;
  64862. begin
  64863. pTDefRegMap(@Self)^.val := thebits;
  64864. end;
  64865. function TETH_EMACxSA0.getw : TBits_32; inline;
  64866. begin
  64867. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64868. end;
  64869. procedure TETH_EMAC1SA1.setSTNADDR3(thebits : TBits_8); inline;
  64870. begin
  64871. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  64872. end;
  64873. function TETH_EMAC1SA1.getSTNADDR3 : TBits_8; inline;
  64874. begin
  64875. getSTNADDR3 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  64876. end;
  64877. procedure TETH_EMAC1SA1.setSTNADDR4(thebits : TBits_8); inline;
  64878. begin
  64879. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  64880. end;
  64881. function TETH_EMAC1SA1.getSTNADDR4 : TBits_8; inline;
  64882. begin
  64883. getSTNADDR4 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  64884. end;
  64885. procedure TETH_EMAC1SA1.setw(thebits : TBits_32); inline;
  64886. begin
  64887. pTDefRegMap(@Self)^.val := thebits;
  64888. end;
  64889. function TETH_EMAC1SA1.getw : TBits_32; inline;
  64890. begin
  64891. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64892. end;
  64893. procedure TETH_EMACxSA1.setSTNADDR3(thebits : TBits_8); inline;
  64894. begin
  64895. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  64896. end;
  64897. function TETH_EMACxSA1.getSTNADDR3 : TBits_8; inline;
  64898. begin
  64899. getSTNADDR3 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  64900. end;
  64901. procedure TETH_EMACxSA1.setSTNADDR4(thebits : TBits_8); inline;
  64902. begin
  64903. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  64904. end;
  64905. function TETH_EMACxSA1.getSTNADDR4 : TBits_8; inline;
  64906. begin
  64907. getSTNADDR4 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  64908. end;
  64909. procedure TETH_EMACxSA1.setw(thebits : TBits_32); inline;
  64910. begin
  64911. pTDefRegMap(@Self)^.val := thebits;
  64912. end;
  64913. function TETH_EMACxSA1.getw : TBits_32; inline;
  64914. begin
  64915. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64916. end;
  64917. procedure TETH_EMAC1SA2.setSTNADDR1(thebits : TBits_8); inline;
  64918. begin
  64919. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  64920. end;
  64921. function TETH_EMAC1SA2.getSTNADDR1 : TBits_8; inline;
  64922. begin
  64923. getSTNADDR1 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  64924. end;
  64925. procedure TETH_EMAC1SA2.setSTNADDR2(thebits : TBits_8); inline;
  64926. begin
  64927. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  64928. end;
  64929. function TETH_EMAC1SA2.getSTNADDR2 : TBits_8; inline;
  64930. begin
  64931. getSTNADDR2 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  64932. end;
  64933. procedure TETH_EMAC1SA2.setw(thebits : TBits_32); inline;
  64934. begin
  64935. pTDefRegMap(@Self)^.val := thebits;
  64936. end;
  64937. function TETH_EMAC1SA2.getw : TBits_32; inline;
  64938. begin
  64939. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64940. end;
  64941. procedure TETH_EMACxSA2.setSTNADDR1(thebits : TBits_8); inline;
  64942. begin
  64943. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  64944. end;
  64945. function TETH_EMACxSA2.getSTNADDR1 : TBits_8; inline;
  64946. begin
  64947. getSTNADDR1 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  64948. end;
  64949. procedure TETH_EMACxSA2.setSTNADDR2(thebits : TBits_8); inline;
  64950. begin
  64951. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  64952. end;
  64953. function TETH_EMACxSA2.getSTNADDR2 : TBits_8; inline;
  64954. begin
  64955. getSTNADDR2 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  64956. end;
  64957. procedure TETH_EMACxSA2.setw(thebits : TBits_32); inline;
  64958. begin
  64959. pTDefRegMap(@Self)^.val := thebits;
  64960. end;
  64961. function TETH_EMACxSA2.getw : TBits_32; inline;
  64962. begin
  64963. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64964. end;
  64965. procedure TCAN1_C1CON.setDNCNT(thebits : TBits_5); inline;
  64966. begin
  64967. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  64968. end;
  64969. function TCAN1_C1CON.getDNCNT : TBits_5; inline;
  64970. begin
  64971. getDNCNT := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  64972. end;
  64973. procedure TCAN1_C1CON.setCANBUSY; inline;
  64974. begin
  64975. pTDefRegMap(@Self)^.&set := $00000800;
  64976. end;
  64977. procedure TCAN1_C1CON.clearCANBUSY; inline;
  64978. begin
  64979. pTDefRegMap(@Self)^.clr := $00000800;
  64980. end;
  64981. procedure TCAN1_C1CON.setCANBUSY(thebits : TBits_1); inline;
  64982. begin
  64983. if thebits = 0 then
  64984. pTDefRegMap(@Self)^.clr := $00000800
  64985. else
  64986. pTDefRegMap(@Self)^.&set := $00000800;
  64987. end;
  64988. function TCAN1_C1CON.getCANBUSY : TBits_1; inline;
  64989. begin
  64990. getCANBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  64991. end;
  64992. procedure TCAN1_C1CON.setSIDL; inline;
  64993. begin
  64994. pTDefRegMap(@Self)^.&set := $00002000;
  64995. end;
  64996. procedure TCAN1_C1CON.clearSIDL; inline;
  64997. begin
  64998. pTDefRegMap(@Self)^.clr := $00002000;
  64999. end;
  65000. procedure TCAN1_C1CON.setSIDL(thebits : TBits_1); inline;
  65001. begin
  65002. if thebits = 0 then
  65003. pTDefRegMap(@Self)^.clr := $00002000
  65004. else
  65005. pTDefRegMap(@Self)^.&set := $00002000;
  65006. end;
  65007. function TCAN1_C1CON.getSIDL : TBits_1; inline;
  65008. begin
  65009. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  65010. end;
  65011. procedure TCAN1_C1CON.setON; inline;
  65012. begin
  65013. pTDefRegMap(@Self)^.&set := $00008000;
  65014. end;
  65015. procedure TCAN1_C1CON.clearON; inline;
  65016. begin
  65017. pTDefRegMap(@Self)^.clr := $00008000;
  65018. end;
  65019. procedure TCAN1_C1CON.setON(thebits : TBits_1); inline;
  65020. begin
  65021. if thebits = 0 then
  65022. pTDefRegMap(@Self)^.clr := $00008000
  65023. else
  65024. pTDefRegMap(@Self)^.&set := $00008000;
  65025. end;
  65026. function TCAN1_C1CON.getON : TBits_1; inline;
  65027. begin
  65028. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  65029. end;
  65030. procedure TCAN1_C1CON.setCANCAP; inline;
  65031. begin
  65032. pTDefRegMap(@Self)^.&set := $00100000;
  65033. end;
  65034. procedure TCAN1_C1CON.clearCANCAP; inline;
  65035. begin
  65036. pTDefRegMap(@Self)^.clr := $00100000;
  65037. end;
  65038. procedure TCAN1_C1CON.setCANCAP(thebits : TBits_1); inline;
  65039. begin
  65040. if thebits = 0 then
  65041. pTDefRegMap(@Self)^.clr := $00100000
  65042. else
  65043. pTDefRegMap(@Self)^.&set := $00100000;
  65044. end;
  65045. function TCAN1_C1CON.getCANCAP : TBits_1; inline;
  65046. begin
  65047. getCANCAP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  65048. end;
  65049. procedure TCAN1_C1CON.setOPMOD(thebits : TBits_3); inline;
  65050. begin
  65051. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF1FFFFF or ( thebits shl 21 );
  65052. end;
  65053. function TCAN1_C1CON.getOPMOD : TBits_3; inline;
  65054. begin
  65055. getOPMOD := (pTDefRegMap(@Self)^.val and $00E00000) shr 21;
  65056. end;
  65057. procedure TCAN1_C1CON.setREQOP(thebits : TBits_3); inline;
  65058. begin
  65059. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  65060. end;
  65061. function TCAN1_C1CON.getREQOP : TBits_3; inline;
  65062. begin
  65063. getREQOP := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  65064. end;
  65065. procedure TCAN1_C1CON.setABAT; inline;
  65066. begin
  65067. pTDefRegMap(@Self)^.&set := $08000000;
  65068. end;
  65069. procedure TCAN1_C1CON.clearABAT; inline;
  65070. begin
  65071. pTDefRegMap(@Self)^.clr := $08000000;
  65072. end;
  65073. procedure TCAN1_C1CON.setABAT(thebits : TBits_1); inline;
  65074. begin
  65075. if thebits = 0 then
  65076. pTDefRegMap(@Self)^.clr := $08000000
  65077. else
  65078. pTDefRegMap(@Self)^.&set := $08000000;
  65079. end;
  65080. function TCAN1_C1CON.getABAT : TBits_1; inline;
  65081. begin
  65082. getABAT := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  65083. end;
  65084. procedure TCAN1_C1CON.setw(thebits : TBits_32); inline;
  65085. begin
  65086. pTDefRegMap(@Self)^.val := thebits;
  65087. end;
  65088. function TCAN1_C1CON.getw : TBits_32; inline;
  65089. begin
  65090. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65091. end;
  65092. procedure TCAN1_C1CFG.setBRP(thebits : TBits_6); inline;
  65093. begin
  65094. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
  65095. end;
  65096. function TCAN1_C1CFG.getBRP : TBits_6; inline;
  65097. begin
  65098. getBRP := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
  65099. end;
  65100. procedure TCAN1_C1CFG.setSJW(thebits : TBits_2); inline;
  65101. begin
  65102. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  65103. end;
  65104. function TCAN1_C1CFG.getSJW : TBits_2; inline;
  65105. begin
  65106. getSJW := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  65107. end;
  65108. procedure TCAN1_C1CFG.setPRSEG(thebits : TBits_3); inline;
  65109. begin
  65110. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  65111. end;
  65112. function TCAN1_C1CFG.getPRSEG : TBits_3; inline;
  65113. begin
  65114. getPRSEG := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  65115. end;
  65116. procedure TCAN1_C1CFG.setSEG1PH(thebits : TBits_3); inline;
  65117. begin
  65118. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC7FF or ( thebits shl 11 );
  65119. end;
  65120. function TCAN1_C1CFG.getSEG1PH : TBits_3; inline;
  65121. begin
  65122. getSEG1PH := (pTDefRegMap(@Self)^.val and $00003800) shr 11;
  65123. end;
  65124. procedure TCAN1_C1CFG.setSAM; inline;
  65125. begin
  65126. pTDefRegMap(@Self)^.&set := $00004000;
  65127. end;
  65128. procedure TCAN1_C1CFG.clearSAM; inline;
  65129. begin
  65130. pTDefRegMap(@Self)^.clr := $00004000;
  65131. end;
  65132. procedure TCAN1_C1CFG.setSAM(thebits : TBits_1); inline;
  65133. begin
  65134. if thebits = 0 then
  65135. pTDefRegMap(@Self)^.clr := $00004000
  65136. else
  65137. pTDefRegMap(@Self)^.&set := $00004000;
  65138. end;
  65139. function TCAN1_C1CFG.getSAM : TBits_1; inline;
  65140. begin
  65141. getSAM := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  65142. end;
  65143. procedure TCAN1_C1CFG.setSEG2PHTS; inline;
  65144. begin
  65145. pTDefRegMap(@Self)^.&set := $00008000;
  65146. end;
  65147. procedure TCAN1_C1CFG.clearSEG2PHTS; inline;
  65148. begin
  65149. pTDefRegMap(@Self)^.clr := $00008000;
  65150. end;
  65151. procedure TCAN1_C1CFG.setSEG2PHTS(thebits : TBits_1); inline;
  65152. begin
  65153. if thebits = 0 then
  65154. pTDefRegMap(@Self)^.clr := $00008000
  65155. else
  65156. pTDefRegMap(@Self)^.&set := $00008000;
  65157. end;
  65158. function TCAN1_C1CFG.getSEG2PHTS : TBits_1; inline;
  65159. begin
  65160. getSEG2PHTS := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  65161. end;
  65162. procedure TCAN1_C1CFG.setSEG2PH(thebits : TBits_3); inline;
  65163. begin
  65164. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  65165. end;
  65166. function TCAN1_C1CFG.getSEG2PH : TBits_3; inline;
  65167. begin
  65168. getSEG2PH := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  65169. end;
  65170. procedure TCAN1_C1CFG.setWAKFIL; inline;
  65171. begin
  65172. pTDefRegMap(@Self)^.&set := $00400000;
  65173. end;
  65174. procedure TCAN1_C1CFG.clearWAKFIL; inline;
  65175. begin
  65176. pTDefRegMap(@Self)^.clr := $00400000;
  65177. end;
  65178. procedure TCAN1_C1CFG.setWAKFIL(thebits : TBits_1); inline;
  65179. begin
  65180. if thebits = 0 then
  65181. pTDefRegMap(@Self)^.clr := $00400000
  65182. else
  65183. pTDefRegMap(@Self)^.&set := $00400000;
  65184. end;
  65185. function TCAN1_C1CFG.getWAKFIL : TBits_1; inline;
  65186. begin
  65187. getWAKFIL := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  65188. end;
  65189. procedure TCAN1_C1CFG.setw(thebits : TBits_32); inline;
  65190. begin
  65191. pTDefRegMap(@Self)^.val := thebits;
  65192. end;
  65193. function TCAN1_C1CFG.getw : TBits_32; inline;
  65194. begin
  65195. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65196. end;
  65197. procedure TCAN1_C1INT.setTBIF; inline;
  65198. begin
  65199. pTDefRegMap(@Self)^.&set := $00000001;
  65200. end;
  65201. procedure TCAN1_C1INT.clearTBIF; inline;
  65202. begin
  65203. pTDefRegMap(@Self)^.clr := $00000001;
  65204. end;
  65205. procedure TCAN1_C1INT.setTBIF(thebits : TBits_1); inline;
  65206. begin
  65207. if thebits = 0 then
  65208. pTDefRegMap(@Self)^.clr := $00000001
  65209. else
  65210. pTDefRegMap(@Self)^.&set := $00000001;
  65211. end;
  65212. function TCAN1_C1INT.getTBIF : TBits_1; inline;
  65213. begin
  65214. getTBIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  65215. end;
  65216. procedure TCAN1_C1INT.setRBIF; inline;
  65217. begin
  65218. pTDefRegMap(@Self)^.&set := $00000002;
  65219. end;
  65220. procedure TCAN1_C1INT.clearRBIF; inline;
  65221. begin
  65222. pTDefRegMap(@Self)^.clr := $00000002;
  65223. end;
  65224. procedure TCAN1_C1INT.setRBIF(thebits : TBits_1); inline;
  65225. begin
  65226. if thebits = 0 then
  65227. pTDefRegMap(@Self)^.clr := $00000002
  65228. else
  65229. pTDefRegMap(@Self)^.&set := $00000002;
  65230. end;
  65231. function TCAN1_C1INT.getRBIF : TBits_1; inline;
  65232. begin
  65233. getRBIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  65234. end;
  65235. procedure TCAN1_C1INT.setCTMRIF; inline;
  65236. begin
  65237. pTDefRegMap(@Self)^.&set := $00000004;
  65238. end;
  65239. procedure TCAN1_C1INT.clearCTMRIF; inline;
  65240. begin
  65241. pTDefRegMap(@Self)^.clr := $00000004;
  65242. end;
  65243. procedure TCAN1_C1INT.setCTMRIF(thebits : TBits_1); inline;
  65244. begin
  65245. if thebits = 0 then
  65246. pTDefRegMap(@Self)^.clr := $00000004
  65247. else
  65248. pTDefRegMap(@Self)^.&set := $00000004;
  65249. end;
  65250. function TCAN1_C1INT.getCTMRIF : TBits_1; inline;
  65251. begin
  65252. getCTMRIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65253. end;
  65254. procedure TCAN1_C1INT.setMODIF; inline;
  65255. begin
  65256. pTDefRegMap(@Self)^.&set := $00000008;
  65257. end;
  65258. procedure TCAN1_C1INT.clearMODIF; inline;
  65259. begin
  65260. pTDefRegMap(@Self)^.clr := $00000008;
  65261. end;
  65262. procedure TCAN1_C1INT.setMODIF(thebits : TBits_1); inline;
  65263. begin
  65264. if thebits = 0 then
  65265. pTDefRegMap(@Self)^.clr := $00000008
  65266. else
  65267. pTDefRegMap(@Self)^.&set := $00000008;
  65268. end;
  65269. function TCAN1_C1INT.getMODIF : TBits_1; inline;
  65270. begin
  65271. getMODIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65272. end;
  65273. procedure TCAN1_C1INT.setRBOVIF; inline;
  65274. begin
  65275. pTDefRegMap(@Self)^.&set := $00000800;
  65276. end;
  65277. procedure TCAN1_C1INT.clearRBOVIF; inline;
  65278. begin
  65279. pTDefRegMap(@Self)^.clr := $00000800;
  65280. end;
  65281. procedure TCAN1_C1INT.setRBOVIF(thebits : TBits_1); inline;
  65282. begin
  65283. if thebits = 0 then
  65284. pTDefRegMap(@Self)^.clr := $00000800
  65285. else
  65286. pTDefRegMap(@Self)^.&set := $00000800;
  65287. end;
  65288. function TCAN1_C1INT.getRBOVIF : TBits_1; inline;
  65289. begin
  65290. getRBOVIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  65291. end;
  65292. procedure TCAN1_C1INT.setSERRIF; inline;
  65293. begin
  65294. pTDefRegMap(@Self)^.&set := $00001000;
  65295. end;
  65296. procedure TCAN1_C1INT.clearSERRIF; inline;
  65297. begin
  65298. pTDefRegMap(@Self)^.clr := $00001000;
  65299. end;
  65300. procedure TCAN1_C1INT.setSERRIF(thebits : TBits_1); inline;
  65301. begin
  65302. if thebits = 0 then
  65303. pTDefRegMap(@Self)^.clr := $00001000
  65304. else
  65305. pTDefRegMap(@Self)^.&set := $00001000;
  65306. end;
  65307. function TCAN1_C1INT.getSERRIF : TBits_1; inline;
  65308. begin
  65309. getSERRIF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  65310. end;
  65311. procedure TCAN1_C1INT.setCERRIF; inline;
  65312. begin
  65313. pTDefRegMap(@Self)^.&set := $00002000;
  65314. end;
  65315. procedure TCAN1_C1INT.clearCERRIF; inline;
  65316. begin
  65317. pTDefRegMap(@Self)^.clr := $00002000;
  65318. end;
  65319. procedure TCAN1_C1INT.setCERRIF(thebits : TBits_1); inline;
  65320. begin
  65321. if thebits = 0 then
  65322. pTDefRegMap(@Self)^.clr := $00002000
  65323. else
  65324. pTDefRegMap(@Self)^.&set := $00002000;
  65325. end;
  65326. function TCAN1_C1INT.getCERRIF : TBits_1; inline;
  65327. begin
  65328. getCERRIF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  65329. end;
  65330. procedure TCAN1_C1INT.setWAKIF; inline;
  65331. begin
  65332. pTDefRegMap(@Self)^.&set := $00004000;
  65333. end;
  65334. procedure TCAN1_C1INT.clearWAKIF; inline;
  65335. begin
  65336. pTDefRegMap(@Self)^.clr := $00004000;
  65337. end;
  65338. procedure TCAN1_C1INT.setWAKIF(thebits : TBits_1); inline;
  65339. begin
  65340. if thebits = 0 then
  65341. pTDefRegMap(@Self)^.clr := $00004000
  65342. else
  65343. pTDefRegMap(@Self)^.&set := $00004000;
  65344. end;
  65345. function TCAN1_C1INT.getWAKIF : TBits_1; inline;
  65346. begin
  65347. getWAKIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  65348. end;
  65349. procedure TCAN1_C1INT.setIVRIF; inline;
  65350. begin
  65351. pTDefRegMap(@Self)^.&set := $00008000;
  65352. end;
  65353. procedure TCAN1_C1INT.clearIVRIF; inline;
  65354. begin
  65355. pTDefRegMap(@Self)^.clr := $00008000;
  65356. end;
  65357. procedure TCAN1_C1INT.setIVRIF(thebits : TBits_1); inline;
  65358. begin
  65359. if thebits = 0 then
  65360. pTDefRegMap(@Self)^.clr := $00008000
  65361. else
  65362. pTDefRegMap(@Self)^.&set := $00008000;
  65363. end;
  65364. function TCAN1_C1INT.getIVRIF : TBits_1; inline;
  65365. begin
  65366. getIVRIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  65367. end;
  65368. procedure TCAN1_C1INT.setTBIE; inline;
  65369. begin
  65370. pTDefRegMap(@Self)^.&set := $00010000;
  65371. end;
  65372. procedure TCAN1_C1INT.clearTBIE; inline;
  65373. begin
  65374. pTDefRegMap(@Self)^.clr := $00010000;
  65375. end;
  65376. procedure TCAN1_C1INT.setTBIE(thebits : TBits_1); inline;
  65377. begin
  65378. if thebits = 0 then
  65379. pTDefRegMap(@Self)^.clr := $00010000
  65380. else
  65381. pTDefRegMap(@Self)^.&set := $00010000;
  65382. end;
  65383. function TCAN1_C1INT.getTBIE : TBits_1; inline;
  65384. begin
  65385. getTBIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  65386. end;
  65387. procedure TCAN1_C1INT.setRBIE; inline;
  65388. begin
  65389. pTDefRegMap(@Self)^.&set := $00020000;
  65390. end;
  65391. procedure TCAN1_C1INT.clearRBIE; inline;
  65392. begin
  65393. pTDefRegMap(@Self)^.clr := $00020000;
  65394. end;
  65395. procedure TCAN1_C1INT.setRBIE(thebits : TBits_1); inline;
  65396. begin
  65397. if thebits = 0 then
  65398. pTDefRegMap(@Self)^.clr := $00020000
  65399. else
  65400. pTDefRegMap(@Self)^.&set := $00020000;
  65401. end;
  65402. function TCAN1_C1INT.getRBIE : TBits_1; inline;
  65403. begin
  65404. getRBIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  65405. end;
  65406. procedure TCAN1_C1INT.setCTMRIE; inline;
  65407. begin
  65408. pTDefRegMap(@Self)^.&set := $00040000;
  65409. end;
  65410. procedure TCAN1_C1INT.clearCTMRIE; inline;
  65411. begin
  65412. pTDefRegMap(@Self)^.clr := $00040000;
  65413. end;
  65414. procedure TCAN1_C1INT.setCTMRIE(thebits : TBits_1); inline;
  65415. begin
  65416. if thebits = 0 then
  65417. pTDefRegMap(@Self)^.clr := $00040000
  65418. else
  65419. pTDefRegMap(@Self)^.&set := $00040000;
  65420. end;
  65421. function TCAN1_C1INT.getCTMRIE : TBits_1; inline;
  65422. begin
  65423. getCTMRIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  65424. end;
  65425. procedure TCAN1_C1INT.setMODIE; inline;
  65426. begin
  65427. pTDefRegMap(@Self)^.&set := $00080000;
  65428. end;
  65429. procedure TCAN1_C1INT.clearMODIE; inline;
  65430. begin
  65431. pTDefRegMap(@Self)^.clr := $00080000;
  65432. end;
  65433. procedure TCAN1_C1INT.setMODIE(thebits : TBits_1); inline;
  65434. begin
  65435. if thebits = 0 then
  65436. pTDefRegMap(@Self)^.clr := $00080000
  65437. else
  65438. pTDefRegMap(@Self)^.&set := $00080000;
  65439. end;
  65440. function TCAN1_C1INT.getMODIE : TBits_1; inline;
  65441. begin
  65442. getMODIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  65443. end;
  65444. procedure TCAN1_C1INT.setRBOVIE; inline;
  65445. begin
  65446. pTDefRegMap(@Self)^.&set := $08000000;
  65447. end;
  65448. procedure TCAN1_C1INT.clearRBOVIE; inline;
  65449. begin
  65450. pTDefRegMap(@Self)^.clr := $08000000;
  65451. end;
  65452. procedure TCAN1_C1INT.setRBOVIE(thebits : TBits_1); inline;
  65453. begin
  65454. if thebits = 0 then
  65455. pTDefRegMap(@Self)^.clr := $08000000
  65456. else
  65457. pTDefRegMap(@Self)^.&set := $08000000;
  65458. end;
  65459. function TCAN1_C1INT.getRBOVIE : TBits_1; inline;
  65460. begin
  65461. getRBOVIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  65462. end;
  65463. procedure TCAN1_C1INT.setSERRIE; inline;
  65464. begin
  65465. pTDefRegMap(@Self)^.&set := $10000000;
  65466. end;
  65467. procedure TCAN1_C1INT.clearSERRIE; inline;
  65468. begin
  65469. pTDefRegMap(@Self)^.clr := $10000000;
  65470. end;
  65471. procedure TCAN1_C1INT.setSERRIE(thebits : TBits_1); inline;
  65472. begin
  65473. if thebits = 0 then
  65474. pTDefRegMap(@Self)^.clr := $10000000
  65475. else
  65476. pTDefRegMap(@Self)^.&set := $10000000;
  65477. end;
  65478. function TCAN1_C1INT.getSERRIE : TBits_1; inline;
  65479. begin
  65480. getSERRIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  65481. end;
  65482. procedure TCAN1_C1INT.setCERRIE; inline;
  65483. begin
  65484. pTDefRegMap(@Self)^.&set := $20000000;
  65485. end;
  65486. procedure TCAN1_C1INT.clearCERRIE; inline;
  65487. begin
  65488. pTDefRegMap(@Self)^.clr := $20000000;
  65489. end;
  65490. procedure TCAN1_C1INT.setCERRIE(thebits : TBits_1); inline;
  65491. begin
  65492. if thebits = 0 then
  65493. pTDefRegMap(@Self)^.clr := $20000000
  65494. else
  65495. pTDefRegMap(@Self)^.&set := $20000000;
  65496. end;
  65497. function TCAN1_C1INT.getCERRIE : TBits_1; inline;
  65498. begin
  65499. getCERRIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  65500. end;
  65501. procedure TCAN1_C1INT.setWAKIE; inline;
  65502. begin
  65503. pTDefRegMap(@Self)^.&set := $40000000;
  65504. end;
  65505. procedure TCAN1_C1INT.clearWAKIE; inline;
  65506. begin
  65507. pTDefRegMap(@Self)^.clr := $40000000;
  65508. end;
  65509. procedure TCAN1_C1INT.setWAKIE(thebits : TBits_1); inline;
  65510. begin
  65511. if thebits = 0 then
  65512. pTDefRegMap(@Self)^.clr := $40000000
  65513. else
  65514. pTDefRegMap(@Self)^.&set := $40000000;
  65515. end;
  65516. function TCAN1_C1INT.getWAKIE : TBits_1; inline;
  65517. begin
  65518. getWAKIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  65519. end;
  65520. procedure TCAN1_C1INT.setIVRIE; inline;
  65521. begin
  65522. pTDefRegMap(@Self)^.&set := $80000000;
  65523. end;
  65524. procedure TCAN1_C1INT.clearIVRIE; inline;
  65525. begin
  65526. pTDefRegMap(@Self)^.clr := $80000000;
  65527. end;
  65528. procedure TCAN1_C1INT.setIVRIE(thebits : TBits_1); inline;
  65529. begin
  65530. if thebits = 0 then
  65531. pTDefRegMap(@Self)^.clr := $80000000
  65532. else
  65533. pTDefRegMap(@Self)^.&set := $80000000;
  65534. end;
  65535. function TCAN1_C1INT.getIVRIE : TBits_1; inline;
  65536. begin
  65537. getIVRIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  65538. end;
  65539. procedure TCAN1_C1INT.setw(thebits : TBits_32); inline;
  65540. begin
  65541. pTDefRegMap(@Self)^.val := thebits;
  65542. end;
  65543. function TCAN1_C1INT.getw : TBits_32; inline;
  65544. begin
  65545. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65546. end;
  65547. procedure TCAN1_C1VEC.setICODE(thebits : TBits_7); inline;
  65548. begin
  65549. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  65550. end;
  65551. function TCAN1_C1VEC.getICODE : TBits_7; inline;
  65552. begin
  65553. getICODE := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  65554. end;
  65555. procedure TCAN1_C1VEC.setFILHIT(thebits : TBits_5); inline;
  65556. begin
  65557. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  65558. end;
  65559. function TCAN1_C1VEC.getFILHIT : TBits_5; inline;
  65560. begin
  65561. getFILHIT := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  65562. end;
  65563. procedure TCAN1_C1VEC.setw(thebits : TBits_32); inline;
  65564. begin
  65565. pTDefRegMap(@Self)^.val := thebits;
  65566. end;
  65567. function TCAN1_C1VEC.getw : TBits_32; inline;
  65568. begin
  65569. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65570. end;
  65571. procedure TCAN1_C1TREC.setRERRCNT(thebits : TBits_8); inline;
  65572. begin
  65573. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  65574. end;
  65575. function TCAN1_C1TREC.getRERRCNT : TBits_8; inline;
  65576. begin
  65577. getRERRCNT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  65578. end;
  65579. procedure TCAN1_C1TREC.setTERRCNT(thebits : TBits_8); inline;
  65580. begin
  65581. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  65582. end;
  65583. function TCAN1_C1TREC.getTERRCNT : TBits_8; inline;
  65584. begin
  65585. getTERRCNT := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  65586. end;
  65587. procedure TCAN1_C1TREC.setEWARN; inline;
  65588. begin
  65589. pTDefRegMap(@Self)^.&set := $00010000;
  65590. end;
  65591. procedure TCAN1_C1TREC.clearEWARN; inline;
  65592. begin
  65593. pTDefRegMap(@Self)^.clr := $00010000;
  65594. end;
  65595. procedure TCAN1_C1TREC.setEWARN(thebits : TBits_1); inline;
  65596. begin
  65597. if thebits = 0 then
  65598. pTDefRegMap(@Self)^.clr := $00010000
  65599. else
  65600. pTDefRegMap(@Self)^.&set := $00010000;
  65601. end;
  65602. function TCAN1_C1TREC.getEWARN : TBits_1; inline;
  65603. begin
  65604. getEWARN := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  65605. end;
  65606. procedure TCAN1_C1TREC.setRXWARN; inline;
  65607. begin
  65608. pTDefRegMap(@Self)^.&set := $00020000;
  65609. end;
  65610. procedure TCAN1_C1TREC.clearRXWARN; inline;
  65611. begin
  65612. pTDefRegMap(@Self)^.clr := $00020000;
  65613. end;
  65614. procedure TCAN1_C1TREC.setRXWARN(thebits : TBits_1); inline;
  65615. begin
  65616. if thebits = 0 then
  65617. pTDefRegMap(@Self)^.clr := $00020000
  65618. else
  65619. pTDefRegMap(@Self)^.&set := $00020000;
  65620. end;
  65621. function TCAN1_C1TREC.getRXWARN : TBits_1; inline;
  65622. begin
  65623. getRXWARN := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  65624. end;
  65625. procedure TCAN1_C1TREC.setTXWARN; inline;
  65626. begin
  65627. pTDefRegMap(@Self)^.&set := $00040000;
  65628. end;
  65629. procedure TCAN1_C1TREC.clearTXWARN; inline;
  65630. begin
  65631. pTDefRegMap(@Self)^.clr := $00040000;
  65632. end;
  65633. procedure TCAN1_C1TREC.setTXWARN(thebits : TBits_1); inline;
  65634. begin
  65635. if thebits = 0 then
  65636. pTDefRegMap(@Self)^.clr := $00040000
  65637. else
  65638. pTDefRegMap(@Self)^.&set := $00040000;
  65639. end;
  65640. function TCAN1_C1TREC.getTXWARN : TBits_1; inline;
  65641. begin
  65642. getTXWARN := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  65643. end;
  65644. procedure TCAN1_C1TREC.setRXBP; inline;
  65645. begin
  65646. pTDefRegMap(@Self)^.&set := $00080000;
  65647. end;
  65648. procedure TCAN1_C1TREC.clearRXBP; inline;
  65649. begin
  65650. pTDefRegMap(@Self)^.clr := $00080000;
  65651. end;
  65652. procedure TCAN1_C1TREC.setRXBP(thebits : TBits_1); inline;
  65653. begin
  65654. if thebits = 0 then
  65655. pTDefRegMap(@Self)^.clr := $00080000
  65656. else
  65657. pTDefRegMap(@Self)^.&set := $00080000;
  65658. end;
  65659. function TCAN1_C1TREC.getRXBP : TBits_1; inline;
  65660. begin
  65661. getRXBP := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  65662. end;
  65663. procedure TCAN1_C1TREC.setTXBP; inline;
  65664. begin
  65665. pTDefRegMap(@Self)^.&set := $00100000;
  65666. end;
  65667. procedure TCAN1_C1TREC.clearTXBP; inline;
  65668. begin
  65669. pTDefRegMap(@Self)^.clr := $00100000;
  65670. end;
  65671. procedure TCAN1_C1TREC.setTXBP(thebits : TBits_1); inline;
  65672. begin
  65673. if thebits = 0 then
  65674. pTDefRegMap(@Self)^.clr := $00100000
  65675. else
  65676. pTDefRegMap(@Self)^.&set := $00100000;
  65677. end;
  65678. function TCAN1_C1TREC.getTXBP : TBits_1; inline;
  65679. begin
  65680. getTXBP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  65681. end;
  65682. procedure TCAN1_C1TREC.setTXBO; inline;
  65683. begin
  65684. pTDefRegMap(@Self)^.&set := $00200000;
  65685. end;
  65686. procedure TCAN1_C1TREC.clearTXBO; inline;
  65687. begin
  65688. pTDefRegMap(@Self)^.clr := $00200000;
  65689. end;
  65690. procedure TCAN1_C1TREC.setTXBO(thebits : TBits_1); inline;
  65691. begin
  65692. if thebits = 0 then
  65693. pTDefRegMap(@Self)^.clr := $00200000
  65694. else
  65695. pTDefRegMap(@Self)^.&set := $00200000;
  65696. end;
  65697. function TCAN1_C1TREC.getTXBO : TBits_1; inline;
  65698. begin
  65699. getTXBO := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  65700. end;
  65701. procedure TCAN1_C1TREC.setw(thebits : TBits_32); inline;
  65702. begin
  65703. pTDefRegMap(@Self)^.val := thebits;
  65704. end;
  65705. function TCAN1_C1TREC.getw : TBits_32; inline;
  65706. begin
  65707. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65708. end;
  65709. procedure TCAN1_C1FSTAT.setFIFOIP(thebits : TBits_32); inline;
  65710. begin
  65711. pTDefRegMap(@Self)^.val := thebits;
  65712. end;
  65713. function TCAN1_C1FSTAT.getFIFOIP : TBits_32; inline;
  65714. begin
  65715. getFIFOIP := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65716. end;
  65717. procedure TCAN1_C1FSTAT.setFIFOIP0; inline;
  65718. begin
  65719. pTDefRegMap(@Self)^.&set := $00000001;
  65720. end;
  65721. procedure TCAN1_C1FSTAT.clearFIFOIP0; inline;
  65722. begin
  65723. pTDefRegMap(@Self)^.clr := $00000001;
  65724. end;
  65725. procedure TCAN1_C1FSTAT.setFIFOIP0(thebits : TBits_1); inline;
  65726. begin
  65727. if thebits = 0 then
  65728. pTDefRegMap(@Self)^.clr := $00000001
  65729. else
  65730. pTDefRegMap(@Self)^.&set := $00000001;
  65731. end;
  65732. function TCAN1_C1FSTAT.getFIFOIP0 : TBits_1; inline;
  65733. begin
  65734. getFIFOIP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  65735. end;
  65736. procedure TCAN1_C1FSTAT.setFIFOIP1; inline;
  65737. begin
  65738. pTDefRegMap(@Self)^.&set := $00000002;
  65739. end;
  65740. procedure TCAN1_C1FSTAT.clearFIFOIP1; inline;
  65741. begin
  65742. pTDefRegMap(@Self)^.clr := $00000002;
  65743. end;
  65744. procedure TCAN1_C1FSTAT.setFIFOIP1(thebits : TBits_1); inline;
  65745. begin
  65746. if thebits = 0 then
  65747. pTDefRegMap(@Self)^.clr := $00000002
  65748. else
  65749. pTDefRegMap(@Self)^.&set := $00000002;
  65750. end;
  65751. function TCAN1_C1FSTAT.getFIFOIP1 : TBits_1; inline;
  65752. begin
  65753. getFIFOIP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  65754. end;
  65755. procedure TCAN1_C1FSTAT.setFIFOIP2; inline;
  65756. begin
  65757. pTDefRegMap(@Self)^.&set := $00000004;
  65758. end;
  65759. procedure TCAN1_C1FSTAT.clearFIFOIP2; inline;
  65760. begin
  65761. pTDefRegMap(@Self)^.clr := $00000004;
  65762. end;
  65763. procedure TCAN1_C1FSTAT.setFIFOIP2(thebits : TBits_1); inline;
  65764. begin
  65765. if thebits = 0 then
  65766. pTDefRegMap(@Self)^.clr := $00000004
  65767. else
  65768. pTDefRegMap(@Self)^.&set := $00000004;
  65769. end;
  65770. function TCAN1_C1FSTAT.getFIFOIP2 : TBits_1; inline;
  65771. begin
  65772. getFIFOIP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65773. end;
  65774. procedure TCAN1_C1FSTAT.setFIFOIP3; inline;
  65775. begin
  65776. pTDefRegMap(@Self)^.&set := $00000008;
  65777. end;
  65778. procedure TCAN1_C1FSTAT.clearFIFOIP3; inline;
  65779. begin
  65780. pTDefRegMap(@Self)^.clr := $00000008;
  65781. end;
  65782. procedure TCAN1_C1FSTAT.setFIFOIP3(thebits : TBits_1); inline;
  65783. begin
  65784. if thebits = 0 then
  65785. pTDefRegMap(@Self)^.clr := $00000008
  65786. else
  65787. pTDefRegMap(@Self)^.&set := $00000008;
  65788. end;
  65789. function TCAN1_C1FSTAT.getFIFOIP3 : TBits_1; inline;
  65790. begin
  65791. getFIFOIP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65792. end;
  65793. procedure TCAN1_C1FSTAT.setFIFOIP4; inline;
  65794. begin
  65795. pTDefRegMap(@Self)^.&set := $00000010;
  65796. end;
  65797. procedure TCAN1_C1FSTAT.clearFIFOIP4; inline;
  65798. begin
  65799. pTDefRegMap(@Self)^.clr := $00000010;
  65800. end;
  65801. procedure TCAN1_C1FSTAT.setFIFOIP4(thebits : TBits_1); inline;
  65802. begin
  65803. if thebits = 0 then
  65804. pTDefRegMap(@Self)^.clr := $00000010
  65805. else
  65806. pTDefRegMap(@Self)^.&set := $00000010;
  65807. end;
  65808. function TCAN1_C1FSTAT.getFIFOIP4 : TBits_1; inline;
  65809. begin
  65810. getFIFOIP4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65811. end;
  65812. procedure TCAN1_C1FSTAT.setFIFOIP5; inline;
  65813. begin
  65814. pTDefRegMap(@Self)^.&set := $00000020;
  65815. end;
  65816. procedure TCAN1_C1FSTAT.clearFIFOIP5; inline;
  65817. begin
  65818. pTDefRegMap(@Self)^.clr := $00000020;
  65819. end;
  65820. procedure TCAN1_C1FSTAT.setFIFOIP5(thebits : TBits_1); inline;
  65821. begin
  65822. if thebits = 0 then
  65823. pTDefRegMap(@Self)^.clr := $00000020
  65824. else
  65825. pTDefRegMap(@Self)^.&set := $00000020;
  65826. end;
  65827. function TCAN1_C1FSTAT.getFIFOIP5 : TBits_1; inline;
  65828. begin
  65829. getFIFOIP5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65830. end;
  65831. procedure TCAN1_C1FSTAT.setFIFOIP6; inline;
  65832. begin
  65833. pTDefRegMap(@Self)^.&set := $00000040;
  65834. end;
  65835. procedure TCAN1_C1FSTAT.clearFIFOIP6; inline;
  65836. begin
  65837. pTDefRegMap(@Self)^.clr := $00000040;
  65838. end;
  65839. procedure TCAN1_C1FSTAT.setFIFOIP6(thebits : TBits_1); inline;
  65840. begin
  65841. if thebits = 0 then
  65842. pTDefRegMap(@Self)^.clr := $00000040
  65843. else
  65844. pTDefRegMap(@Self)^.&set := $00000040;
  65845. end;
  65846. function TCAN1_C1FSTAT.getFIFOIP6 : TBits_1; inline;
  65847. begin
  65848. getFIFOIP6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65849. end;
  65850. procedure TCAN1_C1FSTAT.setFIFOIP7; inline;
  65851. begin
  65852. pTDefRegMap(@Self)^.&set := $00000080;
  65853. end;
  65854. procedure TCAN1_C1FSTAT.clearFIFOIP7; inline;
  65855. begin
  65856. pTDefRegMap(@Self)^.clr := $00000080;
  65857. end;
  65858. procedure TCAN1_C1FSTAT.setFIFOIP7(thebits : TBits_1); inline;
  65859. begin
  65860. if thebits = 0 then
  65861. pTDefRegMap(@Self)^.clr := $00000080
  65862. else
  65863. pTDefRegMap(@Self)^.&set := $00000080;
  65864. end;
  65865. function TCAN1_C1FSTAT.getFIFOIP7 : TBits_1; inline;
  65866. begin
  65867. getFIFOIP7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65868. end;
  65869. procedure TCAN1_C1FSTAT.setFIFOIP8; inline;
  65870. begin
  65871. pTDefRegMap(@Self)^.&set := $00000100;
  65872. end;
  65873. procedure TCAN1_C1FSTAT.clearFIFOIP8; inline;
  65874. begin
  65875. pTDefRegMap(@Self)^.clr := $00000100;
  65876. end;
  65877. procedure TCAN1_C1FSTAT.setFIFOIP8(thebits : TBits_1); inline;
  65878. begin
  65879. if thebits = 0 then
  65880. pTDefRegMap(@Self)^.clr := $00000100
  65881. else
  65882. pTDefRegMap(@Self)^.&set := $00000100;
  65883. end;
  65884. function TCAN1_C1FSTAT.getFIFOIP8 : TBits_1; inline;
  65885. begin
  65886. getFIFOIP8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  65887. end;
  65888. procedure TCAN1_C1FSTAT.setFIFOIP9; inline;
  65889. begin
  65890. pTDefRegMap(@Self)^.&set := $00000200;
  65891. end;
  65892. procedure TCAN1_C1FSTAT.clearFIFOIP9; inline;
  65893. begin
  65894. pTDefRegMap(@Self)^.clr := $00000200;
  65895. end;
  65896. procedure TCAN1_C1FSTAT.setFIFOIP9(thebits : TBits_1); inline;
  65897. begin
  65898. if thebits = 0 then
  65899. pTDefRegMap(@Self)^.clr := $00000200
  65900. else
  65901. pTDefRegMap(@Self)^.&set := $00000200;
  65902. end;
  65903. function TCAN1_C1FSTAT.getFIFOIP9 : TBits_1; inline;
  65904. begin
  65905. getFIFOIP9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  65906. end;
  65907. procedure TCAN1_C1FSTAT.setFIFOIP10; inline;
  65908. begin
  65909. pTDefRegMap(@Self)^.&set := $00000400;
  65910. end;
  65911. procedure TCAN1_C1FSTAT.clearFIFOIP10; inline;
  65912. begin
  65913. pTDefRegMap(@Self)^.clr := $00000400;
  65914. end;
  65915. procedure TCAN1_C1FSTAT.setFIFOIP10(thebits : TBits_1); inline;
  65916. begin
  65917. if thebits = 0 then
  65918. pTDefRegMap(@Self)^.clr := $00000400
  65919. else
  65920. pTDefRegMap(@Self)^.&set := $00000400;
  65921. end;
  65922. function TCAN1_C1FSTAT.getFIFOIP10 : TBits_1; inline;
  65923. begin
  65924. getFIFOIP10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  65925. end;
  65926. procedure TCAN1_C1FSTAT.setFIFOIP11; inline;
  65927. begin
  65928. pTDefRegMap(@Self)^.&set := $00000800;
  65929. end;
  65930. procedure TCAN1_C1FSTAT.clearFIFOIP11; inline;
  65931. begin
  65932. pTDefRegMap(@Self)^.clr := $00000800;
  65933. end;
  65934. procedure TCAN1_C1FSTAT.setFIFOIP11(thebits : TBits_1); inline;
  65935. begin
  65936. if thebits = 0 then
  65937. pTDefRegMap(@Self)^.clr := $00000800
  65938. else
  65939. pTDefRegMap(@Self)^.&set := $00000800;
  65940. end;
  65941. function TCAN1_C1FSTAT.getFIFOIP11 : TBits_1; inline;
  65942. begin
  65943. getFIFOIP11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  65944. end;
  65945. procedure TCAN1_C1FSTAT.setFIFOIP12; inline;
  65946. begin
  65947. pTDefRegMap(@Self)^.&set := $00001000;
  65948. end;
  65949. procedure TCAN1_C1FSTAT.clearFIFOIP12; inline;
  65950. begin
  65951. pTDefRegMap(@Self)^.clr := $00001000;
  65952. end;
  65953. procedure TCAN1_C1FSTAT.setFIFOIP12(thebits : TBits_1); inline;
  65954. begin
  65955. if thebits = 0 then
  65956. pTDefRegMap(@Self)^.clr := $00001000
  65957. else
  65958. pTDefRegMap(@Self)^.&set := $00001000;
  65959. end;
  65960. function TCAN1_C1FSTAT.getFIFOIP12 : TBits_1; inline;
  65961. begin
  65962. getFIFOIP12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  65963. end;
  65964. procedure TCAN1_C1FSTAT.setFIFOIP13; inline;
  65965. begin
  65966. pTDefRegMap(@Self)^.&set := $00002000;
  65967. end;
  65968. procedure TCAN1_C1FSTAT.clearFIFOIP13; inline;
  65969. begin
  65970. pTDefRegMap(@Self)^.clr := $00002000;
  65971. end;
  65972. procedure TCAN1_C1FSTAT.setFIFOIP13(thebits : TBits_1); inline;
  65973. begin
  65974. if thebits = 0 then
  65975. pTDefRegMap(@Self)^.clr := $00002000
  65976. else
  65977. pTDefRegMap(@Self)^.&set := $00002000;
  65978. end;
  65979. function TCAN1_C1FSTAT.getFIFOIP13 : TBits_1; inline;
  65980. begin
  65981. getFIFOIP13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  65982. end;
  65983. procedure TCAN1_C1FSTAT.setFIFOIP14; inline;
  65984. begin
  65985. pTDefRegMap(@Self)^.&set := $00004000;
  65986. end;
  65987. procedure TCAN1_C1FSTAT.clearFIFOIP14; inline;
  65988. begin
  65989. pTDefRegMap(@Self)^.clr := $00004000;
  65990. end;
  65991. procedure TCAN1_C1FSTAT.setFIFOIP14(thebits : TBits_1); inline;
  65992. begin
  65993. if thebits = 0 then
  65994. pTDefRegMap(@Self)^.clr := $00004000
  65995. else
  65996. pTDefRegMap(@Self)^.&set := $00004000;
  65997. end;
  65998. function TCAN1_C1FSTAT.getFIFOIP14 : TBits_1; inline;
  65999. begin
  66000. getFIFOIP14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  66001. end;
  66002. procedure TCAN1_C1FSTAT.setFIFOIP15; inline;
  66003. begin
  66004. pTDefRegMap(@Self)^.&set := $00008000;
  66005. end;
  66006. procedure TCAN1_C1FSTAT.clearFIFOIP15; inline;
  66007. begin
  66008. pTDefRegMap(@Self)^.clr := $00008000;
  66009. end;
  66010. procedure TCAN1_C1FSTAT.setFIFOIP15(thebits : TBits_1); inline;
  66011. begin
  66012. if thebits = 0 then
  66013. pTDefRegMap(@Self)^.clr := $00008000
  66014. else
  66015. pTDefRegMap(@Self)^.&set := $00008000;
  66016. end;
  66017. function TCAN1_C1FSTAT.getFIFOIP15 : TBits_1; inline;
  66018. begin
  66019. getFIFOIP15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  66020. end;
  66021. procedure TCAN1_C1FSTAT.setFIFOIP16; inline;
  66022. begin
  66023. pTDefRegMap(@Self)^.&set := $00010000;
  66024. end;
  66025. procedure TCAN1_C1FSTAT.clearFIFOIP16; inline;
  66026. begin
  66027. pTDefRegMap(@Self)^.clr := $00010000;
  66028. end;
  66029. procedure TCAN1_C1FSTAT.setFIFOIP16(thebits : TBits_1); inline;
  66030. begin
  66031. if thebits = 0 then
  66032. pTDefRegMap(@Self)^.clr := $00010000
  66033. else
  66034. pTDefRegMap(@Self)^.&set := $00010000;
  66035. end;
  66036. function TCAN1_C1FSTAT.getFIFOIP16 : TBits_1; inline;
  66037. begin
  66038. getFIFOIP16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  66039. end;
  66040. procedure TCAN1_C1FSTAT.setFIFOIP17; inline;
  66041. begin
  66042. pTDefRegMap(@Self)^.&set := $00020000;
  66043. end;
  66044. procedure TCAN1_C1FSTAT.clearFIFOIP17; inline;
  66045. begin
  66046. pTDefRegMap(@Self)^.clr := $00020000;
  66047. end;
  66048. procedure TCAN1_C1FSTAT.setFIFOIP17(thebits : TBits_1); inline;
  66049. begin
  66050. if thebits = 0 then
  66051. pTDefRegMap(@Self)^.clr := $00020000
  66052. else
  66053. pTDefRegMap(@Self)^.&set := $00020000;
  66054. end;
  66055. function TCAN1_C1FSTAT.getFIFOIP17 : TBits_1; inline;
  66056. begin
  66057. getFIFOIP17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  66058. end;
  66059. procedure TCAN1_C1FSTAT.setFIFOIP18; inline;
  66060. begin
  66061. pTDefRegMap(@Self)^.&set := $00040000;
  66062. end;
  66063. procedure TCAN1_C1FSTAT.clearFIFOIP18; inline;
  66064. begin
  66065. pTDefRegMap(@Self)^.clr := $00040000;
  66066. end;
  66067. procedure TCAN1_C1FSTAT.setFIFOIP18(thebits : TBits_1); inline;
  66068. begin
  66069. if thebits = 0 then
  66070. pTDefRegMap(@Self)^.clr := $00040000
  66071. else
  66072. pTDefRegMap(@Self)^.&set := $00040000;
  66073. end;
  66074. function TCAN1_C1FSTAT.getFIFOIP18 : TBits_1; inline;
  66075. begin
  66076. getFIFOIP18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  66077. end;
  66078. procedure TCAN1_C1FSTAT.setFIFOIP19; inline;
  66079. begin
  66080. pTDefRegMap(@Self)^.&set := $00080000;
  66081. end;
  66082. procedure TCAN1_C1FSTAT.clearFIFOIP19; inline;
  66083. begin
  66084. pTDefRegMap(@Self)^.clr := $00080000;
  66085. end;
  66086. procedure TCAN1_C1FSTAT.setFIFOIP19(thebits : TBits_1); inline;
  66087. begin
  66088. if thebits = 0 then
  66089. pTDefRegMap(@Self)^.clr := $00080000
  66090. else
  66091. pTDefRegMap(@Self)^.&set := $00080000;
  66092. end;
  66093. function TCAN1_C1FSTAT.getFIFOIP19 : TBits_1; inline;
  66094. begin
  66095. getFIFOIP19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  66096. end;
  66097. procedure TCAN1_C1FSTAT.setFIFOIP20; inline;
  66098. begin
  66099. pTDefRegMap(@Self)^.&set := $00100000;
  66100. end;
  66101. procedure TCAN1_C1FSTAT.clearFIFOIP20; inline;
  66102. begin
  66103. pTDefRegMap(@Self)^.clr := $00100000;
  66104. end;
  66105. procedure TCAN1_C1FSTAT.setFIFOIP20(thebits : TBits_1); inline;
  66106. begin
  66107. if thebits = 0 then
  66108. pTDefRegMap(@Self)^.clr := $00100000
  66109. else
  66110. pTDefRegMap(@Self)^.&set := $00100000;
  66111. end;
  66112. function TCAN1_C1FSTAT.getFIFOIP20 : TBits_1; inline;
  66113. begin
  66114. getFIFOIP20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  66115. end;
  66116. procedure TCAN1_C1FSTAT.setFIFOIP21; inline;
  66117. begin
  66118. pTDefRegMap(@Self)^.&set := $00200000;
  66119. end;
  66120. procedure TCAN1_C1FSTAT.clearFIFOIP21; inline;
  66121. begin
  66122. pTDefRegMap(@Self)^.clr := $00200000;
  66123. end;
  66124. procedure TCAN1_C1FSTAT.setFIFOIP21(thebits : TBits_1); inline;
  66125. begin
  66126. if thebits = 0 then
  66127. pTDefRegMap(@Self)^.clr := $00200000
  66128. else
  66129. pTDefRegMap(@Self)^.&set := $00200000;
  66130. end;
  66131. function TCAN1_C1FSTAT.getFIFOIP21 : TBits_1; inline;
  66132. begin
  66133. getFIFOIP21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  66134. end;
  66135. procedure TCAN1_C1FSTAT.setFIFOIP22; inline;
  66136. begin
  66137. pTDefRegMap(@Self)^.&set := $00400000;
  66138. end;
  66139. procedure TCAN1_C1FSTAT.clearFIFOIP22; inline;
  66140. begin
  66141. pTDefRegMap(@Self)^.clr := $00400000;
  66142. end;
  66143. procedure TCAN1_C1FSTAT.setFIFOIP22(thebits : TBits_1); inline;
  66144. begin
  66145. if thebits = 0 then
  66146. pTDefRegMap(@Self)^.clr := $00400000
  66147. else
  66148. pTDefRegMap(@Self)^.&set := $00400000;
  66149. end;
  66150. function TCAN1_C1FSTAT.getFIFOIP22 : TBits_1; inline;
  66151. begin
  66152. getFIFOIP22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  66153. end;
  66154. procedure TCAN1_C1FSTAT.setFIFOIP23; inline;
  66155. begin
  66156. pTDefRegMap(@Self)^.&set := $00800000;
  66157. end;
  66158. procedure TCAN1_C1FSTAT.clearFIFOIP23; inline;
  66159. begin
  66160. pTDefRegMap(@Self)^.clr := $00800000;
  66161. end;
  66162. procedure TCAN1_C1FSTAT.setFIFOIP23(thebits : TBits_1); inline;
  66163. begin
  66164. if thebits = 0 then
  66165. pTDefRegMap(@Self)^.clr := $00800000
  66166. else
  66167. pTDefRegMap(@Self)^.&set := $00800000;
  66168. end;
  66169. function TCAN1_C1FSTAT.getFIFOIP23 : TBits_1; inline;
  66170. begin
  66171. getFIFOIP23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  66172. end;
  66173. procedure TCAN1_C1FSTAT.setFIFOIP24; inline;
  66174. begin
  66175. pTDefRegMap(@Self)^.&set := $01000000;
  66176. end;
  66177. procedure TCAN1_C1FSTAT.clearFIFOIP24; inline;
  66178. begin
  66179. pTDefRegMap(@Self)^.clr := $01000000;
  66180. end;
  66181. procedure TCAN1_C1FSTAT.setFIFOIP24(thebits : TBits_1); inline;
  66182. begin
  66183. if thebits = 0 then
  66184. pTDefRegMap(@Self)^.clr := $01000000
  66185. else
  66186. pTDefRegMap(@Self)^.&set := $01000000;
  66187. end;
  66188. function TCAN1_C1FSTAT.getFIFOIP24 : TBits_1; inline;
  66189. begin
  66190. getFIFOIP24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  66191. end;
  66192. procedure TCAN1_C1FSTAT.setFIFOIP25; inline;
  66193. begin
  66194. pTDefRegMap(@Self)^.&set := $02000000;
  66195. end;
  66196. procedure TCAN1_C1FSTAT.clearFIFOIP25; inline;
  66197. begin
  66198. pTDefRegMap(@Self)^.clr := $02000000;
  66199. end;
  66200. procedure TCAN1_C1FSTAT.setFIFOIP25(thebits : TBits_1); inline;
  66201. begin
  66202. if thebits = 0 then
  66203. pTDefRegMap(@Self)^.clr := $02000000
  66204. else
  66205. pTDefRegMap(@Self)^.&set := $02000000;
  66206. end;
  66207. function TCAN1_C1FSTAT.getFIFOIP25 : TBits_1; inline;
  66208. begin
  66209. getFIFOIP25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  66210. end;
  66211. procedure TCAN1_C1FSTAT.setFIFOIP26; inline;
  66212. begin
  66213. pTDefRegMap(@Self)^.&set := $04000000;
  66214. end;
  66215. procedure TCAN1_C1FSTAT.clearFIFOIP26; inline;
  66216. begin
  66217. pTDefRegMap(@Self)^.clr := $04000000;
  66218. end;
  66219. procedure TCAN1_C1FSTAT.setFIFOIP26(thebits : TBits_1); inline;
  66220. begin
  66221. if thebits = 0 then
  66222. pTDefRegMap(@Self)^.clr := $04000000
  66223. else
  66224. pTDefRegMap(@Self)^.&set := $04000000;
  66225. end;
  66226. function TCAN1_C1FSTAT.getFIFOIP26 : TBits_1; inline;
  66227. begin
  66228. getFIFOIP26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  66229. end;
  66230. procedure TCAN1_C1FSTAT.setFIFOIP27; inline;
  66231. begin
  66232. pTDefRegMap(@Self)^.&set := $08000000;
  66233. end;
  66234. procedure TCAN1_C1FSTAT.clearFIFOIP27; inline;
  66235. begin
  66236. pTDefRegMap(@Self)^.clr := $08000000;
  66237. end;
  66238. procedure TCAN1_C1FSTAT.setFIFOIP27(thebits : TBits_1); inline;
  66239. begin
  66240. if thebits = 0 then
  66241. pTDefRegMap(@Self)^.clr := $08000000
  66242. else
  66243. pTDefRegMap(@Self)^.&set := $08000000;
  66244. end;
  66245. function TCAN1_C1FSTAT.getFIFOIP27 : TBits_1; inline;
  66246. begin
  66247. getFIFOIP27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  66248. end;
  66249. procedure TCAN1_C1FSTAT.setFIFOIP28; inline;
  66250. begin
  66251. pTDefRegMap(@Self)^.&set := $10000000;
  66252. end;
  66253. procedure TCAN1_C1FSTAT.clearFIFOIP28; inline;
  66254. begin
  66255. pTDefRegMap(@Self)^.clr := $10000000;
  66256. end;
  66257. procedure TCAN1_C1FSTAT.setFIFOIP28(thebits : TBits_1); inline;
  66258. begin
  66259. if thebits = 0 then
  66260. pTDefRegMap(@Self)^.clr := $10000000
  66261. else
  66262. pTDefRegMap(@Self)^.&set := $10000000;
  66263. end;
  66264. function TCAN1_C1FSTAT.getFIFOIP28 : TBits_1; inline;
  66265. begin
  66266. getFIFOIP28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  66267. end;
  66268. procedure TCAN1_C1FSTAT.setFIFOIP29; inline;
  66269. begin
  66270. pTDefRegMap(@Self)^.&set := $20000000;
  66271. end;
  66272. procedure TCAN1_C1FSTAT.clearFIFOIP29; inline;
  66273. begin
  66274. pTDefRegMap(@Self)^.clr := $20000000;
  66275. end;
  66276. procedure TCAN1_C1FSTAT.setFIFOIP29(thebits : TBits_1); inline;
  66277. begin
  66278. if thebits = 0 then
  66279. pTDefRegMap(@Self)^.clr := $20000000
  66280. else
  66281. pTDefRegMap(@Self)^.&set := $20000000;
  66282. end;
  66283. function TCAN1_C1FSTAT.getFIFOIP29 : TBits_1; inline;
  66284. begin
  66285. getFIFOIP29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  66286. end;
  66287. procedure TCAN1_C1FSTAT.setFIFOIP30; inline;
  66288. begin
  66289. pTDefRegMap(@Self)^.&set := $40000000;
  66290. end;
  66291. procedure TCAN1_C1FSTAT.clearFIFOIP30; inline;
  66292. begin
  66293. pTDefRegMap(@Self)^.clr := $40000000;
  66294. end;
  66295. procedure TCAN1_C1FSTAT.setFIFOIP30(thebits : TBits_1); inline;
  66296. begin
  66297. if thebits = 0 then
  66298. pTDefRegMap(@Self)^.clr := $40000000
  66299. else
  66300. pTDefRegMap(@Self)^.&set := $40000000;
  66301. end;
  66302. function TCAN1_C1FSTAT.getFIFOIP30 : TBits_1; inline;
  66303. begin
  66304. getFIFOIP30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  66305. end;
  66306. procedure TCAN1_C1FSTAT.setFIFOIP31; inline;
  66307. begin
  66308. pTDefRegMap(@Self)^.&set := $80000000;
  66309. end;
  66310. procedure TCAN1_C1FSTAT.clearFIFOIP31; inline;
  66311. begin
  66312. pTDefRegMap(@Self)^.clr := $80000000;
  66313. end;
  66314. procedure TCAN1_C1FSTAT.setFIFOIP31(thebits : TBits_1); inline;
  66315. begin
  66316. if thebits = 0 then
  66317. pTDefRegMap(@Self)^.clr := $80000000
  66318. else
  66319. pTDefRegMap(@Self)^.&set := $80000000;
  66320. end;
  66321. function TCAN1_C1FSTAT.getFIFOIP31 : TBits_1; inline;
  66322. begin
  66323. getFIFOIP31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  66324. end;
  66325. procedure TCAN1_C1FSTAT.setw(thebits : TBits_32); inline;
  66326. begin
  66327. pTDefRegMap(@Self)^.val := thebits;
  66328. end;
  66329. function TCAN1_C1FSTAT.getw : TBits_32; inline;
  66330. begin
  66331. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66332. end;
  66333. procedure TCAN1_C1RXOVF.setRXOVF(thebits : TBits_32); inline;
  66334. begin
  66335. pTDefRegMap(@Self)^.val := thebits;
  66336. end;
  66337. function TCAN1_C1RXOVF.getRXOVF : TBits_32; inline;
  66338. begin
  66339. getRXOVF := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66340. end;
  66341. procedure TCAN1_C1RXOVF.setRXOVF0; inline;
  66342. begin
  66343. pTDefRegMap(@Self)^.&set := $00000001;
  66344. end;
  66345. procedure TCAN1_C1RXOVF.clearRXOVF0; inline;
  66346. begin
  66347. pTDefRegMap(@Self)^.clr := $00000001;
  66348. end;
  66349. procedure TCAN1_C1RXOVF.setRXOVF0(thebits : TBits_1); inline;
  66350. begin
  66351. if thebits = 0 then
  66352. pTDefRegMap(@Self)^.clr := $00000001
  66353. else
  66354. pTDefRegMap(@Self)^.&set := $00000001;
  66355. end;
  66356. function TCAN1_C1RXOVF.getRXOVF0 : TBits_1; inline;
  66357. begin
  66358. getRXOVF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66359. end;
  66360. procedure TCAN1_C1RXOVF.setRXOVF1; inline;
  66361. begin
  66362. pTDefRegMap(@Self)^.&set := $00000002;
  66363. end;
  66364. procedure TCAN1_C1RXOVF.clearRXOVF1; inline;
  66365. begin
  66366. pTDefRegMap(@Self)^.clr := $00000002;
  66367. end;
  66368. procedure TCAN1_C1RXOVF.setRXOVF1(thebits : TBits_1); inline;
  66369. begin
  66370. if thebits = 0 then
  66371. pTDefRegMap(@Self)^.clr := $00000002
  66372. else
  66373. pTDefRegMap(@Self)^.&set := $00000002;
  66374. end;
  66375. function TCAN1_C1RXOVF.getRXOVF1 : TBits_1; inline;
  66376. begin
  66377. getRXOVF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66378. end;
  66379. procedure TCAN1_C1RXOVF.setRXOVF2; inline;
  66380. begin
  66381. pTDefRegMap(@Self)^.&set := $00000004;
  66382. end;
  66383. procedure TCAN1_C1RXOVF.clearRXOVF2; inline;
  66384. begin
  66385. pTDefRegMap(@Self)^.clr := $00000004;
  66386. end;
  66387. procedure TCAN1_C1RXOVF.setRXOVF2(thebits : TBits_1); inline;
  66388. begin
  66389. if thebits = 0 then
  66390. pTDefRegMap(@Self)^.clr := $00000004
  66391. else
  66392. pTDefRegMap(@Self)^.&set := $00000004;
  66393. end;
  66394. function TCAN1_C1RXOVF.getRXOVF2 : TBits_1; inline;
  66395. begin
  66396. getRXOVF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66397. end;
  66398. procedure TCAN1_C1RXOVF.setRXOVF3; inline;
  66399. begin
  66400. pTDefRegMap(@Self)^.&set := $00000008;
  66401. end;
  66402. procedure TCAN1_C1RXOVF.clearRXOVF3; inline;
  66403. begin
  66404. pTDefRegMap(@Self)^.clr := $00000008;
  66405. end;
  66406. procedure TCAN1_C1RXOVF.setRXOVF3(thebits : TBits_1); inline;
  66407. begin
  66408. if thebits = 0 then
  66409. pTDefRegMap(@Self)^.clr := $00000008
  66410. else
  66411. pTDefRegMap(@Self)^.&set := $00000008;
  66412. end;
  66413. function TCAN1_C1RXOVF.getRXOVF3 : TBits_1; inline;
  66414. begin
  66415. getRXOVF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66416. end;
  66417. procedure TCAN1_C1RXOVF.setRXOVF4; inline;
  66418. begin
  66419. pTDefRegMap(@Self)^.&set := $00000010;
  66420. end;
  66421. procedure TCAN1_C1RXOVF.clearRXOVF4; inline;
  66422. begin
  66423. pTDefRegMap(@Self)^.clr := $00000010;
  66424. end;
  66425. procedure TCAN1_C1RXOVF.setRXOVF4(thebits : TBits_1); inline;
  66426. begin
  66427. if thebits = 0 then
  66428. pTDefRegMap(@Self)^.clr := $00000010
  66429. else
  66430. pTDefRegMap(@Self)^.&set := $00000010;
  66431. end;
  66432. function TCAN1_C1RXOVF.getRXOVF4 : TBits_1; inline;
  66433. begin
  66434. getRXOVF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66435. end;
  66436. procedure TCAN1_C1RXOVF.setRXOVF5; inline;
  66437. begin
  66438. pTDefRegMap(@Self)^.&set := $00000020;
  66439. end;
  66440. procedure TCAN1_C1RXOVF.clearRXOVF5; inline;
  66441. begin
  66442. pTDefRegMap(@Self)^.clr := $00000020;
  66443. end;
  66444. procedure TCAN1_C1RXOVF.setRXOVF5(thebits : TBits_1); inline;
  66445. begin
  66446. if thebits = 0 then
  66447. pTDefRegMap(@Self)^.clr := $00000020
  66448. else
  66449. pTDefRegMap(@Self)^.&set := $00000020;
  66450. end;
  66451. function TCAN1_C1RXOVF.getRXOVF5 : TBits_1; inline;
  66452. begin
  66453. getRXOVF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66454. end;
  66455. procedure TCAN1_C1RXOVF.setRXOVF6; inline;
  66456. begin
  66457. pTDefRegMap(@Self)^.&set := $00000040;
  66458. end;
  66459. procedure TCAN1_C1RXOVF.clearRXOVF6; inline;
  66460. begin
  66461. pTDefRegMap(@Self)^.clr := $00000040;
  66462. end;
  66463. procedure TCAN1_C1RXOVF.setRXOVF6(thebits : TBits_1); inline;
  66464. begin
  66465. if thebits = 0 then
  66466. pTDefRegMap(@Self)^.clr := $00000040
  66467. else
  66468. pTDefRegMap(@Self)^.&set := $00000040;
  66469. end;
  66470. function TCAN1_C1RXOVF.getRXOVF6 : TBits_1; inline;
  66471. begin
  66472. getRXOVF6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66473. end;
  66474. procedure TCAN1_C1RXOVF.setRXOVF7; inline;
  66475. begin
  66476. pTDefRegMap(@Self)^.&set := $00000080;
  66477. end;
  66478. procedure TCAN1_C1RXOVF.clearRXOVF7; inline;
  66479. begin
  66480. pTDefRegMap(@Self)^.clr := $00000080;
  66481. end;
  66482. procedure TCAN1_C1RXOVF.setRXOVF7(thebits : TBits_1); inline;
  66483. begin
  66484. if thebits = 0 then
  66485. pTDefRegMap(@Self)^.clr := $00000080
  66486. else
  66487. pTDefRegMap(@Self)^.&set := $00000080;
  66488. end;
  66489. function TCAN1_C1RXOVF.getRXOVF7 : TBits_1; inline;
  66490. begin
  66491. getRXOVF7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66492. end;
  66493. procedure TCAN1_C1RXOVF.setRXOVF8; inline;
  66494. begin
  66495. pTDefRegMap(@Self)^.&set := $00000100;
  66496. end;
  66497. procedure TCAN1_C1RXOVF.clearRXOVF8; inline;
  66498. begin
  66499. pTDefRegMap(@Self)^.clr := $00000100;
  66500. end;
  66501. procedure TCAN1_C1RXOVF.setRXOVF8(thebits : TBits_1); inline;
  66502. begin
  66503. if thebits = 0 then
  66504. pTDefRegMap(@Self)^.clr := $00000100
  66505. else
  66506. pTDefRegMap(@Self)^.&set := $00000100;
  66507. end;
  66508. function TCAN1_C1RXOVF.getRXOVF8 : TBits_1; inline;
  66509. begin
  66510. getRXOVF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  66511. end;
  66512. procedure TCAN1_C1RXOVF.setRXOVF9; inline;
  66513. begin
  66514. pTDefRegMap(@Self)^.&set := $00000200;
  66515. end;
  66516. procedure TCAN1_C1RXOVF.clearRXOVF9; inline;
  66517. begin
  66518. pTDefRegMap(@Self)^.clr := $00000200;
  66519. end;
  66520. procedure TCAN1_C1RXOVF.setRXOVF9(thebits : TBits_1); inline;
  66521. begin
  66522. if thebits = 0 then
  66523. pTDefRegMap(@Self)^.clr := $00000200
  66524. else
  66525. pTDefRegMap(@Self)^.&set := $00000200;
  66526. end;
  66527. function TCAN1_C1RXOVF.getRXOVF9 : TBits_1; inline;
  66528. begin
  66529. getRXOVF9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  66530. end;
  66531. procedure TCAN1_C1RXOVF.setRXOVF10; inline;
  66532. begin
  66533. pTDefRegMap(@Self)^.&set := $00000400;
  66534. end;
  66535. procedure TCAN1_C1RXOVF.clearRXOVF10; inline;
  66536. begin
  66537. pTDefRegMap(@Self)^.clr := $00000400;
  66538. end;
  66539. procedure TCAN1_C1RXOVF.setRXOVF10(thebits : TBits_1); inline;
  66540. begin
  66541. if thebits = 0 then
  66542. pTDefRegMap(@Self)^.clr := $00000400
  66543. else
  66544. pTDefRegMap(@Self)^.&set := $00000400;
  66545. end;
  66546. function TCAN1_C1RXOVF.getRXOVF10 : TBits_1; inline;
  66547. begin
  66548. getRXOVF10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  66549. end;
  66550. procedure TCAN1_C1RXOVF.setRXOVF11; inline;
  66551. begin
  66552. pTDefRegMap(@Self)^.&set := $00000800;
  66553. end;
  66554. procedure TCAN1_C1RXOVF.clearRXOVF11; inline;
  66555. begin
  66556. pTDefRegMap(@Self)^.clr := $00000800;
  66557. end;
  66558. procedure TCAN1_C1RXOVF.setRXOVF11(thebits : TBits_1); inline;
  66559. begin
  66560. if thebits = 0 then
  66561. pTDefRegMap(@Self)^.clr := $00000800
  66562. else
  66563. pTDefRegMap(@Self)^.&set := $00000800;
  66564. end;
  66565. function TCAN1_C1RXOVF.getRXOVF11 : TBits_1; inline;
  66566. begin
  66567. getRXOVF11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  66568. end;
  66569. procedure TCAN1_C1RXOVF.setRXOVF12; inline;
  66570. begin
  66571. pTDefRegMap(@Self)^.&set := $00001000;
  66572. end;
  66573. procedure TCAN1_C1RXOVF.clearRXOVF12; inline;
  66574. begin
  66575. pTDefRegMap(@Self)^.clr := $00001000;
  66576. end;
  66577. procedure TCAN1_C1RXOVF.setRXOVF12(thebits : TBits_1); inline;
  66578. begin
  66579. if thebits = 0 then
  66580. pTDefRegMap(@Self)^.clr := $00001000
  66581. else
  66582. pTDefRegMap(@Self)^.&set := $00001000;
  66583. end;
  66584. function TCAN1_C1RXOVF.getRXOVF12 : TBits_1; inline;
  66585. begin
  66586. getRXOVF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  66587. end;
  66588. procedure TCAN1_C1RXOVF.setRXOVF13; inline;
  66589. begin
  66590. pTDefRegMap(@Self)^.&set := $00002000;
  66591. end;
  66592. procedure TCAN1_C1RXOVF.clearRXOVF13; inline;
  66593. begin
  66594. pTDefRegMap(@Self)^.clr := $00002000;
  66595. end;
  66596. procedure TCAN1_C1RXOVF.setRXOVF13(thebits : TBits_1); inline;
  66597. begin
  66598. if thebits = 0 then
  66599. pTDefRegMap(@Self)^.clr := $00002000
  66600. else
  66601. pTDefRegMap(@Self)^.&set := $00002000;
  66602. end;
  66603. function TCAN1_C1RXOVF.getRXOVF13 : TBits_1; inline;
  66604. begin
  66605. getRXOVF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  66606. end;
  66607. procedure TCAN1_C1RXOVF.setRXOVF14; inline;
  66608. begin
  66609. pTDefRegMap(@Self)^.&set := $00004000;
  66610. end;
  66611. procedure TCAN1_C1RXOVF.clearRXOVF14; inline;
  66612. begin
  66613. pTDefRegMap(@Self)^.clr := $00004000;
  66614. end;
  66615. procedure TCAN1_C1RXOVF.setRXOVF14(thebits : TBits_1); inline;
  66616. begin
  66617. if thebits = 0 then
  66618. pTDefRegMap(@Self)^.clr := $00004000
  66619. else
  66620. pTDefRegMap(@Self)^.&set := $00004000;
  66621. end;
  66622. function TCAN1_C1RXOVF.getRXOVF14 : TBits_1; inline;
  66623. begin
  66624. getRXOVF14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  66625. end;
  66626. procedure TCAN1_C1RXOVF.setRXOVF15; inline;
  66627. begin
  66628. pTDefRegMap(@Self)^.&set := $00008000;
  66629. end;
  66630. procedure TCAN1_C1RXOVF.clearRXOVF15; inline;
  66631. begin
  66632. pTDefRegMap(@Self)^.clr := $00008000;
  66633. end;
  66634. procedure TCAN1_C1RXOVF.setRXOVF15(thebits : TBits_1); inline;
  66635. begin
  66636. if thebits = 0 then
  66637. pTDefRegMap(@Self)^.clr := $00008000
  66638. else
  66639. pTDefRegMap(@Self)^.&set := $00008000;
  66640. end;
  66641. function TCAN1_C1RXOVF.getRXOVF15 : TBits_1; inline;
  66642. begin
  66643. getRXOVF15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  66644. end;
  66645. procedure TCAN1_C1RXOVF.setRXOVF16; inline;
  66646. begin
  66647. pTDefRegMap(@Self)^.&set := $00010000;
  66648. end;
  66649. procedure TCAN1_C1RXOVF.clearRXOVF16; inline;
  66650. begin
  66651. pTDefRegMap(@Self)^.clr := $00010000;
  66652. end;
  66653. procedure TCAN1_C1RXOVF.setRXOVF16(thebits : TBits_1); inline;
  66654. begin
  66655. if thebits = 0 then
  66656. pTDefRegMap(@Self)^.clr := $00010000
  66657. else
  66658. pTDefRegMap(@Self)^.&set := $00010000;
  66659. end;
  66660. function TCAN1_C1RXOVF.getRXOVF16 : TBits_1; inline;
  66661. begin
  66662. getRXOVF16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  66663. end;
  66664. procedure TCAN1_C1RXOVF.setRXOVF17; inline;
  66665. begin
  66666. pTDefRegMap(@Self)^.&set := $00020000;
  66667. end;
  66668. procedure TCAN1_C1RXOVF.clearRXOVF17; inline;
  66669. begin
  66670. pTDefRegMap(@Self)^.clr := $00020000;
  66671. end;
  66672. procedure TCAN1_C1RXOVF.setRXOVF17(thebits : TBits_1); inline;
  66673. begin
  66674. if thebits = 0 then
  66675. pTDefRegMap(@Self)^.clr := $00020000
  66676. else
  66677. pTDefRegMap(@Self)^.&set := $00020000;
  66678. end;
  66679. function TCAN1_C1RXOVF.getRXOVF17 : TBits_1; inline;
  66680. begin
  66681. getRXOVF17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  66682. end;
  66683. procedure TCAN1_C1RXOVF.setRXOVF18; inline;
  66684. begin
  66685. pTDefRegMap(@Self)^.&set := $00040000;
  66686. end;
  66687. procedure TCAN1_C1RXOVF.clearRXOVF18; inline;
  66688. begin
  66689. pTDefRegMap(@Self)^.clr := $00040000;
  66690. end;
  66691. procedure TCAN1_C1RXOVF.setRXOVF18(thebits : TBits_1); inline;
  66692. begin
  66693. if thebits = 0 then
  66694. pTDefRegMap(@Self)^.clr := $00040000
  66695. else
  66696. pTDefRegMap(@Self)^.&set := $00040000;
  66697. end;
  66698. function TCAN1_C1RXOVF.getRXOVF18 : TBits_1; inline;
  66699. begin
  66700. getRXOVF18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  66701. end;
  66702. procedure TCAN1_C1RXOVF.setRXOVF19; inline;
  66703. begin
  66704. pTDefRegMap(@Self)^.&set := $00080000;
  66705. end;
  66706. procedure TCAN1_C1RXOVF.clearRXOVF19; inline;
  66707. begin
  66708. pTDefRegMap(@Self)^.clr := $00080000;
  66709. end;
  66710. procedure TCAN1_C1RXOVF.setRXOVF19(thebits : TBits_1); inline;
  66711. begin
  66712. if thebits = 0 then
  66713. pTDefRegMap(@Self)^.clr := $00080000
  66714. else
  66715. pTDefRegMap(@Self)^.&set := $00080000;
  66716. end;
  66717. function TCAN1_C1RXOVF.getRXOVF19 : TBits_1; inline;
  66718. begin
  66719. getRXOVF19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  66720. end;
  66721. procedure TCAN1_C1RXOVF.setRXOVF20; inline;
  66722. begin
  66723. pTDefRegMap(@Self)^.&set := $00100000;
  66724. end;
  66725. procedure TCAN1_C1RXOVF.clearRXOVF20; inline;
  66726. begin
  66727. pTDefRegMap(@Self)^.clr := $00100000;
  66728. end;
  66729. procedure TCAN1_C1RXOVF.setRXOVF20(thebits : TBits_1); inline;
  66730. begin
  66731. if thebits = 0 then
  66732. pTDefRegMap(@Self)^.clr := $00100000
  66733. else
  66734. pTDefRegMap(@Self)^.&set := $00100000;
  66735. end;
  66736. function TCAN1_C1RXOVF.getRXOVF20 : TBits_1; inline;
  66737. begin
  66738. getRXOVF20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  66739. end;
  66740. procedure TCAN1_C1RXOVF.setRXOVF21; inline;
  66741. begin
  66742. pTDefRegMap(@Self)^.&set := $00200000;
  66743. end;
  66744. procedure TCAN1_C1RXOVF.clearRXOVF21; inline;
  66745. begin
  66746. pTDefRegMap(@Self)^.clr := $00200000;
  66747. end;
  66748. procedure TCAN1_C1RXOVF.setRXOVF21(thebits : TBits_1); inline;
  66749. begin
  66750. if thebits = 0 then
  66751. pTDefRegMap(@Self)^.clr := $00200000
  66752. else
  66753. pTDefRegMap(@Self)^.&set := $00200000;
  66754. end;
  66755. function TCAN1_C1RXOVF.getRXOVF21 : TBits_1; inline;
  66756. begin
  66757. getRXOVF21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  66758. end;
  66759. procedure TCAN1_C1RXOVF.setRXOVF22; inline;
  66760. begin
  66761. pTDefRegMap(@Self)^.&set := $00400000;
  66762. end;
  66763. procedure TCAN1_C1RXOVF.clearRXOVF22; inline;
  66764. begin
  66765. pTDefRegMap(@Self)^.clr := $00400000;
  66766. end;
  66767. procedure TCAN1_C1RXOVF.setRXOVF22(thebits : TBits_1); inline;
  66768. begin
  66769. if thebits = 0 then
  66770. pTDefRegMap(@Self)^.clr := $00400000
  66771. else
  66772. pTDefRegMap(@Self)^.&set := $00400000;
  66773. end;
  66774. function TCAN1_C1RXOVF.getRXOVF22 : TBits_1; inline;
  66775. begin
  66776. getRXOVF22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  66777. end;
  66778. procedure TCAN1_C1RXOVF.setRXOVF23; inline;
  66779. begin
  66780. pTDefRegMap(@Self)^.&set := $00800000;
  66781. end;
  66782. procedure TCAN1_C1RXOVF.clearRXOVF23; inline;
  66783. begin
  66784. pTDefRegMap(@Self)^.clr := $00800000;
  66785. end;
  66786. procedure TCAN1_C1RXOVF.setRXOVF23(thebits : TBits_1); inline;
  66787. begin
  66788. if thebits = 0 then
  66789. pTDefRegMap(@Self)^.clr := $00800000
  66790. else
  66791. pTDefRegMap(@Self)^.&set := $00800000;
  66792. end;
  66793. function TCAN1_C1RXOVF.getRXOVF23 : TBits_1; inline;
  66794. begin
  66795. getRXOVF23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  66796. end;
  66797. procedure TCAN1_C1RXOVF.setRXOVF24; inline;
  66798. begin
  66799. pTDefRegMap(@Self)^.&set := $01000000;
  66800. end;
  66801. procedure TCAN1_C1RXOVF.clearRXOVF24; inline;
  66802. begin
  66803. pTDefRegMap(@Self)^.clr := $01000000;
  66804. end;
  66805. procedure TCAN1_C1RXOVF.setRXOVF24(thebits : TBits_1); inline;
  66806. begin
  66807. if thebits = 0 then
  66808. pTDefRegMap(@Self)^.clr := $01000000
  66809. else
  66810. pTDefRegMap(@Self)^.&set := $01000000;
  66811. end;
  66812. function TCAN1_C1RXOVF.getRXOVF24 : TBits_1; inline;
  66813. begin
  66814. getRXOVF24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  66815. end;
  66816. procedure TCAN1_C1RXOVF.setRXOVF25; inline;
  66817. begin
  66818. pTDefRegMap(@Self)^.&set := $02000000;
  66819. end;
  66820. procedure TCAN1_C1RXOVF.clearRXOVF25; inline;
  66821. begin
  66822. pTDefRegMap(@Self)^.clr := $02000000;
  66823. end;
  66824. procedure TCAN1_C1RXOVF.setRXOVF25(thebits : TBits_1); inline;
  66825. begin
  66826. if thebits = 0 then
  66827. pTDefRegMap(@Self)^.clr := $02000000
  66828. else
  66829. pTDefRegMap(@Self)^.&set := $02000000;
  66830. end;
  66831. function TCAN1_C1RXOVF.getRXOVF25 : TBits_1; inline;
  66832. begin
  66833. getRXOVF25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  66834. end;
  66835. procedure TCAN1_C1RXOVF.setRXOVF26; inline;
  66836. begin
  66837. pTDefRegMap(@Self)^.&set := $04000000;
  66838. end;
  66839. procedure TCAN1_C1RXOVF.clearRXOVF26; inline;
  66840. begin
  66841. pTDefRegMap(@Self)^.clr := $04000000;
  66842. end;
  66843. procedure TCAN1_C1RXOVF.setRXOVF26(thebits : TBits_1); inline;
  66844. begin
  66845. if thebits = 0 then
  66846. pTDefRegMap(@Self)^.clr := $04000000
  66847. else
  66848. pTDefRegMap(@Self)^.&set := $04000000;
  66849. end;
  66850. function TCAN1_C1RXOVF.getRXOVF26 : TBits_1; inline;
  66851. begin
  66852. getRXOVF26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  66853. end;
  66854. procedure TCAN1_C1RXOVF.setRXOVF27; inline;
  66855. begin
  66856. pTDefRegMap(@Self)^.&set := $08000000;
  66857. end;
  66858. procedure TCAN1_C1RXOVF.clearRXOVF27; inline;
  66859. begin
  66860. pTDefRegMap(@Self)^.clr := $08000000;
  66861. end;
  66862. procedure TCAN1_C1RXOVF.setRXOVF27(thebits : TBits_1); inline;
  66863. begin
  66864. if thebits = 0 then
  66865. pTDefRegMap(@Self)^.clr := $08000000
  66866. else
  66867. pTDefRegMap(@Self)^.&set := $08000000;
  66868. end;
  66869. function TCAN1_C1RXOVF.getRXOVF27 : TBits_1; inline;
  66870. begin
  66871. getRXOVF27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  66872. end;
  66873. procedure TCAN1_C1RXOVF.setRXOVF28; inline;
  66874. begin
  66875. pTDefRegMap(@Self)^.&set := $10000000;
  66876. end;
  66877. procedure TCAN1_C1RXOVF.clearRXOVF28; inline;
  66878. begin
  66879. pTDefRegMap(@Self)^.clr := $10000000;
  66880. end;
  66881. procedure TCAN1_C1RXOVF.setRXOVF28(thebits : TBits_1); inline;
  66882. begin
  66883. if thebits = 0 then
  66884. pTDefRegMap(@Self)^.clr := $10000000
  66885. else
  66886. pTDefRegMap(@Self)^.&set := $10000000;
  66887. end;
  66888. function TCAN1_C1RXOVF.getRXOVF28 : TBits_1; inline;
  66889. begin
  66890. getRXOVF28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  66891. end;
  66892. procedure TCAN1_C1RXOVF.setRXOVF29; inline;
  66893. begin
  66894. pTDefRegMap(@Self)^.&set := $20000000;
  66895. end;
  66896. procedure TCAN1_C1RXOVF.clearRXOVF29; inline;
  66897. begin
  66898. pTDefRegMap(@Self)^.clr := $20000000;
  66899. end;
  66900. procedure TCAN1_C1RXOVF.setRXOVF29(thebits : TBits_1); inline;
  66901. begin
  66902. if thebits = 0 then
  66903. pTDefRegMap(@Self)^.clr := $20000000
  66904. else
  66905. pTDefRegMap(@Self)^.&set := $20000000;
  66906. end;
  66907. function TCAN1_C1RXOVF.getRXOVF29 : TBits_1; inline;
  66908. begin
  66909. getRXOVF29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  66910. end;
  66911. procedure TCAN1_C1RXOVF.setRXOVF30; inline;
  66912. begin
  66913. pTDefRegMap(@Self)^.&set := $40000000;
  66914. end;
  66915. procedure TCAN1_C1RXOVF.clearRXOVF30; inline;
  66916. begin
  66917. pTDefRegMap(@Self)^.clr := $40000000;
  66918. end;
  66919. procedure TCAN1_C1RXOVF.setRXOVF30(thebits : TBits_1); inline;
  66920. begin
  66921. if thebits = 0 then
  66922. pTDefRegMap(@Self)^.clr := $40000000
  66923. else
  66924. pTDefRegMap(@Self)^.&set := $40000000;
  66925. end;
  66926. function TCAN1_C1RXOVF.getRXOVF30 : TBits_1; inline;
  66927. begin
  66928. getRXOVF30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  66929. end;
  66930. procedure TCAN1_C1RXOVF.setRXOVF31; inline;
  66931. begin
  66932. pTDefRegMap(@Self)^.&set := $80000000;
  66933. end;
  66934. procedure TCAN1_C1RXOVF.clearRXOVF31; inline;
  66935. begin
  66936. pTDefRegMap(@Self)^.clr := $80000000;
  66937. end;
  66938. procedure TCAN1_C1RXOVF.setRXOVF31(thebits : TBits_1); inline;
  66939. begin
  66940. if thebits = 0 then
  66941. pTDefRegMap(@Self)^.clr := $80000000
  66942. else
  66943. pTDefRegMap(@Self)^.&set := $80000000;
  66944. end;
  66945. function TCAN1_C1RXOVF.getRXOVF31 : TBits_1; inline;
  66946. begin
  66947. getRXOVF31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  66948. end;
  66949. procedure TCAN1_C1RXOVF.setw(thebits : TBits_32); inline;
  66950. begin
  66951. pTDefRegMap(@Self)^.val := thebits;
  66952. end;
  66953. function TCAN1_C1RXOVF.getw : TBits_32; inline;
  66954. begin
  66955. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66956. end;
  66957. procedure TCAN1_C1TMR.setCANTSPRE(thebits : TBits_16); inline;
  66958. begin
  66959. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  66960. end;
  66961. function TCAN1_C1TMR.getCANTSPRE : TBits_16; inline;
  66962. begin
  66963. getCANTSPRE := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  66964. end;
  66965. procedure TCAN1_C1TMR.setCANTS(thebits : TBits_16); inline;
  66966. begin
  66967. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0000FFFF or ( thebits shl 16 );
  66968. end;
  66969. function TCAN1_C1TMR.getCANTS : TBits_16; inline;
  66970. begin
  66971. getCANTS := (pTDefRegMap(@Self)^.val and $FFFF0000) shr 16;
  66972. end;
  66973. procedure TCAN1_C1TMR.setw(thebits : TBits_32); inline;
  66974. begin
  66975. pTDefRegMap(@Self)^.val := thebits;
  66976. end;
  66977. function TCAN1_C1TMR.getw : TBits_32; inline;
  66978. begin
  66979. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66980. end;
  66981. procedure TCAN1_C1RXM0.setEID(thebits : TBits_18); inline;
  66982. begin
  66983. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  66984. end;
  66985. function TCAN1_C1RXM0.getEID : TBits_18; inline;
  66986. begin
  66987. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  66988. end;
  66989. procedure TCAN1_C1RXM0.setMIDE; inline;
  66990. begin
  66991. pTDefRegMap(@Self)^.&set := $00080000;
  66992. end;
  66993. procedure TCAN1_C1RXM0.clearMIDE; inline;
  66994. begin
  66995. pTDefRegMap(@Self)^.clr := $00080000;
  66996. end;
  66997. procedure TCAN1_C1RXM0.setMIDE(thebits : TBits_1); inline;
  66998. begin
  66999. if thebits = 0 then
  67000. pTDefRegMap(@Self)^.clr := $00080000
  67001. else
  67002. pTDefRegMap(@Self)^.&set := $00080000;
  67003. end;
  67004. function TCAN1_C1RXM0.getMIDE : TBits_1; inline;
  67005. begin
  67006. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67007. end;
  67008. procedure TCAN1_C1RXM0.setSID(thebits : TBits_11); inline;
  67009. begin
  67010. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67011. end;
  67012. function TCAN1_C1RXM0.getSID : TBits_11; inline;
  67013. begin
  67014. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67015. end;
  67016. procedure TCAN1_C1RXM0.setw(thebits : TBits_32); inline;
  67017. begin
  67018. pTDefRegMap(@Self)^.val := thebits;
  67019. end;
  67020. function TCAN1_C1RXM0.getw : TBits_32; inline;
  67021. begin
  67022. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67023. end;
  67024. procedure TCAN1_C1RXM1.setEID(thebits : TBits_18); inline;
  67025. begin
  67026. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67027. end;
  67028. function TCAN1_C1RXM1.getEID : TBits_18; inline;
  67029. begin
  67030. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67031. end;
  67032. procedure TCAN1_C1RXM1.setMIDE; inline;
  67033. begin
  67034. pTDefRegMap(@Self)^.&set := $00080000;
  67035. end;
  67036. procedure TCAN1_C1RXM1.clearMIDE; inline;
  67037. begin
  67038. pTDefRegMap(@Self)^.clr := $00080000;
  67039. end;
  67040. procedure TCAN1_C1RXM1.setMIDE(thebits : TBits_1); inline;
  67041. begin
  67042. if thebits = 0 then
  67043. pTDefRegMap(@Self)^.clr := $00080000
  67044. else
  67045. pTDefRegMap(@Self)^.&set := $00080000;
  67046. end;
  67047. function TCAN1_C1RXM1.getMIDE : TBits_1; inline;
  67048. begin
  67049. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67050. end;
  67051. procedure TCAN1_C1RXM1.setSID(thebits : TBits_11); inline;
  67052. begin
  67053. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67054. end;
  67055. function TCAN1_C1RXM1.getSID : TBits_11; inline;
  67056. begin
  67057. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67058. end;
  67059. procedure TCAN1_C1RXM1.setw(thebits : TBits_32); inline;
  67060. begin
  67061. pTDefRegMap(@Self)^.val := thebits;
  67062. end;
  67063. function TCAN1_C1RXM1.getw : TBits_32; inline;
  67064. begin
  67065. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67066. end;
  67067. procedure TCAN1_C1RXM2.setEID(thebits : TBits_18); inline;
  67068. begin
  67069. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67070. end;
  67071. function TCAN1_C1RXM2.getEID : TBits_18; inline;
  67072. begin
  67073. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67074. end;
  67075. procedure TCAN1_C1RXM2.setMIDE; inline;
  67076. begin
  67077. pTDefRegMap(@Self)^.&set := $00080000;
  67078. end;
  67079. procedure TCAN1_C1RXM2.clearMIDE; inline;
  67080. begin
  67081. pTDefRegMap(@Self)^.clr := $00080000;
  67082. end;
  67083. procedure TCAN1_C1RXM2.setMIDE(thebits : TBits_1); inline;
  67084. begin
  67085. if thebits = 0 then
  67086. pTDefRegMap(@Self)^.clr := $00080000
  67087. else
  67088. pTDefRegMap(@Self)^.&set := $00080000;
  67089. end;
  67090. function TCAN1_C1RXM2.getMIDE : TBits_1; inline;
  67091. begin
  67092. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67093. end;
  67094. procedure TCAN1_C1RXM2.setSID(thebits : TBits_11); inline;
  67095. begin
  67096. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67097. end;
  67098. function TCAN1_C1RXM2.getSID : TBits_11; inline;
  67099. begin
  67100. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67101. end;
  67102. procedure TCAN1_C1RXM2.setw(thebits : TBits_32); inline;
  67103. begin
  67104. pTDefRegMap(@Self)^.val := thebits;
  67105. end;
  67106. function TCAN1_C1RXM2.getw : TBits_32; inline;
  67107. begin
  67108. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67109. end;
  67110. procedure TCAN1_C1RXM3.setEID(thebits : TBits_18); inline;
  67111. begin
  67112. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67113. end;
  67114. function TCAN1_C1RXM3.getEID : TBits_18; inline;
  67115. begin
  67116. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67117. end;
  67118. procedure TCAN1_C1RXM3.setMIDE; inline;
  67119. begin
  67120. pTDefRegMap(@Self)^.&set := $00080000;
  67121. end;
  67122. procedure TCAN1_C1RXM3.clearMIDE; inline;
  67123. begin
  67124. pTDefRegMap(@Self)^.clr := $00080000;
  67125. end;
  67126. procedure TCAN1_C1RXM3.setMIDE(thebits : TBits_1); inline;
  67127. begin
  67128. if thebits = 0 then
  67129. pTDefRegMap(@Self)^.clr := $00080000
  67130. else
  67131. pTDefRegMap(@Self)^.&set := $00080000;
  67132. end;
  67133. function TCAN1_C1RXM3.getMIDE : TBits_1; inline;
  67134. begin
  67135. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67136. end;
  67137. procedure TCAN1_C1RXM3.setSID(thebits : TBits_11); inline;
  67138. begin
  67139. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67140. end;
  67141. function TCAN1_C1RXM3.getSID : TBits_11; inline;
  67142. begin
  67143. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67144. end;
  67145. procedure TCAN1_C1RXM3.setw(thebits : TBits_32); inline;
  67146. begin
  67147. pTDefRegMap(@Self)^.val := thebits;
  67148. end;
  67149. function TCAN1_C1RXM3.getw : TBits_32; inline;
  67150. begin
  67151. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67152. end;
  67153. procedure TCAN1_C1FLTCON0.setFSEL0(thebits : TBits_5); inline;
  67154. begin
  67155. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  67156. end;
  67157. function TCAN1_C1FLTCON0.getFSEL0 : TBits_5; inline;
  67158. begin
  67159. getFSEL0 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  67160. end;
  67161. procedure TCAN1_C1FLTCON0.setMSEL0(thebits : TBits_2); inline;
  67162. begin
  67163. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  67164. end;
  67165. function TCAN1_C1FLTCON0.getMSEL0 : TBits_2; inline;
  67166. begin
  67167. getMSEL0 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  67168. end;
  67169. procedure TCAN1_C1FLTCON0.setFLTEN0; inline;
  67170. begin
  67171. pTDefRegMap(@Self)^.&set := $00000080;
  67172. end;
  67173. procedure TCAN1_C1FLTCON0.clearFLTEN0; inline;
  67174. begin
  67175. pTDefRegMap(@Self)^.clr := $00000080;
  67176. end;
  67177. procedure TCAN1_C1FLTCON0.setFLTEN0(thebits : TBits_1); inline;
  67178. begin
  67179. if thebits = 0 then
  67180. pTDefRegMap(@Self)^.clr := $00000080
  67181. else
  67182. pTDefRegMap(@Self)^.&set := $00000080;
  67183. end;
  67184. function TCAN1_C1FLTCON0.getFLTEN0 : TBits_1; inline;
  67185. begin
  67186. getFLTEN0 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67187. end;
  67188. procedure TCAN1_C1FLTCON0.setFSEL1(thebits : TBits_5); inline;
  67189. begin
  67190. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  67191. end;
  67192. function TCAN1_C1FLTCON0.getFSEL1 : TBits_5; inline;
  67193. begin
  67194. getFSEL1 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  67195. end;
  67196. procedure TCAN1_C1FLTCON0.setMSEL1(thebits : TBits_2); inline;
  67197. begin
  67198. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  67199. end;
  67200. function TCAN1_C1FLTCON0.getMSEL1 : TBits_2; inline;
  67201. begin
  67202. getMSEL1 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  67203. end;
  67204. procedure TCAN1_C1FLTCON0.setFLTEN1; inline;
  67205. begin
  67206. pTDefRegMap(@Self)^.&set := $00008000;
  67207. end;
  67208. procedure TCAN1_C1FLTCON0.clearFLTEN1; inline;
  67209. begin
  67210. pTDefRegMap(@Self)^.clr := $00008000;
  67211. end;
  67212. procedure TCAN1_C1FLTCON0.setFLTEN1(thebits : TBits_1); inline;
  67213. begin
  67214. if thebits = 0 then
  67215. pTDefRegMap(@Self)^.clr := $00008000
  67216. else
  67217. pTDefRegMap(@Self)^.&set := $00008000;
  67218. end;
  67219. function TCAN1_C1FLTCON0.getFLTEN1 : TBits_1; inline;
  67220. begin
  67221. getFLTEN1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  67222. end;
  67223. procedure TCAN1_C1FLTCON0.setFSEL2(thebits : TBits_5); inline;
  67224. begin
  67225. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  67226. end;
  67227. function TCAN1_C1FLTCON0.getFSEL2 : TBits_5; inline;
  67228. begin
  67229. getFSEL2 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  67230. end;
  67231. procedure TCAN1_C1FLTCON0.setMSEL2(thebits : TBits_2); inline;
  67232. begin
  67233. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  67234. end;
  67235. function TCAN1_C1FLTCON0.getMSEL2 : TBits_2; inline;
  67236. begin
  67237. getMSEL2 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  67238. end;
  67239. procedure TCAN1_C1FLTCON0.setFLTEN2; inline;
  67240. begin
  67241. pTDefRegMap(@Self)^.&set := $00800000;
  67242. end;
  67243. procedure TCAN1_C1FLTCON0.clearFLTEN2; inline;
  67244. begin
  67245. pTDefRegMap(@Self)^.clr := $00800000;
  67246. end;
  67247. procedure TCAN1_C1FLTCON0.setFLTEN2(thebits : TBits_1); inline;
  67248. begin
  67249. if thebits = 0 then
  67250. pTDefRegMap(@Self)^.clr := $00800000
  67251. else
  67252. pTDefRegMap(@Self)^.&set := $00800000;
  67253. end;
  67254. function TCAN1_C1FLTCON0.getFLTEN2 : TBits_1; inline;
  67255. begin
  67256. getFLTEN2 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  67257. end;
  67258. procedure TCAN1_C1FLTCON0.setFSEL3(thebits : TBits_5); inline;
  67259. begin
  67260. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  67261. end;
  67262. function TCAN1_C1FLTCON0.getFSEL3 : TBits_5; inline;
  67263. begin
  67264. getFSEL3 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  67265. end;
  67266. procedure TCAN1_C1FLTCON0.setMSEL3(thebits : TBits_2); inline;
  67267. begin
  67268. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  67269. end;
  67270. function TCAN1_C1FLTCON0.getMSEL3 : TBits_2; inline;
  67271. begin
  67272. getMSEL3 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  67273. end;
  67274. procedure TCAN1_C1FLTCON0.setFLTEN3; inline;
  67275. begin
  67276. pTDefRegMap(@Self)^.&set := $80000000;
  67277. end;
  67278. procedure TCAN1_C1FLTCON0.clearFLTEN3; inline;
  67279. begin
  67280. pTDefRegMap(@Self)^.clr := $80000000;
  67281. end;
  67282. procedure TCAN1_C1FLTCON0.setFLTEN3(thebits : TBits_1); inline;
  67283. begin
  67284. if thebits = 0 then
  67285. pTDefRegMap(@Self)^.clr := $80000000
  67286. else
  67287. pTDefRegMap(@Self)^.&set := $80000000;
  67288. end;
  67289. function TCAN1_C1FLTCON0.getFLTEN3 : TBits_1; inline;
  67290. begin
  67291. getFLTEN3 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  67292. end;
  67293. procedure TCAN1_C1FLTCON0.setw(thebits : TBits_32); inline;
  67294. begin
  67295. pTDefRegMap(@Self)^.val := thebits;
  67296. end;
  67297. function TCAN1_C1FLTCON0.getw : TBits_32; inline;
  67298. begin
  67299. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67300. end;
  67301. procedure TCAN1_C1FLTCON1.setFSEL4(thebits : TBits_5); inline;
  67302. begin
  67303. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  67304. end;
  67305. function TCAN1_C1FLTCON1.getFSEL4 : TBits_5; inline;
  67306. begin
  67307. getFSEL4 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  67308. end;
  67309. procedure TCAN1_C1FLTCON1.setMSEL4(thebits : TBits_2); inline;
  67310. begin
  67311. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  67312. end;
  67313. function TCAN1_C1FLTCON1.getMSEL4 : TBits_2; inline;
  67314. begin
  67315. getMSEL4 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  67316. end;
  67317. procedure TCAN1_C1FLTCON1.setFLTEN4; inline;
  67318. begin
  67319. pTDefRegMap(@Self)^.&set := $00000080;
  67320. end;
  67321. procedure TCAN1_C1FLTCON1.clearFLTEN4; inline;
  67322. begin
  67323. pTDefRegMap(@Self)^.clr := $00000080;
  67324. end;
  67325. procedure TCAN1_C1FLTCON1.setFLTEN4(thebits : TBits_1); inline;
  67326. begin
  67327. if thebits = 0 then
  67328. pTDefRegMap(@Self)^.clr := $00000080
  67329. else
  67330. pTDefRegMap(@Self)^.&set := $00000080;
  67331. end;
  67332. function TCAN1_C1FLTCON1.getFLTEN4 : TBits_1; inline;
  67333. begin
  67334. getFLTEN4 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67335. end;
  67336. procedure TCAN1_C1FLTCON1.setFSEL5(thebits : TBits_5); inline;
  67337. begin
  67338. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  67339. end;
  67340. function TCAN1_C1FLTCON1.getFSEL5 : TBits_5; inline;
  67341. begin
  67342. getFSEL5 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  67343. end;
  67344. procedure TCAN1_C1FLTCON1.setMSEL5(thebits : TBits_2); inline;
  67345. begin
  67346. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  67347. end;
  67348. function TCAN1_C1FLTCON1.getMSEL5 : TBits_2; inline;
  67349. begin
  67350. getMSEL5 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  67351. end;
  67352. procedure TCAN1_C1FLTCON1.setFLTEN5; inline;
  67353. begin
  67354. pTDefRegMap(@Self)^.&set := $00008000;
  67355. end;
  67356. procedure TCAN1_C1FLTCON1.clearFLTEN5; inline;
  67357. begin
  67358. pTDefRegMap(@Self)^.clr := $00008000;
  67359. end;
  67360. procedure TCAN1_C1FLTCON1.setFLTEN5(thebits : TBits_1); inline;
  67361. begin
  67362. if thebits = 0 then
  67363. pTDefRegMap(@Self)^.clr := $00008000
  67364. else
  67365. pTDefRegMap(@Self)^.&set := $00008000;
  67366. end;
  67367. function TCAN1_C1FLTCON1.getFLTEN5 : TBits_1; inline;
  67368. begin
  67369. getFLTEN5 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  67370. end;
  67371. procedure TCAN1_C1FLTCON1.setFSEL6(thebits : TBits_5); inline;
  67372. begin
  67373. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  67374. end;
  67375. function TCAN1_C1FLTCON1.getFSEL6 : TBits_5; inline;
  67376. begin
  67377. getFSEL6 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  67378. end;
  67379. procedure TCAN1_C1FLTCON1.setMSEL6(thebits : TBits_2); inline;
  67380. begin
  67381. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  67382. end;
  67383. function TCAN1_C1FLTCON1.getMSEL6 : TBits_2; inline;
  67384. begin
  67385. getMSEL6 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  67386. end;
  67387. procedure TCAN1_C1FLTCON1.setFLTEN6; inline;
  67388. begin
  67389. pTDefRegMap(@Self)^.&set := $00800000;
  67390. end;
  67391. procedure TCAN1_C1FLTCON1.clearFLTEN6; inline;
  67392. begin
  67393. pTDefRegMap(@Self)^.clr := $00800000;
  67394. end;
  67395. procedure TCAN1_C1FLTCON1.setFLTEN6(thebits : TBits_1); inline;
  67396. begin
  67397. if thebits = 0 then
  67398. pTDefRegMap(@Self)^.clr := $00800000
  67399. else
  67400. pTDefRegMap(@Self)^.&set := $00800000;
  67401. end;
  67402. function TCAN1_C1FLTCON1.getFLTEN6 : TBits_1; inline;
  67403. begin
  67404. getFLTEN6 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  67405. end;
  67406. procedure TCAN1_C1FLTCON1.setFSEL7(thebits : TBits_5); inline;
  67407. begin
  67408. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  67409. end;
  67410. function TCAN1_C1FLTCON1.getFSEL7 : TBits_5; inline;
  67411. begin
  67412. getFSEL7 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  67413. end;
  67414. procedure TCAN1_C1FLTCON1.setMSEL7(thebits : TBits_2); inline;
  67415. begin
  67416. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  67417. end;
  67418. function TCAN1_C1FLTCON1.getMSEL7 : TBits_2; inline;
  67419. begin
  67420. getMSEL7 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  67421. end;
  67422. procedure TCAN1_C1FLTCON1.setFLTEN7; inline;
  67423. begin
  67424. pTDefRegMap(@Self)^.&set := $80000000;
  67425. end;
  67426. procedure TCAN1_C1FLTCON1.clearFLTEN7; inline;
  67427. begin
  67428. pTDefRegMap(@Self)^.clr := $80000000;
  67429. end;
  67430. procedure TCAN1_C1FLTCON1.setFLTEN7(thebits : TBits_1); inline;
  67431. begin
  67432. if thebits = 0 then
  67433. pTDefRegMap(@Self)^.clr := $80000000
  67434. else
  67435. pTDefRegMap(@Self)^.&set := $80000000;
  67436. end;
  67437. function TCAN1_C1FLTCON1.getFLTEN7 : TBits_1; inline;
  67438. begin
  67439. getFLTEN7 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  67440. end;
  67441. procedure TCAN1_C1FLTCON1.setw(thebits : TBits_32); inline;
  67442. begin
  67443. pTDefRegMap(@Self)^.val := thebits;
  67444. end;
  67445. function TCAN1_C1FLTCON1.getw : TBits_32; inline;
  67446. begin
  67447. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67448. end;
  67449. procedure TCAN1_C1FLTCON2.setFSEL8(thebits : TBits_5); inline;
  67450. begin
  67451. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  67452. end;
  67453. function TCAN1_C1FLTCON2.getFSEL8 : TBits_5; inline;
  67454. begin
  67455. getFSEL8 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  67456. end;
  67457. procedure TCAN1_C1FLTCON2.setMSEL8(thebits : TBits_2); inline;
  67458. begin
  67459. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  67460. end;
  67461. function TCAN1_C1FLTCON2.getMSEL8 : TBits_2; inline;
  67462. begin
  67463. getMSEL8 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  67464. end;
  67465. procedure TCAN1_C1FLTCON2.setFLTEN8; inline;
  67466. begin
  67467. pTDefRegMap(@Self)^.&set := $00000080;
  67468. end;
  67469. procedure TCAN1_C1FLTCON2.clearFLTEN8; inline;
  67470. begin
  67471. pTDefRegMap(@Self)^.clr := $00000080;
  67472. end;
  67473. procedure TCAN1_C1FLTCON2.setFLTEN8(thebits : TBits_1); inline;
  67474. begin
  67475. if thebits = 0 then
  67476. pTDefRegMap(@Self)^.clr := $00000080
  67477. else
  67478. pTDefRegMap(@Self)^.&set := $00000080;
  67479. end;
  67480. function TCAN1_C1FLTCON2.getFLTEN8 : TBits_1; inline;
  67481. begin
  67482. getFLTEN8 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67483. end;
  67484. procedure TCAN1_C1FLTCON2.setFSEL9(thebits : TBits_5); inline;
  67485. begin
  67486. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  67487. end;
  67488. function TCAN1_C1FLTCON2.getFSEL9 : TBits_5; inline;
  67489. begin
  67490. getFSEL9 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  67491. end;
  67492. procedure TCAN1_C1FLTCON2.setMSEL9(thebits : TBits_2); inline;
  67493. begin
  67494. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  67495. end;
  67496. function TCAN1_C1FLTCON2.getMSEL9 : TBits_2; inline;
  67497. begin
  67498. getMSEL9 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  67499. end;
  67500. procedure TCAN1_C1FLTCON2.setFLTEN9; inline;
  67501. begin
  67502. pTDefRegMap(@Self)^.&set := $00008000;
  67503. end;
  67504. procedure TCAN1_C1FLTCON2.clearFLTEN9; inline;
  67505. begin
  67506. pTDefRegMap(@Self)^.clr := $00008000;
  67507. end;
  67508. procedure TCAN1_C1FLTCON2.setFLTEN9(thebits : TBits_1); inline;
  67509. begin
  67510. if thebits = 0 then
  67511. pTDefRegMap(@Self)^.clr := $00008000
  67512. else
  67513. pTDefRegMap(@Self)^.&set := $00008000;
  67514. end;
  67515. function TCAN1_C1FLTCON2.getFLTEN9 : TBits_1; inline;
  67516. begin
  67517. getFLTEN9 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  67518. end;
  67519. procedure TCAN1_C1FLTCON2.setFSEL10(thebits : TBits_5); inline;
  67520. begin
  67521. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  67522. end;
  67523. function TCAN1_C1FLTCON2.getFSEL10 : TBits_5; inline;
  67524. begin
  67525. getFSEL10 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  67526. end;
  67527. procedure TCAN1_C1FLTCON2.setMSEL10(thebits : TBits_2); inline;
  67528. begin
  67529. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  67530. end;
  67531. function TCAN1_C1FLTCON2.getMSEL10 : TBits_2; inline;
  67532. begin
  67533. getMSEL10 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  67534. end;
  67535. procedure TCAN1_C1FLTCON2.setFLTEN10; inline;
  67536. begin
  67537. pTDefRegMap(@Self)^.&set := $00800000;
  67538. end;
  67539. procedure TCAN1_C1FLTCON2.clearFLTEN10; inline;
  67540. begin
  67541. pTDefRegMap(@Self)^.clr := $00800000;
  67542. end;
  67543. procedure TCAN1_C1FLTCON2.setFLTEN10(thebits : TBits_1); inline;
  67544. begin
  67545. if thebits = 0 then
  67546. pTDefRegMap(@Self)^.clr := $00800000
  67547. else
  67548. pTDefRegMap(@Self)^.&set := $00800000;
  67549. end;
  67550. function TCAN1_C1FLTCON2.getFLTEN10 : TBits_1; inline;
  67551. begin
  67552. getFLTEN10 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  67553. end;
  67554. procedure TCAN1_C1FLTCON2.setFSEL11(thebits : TBits_5); inline;
  67555. begin
  67556. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  67557. end;
  67558. function TCAN1_C1FLTCON2.getFSEL11 : TBits_5; inline;
  67559. begin
  67560. getFSEL11 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  67561. end;
  67562. procedure TCAN1_C1FLTCON2.setMSEL11(thebits : TBits_2); inline;
  67563. begin
  67564. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  67565. end;
  67566. function TCAN1_C1FLTCON2.getMSEL11 : TBits_2; inline;
  67567. begin
  67568. getMSEL11 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  67569. end;
  67570. procedure TCAN1_C1FLTCON2.setFLTEN11; inline;
  67571. begin
  67572. pTDefRegMap(@Self)^.&set := $80000000;
  67573. end;
  67574. procedure TCAN1_C1FLTCON2.clearFLTEN11; inline;
  67575. begin
  67576. pTDefRegMap(@Self)^.clr := $80000000;
  67577. end;
  67578. procedure TCAN1_C1FLTCON2.setFLTEN11(thebits : TBits_1); inline;
  67579. begin
  67580. if thebits = 0 then
  67581. pTDefRegMap(@Self)^.clr := $80000000
  67582. else
  67583. pTDefRegMap(@Self)^.&set := $80000000;
  67584. end;
  67585. function TCAN1_C1FLTCON2.getFLTEN11 : TBits_1; inline;
  67586. begin
  67587. getFLTEN11 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  67588. end;
  67589. procedure TCAN1_C1FLTCON2.setw(thebits : TBits_32); inline;
  67590. begin
  67591. pTDefRegMap(@Self)^.val := thebits;
  67592. end;
  67593. function TCAN1_C1FLTCON2.getw : TBits_32; inline;
  67594. begin
  67595. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67596. end;
  67597. procedure TCAN1_C1FLTCON3.setFSEL12(thebits : TBits_5); inline;
  67598. begin
  67599. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  67600. end;
  67601. function TCAN1_C1FLTCON3.getFSEL12 : TBits_5; inline;
  67602. begin
  67603. getFSEL12 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  67604. end;
  67605. procedure TCAN1_C1FLTCON3.setMSEL12(thebits : TBits_2); inline;
  67606. begin
  67607. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  67608. end;
  67609. function TCAN1_C1FLTCON3.getMSEL12 : TBits_2; inline;
  67610. begin
  67611. getMSEL12 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  67612. end;
  67613. procedure TCAN1_C1FLTCON3.setFLTEN12; inline;
  67614. begin
  67615. pTDefRegMap(@Self)^.&set := $00000080;
  67616. end;
  67617. procedure TCAN1_C1FLTCON3.clearFLTEN12; inline;
  67618. begin
  67619. pTDefRegMap(@Self)^.clr := $00000080;
  67620. end;
  67621. procedure TCAN1_C1FLTCON3.setFLTEN12(thebits : TBits_1); inline;
  67622. begin
  67623. if thebits = 0 then
  67624. pTDefRegMap(@Self)^.clr := $00000080
  67625. else
  67626. pTDefRegMap(@Self)^.&set := $00000080;
  67627. end;
  67628. function TCAN1_C1FLTCON3.getFLTEN12 : TBits_1; inline;
  67629. begin
  67630. getFLTEN12 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67631. end;
  67632. procedure TCAN1_C1FLTCON3.setFSEL13(thebits : TBits_5); inline;
  67633. begin
  67634. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  67635. end;
  67636. function TCAN1_C1FLTCON3.getFSEL13 : TBits_5; inline;
  67637. begin
  67638. getFSEL13 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  67639. end;
  67640. procedure TCAN1_C1FLTCON3.setMSEL13(thebits : TBits_2); inline;
  67641. begin
  67642. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  67643. end;
  67644. function TCAN1_C1FLTCON3.getMSEL13 : TBits_2; inline;
  67645. begin
  67646. getMSEL13 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  67647. end;
  67648. procedure TCAN1_C1FLTCON3.setFLTEN13; inline;
  67649. begin
  67650. pTDefRegMap(@Self)^.&set := $00008000;
  67651. end;
  67652. procedure TCAN1_C1FLTCON3.clearFLTEN13; inline;
  67653. begin
  67654. pTDefRegMap(@Self)^.clr := $00008000;
  67655. end;
  67656. procedure TCAN1_C1FLTCON3.setFLTEN13(thebits : TBits_1); inline;
  67657. begin
  67658. if thebits = 0 then
  67659. pTDefRegMap(@Self)^.clr := $00008000
  67660. else
  67661. pTDefRegMap(@Self)^.&set := $00008000;
  67662. end;
  67663. function TCAN1_C1FLTCON3.getFLTEN13 : TBits_1; inline;
  67664. begin
  67665. getFLTEN13 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  67666. end;
  67667. procedure TCAN1_C1FLTCON3.setFSEL14(thebits : TBits_5); inline;
  67668. begin
  67669. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  67670. end;
  67671. function TCAN1_C1FLTCON3.getFSEL14 : TBits_5; inline;
  67672. begin
  67673. getFSEL14 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  67674. end;
  67675. procedure TCAN1_C1FLTCON3.setMSEL14(thebits : TBits_2); inline;
  67676. begin
  67677. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  67678. end;
  67679. function TCAN1_C1FLTCON3.getMSEL14 : TBits_2; inline;
  67680. begin
  67681. getMSEL14 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  67682. end;
  67683. procedure TCAN1_C1FLTCON3.setFLTEN14; inline;
  67684. begin
  67685. pTDefRegMap(@Self)^.&set := $00800000;
  67686. end;
  67687. procedure TCAN1_C1FLTCON3.clearFLTEN14; inline;
  67688. begin
  67689. pTDefRegMap(@Self)^.clr := $00800000;
  67690. end;
  67691. procedure TCAN1_C1FLTCON3.setFLTEN14(thebits : TBits_1); inline;
  67692. begin
  67693. if thebits = 0 then
  67694. pTDefRegMap(@Self)^.clr := $00800000
  67695. else
  67696. pTDefRegMap(@Self)^.&set := $00800000;
  67697. end;
  67698. function TCAN1_C1FLTCON3.getFLTEN14 : TBits_1; inline;
  67699. begin
  67700. getFLTEN14 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  67701. end;
  67702. procedure TCAN1_C1FLTCON3.setFSEL15(thebits : TBits_5); inline;
  67703. begin
  67704. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  67705. end;
  67706. function TCAN1_C1FLTCON3.getFSEL15 : TBits_5; inline;
  67707. begin
  67708. getFSEL15 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  67709. end;
  67710. procedure TCAN1_C1FLTCON3.setMSEL15(thebits : TBits_2); inline;
  67711. begin
  67712. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  67713. end;
  67714. function TCAN1_C1FLTCON3.getMSEL15 : TBits_2; inline;
  67715. begin
  67716. getMSEL15 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  67717. end;
  67718. procedure TCAN1_C1FLTCON3.setFLTEN15; inline;
  67719. begin
  67720. pTDefRegMap(@Self)^.&set := $80000000;
  67721. end;
  67722. procedure TCAN1_C1FLTCON3.clearFLTEN15; inline;
  67723. begin
  67724. pTDefRegMap(@Self)^.clr := $80000000;
  67725. end;
  67726. procedure TCAN1_C1FLTCON3.setFLTEN15(thebits : TBits_1); inline;
  67727. begin
  67728. if thebits = 0 then
  67729. pTDefRegMap(@Self)^.clr := $80000000
  67730. else
  67731. pTDefRegMap(@Self)^.&set := $80000000;
  67732. end;
  67733. function TCAN1_C1FLTCON3.getFLTEN15 : TBits_1; inline;
  67734. begin
  67735. getFLTEN15 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  67736. end;
  67737. procedure TCAN1_C1FLTCON3.setw(thebits : TBits_32); inline;
  67738. begin
  67739. pTDefRegMap(@Self)^.val := thebits;
  67740. end;
  67741. function TCAN1_C1FLTCON3.getw : TBits_32; inline;
  67742. begin
  67743. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67744. end;
  67745. procedure TCAN1_C1FLTCON4.setFSEL16(thebits : TBits_5); inline;
  67746. begin
  67747. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  67748. end;
  67749. function TCAN1_C1FLTCON4.getFSEL16 : TBits_5; inline;
  67750. begin
  67751. getFSEL16 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  67752. end;
  67753. procedure TCAN1_C1FLTCON4.setMSEL16(thebits : TBits_2); inline;
  67754. begin
  67755. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  67756. end;
  67757. function TCAN1_C1FLTCON4.getMSEL16 : TBits_2; inline;
  67758. begin
  67759. getMSEL16 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  67760. end;
  67761. procedure TCAN1_C1FLTCON4.setFLTEN16; inline;
  67762. begin
  67763. pTDefRegMap(@Self)^.&set := $00000080;
  67764. end;
  67765. procedure TCAN1_C1FLTCON4.clearFLTEN16; inline;
  67766. begin
  67767. pTDefRegMap(@Self)^.clr := $00000080;
  67768. end;
  67769. procedure TCAN1_C1FLTCON4.setFLTEN16(thebits : TBits_1); inline;
  67770. begin
  67771. if thebits = 0 then
  67772. pTDefRegMap(@Self)^.clr := $00000080
  67773. else
  67774. pTDefRegMap(@Self)^.&set := $00000080;
  67775. end;
  67776. function TCAN1_C1FLTCON4.getFLTEN16 : TBits_1; inline;
  67777. begin
  67778. getFLTEN16 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67779. end;
  67780. procedure TCAN1_C1FLTCON4.setFSEL17(thebits : TBits_5); inline;
  67781. begin
  67782. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  67783. end;
  67784. function TCAN1_C1FLTCON4.getFSEL17 : TBits_5; inline;
  67785. begin
  67786. getFSEL17 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  67787. end;
  67788. procedure TCAN1_C1FLTCON4.setMSEL17(thebits : TBits_2); inline;
  67789. begin
  67790. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  67791. end;
  67792. function TCAN1_C1FLTCON4.getMSEL17 : TBits_2; inline;
  67793. begin
  67794. getMSEL17 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  67795. end;
  67796. procedure TCAN1_C1FLTCON4.setFLTEN17; inline;
  67797. begin
  67798. pTDefRegMap(@Self)^.&set := $00008000;
  67799. end;
  67800. procedure TCAN1_C1FLTCON4.clearFLTEN17; inline;
  67801. begin
  67802. pTDefRegMap(@Self)^.clr := $00008000;
  67803. end;
  67804. procedure TCAN1_C1FLTCON4.setFLTEN17(thebits : TBits_1); inline;
  67805. begin
  67806. if thebits = 0 then
  67807. pTDefRegMap(@Self)^.clr := $00008000
  67808. else
  67809. pTDefRegMap(@Self)^.&set := $00008000;
  67810. end;
  67811. function TCAN1_C1FLTCON4.getFLTEN17 : TBits_1; inline;
  67812. begin
  67813. getFLTEN17 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  67814. end;
  67815. procedure TCAN1_C1FLTCON4.setFSEL18(thebits : TBits_5); inline;
  67816. begin
  67817. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  67818. end;
  67819. function TCAN1_C1FLTCON4.getFSEL18 : TBits_5; inline;
  67820. begin
  67821. getFSEL18 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  67822. end;
  67823. procedure TCAN1_C1FLTCON4.setMSEL18(thebits : TBits_2); inline;
  67824. begin
  67825. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  67826. end;
  67827. function TCAN1_C1FLTCON4.getMSEL18 : TBits_2; inline;
  67828. begin
  67829. getMSEL18 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  67830. end;
  67831. procedure TCAN1_C1FLTCON4.setFLTEN18; inline;
  67832. begin
  67833. pTDefRegMap(@Self)^.&set := $00800000;
  67834. end;
  67835. procedure TCAN1_C1FLTCON4.clearFLTEN18; inline;
  67836. begin
  67837. pTDefRegMap(@Self)^.clr := $00800000;
  67838. end;
  67839. procedure TCAN1_C1FLTCON4.setFLTEN18(thebits : TBits_1); inline;
  67840. begin
  67841. if thebits = 0 then
  67842. pTDefRegMap(@Self)^.clr := $00800000
  67843. else
  67844. pTDefRegMap(@Self)^.&set := $00800000;
  67845. end;
  67846. function TCAN1_C1FLTCON4.getFLTEN18 : TBits_1; inline;
  67847. begin
  67848. getFLTEN18 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  67849. end;
  67850. procedure TCAN1_C1FLTCON4.setFSEL19(thebits : TBits_5); inline;
  67851. begin
  67852. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  67853. end;
  67854. function TCAN1_C1FLTCON4.getFSEL19 : TBits_5; inline;
  67855. begin
  67856. getFSEL19 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  67857. end;
  67858. procedure TCAN1_C1FLTCON4.setMSEL19(thebits : TBits_2); inline;
  67859. begin
  67860. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  67861. end;
  67862. function TCAN1_C1FLTCON4.getMSEL19 : TBits_2; inline;
  67863. begin
  67864. getMSEL19 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  67865. end;
  67866. procedure TCAN1_C1FLTCON4.setFLTEN19; inline;
  67867. begin
  67868. pTDefRegMap(@Self)^.&set := $80000000;
  67869. end;
  67870. procedure TCAN1_C1FLTCON4.clearFLTEN19; inline;
  67871. begin
  67872. pTDefRegMap(@Self)^.clr := $80000000;
  67873. end;
  67874. procedure TCAN1_C1FLTCON4.setFLTEN19(thebits : TBits_1); inline;
  67875. begin
  67876. if thebits = 0 then
  67877. pTDefRegMap(@Self)^.clr := $80000000
  67878. else
  67879. pTDefRegMap(@Self)^.&set := $80000000;
  67880. end;
  67881. function TCAN1_C1FLTCON4.getFLTEN19 : TBits_1; inline;
  67882. begin
  67883. getFLTEN19 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  67884. end;
  67885. procedure TCAN1_C1FLTCON4.setw(thebits : TBits_32); inline;
  67886. begin
  67887. pTDefRegMap(@Self)^.val := thebits;
  67888. end;
  67889. function TCAN1_C1FLTCON4.getw : TBits_32; inline;
  67890. begin
  67891. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67892. end;
  67893. procedure TCAN1_C1FLTCON5.setFSEL20(thebits : TBits_5); inline;
  67894. begin
  67895. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  67896. end;
  67897. function TCAN1_C1FLTCON5.getFSEL20 : TBits_5; inline;
  67898. begin
  67899. getFSEL20 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  67900. end;
  67901. procedure TCAN1_C1FLTCON5.setMSEL20(thebits : TBits_2); inline;
  67902. begin
  67903. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  67904. end;
  67905. function TCAN1_C1FLTCON5.getMSEL20 : TBits_2; inline;
  67906. begin
  67907. getMSEL20 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  67908. end;
  67909. procedure TCAN1_C1FLTCON5.setFLTEN20; inline;
  67910. begin
  67911. pTDefRegMap(@Self)^.&set := $00000080;
  67912. end;
  67913. procedure TCAN1_C1FLTCON5.clearFLTEN20; inline;
  67914. begin
  67915. pTDefRegMap(@Self)^.clr := $00000080;
  67916. end;
  67917. procedure TCAN1_C1FLTCON5.setFLTEN20(thebits : TBits_1); inline;
  67918. begin
  67919. if thebits = 0 then
  67920. pTDefRegMap(@Self)^.clr := $00000080
  67921. else
  67922. pTDefRegMap(@Self)^.&set := $00000080;
  67923. end;
  67924. function TCAN1_C1FLTCON5.getFLTEN20 : TBits_1; inline;
  67925. begin
  67926. getFLTEN20 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67927. end;
  67928. procedure TCAN1_C1FLTCON5.setFSEL21(thebits : TBits_5); inline;
  67929. begin
  67930. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  67931. end;
  67932. function TCAN1_C1FLTCON5.getFSEL21 : TBits_5; inline;
  67933. begin
  67934. getFSEL21 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  67935. end;
  67936. procedure TCAN1_C1FLTCON5.setMSEL21(thebits : TBits_2); inline;
  67937. begin
  67938. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  67939. end;
  67940. function TCAN1_C1FLTCON5.getMSEL21 : TBits_2; inline;
  67941. begin
  67942. getMSEL21 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  67943. end;
  67944. procedure TCAN1_C1FLTCON5.setFLTEN21; inline;
  67945. begin
  67946. pTDefRegMap(@Self)^.&set := $00008000;
  67947. end;
  67948. procedure TCAN1_C1FLTCON5.clearFLTEN21; inline;
  67949. begin
  67950. pTDefRegMap(@Self)^.clr := $00008000;
  67951. end;
  67952. procedure TCAN1_C1FLTCON5.setFLTEN21(thebits : TBits_1); inline;
  67953. begin
  67954. if thebits = 0 then
  67955. pTDefRegMap(@Self)^.clr := $00008000
  67956. else
  67957. pTDefRegMap(@Self)^.&set := $00008000;
  67958. end;
  67959. function TCAN1_C1FLTCON5.getFLTEN21 : TBits_1; inline;
  67960. begin
  67961. getFLTEN21 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  67962. end;
  67963. procedure TCAN1_C1FLTCON5.setFSEL22(thebits : TBits_5); inline;
  67964. begin
  67965. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  67966. end;
  67967. function TCAN1_C1FLTCON5.getFSEL22 : TBits_5; inline;
  67968. begin
  67969. getFSEL22 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  67970. end;
  67971. procedure TCAN1_C1FLTCON5.setMSEL22(thebits : TBits_2); inline;
  67972. begin
  67973. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  67974. end;
  67975. function TCAN1_C1FLTCON5.getMSEL22 : TBits_2; inline;
  67976. begin
  67977. getMSEL22 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  67978. end;
  67979. procedure TCAN1_C1FLTCON5.setFLTEN22; inline;
  67980. begin
  67981. pTDefRegMap(@Self)^.&set := $00800000;
  67982. end;
  67983. procedure TCAN1_C1FLTCON5.clearFLTEN22; inline;
  67984. begin
  67985. pTDefRegMap(@Self)^.clr := $00800000;
  67986. end;
  67987. procedure TCAN1_C1FLTCON5.setFLTEN22(thebits : TBits_1); inline;
  67988. begin
  67989. if thebits = 0 then
  67990. pTDefRegMap(@Self)^.clr := $00800000
  67991. else
  67992. pTDefRegMap(@Self)^.&set := $00800000;
  67993. end;
  67994. function TCAN1_C1FLTCON5.getFLTEN22 : TBits_1; inline;
  67995. begin
  67996. getFLTEN22 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  67997. end;
  67998. procedure TCAN1_C1FLTCON5.setFSEL23(thebits : TBits_5); inline;
  67999. begin
  68000. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  68001. end;
  68002. function TCAN1_C1FLTCON5.getFSEL23 : TBits_5; inline;
  68003. begin
  68004. getFSEL23 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  68005. end;
  68006. procedure TCAN1_C1FLTCON5.setMSEL23(thebits : TBits_2); inline;
  68007. begin
  68008. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  68009. end;
  68010. function TCAN1_C1FLTCON5.getMSEL23 : TBits_2; inline;
  68011. begin
  68012. getMSEL23 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  68013. end;
  68014. procedure TCAN1_C1FLTCON5.setFLTEN23; inline;
  68015. begin
  68016. pTDefRegMap(@Self)^.&set := $80000000;
  68017. end;
  68018. procedure TCAN1_C1FLTCON5.clearFLTEN23; inline;
  68019. begin
  68020. pTDefRegMap(@Self)^.clr := $80000000;
  68021. end;
  68022. procedure TCAN1_C1FLTCON5.setFLTEN23(thebits : TBits_1); inline;
  68023. begin
  68024. if thebits = 0 then
  68025. pTDefRegMap(@Self)^.clr := $80000000
  68026. else
  68027. pTDefRegMap(@Self)^.&set := $80000000;
  68028. end;
  68029. function TCAN1_C1FLTCON5.getFLTEN23 : TBits_1; inline;
  68030. begin
  68031. getFLTEN23 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  68032. end;
  68033. procedure TCAN1_C1FLTCON5.setw(thebits : TBits_32); inline;
  68034. begin
  68035. pTDefRegMap(@Self)^.val := thebits;
  68036. end;
  68037. function TCAN1_C1FLTCON5.getw : TBits_32; inline;
  68038. begin
  68039. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68040. end;
  68041. procedure TCAN1_C1FLTCON6.setFSEL24(thebits : TBits_5); inline;
  68042. begin
  68043. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  68044. end;
  68045. function TCAN1_C1FLTCON6.getFSEL24 : TBits_5; inline;
  68046. begin
  68047. getFSEL24 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  68048. end;
  68049. procedure TCAN1_C1FLTCON6.setMSEL24(thebits : TBits_2); inline;
  68050. begin
  68051. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  68052. end;
  68053. function TCAN1_C1FLTCON6.getMSEL24 : TBits_2; inline;
  68054. begin
  68055. getMSEL24 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  68056. end;
  68057. procedure TCAN1_C1FLTCON6.setFLTEN24; inline;
  68058. begin
  68059. pTDefRegMap(@Self)^.&set := $00000080;
  68060. end;
  68061. procedure TCAN1_C1FLTCON6.clearFLTEN24; inline;
  68062. begin
  68063. pTDefRegMap(@Self)^.clr := $00000080;
  68064. end;
  68065. procedure TCAN1_C1FLTCON6.setFLTEN24(thebits : TBits_1); inline;
  68066. begin
  68067. if thebits = 0 then
  68068. pTDefRegMap(@Self)^.clr := $00000080
  68069. else
  68070. pTDefRegMap(@Self)^.&set := $00000080;
  68071. end;
  68072. function TCAN1_C1FLTCON6.getFLTEN24 : TBits_1; inline;
  68073. begin
  68074. getFLTEN24 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  68075. end;
  68076. procedure TCAN1_C1FLTCON6.setFSEL25(thebits : TBits_5); inline;
  68077. begin
  68078. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  68079. end;
  68080. function TCAN1_C1FLTCON6.getFSEL25 : TBits_5; inline;
  68081. begin
  68082. getFSEL25 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  68083. end;
  68084. procedure TCAN1_C1FLTCON6.setMSEL25(thebits : TBits_2); inline;
  68085. begin
  68086. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  68087. end;
  68088. function TCAN1_C1FLTCON6.getMSEL25 : TBits_2; inline;
  68089. begin
  68090. getMSEL25 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  68091. end;
  68092. procedure TCAN1_C1FLTCON6.setFLTEN25; inline;
  68093. begin
  68094. pTDefRegMap(@Self)^.&set := $00008000;
  68095. end;
  68096. procedure TCAN1_C1FLTCON6.clearFLTEN25; inline;
  68097. begin
  68098. pTDefRegMap(@Self)^.clr := $00008000;
  68099. end;
  68100. procedure TCAN1_C1FLTCON6.setFLTEN25(thebits : TBits_1); inline;
  68101. begin
  68102. if thebits = 0 then
  68103. pTDefRegMap(@Self)^.clr := $00008000
  68104. else
  68105. pTDefRegMap(@Self)^.&set := $00008000;
  68106. end;
  68107. function TCAN1_C1FLTCON6.getFLTEN25 : TBits_1; inline;
  68108. begin
  68109. getFLTEN25 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  68110. end;
  68111. procedure TCAN1_C1FLTCON6.setFSEL26(thebits : TBits_5); inline;
  68112. begin
  68113. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  68114. end;
  68115. function TCAN1_C1FLTCON6.getFSEL26 : TBits_5; inline;
  68116. begin
  68117. getFSEL26 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  68118. end;
  68119. procedure TCAN1_C1FLTCON6.setMSEL26(thebits : TBits_2); inline;
  68120. begin
  68121. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  68122. end;
  68123. function TCAN1_C1FLTCON6.getMSEL26 : TBits_2; inline;
  68124. begin
  68125. getMSEL26 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  68126. end;
  68127. procedure TCAN1_C1FLTCON6.setFLTEN26; inline;
  68128. begin
  68129. pTDefRegMap(@Self)^.&set := $00800000;
  68130. end;
  68131. procedure TCAN1_C1FLTCON6.clearFLTEN26; inline;
  68132. begin
  68133. pTDefRegMap(@Self)^.clr := $00800000;
  68134. end;
  68135. procedure TCAN1_C1FLTCON6.setFLTEN26(thebits : TBits_1); inline;
  68136. begin
  68137. if thebits = 0 then
  68138. pTDefRegMap(@Self)^.clr := $00800000
  68139. else
  68140. pTDefRegMap(@Self)^.&set := $00800000;
  68141. end;
  68142. function TCAN1_C1FLTCON6.getFLTEN26 : TBits_1; inline;
  68143. begin
  68144. getFLTEN26 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  68145. end;
  68146. procedure TCAN1_C1FLTCON6.setFSEL27(thebits : TBits_5); inline;
  68147. begin
  68148. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  68149. end;
  68150. function TCAN1_C1FLTCON6.getFSEL27 : TBits_5; inline;
  68151. begin
  68152. getFSEL27 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  68153. end;
  68154. procedure TCAN1_C1FLTCON6.setMSEL27(thebits : TBits_2); inline;
  68155. begin
  68156. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  68157. end;
  68158. function TCAN1_C1FLTCON6.getMSEL27 : TBits_2; inline;
  68159. begin
  68160. getMSEL27 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  68161. end;
  68162. procedure TCAN1_C1FLTCON6.setFLTEN27; inline;
  68163. begin
  68164. pTDefRegMap(@Self)^.&set := $80000000;
  68165. end;
  68166. procedure TCAN1_C1FLTCON6.clearFLTEN27; inline;
  68167. begin
  68168. pTDefRegMap(@Self)^.clr := $80000000;
  68169. end;
  68170. procedure TCAN1_C1FLTCON6.setFLTEN27(thebits : TBits_1); inline;
  68171. begin
  68172. if thebits = 0 then
  68173. pTDefRegMap(@Self)^.clr := $80000000
  68174. else
  68175. pTDefRegMap(@Self)^.&set := $80000000;
  68176. end;
  68177. function TCAN1_C1FLTCON6.getFLTEN27 : TBits_1; inline;
  68178. begin
  68179. getFLTEN27 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  68180. end;
  68181. procedure TCAN1_C1FLTCON6.setw(thebits : TBits_32); inline;
  68182. begin
  68183. pTDefRegMap(@Self)^.val := thebits;
  68184. end;
  68185. function TCAN1_C1FLTCON6.getw : TBits_32; inline;
  68186. begin
  68187. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68188. end;
  68189. procedure TCAN1_C1FLTCON7.setFSEL28(thebits : TBits_5); inline;
  68190. begin
  68191. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  68192. end;
  68193. function TCAN1_C1FLTCON7.getFSEL28 : TBits_5; inline;
  68194. begin
  68195. getFSEL28 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  68196. end;
  68197. procedure TCAN1_C1FLTCON7.setMSEL28(thebits : TBits_2); inline;
  68198. begin
  68199. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  68200. end;
  68201. function TCAN1_C1FLTCON7.getMSEL28 : TBits_2; inline;
  68202. begin
  68203. getMSEL28 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  68204. end;
  68205. procedure TCAN1_C1FLTCON7.setFLTEN28; inline;
  68206. begin
  68207. pTDefRegMap(@Self)^.&set := $00000080;
  68208. end;
  68209. procedure TCAN1_C1FLTCON7.clearFLTEN28; inline;
  68210. begin
  68211. pTDefRegMap(@Self)^.clr := $00000080;
  68212. end;
  68213. procedure TCAN1_C1FLTCON7.setFLTEN28(thebits : TBits_1); inline;
  68214. begin
  68215. if thebits = 0 then
  68216. pTDefRegMap(@Self)^.clr := $00000080
  68217. else
  68218. pTDefRegMap(@Self)^.&set := $00000080;
  68219. end;
  68220. function TCAN1_C1FLTCON7.getFLTEN28 : TBits_1; inline;
  68221. begin
  68222. getFLTEN28 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  68223. end;
  68224. procedure TCAN1_C1FLTCON7.setFSEL29(thebits : TBits_5); inline;
  68225. begin
  68226. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  68227. end;
  68228. function TCAN1_C1FLTCON7.getFSEL29 : TBits_5; inline;
  68229. begin
  68230. getFSEL29 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  68231. end;
  68232. procedure TCAN1_C1FLTCON7.setMSEL29(thebits : TBits_2); inline;
  68233. begin
  68234. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  68235. end;
  68236. function TCAN1_C1FLTCON7.getMSEL29 : TBits_2; inline;
  68237. begin
  68238. getMSEL29 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  68239. end;
  68240. procedure TCAN1_C1FLTCON7.setFLTEN29; inline;
  68241. begin
  68242. pTDefRegMap(@Self)^.&set := $00008000;
  68243. end;
  68244. procedure TCAN1_C1FLTCON7.clearFLTEN29; inline;
  68245. begin
  68246. pTDefRegMap(@Self)^.clr := $00008000;
  68247. end;
  68248. procedure TCAN1_C1FLTCON7.setFLTEN29(thebits : TBits_1); inline;
  68249. begin
  68250. if thebits = 0 then
  68251. pTDefRegMap(@Self)^.clr := $00008000
  68252. else
  68253. pTDefRegMap(@Self)^.&set := $00008000;
  68254. end;
  68255. function TCAN1_C1FLTCON7.getFLTEN29 : TBits_1; inline;
  68256. begin
  68257. getFLTEN29 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  68258. end;
  68259. procedure TCAN1_C1FLTCON7.setFSEL30(thebits : TBits_5); inline;
  68260. begin
  68261. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  68262. end;
  68263. function TCAN1_C1FLTCON7.getFSEL30 : TBits_5; inline;
  68264. begin
  68265. getFSEL30 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  68266. end;
  68267. procedure TCAN1_C1FLTCON7.setMSEL30(thebits : TBits_2); inline;
  68268. begin
  68269. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  68270. end;
  68271. function TCAN1_C1FLTCON7.getMSEL30 : TBits_2; inline;
  68272. begin
  68273. getMSEL30 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  68274. end;
  68275. procedure TCAN1_C1FLTCON7.setFLTEN30; inline;
  68276. begin
  68277. pTDefRegMap(@Self)^.&set := $00800000;
  68278. end;
  68279. procedure TCAN1_C1FLTCON7.clearFLTEN30; inline;
  68280. begin
  68281. pTDefRegMap(@Self)^.clr := $00800000;
  68282. end;
  68283. procedure TCAN1_C1FLTCON7.setFLTEN30(thebits : TBits_1); inline;
  68284. begin
  68285. if thebits = 0 then
  68286. pTDefRegMap(@Self)^.clr := $00800000
  68287. else
  68288. pTDefRegMap(@Self)^.&set := $00800000;
  68289. end;
  68290. function TCAN1_C1FLTCON7.getFLTEN30 : TBits_1; inline;
  68291. begin
  68292. getFLTEN30 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  68293. end;
  68294. procedure TCAN1_C1FLTCON7.setFSEL31(thebits : TBits_5); inline;
  68295. begin
  68296. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  68297. end;
  68298. function TCAN1_C1FLTCON7.getFSEL31 : TBits_5; inline;
  68299. begin
  68300. getFSEL31 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  68301. end;
  68302. procedure TCAN1_C1FLTCON7.setMSEL31(thebits : TBits_2); inline;
  68303. begin
  68304. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  68305. end;
  68306. function TCAN1_C1FLTCON7.getMSEL31 : TBits_2; inline;
  68307. begin
  68308. getMSEL31 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  68309. end;
  68310. procedure TCAN1_C1FLTCON7.setFLTEN31; inline;
  68311. begin
  68312. pTDefRegMap(@Self)^.&set := $80000000;
  68313. end;
  68314. procedure TCAN1_C1FLTCON7.clearFLTEN31; inline;
  68315. begin
  68316. pTDefRegMap(@Self)^.clr := $80000000;
  68317. end;
  68318. procedure TCAN1_C1FLTCON7.setFLTEN31(thebits : TBits_1); inline;
  68319. begin
  68320. if thebits = 0 then
  68321. pTDefRegMap(@Self)^.clr := $80000000
  68322. else
  68323. pTDefRegMap(@Self)^.&set := $80000000;
  68324. end;
  68325. function TCAN1_C1FLTCON7.getFLTEN31 : TBits_1; inline;
  68326. begin
  68327. getFLTEN31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  68328. end;
  68329. procedure TCAN1_C1FLTCON7.setw(thebits : TBits_32); inline;
  68330. begin
  68331. pTDefRegMap(@Self)^.val := thebits;
  68332. end;
  68333. function TCAN1_C1FLTCON7.getw : TBits_32; inline;
  68334. begin
  68335. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68336. end;
  68337. procedure TCAN1_C1RXF0.setEID(thebits : TBits_18); inline;
  68338. begin
  68339. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68340. end;
  68341. function TCAN1_C1RXF0.getEID : TBits_18; inline;
  68342. begin
  68343. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68344. end;
  68345. procedure TCAN1_C1RXF0.setEXID; inline;
  68346. begin
  68347. pTDefRegMap(@Self)^.&set := $00080000;
  68348. end;
  68349. procedure TCAN1_C1RXF0.clearEXID; inline;
  68350. begin
  68351. pTDefRegMap(@Self)^.clr := $00080000;
  68352. end;
  68353. procedure TCAN1_C1RXF0.setEXID(thebits : TBits_1); inline;
  68354. begin
  68355. if thebits = 0 then
  68356. pTDefRegMap(@Self)^.clr := $00080000
  68357. else
  68358. pTDefRegMap(@Self)^.&set := $00080000;
  68359. end;
  68360. function TCAN1_C1RXF0.getEXID : TBits_1; inline;
  68361. begin
  68362. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68363. end;
  68364. procedure TCAN1_C1RXF0.setSID(thebits : TBits_11); inline;
  68365. begin
  68366. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68367. end;
  68368. function TCAN1_C1RXF0.getSID : TBits_11; inline;
  68369. begin
  68370. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68371. end;
  68372. procedure TCAN1_C1RXF0.setw(thebits : TBits_32); inline;
  68373. begin
  68374. pTDefRegMap(@Self)^.val := thebits;
  68375. end;
  68376. function TCAN1_C1RXF0.getw : TBits_32; inline;
  68377. begin
  68378. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68379. end;
  68380. procedure TCAN1_C1RXF1.setEID(thebits : TBits_18); inline;
  68381. begin
  68382. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68383. end;
  68384. function TCAN1_C1RXF1.getEID : TBits_18; inline;
  68385. begin
  68386. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68387. end;
  68388. procedure TCAN1_C1RXF1.setEXID; inline;
  68389. begin
  68390. pTDefRegMap(@Self)^.&set := $00080000;
  68391. end;
  68392. procedure TCAN1_C1RXF1.clearEXID; inline;
  68393. begin
  68394. pTDefRegMap(@Self)^.clr := $00080000;
  68395. end;
  68396. procedure TCAN1_C1RXF1.setEXID(thebits : TBits_1); inline;
  68397. begin
  68398. if thebits = 0 then
  68399. pTDefRegMap(@Self)^.clr := $00080000
  68400. else
  68401. pTDefRegMap(@Self)^.&set := $00080000;
  68402. end;
  68403. function TCAN1_C1RXF1.getEXID : TBits_1; inline;
  68404. begin
  68405. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68406. end;
  68407. procedure TCAN1_C1RXF1.setSID(thebits : TBits_11); inline;
  68408. begin
  68409. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68410. end;
  68411. function TCAN1_C1RXF1.getSID : TBits_11; inline;
  68412. begin
  68413. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68414. end;
  68415. procedure TCAN1_C1RXF1.setw(thebits : TBits_32); inline;
  68416. begin
  68417. pTDefRegMap(@Self)^.val := thebits;
  68418. end;
  68419. function TCAN1_C1RXF1.getw : TBits_32; inline;
  68420. begin
  68421. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68422. end;
  68423. procedure TCAN1_C1RXF2.setEID(thebits : TBits_18); inline;
  68424. begin
  68425. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68426. end;
  68427. function TCAN1_C1RXF2.getEID : TBits_18; inline;
  68428. begin
  68429. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68430. end;
  68431. procedure TCAN1_C1RXF2.setEXID; inline;
  68432. begin
  68433. pTDefRegMap(@Self)^.&set := $00080000;
  68434. end;
  68435. procedure TCAN1_C1RXF2.clearEXID; inline;
  68436. begin
  68437. pTDefRegMap(@Self)^.clr := $00080000;
  68438. end;
  68439. procedure TCAN1_C1RXF2.setEXID(thebits : TBits_1); inline;
  68440. begin
  68441. if thebits = 0 then
  68442. pTDefRegMap(@Self)^.clr := $00080000
  68443. else
  68444. pTDefRegMap(@Self)^.&set := $00080000;
  68445. end;
  68446. function TCAN1_C1RXF2.getEXID : TBits_1; inline;
  68447. begin
  68448. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68449. end;
  68450. procedure TCAN1_C1RXF2.setSID(thebits : TBits_11); inline;
  68451. begin
  68452. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68453. end;
  68454. function TCAN1_C1RXF2.getSID : TBits_11; inline;
  68455. begin
  68456. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68457. end;
  68458. procedure TCAN1_C1RXF2.setw(thebits : TBits_32); inline;
  68459. begin
  68460. pTDefRegMap(@Self)^.val := thebits;
  68461. end;
  68462. function TCAN1_C1RXF2.getw : TBits_32; inline;
  68463. begin
  68464. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68465. end;
  68466. procedure TCAN1_C1RXF3.setEID(thebits : TBits_18); inline;
  68467. begin
  68468. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68469. end;
  68470. function TCAN1_C1RXF3.getEID : TBits_18; inline;
  68471. begin
  68472. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68473. end;
  68474. procedure TCAN1_C1RXF3.setEXID; inline;
  68475. begin
  68476. pTDefRegMap(@Self)^.&set := $00080000;
  68477. end;
  68478. procedure TCAN1_C1RXF3.clearEXID; inline;
  68479. begin
  68480. pTDefRegMap(@Self)^.clr := $00080000;
  68481. end;
  68482. procedure TCAN1_C1RXF3.setEXID(thebits : TBits_1); inline;
  68483. begin
  68484. if thebits = 0 then
  68485. pTDefRegMap(@Self)^.clr := $00080000
  68486. else
  68487. pTDefRegMap(@Self)^.&set := $00080000;
  68488. end;
  68489. function TCAN1_C1RXF3.getEXID : TBits_1; inline;
  68490. begin
  68491. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68492. end;
  68493. procedure TCAN1_C1RXF3.setSID(thebits : TBits_11); inline;
  68494. begin
  68495. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68496. end;
  68497. function TCAN1_C1RXF3.getSID : TBits_11; inline;
  68498. begin
  68499. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68500. end;
  68501. procedure TCAN1_C1RXF3.setw(thebits : TBits_32); inline;
  68502. begin
  68503. pTDefRegMap(@Self)^.val := thebits;
  68504. end;
  68505. function TCAN1_C1RXF3.getw : TBits_32; inline;
  68506. begin
  68507. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68508. end;
  68509. procedure TCAN1_C1RXF4.setEID(thebits : TBits_18); inline;
  68510. begin
  68511. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68512. end;
  68513. function TCAN1_C1RXF4.getEID : TBits_18; inline;
  68514. begin
  68515. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68516. end;
  68517. procedure TCAN1_C1RXF4.setEXID; inline;
  68518. begin
  68519. pTDefRegMap(@Self)^.&set := $00080000;
  68520. end;
  68521. procedure TCAN1_C1RXF4.clearEXID; inline;
  68522. begin
  68523. pTDefRegMap(@Self)^.clr := $00080000;
  68524. end;
  68525. procedure TCAN1_C1RXF4.setEXID(thebits : TBits_1); inline;
  68526. begin
  68527. if thebits = 0 then
  68528. pTDefRegMap(@Self)^.clr := $00080000
  68529. else
  68530. pTDefRegMap(@Self)^.&set := $00080000;
  68531. end;
  68532. function TCAN1_C1RXF4.getEXID : TBits_1; inline;
  68533. begin
  68534. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68535. end;
  68536. procedure TCAN1_C1RXF4.setSID(thebits : TBits_11); inline;
  68537. begin
  68538. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68539. end;
  68540. function TCAN1_C1RXF4.getSID : TBits_11; inline;
  68541. begin
  68542. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68543. end;
  68544. procedure TCAN1_C1RXF4.setw(thebits : TBits_32); inline;
  68545. begin
  68546. pTDefRegMap(@Self)^.val := thebits;
  68547. end;
  68548. function TCAN1_C1RXF4.getw : TBits_32; inline;
  68549. begin
  68550. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68551. end;
  68552. procedure TCAN1_C1RXF5.setEID(thebits : TBits_18); inline;
  68553. begin
  68554. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68555. end;
  68556. function TCAN1_C1RXF5.getEID : TBits_18; inline;
  68557. begin
  68558. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68559. end;
  68560. procedure TCAN1_C1RXF5.setEXID; inline;
  68561. begin
  68562. pTDefRegMap(@Self)^.&set := $00080000;
  68563. end;
  68564. procedure TCAN1_C1RXF5.clearEXID; inline;
  68565. begin
  68566. pTDefRegMap(@Self)^.clr := $00080000;
  68567. end;
  68568. procedure TCAN1_C1RXF5.setEXID(thebits : TBits_1); inline;
  68569. begin
  68570. if thebits = 0 then
  68571. pTDefRegMap(@Self)^.clr := $00080000
  68572. else
  68573. pTDefRegMap(@Self)^.&set := $00080000;
  68574. end;
  68575. function TCAN1_C1RXF5.getEXID : TBits_1; inline;
  68576. begin
  68577. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68578. end;
  68579. procedure TCAN1_C1RXF5.setSID(thebits : TBits_11); inline;
  68580. begin
  68581. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68582. end;
  68583. function TCAN1_C1RXF5.getSID : TBits_11; inline;
  68584. begin
  68585. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68586. end;
  68587. procedure TCAN1_C1RXF5.setw(thebits : TBits_32); inline;
  68588. begin
  68589. pTDefRegMap(@Self)^.val := thebits;
  68590. end;
  68591. function TCAN1_C1RXF5.getw : TBits_32; inline;
  68592. begin
  68593. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68594. end;
  68595. procedure TCAN1_C1RXF6.setEID(thebits : TBits_18); inline;
  68596. begin
  68597. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68598. end;
  68599. function TCAN1_C1RXF6.getEID : TBits_18; inline;
  68600. begin
  68601. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68602. end;
  68603. procedure TCAN1_C1RXF6.setEXID; inline;
  68604. begin
  68605. pTDefRegMap(@Self)^.&set := $00080000;
  68606. end;
  68607. procedure TCAN1_C1RXF6.clearEXID; inline;
  68608. begin
  68609. pTDefRegMap(@Self)^.clr := $00080000;
  68610. end;
  68611. procedure TCAN1_C1RXF6.setEXID(thebits : TBits_1); inline;
  68612. begin
  68613. if thebits = 0 then
  68614. pTDefRegMap(@Self)^.clr := $00080000
  68615. else
  68616. pTDefRegMap(@Self)^.&set := $00080000;
  68617. end;
  68618. function TCAN1_C1RXF6.getEXID : TBits_1; inline;
  68619. begin
  68620. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68621. end;
  68622. procedure TCAN1_C1RXF6.setSID(thebits : TBits_11); inline;
  68623. begin
  68624. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68625. end;
  68626. function TCAN1_C1RXF6.getSID : TBits_11; inline;
  68627. begin
  68628. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68629. end;
  68630. procedure TCAN1_C1RXF6.setw(thebits : TBits_32); inline;
  68631. begin
  68632. pTDefRegMap(@Self)^.val := thebits;
  68633. end;
  68634. function TCAN1_C1RXF6.getw : TBits_32; inline;
  68635. begin
  68636. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68637. end;
  68638. procedure TCAN1_C1RXF7.setEID(thebits : TBits_18); inline;
  68639. begin
  68640. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68641. end;
  68642. function TCAN1_C1RXF7.getEID : TBits_18; inline;
  68643. begin
  68644. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68645. end;
  68646. procedure TCAN1_C1RXF7.setEXID; inline;
  68647. begin
  68648. pTDefRegMap(@Self)^.&set := $00080000;
  68649. end;
  68650. procedure TCAN1_C1RXF7.clearEXID; inline;
  68651. begin
  68652. pTDefRegMap(@Self)^.clr := $00080000;
  68653. end;
  68654. procedure TCAN1_C1RXF7.setEXID(thebits : TBits_1); inline;
  68655. begin
  68656. if thebits = 0 then
  68657. pTDefRegMap(@Self)^.clr := $00080000
  68658. else
  68659. pTDefRegMap(@Self)^.&set := $00080000;
  68660. end;
  68661. function TCAN1_C1RXF7.getEXID : TBits_1; inline;
  68662. begin
  68663. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68664. end;
  68665. procedure TCAN1_C1RXF7.setSID(thebits : TBits_11); inline;
  68666. begin
  68667. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68668. end;
  68669. function TCAN1_C1RXF7.getSID : TBits_11; inline;
  68670. begin
  68671. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68672. end;
  68673. procedure TCAN1_C1RXF7.setw(thebits : TBits_32); inline;
  68674. begin
  68675. pTDefRegMap(@Self)^.val := thebits;
  68676. end;
  68677. function TCAN1_C1RXF7.getw : TBits_32; inline;
  68678. begin
  68679. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68680. end;
  68681. procedure TCAN1_C1RXF8.setEID(thebits : TBits_18); inline;
  68682. begin
  68683. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68684. end;
  68685. function TCAN1_C1RXF8.getEID : TBits_18; inline;
  68686. begin
  68687. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68688. end;
  68689. procedure TCAN1_C1RXF8.setEXID; inline;
  68690. begin
  68691. pTDefRegMap(@Self)^.&set := $00080000;
  68692. end;
  68693. procedure TCAN1_C1RXF8.clearEXID; inline;
  68694. begin
  68695. pTDefRegMap(@Self)^.clr := $00080000;
  68696. end;
  68697. procedure TCAN1_C1RXF8.setEXID(thebits : TBits_1); inline;
  68698. begin
  68699. if thebits = 0 then
  68700. pTDefRegMap(@Self)^.clr := $00080000
  68701. else
  68702. pTDefRegMap(@Self)^.&set := $00080000;
  68703. end;
  68704. function TCAN1_C1RXF8.getEXID : TBits_1; inline;
  68705. begin
  68706. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68707. end;
  68708. procedure TCAN1_C1RXF8.setSID(thebits : TBits_11); inline;
  68709. begin
  68710. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68711. end;
  68712. function TCAN1_C1RXF8.getSID : TBits_11; inline;
  68713. begin
  68714. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68715. end;
  68716. procedure TCAN1_C1RXF8.setw(thebits : TBits_32); inline;
  68717. begin
  68718. pTDefRegMap(@Self)^.val := thebits;
  68719. end;
  68720. function TCAN1_C1RXF8.getw : TBits_32; inline;
  68721. begin
  68722. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68723. end;
  68724. procedure TCAN1_C1RXF9.setEID(thebits : TBits_18); inline;
  68725. begin
  68726. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68727. end;
  68728. function TCAN1_C1RXF9.getEID : TBits_18; inline;
  68729. begin
  68730. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68731. end;
  68732. procedure TCAN1_C1RXF9.setEXID; inline;
  68733. begin
  68734. pTDefRegMap(@Self)^.&set := $00080000;
  68735. end;
  68736. procedure TCAN1_C1RXF9.clearEXID; inline;
  68737. begin
  68738. pTDefRegMap(@Self)^.clr := $00080000;
  68739. end;
  68740. procedure TCAN1_C1RXF9.setEXID(thebits : TBits_1); inline;
  68741. begin
  68742. if thebits = 0 then
  68743. pTDefRegMap(@Self)^.clr := $00080000
  68744. else
  68745. pTDefRegMap(@Self)^.&set := $00080000;
  68746. end;
  68747. function TCAN1_C1RXF9.getEXID : TBits_1; inline;
  68748. begin
  68749. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68750. end;
  68751. procedure TCAN1_C1RXF9.setSID(thebits : TBits_11); inline;
  68752. begin
  68753. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68754. end;
  68755. function TCAN1_C1RXF9.getSID : TBits_11; inline;
  68756. begin
  68757. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68758. end;
  68759. procedure TCAN1_C1RXF9.setw(thebits : TBits_32); inline;
  68760. begin
  68761. pTDefRegMap(@Self)^.val := thebits;
  68762. end;
  68763. function TCAN1_C1RXF9.getw : TBits_32; inline;
  68764. begin
  68765. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68766. end;
  68767. procedure TCAN1_C1RXF10.setEID(thebits : TBits_18); inline;
  68768. begin
  68769. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68770. end;
  68771. function TCAN1_C1RXF10.getEID : TBits_18; inline;
  68772. begin
  68773. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68774. end;
  68775. procedure TCAN1_C1RXF10.setEXID; inline;
  68776. begin
  68777. pTDefRegMap(@Self)^.&set := $00080000;
  68778. end;
  68779. procedure TCAN1_C1RXF10.clearEXID; inline;
  68780. begin
  68781. pTDefRegMap(@Self)^.clr := $00080000;
  68782. end;
  68783. procedure TCAN1_C1RXF10.setEXID(thebits : TBits_1); inline;
  68784. begin
  68785. if thebits = 0 then
  68786. pTDefRegMap(@Self)^.clr := $00080000
  68787. else
  68788. pTDefRegMap(@Self)^.&set := $00080000;
  68789. end;
  68790. function TCAN1_C1RXF10.getEXID : TBits_1; inline;
  68791. begin
  68792. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68793. end;
  68794. procedure TCAN1_C1RXF10.setSID(thebits : TBits_11); inline;
  68795. begin
  68796. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68797. end;
  68798. function TCAN1_C1RXF10.getSID : TBits_11; inline;
  68799. begin
  68800. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68801. end;
  68802. procedure TCAN1_C1RXF10.setw(thebits : TBits_32); inline;
  68803. begin
  68804. pTDefRegMap(@Self)^.val := thebits;
  68805. end;
  68806. function TCAN1_C1RXF10.getw : TBits_32; inline;
  68807. begin
  68808. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68809. end;
  68810. procedure TCAN1_C1RXF11.setEID(thebits : TBits_18); inline;
  68811. begin
  68812. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68813. end;
  68814. function TCAN1_C1RXF11.getEID : TBits_18; inline;
  68815. begin
  68816. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68817. end;
  68818. procedure TCAN1_C1RXF11.setEXID; inline;
  68819. begin
  68820. pTDefRegMap(@Self)^.&set := $00080000;
  68821. end;
  68822. procedure TCAN1_C1RXF11.clearEXID; inline;
  68823. begin
  68824. pTDefRegMap(@Self)^.clr := $00080000;
  68825. end;
  68826. procedure TCAN1_C1RXF11.setEXID(thebits : TBits_1); inline;
  68827. begin
  68828. if thebits = 0 then
  68829. pTDefRegMap(@Self)^.clr := $00080000
  68830. else
  68831. pTDefRegMap(@Self)^.&set := $00080000;
  68832. end;
  68833. function TCAN1_C1RXF11.getEXID : TBits_1; inline;
  68834. begin
  68835. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68836. end;
  68837. procedure TCAN1_C1RXF11.setSID(thebits : TBits_11); inline;
  68838. begin
  68839. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68840. end;
  68841. function TCAN1_C1RXF11.getSID : TBits_11; inline;
  68842. begin
  68843. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68844. end;
  68845. procedure TCAN1_C1RXF11.setw(thebits : TBits_32); inline;
  68846. begin
  68847. pTDefRegMap(@Self)^.val := thebits;
  68848. end;
  68849. function TCAN1_C1RXF11.getw : TBits_32; inline;
  68850. begin
  68851. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68852. end;
  68853. procedure TCAN1_C1RXF12.setEID(thebits : TBits_18); inline;
  68854. begin
  68855. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68856. end;
  68857. function TCAN1_C1RXF12.getEID : TBits_18; inline;
  68858. begin
  68859. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68860. end;
  68861. procedure TCAN1_C1RXF12.setEXID; inline;
  68862. begin
  68863. pTDefRegMap(@Self)^.&set := $00080000;
  68864. end;
  68865. procedure TCAN1_C1RXF12.clearEXID; inline;
  68866. begin
  68867. pTDefRegMap(@Self)^.clr := $00080000;
  68868. end;
  68869. procedure TCAN1_C1RXF12.setEXID(thebits : TBits_1); inline;
  68870. begin
  68871. if thebits = 0 then
  68872. pTDefRegMap(@Self)^.clr := $00080000
  68873. else
  68874. pTDefRegMap(@Self)^.&set := $00080000;
  68875. end;
  68876. function TCAN1_C1RXF12.getEXID : TBits_1; inline;
  68877. begin
  68878. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68879. end;
  68880. procedure TCAN1_C1RXF12.setSID(thebits : TBits_11); inline;
  68881. begin
  68882. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68883. end;
  68884. function TCAN1_C1RXF12.getSID : TBits_11; inline;
  68885. begin
  68886. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68887. end;
  68888. procedure TCAN1_C1RXF12.setw(thebits : TBits_32); inline;
  68889. begin
  68890. pTDefRegMap(@Self)^.val := thebits;
  68891. end;
  68892. function TCAN1_C1RXF12.getw : TBits_32; inline;
  68893. begin
  68894. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68895. end;
  68896. procedure TCAN1_C1RXF13.setEID(thebits : TBits_18); inline;
  68897. begin
  68898. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68899. end;
  68900. function TCAN1_C1RXF13.getEID : TBits_18; inline;
  68901. begin
  68902. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68903. end;
  68904. procedure TCAN1_C1RXF13.setEXID; inline;
  68905. begin
  68906. pTDefRegMap(@Self)^.&set := $00080000;
  68907. end;
  68908. procedure TCAN1_C1RXF13.clearEXID; inline;
  68909. begin
  68910. pTDefRegMap(@Self)^.clr := $00080000;
  68911. end;
  68912. procedure TCAN1_C1RXF13.setEXID(thebits : TBits_1); inline;
  68913. begin
  68914. if thebits = 0 then
  68915. pTDefRegMap(@Self)^.clr := $00080000
  68916. else
  68917. pTDefRegMap(@Self)^.&set := $00080000;
  68918. end;
  68919. function TCAN1_C1RXF13.getEXID : TBits_1; inline;
  68920. begin
  68921. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68922. end;
  68923. procedure TCAN1_C1RXF13.setSID(thebits : TBits_11); inline;
  68924. begin
  68925. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68926. end;
  68927. function TCAN1_C1RXF13.getSID : TBits_11; inline;
  68928. begin
  68929. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68930. end;
  68931. procedure TCAN1_C1RXF13.setw(thebits : TBits_32); inline;
  68932. begin
  68933. pTDefRegMap(@Self)^.val := thebits;
  68934. end;
  68935. function TCAN1_C1RXF13.getw : TBits_32; inline;
  68936. begin
  68937. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68938. end;
  68939. procedure TCAN1_C1RXF14.setEID(thebits : TBits_18); inline;
  68940. begin
  68941. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68942. end;
  68943. function TCAN1_C1RXF14.getEID : TBits_18; inline;
  68944. begin
  68945. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68946. end;
  68947. procedure TCAN1_C1RXF14.setEXID; inline;
  68948. begin
  68949. pTDefRegMap(@Self)^.&set := $00080000;
  68950. end;
  68951. procedure TCAN1_C1RXF14.clearEXID; inline;
  68952. begin
  68953. pTDefRegMap(@Self)^.clr := $00080000;
  68954. end;
  68955. procedure TCAN1_C1RXF14.setEXID(thebits : TBits_1); inline;
  68956. begin
  68957. if thebits = 0 then
  68958. pTDefRegMap(@Self)^.clr := $00080000
  68959. else
  68960. pTDefRegMap(@Self)^.&set := $00080000;
  68961. end;
  68962. function TCAN1_C1RXF14.getEXID : TBits_1; inline;
  68963. begin
  68964. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68965. end;
  68966. procedure TCAN1_C1RXF14.setSID(thebits : TBits_11); inline;
  68967. begin
  68968. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68969. end;
  68970. function TCAN1_C1RXF14.getSID : TBits_11; inline;
  68971. begin
  68972. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68973. end;
  68974. procedure TCAN1_C1RXF14.setw(thebits : TBits_32); inline;
  68975. begin
  68976. pTDefRegMap(@Self)^.val := thebits;
  68977. end;
  68978. function TCAN1_C1RXF14.getw : TBits_32; inline;
  68979. begin
  68980. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68981. end;
  68982. procedure TCAN1_C1RXF15.setEID(thebits : TBits_18); inline;
  68983. begin
  68984. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68985. end;
  68986. function TCAN1_C1RXF15.getEID : TBits_18; inline;
  68987. begin
  68988. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68989. end;
  68990. procedure TCAN1_C1RXF15.setEXID; inline;
  68991. begin
  68992. pTDefRegMap(@Self)^.&set := $00080000;
  68993. end;
  68994. procedure TCAN1_C1RXF15.clearEXID; inline;
  68995. begin
  68996. pTDefRegMap(@Self)^.clr := $00080000;
  68997. end;
  68998. procedure TCAN1_C1RXF15.setEXID(thebits : TBits_1); inline;
  68999. begin
  69000. if thebits = 0 then
  69001. pTDefRegMap(@Self)^.clr := $00080000
  69002. else
  69003. pTDefRegMap(@Self)^.&set := $00080000;
  69004. end;
  69005. function TCAN1_C1RXF15.getEXID : TBits_1; inline;
  69006. begin
  69007. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69008. end;
  69009. procedure TCAN1_C1RXF15.setSID(thebits : TBits_11); inline;
  69010. begin
  69011. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69012. end;
  69013. function TCAN1_C1RXF15.getSID : TBits_11; inline;
  69014. begin
  69015. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69016. end;
  69017. procedure TCAN1_C1RXF15.setw(thebits : TBits_32); inline;
  69018. begin
  69019. pTDefRegMap(@Self)^.val := thebits;
  69020. end;
  69021. function TCAN1_C1RXF15.getw : TBits_32; inline;
  69022. begin
  69023. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69024. end;
  69025. procedure TCAN1_C1RXF16.setEID(thebits : TBits_18); inline;
  69026. begin
  69027. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69028. end;
  69029. function TCAN1_C1RXF16.getEID : TBits_18; inline;
  69030. begin
  69031. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69032. end;
  69033. procedure TCAN1_C1RXF16.setEXID; inline;
  69034. begin
  69035. pTDefRegMap(@Self)^.&set := $00080000;
  69036. end;
  69037. procedure TCAN1_C1RXF16.clearEXID; inline;
  69038. begin
  69039. pTDefRegMap(@Self)^.clr := $00080000;
  69040. end;
  69041. procedure TCAN1_C1RXF16.setEXID(thebits : TBits_1); inline;
  69042. begin
  69043. if thebits = 0 then
  69044. pTDefRegMap(@Self)^.clr := $00080000
  69045. else
  69046. pTDefRegMap(@Self)^.&set := $00080000;
  69047. end;
  69048. function TCAN1_C1RXF16.getEXID : TBits_1; inline;
  69049. begin
  69050. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69051. end;
  69052. procedure TCAN1_C1RXF16.setSID(thebits : TBits_11); inline;
  69053. begin
  69054. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69055. end;
  69056. function TCAN1_C1RXF16.getSID : TBits_11; inline;
  69057. begin
  69058. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69059. end;
  69060. procedure TCAN1_C1RXF16.setw(thebits : TBits_32); inline;
  69061. begin
  69062. pTDefRegMap(@Self)^.val := thebits;
  69063. end;
  69064. function TCAN1_C1RXF16.getw : TBits_32; inline;
  69065. begin
  69066. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69067. end;
  69068. procedure TCAN1_C1RXF17.setEID(thebits : TBits_18); inline;
  69069. begin
  69070. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69071. end;
  69072. function TCAN1_C1RXF17.getEID : TBits_18; inline;
  69073. begin
  69074. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69075. end;
  69076. procedure TCAN1_C1RXF17.setEXID; inline;
  69077. begin
  69078. pTDefRegMap(@Self)^.&set := $00080000;
  69079. end;
  69080. procedure TCAN1_C1RXF17.clearEXID; inline;
  69081. begin
  69082. pTDefRegMap(@Self)^.clr := $00080000;
  69083. end;
  69084. procedure TCAN1_C1RXF17.setEXID(thebits : TBits_1); inline;
  69085. begin
  69086. if thebits = 0 then
  69087. pTDefRegMap(@Self)^.clr := $00080000
  69088. else
  69089. pTDefRegMap(@Self)^.&set := $00080000;
  69090. end;
  69091. function TCAN1_C1RXF17.getEXID : TBits_1; inline;
  69092. begin
  69093. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69094. end;
  69095. procedure TCAN1_C1RXF17.setSID(thebits : TBits_11); inline;
  69096. begin
  69097. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69098. end;
  69099. function TCAN1_C1RXF17.getSID : TBits_11; inline;
  69100. begin
  69101. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69102. end;
  69103. procedure TCAN1_C1RXF17.setw(thebits : TBits_32); inline;
  69104. begin
  69105. pTDefRegMap(@Self)^.val := thebits;
  69106. end;
  69107. function TCAN1_C1RXF17.getw : TBits_32; inline;
  69108. begin
  69109. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69110. end;
  69111. procedure TCAN1_C1RXF18.setEID(thebits : TBits_18); inline;
  69112. begin
  69113. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69114. end;
  69115. function TCAN1_C1RXF18.getEID : TBits_18; inline;
  69116. begin
  69117. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69118. end;
  69119. procedure TCAN1_C1RXF18.setEXID; inline;
  69120. begin
  69121. pTDefRegMap(@Self)^.&set := $00080000;
  69122. end;
  69123. procedure TCAN1_C1RXF18.clearEXID; inline;
  69124. begin
  69125. pTDefRegMap(@Self)^.clr := $00080000;
  69126. end;
  69127. procedure TCAN1_C1RXF18.setEXID(thebits : TBits_1); inline;
  69128. begin
  69129. if thebits = 0 then
  69130. pTDefRegMap(@Self)^.clr := $00080000
  69131. else
  69132. pTDefRegMap(@Self)^.&set := $00080000;
  69133. end;
  69134. function TCAN1_C1RXF18.getEXID : TBits_1; inline;
  69135. begin
  69136. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69137. end;
  69138. procedure TCAN1_C1RXF18.setSID(thebits : TBits_11); inline;
  69139. begin
  69140. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69141. end;
  69142. function TCAN1_C1RXF18.getSID : TBits_11; inline;
  69143. begin
  69144. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69145. end;
  69146. procedure TCAN1_C1RXF18.setw(thebits : TBits_32); inline;
  69147. begin
  69148. pTDefRegMap(@Self)^.val := thebits;
  69149. end;
  69150. function TCAN1_C1RXF18.getw : TBits_32; inline;
  69151. begin
  69152. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69153. end;
  69154. procedure TCAN1_C1RXF19.setEID(thebits : TBits_18); inline;
  69155. begin
  69156. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69157. end;
  69158. function TCAN1_C1RXF19.getEID : TBits_18; inline;
  69159. begin
  69160. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69161. end;
  69162. procedure TCAN1_C1RXF19.setEXID; inline;
  69163. begin
  69164. pTDefRegMap(@Self)^.&set := $00080000;
  69165. end;
  69166. procedure TCAN1_C1RXF19.clearEXID; inline;
  69167. begin
  69168. pTDefRegMap(@Self)^.clr := $00080000;
  69169. end;
  69170. procedure TCAN1_C1RXF19.setEXID(thebits : TBits_1); inline;
  69171. begin
  69172. if thebits = 0 then
  69173. pTDefRegMap(@Self)^.clr := $00080000
  69174. else
  69175. pTDefRegMap(@Self)^.&set := $00080000;
  69176. end;
  69177. function TCAN1_C1RXF19.getEXID : TBits_1; inline;
  69178. begin
  69179. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69180. end;
  69181. procedure TCAN1_C1RXF19.setSID(thebits : TBits_11); inline;
  69182. begin
  69183. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69184. end;
  69185. function TCAN1_C1RXF19.getSID : TBits_11; inline;
  69186. begin
  69187. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69188. end;
  69189. procedure TCAN1_C1RXF19.setw(thebits : TBits_32); inline;
  69190. begin
  69191. pTDefRegMap(@Self)^.val := thebits;
  69192. end;
  69193. function TCAN1_C1RXF19.getw : TBits_32; inline;
  69194. begin
  69195. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69196. end;
  69197. procedure TCAN1_C1RXF20.setEID(thebits : TBits_18); inline;
  69198. begin
  69199. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69200. end;
  69201. function TCAN1_C1RXF20.getEID : TBits_18; inline;
  69202. begin
  69203. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69204. end;
  69205. procedure TCAN1_C1RXF20.setEXID; inline;
  69206. begin
  69207. pTDefRegMap(@Self)^.&set := $00080000;
  69208. end;
  69209. procedure TCAN1_C1RXF20.clearEXID; inline;
  69210. begin
  69211. pTDefRegMap(@Self)^.clr := $00080000;
  69212. end;
  69213. procedure TCAN1_C1RXF20.setEXID(thebits : TBits_1); inline;
  69214. begin
  69215. if thebits = 0 then
  69216. pTDefRegMap(@Self)^.clr := $00080000
  69217. else
  69218. pTDefRegMap(@Self)^.&set := $00080000;
  69219. end;
  69220. function TCAN1_C1RXF20.getEXID : TBits_1; inline;
  69221. begin
  69222. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69223. end;
  69224. procedure TCAN1_C1RXF20.setSID(thebits : TBits_11); inline;
  69225. begin
  69226. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69227. end;
  69228. function TCAN1_C1RXF20.getSID : TBits_11; inline;
  69229. begin
  69230. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69231. end;
  69232. procedure TCAN1_C1RXF20.setw(thebits : TBits_32); inline;
  69233. begin
  69234. pTDefRegMap(@Self)^.val := thebits;
  69235. end;
  69236. function TCAN1_C1RXF20.getw : TBits_32; inline;
  69237. begin
  69238. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69239. end;
  69240. procedure TCAN1_C1RXF21.setEID(thebits : TBits_18); inline;
  69241. begin
  69242. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69243. end;
  69244. function TCAN1_C1RXF21.getEID : TBits_18; inline;
  69245. begin
  69246. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69247. end;
  69248. procedure TCAN1_C1RXF21.setEXID; inline;
  69249. begin
  69250. pTDefRegMap(@Self)^.&set := $00080000;
  69251. end;
  69252. procedure TCAN1_C1RXF21.clearEXID; inline;
  69253. begin
  69254. pTDefRegMap(@Self)^.clr := $00080000;
  69255. end;
  69256. procedure TCAN1_C1RXF21.setEXID(thebits : TBits_1); inline;
  69257. begin
  69258. if thebits = 0 then
  69259. pTDefRegMap(@Self)^.clr := $00080000
  69260. else
  69261. pTDefRegMap(@Self)^.&set := $00080000;
  69262. end;
  69263. function TCAN1_C1RXF21.getEXID : TBits_1; inline;
  69264. begin
  69265. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69266. end;
  69267. procedure TCAN1_C1RXF21.setSID(thebits : TBits_11); inline;
  69268. begin
  69269. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69270. end;
  69271. function TCAN1_C1RXF21.getSID : TBits_11; inline;
  69272. begin
  69273. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69274. end;
  69275. procedure TCAN1_C1RXF21.setw(thebits : TBits_32); inline;
  69276. begin
  69277. pTDefRegMap(@Self)^.val := thebits;
  69278. end;
  69279. function TCAN1_C1RXF21.getw : TBits_32; inline;
  69280. begin
  69281. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69282. end;
  69283. procedure TCAN1_C1RXF22.setEID(thebits : TBits_18); inline;
  69284. begin
  69285. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69286. end;
  69287. function TCAN1_C1RXF22.getEID : TBits_18; inline;
  69288. begin
  69289. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69290. end;
  69291. procedure TCAN1_C1RXF22.setEXID; inline;
  69292. begin
  69293. pTDefRegMap(@Self)^.&set := $00080000;
  69294. end;
  69295. procedure TCAN1_C1RXF22.clearEXID; inline;
  69296. begin
  69297. pTDefRegMap(@Self)^.clr := $00080000;
  69298. end;
  69299. procedure TCAN1_C1RXF22.setEXID(thebits : TBits_1); inline;
  69300. begin
  69301. if thebits = 0 then
  69302. pTDefRegMap(@Self)^.clr := $00080000
  69303. else
  69304. pTDefRegMap(@Self)^.&set := $00080000;
  69305. end;
  69306. function TCAN1_C1RXF22.getEXID : TBits_1; inline;
  69307. begin
  69308. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69309. end;
  69310. procedure TCAN1_C1RXF22.setSID(thebits : TBits_11); inline;
  69311. begin
  69312. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69313. end;
  69314. function TCAN1_C1RXF22.getSID : TBits_11; inline;
  69315. begin
  69316. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69317. end;
  69318. procedure TCAN1_C1RXF22.setw(thebits : TBits_32); inline;
  69319. begin
  69320. pTDefRegMap(@Self)^.val := thebits;
  69321. end;
  69322. function TCAN1_C1RXF22.getw : TBits_32; inline;
  69323. begin
  69324. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69325. end;
  69326. procedure TCAN1_C1RXF23.setEID(thebits : TBits_18); inline;
  69327. begin
  69328. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69329. end;
  69330. function TCAN1_C1RXF23.getEID : TBits_18; inline;
  69331. begin
  69332. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69333. end;
  69334. procedure TCAN1_C1RXF23.setEXID; inline;
  69335. begin
  69336. pTDefRegMap(@Self)^.&set := $00080000;
  69337. end;
  69338. procedure TCAN1_C1RXF23.clearEXID; inline;
  69339. begin
  69340. pTDefRegMap(@Self)^.clr := $00080000;
  69341. end;
  69342. procedure TCAN1_C1RXF23.setEXID(thebits : TBits_1); inline;
  69343. begin
  69344. if thebits = 0 then
  69345. pTDefRegMap(@Self)^.clr := $00080000
  69346. else
  69347. pTDefRegMap(@Self)^.&set := $00080000;
  69348. end;
  69349. function TCAN1_C1RXF23.getEXID : TBits_1; inline;
  69350. begin
  69351. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69352. end;
  69353. procedure TCAN1_C1RXF23.setSID(thebits : TBits_11); inline;
  69354. begin
  69355. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69356. end;
  69357. function TCAN1_C1RXF23.getSID : TBits_11; inline;
  69358. begin
  69359. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69360. end;
  69361. procedure TCAN1_C1RXF23.setw(thebits : TBits_32); inline;
  69362. begin
  69363. pTDefRegMap(@Self)^.val := thebits;
  69364. end;
  69365. function TCAN1_C1RXF23.getw : TBits_32; inline;
  69366. begin
  69367. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69368. end;
  69369. procedure TCAN1_C1RXF24.setEID(thebits : TBits_18); inline;
  69370. begin
  69371. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69372. end;
  69373. function TCAN1_C1RXF24.getEID : TBits_18; inline;
  69374. begin
  69375. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69376. end;
  69377. procedure TCAN1_C1RXF24.setEXID; inline;
  69378. begin
  69379. pTDefRegMap(@Self)^.&set := $00080000;
  69380. end;
  69381. procedure TCAN1_C1RXF24.clearEXID; inline;
  69382. begin
  69383. pTDefRegMap(@Self)^.clr := $00080000;
  69384. end;
  69385. procedure TCAN1_C1RXF24.setEXID(thebits : TBits_1); inline;
  69386. begin
  69387. if thebits = 0 then
  69388. pTDefRegMap(@Self)^.clr := $00080000
  69389. else
  69390. pTDefRegMap(@Self)^.&set := $00080000;
  69391. end;
  69392. function TCAN1_C1RXF24.getEXID : TBits_1; inline;
  69393. begin
  69394. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69395. end;
  69396. procedure TCAN1_C1RXF24.setSID(thebits : TBits_11); inline;
  69397. begin
  69398. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69399. end;
  69400. function TCAN1_C1RXF24.getSID : TBits_11; inline;
  69401. begin
  69402. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69403. end;
  69404. procedure TCAN1_C1RXF24.setw(thebits : TBits_32); inline;
  69405. begin
  69406. pTDefRegMap(@Self)^.val := thebits;
  69407. end;
  69408. function TCAN1_C1RXF24.getw : TBits_32; inline;
  69409. begin
  69410. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69411. end;
  69412. procedure TCAN1_C1RXF25.setEID(thebits : TBits_18); inline;
  69413. begin
  69414. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69415. end;
  69416. function TCAN1_C1RXF25.getEID : TBits_18; inline;
  69417. begin
  69418. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69419. end;
  69420. procedure TCAN1_C1RXF25.setEXID; inline;
  69421. begin
  69422. pTDefRegMap(@Self)^.&set := $00080000;
  69423. end;
  69424. procedure TCAN1_C1RXF25.clearEXID; inline;
  69425. begin
  69426. pTDefRegMap(@Self)^.clr := $00080000;
  69427. end;
  69428. procedure TCAN1_C1RXF25.setEXID(thebits : TBits_1); inline;
  69429. begin
  69430. if thebits = 0 then
  69431. pTDefRegMap(@Self)^.clr := $00080000
  69432. else
  69433. pTDefRegMap(@Self)^.&set := $00080000;
  69434. end;
  69435. function TCAN1_C1RXF25.getEXID : TBits_1; inline;
  69436. begin
  69437. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69438. end;
  69439. procedure TCAN1_C1RXF25.setSID(thebits : TBits_11); inline;
  69440. begin
  69441. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69442. end;
  69443. function TCAN1_C1RXF25.getSID : TBits_11; inline;
  69444. begin
  69445. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69446. end;
  69447. procedure TCAN1_C1RXF25.setw(thebits : TBits_32); inline;
  69448. begin
  69449. pTDefRegMap(@Self)^.val := thebits;
  69450. end;
  69451. function TCAN1_C1RXF25.getw : TBits_32; inline;
  69452. begin
  69453. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69454. end;
  69455. procedure TCAN1_C1RXF26.setEID(thebits : TBits_18); inline;
  69456. begin
  69457. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69458. end;
  69459. function TCAN1_C1RXF26.getEID : TBits_18; inline;
  69460. begin
  69461. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69462. end;
  69463. procedure TCAN1_C1RXF26.setEXID; inline;
  69464. begin
  69465. pTDefRegMap(@Self)^.&set := $00080000;
  69466. end;
  69467. procedure TCAN1_C1RXF26.clearEXID; inline;
  69468. begin
  69469. pTDefRegMap(@Self)^.clr := $00080000;
  69470. end;
  69471. procedure TCAN1_C1RXF26.setEXID(thebits : TBits_1); inline;
  69472. begin
  69473. if thebits = 0 then
  69474. pTDefRegMap(@Self)^.clr := $00080000
  69475. else
  69476. pTDefRegMap(@Self)^.&set := $00080000;
  69477. end;
  69478. function TCAN1_C1RXF26.getEXID : TBits_1; inline;
  69479. begin
  69480. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69481. end;
  69482. procedure TCAN1_C1RXF26.setSID(thebits : TBits_11); inline;
  69483. begin
  69484. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69485. end;
  69486. function TCAN1_C1RXF26.getSID : TBits_11; inline;
  69487. begin
  69488. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69489. end;
  69490. procedure TCAN1_C1RXF26.setw(thebits : TBits_32); inline;
  69491. begin
  69492. pTDefRegMap(@Self)^.val := thebits;
  69493. end;
  69494. function TCAN1_C1RXF26.getw : TBits_32; inline;
  69495. begin
  69496. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69497. end;
  69498. procedure TCAN1_C1RXF27.setEID(thebits : TBits_18); inline;
  69499. begin
  69500. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69501. end;
  69502. function TCAN1_C1RXF27.getEID : TBits_18; inline;
  69503. begin
  69504. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69505. end;
  69506. procedure TCAN1_C1RXF27.setEXID; inline;
  69507. begin
  69508. pTDefRegMap(@Self)^.&set := $00080000;
  69509. end;
  69510. procedure TCAN1_C1RXF27.clearEXID; inline;
  69511. begin
  69512. pTDefRegMap(@Self)^.clr := $00080000;
  69513. end;
  69514. procedure TCAN1_C1RXF27.setEXID(thebits : TBits_1); inline;
  69515. begin
  69516. if thebits = 0 then
  69517. pTDefRegMap(@Self)^.clr := $00080000
  69518. else
  69519. pTDefRegMap(@Self)^.&set := $00080000;
  69520. end;
  69521. function TCAN1_C1RXF27.getEXID : TBits_1; inline;
  69522. begin
  69523. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69524. end;
  69525. procedure TCAN1_C1RXF27.setSID(thebits : TBits_11); inline;
  69526. begin
  69527. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69528. end;
  69529. function TCAN1_C1RXF27.getSID : TBits_11; inline;
  69530. begin
  69531. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69532. end;
  69533. procedure TCAN1_C1RXF27.setw(thebits : TBits_32); inline;
  69534. begin
  69535. pTDefRegMap(@Self)^.val := thebits;
  69536. end;
  69537. function TCAN1_C1RXF27.getw : TBits_32; inline;
  69538. begin
  69539. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69540. end;
  69541. procedure TCAN1_C1RXF28.setEID(thebits : TBits_18); inline;
  69542. begin
  69543. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69544. end;
  69545. function TCAN1_C1RXF28.getEID : TBits_18; inline;
  69546. begin
  69547. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69548. end;
  69549. procedure TCAN1_C1RXF28.setEXID; inline;
  69550. begin
  69551. pTDefRegMap(@Self)^.&set := $00080000;
  69552. end;
  69553. procedure TCAN1_C1RXF28.clearEXID; inline;
  69554. begin
  69555. pTDefRegMap(@Self)^.clr := $00080000;
  69556. end;
  69557. procedure TCAN1_C1RXF28.setEXID(thebits : TBits_1); inline;
  69558. begin
  69559. if thebits = 0 then
  69560. pTDefRegMap(@Self)^.clr := $00080000
  69561. else
  69562. pTDefRegMap(@Self)^.&set := $00080000;
  69563. end;
  69564. function TCAN1_C1RXF28.getEXID : TBits_1; inline;
  69565. begin
  69566. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69567. end;
  69568. procedure TCAN1_C1RXF28.setSID(thebits : TBits_11); inline;
  69569. begin
  69570. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69571. end;
  69572. function TCAN1_C1RXF28.getSID : TBits_11; inline;
  69573. begin
  69574. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69575. end;
  69576. procedure TCAN1_C1RXF28.setw(thebits : TBits_32); inline;
  69577. begin
  69578. pTDefRegMap(@Self)^.val := thebits;
  69579. end;
  69580. function TCAN1_C1RXF28.getw : TBits_32; inline;
  69581. begin
  69582. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69583. end;
  69584. procedure TCAN1_C1RXF29.setEID(thebits : TBits_18); inline;
  69585. begin
  69586. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69587. end;
  69588. function TCAN1_C1RXF29.getEID : TBits_18; inline;
  69589. begin
  69590. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69591. end;
  69592. procedure TCAN1_C1RXF29.setEXID; inline;
  69593. begin
  69594. pTDefRegMap(@Self)^.&set := $00080000;
  69595. end;
  69596. procedure TCAN1_C1RXF29.clearEXID; inline;
  69597. begin
  69598. pTDefRegMap(@Self)^.clr := $00080000;
  69599. end;
  69600. procedure TCAN1_C1RXF29.setEXID(thebits : TBits_1); inline;
  69601. begin
  69602. if thebits = 0 then
  69603. pTDefRegMap(@Self)^.clr := $00080000
  69604. else
  69605. pTDefRegMap(@Self)^.&set := $00080000;
  69606. end;
  69607. function TCAN1_C1RXF29.getEXID : TBits_1; inline;
  69608. begin
  69609. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69610. end;
  69611. procedure TCAN1_C1RXF29.setSID(thebits : TBits_11); inline;
  69612. begin
  69613. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69614. end;
  69615. function TCAN1_C1RXF29.getSID : TBits_11; inline;
  69616. begin
  69617. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69618. end;
  69619. procedure TCAN1_C1RXF29.setw(thebits : TBits_32); inline;
  69620. begin
  69621. pTDefRegMap(@Self)^.val := thebits;
  69622. end;
  69623. function TCAN1_C1RXF29.getw : TBits_32; inline;
  69624. begin
  69625. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69626. end;
  69627. procedure TCAN1_C1RXF30.setEID(thebits : TBits_18); inline;
  69628. begin
  69629. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69630. end;
  69631. function TCAN1_C1RXF30.getEID : TBits_18; inline;
  69632. begin
  69633. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69634. end;
  69635. procedure TCAN1_C1RXF30.setEXID; inline;
  69636. begin
  69637. pTDefRegMap(@Self)^.&set := $00080000;
  69638. end;
  69639. procedure TCAN1_C1RXF30.clearEXID; inline;
  69640. begin
  69641. pTDefRegMap(@Self)^.clr := $00080000;
  69642. end;
  69643. procedure TCAN1_C1RXF30.setEXID(thebits : TBits_1); inline;
  69644. begin
  69645. if thebits = 0 then
  69646. pTDefRegMap(@Self)^.clr := $00080000
  69647. else
  69648. pTDefRegMap(@Self)^.&set := $00080000;
  69649. end;
  69650. function TCAN1_C1RXF30.getEXID : TBits_1; inline;
  69651. begin
  69652. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69653. end;
  69654. procedure TCAN1_C1RXF30.setSID(thebits : TBits_11); inline;
  69655. begin
  69656. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69657. end;
  69658. function TCAN1_C1RXF30.getSID : TBits_11; inline;
  69659. begin
  69660. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69661. end;
  69662. procedure TCAN1_C1RXF30.setw(thebits : TBits_32); inline;
  69663. begin
  69664. pTDefRegMap(@Self)^.val := thebits;
  69665. end;
  69666. function TCAN1_C1RXF30.getw : TBits_32; inline;
  69667. begin
  69668. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69669. end;
  69670. procedure TCAN1_C1RXF31.setEID(thebits : TBits_18); inline;
  69671. begin
  69672. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  69673. end;
  69674. function TCAN1_C1RXF31.getEID : TBits_18; inline;
  69675. begin
  69676. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  69677. end;
  69678. procedure TCAN1_C1RXF31.setEXID; inline;
  69679. begin
  69680. pTDefRegMap(@Self)^.&set := $00080000;
  69681. end;
  69682. procedure TCAN1_C1RXF31.clearEXID; inline;
  69683. begin
  69684. pTDefRegMap(@Self)^.clr := $00080000;
  69685. end;
  69686. procedure TCAN1_C1RXF31.setEXID(thebits : TBits_1); inline;
  69687. begin
  69688. if thebits = 0 then
  69689. pTDefRegMap(@Self)^.clr := $00080000
  69690. else
  69691. pTDefRegMap(@Self)^.&set := $00080000;
  69692. end;
  69693. function TCAN1_C1RXF31.getEXID : TBits_1; inline;
  69694. begin
  69695. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69696. end;
  69697. procedure TCAN1_C1RXF31.setSID(thebits : TBits_11); inline;
  69698. begin
  69699. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  69700. end;
  69701. function TCAN1_C1RXF31.getSID : TBits_11; inline;
  69702. begin
  69703. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  69704. end;
  69705. procedure TCAN1_C1RXF31.setw(thebits : TBits_32); inline;
  69706. begin
  69707. pTDefRegMap(@Self)^.val := thebits;
  69708. end;
  69709. function TCAN1_C1RXF31.getw : TBits_32; inline;
  69710. begin
  69711. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69712. end;
  69713. procedure TCAN1_C1FIFOCON0.setTXPRI(thebits : TBits_2); inline;
  69714. begin
  69715. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  69716. end;
  69717. function TCAN1_C1FIFOCON0.getTXPRI : TBits_2; inline;
  69718. begin
  69719. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  69720. end;
  69721. procedure TCAN1_C1FIFOCON0.setRTREN; inline;
  69722. begin
  69723. pTDefRegMap(@Self)^.&set := $00000004;
  69724. end;
  69725. procedure TCAN1_C1FIFOCON0.clearRTREN; inline;
  69726. begin
  69727. pTDefRegMap(@Self)^.clr := $00000004;
  69728. end;
  69729. procedure TCAN1_C1FIFOCON0.setRTREN(thebits : TBits_1); inline;
  69730. begin
  69731. if thebits = 0 then
  69732. pTDefRegMap(@Self)^.clr := $00000004
  69733. else
  69734. pTDefRegMap(@Self)^.&set := $00000004;
  69735. end;
  69736. function TCAN1_C1FIFOCON0.getRTREN : TBits_1; inline;
  69737. begin
  69738. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69739. end;
  69740. procedure TCAN1_C1FIFOCON0.setTXREQ; inline;
  69741. begin
  69742. pTDefRegMap(@Self)^.&set := $00000008;
  69743. end;
  69744. procedure TCAN1_C1FIFOCON0.clearTXREQ; inline;
  69745. begin
  69746. pTDefRegMap(@Self)^.clr := $00000008;
  69747. end;
  69748. procedure TCAN1_C1FIFOCON0.setTXREQ(thebits : TBits_1); inline;
  69749. begin
  69750. if thebits = 0 then
  69751. pTDefRegMap(@Self)^.clr := $00000008
  69752. else
  69753. pTDefRegMap(@Self)^.&set := $00000008;
  69754. end;
  69755. function TCAN1_C1FIFOCON0.getTXREQ : TBits_1; inline;
  69756. begin
  69757. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69758. end;
  69759. procedure TCAN1_C1FIFOCON0.setTXERR; inline;
  69760. begin
  69761. pTDefRegMap(@Self)^.&set := $00000010;
  69762. end;
  69763. procedure TCAN1_C1FIFOCON0.clearTXERR; inline;
  69764. begin
  69765. pTDefRegMap(@Self)^.clr := $00000010;
  69766. end;
  69767. procedure TCAN1_C1FIFOCON0.setTXERR(thebits : TBits_1); inline;
  69768. begin
  69769. if thebits = 0 then
  69770. pTDefRegMap(@Self)^.clr := $00000010
  69771. else
  69772. pTDefRegMap(@Self)^.&set := $00000010;
  69773. end;
  69774. function TCAN1_C1FIFOCON0.getTXERR : TBits_1; inline;
  69775. begin
  69776. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69777. end;
  69778. procedure TCAN1_C1FIFOCON0.setTXLARB; inline;
  69779. begin
  69780. pTDefRegMap(@Self)^.&set := $00000020;
  69781. end;
  69782. procedure TCAN1_C1FIFOCON0.clearTXLARB; inline;
  69783. begin
  69784. pTDefRegMap(@Self)^.clr := $00000020;
  69785. end;
  69786. procedure TCAN1_C1FIFOCON0.setTXLARB(thebits : TBits_1); inline;
  69787. begin
  69788. if thebits = 0 then
  69789. pTDefRegMap(@Self)^.clr := $00000020
  69790. else
  69791. pTDefRegMap(@Self)^.&set := $00000020;
  69792. end;
  69793. function TCAN1_C1FIFOCON0.getTXLARB : TBits_1; inline;
  69794. begin
  69795. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69796. end;
  69797. procedure TCAN1_C1FIFOCON0.setTXABAT; inline;
  69798. begin
  69799. pTDefRegMap(@Self)^.&set := $00000040;
  69800. end;
  69801. procedure TCAN1_C1FIFOCON0.clearTXABAT; inline;
  69802. begin
  69803. pTDefRegMap(@Self)^.clr := $00000040;
  69804. end;
  69805. procedure TCAN1_C1FIFOCON0.setTXABAT(thebits : TBits_1); inline;
  69806. begin
  69807. if thebits = 0 then
  69808. pTDefRegMap(@Self)^.clr := $00000040
  69809. else
  69810. pTDefRegMap(@Self)^.&set := $00000040;
  69811. end;
  69812. function TCAN1_C1FIFOCON0.getTXABAT : TBits_1; inline;
  69813. begin
  69814. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69815. end;
  69816. procedure TCAN1_C1FIFOCON0.setTXEN; inline;
  69817. begin
  69818. pTDefRegMap(@Self)^.&set := $00000080;
  69819. end;
  69820. procedure TCAN1_C1FIFOCON0.clearTXEN; inline;
  69821. begin
  69822. pTDefRegMap(@Self)^.clr := $00000080;
  69823. end;
  69824. procedure TCAN1_C1FIFOCON0.setTXEN(thebits : TBits_1); inline;
  69825. begin
  69826. if thebits = 0 then
  69827. pTDefRegMap(@Self)^.clr := $00000080
  69828. else
  69829. pTDefRegMap(@Self)^.&set := $00000080;
  69830. end;
  69831. function TCAN1_C1FIFOCON0.getTXEN : TBits_1; inline;
  69832. begin
  69833. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69834. end;
  69835. procedure TCAN1_C1FIFOCON0.setDONLY; inline;
  69836. begin
  69837. pTDefRegMap(@Self)^.&set := $00001000;
  69838. end;
  69839. procedure TCAN1_C1FIFOCON0.clearDONLY; inline;
  69840. begin
  69841. pTDefRegMap(@Self)^.clr := $00001000;
  69842. end;
  69843. procedure TCAN1_C1FIFOCON0.setDONLY(thebits : TBits_1); inline;
  69844. begin
  69845. if thebits = 0 then
  69846. pTDefRegMap(@Self)^.clr := $00001000
  69847. else
  69848. pTDefRegMap(@Self)^.&set := $00001000;
  69849. end;
  69850. function TCAN1_C1FIFOCON0.getDONLY : TBits_1; inline;
  69851. begin
  69852. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  69853. end;
  69854. procedure TCAN1_C1FIFOCON0.setUINC; inline;
  69855. begin
  69856. pTDefRegMap(@Self)^.&set := $00002000;
  69857. end;
  69858. procedure TCAN1_C1FIFOCON0.clearUINC; inline;
  69859. begin
  69860. pTDefRegMap(@Self)^.clr := $00002000;
  69861. end;
  69862. procedure TCAN1_C1FIFOCON0.setUINC(thebits : TBits_1); inline;
  69863. begin
  69864. if thebits = 0 then
  69865. pTDefRegMap(@Self)^.clr := $00002000
  69866. else
  69867. pTDefRegMap(@Self)^.&set := $00002000;
  69868. end;
  69869. function TCAN1_C1FIFOCON0.getUINC : TBits_1; inline;
  69870. begin
  69871. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  69872. end;
  69873. procedure TCAN1_C1FIFOCON0.setFRESET; inline;
  69874. begin
  69875. pTDefRegMap(@Self)^.&set := $00004000;
  69876. end;
  69877. procedure TCAN1_C1FIFOCON0.clearFRESET; inline;
  69878. begin
  69879. pTDefRegMap(@Self)^.clr := $00004000;
  69880. end;
  69881. procedure TCAN1_C1FIFOCON0.setFRESET(thebits : TBits_1); inline;
  69882. begin
  69883. if thebits = 0 then
  69884. pTDefRegMap(@Self)^.clr := $00004000
  69885. else
  69886. pTDefRegMap(@Self)^.&set := $00004000;
  69887. end;
  69888. function TCAN1_C1FIFOCON0.getFRESET : TBits_1; inline;
  69889. begin
  69890. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  69891. end;
  69892. procedure TCAN1_C1FIFOCON0.setFSIZE(thebits : TBits_5); inline;
  69893. begin
  69894. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  69895. end;
  69896. function TCAN1_C1FIFOCON0.getFSIZE : TBits_5; inline;
  69897. begin
  69898. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  69899. end;
  69900. procedure TCAN1_C1FIFOCON0.setw(thebits : TBits_32); inline;
  69901. begin
  69902. pTDefRegMap(@Self)^.val := thebits;
  69903. end;
  69904. function TCAN1_C1FIFOCON0.getw : TBits_32; inline;
  69905. begin
  69906. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69907. end;
  69908. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIF; inline;
  69909. begin
  69910. pTDefRegMap(@Self)^.&set := $00000001;
  69911. end;
  69912. procedure TCAN1_C1FIFOINT0.clearRXNEMPTYIF; inline;
  69913. begin
  69914. pTDefRegMap(@Self)^.clr := $00000001;
  69915. end;
  69916. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIF(thebits : TBits_1); inline;
  69917. begin
  69918. if thebits = 0 then
  69919. pTDefRegMap(@Self)^.clr := $00000001
  69920. else
  69921. pTDefRegMap(@Self)^.&set := $00000001;
  69922. end;
  69923. function TCAN1_C1FIFOINT0.getRXNEMPTYIF : TBits_1; inline;
  69924. begin
  69925. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69926. end;
  69927. procedure TCAN1_C1FIFOINT0.setRXHALFIF; inline;
  69928. begin
  69929. pTDefRegMap(@Self)^.&set := $00000002;
  69930. end;
  69931. procedure TCAN1_C1FIFOINT0.clearRXHALFIF; inline;
  69932. begin
  69933. pTDefRegMap(@Self)^.clr := $00000002;
  69934. end;
  69935. procedure TCAN1_C1FIFOINT0.setRXHALFIF(thebits : TBits_1); inline;
  69936. begin
  69937. if thebits = 0 then
  69938. pTDefRegMap(@Self)^.clr := $00000002
  69939. else
  69940. pTDefRegMap(@Self)^.&set := $00000002;
  69941. end;
  69942. function TCAN1_C1FIFOINT0.getRXHALFIF : TBits_1; inline;
  69943. begin
  69944. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69945. end;
  69946. procedure TCAN1_C1FIFOINT0.setRXFULLIF; inline;
  69947. begin
  69948. pTDefRegMap(@Self)^.&set := $00000004;
  69949. end;
  69950. procedure TCAN1_C1FIFOINT0.clearRXFULLIF; inline;
  69951. begin
  69952. pTDefRegMap(@Self)^.clr := $00000004;
  69953. end;
  69954. procedure TCAN1_C1FIFOINT0.setRXFULLIF(thebits : TBits_1); inline;
  69955. begin
  69956. if thebits = 0 then
  69957. pTDefRegMap(@Self)^.clr := $00000004
  69958. else
  69959. pTDefRegMap(@Self)^.&set := $00000004;
  69960. end;
  69961. function TCAN1_C1FIFOINT0.getRXFULLIF : TBits_1; inline;
  69962. begin
  69963. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69964. end;
  69965. procedure TCAN1_C1FIFOINT0.setRXOVFLIF; inline;
  69966. begin
  69967. pTDefRegMap(@Self)^.&set := $00000008;
  69968. end;
  69969. procedure TCAN1_C1FIFOINT0.clearRXOVFLIF; inline;
  69970. begin
  69971. pTDefRegMap(@Self)^.clr := $00000008;
  69972. end;
  69973. procedure TCAN1_C1FIFOINT0.setRXOVFLIF(thebits : TBits_1); inline;
  69974. begin
  69975. if thebits = 0 then
  69976. pTDefRegMap(@Self)^.clr := $00000008
  69977. else
  69978. pTDefRegMap(@Self)^.&set := $00000008;
  69979. end;
  69980. function TCAN1_C1FIFOINT0.getRXOVFLIF : TBits_1; inline;
  69981. begin
  69982. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69983. end;
  69984. procedure TCAN1_C1FIFOINT0.setTXEMPTYIF; inline;
  69985. begin
  69986. pTDefRegMap(@Self)^.&set := $00000100;
  69987. end;
  69988. procedure TCAN1_C1FIFOINT0.clearTXEMPTYIF; inline;
  69989. begin
  69990. pTDefRegMap(@Self)^.clr := $00000100;
  69991. end;
  69992. procedure TCAN1_C1FIFOINT0.setTXEMPTYIF(thebits : TBits_1); inline;
  69993. begin
  69994. if thebits = 0 then
  69995. pTDefRegMap(@Self)^.clr := $00000100
  69996. else
  69997. pTDefRegMap(@Self)^.&set := $00000100;
  69998. end;
  69999. function TCAN1_C1FIFOINT0.getTXEMPTYIF : TBits_1; inline;
  70000. begin
  70001. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  70002. end;
  70003. procedure TCAN1_C1FIFOINT0.setTXHALFIF; inline;
  70004. begin
  70005. pTDefRegMap(@Self)^.&set := $00000200;
  70006. end;
  70007. procedure TCAN1_C1FIFOINT0.clearTXHALFIF; inline;
  70008. begin
  70009. pTDefRegMap(@Self)^.clr := $00000200;
  70010. end;
  70011. procedure TCAN1_C1FIFOINT0.setTXHALFIF(thebits : TBits_1); inline;
  70012. begin
  70013. if thebits = 0 then
  70014. pTDefRegMap(@Self)^.clr := $00000200
  70015. else
  70016. pTDefRegMap(@Self)^.&set := $00000200;
  70017. end;
  70018. function TCAN1_C1FIFOINT0.getTXHALFIF : TBits_1; inline;
  70019. begin
  70020. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  70021. end;
  70022. procedure TCAN1_C1FIFOINT0.setTXNFULLIF; inline;
  70023. begin
  70024. pTDefRegMap(@Self)^.&set := $00000400;
  70025. end;
  70026. procedure TCAN1_C1FIFOINT0.clearTXNFULLIF; inline;
  70027. begin
  70028. pTDefRegMap(@Self)^.clr := $00000400;
  70029. end;
  70030. procedure TCAN1_C1FIFOINT0.setTXNFULLIF(thebits : TBits_1); inline;
  70031. begin
  70032. if thebits = 0 then
  70033. pTDefRegMap(@Self)^.clr := $00000400
  70034. else
  70035. pTDefRegMap(@Self)^.&set := $00000400;
  70036. end;
  70037. function TCAN1_C1FIFOINT0.getTXNFULLIF : TBits_1; inline;
  70038. begin
  70039. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  70040. end;
  70041. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIE; inline;
  70042. begin
  70043. pTDefRegMap(@Self)^.&set := $00010000;
  70044. end;
  70045. procedure TCAN1_C1FIFOINT0.clearRXNEMPTYIE; inline;
  70046. begin
  70047. pTDefRegMap(@Self)^.clr := $00010000;
  70048. end;
  70049. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIE(thebits : TBits_1); inline;
  70050. begin
  70051. if thebits = 0 then
  70052. pTDefRegMap(@Self)^.clr := $00010000
  70053. else
  70054. pTDefRegMap(@Self)^.&set := $00010000;
  70055. end;
  70056. function TCAN1_C1FIFOINT0.getRXNEMPTYIE : TBits_1; inline;
  70057. begin
  70058. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  70059. end;
  70060. procedure TCAN1_C1FIFOINT0.setRXHALFIE; inline;
  70061. begin
  70062. pTDefRegMap(@Self)^.&set := $00020000;
  70063. end;
  70064. procedure TCAN1_C1FIFOINT0.clearRXHALFIE; inline;
  70065. begin
  70066. pTDefRegMap(@Self)^.clr := $00020000;
  70067. end;
  70068. procedure TCAN1_C1FIFOINT0.setRXHALFIE(thebits : TBits_1); inline;
  70069. begin
  70070. if thebits = 0 then
  70071. pTDefRegMap(@Self)^.clr := $00020000
  70072. else
  70073. pTDefRegMap(@Self)^.&set := $00020000;
  70074. end;
  70075. function TCAN1_C1FIFOINT0.getRXHALFIE : TBits_1; inline;
  70076. begin
  70077. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  70078. end;
  70079. procedure TCAN1_C1FIFOINT0.setRXFULLIE; inline;
  70080. begin
  70081. pTDefRegMap(@Self)^.&set := $00040000;
  70082. end;
  70083. procedure TCAN1_C1FIFOINT0.clearRXFULLIE; inline;
  70084. begin
  70085. pTDefRegMap(@Self)^.clr := $00040000;
  70086. end;
  70087. procedure TCAN1_C1FIFOINT0.setRXFULLIE(thebits : TBits_1); inline;
  70088. begin
  70089. if thebits = 0 then
  70090. pTDefRegMap(@Self)^.clr := $00040000
  70091. else
  70092. pTDefRegMap(@Self)^.&set := $00040000;
  70093. end;
  70094. function TCAN1_C1FIFOINT0.getRXFULLIE : TBits_1; inline;
  70095. begin
  70096. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  70097. end;
  70098. procedure TCAN1_C1FIFOINT0.setRXOVFLIE; inline;
  70099. begin
  70100. pTDefRegMap(@Self)^.&set := $00080000;
  70101. end;
  70102. procedure TCAN1_C1FIFOINT0.clearRXOVFLIE; inline;
  70103. begin
  70104. pTDefRegMap(@Self)^.clr := $00080000;
  70105. end;
  70106. procedure TCAN1_C1FIFOINT0.setRXOVFLIE(thebits : TBits_1); inline;
  70107. begin
  70108. if thebits = 0 then
  70109. pTDefRegMap(@Self)^.clr := $00080000
  70110. else
  70111. pTDefRegMap(@Self)^.&set := $00080000;
  70112. end;
  70113. function TCAN1_C1FIFOINT0.getRXOVFLIE : TBits_1; inline;
  70114. begin
  70115. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  70116. end;
  70117. procedure TCAN1_C1FIFOINT0.setTXEMPTYIE; inline;
  70118. begin
  70119. pTDefRegMap(@Self)^.&set := $01000000;
  70120. end;
  70121. procedure TCAN1_C1FIFOINT0.clearTXEMPTYIE; inline;
  70122. begin
  70123. pTDefRegMap(@Self)^.clr := $01000000;
  70124. end;
  70125. procedure TCAN1_C1FIFOINT0.setTXEMPTYIE(thebits : TBits_1); inline;
  70126. begin
  70127. if thebits = 0 then
  70128. pTDefRegMap(@Self)^.clr := $01000000
  70129. else
  70130. pTDefRegMap(@Self)^.&set := $01000000;
  70131. end;
  70132. function TCAN1_C1FIFOINT0.getTXEMPTYIE : TBits_1; inline;
  70133. begin
  70134. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  70135. end;
  70136. procedure TCAN1_C1FIFOINT0.setTXHALFIE; inline;
  70137. begin
  70138. pTDefRegMap(@Self)^.&set := $02000000;
  70139. end;
  70140. procedure TCAN1_C1FIFOINT0.clearTXHALFIE; inline;
  70141. begin
  70142. pTDefRegMap(@Self)^.clr := $02000000;
  70143. end;
  70144. procedure TCAN1_C1FIFOINT0.setTXHALFIE(thebits : TBits_1); inline;
  70145. begin
  70146. if thebits = 0 then
  70147. pTDefRegMap(@Self)^.clr := $02000000
  70148. else
  70149. pTDefRegMap(@Self)^.&set := $02000000;
  70150. end;
  70151. function TCAN1_C1FIFOINT0.getTXHALFIE : TBits_1; inline;
  70152. begin
  70153. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  70154. end;
  70155. procedure TCAN1_C1FIFOINT0.setTXNFULLIE; inline;
  70156. begin
  70157. pTDefRegMap(@Self)^.&set := $04000000;
  70158. end;
  70159. procedure TCAN1_C1FIFOINT0.clearTXNFULLIE; inline;
  70160. begin
  70161. pTDefRegMap(@Self)^.clr := $04000000;
  70162. end;
  70163. procedure TCAN1_C1FIFOINT0.setTXNFULLIE(thebits : TBits_1); inline;
  70164. begin
  70165. if thebits = 0 then
  70166. pTDefRegMap(@Self)^.clr := $04000000
  70167. else
  70168. pTDefRegMap(@Self)^.&set := $04000000;
  70169. end;
  70170. function TCAN1_C1FIFOINT0.getTXNFULLIE : TBits_1; inline;
  70171. begin
  70172. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  70173. end;
  70174. procedure TCAN1_C1FIFOINT0.setw(thebits : TBits_32); inline;
  70175. begin
  70176. pTDefRegMap(@Self)^.val := thebits;
  70177. end;
  70178. function TCAN1_C1FIFOINT0.getw : TBits_32; inline;
  70179. begin
  70180. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70181. end;
  70182. procedure TCAN1_C1FIFOCI0.setCFIFOCI(thebits : TBits_5); inline;
  70183. begin
  70184. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  70185. end;
  70186. function TCAN1_C1FIFOCI0.getCFIFOCI : TBits_5; inline;
  70187. begin
  70188. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  70189. end;
  70190. procedure TCAN1_C1FIFOCI0.setw(thebits : TBits_32); inline;
  70191. begin
  70192. pTDefRegMap(@Self)^.val := thebits;
  70193. end;
  70194. function TCAN1_C1FIFOCI0.getw : TBits_32; inline;
  70195. begin
  70196. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70197. end;
  70198. procedure TCAN1_C1FIFOCON1.setTXPRI(thebits : TBits_2); inline;
  70199. begin
  70200. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  70201. end;
  70202. function TCAN1_C1FIFOCON1.getTXPRI : TBits_2; inline;
  70203. begin
  70204. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  70205. end;
  70206. procedure TCAN1_C1FIFOCON1.setRTREN; inline;
  70207. begin
  70208. pTDefRegMap(@Self)^.&set := $00000004;
  70209. end;
  70210. procedure TCAN1_C1FIFOCON1.clearRTREN; inline;
  70211. begin
  70212. pTDefRegMap(@Self)^.clr := $00000004;
  70213. end;
  70214. procedure TCAN1_C1FIFOCON1.setRTREN(thebits : TBits_1); inline;
  70215. begin
  70216. if thebits = 0 then
  70217. pTDefRegMap(@Self)^.clr := $00000004
  70218. else
  70219. pTDefRegMap(@Self)^.&set := $00000004;
  70220. end;
  70221. function TCAN1_C1FIFOCON1.getRTREN : TBits_1; inline;
  70222. begin
  70223. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70224. end;
  70225. procedure TCAN1_C1FIFOCON1.setTXREQ; inline;
  70226. begin
  70227. pTDefRegMap(@Self)^.&set := $00000008;
  70228. end;
  70229. procedure TCAN1_C1FIFOCON1.clearTXREQ; inline;
  70230. begin
  70231. pTDefRegMap(@Self)^.clr := $00000008;
  70232. end;
  70233. procedure TCAN1_C1FIFOCON1.setTXREQ(thebits : TBits_1); inline;
  70234. begin
  70235. if thebits = 0 then
  70236. pTDefRegMap(@Self)^.clr := $00000008
  70237. else
  70238. pTDefRegMap(@Self)^.&set := $00000008;
  70239. end;
  70240. function TCAN1_C1FIFOCON1.getTXREQ : TBits_1; inline;
  70241. begin
  70242. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70243. end;
  70244. procedure TCAN1_C1FIFOCON1.setTXERR; inline;
  70245. begin
  70246. pTDefRegMap(@Self)^.&set := $00000010;
  70247. end;
  70248. procedure TCAN1_C1FIFOCON1.clearTXERR; inline;
  70249. begin
  70250. pTDefRegMap(@Self)^.clr := $00000010;
  70251. end;
  70252. procedure TCAN1_C1FIFOCON1.setTXERR(thebits : TBits_1); inline;
  70253. begin
  70254. if thebits = 0 then
  70255. pTDefRegMap(@Self)^.clr := $00000010
  70256. else
  70257. pTDefRegMap(@Self)^.&set := $00000010;
  70258. end;
  70259. function TCAN1_C1FIFOCON1.getTXERR : TBits_1; inline;
  70260. begin
  70261. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70262. end;
  70263. procedure TCAN1_C1FIFOCON1.setTXLARB; inline;
  70264. begin
  70265. pTDefRegMap(@Self)^.&set := $00000020;
  70266. end;
  70267. procedure TCAN1_C1FIFOCON1.clearTXLARB; inline;
  70268. begin
  70269. pTDefRegMap(@Self)^.clr := $00000020;
  70270. end;
  70271. procedure TCAN1_C1FIFOCON1.setTXLARB(thebits : TBits_1); inline;
  70272. begin
  70273. if thebits = 0 then
  70274. pTDefRegMap(@Self)^.clr := $00000020
  70275. else
  70276. pTDefRegMap(@Self)^.&set := $00000020;
  70277. end;
  70278. function TCAN1_C1FIFOCON1.getTXLARB : TBits_1; inline;
  70279. begin
  70280. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70281. end;
  70282. procedure TCAN1_C1FIFOCON1.setTXABAT; inline;
  70283. begin
  70284. pTDefRegMap(@Self)^.&set := $00000040;
  70285. end;
  70286. procedure TCAN1_C1FIFOCON1.clearTXABAT; inline;
  70287. begin
  70288. pTDefRegMap(@Self)^.clr := $00000040;
  70289. end;
  70290. procedure TCAN1_C1FIFOCON1.setTXABAT(thebits : TBits_1); inline;
  70291. begin
  70292. if thebits = 0 then
  70293. pTDefRegMap(@Self)^.clr := $00000040
  70294. else
  70295. pTDefRegMap(@Self)^.&set := $00000040;
  70296. end;
  70297. function TCAN1_C1FIFOCON1.getTXABAT : TBits_1; inline;
  70298. begin
  70299. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70300. end;
  70301. procedure TCAN1_C1FIFOCON1.setTXEN; inline;
  70302. begin
  70303. pTDefRegMap(@Self)^.&set := $00000080;
  70304. end;
  70305. procedure TCAN1_C1FIFOCON1.clearTXEN; inline;
  70306. begin
  70307. pTDefRegMap(@Self)^.clr := $00000080;
  70308. end;
  70309. procedure TCAN1_C1FIFOCON1.setTXEN(thebits : TBits_1); inline;
  70310. begin
  70311. if thebits = 0 then
  70312. pTDefRegMap(@Self)^.clr := $00000080
  70313. else
  70314. pTDefRegMap(@Self)^.&set := $00000080;
  70315. end;
  70316. function TCAN1_C1FIFOCON1.getTXEN : TBits_1; inline;
  70317. begin
  70318. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70319. end;
  70320. procedure TCAN1_C1FIFOCON1.setDONLY; inline;
  70321. begin
  70322. pTDefRegMap(@Self)^.&set := $00001000;
  70323. end;
  70324. procedure TCAN1_C1FIFOCON1.clearDONLY; inline;
  70325. begin
  70326. pTDefRegMap(@Self)^.clr := $00001000;
  70327. end;
  70328. procedure TCAN1_C1FIFOCON1.setDONLY(thebits : TBits_1); inline;
  70329. begin
  70330. if thebits = 0 then
  70331. pTDefRegMap(@Self)^.clr := $00001000
  70332. else
  70333. pTDefRegMap(@Self)^.&set := $00001000;
  70334. end;
  70335. function TCAN1_C1FIFOCON1.getDONLY : TBits_1; inline;
  70336. begin
  70337. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  70338. end;
  70339. procedure TCAN1_C1FIFOCON1.setUINC; inline;
  70340. begin
  70341. pTDefRegMap(@Self)^.&set := $00002000;
  70342. end;
  70343. procedure TCAN1_C1FIFOCON1.clearUINC; inline;
  70344. begin
  70345. pTDefRegMap(@Self)^.clr := $00002000;
  70346. end;
  70347. procedure TCAN1_C1FIFOCON1.setUINC(thebits : TBits_1); inline;
  70348. begin
  70349. if thebits = 0 then
  70350. pTDefRegMap(@Self)^.clr := $00002000
  70351. else
  70352. pTDefRegMap(@Self)^.&set := $00002000;
  70353. end;
  70354. function TCAN1_C1FIFOCON1.getUINC : TBits_1; inline;
  70355. begin
  70356. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  70357. end;
  70358. procedure TCAN1_C1FIFOCON1.setFRESET; inline;
  70359. begin
  70360. pTDefRegMap(@Self)^.&set := $00004000;
  70361. end;
  70362. procedure TCAN1_C1FIFOCON1.clearFRESET; inline;
  70363. begin
  70364. pTDefRegMap(@Self)^.clr := $00004000;
  70365. end;
  70366. procedure TCAN1_C1FIFOCON1.setFRESET(thebits : TBits_1); inline;
  70367. begin
  70368. if thebits = 0 then
  70369. pTDefRegMap(@Self)^.clr := $00004000
  70370. else
  70371. pTDefRegMap(@Self)^.&set := $00004000;
  70372. end;
  70373. function TCAN1_C1FIFOCON1.getFRESET : TBits_1; inline;
  70374. begin
  70375. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  70376. end;
  70377. procedure TCAN1_C1FIFOCON1.setFSIZE(thebits : TBits_5); inline;
  70378. begin
  70379. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  70380. end;
  70381. function TCAN1_C1FIFOCON1.getFSIZE : TBits_5; inline;
  70382. begin
  70383. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  70384. end;
  70385. procedure TCAN1_C1FIFOCON1.setw(thebits : TBits_32); inline;
  70386. begin
  70387. pTDefRegMap(@Self)^.val := thebits;
  70388. end;
  70389. function TCAN1_C1FIFOCON1.getw : TBits_32; inline;
  70390. begin
  70391. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70392. end;
  70393. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIF; inline;
  70394. begin
  70395. pTDefRegMap(@Self)^.&set := $00000001;
  70396. end;
  70397. procedure TCAN1_C1FIFOINT1.clearRXNEMPTYIF; inline;
  70398. begin
  70399. pTDefRegMap(@Self)^.clr := $00000001;
  70400. end;
  70401. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIF(thebits : TBits_1); inline;
  70402. begin
  70403. if thebits = 0 then
  70404. pTDefRegMap(@Self)^.clr := $00000001
  70405. else
  70406. pTDefRegMap(@Self)^.&set := $00000001;
  70407. end;
  70408. function TCAN1_C1FIFOINT1.getRXNEMPTYIF : TBits_1; inline;
  70409. begin
  70410. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70411. end;
  70412. procedure TCAN1_C1FIFOINT1.setRXHALFIF; inline;
  70413. begin
  70414. pTDefRegMap(@Self)^.&set := $00000002;
  70415. end;
  70416. procedure TCAN1_C1FIFOINT1.clearRXHALFIF; inline;
  70417. begin
  70418. pTDefRegMap(@Self)^.clr := $00000002;
  70419. end;
  70420. procedure TCAN1_C1FIFOINT1.setRXHALFIF(thebits : TBits_1); inline;
  70421. begin
  70422. if thebits = 0 then
  70423. pTDefRegMap(@Self)^.clr := $00000002
  70424. else
  70425. pTDefRegMap(@Self)^.&set := $00000002;
  70426. end;
  70427. function TCAN1_C1FIFOINT1.getRXHALFIF : TBits_1; inline;
  70428. begin
  70429. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70430. end;
  70431. procedure TCAN1_C1FIFOINT1.setRXFULLIF; inline;
  70432. begin
  70433. pTDefRegMap(@Self)^.&set := $00000004;
  70434. end;
  70435. procedure TCAN1_C1FIFOINT1.clearRXFULLIF; inline;
  70436. begin
  70437. pTDefRegMap(@Self)^.clr := $00000004;
  70438. end;
  70439. procedure TCAN1_C1FIFOINT1.setRXFULLIF(thebits : TBits_1); inline;
  70440. begin
  70441. if thebits = 0 then
  70442. pTDefRegMap(@Self)^.clr := $00000004
  70443. else
  70444. pTDefRegMap(@Self)^.&set := $00000004;
  70445. end;
  70446. function TCAN1_C1FIFOINT1.getRXFULLIF : TBits_1; inline;
  70447. begin
  70448. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70449. end;
  70450. procedure TCAN1_C1FIFOINT1.setRXOVFLIF; inline;
  70451. begin
  70452. pTDefRegMap(@Self)^.&set := $00000008;
  70453. end;
  70454. procedure TCAN1_C1FIFOINT1.clearRXOVFLIF; inline;
  70455. begin
  70456. pTDefRegMap(@Self)^.clr := $00000008;
  70457. end;
  70458. procedure TCAN1_C1FIFOINT1.setRXOVFLIF(thebits : TBits_1); inline;
  70459. begin
  70460. if thebits = 0 then
  70461. pTDefRegMap(@Self)^.clr := $00000008
  70462. else
  70463. pTDefRegMap(@Self)^.&set := $00000008;
  70464. end;
  70465. function TCAN1_C1FIFOINT1.getRXOVFLIF : TBits_1; inline;
  70466. begin
  70467. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70468. end;
  70469. procedure TCAN1_C1FIFOINT1.setTXEMPTYIF; inline;
  70470. begin
  70471. pTDefRegMap(@Self)^.&set := $00000100;
  70472. end;
  70473. procedure TCAN1_C1FIFOINT1.clearTXEMPTYIF; inline;
  70474. begin
  70475. pTDefRegMap(@Self)^.clr := $00000100;
  70476. end;
  70477. procedure TCAN1_C1FIFOINT1.setTXEMPTYIF(thebits : TBits_1); inline;
  70478. begin
  70479. if thebits = 0 then
  70480. pTDefRegMap(@Self)^.clr := $00000100
  70481. else
  70482. pTDefRegMap(@Self)^.&set := $00000100;
  70483. end;
  70484. function TCAN1_C1FIFOINT1.getTXEMPTYIF : TBits_1; inline;
  70485. begin
  70486. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  70487. end;
  70488. procedure TCAN1_C1FIFOINT1.setTXHALFIF; inline;
  70489. begin
  70490. pTDefRegMap(@Self)^.&set := $00000200;
  70491. end;
  70492. procedure TCAN1_C1FIFOINT1.clearTXHALFIF; inline;
  70493. begin
  70494. pTDefRegMap(@Self)^.clr := $00000200;
  70495. end;
  70496. procedure TCAN1_C1FIFOINT1.setTXHALFIF(thebits : TBits_1); inline;
  70497. begin
  70498. if thebits = 0 then
  70499. pTDefRegMap(@Self)^.clr := $00000200
  70500. else
  70501. pTDefRegMap(@Self)^.&set := $00000200;
  70502. end;
  70503. function TCAN1_C1FIFOINT1.getTXHALFIF : TBits_1; inline;
  70504. begin
  70505. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  70506. end;
  70507. procedure TCAN1_C1FIFOINT1.setTXNFULLIF; inline;
  70508. begin
  70509. pTDefRegMap(@Self)^.&set := $00000400;
  70510. end;
  70511. procedure TCAN1_C1FIFOINT1.clearTXNFULLIF; inline;
  70512. begin
  70513. pTDefRegMap(@Self)^.clr := $00000400;
  70514. end;
  70515. procedure TCAN1_C1FIFOINT1.setTXNFULLIF(thebits : TBits_1); inline;
  70516. begin
  70517. if thebits = 0 then
  70518. pTDefRegMap(@Self)^.clr := $00000400
  70519. else
  70520. pTDefRegMap(@Self)^.&set := $00000400;
  70521. end;
  70522. function TCAN1_C1FIFOINT1.getTXNFULLIF : TBits_1; inline;
  70523. begin
  70524. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  70525. end;
  70526. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIE; inline;
  70527. begin
  70528. pTDefRegMap(@Self)^.&set := $00010000;
  70529. end;
  70530. procedure TCAN1_C1FIFOINT1.clearRXNEMPTYIE; inline;
  70531. begin
  70532. pTDefRegMap(@Self)^.clr := $00010000;
  70533. end;
  70534. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIE(thebits : TBits_1); inline;
  70535. begin
  70536. if thebits = 0 then
  70537. pTDefRegMap(@Self)^.clr := $00010000
  70538. else
  70539. pTDefRegMap(@Self)^.&set := $00010000;
  70540. end;
  70541. function TCAN1_C1FIFOINT1.getRXNEMPTYIE : TBits_1; inline;
  70542. begin
  70543. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  70544. end;
  70545. procedure TCAN1_C1FIFOINT1.setRXHALFIE; inline;
  70546. begin
  70547. pTDefRegMap(@Self)^.&set := $00020000;
  70548. end;
  70549. procedure TCAN1_C1FIFOINT1.clearRXHALFIE; inline;
  70550. begin
  70551. pTDefRegMap(@Self)^.clr := $00020000;
  70552. end;
  70553. procedure TCAN1_C1FIFOINT1.setRXHALFIE(thebits : TBits_1); inline;
  70554. begin
  70555. if thebits = 0 then
  70556. pTDefRegMap(@Self)^.clr := $00020000
  70557. else
  70558. pTDefRegMap(@Self)^.&set := $00020000;
  70559. end;
  70560. function TCAN1_C1FIFOINT1.getRXHALFIE : TBits_1; inline;
  70561. begin
  70562. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  70563. end;
  70564. procedure TCAN1_C1FIFOINT1.setRXFULLIE; inline;
  70565. begin
  70566. pTDefRegMap(@Self)^.&set := $00040000;
  70567. end;
  70568. procedure TCAN1_C1FIFOINT1.clearRXFULLIE; inline;
  70569. begin
  70570. pTDefRegMap(@Self)^.clr := $00040000;
  70571. end;
  70572. procedure TCAN1_C1FIFOINT1.setRXFULLIE(thebits : TBits_1); inline;
  70573. begin
  70574. if thebits = 0 then
  70575. pTDefRegMap(@Self)^.clr := $00040000
  70576. else
  70577. pTDefRegMap(@Self)^.&set := $00040000;
  70578. end;
  70579. function TCAN1_C1FIFOINT1.getRXFULLIE : TBits_1; inline;
  70580. begin
  70581. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  70582. end;
  70583. procedure TCAN1_C1FIFOINT1.setRXOVFLIE; inline;
  70584. begin
  70585. pTDefRegMap(@Self)^.&set := $00080000;
  70586. end;
  70587. procedure TCAN1_C1FIFOINT1.clearRXOVFLIE; inline;
  70588. begin
  70589. pTDefRegMap(@Self)^.clr := $00080000;
  70590. end;
  70591. procedure TCAN1_C1FIFOINT1.setRXOVFLIE(thebits : TBits_1); inline;
  70592. begin
  70593. if thebits = 0 then
  70594. pTDefRegMap(@Self)^.clr := $00080000
  70595. else
  70596. pTDefRegMap(@Self)^.&set := $00080000;
  70597. end;
  70598. function TCAN1_C1FIFOINT1.getRXOVFLIE : TBits_1; inline;
  70599. begin
  70600. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  70601. end;
  70602. procedure TCAN1_C1FIFOINT1.setTXEMPTYIE; inline;
  70603. begin
  70604. pTDefRegMap(@Self)^.&set := $01000000;
  70605. end;
  70606. procedure TCAN1_C1FIFOINT1.clearTXEMPTYIE; inline;
  70607. begin
  70608. pTDefRegMap(@Self)^.clr := $01000000;
  70609. end;
  70610. procedure TCAN1_C1FIFOINT1.setTXEMPTYIE(thebits : TBits_1); inline;
  70611. begin
  70612. if thebits = 0 then
  70613. pTDefRegMap(@Self)^.clr := $01000000
  70614. else
  70615. pTDefRegMap(@Self)^.&set := $01000000;
  70616. end;
  70617. function TCAN1_C1FIFOINT1.getTXEMPTYIE : TBits_1; inline;
  70618. begin
  70619. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  70620. end;
  70621. procedure TCAN1_C1FIFOINT1.setTXHALFIE; inline;
  70622. begin
  70623. pTDefRegMap(@Self)^.&set := $02000000;
  70624. end;
  70625. procedure TCAN1_C1FIFOINT1.clearTXHALFIE; inline;
  70626. begin
  70627. pTDefRegMap(@Self)^.clr := $02000000;
  70628. end;
  70629. procedure TCAN1_C1FIFOINT1.setTXHALFIE(thebits : TBits_1); inline;
  70630. begin
  70631. if thebits = 0 then
  70632. pTDefRegMap(@Self)^.clr := $02000000
  70633. else
  70634. pTDefRegMap(@Self)^.&set := $02000000;
  70635. end;
  70636. function TCAN1_C1FIFOINT1.getTXHALFIE : TBits_1; inline;
  70637. begin
  70638. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  70639. end;
  70640. procedure TCAN1_C1FIFOINT1.setTXNFULLIE; inline;
  70641. begin
  70642. pTDefRegMap(@Self)^.&set := $04000000;
  70643. end;
  70644. procedure TCAN1_C1FIFOINT1.clearTXNFULLIE; inline;
  70645. begin
  70646. pTDefRegMap(@Self)^.clr := $04000000;
  70647. end;
  70648. procedure TCAN1_C1FIFOINT1.setTXNFULLIE(thebits : TBits_1); inline;
  70649. begin
  70650. if thebits = 0 then
  70651. pTDefRegMap(@Self)^.clr := $04000000
  70652. else
  70653. pTDefRegMap(@Self)^.&set := $04000000;
  70654. end;
  70655. function TCAN1_C1FIFOINT1.getTXNFULLIE : TBits_1; inline;
  70656. begin
  70657. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  70658. end;
  70659. procedure TCAN1_C1FIFOINT1.setw(thebits : TBits_32); inline;
  70660. begin
  70661. pTDefRegMap(@Self)^.val := thebits;
  70662. end;
  70663. function TCAN1_C1FIFOINT1.getw : TBits_32; inline;
  70664. begin
  70665. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70666. end;
  70667. procedure TCAN1_C1FIFOCI1.setCFIFOCI(thebits : TBits_5); inline;
  70668. begin
  70669. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  70670. end;
  70671. function TCAN1_C1FIFOCI1.getCFIFOCI : TBits_5; inline;
  70672. begin
  70673. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  70674. end;
  70675. procedure TCAN1_C1FIFOCI1.setw(thebits : TBits_32); inline;
  70676. begin
  70677. pTDefRegMap(@Self)^.val := thebits;
  70678. end;
  70679. function TCAN1_C1FIFOCI1.getw : TBits_32; inline;
  70680. begin
  70681. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70682. end;
  70683. procedure TCAN1_C1FIFOCON2.setTXPRI(thebits : TBits_2); inline;
  70684. begin
  70685. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  70686. end;
  70687. function TCAN1_C1FIFOCON2.getTXPRI : TBits_2; inline;
  70688. begin
  70689. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  70690. end;
  70691. procedure TCAN1_C1FIFOCON2.setRTREN; inline;
  70692. begin
  70693. pTDefRegMap(@Self)^.&set := $00000004;
  70694. end;
  70695. procedure TCAN1_C1FIFOCON2.clearRTREN; inline;
  70696. begin
  70697. pTDefRegMap(@Self)^.clr := $00000004;
  70698. end;
  70699. procedure TCAN1_C1FIFOCON2.setRTREN(thebits : TBits_1); inline;
  70700. begin
  70701. if thebits = 0 then
  70702. pTDefRegMap(@Self)^.clr := $00000004
  70703. else
  70704. pTDefRegMap(@Self)^.&set := $00000004;
  70705. end;
  70706. function TCAN1_C1FIFOCON2.getRTREN : TBits_1; inline;
  70707. begin
  70708. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70709. end;
  70710. procedure TCAN1_C1FIFOCON2.setTXREQ; inline;
  70711. begin
  70712. pTDefRegMap(@Self)^.&set := $00000008;
  70713. end;
  70714. procedure TCAN1_C1FIFOCON2.clearTXREQ; inline;
  70715. begin
  70716. pTDefRegMap(@Self)^.clr := $00000008;
  70717. end;
  70718. procedure TCAN1_C1FIFOCON2.setTXREQ(thebits : TBits_1); inline;
  70719. begin
  70720. if thebits = 0 then
  70721. pTDefRegMap(@Self)^.clr := $00000008
  70722. else
  70723. pTDefRegMap(@Self)^.&set := $00000008;
  70724. end;
  70725. function TCAN1_C1FIFOCON2.getTXREQ : TBits_1; inline;
  70726. begin
  70727. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70728. end;
  70729. procedure TCAN1_C1FIFOCON2.setTXERR; inline;
  70730. begin
  70731. pTDefRegMap(@Self)^.&set := $00000010;
  70732. end;
  70733. procedure TCAN1_C1FIFOCON2.clearTXERR; inline;
  70734. begin
  70735. pTDefRegMap(@Self)^.clr := $00000010;
  70736. end;
  70737. procedure TCAN1_C1FIFOCON2.setTXERR(thebits : TBits_1); inline;
  70738. begin
  70739. if thebits = 0 then
  70740. pTDefRegMap(@Self)^.clr := $00000010
  70741. else
  70742. pTDefRegMap(@Self)^.&set := $00000010;
  70743. end;
  70744. function TCAN1_C1FIFOCON2.getTXERR : TBits_1; inline;
  70745. begin
  70746. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70747. end;
  70748. procedure TCAN1_C1FIFOCON2.setTXLARB; inline;
  70749. begin
  70750. pTDefRegMap(@Self)^.&set := $00000020;
  70751. end;
  70752. procedure TCAN1_C1FIFOCON2.clearTXLARB; inline;
  70753. begin
  70754. pTDefRegMap(@Self)^.clr := $00000020;
  70755. end;
  70756. procedure TCAN1_C1FIFOCON2.setTXLARB(thebits : TBits_1); inline;
  70757. begin
  70758. if thebits = 0 then
  70759. pTDefRegMap(@Self)^.clr := $00000020
  70760. else
  70761. pTDefRegMap(@Self)^.&set := $00000020;
  70762. end;
  70763. function TCAN1_C1FIFOCON2.getTXLARB : TBits_1; inline;
  70764. begin
  70765. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70766. end;
  70767. procedure TCAN1_C1FIFOCON2.setTXABAT; inline;
  70768. begin
  70769. pTDefRegMap(@Self)^.&set := $00000040;
  70770. end;
  70771. procedure TCAN1_C1FIFOCON2.clearTXABAT; inline;
  70772. begin
  70773. pTDefRegMap(@Self)^.clr := $00000040;
  70774. end;
  70775. procedure TCAN1_C1FIFOCON2.setTXABAT(thebits : TBits_1); inline;
  70776. begin
  70777. if thebits = 0 then
  70778. pTDefRegMap(@Self)^.clr := $00000040
  70779. else
  70780. pTDefRegMap(@Self)^.&set := $00000040;
  70781. end;
  70782. function TCAN1_C1FIFOCON2.getTXABAT : TBits_1; inline;
  70783. begin
  70784. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70785. end;
  70786. procedure TCAN1_C1FIFOCON2.setTXEN; inline;
  70787. begin
  70788. pTDefRegMap(@Self)^.&set := $00000080;
  70789. end;
  70790. procedure TCAN1_C1FIFOCON2.clearTXEN; inline;
  70791. begin
  70792. pTDefRegMap(@Self)^.clr := $00000080;
  70793. end;
  70794. procedure TCAN1_C1FIFOCON2.setTXEN(thebits : TBits_1); inline;
  70795. begin
  70796. if thebits = 0 then
  70797. pTDefRegMap(@Self)^.clr := $00000080
  70798. else
  70799. pTDefRegMap(@Self)^.&set := $00000080;
  70800. end;
  70801. function TCAN1_C1FIFOCON2.getTXEN : TBits_1; inline;
  70802. begin
  70803. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70804. end;
  70805. procedure TCAN1_C1FIFOCON2.setDONLY; inline;
  70806. begin
  70807. pTDefRegMap(@Self)^.&set := $00001000;
  70808. end;
  70809. procedure TCAN1_C1FIFOCON2.clearDONLY; inline;
  70810. begin
  70811. pTDefRegMap(@Self)^.clr := $00001000;
  70812. end;
  70813. procedure TCAN1_C1FIFOCON2.setDONLY(thebits : TBits_1); inline;
  70814. begin
  70815. if thebits = 0 then
  70816. pTDefRegMap(@Self)^.clr := $00001000
  70817. else
  70818. pTDefRegMap(@Self)^.&set := $00001000;
  70819. end;
  70820. function TCAN1_C1FIFOCON2.getDONLY : TBits_1; inline;
  70821. begin
  70822. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  70823. end;
  70824. procedure TCAN1_C1FIFOCON2.setUINC; inline;
  70825. begin
  70826. pTDefRegMap(@Self)^.&set := $00002000;
  70827. end;
  70828. procedure TCAN1_C1FIFOCON2.clearUINC; inline;
  70829. begin
  70830. pTDefRegMap(@Self)^.clr := $00002000;
  70831. end;
  70832. procedure TCAN1_C1FIFOCON2.setUINC(thebits : TBits_1); inline;
  70833. begin
  70834. if thebits = 0 then
  70835. pTDefRegMap(@Self)^.clr := $00002000
  70836. else
  70837. pTDefRegMap(@Self)^.&set := $00002000;
  70838. end;
  70839. function TCAN1_C1FIFOCON2.getUINC : TBits_1; inline;
  70840. begin
  70841. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  70842. end;
  70843. procedure TCAN1_C1FIFOCON2.setFRESET; inline;
  70844. begin
  70845. pTDefRegMap(@Self)^.&set := $00004000;
  70846. end;
  70847. procedure TCAN1_C1FIFOCON2.clearFRESET; inline;
  70848. begin
  70849. pTDefRegMap(@Self)^.clr := $00004000;
  70850. end;
  70851. procedure TCAN1_C1FIFOCON2.setFRESET(thebits : TBits_1); inline;
  70852. begin
  70853. if thebits = 0 then
  70854. pTDefRegMap(@Self)^.clr := $00004000
  70855. else
  70856. pTDefRegMap(@Self)^.&set := $00004000;
  70857. end;
  70858. function TCAN1_C1FIFOCON2.getFRESET : TBits_1; inline;
  70859. begin
  70860. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  70861. end;
  70862. procedure TCAN1_C1FIFOCON2.setFSIZE(thebits : TBits_5); inline;
  70863. begin
  70864. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  70865. end;
  70866. function TCAN1_C1FIFOCON2.getFSIZE : TBits_5; inline;
  70867. begin
  70868. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  70869. end;
  70870. procedure TCAN1_C1FIFOCON2.setw(thebits : TBits_32); inline;
  70871. begin
  70872. pTDefRegMap(@Self)^.val := thebits;
  70873. end;
  70874. function TCAN1_C1FIFOCON2.getw : TBits_32; inline;
  70875. begin
  70876. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70877. end;
  70878. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIF; inline;
  70879. begin
  70880. pTDefRegMap(@Self)^.&set := $00000001;
  70881. end;
  70882. procedure TCAN1_C1FIFOINT2.clearRXNEMPTYIF; inline;
  70883. begin
  70884. pTDefRegMap(@Self)^.clr := $00000001;
  70885. end;
  70886. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIF(thebits : TBits_1); inline;
  70887. begin
  70888. if thebits = 0 then
  70889. pTDefRegMap(@Self)^.clr := $00000001
  70890. else
  70891. pTDefRegMap(@Self)^.&set := $00000001;
  70892. end;
  70893. function TCAN1_C1FIFOINT2.getRXNEMPTYIF : TBits_1; inline;
  70894. begin
  70895. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70896. end;
  70897. procedure TCAN1_C1FIFOINT2.setRXHALFIF; inline;
  70898. begin
  70899. pTDefRegMap(@Self)^.&set := $00000002;
  70900. end;
  70901. procedure TCAN1_C1FIFOINT2.clearRXHALFIF; inline;
  70902. begin
  70903. pTDefRegMap(@Self)^.clr := $00000002;
  70904. end;
  70905. procedure TCAN1_C1FIFOINT2.setRXHALFIF(thebits : TBits_1); inline;
  70906. begin
  70907. if thebits = 0 then
  70908. pTDefRegMap(@Self)^.clr := $00000002
  70909. else
  70910. pTDefRegMap(@Self)^.&set := $00000002;
  70911. end;
  70912. function TCAN1_C1FIFOINT2.getRXHALFIF : TBits_1; inline;
  70913. begin
  70914. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70915. end;
  70916. procedure TCAN1_C1FIFOINT2.setRXFULLIF; inline;
  70917. begin
  70918. pTDefRegMap(@Self)^.&set := $00000004;
  70919. end;
  70920. procedure TCAN1_C1FIFOINT2.clearRXFULLIF; inline;
  70921. begin
  70922. pTDefRegMap(@Self)^.clr := $00000004;
  70923. end;
  70924. procedure TCAN1_C1FIFOINT2.setRXFULLIF(thebits : TBits_1); inline;
  70925. begin
  70926. if thebits = 0 then
  70927. pTDefRegMap(@Self)^.clr := $00000004
  70928. else
  70929. pTDefRegMap(@Self)^.&set := $00000004;
  70930. end;
  70931. function TCAN1_C1FIFOINT2.getRXFULLIF : TBits_1; inline;
  70932. begin
  70933. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70934. end;
  70935. procedure TCAN1_C1FIFOINT2.setRXOVFLIF; inline;
  70936. begin
  70937. pTDefRegMap(@Self)^.&set := $00000008;
  70938. end;
  70939. procedure TCAN1_C1FIFOINT2.clearRXOVFLIF; inline;
  70940. begin
  70941. pTDefRegMap(@Self)^.clr := $00000008;
  70942. end;
  70943. procedure TCAN1_C1FIFOINT2.setRXOVFLIF(thebits : TBits_1); inline;
  70944. begin
  70945. if thebits = 0 then
  70946. pTDefRegMap(@Self)^.clr := $00000008
  70947. else
  70948. pTDefRegMap(@Self)^.&set := $00000008;
  70949. end;
  70950. function TCAN1_C1FIFOINT2.getRXOVFLIF : TBits_1; inline;
  70951. begin
  70952. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70953. end;
  70954. procedure TCAN1_C1FIFOINT2.setTXEMPTYIF; inline;
  70955. begin
  70956. pTDefRegMap(@Self)^.&set := $00000100;
  70957. end;
  70958. procedure TCAN1_C1FIFOINT2.clearTXEMPTYIF; inline;
  70959. begin
  70960. pTDefRegMap(@Self)^.clr := $00000100;
  70961. end;
  70962. procedure TCAN1_C1FIFOINT2.setTXEMPTYIF(thebits : TBits_1); inline;
  70963. begin
  70964. if thebits = 0 then
  70965. pTDefRegMap(@Self)^.clr := $00000100
  70966. else
  70967. pTDefRegMap(@Self)^.&set := $00000100;
  70968. end;
  70969. function TCAN1_C1FIFOINT2.getTXEMPTYIF : TBits_1; inline;
  70970. begin
  70971. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  70972. end;
  70973. procedure TCAN1_C1FIFOINT2.setTXHALFIF; inline;
  70974. begin
  70975. pTDefRegMap(@Self)^.&set := $00000200;
  70976. end;
  70977. procedure TCAN1_C1FIFOINT2.clearTXHALFIF; inline;
  70978. begin
  70979. pTDefRegMap(@Self)^.clr := $00000200;
  70980. end;
  70981. procedure TCAN1_C1FIFOINT2.setTXHALFIF(thebits : TBits_1); inline;
  70982. begin
  70983. if thebits = 0 then
  70984. pTDefRegMap(@Self)^.clr := $00000200
  70985. else
  70986. pTDefRegMap(@Self)^.&set := $00000200;
  70987. end;
  70988. function TCAN1_C1FIFOINT2.getTXHALFIF : TBits_1; inline;
  70989. begin
  70990. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  70991. end;
  70992. procedure TCAN1_C1FIFOINT2.setTXNFULLIF; inline;
  70993. begin
  70994. pTDefRegMap(@Self)^.&set := $00000400;
  70995. end;
  70996. procedure TCAN1_C1FIFOINT2.clearTXNFULLIF; inline;
  70997. begin
  70998. pTDefRegMap(@Self)^.clr := $00000400;
  70999. end;
  71000. procedure TCAN1_C1FIFOINT2.setTXNFULLIF(thebits : TBits_1); inline;
  71001. begin
  71002. if thebits = 0 then
  71003. pTDefRegMap(@Self)^.clr := $00000400
  71004. else
  71005. pTDefRegMap(@Self)^.&set := $00000400;
  71006. end;
  71007. function TCAN1_C1FIFOINT2.getTXNFULLIF : TBits_1; inline;
  71008. begin
  71009. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  71010. end;
  71011. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIE; inline;
  71012. begin
  71013. pTDefRegMap(@Self)^.&set := $00010000;
  71014. end;
  71015. procedure TCAN1_C1FIFOINT2.clearRXNEMPTYIE; inline;
  71016. begin
  71017. pTDefRegMap(@Self)^.clr := $00010000;
  71018. end;
  71019. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIE(thebits : TBits_1); inline;
  71020. begin
  71021. if thebits = 0 then
  71022. pTDefRegMap(@Self)^.clr := $00010000
  71023. else
  71024. pTDefRegMap(@Self)^.&set := $00010000;
  71025. end;
  71026. function TCAN1_C1FIFOINT2.getRXNEMPTYIE : TBits_1; inline;
  71027. begin
  71028. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  71029. end;
  71030. procedure TCAN1_C1FIFOINT2.setRXHALFIE; inline;
  71031. begin
  71032. pTDefRegMap(@Self)^.&set := $00020000;
  71033. end;
  71034. procedure TCAN1_C1FIFOINT2.clearRXHALFIE; inline;
  71035. begin
  71036. pTDefRegMap(@Self)^.clr := $00020000;
  71037. end;
  71038. procedure TCAN1_C1FIFOINT2.setRXHALFIE(thebits : TBits_1); inline;
  71039. begin
  71040. if thebits = 0 then
  71041. pTDefRegMap(@Self)^.clr := $00020000
  71042. else
  71043. pTDefRegMap(@Self)^.&set := $00020000;
  71044. end;
  71045. function TCAN1_C1FIFOINT2.getRXHALFIE : TBits_1; inline;
  71046. begin
  71047. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  71048. end;
  71049. procedure TCAN1_C1FIFOINT2.setRXFULLIE; inline;
  71050. begin
  71051. pTDefRegMap(@Self)^.&set := $00040000;
  71052. end;
  71053. procedure TCAN1_C1FIFOINT2.clearRXFULLIE; inline;
  71054. begin
  71055. pTDefRegMap(@Self)^.clr := $00040000;
  71056. end;
  71057. procedure TCAN1_C1FIFOINT2.setRXFULLIE(thebits : TBits_1); inline;
  71058. begin
  71059. if thebits = 0 then
  71060. pTDefRegMap(@Self)^.clr := $00040000
  71061. else
  71062. pTDefRegMap(@Self)^.&set := $00040000;
  71063. end;
  71064. function TCAN1_C1FIFOINT2.getRXFULLIE : TBits_1; inline;
  71065. begin
  71066. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  71067. end;
  71068. procedure TCAN1_C1FIFOINT2.setRXOVFLIE; inline;
  71069. begin
  71070. pTDefRegMap(@Self)^.&set := $00080000;
  71071. end;
  71072. procedure TCAN1_C1FIFOINT2.clearRXOVFLIE; inline;
  71073. begin
  71074. pTDefRegMap(@Self)^.clr := $00080000;
  71075. end;
  71076. procedure TCAN1_C1FIFOINT2.setRXOVFLIE(thebits : TBits_1); inline;
  71077. begin
  71078. if thebits = 0 then
  71079. pTDefRegMap(@Self)^.clr := $00080000
  71080. else
  71081. pTDefRegMap(@Self)^.&set := $00080000;
  71082. end;
  71083. function TCAN1_C1FIFOINT2.getRXOVFLIE : TBits_1; inline;
  71084. begin
  71085. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  71086. end;
  71087. procedure TCAN1_C1FIFOINT2.setTXEMPTYIE; inline;
  71088. begin
  71089. pTDefRegMap(@Self)^.&set := $01000000;
  71090. end;
  71091. procedure TCAN1_C1FIFOINT2.clearTXEMPTYIE; inline;
  71092. begin
  71093. pTDefRegMap(@Self)^.clr := $01000000;
  71094. end;
  71095. procedure TCAN1_C1FIFOINT2.setTXEMPTYIE(thebits : TBits_1); inline;
  71096. begin
  71097. if thebits = 0 then
  71098. pTDefRegMap(@Self)^.clr := $01000000
  71099. else
  71100. pTDefRegMap(@Self)^.&set := $01000000;
  71101. end;
  71102. function TCAN1_C1FIFOINT2.getTXEMPTYIE : TBits_1; inline;
  71103. begin
  71104. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  71105. end;
  71106. procedure TCAN1_C1FIFOINT2.setTXHALFIE; inline;
  71107. begin
  71108. pTDefRegMap(@Self)^.&set := $02000000;
  71109. end;
  71110. procedure TCAN1_C1FIFOINT2.clearTXHALFIE; inline;
  71111. begin
  71112. pTDefRegMap(@Self)^.clr := $02000000;
  71113. end;
  71114. procedure TCAN1_C1FIFOINT2.setTXHALFIE(thebits : TBits_1); inline;
  71115. begin
  71116. if thebits = 0 then
  71117. pTDefRegMap(@Self)^.clr := $02000000
  71118. else
  71119. pTDefRegMap(@Self)^.&set := $02000000;
  71120. end;
  71121. function TCAN1_C1FIFOINT2.getTXHALFIE : TBits_1; inline;
  71122. begin
  71123. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  71124. end;
  71125. procedure TCAN1_C1FIFOINT2.setTXNFULLIE; inline;
  71126. begin
  71127. pTDefRegMap(@Self)^.&set := $04000000;
  71128. end;
  71129. procedure TCAN1_C1FIFOINT2.clearTXNFULLIE; inline;
  71130. begin
  71131. pTDefRegMap(@Self)^.clr := $04000000;
  71132. end;
  71133. procedure TCAN1_C1FIFOINT2.setTXNFULLIE(thebits : TBits_1); inline;
  71134. begin
  71135. if thebits = 0 then
  71136. pTDefRegMap(@Self)^.clr := $04000000
  71137. else
  71138. pTDefRegMap(@Self)^.&set := $04000000;
  71139. end;
  71140. function TCAN1_C1FIFOINT2.getTXNFULLIE : TBits_1; inline;
  71141. begin
  71142. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  71143. end;
  71144. procedure TCAN1_C1FIFOINT2.setw(thebits : TBits_32); inline;
  71145. begin
  71146. pTDefRegMap(@Self)^.val := thebits;
  71147. end;
  71148. function TCAN1_C1FIFOINT2.getw : TBits_32; inline;
  71149. begin
  71150. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71151. end;
  71152. procedure TCAN1_C1FIFOCI2.setCFIFOCI(thebits : TBits_5); inline;
  71153. begin
  71154. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  71155. end;
  71156. function TCAN1_C1FIFOCI2.getCFIFOCI : TBits_5; inline;
  71157. begin
  71158. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  71159. end;
  71160. procedure TCAN1_C1FIFOCI2.setw(thebits : TBits_32); inline;
  71161. begin
  71162. pTDefRegMap(@Self)^.val := thebits;
  71163. end;
  71164. function TCAN1_C1FIFOCI2.getw : TBits_32; inline;
  71165. begin
  71166. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71167. end;
  71168. procedure TCAN1_C1FIFOCON3.setTXPRI(thebits : TBits_2); inline;
  71169. begin
  71170. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  71171. end;
  71172. function TCAN1_C1FIFOCON3.getTXPRI : TBits_2; inline;
  71173. begin
  71174. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  71175. end;
  71176. procedure TCAN1_C1FIFOCON3.setRTREN; inline;
  71177. begin
  71178. pTDefRegMap(@Self)^.&set := $00000004;
  71179. end;
  71180. procedure TCAN1_C1FIFOCON3.clearRTREN; inline;
  71181. begin
  71182. pTDefRegMap(@Self)^.clr := $00000004;
  71183. end;
  71184. procedure TCAN1_C1FIFOCON3.setRTREN(thebits : TBits_1); inline;
  71185. begin
  71186. if thebits = 0 then
  71187. pTDefRegMap(@Self)^.clr := $00000004
  71188. else
  71189. pTDefRegMap(@Self)^.&set := $00000004;
  71190. end;
  71191. function TCAN1_C1FIFOCON3.getRTREN : TBits_1; inline;
  71192. begin
  71193. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71194. end;
  71195. procedure TCAN1_C1FIFOCON3.setTXREQ; inline;
  71196. begin
  71197. pTDefRegMap(@Self)^.&set := $00000008;
  71198. end;
  71199. procedure TCAN1_C1FIFOCON3.clearTXREQ; inline;
  71200. begin
  71201. pTDefRegMap(@Self)^.clr := $00000008;
  71202. end;
  71203. procedure TCAN1_C1FIFOCON3.setTXREQ(thebits : TBits_1); inline;
  71204. begin
  71205. if thebits = 0 then
  71206. pTDefRegMap(@Self)^.clr := $00000008
  71207. else
  71208. pTDefRegMap(@Self)^.&set := $00000008;
  71209. end;
  71210. function TCAN1_C1FIFOCON3.getTXREQ : TBits_1; inline;
  71211. begin
  71212. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71213. end;
  71214. procedure TCAN1_C1FIFOCON3.setTXERR; inline;
  71215. begin
  71216. pTDefRegMap(@Self)^.&set := $00000010;
  71217. end;
  71218. procedure TCAN1_C1FIFOCON3.clearTXERR; inline;
  71219. begin
  71220. pTDefRegMap(@Self)^.clr := $00000010;
  71221. end;
  71222. procedure TCAN1_C1FIFOCON3.setTXERR(thebits : TBits_1); inline;
  71223. begin
  71224. if thebits = 0 then
  71225. pTDefRegMap(@Self)^.clr := $00000010
  71226. else
  71227. pTDefRegMap(@Self)^.&set := $00000010;
  71228. end;
  71229. function TCAN1_C1FIFOCON3.getTXERR : TBits_1; inline;
  71230. begin
  71231. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71232. end;
  71233. procedure TCAN1_C1FIFOCON3.setTXLARB; inline;
  71234. begin
  71235. pTDefRegMap(@Self)^.&set := $00000020;
  71236. end;
  71237. procedure TCAN1_C1FIFOCON3.clearTXLARB; inline;
  71238. begin
  71239. pTDefRegMap(@Self)^.clr := $00000020;
  71240. end;
  71241. procedure TCAN1_C1FIFOCON3.setTXLARB(thebits : TBits_1); inline;
  71242. begin
  71243. if thebits = 0 then
  71244. pTDefRegMap(@Self)^.clr := $00000020
  71245. else
  71246. pTDefRegMap(@Self)^.&set := $00000020;
  71247. end;
  71248. function TCAN1_C1FIFOCON3.getTXLARB : TBits_1; inline;
  71249. begin
  71250. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71251. end;
  71252. procedure TCAN1_C1FIFOCON3.setTXABAT; inline;
  71253. begin
  71254. pTDefRegMap(@Self)^.&set := $00000040;
  71255. end;
  71256. procedure TCAN1_C1FIFOCON3.clearTXABAT; inline;
  71257. begin
  71258. pTDefRegMap(@Self)^.clr := $00000040;
  71259. end;
  71260. procedure TCAN1_C1FIFOCON3.setTXABAT(thebits : TBits_1); inline;
  71261. begin
  71262. if thebits = 0 then
  71263. pTDefRegMap(@Self)^.clr := $00000040
  71264. else
  71265. pTDefRegMap(@Self)^.&set := $00000040;
  71266. end;
  71267. function TCAN1_C1FIFOCON3.getTXABAT : TBits_1; inline;
  71268. begin
  71269. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71270. end;
  71271. procedure TCAN1_C1FIFOCON3.setTXEN; inline;
  71272. begin
  71273. pTDefRegMap(@Self)^.&set := $00000080;
  71274. end;
  71275. procedure TCAN1_C1FIFOCON3.clearTXEN; inline;
  71276. begin
  71277. pTDefRegMap(@Self)^.clr := $00000080;
  71278. end;
  71279. procedure TCAN1_C1FIFOCON3.setTXEN(thebits : TBits_1); inline;
  71280. begin
  71281. if thebits = 0 then
  71282. pTDefRegMap(@Self)^.clr := $00000080
  71283. else
  71284. pTDefRegMap(@Self)^.&set := $00000080;
  71285. end;
  71286. function TCAN1_C1FIFOCON3.getTXEN : TBits_1; inline;
  71287. begin
  71288. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71289. end;
  71290. procedure TCAN1_C1FIFOCON3.setDONLY; inline;
  71291. begin
  71292. pTDefRegMap(@Self)^.&set := $00001000;
  71293. end;
  71294. procedure TCAN1_C1FIFOCON3.clearDONLY; inline;
  71295. begin
  71296. pTDefRegMap(@Self)^.clr := $00001000;
  71297. end;
  71298. procedure TCAN1_C1FIFOCON3.setDONLY(thebits : TBits_1); inline;
  71299. begin
  71300. if thebits = 0 then
  71301. pTDefRegMap(@Self)^.clr := $00001000
  71302. else
  71303. pTDefRegMap(@Self)^.&set := $00001000;
  71304. end;
  71305. function TCAN1_C1FIFOCON3.getDONLY : TBits_1; inline;
  71306. begin
  71307. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  71308. end;
  71309. procedure TCAN1_C1FIFOCON3.setUINC; inline;
  71310. begin
  71311. pTDefRegMap(@Self)^.&set := $00002000;
  71312. end;
  71313. procedure TCAN1_C1FIFOCON3.clearUINC; inline;
  71314. begin
  71315. pTDefRegMap(@Self)^.clr := $00002000;
  71316. end;
  71317. procedure TCAN1_C1FIFOCON3.setUINC(thebits : TBits_1); inline;
  71318. begin
  71319. if thebits = 0 then
  71320. pTDefRegMap(@Self)^.clr := $00002000
  71321. else
  71322. pTDefRegMap(@Self)^.&set := $00002000;
  71323. end;
  71324. function TCAN1_C1FIFOCON3.getUINC : TBits_1; inline;
  71325. begin
  71326. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  71327. end;
  71328. procedure TCAN1_C1FIFOCON3.setFRESET; inline;
  71329. begin
  71330. pTDefRegMap(@Self)^.&set := $00004000;
  71331. end;
  71332. procedure TCAN1_C1FIFOCON3.clearFRESET; inline;
  71333. begin
  71334. pTDefRegMap(@Self)^.clr := $00004000;
  71335. end;
  71336. procedure TCAN1_C1FIFOCON3.setFRESET(thebits : TBits_1); inline;
  71337. begin
  71338. if thebits = 0 then
  71339. pTDefRegMap(@Self)^.clr := $00004000
  71340. else
  71341. pTDefRegMap(@Self)^.&set := $00004000;
  71342. end;
  71343. function TCAN1_C1FIFOCON3.getFRESET : TBits_1; inline;
  71344. begin
  71345. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  71346. end;
  71347. procedure TCAN1_C1FIFOCON3.setFSIZE(thebits : TBits_5); inline;
  71348. begin
  71349. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  71350. end;
  71351. function TCAN1_C1FIFOCON3.getFSIZE : TBits_5; inline;
  71352. begin
  71353. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  71354. end;
  71355. procedure TCAN1_C1FIFOCON3.setw(thebits : TBits_32); inline;
  71356. begin
  71357. pTDefRegMap(@Self)^.val := thebits;
  71358. end;
  71359. function TCAN1_C1FIFOCON3.getw : TBits_32; inline;
  71360. begin
  71361. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71362. end;
  71363. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIF; inline;
  71364. begin
  71365. pTDefRegMap(@Self)^.&set := $00000001;
  71366. end;
  71367. procedure TCAN1_C1FIFOINT3.clearRXNEMPTYIF; inline;
  71368. begin
  71369. pTDefRegMap(@Self)^.clr := $00000001;
  71370. end;
  71371. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIF(thebits : TBits_1); inline;
  71372. begin
  71373. if thebits = 0 then
  71374. pTDefRegMap(@Self)^.clr := $00000001
  71375. else
  71376. pTDefRegMap(@Self)^.&set := $00000001;
  71377. end;
  71378. function TCAN1_C1FIFOINT3.getRXNEMPTYIF : TBits_1; inline;
  71379. begin
  71380. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  71381. end;
  71382. procedure TCAN1_C1FIFOINT3.setRXHALFIF; inline;
  71383. begin
  71384. pTDefRegMap(@Self)^.&set := $00000002;
  71385. end;
  71386. procedure TCAN1_C1FIFOINT3.clearRXHALFIF; inline;
  71387. begin
  71388. pTDefRegMap(@Self)^.clr := $00000002;
  71389. end;
  71390. procedure TCAN1_C1FIFOINT3.setRXHALFIF(thebits : TBits_1); inline;
  71391. begin
  71392. if thebits = 0 then
  71393. pTDefRegMap(@Self)^.clr := $00000002
  71394. else
  71395. pTDefRegMap(@Self)^.&set := $00000002;
  71396. end;
  71397. function TCAN1_C1FIFOINT3.getRXHALFIF : TBits_1; inline;
  71398. begin
  71399. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  71400. end;
  71401. procedure TCAN1_C1FIFOINT3.setRXFULLIF; inline;
  71402. begin
  71403. pTDefRegMap(@Self)^.&set := $00000004;
  71404. end;
  71405. procedure TCAN1_C1FIFOINT3.clearRXFULLIF; inline;
  71406. begin
  71407. pTDefRegMap(@Self)^.clr := $00000004;
  71408. end;
  71409. procedure TCAN1_C1FIFOINT3.setRXFULLIF(thebits : TBits_1); inline;
  71410. begin
  71411. if thebits = 0 then
  71412. pTDefRegMap(@Self)^.clr := $00000004
  71413. else
  71414. pTDefRegMap(@Self)^.&set := $00000004;
  71415. end;
  71416. function TCAN1_C1FIFOINT3.getRXFULLIF : TBits_1; inline;
  71417. begin
  71418. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71419. end;
  71420. procedure TCAN1_C1FIFOINT3.setRXOVFLIF; inline;
  71421. begin
  71422. pTDefRegMap(@Self)^.&set := $00000008;
  71423. end;
  71424. procedure TCAN1_C1FIFOINT3.clearRXOVFLIF; inline;
  71425. begin
  71426. pTDefRegMap(@Self)^.clr := $00000008;
  71427. end;
  71428. procedure TCAN1_C1FIFOINT3.setRXOVFLIF(thebits : TBits_1); inline;
  71429. begin
  71430. if thebits = 0 then
  71431. pTDefRegMap(@Self)^.clr := $00000008
  71432. else
  71433. pTDefRegMap(@Self)^.&set := $00000008;
  71434. end;
  71435. function TCAN1_C1FIFOINT3.getRXOVFLIF : TBits_1; inline;
  71436. begin
  71437. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71438. end;
  71439. procedure TCAN1_C1FIFOINT3.setTXEMPTYIF; inline;
  71440. begin
  71441. pTDefRegMap(@Self)^.&set := $00000100;
  71442. end;
  71443. procedure TCAN1_C1FIFOINT3.clearTXEMPTYIF; inline;
  71444. begin
  71445. pTDefRegMap(@Self)^.clr := $00000100;
  71446. end;
  71447. procedure TCAN1_C1FIFOINT3.setTXEMPTYIF(thebits : TBits_1); inline;
  71448. begin
  71449. if thebits = 0 then
  71450. pTDefRegMap(@Self)^.clr := $00000100
  71451. else
  71452. pTDefRegMap(@Self)^.&set := $00000100;
  71453. end;
  71454. function TCAN1_C1FIFOINT3.getTXEMPTYIF : TBits_1; inline;
  71455. begin
  71456. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71457. end;
  71458. procedure TCAN1_C1FIFOINT3.setTXHALFIF; inline;
  71459. begin
  71460. pTDefRegMap(@Self)^.&set := $00000200;
  71461. end;
  71462. procedure TCAN1_C1FIFOINT3.clearTXHALFIF; inline;
  71463. begin
  71464. pTDefRegMap(@Self)^.clr := $00000200;
  71465. end;
  71466. procedure TCAN1_C1FIFOINT3.setTXHALFIF(thebits : TBits_1); inline;
  71467. begin
  71468. if thebits = 0 then
  71469. pTDefRegMap(@Self)^.clr := $00000200
  71470. else
  71471. pTDefRegMap(@Self)^.&set := $00000200;
  71472. end;
  71473. function TCAN1_C1FIFOINT3.getTXHALFIF : TBits_1; inline;
  71474. begin
  71475. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71476. end;
  71477. procedure TCAN1_C1FIFOINT3.setTXNFULLIF; inline;
  71478. begin
  71479. pTDefRegMap(@Self)^.&set := $00000400;
  71480. end;
  71481. procedure TCAN1_C1FIFOINT3.clearTXNFULLIF; inline;
  71482. begin
  71483. pTDefRegMap(@Self)^.clr := $00000400;
  71484. end;
  71485. procedure TCAN1_C1FIFOINT3.setTXNFULLIF(thebits : TBits_1); inline;
  71486. begin
  71487. if thebits = 0 then
  71488. pTDefRegMap(@Self)^.clr := $00000400
  71489. else
  71490. pTDefRegMap(@Self)^.&set := $00000400;
  71491. end;
  71492. function TCAN1_C1FIFOINT3.getTXNFULLIF : TBits_1; inline;
  71493. begin
  71494. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  71495. end;
  71496. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIE; inline;
  71497. begin
  71498. pTDefRegMap(@Self)^.&set := $00010000;
  71499. end;
  71500. procedure TCAN1_C1FIFOINT3.clearRXNEMPTYIE; inline;
  71501. begin
  71502. pTDefRegMap(@Self)^.clr := $00010000;
  71503. end;
  71504. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIE(thebits : TBits_1); inline;
  71505. begin
  71506. if thebits = 0 then
  71507. pTDefRegMap(@Self)^.clr := $00010000
  71508. else
  71509. pTDefRegMap(@Self)^.&set := $00010000;
  71510. end;
  71511. function TCAN1_C1FIFOINT3.getRXNEMPTYIE : TBits_1; inline;
  71512. begin
  71513. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  71514. end;
  71515. procedure TCAN1_C1FIFOINT3.setRXHALFIE; inline;
  71516. begin
  71517. pTDefRegMap(@Self)^.&set := $00020000;
  71518. end;
  71519. procedure TCAN1_C1FIFOINT3.clearRXHALFIE; inline;
  71520. begin
  71521. pTDefRegMap(@Self)^.clr := $00020000;
  71522. end;
  71523. procedure TCAN1_C1FIFOINT3.setRXHALFIE(thebits : TBits_1); inline;
  71524. begin
  71525. if thebits = 0 then
  71526. pTDefRegMap(@Self)^.clr := $00020000
  71527. else
  71528. pTDefRegMap(@Self)^.&set := $00020000;
  71529. end;
  71530. function TCAN1_C1FIFOINT3.getRXHALFIE : TBits_1; inline;
  71531. begin
  71532. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  71533. end;
  71534. procedure TCAN1_C1FIFOINT3.setRXFULLIE; inline;
  71535. begin
  71536. pTDefRegMap(@Self)^.&set := $00040000;
  71537. end;
  71538. procedure TCAN1_C1FIFOINT3.clearRXFULLIE; inline;
  71539. begin
  71540. pTDefRegMap(@Self)^.clr := $00040000;
  71541. end;
  71542. procedure TCAN1_C1FIFOINT3.setRXFULLIE(thebits : TBits_1); inline;
  71543. begin
  71544. if thebits = 0 then
  71545. pTDefRegMap(@Self)^.clr := $00040000
  71546. else
  71547. pTDefRegMap(@Self)^.&set := $00040000;
  71548. end;
  71549. function TCAN1_C1FIFOINT3.getRXFULLIE : TBits_1; inline;
  71550. begin
  71551. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  71552. end;
  71553. procedure TCAN1_C1FIFOINT3.setRXOVFLIE; inline;
  71554. begin
  71555. pTDefRegMap(@Self)^.&set := $00080000;
  71556. end;
  71557. procedure TCAN1_C1FIFOINT3.clearRXOVFLIE; inline;
  71558. begin
  71559. pTDefRegMap(@Self)^.clr := $00080000;
  71560. end;
  71561. procedure TCAN1_C1FIFOINT3.setRXOVFLIE(thebits : TBits_1); inline;
  71562. begin
  71563. if thebits = 0 then
  71564. pTDefRegMap(@Self)^.clr := $00080000
  71565. else
  71566. pTDefRegMap(@Self)^.&set := $00080000;
  71567. end;
  71568. function TCAN1_C1FIFOINT3.getRXOVFLIE : TBits_1; inline;
  71569. begin
  71570. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  71571. end;
  71572. procedure TCAN1_C1FIFOINT3.setTXEMPTYIE; inline;
  71573. begin
  71574. pTDefRegMap(@Self)^.&set := $01000000;
  71575. end;
  71576. procedure TCAN1_C1FIFOINT3.clearTXEMPTYIE; inline;
  71577. begin
  71578. pTDefRegMap(@Self)^.clr := $01000000;
  71579. end;
  71580. procedure TCAN1_C1FIFOINT3.setTXEMPTYIE(thebits : TBits_1); inline;
  71581. begin
  71582. if thebits = 0 then
  71583. pTDefRegMap(@Self)^.clr := $01000000
  71584. else
  71585. pTDefRegMap(@Self)^.&set := $01000000;
  71586. end;
  71587. function TCAN1_C1FIFOINT3.getTXEMPTYIE : TBits_1; inline;
  71588. begin
  71589. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  71590. end;
  71591. procedure TCAN1_C1FIFOINT3.setTXHALFIE; inline;
  71592. begin
  71593. pTDefRegMap(@Self)^.&set := $02000000;
  71594. end;
  71595. procedure TCAN1_C1FIFOINT3.clearTXHALFIE; inline;
  71596. begin
  71597. pTDefRegMap(@Self)^.clr := $02000000;
  71598. end;
  71599. procedure TCAN1_C1FIFOINT3.setTXHALFIE(thebits : TBits_1); inline;
  71600. begin
  71601. if thebits = 0 then
  71602. pTDefRegMap(@Self)^.clr := $02000000
  71603. else
  71604. pTDefRegMap(@Self)^.&set := $02000000;
  71605. end;
  71606. function TCAN1_C1FIFOINT3.getTXHALFIE : TBits_1; inline;
  71607. begin
  71608. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  71609. end;
  71610. procedure TCAN1_C1FIFOINT3.setTXNFULLIE; inline;
  71611. begin
  71612. pTDefRegMap(@Self)^.&set := $04000000;
  71613. end;
  71614. procedure TCAN1_C1FIFOINT3.clearTXNFULLIE; inline;
  71615. begin
  71616. pTDefRegMap(@Self)^.clr := $04000000;
  71617. end;
  71618. procedure TCAN1_C1FIFOINT3.setTXNFULLIE(thebits : TBits_1); inline;
  71619. begin
  71620. if thebits = 0 then
  71621. pTDefRegMap(@Self)^.clr := $04000000
  71622. else
  71623. pTDefRegMap(@Self)^.&set := $04000000;
  71624. end;
  71625. function TCAN1_C1FIFOINT3.getTXNFULLIE : TBits_1; inline;
  71626. begin
  71627. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  71628. end;
  71629. procedure TCAN1_C1FIFOINT3.setw(thebits : TBits_32); inline;
  71630. begin
  71631. pTDefRegMap(@Self)^.val := thebits;
  71632. end;
  71633. function TCAN1_C1FIFOINT3.getw : TBits_32; inline;
  71634. begin
  71635. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71636. end;
  71637. procedure TCAN1_C1FIFOCI3.setCFIFOCI(thebits : TBits_5); inline;
  71638. begin
  71639. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  71640. end;
  71641. function TCAN1_C1FIFOCI3.getCFIFOCI : TBits_5; inline;
  71642. begin
  71643. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  71644. end;
  71645. procedure TCAN1_C1FIFOCI3.setw(thebits : TBits_32); inline;
  71646. begin
  71647. pTDefRegMap(@Self)^.val := thebits;
  71648. end;
  71649. function TCAN1_C1FIFOCI3.getw : TBits_32; inline;
  71650. begin
  71651. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71652. end;
  71653. procedure TCAN1_C1FIFOCON4.setTXPRI(thebits : TBits_2); inline;
  71654. begin
  71655. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  71656. end;
  71657. function TCAN1_C1FIFOCON4.getTXPRI : TBits_2; inline;
  71658. begin
  71659. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  71660. end;
  71661. procedure TCAN1_C1FIFOCON4.setRTREN; inline;
  71662. begin
  71663. pTDefRegMap(@Self)^.&set := $00000004;
  71664. end;
  71665. procedure TCAN1_C1FIFOCON4.clearRTREN; inline;
  71666. begin
  71667. pTDefRegMap(@Self)^.clr := $00000004;
  71668. end;
  71669. procedure TCAN1_C1FIFOCON4.setRTREN(thebits : TBits_1); inline;
  71670. begin
  71671. if thebits = 0 then
  71672. pTDefRegMap(@Self)^.clr := $00000004
  71673. else
  71674. pTDefRegMap(@Self)^.&set := $00000004;
  71675. end;
  71676. function TCAN1_C1FIFOCON4.getRTREN : TBits_1; inline;
  71677. begin
  71678. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71679. end;
  71680. procedure TCAN1_C1FIFOCON4.setTXREQ; inline;
  71681. begin
  71682. pTDefRegMap(@Self)^.&set := $00000008;
  71683. end;
  71684. procedure TCAN1_C1FIFOCON4.clearTXREQ; inline;
  71685. begin
  71686. pTDefRegMap(@Self)^.clr := $00000008;
  71687. end;
  71688. procedure TCAN1_C1FIFOCON4.setTXREQ(thebits : TBits_1); inline;
  71689. begin
  71690. if thebits = 0 then
  71691. pTDefRegMap(@Self)^.clr := $00000008
  71692. else
  71693. pTDefRegMap(@Self)^.&set := $00000008;
  71694. end;
  71695. function TCAN1_C1FIFOCON4.getTXREQ : TBits_1; inline;
  71696. begin
  71697. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71698. end;
  71699. procedure TCAN1_C1FIFOCON4.setTXERR; inline;
  71700. begin
  71701. pTDefRegMap(@Self)^.&set := $00000010;
  71702. end;
  71703. procedure TCAN1_C1FIFOCON4.clearTXERR; inline;
  71704. begin
  71705. pTDefRegMap(@Self)^.clr := $00000010;
  71706. end;
  71707. procedure TCAN1_C1FIFOCON4.setTXERR(thebits : TBits_1); inline;
  71708. begin
  71709. if thebits = 0 then
  71710. pTDefRegMap(@Self)^.clr := $00000010
  71711. else
  71712. pTDefRegMap(@Self)^.&set := $00000010;
  71713. end;
  71714. function TCAN1_C1FIFOCON4.getTXERR : TBits_1; inline;
  71715. begin
  71716. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71717. end;
  71718. procedure TCAN1_C1FIFOCON4.setTXLARB; inline;
  71719. begin
  71720. pTDefRegMap(@Self)^.&set := $00000020;
  71721. end;
  71722. procedure TCAN1_C1FIFOCON4.clearTXLARB; inline;
  71723. begin
  71724. pTDefRegMap(@Self)^.clr := $00000020;
  71725. end;
  71726. procedure TCAN1_C1FIFOCON4.setTXLARB(thebits : TBits_1); inline;
  71727. begin
  71728. if thebits = 0 then
  71729. pTDefRegMap(@Self)^.clr := $00000020
  71730. else
  71731. pTDefRegMap(@Self)^.&set := $00000020;
  71732. end;
  71733. function TCAN1_C1FIFOCON4.getTXLARB : TBits_1; inline;
  71734. begin
  71735. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71736. end;
  71737. procedure TCAN1_C1FIFOCON4.setTXABAT; inline;
  71738. begin
  71739. pTDefRegMap(@Self)^.&set := $00000040;
  71740. end;
  71741. procedure TCAN1_C1FIFOCON4.clearTXABAT; inline;
  71742. begin
  71743. pTDefRegMap(@Self)^.clr := $00000040;
  71744. end;
  71745. procedure TCAN1_C1FIFOCON4.setTXABAT(thebits : TBits_1); inline;
  71746. begin
  71747. if thebits = 0 then
  71748. pTDefRegMap(@Self)^.clr := $00000040
  71749. else
  71750. pTDefRegMap(@Self)^.&set := $00000040;
  71751. end;
  71752. function TCAN1_C1FIFOCON4.getTXABAT : TBits_1; inline;
  71753. begin
  71754. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71755. end;
  71756. procedure TCAN1_C1FIFOCON4.setTXEN; inline;
  71757. begin
  71758. pTDefRegMap(@Self)^.&set := $00000080;
  71759. end;
  71760. procedure TCAN1_C1FIFOCON4.clearTXEN; inline;
  71761. begin
  71762. pTDefRegMap(@Self)^.clr := $00000080;
  71763. end;
  71764. procedure TCAN1_C1FIFOCON4.setTXEN(thebits : TBits_1); inline;
  71765. begin
  71766. if thebits = 0 then
  71767. pTDefRegMap(@Self)^.clr := $00000080
  71768. else
  71769. pTDefRegMap(@Self)^.&set := $00000080;
  71770. end;
  71771. function TCAN1_C1FIFOCON4.getTXEN : TBits_1; inline;
  71772. begin
  71773. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71774. end;
  71775. procedure TCAN1_C1FIFOCON4.setDONLY; inline;
  71776. begin
  71777. pTDefRegMap(@Self)^.&set := $00001000;
  71778. end;
  71779. procedure TCAN1_C1FIFOCON4.clearDONLY; inline;
  71780. begin
  71781. pTDefRegMap(@Self)^.clr := $00001000;
  71782. end;
  71783. procedure TCAN1_C1FIFOCON4.setDONLY(thebits : TBits_1); inline;
  71784. begin
  71785. if thebits = 0 then
  71786. pTDefRegMap(@Self)^.clr := $00001000
  71787. else
  71788. pTDefRegMap(@Self)^.&set := $00001000;
  71789. end;
  71790. function TCAN1_C1FIFOCON4.getDONLY : TBits_1; inline;
  71791. begin
  71792. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  71793. end;
  71794. procedure TCAN1_C1FIFOCON4.setUINC; inline;
  71795. begin
  71796. pTDefRegMap(@Self)^.&set := $00002000;
  71797. end;
  71798. procedure TCAN1_C1FIFOCON4.clearUINC; inline;
  71799. begin
  71800. pTDefRegMap(@Self)^.clr := $00002000;
  71801. end;
  71802. procedure TCAN1_C1FIFOCON4.setUINC(thebits : TBits_1); inline;
  71803. begin
  71804. if thebits = 0 then
  71805. pTDefRegMap(@Self)^.clr := $00002000
  71806. else
  71807. pTDefRegMap(@Self)^.&set := $00002000;
  71808. end;
  71809. function TCAN1_C1FIFOCON4.getUINC : TBits_1; inline;
  71810. begin
  71811. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  71812. end;
  71813. procedure TCAN1_C1FIFOCON4.setFRESET; inline;
  71814. begin
  71815. pTDefRegMap(@Self)^.&set := $00004000;
  71816. end;
  71817. procedure TCAN1_C1FIFOCON4.clearFRESET; inline;
  71818. begin
  71819. pTDefRegMap(@Self)^.clr := $00004000;
  71820. end;
  71821. procedure TCAN1_C1FIFOCON4.setFRESET(thebits : TBits_1); inline;
  71822. begin
  71823. if thebits = 0 then
  71824. pTDefRegMap(@Self)^.clr := $00004000
  71825. else
  71826. pTDefRegMap(@Self)^.&set := $00004000;
  71827. end;
  71828. function TCAN1_C1FIFOCON4.getFRESET : TBits_1; inline;
  71829. begin
  71830. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  71831. end;
  71832. procedure TCAN1_C1FIFOCON4.setFSIZE(thebits : TBits_5); inline;
  71833. begin
  71834. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  71835. end;
  71836. function TCAN1_C1FIFOCON4.getFSIZE : TBits_5; inline;
  71837. begin
  71838. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  71839. end;
  71840. procedure TCAN1_C1FIFOCON4.setw(thebits : TBits_32); inline;
  71841. begin
  71842. pTDefRegMap(@Self)^.val := thebits;
  71843. end;
  71844. function TCAN1_C1FIFOCON4.getw : TBits_32; inline;
  71845. begin
  71846. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71847. end;
  71848. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIF; inline;
  71849. begin
  71850. pTDefRegMap(@Self)^.&set := $00000001;
  71851. end;
  71852. procedure TCAN1_C1FIFOINT4.clearRXNEMPTYIF; inline;
  71853. begin
  71854. pTDefRegMap(@Self)^.clr := $00000001;
  71855. end;
  71856. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIF(thebits : TBits_1); inline;
  71857. begin
  71858. if thebits = 0 then
  71859. pTDefRegMap(@Self)^.clr := $00000001
  71860. else
  71861. pTDefRegMap(@Self)^.&set := $00000001;
  71862. end;
  71863. function TCAN1_C1FIFOINT4.getRXNEMPTYIF : TBits_1; inline;
  71864. begin
  71865. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  71866. end;
  71867. procedure TCAN1_C1FIFOINT4.setRXHALFIF; inline;
  71868. begin
  71869. pTDefRegMap(@Self)^.&set := $00000002;
  71870. end;
  71871. procedure TCAN1_C1FIFOINT4.clearRXHALFIF; inline;
  71872. begin
  71873. pTDefRegMap(@Self)^.clr := $00000002;
  71874. end;
  71875. procedure TCAN1_C1FIFOINT4.setRXHALFIF(thebits : TBits_1); inline;
  71876. begin
  71877. if thebits = 0 then
  71878. pTDefRegMap(@Self)^.clr := $00000002
  71879. else
  71880. pTDefRegMap(@Self)^.&set := $00000002;
  71881. end;
  71882. function TCAN1_C1FIFOINT4.getRXHALFIF : TBits_1; inline;
  71883. begin
  71884. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  71885. end;
  71886. procedure TCAN1_C1FIFOINT4.setRXFULLIF; inline;
  71887. begin
  71888. pTDefRegMap(@Self)^.&set := $00000004;
  71889. end;
  71890. procedure TCAN1_C1FIFOINT4.clearRXFULLIF; inline;
  71891. begin
  71892. pTDefRegMap(@Self)^.clr := $00000004;
  71893. end;
  71894. procedure TCAN1_C1FIFOINT4.setRXFULLIF(thebits : TBits_1); inline;
  71895. begin
  71896. if thebits = 0 then
  71897. pTDefRegMap(@Self)^.clr := $00000004
  71898. else
  71899. pTDefRegMap(@Self)^.&set := $00000004;
  71900. end;
  71901. function TCAN1_C1FIFOINT4.getRXFULLIF : TBits_1; inline;
  71902. begin
  71903. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71904. end;
  71905. procedure TCAN1_C1FIFOINT4.setRXOVFLIF; inline;
  71906. begin
  71907. pTDefRegMap(@Self)^.&set := $00000008;
  71908. end;
  71909. procedure TCAN1_C1FIFOINT4.clearRXOVFLIF; inline;
  71910. begin
  71911. pTDefRegMap(@Self)^.clr := $00000008;
  71912. end;
  71913. procedure TCAN1_C1FIFOINT4.setRXOVFLIF(thebits : TBits_1); inline;
  71914. begin
  71915. if thebits = 0 then
  71916. pTDefRegMap(@Self)^.clr := $00000008
  71917. else
  71918. pTDefRegMap(@Self)^.&set := $00000008;
  71919. end;
  71920. function TCAN1_C1FIFOINT4.getRXOVFLIF : TBits_1; inline;
  71921. begin
  71922. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71923. end;
  71924. procedure TCAN1_C1FIFOINT4.setTXEMPTYIF; inline;
  71925. begin
  71926. pTDefRegMap(@Self)^.&set := $00000100;
  71927. end;
  71928. procedure TCAN1_C1FIFOINT4.clearTXEMPTYIF; inline;
  71929. begin
  71930. pTDefRegMap(@Self)^.clr := $00000100;
  71931. end;
  71932. procedure TCAN1_C1FIFOINT4.setTXEMPTYIF(thebits : TBits_1); inline;
  71933. begin
  71934. if thebits = 0 then
  71935. pTDefRegMap(@Self)^.clr := $00000100
  71936. else
  71937. pTDefRegMap(@Self)^.&set := $00000100;
  71938. end;
  71939. function TCAN1_C1FIFOINT4.getTXEMPTYIF : TBits_1; inline;
  71940. begin
  71941. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71942. end;
  71943. procedure TCAN1_C1FIFOINT4.setTXHALFIF; inline;
  71944. begin
  71945. pTDefRegMap(@Self)^.&set := $00000200;
  71946. end;
  71947. procedure TCAN1_C1FIFOINT4.clearTXHALFIF; inline;
  71948. begin
  71949. pTDefRegMap(@Self)^.clr := $00000200;
  71950. end;
  71951. procedure TCAN1_C1FIFOINT4.setTXHALFIF(thebits : TBits_1); inline;
  71952. begin
  71953. if thebits = 0 then
  71954. pTDefRegMap(@Self)^.clr := $00000200
  71955. else
  71956. pTDefRegMap(@Self)^.&set := $00000200;
  71957. end;
  71958. function TCAN1_C1FIFOINT4.getTXHALFIF : TBits_1; inline;
  71959. begin
  71960. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71961. end;
  71962. procedure TCAN1_C1FIFOINT4.setTXNFULLIF; inline;
  71963. begin
  71964. pTDefRegMap(@Self)^.&set := $00000400;
  71965. end;
  71966. procedure TCAN1_C1FIFOINT4.clearTXNFULLIF; inline;
  71967. begin
  71968. pTDefRegMap(@Self)^.clr := $00000400;
  71969. end;
  71970. procedure TCAN1_C1FIFOINT4.setTXNFULLIF(thebits : TBits_1); inline;
  71971. begin
  71972. if thebits = 0 then
  71973. pTDefRegMap(@Self)^.clr := $00000400
  71974. else
  71975. pTDefRegMap(@Self)^.&set := $00000400;
  71976. end;
  71977. function TCAN1_C1FIFOINT4.getTXNFULLIF : TBits_1; inline;
  71978. begin
  71979. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  71980. end;
  71981. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIE; inline;
  71982. begin
  71983. pTDefRegMap(@Self)^.&set := $00010000;
  71984. end;
  71985. procedure TCAN1_C1FIFOINT4.clearRXNEMPTYIE; inline;
  71986. begin
  71987. pTDefRegMap(@Self)^.clr := $00010000;
  71988. end;
  71989. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIE(thebits : TBits_1); inline;
  71990. begin
  71991. if thebits = 0 then
  71992. pTDefRegMap(@Self)^.clr := $00010000
  71993. else
  71994. pTDefRegMap(@Self)^.&set := $00010000;
  71995. end;
  71996. function TCAN1_C1FIFOINT4.getRXNEMPTYIE : TBits_1; inline;
  71997. begin
  71998. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  71999. end;
  72000. procedure TCAN1_C1FIFOINT4.setRXHALFIE; inline;
  72001. begin
  72002. pTDefRegMap(@Self)^.&set := $00020000;
  72003. end;
  72004. procedure TCAN1_C1FIFOINT4.clearRXHALFIE; inline;
  72005. begin
  72006. pTDefRegMap(@Self)^.clr := $00020000;
  72007. end;
  72008. procedure TCAN1_C1FIFOINT4.setRXHALFIE(thebits : TBits_1); inline;
  72009. begin
  72010. if thebits = 0 then
  72011. pTDefRegMap(@Self)^.clr := $00020000
  72012. else
  72013. pTDefRegMap(@Self)^.&set := $00020000;
  72014. end;
  72015. function TCAN1_C1FIFOINT4.getRXHALFIE : TBits_1; inline;
  72016. begin
  72017. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  72018. end;
  72019. procedure TCAN1_C1FIFOINT4.setRXFULLIE; inline;
  72020. begin
  72021. pTDefRegMap(@Self)^.&set := $00040000;
  72022. end;
  72023. procedure TCAN1_C1FIFOINT4.clearRXFULLIE; inline;
  72024. begin
  72025. pTDefRegMap(@Self)^.clr := $00040000;
  72026. end;
  72027. procedure TCAN1_C1FIFOINT4.setRXFULLIE(thebits : TBits_1); inline;
  72028. begin
  72029. if thebits = 0 then
  72030. pTDefRegMap(@Self)^.clr := $00040000
  72031. else
  72032. pTDefRegMap(@Self)^.&set := $00040000;
  72033. end;
  72034. function TCAN1_C1FIFOINT4.getRXFULLIE : TBits_1; inline;
  72035. begin
  72036. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  72037. end;
  72038. procedure TCAN1_C1FIFOINT4.setRXOVFLIE; inline;
  72039. begin
  72040. pTDefRegMap(@Self)^.&set := $00080000;
  72041. end;
  72042. procedure TCAN1_C1FIFOINT4.clearRXOVFLIE; inline;
  72043. begin
  72044. pTDefRegMap(@Self)^.clr := $00080000;
  72045. end;
  72046. procedure TCAN1_C1FIFOINT4.setRXOVFLIE(thebits : TBits_1); inline;
  72047. begin
  72048. if thebits = 0 then
  72049. pTDefRegMap(@Self)^.clr := $00080000
  72050. else
  72051. pTDefRegMap(@Self)^.&set := $00080000;
  72052. end;
  72053. function TCAN1_C1FIFOINT4.getRXOVFLIE : TBits_1; inline;
  72054. begin
  72055. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  72056. end;
  72057. procedure TCAN1_C1FIFOINT4.setTXEMPTYIE; inline;
  72058. begin
  72059. pTDefRegMap(@Self)^.&set := $01000000;
  72060. end;
  72061. procedure TCAN1_C1FIFOINT4.clearTXEMPTYIE; inline;
  72062. begin
  72063. pTDefRegMap(@Self)^.clr := $01000000;
  72064. end;
  72065. procedure TCAN1_C1FIFOINT4.setTXEMPTYIE(thebits : TBits_1); inline;
  72066. begin
  72067. if thebits = 0 then
  72068. pTDefRegMap(@Self)^.clr := $01000000
  72069. else
  72070. pTDefRegMap(@Self)^.&set := $01000000;
  72071. end;
  72072. function TCAN1_C1FIFOINT4.getTXEMPTYIE : TBits_1; inline;
  72073. begin
  72074. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  72075. end;
  72076. procedure TCAN1_C1FIFOINT4.setTXHALFIE; inline;
  72077. begin
  72078. pTDefRegMap(@Self)^.&set := $02000000;
  72079. end;
  72080. procedure TCAN1_C1FIFOINT4.clearTXHALFIE; inline;
  72081. begin
  72082. pTDefRegMap(@Self)^.clr := $02000000;
  72083. end;
  72084. procedure TCAN1_C1FIFOINT4.setTXHALFIE(thebits : TBits_1); inline;
  72085. begin
  72086. if thebits = 0 then
  72087. pTDefRegMap(@Self)^.clr := $02000000
  72088. else
  72089. pTDefRegMap(@Self)^.&set := $02000000;
  72090. end;
  72091. function TCAN1_C1FIFOINT4.getTXHALFIE : TBits_1; inline;
  72092. begin
  72093. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  72094. end;
  72095. procedure TCAN1_C1FIFOINT4.setTXNFULLIE; inline;
  72096. begin
  72097. pTDefRegMap(@Self)^.&set := $04000000;
  72098. end;
  72099. procedure TCAN1_C1FIFOINT4.clearTXNFULLIE; inline;
  72100. begin
  72101. pTDefRegMap(@Self)^.clr := $04000000;
  72102. end;
  72103. procedure TCAN1_C1FIFOINT4.setTXNFULLIE(thebits : TBits_1); inline;
  72104. begin
  72105. if thebits = 0 then
  72106. pTDefRegMap(@Self)^.clr := $04000000
  72107. else
  72108. pTDefRegMap(@Self)^.&set := $04000000;
  72109. end;
  72110. function TCAN1_C1FIFOINT4.getTXNFULLIE : TBits_1; inline;
  72111. begin
  72112. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  72113. end;
  72114. procedure TCAN1_C1FIFOINT4.setw(thebits : TBits_32); inline;
  72115. begin
  72116. pTDefRegMap(@Self)^.val := thebits;
  72117. end;
  72118. function TCAN1_C1FIFOINT4.getw : TBits_32; inline;
  72119. begin
  72120. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72121. end;
  72122. procedure TCAN1_C1FIFOCI4.setCFIFOCI(thebits : TBits_5); inline;
  72123. begin
  72124. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  72125. end;
  72126. function TCAN1_C1FIFOCI4.getCFIFOCI : TBits_5; inline;
  72127. begin
  72128. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  72129. end;
  72130. procedure TCAN1_C1FIFOCI4.setw(thebits : TBits_32); inline;
  72131. begin
  72132. pTDefRegMap(@Self)^.val := thebits;
  72133. end;
  72134. function TCAN1_C1FIFOCI4.getw : TBits_32; inline;
  72135. begin
  72136. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72137. end;
  72138. procedure TCAN1_C1FIFOCON5.setTXPRI(thebits : TBits_2); inline;
  72139. begin
  72140. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  72141. end;
  72142. function TCAN1_C1FIFOCON5.getTXPRI : TBits_2; inline;
  72143. begin
  72144. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  72145. end;
  72146. procedure TCAN1_C1FIFOCON5.setRTREN; inline;
  72147. begin
  72148. pTDefRegMap(@Self)^.&set := $00000004;
  72149. end;
  72150. procedure TCAN1_C1FIFOCON5.clearRTREN; inline;
  72151. begin
  72152. pTDefRegMap(@Self)^.clr := $00000004;
  72153. end;
  72154. procedure TCAN1_C1FIFOCON5.setRTREN(thebits : TBits_1); inline;
  72155. begin
  72156. if thebits = 0 then
  72157. pTDefRegMap(@Self)^.clr := $00000004
  72158. else
  72159. pTDefRegMap(@Self)^.&set := $00000004;
  72160. end;
  72161. function TCAN1_C1FIFOCON5.getRTREN : TBits_1; inline;
  72162. begin
  72163. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72164. end;
  72165. procedure TCAN1_C1FIFOCON5.setTXREQ; inline;
  72166. begin
  72167. pTDefRegMap(@Self)^.&set := $00000008;
  72168. end;
  72169. procedure TCAN1_C1FIFOCON5.clearTXREQ; inline;
  72170. begin
  72171. pTDefRegMap(@Self)^.clr := $00000008;
  72172. end;
  72173. procedure TCAN1_C1FIFOCON5.setTXREQ(thebits : TBits_1); inline;
  72174. begin
  72175. if thebits = 0 then
  72176. pTDefRegMap(@Self)^.clr := $00000008
  72177. else
  72178. pTDefRegMap(@Self)^.&set := $00000008;
  72179. end;
  72180. function TCAN1_C1FIFOCON5.getTXREQ : TBits_1; inline;
  72181. begin
  72182. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72183. end;
  72184. procedure TCAN1_C1FIFOCON5.setTXERR; inline;
  72185. begin
  72186. pTDefRegMap(@Self)^.&set := $00000010;
  72187. end;
  72188. procedure TCAN1_C1FIFOCON5.clearTXERR; inline;
  72189. begin
  72190. pTDefRegMap(@Self)^.clr := $00000010;
  72191. end;
  72192. procedure TCAN1_C1FIFOCON5.setTXERR(thebits : TBits_1); inline;
  72193. begin
  72194. if thebits = 0 then
  72195. pTDefRegMap(@Self)^.clr := $00000010
  72196. else
  72197. pTDefRegMap(@Self)^.&set := $00000010;
  72198. end;
  72199. function TCAN1_C1FIFOCON5.getTXERR : TBits_1; inline;
  72200. begin
  72201. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72202. end;
  72203. procedure TCAN1_C1FIFOCON5.setTXLARB; inline;
  72204. begin
  72205. pTDefRegMap(@Self)^.&set := $00000020;
  72206. end;
  72207. procedure TCAN1_C1FIFOCON5.clearTXLARB; inline;
  72208. begin
  72209. pTDefRegMap(@Self)^.clr := $00000020;
  72210. end;
  72211. procedure TCAN1_C1FIFOCON5.setTXLARB(thebits : TBits_1); inline;
  72212. begin
  72213. if thebits = 0 then
  72214. pTDefRegMap(@Self)^.clr := $00000020
  72215. else
  72216. pTDefRegMap(@Self)^.&set := $00000020;
  72217. end;
  72218. function TCAN1_C1FIFOCON5.getTXLARB : TBits_1; inline;
  72219. begin
  72220. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  72221. end;
  72222. procedure TCAN1_C1FIFOCON5.setTXABAT; inline;
  72223. begin
  72224. pTDefRegMap(@Self)^.&set := $00000040;
  72225. end;
  72226. procedure TCAN1_C1FIFOCON5.clearTXABAT; inline;
  72227. begin
  72228. pTDefRegMap(@Self)^.clr := $00000040;
  72229. end;
  72230. procedure TCAN1_C1FIFOCON5.setTXABAT(thebits : TBits_1); inline;
  72231. begin
  72232. if thebits = 0 then
  72233. pTDefRegMap(@Self)^.clr := $00000040
  72234. else
  72235. pTDefRegMap(@Self)^.&set := $00000040;
  72236. end;
  72237. function TCAN1_C1FIFOCON5.getTXABAT : TBits_1; inline;
  72238. begin
  72239. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  72240. end;
  72241. procedure TCAN1_C1FIFOCON5.setTXEN; inline;
  72242. begin
  72243. pTDefRegMap(@Self)^.&set := $00000080;
  72244. end;
  72245. procedure TCAN1_C1FIFOCON5.clearTXEN; inline;
  72246. begin
  72247. pTDefRegMap(@Self)^.clr := $00000080;
  72248. end;
  72249. procedure TCAN1_C1FIFOCON5.setTXEN(thebits : TBits_1); inline;
  72250. begin
  72251. if thebits = 0 then
  72252. pTDefRegMap(@Self)^.clr := $00000080
  72253. else
  72254. pTDefRegMap(@Self)^.&set := $00000080;
  72255. end;
  72256. function TCAN1_C1FIFOCON5.getTXEN : TBits_1; inline;
  72257. begin
  72258. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  72259. end;
  72260. procedure TCAN1_C1FIFOCON5.setDONLY; inline;
  72261. begin
  72262. pTDefRegMap(@Self)^.&set := $00001000;
  72263. end;
  72264. procedure TCAN1_C1FIFOCON5.clearDONLY; inline;
  72265. begin
  72266. pTDefRegMap(@Self)^.clr := $00001000;
  72267. end;
  72268. procedure TCAN1_C1FIFOCON5.setDONLY(thebits : TBits_1); inline;
  72269. begin
  72270. if thebits = 0 then
  72271. pTDefRegMap(@Self)^.clr := $00001000
  72272. else
  72273. pTDefRegMap(@Self)^.&set := $00001000;
  72274. end;
  72275. function TCAN1_C1FIFOCON5.getDONLY : TBits_1; inline;
  72276. begin
  72277. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72278. end;
  72279. procedure TCAN1_C1FIFOCON5.setUINC; inline;
  72280. begin
  72281. pTDefRegMap(@Self)^.&set := $00002000;
  72282. end;
  72283. procedure TCAN1_C1FIFOCON5.clearUINC; inline;
  72284. begin
  72285. pTDefRegMap(@Self)^.clr := $00002000;
  72286. end;
  72287. procedure TCAN1_C1FIFOCON5.setUINC(thebits : TBits_1); inline;
  72288. begin
  72289. if thebits = 0 then
  72290. pTDefRegMap(@Self)^.clr := $00002000
  72291. else
  72292. pTDefRegMap(@Self)^.&set := $00002000;
  72293. end;
  72294. function TCAN1_C1FIFOCON5.getUINC : TBits_1; inline;
  72295. begin
  72296. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72297. end;
  72298. procedure TCAN1_C1FIFOCON5.setFRESET; inline;
  72299. begin
  72300. pTDefRegMap(@Self)^.&set := $00004000;
  72301. end;
  72302. procedure TCAN1_C1FIFOCON5.clearFRESET; inline;
  72303. begin
  72304. pTDefRegMap(@Self)^.clr := $00004000;
  72305. end;
  72306. procedure TCAN1_C1FIFOCON5.setFRESET(thebits : TBits_1); inline;
  72307. begin
  72308. if thebits = 0 then
  72309. pTDefRegMap(@Self)^.clr := $00004000
  72310. else
  72311. pTDefRegMap(@Self)^.&set := $00004000;
  72312. end;
  72313. function TCAN1_C1FIFOCON5.getFRESET : TBits_1; inline;
  72314. begin
  72315. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72316. end;
  72317. procedure TCAN1_C1FIFOCON5.setFSIZE(thebits : TBits_5); inline;
  72318. begin
  72319. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  72320. end;
  72321. function TCAN1_C1FIFOCON5.getFSIZE : TBits_5; inline;
  72322. begin
  72323. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  72324. end;
  72325. procedure TCAN1_C1FIFOCON5.setw(thebits : TBits_32); inline;
  72326. begin
  72327. pTDefRegMap(@Self)^.val := thebits;
  72328. end;
  72329. function TCAN1_C1FIFOCON5.getw : TBits_32; inline;
  72330. begin
  72331. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72332. end;
  72333. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIF; inline;
  72334. begin
  72335. pTDefRegMap(@Self)^.&set := $00000001;
  72336. end;
  72337. procedure TCAN1_C1FIFOINT5.clearRXNEMPTYIF; inline;
  72338. begin
  72339. pTDefRegMap(@Self)^.clr := $00000001;
  72340. end;
  72341. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIF(thebits : TBits_1); inline;
  72342. begin
  72343. if thebits = 0 then
  72344. pTDefRegMap(@Self)^.clr := $00000001
  72345. else
  72346. pTDefRegMap(@Self)^.&set := $00000001;
  72347. end;
  72348. function TCAN1_C1FIFOINT5.getRXNEMPTYIF : TBits_1; inline;
  72349. begin
  72350. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  72351. end;
  72352. procedure TCAN1_C1FIFOINT5.setRXHALFIF; inline;
  72353. begin
  72354. pTDefRegMap(@Self)^.&set := $00000002;
  72355. end;
  72356. procedure TCAN1_C1FIFOINT5.clearRXHALFIF; inline;
  72357. begin
  72358. pTDefRegMap(@Self)^.clr := $00000002;
  72359. end;
  72360. procedure TCAN1_C1FIFOINT5.setRXHALFIF(thebits : TBits_1); inline;
  72361. begin
  72362. if thebits = 0 then
  72363. pTDefRegMap(@Self)^.clr := $00000002
  72364. else
  72365. pTDefRegMap(@Self)^.&set := $00000002;
  72366. end;
  72367. function TCAN1_C1FIFOINT5.getRXHALFIF : TBits_1; inline;
  72368. begin
  72369. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72370. end;
  72371. procedure TCAN1_C1FIFOINT5.setRXFULLIF; inline;
  72372. begin
  72373. pTDefRegMap(@Self)^.&set := $00000004;
  72374. end;
  72375. procedure TCAN1_C1FIFOINT5.clearRXFULLIF; inline;
  72376. begin
  72377. pTDefRegMap(@Self)^.clr := $00000004;
  72378. end;
  72379. procedure TCAN1_C1FIFOINT5.setRXFULLIF(thebits : TBits_1); inline;
  72380. begin
  72381. if thebits = 0 then
  72382. pTDefRegMap(@Self)^.clr := $00000004
  72383. else
  72384. pTDefRegMap(@Self)^.&set := $00000004;
  72385. end;
  72386. function TCAN1_C1FIFOINT5.getRXFULLIF : TBits_1; inline;
  72387. begin
  72388. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72389. end;
  72390. procedure TCAN1_C1FIFOINT5.setRXOVFLIF; inline;
  72391. begin
  72392. pTDefRegMap(@Self)^.&set := $00000008;
  72393. end;
  72394. procedure TCAN1_C1FIFOINT5.clearRXOVFLIF; inline;
  72395. begin
  72396. pTDefRegMap(@Self)^.clr := $00000008;
  72397. end;
  72398. procedure TCAN1_C1FIFOINT5.setRXOVFLIF(thebits : TBits_1); inline;
  72399. begin
  72400. if thebits = 0 then
  72401. pTDefRegMap(@Self)^.clr := $00000008
  72402. else
  72403. pTDefRegMap(@Self)^.&set := $00000008;
  72404. end;
  72405. function TCAN1_C1FIFOINT5.getRXOVFLIF : TBits_1; inline;
  72406. begin
  72407. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72408. end;
  72409. procedure TCAN1_C1FIFOINT5.setTXEMPTYIF; inline;
  72410. begin
  72411. pTDefRegMap(@Self)^.&set := $00000100;
  72412. end;
  72413. procedure TCAN1_C1FIFOINT5.clearTXEMPTYIF; inline;
  72414. begin
  72415. pTDefRegMap(@Self)^.clr := $00000100;
  72416. end;
  72417. procedure TCAN1_C1FIFOINT5.setTXEMPTYIF(thebits : TBits_1); inline;
  72418. begin
  72419. if thebits = 0 then
  72420. pTDefRegMap(@Self)^.clr := $00000100
  72421. else
  72422. pTDefRegMap(@Self)^.&set := $00000100;
  72423. end;
  72424. function TCAN1_C1FIFOINT5.getTXEMPTYIF : TBits_1; inline;
  72425. begin
  72426. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  72427. end;
  72428. procedure TCAN1_C1FIFOINT5.setTXHALFIF; inline;
  72429. begin
  72430. pTDefRegMap(@Self)^.&set := $00000200;
  72431. end;
  72432. procedure TCAN1_C1FIFOINT5.clearTXHALFIF; inline;
  72433. begin
  72434. pTDefRegMap(@Self)^.clr := $00000200;
  72435. end;
  72436. procedure TCAN1_C1FIFOINT5.setTXHALFIF(thebits : TBits_1); inline;
  72437. begin
  72438. if thebits = 0 then
  72439. pTDefRegMap(@Self)^.clr := $00000200
  72440. else
  72441. pTDefRegMap(@Self)^.&set := $00000200;
  72442. end;
  72443. function TCAN1_C1FIFOINT5.getTXHALFIF : TBits_1; inline;
  72444. begin
  72445. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  72446. end;
  72447. procedure TCAN1_C1FIFOINT5.setTXNFULLIF; inline;
  72448. begin
  72449. pTDefRegMap(@Self)^.&set := $00000400;
  72450. end;
  72451. procedure TCAN1_C1FIFOINT5.clearTXNFULLIF; inline;
  72452. begin
  72453. pTDefRegMap(@Self)^.clr := $00000400;
  72454. end;
  72455. procedure TCAN1_C1FIFOINT5.setTXNFULLIF(thebits : TBits_1); inline;
  72456. begin
  72457. if thebits = 0 then
  72458. pTDefRegMap(@Self)^.clr := $00000400
  72459. else
  72460. pTDefRegMap(@Self)^.&set := $00000400;
  72461. end;
  72462. function TCAN1_C1FIFOINT5.getTXNFULLIF : TBits_1; inline;
  72463. begin
  72464. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  72465. end;
  72466. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIE; inline;
  72467. begin
  72468. pTDefRegMap(@Self)^.&set := $00010000;
  72469. end;
  72470. procedure TCAN1_C1FIFOINT5.clearRXNEMPTYIE; inline;
  72471. begin
  72472. pTDefRegMap(@Self)^.clr := $00010000;
  72473. end;
  72474. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIE(thebits : TBits_1); inline;
  72475. begin
  72476. if thebits = 0 then
  72477. pTDefRegMap(@Self)^.clr := $00010000
  72478. else
  72479. pTDefRegMap(@Self)^.&set := $00010000;
  72480. end;
  72481. function TCAN1_C1FIFOINT5.getRXNEMPTYIE : TBits_1; inline;
  72482. begin
  72483. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  72484. end;
  72485. procedure TCAN1_C1FIFOINT5.setRXHALFIE; inline;
  72486. begin
  72487. pTDefRegMap(@Self)^.&set := $00020000;
  72488. end;
  72489. procedure TCAN1_C1FIFOINT5.clearRXHALFIE; inline;
  72490. begin
  72491. pTDefRegMap(@Self)^.clr := $00020000;
  72492. end;
  72493. procedure TCAN1_C1FIFOINT5.setRXHALFIE(thebits : TBits_1); inline;
  72494. begin
  72495. if thebits = 0 then
  72496. pTDefRegMap(@Self)^.clr := $00020000
  72497. else
  72498. pTDefRegMap(@Self)^.&set := $00020000;
  72499. end;
  72500. function TCAN1_C1FIFOINT5.getRXHALFIE : TBits_1; inline;
  72501. begin
  72502. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  72503. end;
  72504. procedure TCAN1_C1FIFOINT5.setRXFULLIE; inline;
  72505. begin
  72506. pTDefRegMap(@Self)^.&set := $00040000;
  72507. end;
  72508. procedure TCAN1_C1FIFOINT5.clearRXFULLIE; inline;
  72509. begin
  72510. pTDefRegMap(@Self)^.clr := $00040000;
  72511. end;
  72512. procedure TCAN1_C1FIFOINT5.setRXFULLIE(thebits : TBits_1); inline;
  72513. begin
  72514. if thebits = 0 then
  72515. pTDefRegMap(@Self)^.clr := $00040000
  72516. else
  72517. pTDefRegMap(@Self)^.&set := $00040000;
  72518. end;
  72519. function TCAN1_C1FIFOINT5.getRXFULLIE : TBits_1; inline;
  72520. begin
  72521. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  72522. end;
  72523. procedure TCAN1_C1FIFOINT5.setRXOVFLIE; inline;
  72524. begin
  72525. pTDefRegMap(@Self)^.&set := $00080000;
  72526. end;
  72527. procedure TCAN1_C1FIFOINT5.clearRXOVFLIE; inline;
  72528. begin
  72529. pTDefRegMap(@Self)^.clr := $00080000;
  72530. end;
  72531. procedure TCAN1_C1FIFOINT5.setRXOVFLIE(thebits : TBits_1); inline;
  72532. begin
  72533. if thebits = 0 then
  72534. pTDefRegMap(@Self)^.clr := $00080000
  72535. else
  72536. pTDefRegMap(@Self)^.&set := $00080000;
  72537. end;
  72538. function TCAN1_C1FIFOINT5.getRXOVFLIE : TBits_1; inline;
  72539. begin
  72540. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  72541. end;
  72542. procedure TCAN1_C1FIFOINT5.setTXEMPTYIE; inline;
  72543. begin
  72544. pTDefRegMap(@Self)^.&set := $01000000;
  72545. end;
  72546. procedure TCAN1_C1FIFOINT5.clearTXEMPTYIE; inline;
  72547. begin
  72548. pTDefRegMap(@Self)^.clr := $01000000;
  72549. end;
  72550. procedure TCAN1_C1FIFOINT5.setTXEMPTYIE(thebits : TBits_1); inline;
  72551. begin
  72552. if thebits = 0 then
  72553. pTDefRegMap(@Self)^.clr := $01000000
  72554. else
  72555. pTDefRegMap(@Self)^.&set := $01000000;
  72556. end;
  72557. function TCAN1_C1FIFOINT5.getTXEMPTYIE : TBits_1; inline;
  72558. begin
  72559. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  72560. end;
  72561. procedure TCAN1_C1FIFOINT5.setTXHALFIE; inline;
  72562. begin
  72563. pTDefRegMap(@Self)^.&set := $02000000;
  72564. end;
  72565. procedure TCAN1_C1FIFOINT5.clearTXHALFIE; inline;
  72566. begin
  72567. pTDefRegMap(@Self)^.clr := $02000000;
  72568. end;
  72569. procedure TCAN1_C1FIFOINT5.setTXHALFIE(thebits : TBits_1); inline;
  72570. begin
  72571. if thebits = 0 then
  72572. pTDefRegMap(@Self)^.clr := $02000000
  72573. else
  72574. pTDefRegMap(@Self)^.&set := $02000000;
  72575. end;
  72576. function TCAN1_C1FIFOINT5.getTXHALFIE : TBits_1; inline;
  72577. begin
  72578. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  72579. end;
  72580. procedure TCAN1_C1FIFOINT5.setTXNFULLIE; inline;
  72581. begin
  72582. pTDefRegMap(@Self)^.&set := $04000000;
  72583. end;
  72584. procedure TCAN1_C1FIFOINT5.clearTXNFULLIE; inline;
  72585. begin
  72586. pTDefRegMap(@Self)^.clr := $04000000;
  72587. end;
  72588. procedure TCAN1_C1FIFOINT5.setTXNFULLIE(thebits : TBits_1); inline;
  72589. begin
  72590. if thebits = 0 then
  72591. pTDefRegMap(@Self)^.clr := $04000000
  72592. else
  72593. pTDefRegMap(@Self)^.&set := $04000000;
  72594. end;
  72595. function TCAN1_C1FIFOINT5.getTXNFULLIE : TBits_1; inline;
  72596. begin
  72597. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  72598. end;
  72599. procedure TCAN1_C1FIFOINT5.setw(thebits : TBits_32); inline;
  72600. begin
  72601. pTDefRegMap(@Self)^.val := thebits;
  72602. end;
  72603. function TCAN1_C1FIFOINT5.getw : TBits_32; inline;
  72604. begin
  72605. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72606. end;
  72607. procedure TCAN1_C1FIFOCI5.setCFIFOCI(thebits : TBits_5); inline;
  72608. begin
  72609. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  72610. end;
  72611. function TCAN1_C1FIFOCI5.getCFIFOCI : TBits_5; inline;
  72612. begin
  72613. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  72614. end;
  72615. procedure TCAN1_C1FIFOCI5.setw(thebits : TBits_32); inline;
  72616. begin
  72617. pTDefRegMap(@Self)^.val := thebits;
  72618. end;
  72619. function TCAN1_C1FIFOCI5.getw : TBits_32; inline;
  72620. begin
  72621. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72622. end;
  72623. procedure TCAN1_C1FIFOCON6.setTXPRI(thebits : TBits_2); inline;
  72624. begin
  72625. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  72626. end;
  72627. function TCAN1_C1FIFOCON6.getTXPRI : TBits_2; inline;
  72628. begin
  72629. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  72630. end;
  72631. procedure TCAN1_C1FIFOCON6.setRTREN; inline;
  72632. begin
  72633. pTDefRegMap(@Self)^.&set := $00000004;
  72634. end;
  72635. procedure TCAN1_C1FIFOCON6.clearRTREN; inline;
  72636. begin
  72637. pTDefRegMap(@Self)^.clr := $00000004;
  72638. end;
  72639. procedure TCAN1_C1FIFOCON6.setRTREN(thebits : TBits_1); inline;
  72640. begin
  72641. if thebits = 0 then
  72642. pTDefRegMap(@Self)^.clr := $00000004
  72643. else
  72644. pTDefRegMap(@Self)^.&set := $00000004;
  72645. end;
  72646. function TCAN1_C1FIFOCON6.getRTREN : TBits_1; inline;
  72647. begin
  72648. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72649. end;
  72650. procedure TCAN1_C1FIFOCON6.setTXREQ; inline;
  72651. begin
  72652. pTDefRegMap(@Self)^.&set := $00000008;
  72653. end;
  72654. procedure TCAN1_C1FIFOCON6.clearTXREQ; inline;
  72655. begin
  72656. pTDefRegMap(@Self)^.clr := $00000008;
  72657. end;
  72658. procedure TCAN1_C1FIFOCON6.setTXREQ(thebits : TBits_1); inline;
  72659. begin
  72660. if thebits = 0 then
  72661. pTDefRegMap(@Self)^.clr := $00000008
  72662. else
  72663. pTDefRegMap(@Self)^.&set := $00000008;
  72664. end;
  72665. function TCAN1_C1FIFOCON6.getTXREQ : TBits_1; inline;
  72666. begin
  72667. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72668. end;
  72669. procedure TCAN1_C1FIFOCON6.setTXERR; inline;
  72670. begin
  72671. pTDefRegMap(@Self)^.&set := $00000010;
  72672. end;
  72673. procedure TCAN1_C1FIFOCON6.clearTXERR; inline;
  72674. begin
  72675. pTDefRegMap(@Self)^.clr := $00000010;
  72676. end;
  72677. procedure TCAN1_C1FIFOCON6.setTXERR(thebits : TBits_1); inline;
  72678. begin
  72679. if thebits = 0 then
  72680. pTDefRegMap(@Self)^.clr := $00000010
  72681. else
  72682. pTDefRegMap(@Self)^.&set := $00000010;
  72683. end;
  72684. function TCAN1_C1FIFOCON6.getTXERR : TBits_1; inline;
  72685. begin
  72686. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72687. end;
  72688. procedure TCAN1_C1FIFOCON6.setTXLARB; inline;
  72689. begin
  72690. pTDefRegMap(@Self)^.&set := $00000020;
  72691. end;
  72692. procedure TCAN1_C1FIFOCON6.clearTXLARB; inline;
  72693. begin
  72694. pTDefRegMap(@Self)^.clr := $00000020;
  72695. end;
  72696. procedure TCAN1_C1FIFOCON6.setTXLARB(thebits : TBits_1); inline;
  72697. begin
  72698. if thebits = 0 then
  72699. pTDefRegMap(@Self)^.clr := $00000020
  72700. else
  72701. pTDefRegMap(@Self)^.&set := $00000020;
  72702. end;
  72703. function TCAN1_C1FIFOCON6.getTXLARB : TBits_1; inline;
  72704. begin
  72705. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  72706. end;
  72707. procedure TCAN1_C1FIFOCON6.setTXABAT; inline;
  72708. begin
  72709. pTDefRegMap(@Self)^.&set := $00000040;
  72710. end;
  72711. procedure TCAN1_C1FIFOCON6.clearTXABAT; inline;
  72712. begin
  72713. pTDefRegMap(@Self)^.clr := $00000040;
  72714. end;
  72715. procedure TCAN1_C1FIFOCON6.setTXABAT(thebits : TBits_1); inline;
  72716. begin
  72717. if thebits = 0 then
  72718. pTDefRegMap(@Self)^.clr := $00000040
  72719. else
  72720. pTDefRegMap(@Self)^.&set := $00000040;
  72721. end;
  72722. function TCAN1_C1FIFOCON6.getTXABAT : TBits_1; inline;
  72723. begin
  72724. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  72725. end;
  72726. procedure TCAN1_C1FIFOCON6.setTXEN; inline;
  72727. begin
  72728. pTDefRegMap(@Self)^.&set := $00000080;
  72729. end;
  72730. procedure TCAN1_C1FIFOCON6.clearTXEN; inline;
  72731. begin
  72732. pTDefRegMap(@Self)^.clr := $00000080;
  72733. end;
  72734. procedure TCAN1_C1FIFOCON6.setTXEN(thebits : TBits_1); inline;
  72735. begin
  72736. if thebits = 0 then
  72737. pTDefRegMap(@Self)^.clr := $00000080
  72738. else
  72739. pTDefRegMap(@Self)^.&set := $00000080;
  72740. end;
  72741. function TCAN1_C1FIFOCON6.getTXEN : TBits_1; inline;
  72742. begin
  72743. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  72744. end;
  72745. procedure TCAN1_C1FIFOCON6.setDONLY; inline;
  72746. begin
  72747. pTDefRegMap(@Self)^.&set := $00001000;
  72748. end;
  72749. procedure TCAN1_C1FIFOCON6.clearDONLY; inline;
  72750. begin
  72751. pTDefRegMap(@Self)^.clr := $00001000;
  72752. end;
  72753. procedure TCAN1_C1FIFOCON6.setDONLY(thebits : TBits_1); inline;
  72754. begin
  72755. if thebits = 0 then
  72756. pTDefRegMap(@Self)^.clr := $00001000
  72757. else
  72758. pTDefRegMap(@Self)^.&set := $00001000;
  72759. end;
  72760. function TCAN1_C1FIFOCON6.getDONLY : TBits_1; inline;
  72761. begin
  72762. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72763. end;
  72764. procedure TCAN1_C1FIFOCON6.setUINC; inline;
  72765. begin
  72766. pTDefRegMap(@Self)^.&set := $00002000;
  72767. end;
  72768. procedure TCAN1_C1FIFOCON6.clearUINC; inline;
  72769. begin
  72770. pTDefRegMap(@Self)^.clr := $00002000;
  72771. end;
  72772. procedure TCAN1_C1FIFOCON6.setUINC(thebits : TBits_1); inline;
  72773. begin
  72774. if thebits = 0 then
  72775. pTDefRegMap(@Self)^.clr := $00002000
  72776. else
  72777. pTDefRegMap(@Self)^.&set := $00002000;
  72778. end;
  72779. function TCAN1_C1FIFOCON6.getUINC : TBits_1; inline;
  72780. begin
  72781. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72782. end;
  72783. procedure TCAN1_C1FIFOCON6.setFRESET; inline;
  72784. begin
  72785. pTDefRegMap(@Self)^.&set := $00004000;
  72786. end;
  72787. procedure TCAN1_C1FIFOCON6.clearFRESET; inline;
  72788. begin
  72789. pTDefRegMap(@Self)^.clr := $00004000;
  72790. end;
  72791. procedure TCAN1_C1FIFOCON6.setFRESET(thebits : TBits_1); inline;
  72792. begin
  72793. if thebits = 0 then
  72794. pTDefRegMap(@Self)^.clr := $00004000
  72795. else
  72796. pTDefRegMap(@Self)^.&set := $00004000;
  72797. end;
  72798. function TCAN1_C1FIFOCON6.getFRESET : TBits_1; inline;
  72799. begin
  72800. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72801. end;
  72802. procedure TCAN1_C1FIFOCON6.setFSIZE(thebits : TBits_5); inline;
  72803. begin
  72804. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  72805. end;
  72806. function TCAN1_C1FIFOCON6.getFSIZE : TBits_5; inline;
  72807. begin
  72808. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  72809. end;
  72810. procedure TCAN1_C1FIFOCON6.setw(thebits : TBits_32); inline;
  72811. begin
  72812. pTDefRegMap(@Self)^.val := thebits;
  72813. end;
  72814. function TCAN1_C1FIFOCON6.getw : TBits_32; inline;
  72815. begin
  72816. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72817. end;
  72818. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIF; inline;
  72819. begin
  72820. pTDefRegMap(@Self)^.&set := $00000001;
  72821. end;
  72822. procedure TCAN1_C1FIFOINT6.clearRXNEMPTYIF; inline;
  72823. begin
  72824. pTDefRegMap(@Self)^.clr := $00000001;
  72825. end;
  72826. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIF(thebits : TBits_1); inline;
  72827. begin
  72828. if thebits = 0 then
  72829. pTDefRegMap(@Self)^.clr := $00000001
  72830. else
  72831. pTDefRegMap(@Self)^.&set := $00000001;
  72832. end;
  72833. function TCAN1_C1FIFOINT6.getRXNEMPTYIF : TBits_1; inline;
  72834. begin
  72835. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  72836. end;
  72837. procedure TCAN1_C1FIFOINT6.setRXHALFIF; inline;
  72838. begin
  72839. pTDefRegMap(@Self)^.&set := $00000002;
  72840. end;
  72841. procedure TCAN1_C1FIFOINT6.clearRXHALFIF; inline;
  72842. begin
  72843. pTDefRegMap(@Self)^.clr := $00000002;
  72844. end;
  72845. procedure TCAN1_C1FIFOINT6.setRXHALFIF(thebits : TBits_1); inline;
  72846. begin
  72847. if thebits = 0 then
  72848. pTDefRegMap(@Self)^.clr := $00000002
  72849. else
  72850. pTDefRegMap(@Self)^.&set := $00000002;
  72851. end;
  72852. function TCAN1_C1FIFOINT6.getRXHALFIF : TBits_1; inline;
  72853. begin
  72854. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72855. end;
  72856. procedure TCAN1_C1FIFOINT6.setRXFULLIF; inline;
  72857. begin
  72858. pTDefRegMap(@Self)^.&set := $00000004;
  72859. end;
  72860. procedure TCAN1_C1FIFOINT6.clearRXFULLIF; inline;
  72861. begin
  72862. pTDefRegMap(@Self)^.clr := $00000004;
  72863. end;
  72864. procedure TCAN1_C1FIFOINT6.setRXFULLIF(thebits : TBits_1); inline;
  72865. begin
  72866. if thebits = 0 then
  72867. pTDefRegMap(@Self)^.clr := $00000004
  72868. else
  72869. pTDefRegMap(@Self)^.&set := $00000004;
  72870. end;
  72871. function TCAN1_C1FIFOINT6.getRXFULLIF : TBits_1; inline;
  72872. begin
  72873. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72874. end;
  72875. procedure TCAN1_C1FIFOINT6.setRXOVFLIF; inline;
  72876. begin
  72877. pTDefRegMap(@Self)^.&set := $00000008;
  72878. end;
  72879. procedure TCAN1_C1FIFOINT6.clearRXOVFLIF; inline;
  72880. begin
  72881. pTDefRegMap(@Self)^.clr := $00000008;
  72882. end;
  72883. procedure TCAN1_C1FIFOINT6.setRXOVFLIF(thebits : TBits_1); inline;
  72884. begin
  72885. if thebits = 0 then
  72886. pTDefRegMap(@Self)^.clr := $00000008
  72887. else
  72888. pTDefRegMap(@Self)^.&set := $00000008;
  72889. end;
  72890. function TCAN1_C1FIFOINT6.getRXOVFLIF : TBits_1; inline;
  72891. begin
  72892. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72893. end;
  72894. procedure TCAN1_C1FIFOINT6.setTXEMPTYIF; inline;
  72895. begin
  72896. pTDefRegMap(@Self)^.&set := $00000100;
  72897. end;
  72898. procedure TCAN1_C1FIFOINT6.clearTXEMPTYIF; inline;
  72899. begin
  72900. pTDefRegMap(@Self)^.clr := $00000100;
  72901. end;
  72902. procedure TCAN1_C1FIFOINT6.setTXEMPTYIF(thebits : TBits_1); inline;
  72903. begin
  72904. if thebits = 0 then
  72905. pTDefRegMap(@Self)^.clr := $00000100
  72906. else
  72907. pTDefRegMap(@Self)^.&set := $00000100;
  72908. end;
  72909. function TCAN1_C1FIFOINT6.getTXEMPTYIF : TBits_1; inline;
  72910. begin
  72911. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  72912. end;
  72913. procedure TCAN1_C1FIFOINT6.setTXHALFIF; inline;
  72914. begin
  72915. pTDefRegMap(@Self)^.&set := $00000200;
  72916. end;
  72917. procedure TCAN1_C1FIFOINT6.clearTXHALFIF; inline;
  72918. begin
  72919. pTDefRegMap(@Self)^.clr := $00000200;
  72920. end;
  72921. procedure TCAN1_C1FIFOINT6.setTXHALFIF(thebits : TBits_1); inline;
  72922. begin
  72923. if thebits = 0 then
  72924. pTDefRegMap(@Self)^.clr := $00000200
  72925. else
  72926. pTDefRegMap(@Self)^.&set := $00000200;
  72927. end;
  72928. function TCAN1_C1FIFOINT6.getTXHALFIF : TBits_1; inline;
  72929. begin
  72930. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  72931. end;
  72932. procedure TCAN1_C1FIFOINT6.setTXNFULLIF; inline;
  72933. begin
  72934. pTDefRegMap(@Self)^.&set := $00000400;
  72935. end;
  72936. procedure TCAN1_C1FIFOINT6.clearTXNFULLIF; inline;
  72937. begin
  72938. pTDefRegMap(@Self)^.clr := $00000400;
  72939. end;
  72940. procedure TCAN1_C1FIFOINT6.setTXNFULLIF(thebits : TBits_1); inline;
  72941. begin
  72942. if thebits = 0 then
  72943. pTDefRegMap(@Self)^.clr := $00000400
  72944. else
  72945. pTDefRegMap(@Self)^.&set := $00000400;
  72946. end;
  72947. function TCAN1_C1FIFOINT6.getTXNFULLIF : TBits_1; inline;
  72948. begin
  72949. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  72950. end;
  72951. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIE; inline;
  72952. begin
  72953. pTDefRegMap(@Self)^.&set := $00010000;
  72954. end;
  72955. procedure TCAN1_C1FIFOINT6.clearRXNEMPTYIE; inline;
  72956. begin
  72957. pTDefRegMap(@Self)^.clr := $00010000;
  72958. end;
  72959. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIE(thebits : TBits_1); inline;
  72960. begin
  72961. if thebits = 0 then
  72962. pTDefRegMap(@Self)^.clr := $00010000
  72963. else
  72964. pTDefRegMap(@Self)^.&set := $00010000;
  72965. end;
  72966. function TCAN1_C1FIFOINT6.getRXNEMPTYIE : TBits_1; inline;
  72967. begin
  72968. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  72969. end;
  72970. procedure TCAN1_C1FIFOINT6.setRXHALFIE; inline;
  72971. begin
  72972. pTDefRegMap(@Self)^.&set := $00020000;
  72973. end;
  72974. procedure TCAN1_C1FIFOINT6.clearRXHALFIE; inline;
  72975. begin
  72976. pTDefRegMap(@Self)^.clr := $00020000;
  72977. end;
  72978. procedure TCAN1_C1FIFOINT6.setRXHALFIE(thebits : TBits_1); inline;
  72979. begin
  72980. if thebits = 0 then
  72981. pTDefRegMap(@Self)^.clr := $00020000
  72982. else
  72983. pTDefRegMap(@Self)^.&set := $00020000;
  72984. end;
  72985. function TCAN1_C1FIFOINT6.getRXHALFIE : TBits_1; inline;
  72986. begin
  72987. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  72988. end;
  72989. procedure TCAN1_C1FIFOINT6.setRXFULLIE; inline;
  72990. begin
  72991. pTDefRegMap(@Self)^.&set := $00040000;
  72992. end;
  72993. procedure TCAN1_C1FIFOINT6.clearRXFULLIE; inline;
  72994. begin
  72995. pTDefRegMap(@Self)^.clr := $00040000;
  72996. end;
  72997. procedure TCAN1_C1FIFOINT6.setRXFULLIE(thebits : TBits_1); inline;
  72998. begin
  72999. if thebits = 0 then
  73000. pTDefRegMap(@Self)^.clr := $00040000
  73001. else
  73002. pTDefRegMap(@Self)^.&set := $00040000;
  73003. end;
  73004. function TCAN1_C1FIFOINT6.getRXFULLIE : TBits_1; inline;
  73005. begin
  73006. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  73007. end;
  73008. procedure TCAN1_C1FIFOINT6.setRXOVFLIE; inline;
  73009. begin
  73010. pTDefRegMap(@Self)^.&set := $00080000;
  73011. end;
  73012. procedure TCAN1_C1FIFOINT6.clearRXOVFLIE; inline;
  73013. begin
  73014. pTDefRegMap(@Self)^.clr := $00080000;
  73015. end;
  73016. procedure TCAN1_C1FIFOINT6.setRXOVFLIE(thebits : TBits_1); inline;
  73017. begin
  73018. if thebits = 0 then
  73019. pTDefRegMap(@Self)^.clr := $00080000
  73020. else
  73021. pTDefRegMap(@Self)^.&set := $00080000;
  73022. end;
  73023. function TCAN1_C1FIFOINT6.getRXOVFLIE : TBits_1; inline;
  73024. begin
  73025. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  73026. end;
  73027. procedure TCAN1_C1FIFOINT6.setTXEMPTYIE; inline;
  73028. begin
  73029. pTDefRegMap(@Self)^.&set := $01000000;
  73030. end;
  73031. procedure TCAN1_C1FIFOINT6.clearTXEMPTYIE; inline;
  73032. begin
  73033. pTDefRegMap(@Self)^.clr := $01000000;
  73034. end;
  73035. procedure TCAN1_C1FIFOINT6.setTXEMPTYIE(thebits : TBits_1); inline;
  73036. begin
  73037. if thebits = 0 then
  73038. pTDefRegMap(@Self)^.clr := $01000000
  73039. else
  73040. pTDefRegMap(@Self)^.&set := $01000000;
  73041. end;
  73042. function TCAN1_C1FIFOINT6.getTXEMPTYIE : TBits_1; inline;
  73043. begin
  73044. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  73045. end;
  73046. procedure TCAN1_C1FIFOINT6.setTXHALFIE; inline;
  73047. begin
  73048. pTDefRegMap(@Self)^.&set := $02000000;
  73049. end;
  73050. procedure TCAN1_C1FIFOINT6.clearTXHALFIE; inline;
  73051. begin
  73052. pTDefRegMap(@Self)^.clr := $02000000;
  73053. end;
  73054. procedure TCAN1_C1FIFOINT6.setTXHALFIE(thebits : TBits_1); inline;
  73055. begin
  73056. if thebits = 0 then
  73057. pTDefRegMap(@Self)^.clr := $02000000
  73058. else
  73059. pTDefRegMap(@Self)^.&set := $02000000;
  73060. end;
  73061. function TCAN1_C1FIFOINT6.getTXHALFIE : TBits_1; inline;
  73062. begin
  73063. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  73064. end;
  73065. procedure TCAN1_C1FIFOINT6.setTXNFULLIE; inline;
  73066. begin
  73067. pTDefRegMap(@Self)^.&set := $04000000;
  73068. end;
  73069. procedure TCAN1_C1FIFOINT6.clearTXNFULLIE; inline;
  73070. begin
  73071. pTDefRegMap(@Self)^.clr := $04000000;
  73072. end;
  73073. procedure TCAN1_C1FIFOINT6.setTXNFULLIE(thebits : TBits_1); inline;
  73074. begin
  73075. if thebits = 0 then
  73076. pTDefRegMap(@Self)^.clr := $04000000
  73077. else
  73078. pTDefRegMap(@Self)^.&set := $04000000;
  73079. end;
  73080. function TCAN1_C1FIFOINT6.getTXNFULLIE : TBits_1; inline;
  73081. begin
  73082. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  73083. end;
  73084. procedure TCAN1_C1FIFOINT6.setw(thebits : TBits_32); inline;
  73085. begin
  73086. pTDefRegMap(@Self)^.val := thebits;
  73087. end;
  73088. function TCAN1_C1FIFOINT6.getw : TBits_32; inline;
  73089. begin
  73090. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73091. end;
  73092. procedure TCAN1_C1FIFOCI6.setCFIFOCI(thebits : TBits_5); inline;
  73093. begin
  73094. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  73095. end;
  73096. function TCAN1_C1FIFOCI6.getCFIFOCI : TBits_5; inline;
  73097. begin
  73098. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  73099. end;
  73100. procedure TCAN1_C1FIFOCI6.setw(thebits : TBits_32); inline;
  73101. begin
  73102. pTDefRegMap(@Self)^.val := thebits;
  73103. end;
  73104. function TCAN1_C1FIFOCI6.getw : TBits_32; inline;
  73105. begin
  73106. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73107. end;
  73108. procedure TCAN1_C1FIFOCON7.setTXPRI(thebits : TBits_2); inline;
  73109. begin
  73110. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  73111. end;
  73112. function TCAN1_C1FIFOCON7.getTXPRI : TBits_2; inline;
  73113. begin
  73114. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  73115. end;
  73116. procedure TCAN1_C1FIFOCON7.setRTREN; inline;
  73117. begin
  73118. pTDefRegMap(@Self)^.&set := $00000004;
  73119. end;
  73120. procedure TCAN1_C1FIFOCON7.clearRTREN; inline;
  73121. begin
  73122. pTDefRegMap(@Self)^.clr := $00000004;
  73123. end;
  73124. procedure TCAN1_C1FIFOCON7.setRTREN(thebits : TBits_1); inline;
  73125. begin
  73126. if thebits = 0 then
  73127. pTDefRegMap(@Self)^.clr := $00000004
  73128. else
  73129. pTDefRegMap(@Self)^.&set := $00000004;
  73130. end;
  73131. function TCAN1_C1FIFOCON7.getRTREN : TBits_1; inline;
  73132. begin
  73133. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73134. end;
  73135. procedure TCAN1_C1FIFOCON7.setTXREQ; inline;
  73136. begin
  73137. pTDefRegMap(@Self)^.&set := $00000008;
  73138. end;
  73139. procedure TCAN1_C1FIFOCON7.clearTXREQ; inline;
  73140. begin
  73141. pTDefRegMap(@Self)^.clr := $00000008;
  73142. end;
  73143. procedure TCAN1_C1FIFOCON7.setTXREQ(thebits : TBits_1); inline;
  73144. begin
  73145. if thebits = 0 then
  73146. pTDefRegMap(@Self)^.clr := $00000008
  73147. else
  73148. pTDefRegMap(@Self)^.&set := $00000008;
  73149. end;
  73150. function TCAN1_C1FIFOCON7.getTXREQ : TBits_1; inline;
  73151. begin
  73152. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73153. end;
  73154. procedure TCAN1_C1FIFOCON7.setTXERR; inline;
  73155. begin
  73156. pTDefRegMap(@Self)^.&set := $00000010;
  73157. end;
  73158. procedure TCAN1_C1FIFOCON7.clearTXERR; inline;
  73159. begin
  73160. pTDefRegMap(@Self)^.clr := $00000010;
  73161. end;
  73162. procedure TCAN1_C1FIFOCON7.setTXERR(thebits : TBits_1); inline;
  73163. begin
  73164. if thebits = 0 then
  73165. pTDefRegMap(@Self)^.clr := $00000010
  73166. else
  73167. pTDefRegMap(@Self)^.&set := $00000010;
  73168. end;
  73169. function TCAN1_C1FIFOCON7.getTXERR : TBits_1; inline;
  73170. begin
  73171. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  73172. end;
  73173. procedure TCAN1_C1FIFOCON7.setTXLARB; inline;
  73174. begin
  73175. pTDefRegMap(@Self)^.&set := $00000020;
  73176. end;
  73177. procedure TCAN1_C1FIFOCON7.clearTXLARB; inline;
  73178. begin
  73179. pTDefRegMap(@Self)^.clr := $00000020;
  73180. end;
  73181. procedure TCAN1_C1FIFOCON7.setTXLARB(thebits : TBits_1); inline;
  73182. begin
  73183. if thebits = 0 then
  73184. pTDefRegMap(@Self)^.clr := $00000020
  73185. else
  73186. pTDefRegMap(@Self)^.&set := $00000020;
  73187. end;
  73188. function TCAN1_C1FIFOCON7.getTXLARB : TBits_1; inline;
  73189. begin
  73190. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  73191. end;
  73192. procedure TCAN1_C1FIFOCON7.setTXABAT; inline;
  73193. begin
  73194. pTDefRegMap(@Self)^.&set := $00000040;
  73195. end;
  73196. procedure TCAN1_C1FIFOCON7.clearTXABAT; inline;
  73197. begin
  73198. pTDefRegMap(@Self)^.clr := $00000040;
  73199. end;
  73200. procedure TCAN1_C1FIFOCON7.setTXABAT(thebits : TBits_1); inline;
  73201. begin
  73202. if thebits = 0 then
  73203. pTDefRegMap(@Self)^.clr := $00000040
  73204. else
  73205. pTDefRegMap(@Self)^.&set := $00000040;
  73206. end;
  73207. function TCAN1_C1FIFOCON7.getTXABAT : TBits_1; inline;
  73208. begin
  73209. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  73210. end;
  73211. procedure TCAN1_C1FIFOCON7.setTXEN; inline;
  73212. begin
  73213. pTDefRegMap(@Self)^.&set := $00000080;
  73214. end;
  73215. procedure TCAN1_C1FIFOCON7.clearTXEN; inline;
  73216. begin
  73217. pTDefRegMap(@Self)^.clr := $00000080;
  73218. end;
  73219. procedure TCAN1_C1FIFOCON7.setTXEN(thebits : TBits_1); inline;
  73220. begin
  73221. if thebits = 0 then
  73222. pTDefRegMap(@Self)^.clr := $00000080
  73223. else
  73224. pTDefRegMap(@Self)^.&set := $00000080;
  73225. end;
  73226. function TCAN1_C1FIFOCON7.getTXEN : TBits_1; inline;
  73227. begin
  73228. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73229. end;
  73230. procedure TCAN1_C1FIFOCON7.setDONLY; inline;
  73231. begin
  73232. pTDefRegMap(@Self)^.&set := $00001000;
  73233. end;
  73234. procedure TCAN1_C1FIFOCON7.clearDONLY; inline;
  73235. begin
  73236. pTDefRegMap(@Self)^.clr := $00001000;
  73237. end;
  73238. procedure TCAN1_C1FIFOCON7.setDONLY(thebits : TBits_1); inline;
  73239. begin
  73240. if thebits = 0 then
  73241. pTDefRegMap(@Self)^.clr := $00001000
  73242. else
  73243. pTDefRegMap(@Self)^.&set := $00001000;
  73244. end;
  73245. function TCAN1_C1FIFOCON7.getDONLY : TBits_1; inline;
  73246. begin
  73247. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  73248. end;
  73249. procedure TCAN1_C1FIFOCON7.setUINC; inline;
  73250. begin
  73251. pTDefRegMap(@Self)^.&set := $00002000;
  73252. end;
  73253. procedure TCAN1_C1FIFOCON7.clearUINC; inline;
  73254. begin
  73255. pTDefRegMap(@Self)^.clr := $00002000;
  73256. end;
  73257. procedure TCAN1_C1FIFOCON7.setUINC(thebits : TBits_1); inline;
  73258. begin
  73259. if thebits = 0 then
  73260. pTDefRegMap(@Self)^.clr := $00002000
  73261. else
  73262. pTDefRegMap(@Self)^.&set := $00002000;
  73263. end;
  73264. function TCAN1_C1FIFOCON7.getUINC : TBits_1; inline;
  73265. begin
  73266. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  73267. end;
  73268. procedure TCAN1_C1FIFOCON7.setFRESET; inline;
  73269. begin
  73270. pTDefRegMap(@Self)^.&set := $00004000;
  73271. end;
  73272. procedure TCAN1_C1FIFOCON7.clearFRESET; inline;
  73273. begin
  73274. pTDefRegMap(@Self)^.clr := $00004000;
  73275. end;
  73276. procedure TCAN1_C1FIFOCON7.setFRESET(thebits : TBits_1); inline;
  73277. begin
  73278. if thebits = 0 then
  73279. pTDefRegMap(@Self)^.clr := $00004000
  73280. else
  73281. pTDefRegMap(@Self)^.&set := $00004000;
  73282. end;
  73283. function TCAN1_C1FIFOCON7.getFRESET : TBits_1; inline;
  73284. begin
  73285. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73286. end;
  73287. procedure TCAN1_C1FIFOCON7.setFSIZE(thebits : TBits_5); inline;
  73288. begin
  73289. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  73290. end;
  73291. function TCAN1_C1FIFOCON7.getFSIZE : TBits_5; inline;
  73292. begin
  73293. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  73294. end;
  73295. procedure TCAN1_C1FIFOCON7.setw(thebits : TBits_32); inline;
  73296. begin
  73297. pTDefRegMap(@Self)^.val := thebits;
  73298. end;
  73299. function TCAN1_C1FIFOCON7.getw : TBits_32; inline;
  73300. begin
  73301. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73302. end;
  73303. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIF; inline;
  73304. begin
  73305. pTDefRegMap(@Self)^.&set := $00000001;
  73306. end;
  73307. procedure TCAN1_C1FIFOINT7.clearRXNEMPTYIF; inline;
  73308. begin
  73309. pTDefRegMap(@Self)^.clr := $00000001;
  73310. end;
  73311. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIF(thebits : TBits_1); inline;
  73312. begin
  73313. if thebits = 0 then
  73314. pTDefRegMap(@Self)^.clr := $00000001
  73315. else
  73316. pTDefRegMap(@Self)^.&set := $00000001;
  73317. end;
  73318. function TCAN1_C1FIFOINT7.getRXNEMPTYIF : TBits_1; inline;
  73319. begin
  73320. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73321. end;
  73322. procedure TCAN1_C1FIFOINT7.setRXHALFIF; inline;
  73323. begin
  73324. pTDefRegMap(@Self)^.&set := $00000002;
  73325. end;
  73326. procedure TCAN1_C1FIFOINT7.clearRXHALFIF; inline;
  73327. begin
  73328. pTDefRegMap(@Self)^.clr := $00000002;
  73329. end;
  73330. procedure TCAN1_C1FIFOINT7.setRXHALFIF(thebits : TBits_1); inline;
  73331. begin
  73332. if thebits = 0 then
  73333. pTDefRegMap(@Self)^.clr := $00000002
  73334. else
  73335. pTDefRegMap(@Self)^.&set := $00000002;
  73336. end;
  73337. function TCAN1_C1FIFOINT7.getRXHALFIF : TBits_1; inline;
  73338. begin
  73339. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73340. end;
  73341. procedure TCAN1_C1FIFOINT7.setRXFULLIF; inline;
  73342. begin
  73343. pTDefRegMap(@Self)^.&set := $00000004;
  73344. end;
  73345. procedure TCAN1_C1FIFOINT7.clearRXFULLIF; inline;
  73346. begin
  73347. pTDefRegMap(@Self)^.clr := $00000004;
  73348. end;
  73349. procedure TCAN1_C1FIFOINT7.setRXFULLIF(thebits : TBits_1); inline;
  73350. begin
  73351. if thebits = 0 then
  73352. pTDefRegMap(@Self)^.clr := $00000004
  73353. else
  73354. pTDefRegMap(@Self)^.&set := $00000004;
  73355. end;
  73356. function TCAN1_C1FIFOINT7.getRXFULLIF : TBits_1; inline;
  73357. begin
  73358. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73359. end;
  73360. procedure TCAN1_C1FIFOINT7.setRXOVFLIF; inline;
  73361. begin
  73362. pTDefRegMap(@Self)^.&set := $00000008;
  73363. end;
  73364. procedure TCAN1_C1FIFOINT7.clearRXOVFLIF; inline;
  73365. begin
  73366. pTDefRegMap(@Self)^.clr := $00000008;
  73367. end;
  73368. procedure TCAN1_C1FIFOINT7.setRXOVFLIF(thebits : TBits_1); inline;
  73369. begin
  73370. if thebits = 0 then
  73371. pTDefRegMap(@Self)^.clr := $00000008
  73372. else
  73373. pTDefRegMap(@Self)^.&set := $00000008;
  73374. end;
  73375. function TCAN1_C1FIFOINT7.getRXOVFLIF : TBits_1; inline;
  73376. begin
  73377. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73378. end;
  73379. procedure TCAN1_C1FIFOINT7.setTXEMPTYIF; inline;
  73380. begin
  73381. pTDefRegMap(@Self)^.&set := $00000100;
  73382. end;
  73383. procedure TCAN1_C1FIFOINT7.clearTXEMPTYIF; inline;
  73384. begin
  73385. pTDefRegMap(@Self)^.clr := $00000100;
  73386. end;
  73387. procedure TCAN1_C1FIFOINT7.setTXEMPTYIF(thebits : TBits_1); inline;
  73388. begin
  73389. if thebits = 0 then
  73390. pTDefRegMap(@Self)^.clr := $00000100
  73391. else
  73392. pTDefRegMap(@Self)^.&set := $00000100;
  73393. end;
  73394. function TCAN1_C1FIFOINT7.getTXEMPTYIF : TBits_1; inline;
  73395. begin
  73396. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73397. end;
  73398. procedure TCAN1_C1FIFOINT7.setTXHALFIF; inline;
  73399. begin
  73400. pTDefRegMap(@Self)^.&set := $00000200;
  73401. end;
  73402. procedure TCAN1_C1FIFOINT7.clearTXHALFIF; inline;
  73403. begin
  73404. pTDefRegMap(@Self)^.clr := $00000200;
  73405. end;
  73406. procedure TCAN1_C1FIFOINT7.setTXHALFIF(thebits : TBits_1); inline;
  73407. begin
  73408. if thebits = 0 then
  73409. pTDefRegMap(@Self)^.clr := $00000200
  73410. else
  73411. pTDefRegMap(@Self)^.&set := $00000200;
  73412. end;
  73413. function TCAN1_C1FIFOINT7.getTXHALFIF : TBits_1; inline;
  73414. begin
  73415. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  73416. end;
  73417. procedure TCAN1_C1FIFOINT7.setTXNFULLIF; inline;
  73418. begin
  73419. pTDefRegMap(@Self)^.&set := $00000400;
  73420. end;
  73421. procedure TCAN1_C1FIFOINT7.clearTXNFULLIF; inline;
  73422. begin
  73423. pTDefRegMap(@Self)^.clr := $00000400;
  73424. end;
  73425. procedure TCAN1_C1FIFOINT7.setTXNFULLIF(thebits : TBits_1); inline;
  73426. begin
  73427. if thebits = 0 then
  73428. pTDefRegMap(@Self)^.clr := $00000400
  73429. else
  73430. pTDefRegMap(@Self)^.&set := $00000400;
  73431. end;
  73432. function TCAN1_C1FIFOINT7.getTXNFULLIF : TBits_1; inline;
  73433. begin
  73434. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  73435. end;
  73436. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIE; inline;
  73437. begin
  73438. pTDefRegMap(@Self)^.&set := $00010000;
  73439. end;
  73440. procedure TCAN1_C1FIFOINT7.clearRXNEMPTYIE; inline;
  73441. begin
  73442. pTDefRegMap(@Self)^.clr := $00010000;
  73443. end;
  73444. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIE(thebits : TBits_1); inline;
  73445. begin
  73446. if thebits = 0 then
  73447. pTDefRegMap(@Self)^.clr := $00010000
  73448. else
  73449. pTDefRegMap(@Self)^.&set := $00010000;
  73450. end;
  73451. function TCAN1_C1FIFOINT7.getRXNEMPTYIE : TBits_1; inline;
  73452. begin
  73453. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  73454. end;
  73455. procedure TCAN1_C1FIFOINT7.setRXHALFIE; inline;
  73456. begin
  73457. pTDefRegMap(@Self)^.&set := $00020000;
  73458. end;
  73459. procedure TCAN1_C1FIFOINT7.clearRXHALFIE; inline;
  73460. begin
  73461. pTDefRegMap(@Self)^.clr := $00020000;
  73462. end;
  73463. procedure TCAN1_C1FIFOINT7.setRXHALFIE(thebits : TBits_1); inline;
  73464. begin
  73465. if thebits = 0 then
  73466. pTDefRegMap(@Self)^.clr := $00020000
  73467. else
  73468. pTDefRegMap(@Self)^.&set := $00020000;
  73469. end;
  73470. function TCAN1_C1FIFOINT7.getRXHALFIE : TBits_1; inline;
  73471. begin
  73472. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  73473. end;
  73474. procedure TCAN1_C1FIFOINT7.setRXFULLIE; inline;
  73475. begin
  73476. pTDefRegMap(@Self)^.&set := $00040000;
  73477. end;
  73478. procedure TCAN1_C1FIFOINT7.clearRXFULLIE; inline;
  73479. begin
  73480. pTDefRegMap(@Self)^.clr := $00040000;
  73481. end;
  73482. procedure TCAN1_C1FIFOINT7.setRXFULLIE(thebits : TBits_1); inline;
  73483. begin
  73484. if thebits = 0 then
  73485. pTDefRegMap(@Self)^.clr := $00040000
  73486. else
  73487. pTDefRegMap(@Self)^.&set := $00040000;
  73488. end;
  73489. function TCAN1_C1FIFOINT7.getRXFULLIE : TBits_1; inline;
  73490. begin
  73491. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  73492. end;
  73493. procedure TCAN1_C1FIFOINT7.setRXOVFLIE; inline;
  73494. begin
  73495. pTDefRegMap(@Self)^.&set := $00080000;
  73496. end;
  73497. procedure TCAN1_C1FIFOINT7.clearRXOVFLIE; inline;
  73498. begin
  73499. pTDefRegMap(@Self)^.clr := $00080000;
  73500. end;
  73501. procedure TCAN1_C1FIFOINT7.setRXOVFLIE(thebits : TBits_1); inline;
  73502. begin
  73503. if thebits = 0 then
  73504. pTDefRegMap(@Self)^.clr := $00080000
  73505. else
  73506. pTDefRegMap(@Self)^.&set := $00080000;
  73507. end;
  73508. function TCAN1_C1FIFOINT7.getRXOVFLIE : TBits_1; inline;
  73509. begin
  73510. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  73511. end;
  73512. procedure TCAN1_C1FIFOINT7.setTXEMPTYIE; inline;
  73513. begin
  73514. pTDefRegMap(@Self)^.&set := $01000000;
  73515. end;
  73516. procedure TCAN1_C1FIFOINT7.clearTXEMPTYIE; inline;
  73517. begin
  73518. pTDefRegMap(@Self)^.clr := $01000000;
  73519. end;
  73520. procedure TCAN1_C1FIFOINT7.setTXEMPTYIE(thebits : TBits_1); inline;
  73521. begin
  73522. if thebits = 0 then
  73523. pTDefRegMap(@Self)^.clr := $01000000
  73524. else
  73525. pTDefRegMap(@Self)^.&set := $01000000;
  73526. end;
  73527. function TCAN1_C1FIFOINT7.getTXEMPTYIE : TBits_1; inline;
  73528. begin
  73529. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  73530. end;
  73531. procedure TCAN1_C1FIFOINT7.setTXHALFIE; inline;
  73532. begin
  73533. pTDefRegMap(@Self)^.&set := $02000000;
  73534. end;
  73535. procedure TCAN1_C1FIFOINT7.clearTXHALFIE; inline;
  73536. begin
  73537. pTDefRegMap(@Self)^.clr := $02000000;
  73538. end;
  73539. procedure TCAN1_C1FIFOINT7.setTXHALFIE(thebits : TBits_1); inline;
  73540. begin
  73541. if thebits = 0 then
  73542. pTDefRegMap(@Self)^.clr := $02000000
  73543. else
  73544. pTDefRegMap(@Self)^.&set := $02000000;
  73545. end;
  73546. function TCAN1_C1FIFOINT7.getTXHALFIE : TBits_1; inline;
  73547. begin
  73548. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  73549. end;
  73550. procedure TCAN1_C1FIFOINT7.setTXNFULLIE; inline;
  73551. begin
  73552. pTDefRegMap(@Self)^.&set := $04000000;
  73553. end;
  73554. procedure TCAN1_C1FIFOINT7.clearTXNFULLIE; inline;
  73555. begin
  73556. pTDefRegMap(@Self)^.clr := $04000000;
  73557. end;
  73558. procedure TCAN1_C1FIFOINT7.setTXNFULLIE(thebits : TBits_1); inline;
  73559. begin
  73560. if thebits = 0 then
  73561. pTDefRegMap(@Self)^.clr := $04000000
  73562. else
  73563. pTDefRegMap(@Self)^.&set := $04000000;
  73564. end;
  73565. function TCAN1_C1FIFOINT7.getTXNFULLIE : TBits_1; inline;
  73566. begin
  73567. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  73568. end;
  73569. procedure TCAN1_C1FIFOINT7.setw(thebits : TBits_32); inline;
  73570. begin
  73571. pTDefRegMap(@Self)^.val := thebits;
  73572. end;
  73573. function TCAN1_C1FIFOINT7.getw : TBits_32; inline;
  73574. begin
  73575. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73576. end;
  73577. procedure TCAN1_C1FIFOCI7.setCFIFOCI(thebits : TBits_5); inline;
  73578. begin
  73579. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  73580. end;
  73581. function TCAN1_C1FIFOCI7.getCFIFOCI : TBits_5; inline;
  73582. begin
  73583. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  73584. end;
  73585. procedure TCAN1_C1FIFOCI7.setw(thebits : TBits_32); inline;
  73586. begin
  73587. pTDefRegMap(@Self)^.val := thebits;
  73588. end;
  73589. function TCAN1_C1FIFOCI7.getw : TBits_32; inline;
  73590. begin
  73591. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73592. end;
  73593. procedure TCAN1_C1FIFOCON8.setTXPRI(thebits : TBits_2); inline;
  73594. begin
  73595. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  73596. end;
  73597. function TCAN1_C1FIFOCON8.getTXPRI : TBits_2; inline;
  73598. begin
  73599. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  73600. end;
  73601. procedure TCAN1_C1FIFOCON8.setRTREN; inline;
  73602. begin
  73603. pTDefRegMap(@Self)^.&set := $00000004;
  73604. end;
  73605. procedure TCAN1_C1FIFOCON8.clearRTREN; inline;
  73606. begin
  73607. pTDefRegMap(@Self)^.clr := $00000004;
  73608. end;
  73609. procedure TCAN1_C1FIFOCON8.setRTREN(thebits : TBits_1); inline;
  73610. begin
  73611. if thebits = 0 then
  73612. pTDefRegMap(@Self)^.clr := $00000004
  73613. else
  73614. pTDefRegMap(@Self)^.&set := $00000004;
  73615. end;
  73616. function TCAN1_C1FIFOCON8.getRTREN : TBits_1; inline;
  73617. begin
  73618. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73619. end;
  73620. procedure TCAN1_C1FIFOCON8.setTXREQ; inline;
  73621. begin
  73622. pTDefRegMap(@Self)^.&set := $00000008;
  73623. end;
  73624. procedure TCAN1_C1FIFOCON8.clearTXREQ; inline;
  73625. begin
  73626. pTDefRegMap(@Self)^.clr := $00000008;
  73627. end;
  73628. procedure TCAN1_C1FIFOCON8.setTXREQ(thebits : TBits_1); inline;
  73629. begin
  73630. if thebits = 0 then
  73631. pTDefRegMap(@Self)^.clr := $00000008
  73632. else
  73633. pTDefRegMap(@Self)^.&set := $00000008;
  73634. end;
  73635. function TCAN1_C1FIFOCON8.getTXREQ : TBits_1; inline;
  73636. begin
  73637. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73638. end;
  73639. procedure TCAN1_C1FIFOCON8.setTXERR; inline;
  73640. begin
  73641. pTDefRegMap(@Self)^.&set := $00000010;
  73642. end;
  73643. procedure TCAN1_C1FIFOCON8.clearTXERR; inline;
  73644. begin
  73645. pTDefRegMap(@Self)^.clr := $00000010;
  73646. end;
  73647. procedure TCAN1_C1FIFOCON8.setTXERR(thebits : TBits_1); inline;
  73648. begin
  73649. if thebits = 0 then
  73650. pTDefRegMap(@Self)^.clr := $00000010
  73651. else
  73652. pTDefRegMap(@Self)^.&set := $00000010;
  73653. end;
  73654. function TCAN1_C1FIFOCON8.getTXERR : TBits_1; inline;
  73655. begin
  73656. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  73657. end;
  73658. procedure TCAN1_C1FIFOCON8.setTXLARB; inline;
  73659. begin
  73660. pTDefRegMap(@Self)^.&set := $00000020;
  73661. end;
  73662. procedure TCAN1_C1FIFOCON8.clearTXLARB; inline;
  73663. begin
  73664. pTDefRegMap(@Self)^.clr := $00000020;
  73665. end;
  73666. procedure TCAN1_C1FIFOCON8.setTXLARB(thebits : TBits_1); inline;
  73667. begin
  73668. if thebits = 0 then
  73669. pTDefRegMap(@Self)^.clr := $00000020
  73670. else
  73671. pTDefRegMap(@Self)^.&set := $00000020;
  73672. end;
  73673. function TCAN1_C1FIFOCON8.getTXLARB : TBits_1; inline;
  73674. begin
  73675. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  73676. end;
  73677. procedure TCAN1_C1FIFOCON8.setTXABAT; inline;
  73678. begin
  73679. pTDefRegMap(@Self)^.&set := $00000040;
  73680. end;
  73681. procedure TCAN1_C1FIFOCON8.clearTXABAT; inline;
  73682. begin
  73683. pTDefRegMap(@Self)^.clr := $00000040;
  73684. end;
  73685. procedure TCAN1_C1FIFOCON8.setTXABAT(thebits : TBits_1); inline;
  73686. begin
  73687. if thebits = 0 then
  73688. pTDefRegMap(@Self)^.clr := $00000040
  73689. else
  73690. pTDefRegMap(@Self)^.&set := $00000040;
  73691. end;
  73692. function TCAN1_C1FIFOCON8.getTXABAT : TBits_1; inline;
  73693. begin
  73694. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  73695. end;
  73696. procedure TCAN1_C1FIFOCON8.setTXEN; inline;
  73697. begin
  73698. pTDefRegMap(@Self)^.&set := $00000080;
  73699. end;
  73700. procedure TCAN1_C1FIFOCON8.clearTXEN; inline;
  73701. begin
  73702. pTDefRegMap(@Self)^.clr := $00000080;
  73703. end;
  73704. procedure TCAN1_C1FIFOCON8.setTXEN(thebits : TBits_1); inline;
  73705. begin
  73706. if thebits = 0 then
  73707. pTDefRegMap(@Self)^.clr := $00000080
  73708. else
  73709. pTDefRegMap(@Self)^.&set := $00000080;
  73710. end;
  73711. function TCAN1_C1FIFOCON8.getTXEN : TBits_1; inline;
  73712. begin
  73713. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73714. end;
  73715. procedure TCAN1_C1FIFOCON8.setDONLY; inline;
  73716. begin
  73717. pTDefRegMap(@Self)^.&set := $00001000;
  73718. end;
  73719. procedure TCAN1_C1FIFOCON8.clearDONLY; inline;
  73720. begin
  73721. pTDefRegMap(@Self)^.clr := $00001000;
  73722. end;
  73723. procedure TCAN1_C1FIFOCON8.setDONLY(thebits : TBits_1); inline;
  73724. begin
  73725. if thebits = 0 then
  73726. pTDefRegMap(@Self)^.clr := $00001000
  73727. else
  73728. pTDefRegMap(@Self)^.&set := $00001000;
  73729. end;
  73730. function TCAN1_C1FIFOCON8.getDONLY : TBits_1; inline;
  73731. begin
  73732. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  73733. end;
  73734. procedure TCAN1_C1FIFOCON8.setUINC; inline;
  73735. begin
  73736. pTDefRegMap(@Self)^.&set := $00002000;
  73737. end;
  73738. procedure TCAN1_C1FIFOCON8.clearUINC; inline;
  73739. begin
  73740. pTDefRegMap(@Self)^.clr := $00002000;
  73741. end;
  73742. procedure TCAN1_C1FIFOCON8.setUINC(thebits : TBits_1); inline;
  73743. begin
  73744. if thebits = 0 then
  73745. pTDefRegMap(@Self)^.clr := $00002000
  73746. else
  73747. pTDefRegMap(@Self)^.&set := $00002000;
  73748. end;
  73749. function TCAN1_C1FIFOCON8.getUINC : TBits_1; inline;
  73750. begin
  73751. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  73752. end;
  73753. procedure TCAN1_C1FIFOCON8.setFRESET; inline;
  73754. begin
  73755. pTDefRegMap(@Self)^.&set := $00004000;
  73756. end;
  73757. procedure TCAN1_C1FIFOCON8.clearFRESET; inline;
  73758. begin
  73759. pTDefRegMap(@Self)^.clr := $00004000;
  73760. end;
  73761. procedure TCAN1_C1FIFOCON8.setFRESET(thebits : TBits_1); inline;
  73762. begin
  73763. if thebits = 0 then
  73764. pTDefRegMap(@Self)^.clr := $00004000
  73765. else
  73766. pTDefRegMap(@Self)^.&set := $00004000;
  73767. end;
  73768. function TCAN1_C1FIFOCON8.getFRESET : TBits_1; inline;
  73769. begin
  73770. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73771. end;
  73772. procedure TCAN1_C1FIFOCON8.setFSIZE(thebits : TBits_5); inline;
  73773. begin
  73774. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  73775. end;
  73776. function TCAN1_C1FIFOCON8.getFSIZE : TBits_5; inline;
  73777. begin
  73778. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  73779. end;
  73780. procedure TCAN1_C1FIFOCON8.setw(thebits : TBits_32); inline;
  73781. begin
  73782. pTDefRegMap(@Self)^.val := thebits;
  73783. end;
  73784. function TCAN1_C1FIFOCON8.getw : TBits_32; inline;
  73785. begin
  73786. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73787. end;
  73788. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIF; inline;
  73789. begin
  73790. pTDefRegMap(@Self)^.&set := $00000001;
  73791. end;
  73792. procedure TCAN1_C1FIFOINT8.clearRXNEMPTYIF; inline;
  73793. begin
  73794. pTDefRegMap(@Self)^.clr := $00000001;
  73795. end;
  73796. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIF(thebits : TBits_1); inline;
  73797. begin
  73798. if thebits = 0 then
  73799. pTDefRegMap(@Self)^.clr := $00000001
  73800. else
  73801. pTDefRegMap(@Self)^.&set := $00000001;
  73802. end;
  73803. function TCAN1_C1FIFOINT8.getRXNEMPTYIF : TBits_1; inline;
  73804. begin
  73805. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73806. end;
  73807. procedure TCAN1_C1FIFOINT8.setRXHALFIF; inline;
  73808. begin
  73809. pTDefRegMap(@Self)^.&set := $00000002;
  73810. end;
  73811. procedure TCAN1_C1FIFOINT8.clearRXHALFIF; inline;
  73812. begin
  73813. pTDefRegMap(@Self)^.clr := $00000002;
  73814. end;
  73815. procedure TCAN1_C1FIFOINT8.setRXHALFIF(thebits : TBits_1); inline;
  73816. begin
  73817. if thebits = 0 then
  73818. pTDefRegMap(@Self)^.clr := $00000002
  73819. else
  73820. pTDefRegMap(@Self)^.&set := $00000002;
  73821. end;
  73822. function TCAN1_C1FIFOINT8.getRXHALFIF : TBits_1; inline;
  73823. begin
  73824. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73825. end;
  73826. procedure TCAN1_C1FIFOINT8.setRXFULLIF; inline;
  73827. begin
  73828. pTDefRegMap(@Self)^.&set := $00000004;
  73829. end;
  73830. procedure TCAN1_C1FIFOINT8.clearRXFULLIF; inline;
  73831. begin
  73832. pTDefRegMap(@Self)^.clr := $00000004;
  73833. end;
  73834. procedure TCAN1_C1FIFOINT8.setRXFULLIF(thebits : TBits_1); inline;
  73835. begin
  73836. if thebits = 0 then
  73837. pTDefRegMap(@Self)^.clr := $00000004
  73838. else
  73839. pTDefRegMap(@Self)^.&set := $00000004;
  73840. end;
  73841. function TCAN1_C1FIFOINT8.getRXFULLIF : TBits_1; inline;
  73842. begin
  73843. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73844. end;
  73845. procedure TCAN1_C1FIFOINT8.setRXOVFLIF; inline;
  73846. begin
  73847. pTDefRegMap(@Self)^.&set := $00000008;
  73848. end;
  73849. procedure TCAN1_C1FIFOINT8.clearRXOVFLIF; inline;
  73850. begin
  73851. pTDefRegMap(@Self)^.clr := $00000008;
  73852. end;
  73853. procedure TCAN1_C1FIFOINT8.setRXOVFLIF(thebits : TBits_1); inline;
  73854. begin
  73855. if thebits = 0 then
  73856. pTDefRegMap(@Self)^.clr := $00000008
  73857. else
  73858. pTDefRegMap(@Self)^.&set := $00000008;
  73859. end;
  73860. function TCAN1_C1FIFOINT8.getRXOVFLIF : TBits_1; inline;
  73861. begin
  73862. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73863. end;
  73864. procedure TCAN1_C1FIFOINT8.setTXEMPTYIF; inline;
  73865. begin
  73866. pTDefRegMap(@Self)^.&set := $00000100;
  73867. end;
  73868. procedure TCAN1_C1FIFOINT8.clearTXEMPTYIF; inline;
  73869. begin
  73870. pTDefRegMap(@Self)^.clr := $00000100;
  73871. end;
  73872. procedure TCAN1_C1FIFOINT8.setTXEMPTYIF(thebits : TBits_1); inline;
  73873. begin
  73874. if thebits = 0 then
  73875. pTDefRegMap(@Self)^.clr := $00000100
  73876. else
  73877. pTDefRegMap(@Self)^.&set := $00000100;
  73878. end;
  73879. function TCAN1_C1FIFOINT8.getTXEMPTYIF : TBits_1; inline;
  73880. begin
  73881. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73882. end;
  73883. procedure TCAN1_C1FIFOINT8.setTXHALFIF; inline;
  73884. begin
  73885. pTDefRegMap(@Self)^.&set := $00000200;
  73886. end;
  73887. procedure TCAN1_C1FIFOINT8.clearTXHALFIF; inline;
  73888. begin
  73889. pTDefRegMap(@Self)^.clr := $00000200;
  73890. end;
  73891. procedure TCAN1_C1FIFOINT8.setTXHALFIF(thebits : TBits_1); inline;
  73892. begin
  73893. if thebits = 0 then
  73894. pTDefRegMap(@Self)^.clr := $00000200
  73895. else
  73896. pTDefRegMap(@Self)^.&set := $00000200;
  73897. end;
  73898. function TCAN1_C1FIFOINT8.getTXHALFIF : TBits_1; inline;
  73899. begin
  73900. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  73901. end;
  73902. procedure TCAN1_C1FIFOINT8.setTXNFULLIF; inline;
  73903. begin
  73904. pTDefRegMap(@Self)^.&set := $00000400;
  73905. end;
  73906. procedure TCAN1_C1FIFOINT8.clearTXNFULLIF; inline;
  73907. begin
  73908. pTDefRegMap(@Self)^.clr := $00000400;
  73909. end;
  73910. procedure TCAN1_C1FIFOINT8.setTXNFULLIF(thebits : TBits_1); inline;
  73911. begin
  73912. if thebits = 0 then
  73913. pTDefRegMap(@Self)^.clr := $00000400
  73914. else
  73915. pTDefRegMap(@Self)^.&set := $00000400;
  73916. end;
  73917. function TCAN1_C1FIFOINT8.getTXNFULLIF : TBits_1; inline;
  73918. begin
  73919. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  73920. end;
  73921. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIE; inline;
  73922. begin
  73923. pTDefRegMap(@Self)^.&set := $00010000;
  73924. end;
  73925. procedure TCAN1_C1FIFOINT8.clearRXNEMPTYIE; inline;
  73926. begin
  73927. pTDefRegMap(@Self)^.clr := $00010000;
  73928. end;
  73929. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIE(thebits : TBits_1); inline;
  73930. begin
  73931. if thebits = 0 then
  73932. pTDefRegMap(@Self)^.clr := $00010000
  73933. else
  73934. pTDefRegMap(@Self)^.&set := $00010000;
  73935. end;
  73936. function TCAN1_C1FIFOINT8.getRXNEMPTYIE : TBits_1; inline;
  73937. begin
  73938. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  73939. end;
  73940. procedure TCAN1_C1FIFOINT8.setRXHALFIE; inline;
  73941. begin
  73942. pTDefRegMap(@Self)^.&set := $00020000;
  73943. end;
  73944. procedure TCAN1_C1FIFOINT8.clearRXHALFIE; inline;
  73945. begin
  73946. pTDefRegMap(@Self)^.clr := $00020000;
  73947. end;
  73948. procedure TCAN1_C1FIFOINT8.setRXHALFIE(thebits : TBits_1); inline;
  73949. begin
  73950. if thebits = 0 then
  73951. pTDefRegMap(@Self)^.clr := $00020000
  73952. else
  73953. pTDefRegMap(@Self)^.&set := $00020000;
  73954. end;
  73955. function TCAN1_C1FIFOINT8.getRXHALFIE : TBits_1; inline;
  73956. begin
  73957. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  73958. end;
  73959. procedure TCAN1_C1FIFOINT8.setRXFULLIE; inline;
  73960. begin
  73961. pTDefRegMap(@Self)^.&set := $00040000;
  73962. end;
  73963. procedure TCAN1_C1FIFOINT8.clearRXFULLIE; inline;
  73964. begin
  73965. pTDefRegMap(@Self)^.clr := $00040000;
  73966. end;
  73967. procedure TCAN1_C1FIFOINT8.setRXFULLIE(thebits : TBits_1); inline;
  73968. begin
  73969. if thebits = 0 then
  73970. pTDefRegMap(@Self)^.clr := $00040000
  73971. else
  73972. pTDefRegMap(@Self)^.&set := $00040000;
  73973. end;
  73974. function TCAN1_C1FIFOINT8.getRXFULLIE : TBits_1; inline;
  73975. begin
  73976. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  73977. end;
  73978. procedure TCAN1_C1FIFOINT8.setRXOVFLIE; inline;
  73979. begin
  73980. pTDefRegMap(@Self)^.&set := $00080000;
  73981. end;
  73982. procedure TCAN1_C1FIFOINT8.clearRXOVFLIE; inline;
  73983. begin
  73984. pTDefRegMap(@Self)^.clr := $00080000;
  73985. end;
  73986. procedure TCAN1_C1FIFOINT8.setRXOVFLIE(thebits : TBits_1); inline;
  73987. begin
  73988. if thebits = 0 then
  73989. pTDefRegMap(@Self)^.clr := $00080000
  73990. else
  73991. pTDefRegMap(@Self)^.&set := $00080000;
  73992. end;
  73993. function TCAN1_C1FIFOINT8.getRXOVFLIE : TBits_1; inline;
  73994. begin
  73995. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  73996. end;
  73997. procedure TCAN1_C1FIFOINT8.setTXEMPTYIE; inline;
  73998. begin
  73999. pTDefRegMap(@Self)^.&set := $01000000;
  74000. end;
  74001. procedure TCAN1_C1FIFOINT8.clearTXEMPTYIE; inline;
  74002. begin
  74003. pTDefRegMap(@Self)^.clr := $01000000;
  74004. end;
  74005. procedure TCAN1_C1FIFOINT8.setTXEMPTYIE(thebits : TBits_1); inline;
  74006. begin
  74007. if thebits = 0 then
  74008. pTDefRegMap(@Self)^.clr := $01000000
  74009. else
  74010. pTDefRegMap(@Self)^.&set := $01000000;
  74011. end;
  74012. function TCAN1_C1FIFOINT8.getTXEMPTYIE : TBits_1; inline;
  74013. begin
  74014. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  74015. end;
  74016. procedure TCAN1_C1FIFOINT8.setTXHALFIE; inline;
  74017. begin
  74018. pTDefRegMap(@Self)^.&set := $02000000;
  74019. end;
  74020. procedure TCAN1_C1FIFOINT8.clearTXHALFIE; inline;
  74021. begin
  74022. pTDefRegMap(@Self)^.clr := $02000000;
  74023. end;
  74024. procedure TCAN1_C1FIFOINT8.setTXHALFIE(thebits : TBits_1); inline;
  74025. begin
  74026. if thebits = 0 then
  74027. pTDefRegMap(@Self)^.clr := $02000000
  74028. else
  74029. pTDefRegMap(@Self)^.&set := $02000000;
  74030. end;
  74031. function TCAN1_C1FIFOINT8.getTXHALFIE : TBits_1; inline;
  74032. begin
  74033. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  74034. end;
  74035. procedure TCAN1_C1FIFOINT8.setTXNFULLIE; inline;
  74036. begin
  74037. pTDefRegMap(@Self)^.&set := $04000000;
  74038. end;
  74039. procedure TCAN1_C1FIFOINT8.clearTXNFULLIE; inline;
  74040. begin
  74041. pTDefRegMap(@Self)^.clr := $04000000;
  74042. end;
  74043. procedure TCAN1_C1FIFOINT8.setTXNFULLIE(thebits : TBits_1); inline;
  74044. begin
  74045. if thebits = 0 then
  74046. pTDefRegMap(@Self)^.clr := $04000000
  74047. else
  74048. pTDefRegMap(@Self)^.&set := $04000000;
  74049. end;
  74050. function TCAN1_C1FIFOINT8.getTXNFULLIE : TBits_1; inline;
  74051. begin
  74052. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  74053. end;
  74054. procedure TCAN1_C1FIFOINT8.setw(thebits : TBits_32); inline;
  74055. begin
  74056. pTDefRegMap(@Self)^.val := thebits;
  74057. end;
  74058. function TCAN1_C1FIFOINT8.getw : TBits_32; inline;
  74059. begin
  74060. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74061. end;
  74062. procedure TCAN1_C1FIFOCI8.setCFIFOCI(thebits : TBits_5); inline;
  74063. begin
  74064. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  74065. end;
  74066. function TCAN1_C1FIFOCI8.getCFIFOCI : TBits_5; inline;
  74067. begin
  74068. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  74069. end;
  74070. procedure TCAN1_C1FIFOCI8.setw(thebits : TBits_32); inline;
  74071. begin
  74072. pTDefRegMap(@Self)^.val := thebits;
  74073. end;
  74074. function TCAN1_C1FIFOCI8.getw : TBits_32; inline;
  74075. begin
  74076. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74077. end;
  74078. procedure TCAN1_C1FIFOCON9.setTXPRI(thebits : TBits_2); inline;
  74079. begin
  74080. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  74081. end;
  74082. function TCAN1_C1FIFOCON9.getTXPRI : TBits_2; inline;
  74083. begin
  74084. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  74085. end;
  74086. procedure TCAN1_C1FIFOCON9.setRTREN; inline;
  74087. begin
  74088. pTDefRegMap(@Self)^.&set := $00000004;
  74089. end;
  74090. procedure TCAN1_C1FIFOCON9.clearRTREN; inline;
  74091. begin
  74092. pTDefRegMap(@Self)^.clr := $00000004;
  74093. end;
  74094. procedure TCAN1_C1FIFOCON9.setRTREN(thebits : TBits_1); inline;
  74095. begin
  74096. if thebits = 0 then
  74097. pTDefRegMap(@Self)^.clr := $00000004
  74098. else
  74099. pTDefRegMap(@Self)^.&set := $00000004;
  74100. end;
  74101. function TCAN1_C1FIFOCON9.getRTREN : TBits_1; inline;
  74102. begin
  74103. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74104. end;
  74105. procedure TCAN1_C1FIFOCON9.setTXREQ; inline;
  74106. begin
  74107. pTDefRegMap(@Self)^.&set := $00000008;
  74108. end;
  74109. procedure TCAN1_C1FIFOCON9.clearTXREQ; inline;
  74110. begin
  74111. pTDefRegMap(@Self)^.clr := $00000008;
  74112. end;
  74113. procedure TCAN1_C1FIFOCON9.setTXREQ(thebits : TBits_1); inline;
  74114. begin
  74115. if thebits = 0 then
  74116. pTDefRegMap(@Self)^.clr := $00000008
  74117. else
  74118. pTDefRegMap(@Self)^.&set := $00000008;
  74119. end;
  74120. function TCAN1_C1FIFOCON9.getTXREQ : TBits_1; inline;
  74121. begin
  74122. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74123. end;
  74124. procedure TCAN1_C1FIFOCON9.setTXERR; inline;
  74125. begin
  74126. pTDefRegMap(@Self)^.&set := $00000010;
  74127. end;
  74128. procedure TCAN1_C1FIFOCON9.clearTXERR; inline;
  74129. begin
  74130. pTDefRegMap(@Self)^.clr := $00000010;
  74131. end;
  74132. procedure TCAN1_C1FIFOCON9.setTXERR(thebits : TBits_1); inline;
  74133. begin
  74134. if thebits = 0 then
  74135. pTDefRegMap(@Self)^.clr := $00000010
  74136. else
  74137. pTDefRegMap(@Self)^.&set := $00000010;
  74138. end;
  74139. function TCAN1_C1FIFOCON9.getTXERR : TBits_1; inline;
  74140. begin
  74141. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74142. end;
  74143. procedure TCAN1_C1FIFOCON9.setTXLARB; inline;
  74144. begin
  74145. pTDefRegMap(@Self)^.&set := $00000020;
  74146. end;
  74147. procedure TCAN1_C1FIFOCON9.clearTXLARB; inline;
  74148. begin
  74149. pTDefRegMap(@Self)^.clr := $00000020;
  74150. end;
  74151. procedure TCAN1_C1FIFOCON9.setTXLARB(thebits : TBits_1); inline;
  74152. begin
  74153. if thebits = 0 then
  74154. pTDefRegMap(@Self)^.clr := $00000020
  74155. else
  74156. pTDefRegMap(@Self)^.&set := $00000020;
  74157. end;
  74158. function TCAN1_C1FIFOCON9.getTXLARB : TBits_1; inline;
  74159. begin
  74160. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  74161. end;
  74162. procedure TCAN1_C1FIFOCON9.setTXABAT; inline;
  74163. begin
  74164. pTDefRegMap(@Self)^.&set := $00000040;
  74165. end;
  74166. procedure TCAN1_C1FIFOCON9.clearTXABAT; inline;
  74167. begin
  74168. pTDefRegMap(@Self)^.clr := $00000040;
  74169. end;
  74170. procedure TCAN1_C1FIFOCON9.setTXABAT(thebits : TBits_1); inline;
  74171. begin
  74172. if thebits = 0 then
  74173. pTDefRegMap(@Self)^.clr := $00000040
  74174. else
  74175. pTDefRegMap(@Self)^.&set := $00000040;
  74176. end;
  74177. function TCAN1_C1FIFOCON9.getTXABAT : TBits_1; inline;
  74178. begin
  74179. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  74180. end;
  74181. procedure TCAN1_C1FIFOCON9.setTXEN; inline;
  74182. begin
  74183. pTDefRegMap(@Self)^.&set := $00000080;
  74184. end;
  74185. procedure TCAN1_C1FIFOCON9.clearTXEN; inline;
  74186. begin
  74187. pTDefRegMap(@Self)^.clr := $00000080;
  74188. end;
  74189. procedure TCAN1_C1FIFOCON9.setTXEN(thebits : TBits_1); inline;
  74190. begin
  74191. if thebits = 0 then
  74192. pTDefRegMap(@Self)^.clr := $00000080
  74193. else
  74194. pTDefRegMap(@Self)^.&set := $00000080;
  74195. end;
  74196. function TCAN1_C1FIFOCON9.getTXEN : TBits_1; inline;
  74197. begin
  74198. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  74199. end;
  74200. procedure TCAN1_C1FIFOCON9.setDONLY; inline;
  74201. begin
  74202. pTDefRegMap(@Self)^.&set := $00001000;
  74203. end;
  74204. procedure TCAN1_C1FIFOCON9.clearDONLY; inline;
  74205. begin
  74206. pTDefRegMap(@Self)^.clr := $00001000;
  74207. end;
  74208. procedure TCAN1_C1FIFOCON9.setDONLY(thebits : TBits_1); inline;
  74209. begin
  74210. if thebits = 0 then
  74211. pTDefRegMap(@Self)^.clr := $00001000
  74212. else
  74213. pTDefRegMap(@Self)^.&set := $00001000;
  74214. end;
  74215. function TCAN1_C1FIFOCON9.getDONLY : TBits_1; inline;
  74216. begin
  74217. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  74218. end;
  74219. procedure TCAN1_C1FIFOCON9.setUINC; inline;
  74220. begin
  74221. pTDefRegMap(@Self)^.&set := $00002000;
  74222. end;
  74223. procedure TCAN1_C1FIFOCON9.clearUINC; inline;
  74224. begin
  74225. pTDefRegMap(@Self)^.clr := $00002000;
  74226. end;
  74227. procedure TCAN1_C1FIFOCON9.setUINC(thebits : TBits_1); inline;
  74228. begin
  74229. if thebits = 0 then
  74230. pTDefRegMap(@Self)^.clr := $00002000
  74231. else
  74232. pTDefRegMap(@Self)^.&set := $00002000;
  74233. end;
  74234. function TCAN1_C1FIFOCON9.getUINC : TBits_1; inline;
  74235. begin
  74236. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  74237. end;
  74238. procedure TCAN1_C1FIFOCON9.setFRESET; inline;
  74239. begin
  74240. pTDefRegMap(@Self)^.&set := $00004000;
  74241. end;
  74242. procedure TCAN1_C1FIFOCON9.clearFRESET; inline;
  74243. begin
  74244. pTDefRegMap(@Self)^.clr := $00004000;
  74245. end;
  74246. procedure TCAN1_C1FIFOCON9.setFRESET(thebits : TBits_1); inline;
  74247. begin
  74248. if thebits = 0 then
  74249. pTDefRegMap(@Self)^.clr := $00004000
  74250. else
  74251. pTDefRegMap(@Self)^.&set := $00004000;
  74252. end;
  74253. function TCAN1_C1FIFOCON9.getFRESET : TBits_1; inline;
  74254. begin
  74255. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  74256. end;
  74257. procedure TCAN1_C1FIFOCON9.setFSIZE(thebits : TBits_5); inline;
  74258. begin
  74259. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  74260. end;
  74261. function TCAN1_C1FIFOCON9.getFSIZE : TBits_5; inline;
  74262. begin
  74263. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  74264. end;
  74265. procedure TCAN1_C1FIFOCON9.setw(thebits : TBits_32); inline;
  74266. begin
  74267. pTDefRegMap(@Self)^.val := thebits;
  74268. end;
  74269. function TCAN1_C1FIFOCON9.getw : TBits_32; inline;
  74270. begin
  74271. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74272. end;
  74273. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIF; inline;
  74274. begin
  74275. pTDefRegMap(@Self)^.&set := $00000001;
  74276. end;
  74277. procedure TCAN1_C1FIFOINT9.clearRXNEMPTYIF; inline;
  74278. begin
  74279. pTDefRegMap(@Self)^.clr := $00000001;
  74280. end;
  74281. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIF(thebits : TBits_1); inline;
  74282. begin
  74283. if thebits = 0 then
  74284. pTDefRegMap(@Self)^.clr := $00000001
  74285. else
  74286. pTDefRegMap(@Self)^.&set := $00000001;
  74287. end;
  74288. function TCAN1_C1FIFOINT9.getRXNEMPTYIF : TBits_1; inline;
  74289. begin
  74290. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74291. end;
  74292. procedure TCAN1_C1FIFOINT9.setRXHALFIF; inline;
  74293. begin
  74294. pTDefRegMap(@Self)^.&set := $00000002;
  74295. end;
  74296. procedure TCAN1_C1FIFOINT9.clearRXHALFIF; inline;
  74297. begin
  74298. pTDefRegMap(@Self)^.clr := $00000002;
  74299. end;
  74300. procedure TCAN1_C1FIFOINT9.setRXHALFIF(thebits : TBits_1); inline;
  74301. begin
  74302. if thebits = 0 then
  74303. pTDefRegMap(@Self)^.clr := $00000002
  74304. else
  74305. pTDefRegMap(@Self)^.&set := $00000002;
  74306. end;
  74307. function TCAN1_C1FIFOINT9.getRXHALFIF : TBits_1; inline;
  74308. begin
  74309. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74310. end;
  74311. procedure TCAN1_C1FIFOINT9.setRXFULLIF; inline;
  74312. begin
  74313. pTDefRegMap(@Self)^.&set := $00000004;
  74314. end;
  74315. procedure TCAN1_C1FIFOINT9.clearRXFULLIF; inline;
  74316. begin
  74317. pTDefRegMap(@Self)^.clr := $00000004;
  74318. end;
  74319. procedure TCAN1_C1FIFOINT9.setRXFULLIF(thebits : TBits_1); inline;
  74320. begin
  74321. if thebits = 0 then
  74322. pTDefRegMap(@Self)^.clr := $00000004
  74323. else
  74324. pTDefRegMap(@Self)^.&set := $00000004;
  74325. end;
  74326. function TCAN1_C1FIFOINT9.getRXFULLIF : TBits_1; inline;
  74327. begin
  74328. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74329. end;
  74330. procedure TCAN1_C1FIFOINT9.setRXOVFLIF; inline;
  74331. begin
  74332. pTDefRegMap(@Self)^.&set := $00000008;
  74333. end;
  74334. procedure TCAN1_C1FIFOINT9.clearRXOVFLIF; inline;
  74335. begin
  74336. pTDefRegMap(@Self)^.clr := $00000008;
  74337. end;
  74338. procedure TCAN1_C1FIFOINT9.setRXOVFLIF(thebits : TBits_1); inline;
  74339. begin
  74340. if thebits = 0 then
  74341. pTDefRegMap(@Self)^.clr := $00000008
  74342. else
  74343. pTDefRegMap(@Self)^.&set := $00000008;
  74344. end;
  74345. function TCAN1_C1FIFOINT9.getRXOVFLIF : TBits_1; inline;
  74346. begin
  74347. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74348. end;
  74349. procedure TCAN1_C1FIFOINT9.setTXEMPTYIF; inline;
  74350. begin
  74351. pTDefRegMap(@Self)^.&set := $00000100;
  74352. end;
  74353. procedure TCAN1_C1FIFOINT9.clearTXEMPTYIF; inline;
  74354. begin
  74355. pTDefRegMap(@Self)^.clr := $00000100;
  74356. end;
  74357. procedure TCAN1_C1FIFOINT9.setTXEMPTYIF(thebits : TBits_1); inline;
  74358. begin
  74359. if thebits = 0 then
  74360. pTDefRegMap(@Self)^.clr := $00000100
  74361. else
  74362. pTDefRegMap(@Self)^.&set := $00000100;
  74363. end;
  74364. function TCAN1_C1FIFOINT9.getTXEMPTYIF : TBits_1; inline;
  74365. begin
  74366. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74367. end;
  74368. procedure TCAN1_C1FIFOINT9.setTXHALFIF; inline;
  74369. begin
  74370. pTDefRegMap(@Self)^.&set := $00000200;
  74371. end;
  74372. procedure TCAN1_C1FIFOINT9.clearTXHALFIF; inline;
  74373. begin
  74374. pTDefRegMap(@Self)^.clr := $00000200;
  74375. end;
  74376. procedure TCAN1_C1FIFOINT9.setTXHALFIF(thebits : TBits_1); inline;
  74377. begin
  74378. if thebits = 0 then
  74379. pTDefRegMap(@Self)^.clr := $00000200
  74380. else
  74381. pTDefRegMap(@Self)^.&set := $00000200;
  74382. end;
  74383. function TCAN1_C1FIFOINT9.getTXHALFIF : TBits_1; inline;
  74384. begin
  74385. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74386. end;
  74387. procedure TCAN1_C1FIFOINT9.setTXNFULLIF; inline;
  74388. begin
  74389. pTDefRegMap(@Self)^.&set := $00000400;
  74390. end;
  74391. procedure TCAN1_C1FIFOINT9.clearTXNFULLIF; inline;
  74392. begin
  74393. pTDefRegMap(@Self)^.clr := $00000400;
  74394. end;
  74395. procedure TCAN1_C1FIFOINT9.setTXNFULLIF(thebits : TBits_1); inline;
  74396. begin
  74397. if thebits = 0 then
  74398. pTDefRegMap(@Self)^.clr := $00000400
  74399. else
  74400. pTDefRegMap(@Self)^.&set := $00000400;
  74401. end;
  74402. function TCAN1_C1FIFOINT9.getTXNFULLIF : TBits_1; inline;
  74403. begin
  74404. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  74405. end;
  74406. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIE; inline;
  74407. begin
  74408. pTDefRegMap(@Self)^.&set := $00010000;
  74409. end;
  74410. procedure TCAN1_C1FIFOINT9.clearRXNEMPTYIE; inline;
  74411. begin
  74412. pTDefRegMap(@Self)^.clr := $00010000;
  74413. end;
  74414. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIE(thebits : TBits_1); inline;
  74415. begin
  74416. if thebits = 0 then
  74417. pTDefRegMap(@Self)^.clr := $00010000
  74418. else
  74419. pTDefRegMap(@Self)^.&set := $00010000;
  74420. end;
  74421. function TCAN1_C1FIFOINT9.getRXNEMPTYIE : TBits_1; inline;
  74422. begin
  74423. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  74424. end;
  74425. procedure TCAN1_C1FIFOINT9.setRXHALFIE; inline;
  74426. begin
  74427. pTDefRegMap(@Self)^.&set := $00020000;
  74428. end;
  74429. procedure TCAN1_C1FIFOINT9.clearRXHALFIE; inline;
  74430. begin
  74431. pTDefRegMap(@Self)^.clr := $00020000;
  74432. end;
  74433. procedure TCAN1_C1FIFOINT9.setRXHALFIE(thebits : TBits_1); inline;
  74434. begin
  74435. if thebits = 0 then
  74436. pTDefRegMap(@Self)^.clr := $00020000
  74437. else
  74438. pTDefRegMap(@Self)^.&set := $00020000;
  74439. end;
  74440. function TCAN1_C1FIFOINT9.getRXHALFIE : TBits_1; inline;
  74441. begin
  74442. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  74443. end;
  74444. procedure TCAN1_C1FIFOINT9.setRXFULLIE; inline;
  74445. begin
  74446. pTDefRegMap(@Self)^.&set := $00040000;
  74447. end;
  74448. procedure TCAN1_C1FIFOINT9.clearRXFULLIE; inline;
  74449. begin
  74450. pTDefRegMap(@Self)^.clr := $00040000;
  74451. end;
  74452. procedure TCAN1_C1FIFOINT9.setRXFULLIE(thebits : TBits_1); inline;
  74453. begin
  74454. if thebits = 0 then
  74455. pTDefRegMap(@Self)^.clr := $00040000
  74456. else
  74457. pTDefRegMap(@Self)^.&set := $00040000;
  74458. end;
  74459. function TCAN1_C1FIFOINT9.getRXFULLIE : TBits_1; inline;
  74460. begin
  74461. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  74462. end;
  74463. procedure TCAN1_C1FIFOINT9.setRXOVFLIE; inline;
  74464. begin
  74465. pTDefRegMap(@Self)^.&set := $00080000;
  74466. end;
  74467. procedure TCAN1_C1FIFOINT9.clearRXOVFLIE; inline;
  74468. begin
  74469. pTDefRegMap(@Self)^.clr := $00080000;
  74470. end;
  74471. procedure TCAN1_C1FIFOINT9.setRXOVFLIE(thebits : TBits_1); inline;
  74472. begin
  74473. if thebits = 0 then
  74474. pTDefRegMap(@Self)^.clr := $00080000
  74475. else
  74476. pTDefRegMap(@Self)^.&set := $00080000;
  74477. end;
  74478. function TCAN1_C1FIFOINT9.getRXOVFLIE : TBits_1; inline;
  74479. begin
  74480. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  74481. end;
  74482. procedure TCAN1_C1FIFOINT9.setTXEMPTYIE; inline;
  74483. begin
  74484. pTDefRegMap(@Self)^.&set := $01000000;
  74485. end;
  74486. procedure TCAN1_C1FIFOINT9.clearTXEMPTYIE; inline;
  74487. begin
  74488. pTDefRegMap(@Self)^.clr := $01000000;
  74489. end;
  74490. procedure TCAN1_C1FIFOINT9.setTXEMPTYIE(thebits : TBits_1); inline;
  74491. begin
  74492. if thebits = 0 then
  74493. pTDefRegMap(@Self)^.clr := $01000000
  74494. else
  74495. pTDefRegMap(@Self)^.&set := $01000000;
  74496. end;
  74497. function TCAN1_C1FIFOINT9.getTXEMPTYIE : TBits_1; inline;
  74498. begin
  74499. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  74500. end;
  74501. procedure TCAN1_C1FIFOINT9.setTXHALFIE; inline;
  74502. begin
  74503. pTDefRegMap(@Self)^.&set := $02000000;
  74504. end;
  74505. procedure TCAN1_C1FIFOINT9.clearTXHALFIE; inline;
  74506. begin
  74507. pTDefRegMap(@Self)^.clr := $02000000;
  74508. end;
  74509. procedure TCAN1_C1FIFOINT9.setTXHALFIE(thebits : TBits_1); inline;
  74510. begin
  74511. if thebits = 0 then
  74512. pTDefRegMap(@Self)^.clr := $02000000
  74513. else
  74514. pTDefRegMap(@Self)^.&set := $02000000;
  74515. end;
  74516. function TCAN1_C1FIFOINT9.getTXHALFIE : TBits_1; inline;
  74517. begin
  74518. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  74519. end;
  74520. procedure TCAN1_C1FIFOINT9.setTXNFULLIE; inline;
  74521. begin
  74522. pTDefRegMap(@Self)^.&set := $04000000;
  74523. end;
  74524. procedure TCAN1_C1FIFOINT9.clearTXNFULLIE; inline;
  74525. begin
  74526. pTDefRegMap(@Self)^.clr := $04000000;
  74527. end;
  74528. procedure TCAN1_C1FIFOINT9.setTXNFULLIE(thebits : TBits_1); inline;
  74529. begin
  74530. if thebits = 0 then
  74531. pTDefRegMap(@Self)^.clr := $04000000
  74532. else
  74533. pTDefRegMap(@Self)^.&set := $04000000;
  74534. end;
  74535. function TCAN1_C1FIFOINT9.getTXNFULLIE : TBits_1; inline;
  74536. begin
  74537. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  74538. end;
  74539. procedure TCAN1_C1FIFOINT9.setw(thebits : TBits_32); inline;
  74540. begin
  74541. pTDefRegMap(@Self)^.val := thebits;
  74542. end;
  74543. function TCAN1_C1FIFOINT9.getw : TBits_32; inline;
  74544. begin
  74545. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74546. end;
  74547. procedure TCAN1_C1FIFOCI9.setCFIFOCI(thebits : TBits_5); inline;
  74548. begin
  74549. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  74550. end;
  74551. function TCAN1_C1FIFOCI9.getCFIFOCI : TBits_5; inline;
  74552. begin
  74553. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  74554. end;
  74555. procedure TCAN1_C1FIFOCI9.setw(thebits : TBits_32); inline;
  74556. begin
  74557. pTDefRegMap(@Self)^.val := thebits;
  74558. end;
  74559. function TCAN1_C1FIFOCI9.getw : TBits_32; inline;
  74560. begin
  74561. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74562. end;
  74563. procedure TCAN1_C1FIFOCON10.setTXPRI(thebits : TBits_2); inline;
  74564. begin
  74565. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  74566. end;
  74567. function TCAN1_C1FIFOCON10.getTXPRI : TBits_2; inline;
  74568. begin
  74569. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  74570. end;
  74571. procedure TCAN1_C1FIFOCON10.setRTREN; inline;
  74572. begin
  74573. pTDefRegMap(@Self)^.&set := $00000004;
  74574. end;
  74575. procedure TCAN1_C1FIFOCON10.clearRTREN; inline;
  74576. begin
  74577. pTDefRegMap(@Self)^.clr := $00000004;
  74578. end;
  74579. procedure TCAN1_C1FIFOCON10.setRTREN(thebits : TBits_1); inline;
  74580. begin
  74581. if thebits = 0 then
  74582. pTDefRegMap(@Self)^.clr := $00000004
  74583. else
  74584. pTDefRegMap(@Self)^.&set := $00000004;
  74585. end;
  74586. function TCAN1_C1FIFOCON10.getRTREN : TBits_1; inline;
  74587. begin
  74588. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74589. end;
  74590. procedure TCAN1_C1FIFOCON10.setTXREQ; inline;
  74591. begin
  74592. pTDefRegMap(@Self)^.&set := $00000008;
  74593. end;
  74594. procedure TCAN1_C1FIFOCON10.clearTXREQ; inline;
  74595. begin
  74596. pTDefRegMap(@Self)^.clr := $00000008;
  74597. end;
  74598. procedure TCAN1_C1FIFOCON10.setTXREQ(thebits : TBits_1); inline;
  74599. begin
  74600. if thebits = 0 then
  74601. pTDefRegMap(@Self)^.clr := $00000008
  74602. else
  74603. pTDefRegMap(@Self)^.&set := $00000008;
  74604. end;
  74605. function TCAN1_C1FIFOCON10.getTXREQ : TBits_1; inline;
  74606. begin
  74607. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74608. end;
  74609. procedure TCAN1_C1FIFOCON10.setTXERR; inline;
  74610. begin
  74611. pTDefRegMap(@Self)^.&set := $00000010;
  74612. end;
  74613. procedure TCAN1_C1FIFOCON10.clearTXERR; inline;
  74614. begin
  74615. pTDefRegMap(@Self)^.clr := $00000010;
  74616. end;
  74617. procedure TCAN1_C1FIFOCON10.setTXERR(thebits : TBits_1); inline;
  74618. begin
  74619. if thebits = 0 then
  74620. pTDefRegMap(@Self)^.clr := $00000010
  74621. else
  74622. pTDefRegMap(@Self)^.&set := $00000010;
  74623. end;
  74624. function TCAN1_C1FIFOCON10.getTXERR : TBits_1; inline;
  74625. begin
  74626. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74627. end;
  74628. procedure TCAN1_C1FIFOCON10.setTXLARB; inline;
  74629. begin
  74630. pTDefRegMap(@Self)^.&set := $00000020;
  74631. end;
  74632. procedure TCAN1_C1FIFOCON10.clearTXLARB; inline;
  74633. begin
  74634. pTDefRegMap(@Self)^.clr := $00000020;
  74635. end;
  74636. procedure TCAN1_C1FIFOCON10.setTXLARB(thebits : TBits_1); inline;
  74637. begin
  74638. if thebits = 0 then
  74639. pTDefRegMap(@Self)^.clr := $00000020
  74640. else
  74641. pTDefRegMap(@Self)^.&set := $00000020;
  74642. end;
  74643. function TCAN1_C1FIFOCON10.getTXLARB : TBits_1; inline;
  74644. begin
  74645. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  74646. end;
  74647. procedure TCAN1_C1FIFOCON10.setTXABAT; inline;
  74648. begin
  74649. pTDefRegMap(@Self)^.&set := $00000040;
  74650. end;
  74651. procedure TCAN1_C1FIFOCON10.clearTXABAT; inline;
  74652. begin
  74653. pTDefRegMap(@Self)^.clr := $00000040;
  74654. end;
  74655. procedure TCAN1_C1FIFOCON10.setTXABAT(thebits : TBits_1); inline;
  74656. begin
  74657. if thebits = 0 then
  74658. pTDefRegMap(@Self)^.clr := $00000040
  74659. else
  74660. pTDefRegMap(@Self)^.&set := $00000040;
  74661. end;
  74662. function TCAN1_C1FIFOCON10.getTXABAT : TBits_1; inline;
  74663. begin
  74664. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  74665. end;
  74666. procedure TCAN1_C1FIFOCON10.setTXEN; inline;
  74667. begin
  74668. pTDefRegMap(@Self)^.&set := $00000080;
  74669. end;
  74670. procedure TCAN1_C1FIFOCON10.clearTXEN; inline;
  74671. begin
  74672. pTDefRegMap(@Self)^.clr := $00000080;
  74673. end;
  74674. procedure TCAN1_C1FIFOCON10.setTXEN(thebits : TBits_1); inline;
  74675. begin
  74676. if thebits = 0 then
  74677. pTDefRegMap(@Self)^.clr := $00000080
  74678. else
  74679. pTDefRegMap(@Self)^.&set := $00000080;
  74680. end;
  74681. function TCAN1_C1FIFOCON10.getTXEN : TBits_1; inline;
  74682. begin
  74683. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  74684. end;
  74685. procedure TCAN1_C1FIFOCON10.setDONLY; inline;
  74686. begin
  74687. pTDefRegMap(@Self)^.&set := $00001000;
  74688. end;
  74689. procedure TCAN1_C1FIFOCON10.clearDONLY; inline;
  74690. begin
  74691. pTDefRegMap(@Self)^.clr := $00001000;
  74692. end;
  74693. procedure TCAN1_C1FIFOCON10.setDONLY(thebits : TBits_1); inline;
  74694. begin
  74695. if thebits = 0 then
  74696. pTDefRegMap(@Self)^.clr := $00001000
  74697. else
  74698. pTDefRegMap(@Self)^.&set := $00001000;
  74699. end;
  74700. function TCAN1_C1FIFOCON10.getDONLY : TBits_1; inline;
  74701. begin
  74702. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  74703. end;
  74704. procedure TCAN1_C1FIFOCON10.setUINC; inline;
  74705. begin
  74706. pTDefRegMap(@Self)^.&set := $00002000;
  74707. end;
  74708. procedure TCAN1_C1FIFOCON10.clearUINC; inline;
  74709. begin
  74710. pTDefRegMap(@Self)^.clr := $00002000;
  74711. end;
  74712. procedure TCAN1_C1FIFOCON10.setUINC(thebits : TBits_1); inline;
  74713. begin
  74714. if thebits = 0 then
  74715. pTDefRegMap(@Self)^.clr := $00002000
  74716. else
  74717. pTDefRegMap(@Self)^.&set := $00002000;
  74718. end;
  74719. function TCAN1_C1FIFOCON10.getUINC : TBits_1; inline;
  74720. begin
  74721. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  74722. end;
  74723. procedure TCAN1_C1FIFOCON10.setFRESET; inline;
  74724. begin
  74725. pTDefRegMap(@Self)^.&set := $00004000;
  74726. end;
  74727. procedure TCAN1_C1FIFOCON10.clearFRESET; inline;
  74728. begin
  74729. pTDefRegMap(@Self)^.clr := $00004000;
  74730. end;
  74731. procedure TCAN1_C1FIFOCON10.setFRESET(thebits : TBits_1); inline;
  74732. begin
  74733. if thebits = 0 then
  74734. pTDefRegMap(@Self)^.clr := $00004000
  74735. else
  74736. pTDefRegMap(@Self)^.&set := $00004000;
  74737. end;
  74738. function TCAN1_C1FIFOCON10.getFRESET : TBits_1; inline;
  74739. begin
  74740. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  74741. end;
  74742. procedure TCAN1_C1FIFOCON10.setFSIZE(thebits : TBits_5); inline;
  74743. begin
  74744. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  74745. end;
  74746. function TCAN1_C1FIFOCON10.getFSIZE : TBits_5; inline;
  74747. begin
  74748. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  74749. end;
  74750. procedure TCAN1_C1FIFOCON10.setw(thebits : TBits_32); inline;
  74751. begin
  74752. pTDefRegMap(@Self)^.val := thebits;
  74753. end;
  74754. function TCAN1_C1FIFOCON10.getw : TBits_32; inline;
  74755. begin
  74756. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74757. end;
  74758. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIF; inline;
  74759. begin
  74760. pTDefRegMap(@Self)^.&set := $00000001;
  74761. end;
  74762. procedure TCAN1_C1FIFOINT10.clearRXNEMPTYIF; inline;
  74763. begin
  74764. pTDefRegMap(@Self)^.clr := $00000001;
  74765. end;
  74766. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIF(thebits : TBits_1); inline;
  74767. begin
  74768. if thebits = 0 then
  74769. pTDefRegMap(@Self)^.clr := $00000001
  74770. else
  74771. pTDefRegMap(@Self)^.&set := $00000001;
  74772. end;
  74773. function TCAN1_C1FIFOINT10.getRXNEMPTYIF : TBits_1; inline;
  74774. begin
  74775. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74776. end;
  74777. procedure TCAN1_C1FIFOINT10.setRXHALFIF; inline;
  74778. begin
  74779. pTDefRegMap(@Self)^.&set := $00000002;
  74780. end;
  74781. procedure TCAN1_C1FIFOINT10.clearRXHALFIF; inline;
  74782. begin
  74783. pTDefRegMap(@Self)^.clr := $00000002;
  74784. end;
  74785. procedure TCAN1_C1FIFOINT10.setRXHALFIF(thebits : TBits_1); inline;
  74786. begin
  74787. if thebits = 0 then
  74788. pTDefRegMap(@Self)^.clr := $00000002
  74789. else
  74790. pTDefRegMap(@Self)^.&set := $00000002;
  74791. end;
  74792. function TCAN1_C1FIFOINT10.getRXHALFIF : TBits_1; inline;
  74793. begin
  74794. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74795. end;
  74796. procedure TCAN1_C1FIFOINT10.setRXFULLIF; inline;
  74797. begin
  74798. pTDefRegMap(@Self)^.&set := $00000004;
  74799. end;
  74800. procedure TCAN1_C1FIFOINT10.clearRXFULLIF; inline;
  74801. begin
  74802. pTDefRegMap(@Self)^.clr := $00000004;
  74803. end;
  74804. procedure TCAN1_C1FIFOINT10.setRXFULLIF(thebits : TBits_1); inline;
  74805. begin
  74806. if thebits = 0 then
  74807. pTDefRegMap(@Self)^.clr := $00000004
  74808. else
  74809. pTDefRegMap(@Self)^.&set := $00000004;
  74810. end;
  74811. function TCAN1_C1FIFOINT10.getRXFULLIF : TBits_1; inline;
  74812. begin
  74813. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74814. end;
  74815. procedure TCAN1_C1FIFOINT10.setRXOVFLIF; inline;
  74816. begin
  74817. pTDefRegMap(@Self)^.&set := $00000008;
  74818. end;
  74819. procedure TCAN1_C1FIFOINT10.clearRXOVFLIF; inline;
  74820. begin
  74821. pTDefRegMap(@Self)^.clr := $00000008;
  74822. end;
  74823. procedure TCAN1_C1FIFOINT10.setRXOVFLIF(thebits : TBits_1); inline;
  74824. begin
  74825. if thebits = 0 then
  74826. pTDefRegMap(@Self)^.clr := $00000008
  74827. else
  74828. pTDefRegMap(@Self)^.&set := $00000008;
  74829. end;
  74830. function TCAN1_C1FIFOINT10.getRXOVFLIF : TBits_1; inline;
  74831. begin
  74832. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74833. end;
  74834. procedure TCAN1_C1FIFOINT10.setTXEMPTYIF; inline;
  74835. begin
  74836. pTDefRegMap(@Self)^.&set := $00000100;
  74837. end;
  74838. procedure TCAN1_C1FIFOINT10.clearTXEMPTYIF; inline;
  74839. begin
  74840. pTDefRegMap(@Self)^.clr := $00000100;
  74841. end;
  74842. procedure TCAN1_C1FIFOINT10.setTXEMPTYIF(thebits : TBits_1); inline;
  74843. begin
  74844. if thebits = 0 then
  74845. pTDefRegMap(@Self)^.clr := $00000100
  74846. else
  74847. pTDefRegMap(@Self)^.&set := $00000100;
  74848. end;
  74849. function TCAN1_C1FIFOINT10.getTXEMPTYIF : TBits_1; inline;
  74850. begin
  74851. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74852. end;
  74853. procedure TCAN1_C1FIFOINT10.setTXHALFIF; inline;
  74854. begin
  74855. pTDefRegMap(@Self)^.&set := $00000200;
  74856. end;
  74857. procedure TCAN1_C1FIFOINT10.clearTXHALFIF; inline;
  74858. begin
  74859. pTDefRegMap(@Self)^.clr := $00000200;
  74860. end;
  74861. procedure TCAN1_C1FIFOINT10.setTXHALFIF(thebits : TBits_1); inline;
  74862. begin
  74863. if thebits = 0 then
  74864. pTDefRegMap(@Self)^.clr := $00000200
  74865. else
  74866. pTDefRegMap(@Self)^.&set := $00000200;
  74867. end;
  74868. function TCAN1_C1FIFOINT10.getTXHALFIF : TBits_1; inline;
  74869. begin
  74870. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74871. end;
  74872. procedure TCAN1_C1FIFOINT10.setTXNFULLIF; inline;
  74873. begin
  74874. pTDefRegMap(@Self)^.&set := $00000400;
  74875. end;
  74876. procedure TCAN1_C1FIFOINT10.clearTXNFULLIF; inline;
  74877. begin
  74878. pTDefRegMap(@Self)^.clr := $00000400;
  74879. end;
  74880. procedure TCAN1_C1FIFOINT10.setTXNFULLIF(thebits : TBits_1); inline;
  74881. begin
  74882. if thebits = 0 then
  74883. pTDefRegMap(@Self)^.clr := $00000400
  74884. else
  74885. pTDefRegMap(@Self)^.&set := $00000400;
  74886. end;
  74887. function TCAN1_C1FIFOINT10.getTXNFULLIF : TBits_1; inline;
  74888. begin
  74889. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  74890. end;
  74891. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIE; inline;
  74892. begin
  74893. pTDefRegMap(@Self)^.&set := $00010000;
  74894. end;
  74895. procedure TCAN1_C1FIFOINT10.clearRXNEMPTYIE; inline;
  74896. begin
  74897. pTDefRegMap(@Self)^.clr := $00010000;
  74898. end;
  74899. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIE(thebits : TBits_1); inline;
  74900. begin
  74901. if thebits = 0 then
  74902. pTDefRegMap(@Self)^.clr := $00010000
  74903. else
  74904. pTDefRegMap(@Self)^.&set := $00010000;
  74905. end;
  74906. function TCAN1_C1FIFOINT10.getRXNEMPTYIE : TBits_1; inline;
  74907. begin
  74908. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  74909. end;
  74910. procedure TCAN1_C1FIFOINT10.setRXHALFIE; inline;
  74911. begin
  74912. pTDefRegMap(@Self)^.&set := $00020000;
  74913. end;
  74914. procedure TCAN1_C1FIFOINT10.clearRXHALFIE; inline;
  74915. begin
  74916. pTDefRegMap(@Self)^.clr := $00020000;
  74917. end;
  74918. procedure TCAN1_C1FIFOINT10.setRXHALFIE(thebits : TBits_1); inline;
  74919. begin
  74920. if thebits = 0 then
  74921. pTDefRegMap(@Self)^.clr := $00020000
  74922. else
  74923. pTDefRegMap(@Self)^.&set := $00020000;
  74924. end;
  74925. function TCAN1_C1FIFOINT10.getRXHALFIE : TBits_1; inline;
  74926. begin
  74927. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  74928. end;
  74929. procedure TCAN1_C1FIFOINT10.setRXFULLIE; inline;
  74930. begin
  74931. pTDefRegMap(@Self)^.&set := $00040000;
  74932. end;
  74933. procedure TCAN1_C1FIFOINT10.clearRXFULLIE; inline;
  74934. begin
  74935. pTDefRegMap(@Self)^.clr := $00040000;
  74936. end;
  74937. procedure TCAN1_C1FIFOINT10.setRXFULLIE(thebits : TBits_1); inline;
  74938. begin
  74939. if thebits = 0 then
  74940. pTDefRegMap(@Self)^.clr := $00040000
  74941. else
  74942. pTDefRegMap(@Self)^.&set := $00040000;
  74943. end;
  74944. function TCAN1_C1FIFOINT10.getRXFULLIE : TBits_1; inline;
  74945. begin
  74946. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  74947. end;
  74948. procedure TCAN1_C1FIFOINT10.setRXOVFLIE; inline;
  74949. begin
  74950. pTDefRegMap(@Self)^.&set := $00080000;
  74951. end;
  74952. procedure TCAN1_C1FIFOINT10.clearRXOVFLIE; inline;
  74953. begin
  74954. pTDefRegMap(@Self)^.clr := $00080000;
  74955. end;
  74956. procedure TCAN1_C1FIFOINT10.setRXOVFLIE(thebits : TBits_1); inline;
  74957. begin
  74958. if thebits = 0 then
  74959. pTDefRegMap(@Self)^.clr := $00080000
  74960. else
  74961. pTDefRegMap(@Self)^.&set := $00080000;
  74962. end;
  74963. function TCAN1_C1FIFOINT10.getRXOVFLIE : TBits_1; inline;
  74964. begin
  74965. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  74966. end;
  74967. procedure TCAN1_C1FIFOINT10.setTXEMPTYIE; inline;
  74968. begin
  74969. pTDefRegMap(@Self)^.&set := $01000000;
  74970. end;
  74971. procedure TCAN1_C1FIFOINT10.clearTXEMPTYIE; inline;
  74972. begin
  74973. pTDefRegMap(@Self)^.clr := $01000000;
  74974. end;
  74975. procedure TCAN1_C1FIFOINT10.setTXEMPTYIE(thebits : TBits_1); inline;
  74976. begin
  74977. if thebits = 0 then
  74978. pTDefRegMap(@Self)^.clr := $01000000
  74979. else
  74980. pTDefRegMap(@Self)^.&set := $01000000;
  74981. end;
  74982. function TCAN1_C1FIFOINT10.getTXEMPTYIE : TBits_1; inline;
  74983. begin
  74984. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  74985. end;
  74986. procedure TCAN1_C1FIFOINT10.setTXHALFIE; inline;
  74987. begin
  74988. pTDefRegMap(@Self)^.&set := $02000000;
  74989. end;
  74990. procedure TCAN1_C1FIFOINT10.clearTXHALFIE; inline;
  74991. begin
  74992. pTDefRegMap(@Self)^.clr := $02000000;
  74993. end;
  74994. procedure TCAN1_C1FIFOINT10.setTXHALFIE(thebits : TBits_1); inline;
  74995. begin
  74996. if thebits = 0 then
  74997. pTDefRegMap(@Self)^.clr := $02000000
  74998. else
  74999. pTDefRegMap(@Self)^.&set := $02000000;
  75000. end;
  75001. function TCAN1_C1FIFOINT10.getTXHALFIE : TBits_1; inline;
  75002. begin
  75003. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  75004. end;
  75005. procedure TCAN1_C1FIFOINT10.setTXNFULLIE; inline;
  75006. begin
  75007. pTDefRegMap(@Self)^.&set := $04000000;
  75008. end;
  75009. procedure TCAN1_C1FIFOINT10.clearTXNFULLIE; inline;
  75010. begin
  75011. pTDefRegMap(@Self)^.clr := $04000000;
  75012. end;
  75013. procedure TCAN1_C1FIFOINT10.setTXNFULLIE(thebits : TBits_1); inline;
  75014. begin
  75015. if thebits = 0 then
  75016. pTDefRegMap(@Self)^.clr := $04000000
  75017. else
  75018. pTDefRegMap(@Self)^.&set := $04000000;
  75019. end;
  75020. function TCAN1_C1FIFOINT10.getTXNFULLIE : TBits_1; inline;
  75021. begin
  75022. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  75023. end;
  75024. procedure TCAN1_C1FIFOINT10.setw(thebits : TBits_32); inline;
  75025. begin
  75026. pTDefRegMap(@Self)^.val := thebits;
  75027. end;
  75028. function TCAN1_C1FIFOINT10.getw : TBits_32; inline;
  75029. begin
  75030. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75031. end;
  75032. procedure TCAN1_C1FIFOCI10.setCFIFOCI(thebits : TBits_5); inline;
  75033. begin
  75034. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  75035. end;
  75036. function TCAN1_C1FIFOCI10.getCFIFOCI : TBits_5; inline;
  75037. begin
  75038. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  75039. end;
  75040. procedure TCAN1_C1FIFOCI10.setw(thebits : TBits_32); inline;
  75041. begin
  75042. pTDefRegMap(@Self)^.val := thebits;
  75043. end;
  75044. function TCAN1_C1FIFOCI10.getw : TBits_32; inline;
  75045. begin
  75046. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75047. end;
  75048. procedure TCAN1_C1FIFOCON11.setTXPRI(thebits : TBits_2); inline;
  75049. begin
  75050. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  75051. end;
  75052. function TCAN1_C1FIFOCON11.getTXPRI : TBits_2; inline;
  75053. begin
  75054. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  75055. end;
  75056. procedure TCAN1_C1FIFOCON11.setRTREN; inline;
  75057. begin
  75058. pTDefRegMap(@Self)^.&set := $00000004;
  75059. end;
  75060. procedure TCAN1_C1FIFOCON11.clearRTREN; inline;
  75061. begin
  75062. pTDefRegMap(@Self)^.clr := $00000004;
  75063. end;
  75064. procedure TCAN1_C1FIFOCON11.setRTREN(thebits : TBits_1); inline;
  75065. begin
  75066. if thebits = 0 then
  75067. pTDefRegMap(@Self)^.clr := $00000004
  75068. else
  75069. pTDefRegMap(@Self)^.&set := $00000004;
  75070. end;
  75071. function TCAN1_C1FIFOCON11.getRTREN : TBits_1; inline;
  75072. begin
  75073. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75074. end;
  75075. procedure TCAN1_C1FIFOCON11.setTXREQ; inline;
  75076. begin
  75077. pTDefRegMap(@Self)^.&set := $00000008;
  75078. end;
  75079. procedure TCAN1_C1FIFOCON11.clearTXREQ; inline;
  75080. begin
  75081. pTDefRegMap(@Self)^.clr := $00000008;
  75082. end;
  75083. procedure TCAN1_C1FIFOCON11.setTXREQ(thebits : TBits_1); inline;
  75084. begin
  75085. if thebits = 0 then
  75086. pTDefRegMap(@Self)^.clr := $00000008
  75087. else
  75088. pTDefRegMap(@Self)^.&set := $00000008;
  75089. end;
  75090. function TCAN1_C1FIFOCON11.getTXREQ : TBits_1; inline;
  75091. begin
  75092. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75093. end;
  75094. procedure TCAN1_C1FIFOCON11.setTXERR; inline;
  75095. begin
  75096. pTDefRegMap(@Self)^.&set := $00000010;
  75097. end;
  75098. procedure TCAN1_C1FIFOCON11.clearTXERR; inline;
  75099. begin
  75100. pTDefRegMap(@Self)^.clr := $00000010;
  75101. end;
  75102. procedure TCAN1_C1FIFOCON11.setTXERR(thebits : TBits_1); inline;
  75103. begin
  75104. if thebits = 0 then
  75105. pTDefRegMap(@Self)^.clr := $00000010
  75106. else
  75107. pTDefRegMap(@Self)^.&set := $00000010;
  75108. end;
  75109. function TCAN1_C1FIFOCON11.getTXERR : TBits_1; inline;
  75110. begin
  75111. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  75112. end;
  75113. procedure TCAN1_C1FIFOCON11.setTXLARB; inline;
  75114. begin
  75115. pTDefRegMap(@Self)^.&set := $00000020;
  75116. end;
  75117. procedure TCAN1_C1FIFOCON11.clearTXLARB; inline;
  75118. begin
  75119. pTDefRegMap(@Self)^.clr := $00000020;
  75120. end;
  75121. procedure TCAN1_C1FIFOCON11.setTXLARB(thebits : TBits_1); inline;
  75122. begin
  75123. if thebits = 0 then
  75124. pTDefRegMap(@Self)^.clr := $00000020
  75125. else
  75126. pTDefRegMap(@Self)^.&set := $00000020;
  75127. end;
  75128. function TCAN1_C1FIFOCON11.getTXLARB : TBits_1; inline;
  75129. begin
  75130. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  75131. end;
  75132. procedure TCAN1_C1FIFOCON11.setTXABAT; inline;
  75133. begin
  75134. pTDefRegMap(@Self)^.&set := $00000040;
  75135. end;
  75136. procedure TCAN1_C1FIFOCON11.clearTXABAT; inline;
  75137. begin
  75138. pTDefRegMap(@Self)^.clr := $00000040;
  75139. end;
  75140. procedure TCAN1_C1FIFOCON11.setTXABAT(thebits : TBits_1); inline;
  75141. begin
  75142. if thebits = 0 then
  75143. pTDefRegMap(@Self)^.clr := $00000040
  75144. else
  75145. pTDefRegMap(@Self)^.&set := $00000040;
  75146. end;
  75147. function TCAN1_C1FIFOCON11.getTXABAT : TBits_1; inline;
  75148. begin
  75149. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  75150. end;
  75151. procedure TCAN1_C1FIFOCON11.setTXEN; inline;
  75152. begin
  75153. pTDefRegMap(@Self)^.&set := $00000080;
  75154. end;
  75155. procedure TCAN1_C1FIFOCON11.clearTXEN; inline;
  75156. begin
  75157. pTDefRegMap(@Self)^.clr := $00000080;
  75158. end;
  75159. procedure TCAN1_C1FIFOCON11.setTXEN(thebits : TBits_1); inline;
  75160. begin
  75161. if thebits = 0 then
  75162. pTDefRegMap(@Self)^.clr := $00000080
  75163. else
  75164. pTDefRegMap(@Self)^.&set := $00000080;
  75165. end;
  75166. function TCAN1_C1FIFOCON11.getTXEN : TBits_1; inline;
  75167. begin
  75168. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  75169. end;
  75170. procedure TCAN1_C1FIFOCON11.setDONLY; inline;
  75171. begin
  75172. pTDefRegMap(@Self)^.&set := $00001000;
  75173. end;
  75174. procedure TCAN1_C1FIFOCON11.clearDONLY; inline;
  75175. begin
  75176. pTDefRegMap(@Self)^.clr := $00001000;
  75177. end;
  75178. procedure TCAN1_C1FIFOCON11.setDONLY(thebits : TBits_1); inline;
  75179. begin
  75180. if thebits = 0 then
  75181. pTDefRegMap(@Self)^.clr := $00001000
  75182. else
  75183. pTDefRegMap(@Self)^.&set := $00001000;
  75184. end;
  75185. function TCAN1_C1FIFOCON11.getDONLY : TBits_1; inline;
  75186. begin
  75187. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  75188. end;
  75189. procedure TCAN1_C1FIFOCON11.setUINC; inline;
  75190. begin
  75191. pTDefRegMap(@Self)^.&set := $00002000;
  75192. end;
  75193. procedure TCAN1_C1FIFOCON11.clearUINC; inline;
  75194. begin
  75195. pTDefRegMap(@Self)^.clr := $00002000;
  75196. end;
  75197. procedure TCAN1_C1FIFOCON11.setUINC(thebits : TBits_1); inline;
  75198. begin
  75199. if thebits = 0 then
  75200. pTDefRegMap(@Self)^.clr := $00002000
  75201. else
  75202. pTDefRegMap(@Self)^.&set := $00002000;
  75203. end;
  75204. function TCAN1_C1FIFOCON11.getUINC : TBits_1; inline;
  75205. begin
  75206. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  75207. end;
  75208. procedure TCAN1_C1FIFOCON11.setFRESET; inline;
  75209. begin
  75210. pTDefRegMap(@Self)^.&set := $00004000;
  75211. end;
  75212. procedure TCAN1_C1FIFOCON11.clearFRESET; inline;
  75213. begin
  75214. pTDefRegMap(@Self)^.clr := $00004000;
  75215. end;
  75216. procedure TCAN1_C1FIFOCON11.setFRESET(thebits : TBits_1); inline;
  75217. begin
  75218. if thebits = 0 then
  75219. pTDefRegMap(@Self)^.clr := $00004000
  75220. else
  75221. pTDefRegMap(@Self)^.&set := $00004000;
  75222. end;
  75223. function TCAN1_C1FIFOCON11.getFRESET : TBits_1; inline;
  75224. begin
  75225. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  75226. end;
  75227. procedure TCAN1_C1FIFOCON11.setFSIZE(thebits : TBits_5); inline;
  75228. begin
  75229. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  75230. end;
  75231. function TCAN1_C1FIFOCON11.getFSIZE : TBits_5; inline;
  75232. begin
  75233. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  75234. end;
  75235. procedure TCAN1_C1FIFOCON11.setw(thebits : TBits_32); inline;
  75236. begin
  75237. pTDefRegMap(@Self)^.val := thebits;
  75238. end;
  75239. function TCAN1_C1FIFOCON11.getw : TBits_32; inline;
  75240. begin
  75241. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75242. end;
  75243. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIF; inline;
  75244. begin
  75245. pTDefRegMap(@Self)^.&set := $00000001;
  75246. end;
  75247. procedure TCAN1_C1FIFOINT11.clearRXNEMPTYIF; inline;
  75248. begin
  75249. pTDefRegMap(@Self)^.clr := $00000001;
  75250. end;
  75251. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIF(thebits : TBits_1); inline;
  75252. begin
  75253. if thebits = 0 then
  75254. pTDefRegMap(@Self)^.clr := $00000001
  75255. else
  75256. pTDefRegMap(@Self)^.&set := $00000001;
  75257. end;
  75258. function TCAN1_C1FIFOINT11.getRXNEMPTYIF : TBits_1; inline;
  75259. begin
  75260. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75261. end;
  75262. procedure TCAN1_C1FIFOINT11.setRXHALFIF; inline;
  75263. begin
  75264. pTDefRegMap(@Self)^.&set := $00000002;
  75265. end;
  75266. procedure TCAN1_C1FIFOINT11.clearRXHALFIF; inline;
  75267. begin
  75268. pTDefRegMap(@Self)^.clr := $00000002;
  75269. end;
  75270. procedure TCAN1_C1FIFOINT11.setRXHALFIF(thebits : TBits_1); inline;
  75271. begin
  75272. if thebits = 0 then
  75273. pTDefRegMap(@Self)^.clr := $00000002
  75274. else
  75275. pTDefRegMap(@Self)^.&set := $00000002;
  75276. end;
  75277. function TCAN1_C1FIFOINT11.getRXHALFIF : TBits_1; inline;
  75278. begin
  75279. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75280. end;
  75281. procedure TCAN1_C1FIFOINT11.setRXFULLIF; inline;
  75282. begin
  75283. pTDefRegMap(@Self)^.&set := $00000004;
  75284. end;
  75285. procedure TCAN1_C1FIFOINT11.clearRXFULLIF; inline;
  75286. begin
  75287. pTDefRegMap(@Self)^.clr := $00000004;
  75288. end;
  75289. procedure TCAN1_C1FIFOINT11.setRXFULLIF(thebits : TBits_1); inline;
  75290. begin
  75291. if thebits = 0 then
  75292. pTDefRegMap(@Self)^.clr := $00000004
  75293. else
  75294. pTDefRegMap(@Self)^.&set := $00000004;
  75295. end;
  75296. function TCAN1_C1FIFOINT11.getRXFULLIF : TBits_1; inline;
  75297. begin
  75298. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75299. end;
  75300. procedure TCAN1_C1FIFOINT11.setRXOVFLIF; inline;
  75301. begin
  75302. pTDefRegMap(@Self)^.&set := $00000008;
  75303. end;
  75304. procedure TCAN1_C1FIFOINT11.clearRXOVFLIF; inline;
  75305. begin
  75306. pTDefRegMap(@Self)^.clr := $00000008;
  75307. end;
  75308. procedure TCAN1_C1FIFOINT11.setRXOVFLIF(thebits : TBits_1); inline;
  75309. begin
  75310. if thebits = 0 then
  75311. pTDefRegMap(@Self)^.clr := $00000008
  75312. else
  75313. pTDefRegMap(@Self)^.&set := $00000008;
  75314. end;
  75315. function TCAN1_C1FIFOINT11.getRXOVFLIF : TBits_1; inline;
  75316. begin
  75317. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75318. end;
  75319. procedure TCAN1_C1FIFOINT11.setTXEMPTYIF; inline;
  75320. begin
  75321. pTDefRegMap(@Self)^.&set := $00000100;
  75322. end;
  75323. procedure TCAN1_C1FIFOINT11.clearTXEMPTYIF; inline;
  75324. begin
  75325. pTDefRegMap(@Self)^.clr := $00000100;
  75326. end;
  75327. procedure TCAN1_C1FIFOINT11.setTXEMPTYIF(thebits : TBits_1); inline;
  75328. begin
  75329. if thebits = 0 then
  75330. pTDefRegMap(@Self)^.clr := $00000100
  75331. else
  75332. pTDefRegMap(@Self)^.&set := $00000100;
  75333. end;
  75334. function TCAN1_C1FIFOINT11.getTXEMPTYIF : TBits_1; inline;
  75335. begin
  75336. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  75337. end;
  75338. procedure TCAN1_C1FIFOINT11.setTXHALFIF; inline;
  75339. begin
  75340. pTDefRegMap(@Self)^.&set := $00000200;
  75341. end;
  75342. procedure TCAN1_C1FIFOINT11.clearTXHALFIF; inline;
  75343. begin
  75344. pTDefRegMap(@Self)^.clr := $00000200;
  75345. end;
  75346. procedure TCAN1_C1FIFOINT11.setTXHALFIF(thebits : TBits_1); inline;
  75347. begin
  75348. if thebits = 0 then
  75349. pTDefRegMap(@Self)^.clr := $00000200
  75350. else
  75351. pTDefRegMap(@Self)^.&set := $00000200;
  75352. end;
  75353. function TCAN1_C1FIFOINT11.getTXHALFIF : TBits_1; inline;
  75354. begin
  75355. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  75356. end;
  75357. procedure TCAN1_C1FIFOINT11.setTXNFULLIF; inline;
  75358. begin
  75359. pTDefRegMap(@Self)^.&set := $00000400;
  75360. end;
  75361. procedure TCAN1_C1FIFOINT11.clearTXNFULLIF; inline;
  75362. begin
  75363. pTDefRegMap(@Self)^.clr := $00000400;
  75364. end;
  75365. procedure TCAN1_C1FIFOINT11.setTXNFULLIF(thebits : TBits_1); inline;
  75366. begin
  75367. if thebits = 0 then
  75368. pTDefRegMap(@Self)^.clr := $00000400
  75369. else
  75370. pTDefRegMap(@Self)^.&set := $00000400;
  75371. end;
  75372. function TCAN1_C1FIFOINT11.getTXNFULLIF : TBits_1; inline;
  75373. begin
  75374. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  75375. end;
  75376. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIE; inline;
  75377. begin
  75378. pTDefRegMap(@Self)^.&set := $00010000;
  75379. end;
  75380. procedure TCAN1_C1FIFOINT11.clearRXNEMPTYIE; inline;
  75381. begin
  75382. pTDefRegMap(@Self)^.clr := $00010000;
  75383. end;
  75384. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIE(thebits : TBits_1); inline;
  75385. begin
  75386. if thebits = 0 then
  75387. pTDefRegMap(@Self)^.clr := $00010000
  75388. else
  75389. pTDefRegMap(@Self)^.&set := $00010000;
  75390. end;
  75391. function TCAN1_C1FIFOINT11.getRXNEMPTYIE : TBits_1; inline;
  75392. begin
  75393. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  75394. end;
  75395. procedure TCAN1_C1FIFOINT11.setRXHALFIE; inline;
  75396. begin
  75397. pTDefRegMap(@Self)^.&set := $00020000;
  75398. end;
  75399. procedure TCAN1_C1FIFOINT11.clearRXHALFIE; inline;
  75400. begin
  75401. pTDefRegMap(@Self)^.clr := $00020000;
  75402. end;
  75403. procedure TCAN1_C1FIFOINT11.setRXHALFIE(thebits : TBits_1); inline;
  75404. begin
  75405. if thebits = 0 then
  75406. pTDefRegMap(@Self)^.clr := $00020000
  75407. else
  75408. pTDefRegMap(@Self)^.&set := $00020000;
  75409. end;
  75410. function TCAN1_C1FIFOINT11.getRXHALFIE : TBits_1; inline;
  75411. begin
  75412. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  75413. end;
  75414. procedure TCAN1_C1FIFOINT11.setRXFULLIE; inline;
  75415. begin
  75416. pTDefRegMap(@Self)^.&set := $00040000;
  75417. end;
  75418. procedure TCAN1_C1FIFOINT11.clearRXFULLIE; inline;
  75419. begin
  75420. pTDefRegMap(@Self)^.clr := $00040000;
  75421. end;
  75422. procedure TCAN1_C1FIFOINT11.setRXFULLIE(thebits : TBits_1); inline;
  75423. begin
  75424. if thebits = 0 then
  75425. pTDefRegMap(@Self)^.clr := $00040000
  75426. else
  75427. pTDefRegMap(@Self)^.&set := $00040000;
  75428. end;
  75429. function TCAN1_C1FIFOINT11.getRXFULLIE : TBits_1; inline;
  75430. begin
  75431. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  75432. end;
  75433. procedure TCAN1_C1FIFOINT11.setRXOVFLIE; inline;
  75434. begin
  75435. pTDefRegMap(@Self)^.&set := $00080000;
  75436. end;
  75437. procedure TCAN1_C1FIFOINT11.clearRXOVFLIE; inline;
  75438. begin
  75439. pTDefRegMap(@Self)^.clr := $00080000;
  75440. end;
  75441. procedure TCAN1_C1FIFOINT11.setRXOVFLIE(thebits : TBits_1); inline;
  75442. begin
  75443. if thebits = 0 then
  75444. pTDefRegMap(@Self)^.clr := $00080000
  75445. else
  75446. pTDefRegMap(@Self)^.&set := $00080000;
  75447. end;
  75448. function TCAN1_C1FIFOINT11.getRXOVFLIE : TBits_1; inline;
  75449. begin
  75450. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  75451. end;
  75452. procedure TCAN1_C1FIFOINT11.setTXEMPTYIE; inline;
  75453. begin
  75454. pTDefRegMap(@Self)^.&set := $01000000;
  75455. end;
  75456. procedure TCAN1_C1FIFOINT11.clearTXEMPTYIE; inline;
  75457. begin
  75458. pTDefRegMap(@Self)^.clr := $01000000;
  75459. end;
  75460. procedure TCAN1_C1FIFOINT11.setTXEMPTYIE(thebits : TBits_1); inline;
  75461. begin
  75462. if thebits = 0 then
  75463. pTDefRegMap(@Self)^.clr := $01000000
  75464. else
  75465. pTDefRegMap(@Self)^.&set := $01000000;
  75466. end;
  75467. function TCAN1_C1FIFOINT11.getTXEMPTYIE : TBits_1; inline;
  75468. begin
  75469. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  75470. end;
  75471. procedure TCAN1_C1FIFOINT11.setTXHALFIE; inline;
  75472. begin
  75473. pTDefRegMap(@Self)^.&set := $02000000;
  75474. end;
  75475. procedure TCAN1_C1FIFOINT11.clearTXHALFIE; inline;
  75476. begin
  75477. pTDefRegMap(@Self)^.clr := $02000000;
  75478. end;
  75479. procedure TCAN1_C1FIFOINT11.setTXHALFIE(thebits : TBits_1); inline;
  75480. begin
  75481. if thebits = 0 then
  75482. pTDefRegMap(@Self)^.clr := $02000000
  75483. else
  75484. pTDefRegMap(@Self)^.&set := $02000000;
  75485. end;
  75486. function TCAN1_C1FIFOINT11.getTXHALFIE : TBits_1; inline;
  75487. begin
  75488. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  75489. end;
  75490. procedure TCAN1_C1FIFOINT11.setTXNFULLIE; inline;
  75491. begin
  75492. pTDefRegMap(@Self)^.&set := $04000000;
  75493. end;
  75494. procedure TCAN1_C1FIFOINT11.clearTXNFULLIE; inline;
  75495. begin
  75496. pTDefRegMap(@Self)^.clr := $04000000;
  75497. end;
  75498. procedure TCAN1_C1FIFOINT11.setTXNFULLIE(thebits : TBits_1); inline;
  75499. begin
  75500. if thebits = 0 then
  75501. pTDefRegMap(@Self)^.clr := $04000000
  75502. else
  75503. pTDefRegMap(@Self)^.&set := $04000000;
  75504. end;
  75505. function TCAN1_C1FIFOINT11.getTXNFULLIE : TBits_1; inline;
  75506. begin
  75507. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  75508. end;
  75509. procedure TCAN1_C1FIFOINT11.setw(thebits : TBits_32); inline;
  75510. begin
  75511. pTDefRegMap(@Self)^.val := thebits;
  75512. end;
  75513. function TCAN1_C1FIFOINT11.getw : TBits_32; inline;
  75514. begin
  75515. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75516. end;
  75517. procedure TCAN1_C1FIFOCI11.setCFIFOCI(thebits : TBits_5); inline;
  75518. begin
  75519. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  75520. end;
  75521. function TCAN1_C1FIFOCI11.getCFIFOCI : TBits_5; inline;
  75522. begin
  75523. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  75524. end;
  75525. procedure TCAN1_C1FIFOCI11.setw(thebits : TBits_32); inline;
  75526. begin
  75527. pTDefRegMap(@Self)^.val := thebits;
  75528. end;
  75529. function TCAN1_C1FIFOCI11.getw : TBits_32; inline;
  75530. begin
  75531. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75532. end;
  75533. procedure TCAN1_C1FIFOCON12.setTXPRI(thebits : TBits_2); inline;
  75534. begin
  75535. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  75536. end;
  75537. function TCAN1_C1FIFOCON12.getTXPRI : TBits_2; inline;
  75538. begin
  75539. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  75540. end;
  75541. procedure TCAN1_C1FIFOCON12.setRTREN; inline;
  75542. begin
  75543. pTDefRegMap(@Self)^.&set := $00000004;
  75544. end;
  75545. procedure TCAN1_C1FIFOCON12.clearRTREN; inline;
  75546. begin
  75547. pTDefRegMap(@Self)^.clr := $00000004;
  75548. end;
  75549. procedure TCAN1_C1FIFOCON12.setRTREN(thebits : TBits_1); inline;
  75550. begin
  75551. if thebits = 0 then
  75552. pTDefRegMap(@Self)^.clr := $00000004
  75553. else
  75554. pTDefRegMap(@Self)^.&set := $00000004;
  75555. end;
  75556. function TCAN1_C1FIFOCON12.getRTREN : TBits_1; inline;
  75557. begin
  75558. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75559. end;
  75560. procedure TCAN1_C1FIFOCON12.setTXREQ; inline;
  75561. begin
  75562. pTDefRegMap(@Self)^.&set := $00000008;
  75563. end;
  75564. procedure TCAN1_C1FIFOCON12.clearTXREQ; inline;
  75565. begin
  75566. pTDefRegMap(@Self)^.clr := $00000008;
  75567. end;
  75568. procedure TCAN1_C1FIFOCON12.setTXREQ(thebits : TBits_1); inline;
  75569. begin
  75570. if thebits = 0 then
  75571. pTDefRegMap(@Self)^.clr := $00000008
  75572. else
  75573. pTDefRegMap(@Self)^.&set := $00000008;
  75574. end;
  75575. function TCAN1_C1FIFOCON12.getTXREQ : TBits_1; inline;
  75576. begin
  75577. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75578. end;
  75579. procedure TCAN1_C1FIFOCON12.setTXERR; inline;
  75580. begin
  75581. pTDefRegMap(@Self)^.&set := $00000010;
  75582. end;
  75583. procedure TCAN1_C1FIFOCON12.clearTXERR; inline;
  75584. begin
  75585. pTDefRegMap(@Self)^.clr := $00000010;
  75586. end;
  75587. procedure TCAN1_C1FIFOCON12.setTXERR(thebits : TBits_1); inline;
  75588. begin
  75589. if thebits = 0 then
  75590. pTDefRegMap(@Self)^.clr := $00000010
  75591. else
  75592. pTDefRegMap(@Self)^.&set := $00000010;
  75593. end;
  75594. function TCAN1_C1FIFOCON12.getTXERR : TBits_1; inline;
  75595. begin
  75596. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  75597. end;
  75598. procedure TCAN1_C1FIFOCON12.setTXLARB; inline;
  75599. begin
  75600. pTDefRegMap(@Self)^.&set := $00000020;
  75601. end;
  75602. procedure TCAN1_C1FIFOCON12.clearTXLARB; inline;
  75603. begin
  75604. pTDefRegMap(@Self)^.clr := $00000020;
  75605. end;
  75606. procedure TCAN1_C1FIFOCON12.setTXLARB(thebits : TBits_1); inline;
  75607. begin
  75608. if thebits = 0 then
  75609. pTDefRegMap(@Self)^.clr := $00000020
  75610. else
  75611. pTDefRegMap(@Self)^.&set := $00000020;
  75612. end;
  75613. function TCAN1_C1FIFOCON12.getTXLARB : TBits_1; inline;
  75614. begin
  75615. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  75616. end;
  75617. procedure TCAN1_C1FIFOCON12.setTXABAT; inline;
  75618. begin
  75619. pTDefRegMap(@Self)^.&set := $00000040;
  75620. end;
  75621. procedure TCAN1_C1FIFOCON12.clearTXABAT; inline;
  75622. begin
  75623. pTDefRegMap(@Self)^.clr := $00000040;
  75624. end;
  75625. procedure TCAN1_C1FIFOCON12.setTXABAT(thebits : TBits_1); inline;
  75626. begin
  75627. if thebits = 0 then
  75628. pTDefRegMap(@Self)^.clr := $00000040
  75629. else
  75630. pTDefRegMap(@Self)^.&set := $00000040;
  75631. end;
  75632. function TCAN1_C1FIFOCON12.getTXABAT : TBits_1; inline;
  75633. begin
  75634. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  75635. end;
  75636. procedure TCAN1_C1FIFOCON12.setTXEN; inline;
  75637. begin
  75638. pTDefRegMap(@Self)^.&set := $00000080;
  75639. end;
  75640. procedure TCAN1_C1FIFOCON12.clearTXEN; inline;
  75641. begin
  75642. pTDefRegMap(@Self)^.clr := $00000080;
  75643. end;
  75644. procedure TCAN1_C1FIFOCON12.setTXEN(thebits : TBits_1); inline;
  75645. begin
  75646. if thebits = 0 then
  75647. pTDefRegMap(@Self)^.clr := $00000080
  75648. else
  75649. pTDefRegMap(@Self)^.&set := $00000080;
  75650. end;
  75651. function TCAN1_C1FIFOCON12.getTXEN : TBits_1; inline;
  75652. begin
  75653. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  75654. end;
  75655. procedure TCAN1_C1FIFOCON12.setDONLY; inline;
  75656. begin
  75657. pTDefRegMap(@Self)^.&set := $00001000;
  75658. end;
  75659. procedure TCAN1_C1FIFOCON12.clearDONLY; inline;
  75660. begin
  75661. pTDefRegMap(@Self)^.clr := $00001000;
  75662. end;
  75663. procedure TCAN1_C1FIFOCON12.setDONLY(thebits : TBits_1); inline;
  75664. begin
  75665. if thebits = 0 then
  75666. pTDefRegMap(@Self)^.clr := $00001000
  75667. else
  75668. pTDefRegMap(@Self)^.&set := $00001000;
  75669. end;
  75670. function TCAN1_C1FIFOCON12.getDONLY : TBits_1; inline;
  75671. begin
  75672. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  75673. end;
  75674. procedure TCAN1_C1FIFOCON12.setUINC; inline;
  75675. begin
  75676. pTDefRegMap(@Self)^.&set := $00002000;
  75677. end;
  75678. procedure TCAN1_C1FIFOCON12.clearUINC; inline;
  75679. begin
  75680. pTDefRegMap(@Self)^.clr := $00002000;
  75681. end;
  75682. procedure TCAN1_C1FIFOCON12.setUINC(thebits : TBits_1); inline;
  75683. begin
  75684. if thebits = 0 then
  75685. pTDefRegMap(@Self)^.clr := $00002000
  75686. else
  75687. pTDefRegMap(@Self)^.&set := $00002000;
  75688. end;
  75689. function TCAN1_C1FIFOCON12.getUINC : TBits_1; inline;
  75690. begin
  75691. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  75692. end;
  75693. procedure TCAN1_C1FIFOCON12.setFRESET; inline;
  75694. begin
  75695. pTDefRegMap(@Self)^.&set := $00004000;
  75696. end;
  75697. procedure TCAN1_C1FIFOCON12.clearFRESET; inline;
  75698. begin
  75699. pTDefRegMap(@Self)^.clr := $00004000;
  75700. end;
  75701. procedure TCAN1_C1FIFOCON12.setFRESET(thebits : TBits_1); inline;
  75702. begin
  75703. if thebits = 0 then
  75704. pTDefRegMap(@Self)^.clr := $00004000
  75705. else
  75706. pTDefRegMap(@Self)^.&set := $00004000;
  75707. end;
  75708. function TCAN1_C1FIFOCON12.getFRESET : TBits_1; inline;
  75709. begin
  75710. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  75711. end;
  75712. procedure TCAN1_C1FIFOCON12.setFSIZE(thebits : TBits_5); inline;
  75713. begin
  75714. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  75715. end;
  75716. function TCAN1_C1FIFOCON12.getFSIZE : TBits_5; inline;
  75717. begin
  75718. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  75719. end;
  75720. procedure TCAN1_C1FIFOCON12.setw(thebits : TBits_32); inline;
  75721. begin
  75722. pTDefRegMap(@Self)^.val := thebits;
  75723. end;
  75724. function TCAN1_C1FIFOCON12.getw : TBits_32; inline;
  75725. begin
  75726. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75727. end;
  75728. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIF; inline;
  75729. begin
  75730. pTDefRegMap(@Self)^.&set := $00000001;
  75731. end;
  75732. procedure TCAN1_C1FIFOINT12.clearRXNEMPTYIF; inline;
  75733. begin
  75734. pTDefRegMap(@Self)^.clr := $00000001;
  75735. end;
  75736. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIF(thebits : TBits_1); inline;
  75737. begin
  75738. if thebits = 0 then
  75739. pTDefRegMap(@Self)^.clr := $00000001
  75740. else
  75741. pTDefRegMap(@Self)^.&set := $00000001;
  75742. end;
  75743. function TCAN1_C1FIFOINT12.getRXNEMPTYIF : TBits_1; inline;
  75744. begin
  75745. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75746. end;
  75747. procedure TCAN1_C1FIFOINT12.setRXHALFIF; inline;
  75748. begin
  75749. pTDefRegMap(@Self)^.&set := $00000002;
  75750. end;
  75751. procedure TCAN1_C1FIFOINT12.clearRXHALFIF; inline;
  75752. begin
  75753. pTDefRegMap(@Self)^.clr := $00000002;
  75754. end;
  75755. procedure TCAN1_C1FIFOINT12.setRXHALFIF(thebits : TBits_1); inline;
  75756. begin
  75757. if thebits = 0 then
  75758. pTDefRegMap(@Self)^.clr := $00000002
  75759. else
  75760. pTDefRegMap(@Self)^.&set := $00000002;
  75761. end;
  75762. function TCAN1_C1FIFOINT12.getRXHALFIF : TBits_1; inline;
  75763. begin
  75764. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75765. end;
  75766. procedure TCAN1_C1FIFOINT12.setRXFULLIF; inline;
  75767. begin
  75768. pTDefRegMap(@Self)^.&set := $00000004;
  75769. end;
  75770. procedure TCAN1_C1FIFOINT12.clearRXFULLIF; inline;
  75771. begin
  75772. pTDefRegMap(@Self)^.clr := $00000004;
  75773. end;
  75774. procedure TCAN1_C1FIFOINT12.setRXFULLIF(thebits : TBits_1); inline;
  75775. begin
  75776. if thebits = 0 then
  75777. pTDefRegMap(@Self)^.clr := $00000004
  75778. else
  75779. pTDefRegMap(@Self)^.&set := $00000004;
  75780. end;
  75781. function TCAN1_C1FIFOINT12.getRXFULLIF : TBits_1; inline;
  75782. begin
  75783. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75784. end;
  75785. procedure TCAN1_C1FIFOINT12.setRXOVFLIF; inline;
  75786. begin
  75787. pTDefRegMap(@Self)^.&set := $00000008;
  75788. end;
  75789. procedure TCAN1_C1FIFOINT12.clearRXOVFLIF; inline;
  75790. begin
  75791. pTDefRegMap(@Self)^.clr := $00000008;
  75792. end;
  75793. procedure TCAN1_C1FIFOINT12.setRXOVFLIF(thebits : TBits_1); inline;
  75794. begin
  75795. if thebits = 0 then
  75796. pTDefRegMap(@Self)^.clr := $00000008
  75797. else
  75798. pTDefRegMap(@Self)^.&set := $00000008;
  75799. end;
  75800. function TCAN1_C1FIFOINT12.getRXOVFLIF : TBits_1; inline;
  75801. begin
  75802. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75803. end;
  75804. procedure TCAN1_C1FIFOINT12.setTXEMPTYIF; inline;
  75805. begin
  75806. pTDefRegMap(@Self)^.&set := $00000100;
  75807. end;
  75808. procedure TCAN1_C1FIFOINT12.clearTXEMPTYIF; inline;
  75809. begin
  75810. pTDefRegMap(@Self)^.clr := $00000100;
  75811. end;
  75812. procedure TCAN1_C1FIFOINT12.setTXEMPTYIF(thebits : TBits_1); inline;
  75813. begin
  75814. if thebits = 0 then
  75815. pTDefRegMap(@Self)^.clr := $00000100
  75816. else
  75817. pTDefRegMap(@Self)^.&set := $00000100;
  75818. end;
  75819. function TCAN1_C1FIFOINT12.getTXEMPTYIF : TBits_1; inline;
  75820. begin
  75821. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  75822. end;
  75823. procedure TCAN1_C1FIFOINT12.setTXHALFIF; inline;
  75824. begin
  75825. pTDefRegMap(@Self)^.&set := $00000200;
  75826. end;
  75827. procedure TCAN1_C1FIFOINT12.clearTXHALFIF; inline;
  75828. begin
  75829. pTDefRegMap(@Self)^.clr := $00000200;
  75830. end;
  75831. procedure TCAN1_C1FIFOINT12.setTXHALFIF(thebits : TBits_1); inline;
  75832. begin
  75833. if thebits = 0 then
  75834. pTDefRegMap(@Self)^.clr := $00000200
  75835. else
  75836. pTDefRegMap(@Self)^.&set := $00000200;
  75837. end;
  75838. function TCAN1_C1FIFOINT12.getTXHALFIF : TBits_1; inline;
  75839. begin
  75840. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  75841. end;
  75842. procedure TCAN1_C1FIFOINT12.setTXNFULLIF; inline;
  75843. begin
  75844. pTDefRegMap(@Self)^.&set := $00000400;
  75845. end;
  75846. procedure TCAN1_C1FIFOINT12.clearTXNFULLIF; inline;
  75847. begin
  75848. pTDefRegMap(@Self)^.clr := $00000400;
  75849. end;
  75850. procedure TCAN1_C1FIFOINT12.setTXNFULLIF(thebits : TBits_1); inline;
  75851. begin
  75852. if thebits = 0 then
  75853. pTDefRegMap(@Self)^.clr := $00000400
  75854. else
  75855. pTDefRegMap(@Self)^.&set := $00000400;
  75856. end;
  75857. function TCAN1_C1FIFOINT12.getTXNFULLIF : TBits_1; inline;
  75858. begin
  75859. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  75860. end;
  75861. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIE; inline;
  75862. begin
  75863. pTDefRegMap(@Self)^.&set := $00010000;
  75864. end;
  75865. procedure TCAN1_C1FIFOINT12.clearRXNEMPTYIE; inline;
  75866. begin
  75867. pTDefRegMap(@Self)^.clr := $00010000;
  75868. end;
  75869. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIE(thebits : TBits_1); inline;
  75870. begin
  75871. if thebits = 0 then
  75872. pTDefRegMap(@Self)^.clr := $00010000
  75873. else
  75874. pTDefRegMap(@Self)^.&set := $00010000;
  75875. end;
  75876. function TCAN1_C1FIFOINT12.getRXNEMPTYIE : TBits_1; inline;
  75877. begin
  75878. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  75879. end;
  75880. procedure TCAN1_C1FIFOINT12.setRXHALFIE; inline;
  75881. begin
  75882. pTDefRegMap(@Self)^.&set := $00020000;
  75883. end;
  75884. procedure TCAN1_C1FIFOINT12.clearRXHALFIE; inline;
  75885. begin
  75886. pTDefRegMap(@Self)^.clr := $00020000;
  75887. end;
  75888. procedure TCAN1_C1FIFOINT12.setRXHALFIE(thebits : TBits_1); inline;
  75889. begin
  75890. if thebits = 0 then
  75891. pTDefRegMap(@Self)^.clr := $00020000
  75892. else
  75893. pTDefRegMap(@Self)^.&set := $00020000;
  75894. end;
  75895. function TCAN1_C1FIFOINT12.getRXHALFIE : TBits_1; inline;
  75896. begin
  75897. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  75898. end;
  75899. procedure TCAN1_C1FIFOINT12.setRXFULLIE; inline;
  75900. begin
  75901. pTDefRegMap(@Self)^.&set := $00040000;
  75902. end;
  75903. procedure TCAN1_C1FIFOINT12.clearRXFULLIE; inline;
  75904. begin
  75905. pTDefRegMap(@Self)^.clr := $00040000;
  75906. end;
  75907. procedure TCAN1_C1FIFOINT12.setRXFULLIE(thebits : TBits_1); inline;
  75908. begin
  75909. if thebits = 0 then
  75910. pTDefRegMap(@Self)^.clr := $00040000
  75911. else
  75912. pTDefRegMap(@Self)^.&set := $00040000;
  75913. end;
  75914. function TCAN1_C1FIFOINT12.getRXFULLIE : TBits_1; inline;
  75915. begin
  75916. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  75917. end;
  75918. procedure TCAN1_C1FIFOINT12.setRXOVFLIE; inline;
  75919. begin
  75920. pTDefRegMap(@Self)^.&set := $00080000;
  75921. end;
  75922. procedure TCAN1_C1FIFOINT12.clearRXOVFLIE; inline;
  75923. begin
  75924. pTDefRegMap(@Self)^.clr := $00080000;
  75925. end;
  75926. procedure TCAN1_C1FIFOINT12.setRXOVFLIE(thebits : TBits_1); inline;
  75927. begin
  75928. if thebits = 0 then
  75929. pTDefRegMap(@Self)^.clr := $00080000
  75930. else
  75931. pTDefRegMap(@Self)^.&set := $00080000;
  75932. end;
  75933. function TCAN1_C1FIFOINT12.getRXOVFLIE : TBits_1; inline;
  75934. begin
  75935. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  75936. end;
  75937. procedure TCAN1_C1FIFOINT12.setTXEMPTYIE; inline;
  75938. begin
  75939. pTDefRegMap(@Self)^.&set := $01000000;
  75940. end;
  75941. procedure TCAN1_C1FIFOINT12.clearTXEMPTYIE; inline;
  75942. begin
  75943. pTDefRegMap(@Self)^.clr := $01000000;
  75944. end;
  75945. procedure TCAN1_C1FIFOINT12.setTXEMPTYIE(thebits : TBits_1); inline;
  75946. begin
  75947. if thebits = 0 then
  75948. pTDefRegMap(@Self)^.clr := $01000000
  75949. else
  75950. pTDefRegMap(@Self)^.&set := $01000000;
  75951. end;
  75952. function TCAN1_C1FIFOINT12.getTXEMPTYIE : TBits_1; inline;
  75953. begin
  75954. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  75955. end;
  75956. procedure TCAN1_C1FIFOINT12.setTXHALFIE; inline;
  75957. begin
  75958. pTDefRegMap(@Self)^.&set := $02000000;
  75959. end;
  75960. procedure TCAN1_C1FIFOINT12.clearTXHALFIE; inline;
  75961. begin
  75962. pTDefRegMap(@Self)^.clr := $02000000;
  75963. end;
  75964. procedure TCAN1_C1FIFOINT12.setTXHALFIE(thebits : TBits_1); inline;
  75965. begin
  75966. if thebits = 0 then
  75967. pTDefRegMap(@Self)^.clr := $02000000
  75968. else
  75969. pTDefRegMap(@Self)^.&set := $02000000;
  75970. end;
  75971. function TCAN1_C1FIFOINT12.getTXHALFIE : TBits_1; inline;
  75972. begin
  75973. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  75974. end;
  75975. procedure TCAN1_C1FIFOINT12.setTXNFULLIE; inline;
  75976. begin
  75977. pTDefRegMap(@Self)^.&set := $04000000;
  75978. end;
  75979. procedure TCAN1_C1FIFOINT12.clearTXNFULLIE; inline;
  75980. begin
  75981. pTDefRegMap(@Self)^.clr := $04000000;
  75982. end;
  75983. procedure TCAN1_C1FIFOINT12.setTXNFULLIE(thebits : TBits_1); inline;
  75984. begin
  75985. if thebits = 0 then
  75986. pTDefRegMap(@Self)^.clr := $04000000
  75987. else
  75988. pTDefRegMap(@Self)^.&set := $04000000;
  75989. end;
  75990. function TCAN1_C1FIFOINT12.getTXNFULLIE : TBits_1; inline;
  75991. begin
  75992. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  75993. end;
  75994. procedure TCAN1_C1FIFOINT12.setw(thebits : TBits_32); inline;
  75995. begin
  75996. pTDefRegMap(@Self)^.val := thebits;
  75997. end;
  75998. function TCAN1_C1FIFOINT12.getw : TBits_32; inline;
  75999. begin
  76000. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76001. end;
  76002. procedure TCAN1_C1FIFOCI12.setCFIFOCI(thebits : TBits_5); inline;
  76003. begin
  76004. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  76005. end;
  76006. function TCAN1_C1FIFOCI12.getCFIFOCI : TBits_5; inline;
  76007. begin
  76008. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  76009. end;
  76010. procedure TCAN1_C1FIFOCI12.setw(thebits : TBits_32); inline;
  76011. begin
  76012. pTDefRegMap(@Self)^.val := thebits;
  76013. end;
  76014. function TCAN1_C1FIFOCI12.getw : TBits_32; inline;
  76015. begin
  76016. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76017. end;
  76018. procedure TCAN1_C1FIFOCON13.setTXPRI(thebits : TBits_2); inline;
  76019. begin
  76020. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  76021. end;
  76022. function TCAN1_C1FIFOCON13.getTXPRI : TBits_2; inline;
  76023. begin
  76024. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  76025. end;
  76026. procedure TCAN1_C1FIFOCON13.setRTREN; inline;
  76027. begin
  76028. pTDefRegMap(@Self)^.&set := $00000004;
  76029. end;
  76030. procedure TCAN1_C1FIFOCON13.clearRTREN; inline;
  76031. begin
  76032. pTDefRegMap(@Self)^.clr := $00000004;
  76033. end;
  76034. procedure TCAN1_C1FIFOCON13.setRTREN(thebits : TBits_1); inline;
  76035. begin
  76036. if thebits = 0 then
  76037. pTDefRegMap(@Self)^.clr := $00000004
  76038. else
  76039. pTDefRegMap(@Self)^.&set := $00000004;
  76040. end;
  76041. function TCAN1_C1FIFOCON13.getRTREN : TBits_1; inline;
  76042. begin
  76043. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76044. end;
  76045. procedure TCAN1_C1FIFOCON13.setTXREQ; inline;
  76046. begin
  76047. pTDefRegMap(@Self)^.&set := $00000008;
  76048. end;
  76049. procedure TCAN1_C1FIFOCON13.clearTXREQ; inline;
  76050. begin
  76051. pTDefRegMap(@Self)^.clr := $00000008;
  76052. end;
  76053. procedure TCAN1_C1FIFOCON13.setTXREQ(thebits : TBits_1); inline;
  76054. begin
  76055. if thebits = 0 then
  76056. pTDefRegMap(@Self)^.clr := $00000008
  76057. else
  76058. pTDefRegMap(@Self)^.&set := $00000008;
  76059. end;
  76060. function TCAN1_C1FIFOCON13.getTXREQ : TBits_1; inline;
  76061. begin
  76062. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76063. end;
  76064. procedure TCAN1_C1FIFOCON13.setTXERR; inline;
  76065. begin
  76066. pTDefRegMap(@Self)^.&set := $00000010;
  76067. end;
  76068. procedure TCAN1_C1FIFOCON13.clearTXERR; inline;
  76069. begin
  76070. pTDefRegMap(@Self)^.clr := $00000010;
  76071. end;
  76072. procedure TCAN1_C1FIFOCON13.setTXERR(thebits : TBits_1); inline;
  76073. begin
  76074. if thebits = 0 then
  76075. pTDefRegMap(@Self)^.clr := $00000010
  76076. else
  76077. pTDefRegMap(@Self)^.&set := $00000010;
  76078. end;
  76079. function TCAN1_C1FIFOCON13.getTXERR : TBits_1; inline;
  76080. begin
  76081. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  76082. end;
  76083. procedure TCAN1_C1FIFOCON13.setTXLARB; inline;
  76084. begin
  76085. pTDefRegMap(@Self)^.&set := $00000020;
  76086. end;
  76087. procedure TCAN1_C1FIFOCON13.clearTXLARB; inline;
  76088. begin
  76089. pTDefRegMap(@Self)^.clr := $00000020;
  76090. end;
  76091. procedure TCAN1_C1FIFOCON13.setTXLARB(thebits : TBits_1); inline;
  76092. begin
  76093. if thebits = 0 then
  76094. pTDefRegMap(@Self)^.clr := $00000020
  76095. else
  76096. pTDefRegMap(@Self)^.&set := $00000020;
  76097. end;
  76098. function TCAN1_C1FIFOCON13.getTXLARB : TBits_1; inline;
  76099. begin
  76100. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  76101. end;
  76102. procedure TCAN1_C1FIFOCON13.setTXABAT; inline;
  76103. begin
  76104. pTDefRegMap(@Self)^.&set := $00000040;
  76105. end;
  76106. procedure TCAN1_C1FIFOCON13.clearTXABAT; inline;
  76107. begin
  76108. pTDefRegMap(@Self)^.clr := $00000040;
  76109. end;
  76110. procedure TCAN1_C1FIFOCON13.setTXABAT(thebits : TBits_1); inline;
  76111. begin
  76112. if thebits = 0 then
  76113. pTDefRegMap(@Self)^.clr := $00000040
  76114. else
  76115. pTDefRegMap(@Self)^.&set := $00000040;
  76116. end;
  76117. function TCAN1_C1FIFOCON13.getTXABAT : TBits_1; inline;
  76118. begin
  76119. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  76120. end;
  76121. procedure TCAN1_C1FIFOCON13.setTXEN; inline;
  76122. begin
  76123. pTDefRegMap(@Self)^.&set := $00000080;
  76124. end;
  76125. procedure TCAN1_C1FIFOCON13.clearTXEN; inline;
  76126. begin
  76127. pTDefRegMap(@Self)^.clr := $00000080;
  76128. end;
  76129. procedure TCAN1_C1FIFOCON13.setTXEN(thebits : TBits_1); inline;
  76130. begin
  76131. if thebits = 0 then
  76132. pTDefRegMap(@Self)^.clr := $00000080
  76133. else
  76134. pTDefRegMap(@Self)^.&set := $00000080;
  76135. end;
  76136. function TCAN1_C1FIFOCON13.getTXEN : TBits_1; inline;
  76137. begin
  76138. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  76139. end;
  76140. procedure TCAN1_C1FIFOCON13.setDONLY; inline;
  76141. begin
  76142. pTDefRegMap(@Self)^.&set := $00001000;
  76143. end;
  76144. procedure TCAN1_C1FIFOCON13.clearDONLY; inline;
  76145. begin
  76146. pTDefRegMap(@Self)^.clr := $00001000;
  76147. end;
  76148. procedure TCAN1_C1FIFOCON13.setDONLY(thebits : TBits_1); inline;
  76149. begin
  76150. if thebits = 0 then
  76151. pTDefRegMap(@Self)^.clr := $00001000
  76152. else
  76153. pTDefRegMap(@Self)^.&set := $00001000;
  76154. end;
  76155. function TCAN1_C1FIFOCON13.getDONLY : TBits_1; inline;
  76156. begin
  76157. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  76158. end;
  76159. procedure TCAN1_C1FIFOCON13.setUINC; inline;
  76160. begin
  76161. pTDefRegMap(@Self)^.&set := $00002000;
  76162. end;
  76163. procedure TCAN1_C1FIFOCON13.clearUINC; inline;
  76164. begin
  76165. pTDefRegMap(@Self)^.clr := $00002000;
  76166. end;
  76167. procedure TCAN1_C1FIFOCON13.setUINC(thebits : TBits_1); inline;
  76168. begin
  76169. if thebits = 0 then
  76170. pTDefRegMap(@Self)^.clr := $00002000
  76171. else
  76172. pTDefRegMap(@Self)^.&set := $00002000;
  76173. end;
  76174. function TCAN1_C1FIFOCON13.getUINC : TBits_1; inline;
  76175. begin
  76176. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  76177. end;
  76178. procedure TCAN1_C1FIFOCON13.setFRESET; inline;
  76179. begin
  76180. pTDefRegMap(@Self)^.&set := $00004000;
  76181. end;
  76182. procedure TCAN1_C1FIFOCON13.clearFRESET; inline;
  76183. begin
  76184. pTDefRegMap(@Self)^.clr := $00004000;
  76185. end;
  76186. procedure TCAN1_C1FIFOCON13.setFRESET(thebits : TBits_1); inline;
  76187. begin
  76188. if thebits = 0 then
  76189. pTDefRegMap(@Self)^.clr := $00004000
  76190. else
  76191. pTDefRegMap(@Self)^.&set := $00004000;
  76192. end;
  76193. function TCAN1_C1FIFOCON13.getFRESET : TBits_1; inline;
  76194. begin
  76195. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  76196. end;
  76197. procedure TCAN1_C1FIFOCON13.setFSIZE(thebits : TBits_5); inline;
  76198. begin
  76199. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  76200. end;
  76201. function TCAN1_C1FIFOCON13.getFSIZE : TBits_5; inline;
  76202. begin
  76203. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  76204. end;
  76205. procedure TCAN1_C1FIFOCON13.setw(thebits : TBits_32); inline;
  76206. begin
  76207. pTDefRegMap(@Self)^.val := thebits;
  76208. end;
  76209. function TCAN1_C1FIFOCON13.getw : TBits_32; inline;
  76210. begin
  76211. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76212. end;
  76213. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIF; inline;
  76214. begin
  76215. pTDefRegMap(@Self)^.&set := $00000001;
  76216. end;
  76217. procedure TCAN1_C1FIFOINT13.clearRXNEMPTYIF; inline;
  76218. begin
  76219. pTDefRegMap(@Self)^.clr := $00000001;
  76220. end;
  76221. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIF(thebits : TBits_1); inline;
  76222. begin
  76223. if thebits = 0 then
  76224. pTDefRegMap(@Self)^.clr := $00000001
  76225. else
  76226. pTDefRegMap(@Self)^.&set := $00000001;
  76227. end;
  76228. function TCAN1_C1FIFOINT13.getRXNEMPTYIF : TBits_1; inline;
  76229. begin
  76230. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  76231. end;
  76232. procedure TCAN1_C1FIFOINT13.setRXHALFIF; inline;
  76233. begin
  76234. pTDefRegMap(@Self)^.&set := $00000002;
  76235. end;
  76236. procedure TCAN1_C1FIFOINT13.clearRXHALFIF; inline;
  76237. begin
  76238. pTDefRegMap(@Self)^.clr := $00000002;
  76239. end;
  76240. procedure TCAN1_C1FIFOINT13.setRXHALFIF(thebits : TBits_1); inline;
  76241. begin
  76242. if thebits = 0 then
  76243. pTDefRegMap(@Self)^.clr := $00000002
  76244. else
  76245. pTDefRegMap(@Self)^.&set := $00000002;
  76246. end;
  76247. function TCAN1_C1FIFOINT13.getRXHALFIF : TBits_1; inline;
  76248. begin
  76249. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  76250. end;
  76251. procedure TCAN1_C1FIFOINT13.setRXFULLIF; inline;
  76252. begin
  76253. pTDefRegMap(@Self)^.&set := $00000004;
  76254. end;
  76255. procedure TCAN1_C1FIFOINT13.clearRXFULLIF; inline;
  76256. begin
  76257. pTDefRegMap(@Self)^.clr := $00000004;
  76258. end;
  76259. procedure TCAN1_C1FIFOINT13.setRXFULLIF(thebits : TBits_1); inline;
  76260. begin
  76261. if thebits = 0 then
  76262. pTDefRegMap(@Self)^.clr := $00000004
  76263. else
  76264. pTDefRegMap(@Self)^.&set := $00000004;
  76265. end;
  76266. function TCAN1_C1FIFOINT13.getRXFULLIF : TBits_1; inline;
  76267. begin
  76268. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76269. end;
  76270. procedure TCAN1_C1FIFOINT13.setRXOVFLIF; inline;
  76271. begin
  76272. pTDefRegMap(@Self)^.&set := $00000008;
  76273. end;
  76274. procedure TCAN1_C1FIFOINT13.clearRXOVFLIF; inline;
  76275. begin
  76276. pTDefRegMap(@Self)^.clr := $00000008;
  76277. end;
  76278. procedure TCAN1_C1FIFOINT13.setRXOVFLIF(thebits : TBits_1); inline;
  76279. begin
  76280. if thebits = 0 then
  76281. pTDefRegMap(@Self)^.clr := $00000008
  76282. else
  76283. pTDefRegMap(@Self)^.&set := $00000008;
  76284. end;
  76285. function TCAN1_C1FIFOINT13.getRXOVFLIF : TBits_1; inline;
  76286. begin
  76287. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76288. end;
  76289. procedure TCAN1_C1FIFOINT13.setTXEMPTYIF; inline;
  76290. begin
  76291. pTDefRegMap(@Self)^.&set := $00000100;
  76292. end;
  76293. procedure TCAN1_C1FIFOINT13.clearTXEMPTYIF; inline;
  76294. begin
  76295. pTDefRegMap(@Self)^.clr := $00000100;
  76296. end;
  76297. procedure TCAN1_C1FIFOINT13.setTXEMPTYIF(thebits : TBits_1); inline;
  76298. begin
  76299. if thebits = 0 then
  76300. pTDefRegMap(@Self)^.clr := $00000100
  76301. else
  76302. pTDefRegMap(@Self)^.&set := $00000100;
  76303. end;
  76304. function TCAN1_C1FIFOINT13.getTXEMPTYIF : TBits_1; inline;
  76305. begin
  76306. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  76307. end;
  76308. procedure TCAN1_C1FIFOINT13.setTXHALFIF; inline;
  76309. begin
  76310. pTDefRegMap(@Self)^.&set := $00000200;
  76311. end;
  76312. procedure TCAN1_C1FIFOINT13.clearTXHALFIF; inline;
  76313. begin
  76314. pTDefRegMap(@Self)^.clr := $00000200;
  76315. end;
  76316. procedure TCAN1_C1FIFOINT13.setTXHALFIF(thebits : TBits_1); inline;
  76317. begin
  76318. if thebits = 0 then
  76319. pTDefRegMap(@Self)^.clr := $00000200
  76320. else
  76321. pTDefRegMap(@Self)^.&set := $00000200;
  76322. end;
  76323. function TCAN1_C1FIFOINT13.getTXHALFIF : TBits_1; inline;
  76324. begin
  76325. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  76326. end;
  76327. procedure TCAN1_C1FIFOINT13.setTXNFULLIF; inline;
  76328. begin
  76329. pTDefRegMap(@Self)^.&set := $00000400;
  76330. end;
  76331. procedure TCAN1_C1FIFOINT13.clearTXNFULLIF; inline;
  76332. begin
  76333. pTDefRegMap(@Self)^.clr := $00000400;
  76334. end;
  76335. procedure TCAN1_C1FIFOINT13.setTXNFULLIF(thebits : TBits_1); inline;
  76336. begin
  76337. if thebits = 0 then
  76338. pTDefRegMap(@Self)^.clr := $00000400
  76339. else
  76340. pTDefRegMap(@Self)^.&set := $00000400;
  76341. end;
  76342. function TCAN1_C1FIFOINT13.getTXNFULLIF : TBits_1; inline;
  76343. begin
  76344. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  76345. end;
  76346. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIE; inline;
  76347. begin
  76348. pTDefRegMap(@Self)^.&set := $00010000;
  76349. end;
  76350. procedure TCAN1_C1FIFOINT13.clearRXNEMPTYIE; inline;
  76351. begin
  76352. pTDefRegMap(@Self)^.clr := $00010000;
  76353. end;
  76354. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIE(thebits : TBits_1); inline;
  76355. begin
  76356. if thebits = 0 then
  76357. pTDefRegMap(@Self)^.clr := $00010000
  76358. else
  76359. pTDefRegMap(@Self)^.&set := $00010000;
  76360. end;
  76361. function TCAN1_C1FIFOINT13.getRXNEMPTYIE : TBits_1; inline;
  76362. begin
  76363. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  76364. end;
  76365. procedure TCAN1_C1FIFOINT13.setRXHALFIE; inline;
  76366. begin
  76367. pTDefRegMap(@Self)^.&set := $00020000;
  76368. end;
  76369. procedure TCAN1_C1FIFOINT13.clearRXHALFIE; inline;
  76370. begin
  76371. pTDefRegMap(@Self)^.clr := $00020000;
  76372. end;
  76373. procedure TCAN1_C1FIFOINT13.setRXHALFIE(thebits : TBits_1); inline;
  76374. begin
  76375. if thebits = 0 then
  76376. pTDefRegMap(@Self)^.clr := $00020000
  76377. else
  76378. pTDefRegMap(@Self)^.&set := $00020000;
  76379. end;
  76380. function TCAN1_C1FIFOINT13.getRXHALFIE : TBits_1; inline;
  76381. begin
  76382. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  76383. end;
  76384. procedure TCAN1_C1FIFOINT13.setRXFULLIE; inline;
  76385. begin
  76386. pTDefRegMap(@Self)^.&set := $00040000;
  76387. end;
  76388. procedure TCAN1_C1FIFOINT13.clearRXFULLIE; inline;
  76389. begin
  76390. pTDefRegMap(@Self)^.clr := $00040000;
  76391. end;
  76392. procedure TCAN1_C1FIFOINT13.setRXFULLIE(thebits : TBits_1); inline;
  76393. begin
  76394. if thebits = 0 then
  76395. pTDefRegMap(@Self)^.clr := $00040000
  76396. else
  76397. pTDefRegMap(@Self)^.&set := $00040000;
  76398. end;
  76399. function TCAN1_C1FIFOINT13.getRXFULLIE : TBits_1; inline;
  76400. begin
  76401. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  76402. end;
  76403. procedure TCAN1_C1FIFOINT13.setRXOVFLIE; inline;
  76404. begin
  76405. pTDefRegMap(@Self)^.&set := $00080000;
  76406. end;
  76407. procedure TCAN1_C1FIFOINT13.clearRXOVFLIE; inline;
  76408. begin
  76409. pTDefRegMap(@Self)^.clr := $00080000;
  76410. end;
  76411. procedure TCAN1_C1FIFOINT13.setRXOVFLIE(thebits : TBits_1); inline;
  76412. begin
  76413. if thebits = 0 then
  76414. pTDefRegMap(@Self)^.clr := $00080000
  76415. else
  76416. pTDefRegMap(@Self)^.&set := $00080000;
  76417. end;
  76418. function TCAN1_C1FIFOINT13.getRXOVFLIE : TBits_1; inline;
  76419. begin
  76420. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  76421. end;
  76422. procedure TCAN1_C1FIFOINT13.setTXEMPTYIE; inline;
  76423. begin
  76424. pTDefRegMap(@Self)^.&set := $01000000;
  76425. end;
  76426. procedure TCAN1_C1FIFOINT13.clearTXEMPTYIE; inline;
  76427. begin
  76428. pTDefRegMap(@Self)^.clr := $01000000;
  76429. end;
  76430. procedure TCAN1_C1FIFOINT13.setTXEMPTYIE(thebits : TBits_1); inline;
  76431. begin
  76432. if thebits = 0 then
  76433. pTDefRegMap(@Self)^.clr := $01000000
  76434. else
  76435. pTDefRegMap(@Self)^.&set := $01000000;
  76436. end;
  76437. function TCAN1_C1FIFOINT13.getTXEMPTYIE : TBits_1; inline;
  76438. begin
  76439. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  76440. end;
  76441. procedure TCAN1_C1FIFOINT13.setTXHALFIE; inline;
  76442. begin
  76443. pTDefRegMap(@Self)^.&set := $02000000;
  76444. end;
  76445. procedure TCAN1_C1FIFOINT13.clearTXHALFIE; inline;
  76446. begin
  76447. pTDefRegMap(@Self)^.clr := $02000000;
  76448. end;
  76449. procedure TCAN1_C1FIFOINT13.setTXHALFIE(thebits : TBits_1); inline;
  76450. begin
  76451. if thebits = 0 then
  76452. pTDefRegMap(@Self)^.clr := $02000000
  76453. else
  76454. pTDefRegMap(@Self)^.&set := $02000000;
  76455. end;
  76456. function TCAN1_C1FIFOINT13.getTXHALFIE : TBits_1; inline;
  76457. begin
  76458. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  76459. end;
  76460. procedure TCAN1_C1FIFOINT13.setTXNFULLIE; inline;
  76461. begin
  76462. pTDefRegMap(@Self)^.&set := $04000000;
  76463. end;
  76464. procedure TCAN1_C1FIFOINT13.clearTXNFULLIE; inline;
  76465. begin
  76466. pTDefRegMap(@Self)^.clr := $04000000;
  76467. end;
  76468. procedure TCAN1_C1FIFOINT13.setTXNFULLIE(thebits : TBits_1); inline;
  76469. begin
  76470. if thebits = 0 then
  76471. pTDefRegMap(@Self)^.clr := $04000000
  76472. else
  76473. pTDefRegMap(@Self)^.&set := $04000000;
  76474. end;
  76475. function TCAN1_C1FIFOINT13.getTXNFULLIE : TBits_1; inline;
  76476. begin
  76477. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  76478. end;
  76479. procedure TCAN1_C1FIFOINT13.setw(thebits : TBits_32); inline;
  76480. begin
  76481. pTDefRegMap(@Self)^.val := thebits;
  76482. end;
  76483. function TCAN1_C1FIFOINT13.getw : TBits_32; inline;
  76484. begin
  76485. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76486. end;
  76487. procedure TCAN1_C1FIFOCI13.setCFIFOCI(thebits : TBits_5); inline;
  76488. begin
  76489. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  76490. end;
  76491. function TCAN1_C1FIFOCI13.getCFIFOCI : TBits_5; inline;
  76492. begin
  76493. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  76494. end;
  76495. procedure TCAN1_C1FIFOCI13.setw(thebits : TBits_32); inline;
  76496. begin
  76497. pTDefRegMap(@Self)^.val := thebits;
  76498. end;
  76499. function TCAN1_C1FIFOCI13.getw : TBits_32; inline;
  76500. begin
  76501. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76502. end;
  76503. procedure TCAN1_C1FIFOCON14.setTXPRI(thebits : TBits_2); inline;
  76504. begin
  76505. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  76506. end;
  76507. function TCAN1_C1FIFOCON14.getTXPRI : TBits_2; inline;
  76508. begin
  76509. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  76510. end;
  76511. procedure TCAN1_C1FIFOCON14.setRTREN; inline;
  76512. begin
  76513. pTDefRegMap(@Self)^.&set := $00000004;
  76514. end;
  76515. procedure TCAN1_C1FIFOCON14.clearRTREN; inline;
  76516. begin
  76517. pTDefRegMap(@Self)^.clr := $00000004;
  76518. end;
  76519. procedure TCAN1_C1FIFOCON14.setRTREN(thebits : TBits_1); inline;
  76520. begin
  76521. if thebits = 0 then
  76522. pTDefRegMap(@Self)^.clr := $00000004
  76523. else
  76524. pTDefRegMap(@Self)^.&set := $00000004;
  76525. end;
  76526. function TCAN1_C1FIFOCON14.getRTREN : TBits_1; inline;
  76527. begin
  76528. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76529. end;
  76530. procedure TCAN1_C1FIFOCON14.setTXREQ; inline;
  76531. begin
  76532. pTDefRegMap(@Self)^.&set := $00000008;
  76533. end;
  76534. procedure TCAN1_C1FIFOCON14.clearTXREQ; inline;
  76535. begin
  76536. pTDefRegMap(@Self)^.clr := $00000008;
  76537. end;
  76538. procedure TCAN1_C1FIFOCON14.setTXREQ(thebits : TBits_1); inline;
  76539. begin
  76540. if thebits = 0 then
  76541. pTDefRegMap(@Self)^.clr := $00000008
  76542. else
  76543. pTDefRegMap(@Self)^.&set := $00000008;
  76544. end;
  76545. function TCAN1_C1FIFOCON14.getTXREQ : TBits_1; inline;
  76546. begin
  76547. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76548. end;
  76549. procedure TCAN1_C1FIFOCON14.setTXERR; inline;
  76550. begin
  76551. pTDefRegMap(@Self)^.&set := $00000010;
  76552. end;
  76553. procedure TCAN1_C1FIFOCON14.clearTXERR; inline;
  76554. begin
  76555. pTDefRegMap(@Self)^.clr := $00000010;
  76556. end;
  76557. procedure TCAN1_C1FIFOCON14.setTXERR(thebits : TBits_1); inline;
  76558. begin
  76559. if thebits = 0 then
  76560. pTDefRegMap(@Self)^.clr := $00000010
  76561. else
  76562. pTDefRegMap(@Self)^.&set := $00000010;
  76563. end;
  76564. function TCAN1_C1FIFOCON14.getTXERR : TBits_1; inline;
  76565. begin
  76566. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  76567. end;
  76568. procedure TCAN1_C1FIFOCON14.setTXLARB; inline;
  76569. begin
  76570. pTDefRegMap(@Self)^.&set := $00000020;
  76571. end;
  76572. procedure TCAN1_C1FIFOCON14.clearTXLARB; inline;
  76573. begin
  76574. pTDefRegMap(@Self)^.clr := $00000020;
  76575. end;
  76576. procedure TCAN1_C1FIFOCON14.setTXLARB(thebits : TBits_1); inline;
  76577. begin
  76578. if thebits = 0 then
  76579. pTDefRegMap(@Self)^.clr := $00000020
  76580. else
  76581. pTDefRegMap(@Self)^.&set := $00000020;
  76582. end;
  76583. function TCAN1_C1FIFOCON14.getTXLARB : TBits_1; inline;
  76584. begin
  76585. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  76586. end;
  76587. procedure TCAN1_C1FIFOCON14.setTXABAT; inline;
  76588. begin
  76589. pTDefRegMap(@Self)^.&set := $00000040;
  76590. end;
  76591. procedure TCAN1_C1FIFOCON14.clearTXABAT; inline;
  76592. begin
  76593. pTDefRegMap(@Self)^.clr := $00000040;
  76594. end;
  76595. procedure TCAN1_C1FIFOCON14.setTXABAT(thebits : TBits_1); inline;
  76596. begin
  76597. if thebits = 0 then
  76598. pTDefRegMap(@Self)^.clr := $00000040
  76599. else
  76600. pTDefRegMap(@Self)^.&set := $00000040;
  76601. end;
  76602. function TCAN1_C1FIFOCON14.getTXABAT : TBits_1; inline;
  76603. begin
  76604. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  76605. end;
  76606. procedure TCAN1_C1FIFOCON14.setTXEN; inline;
  76607. begin
  76608. pTDefRegMap(@Self)^.&set := $00000080;
  76609. end;
  76610. procedure TCAN1_C1FIFOCON14.clearTXEN; inline;
  76611. begin
  76612. pTDefRegMap(@Self)^.clr := $00000080;
  76613. end;
  76614. procedure TCAN1_C1FIFOCON14.setTXEN(thebits : TBits_1); inline;
  76615. begin
  76616. if thebits = 0 then
  76617. pTDefRegMap(@Self)^.clr := $00000080
  76618. else
  76619. pTDefRegMap(@Self)^.&set := $00000080;
  76620. end;
  76621. function TCAN1_C1FIFOCON14.getTXEN : TBits_1; inline;
  76622. begin
  76623. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  76624. end;
  76625. procedure TCAN1_C1FIFOCON14.setDONLY; inline;
  76626. begin
  76627. pTDefRegMap(@Self)^.&set := $00001000;
  76628. end;
  76629. procedure TCAN1_C1FIFOCON14.clearDONLY; inline;
  76630. begin
  76631. pTDefRegMap(@Self)^.clr := $00001000;
  76632. end;
  76633. procedure TCAN1_C1FIFOCON14.setDONLY(thebits : TBits_1); inline;
  76634. begin
  76635. if thebits = 0 then
  76636. pTDefRegMap(@Self)^.clr := $00001000
  76637. else
  76638. pTDefRegMap(@Self)^.&set := $00001000;
  76639. end;
  76640. function TCAN1_C1FIFOCON14.getDONLY : TBits_1; inline;
  76641. begin
  76642. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  76643. end;
  76644. procedure TCAN1_C1FIFOCON14.setUINC; inline;
  76645. begin
  76646. pTDefRegMap(@Self)^.&set := $00002000;
  76647. end;
  76648. procedure TCAN1_C1FIFOCON14.clearUINC; inline;
  76649. begin
  76650. pTDefRegMap(@Self)^.clr := $00002000;
  76651. end;
  76652. procedure TCAN1_C1FIFOCON14.setUINC(thebits : TBits_1); inline;
  76653. begin
  76654. if thebits = 0 then
  76655. pTDefRegMap(@Self)^.clr := $00002000
  76656. else
  76657. pTDefRegMap(@Self)^.&set := $00002000;
  76658. end;
  76659. function TCAN1_C1FIFOCON14.getUINC : TBits_1; inline;
  76660. begin
  76661. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  76662. end;
  76663. procedure TCAN1_C1FIFOCON14.setFRESET; inline;
  76664. begin
  76665. pTDefRegMap(@Self)^.&set := $00004000;
  76666. end;
  76667. procedure TCAN1_C1FIFOCON14.clearFRESET; inline;
  76668. begin
  76669. pTDefRegMap(@Self)^.clr := $00004000;
  76670. end;
  76671. procedure TCAN1_C1FIFOCON14.setFRESET(thebits : TBits_1); inline;
  76672. begin
  76673. if thebits = 0 then
  76674. pTDefRegMap(@Self)^.clr := $00004000
  76675. else
  76676. pTDefRegMap(@Self)^.&set := $00004000;
  76677. end;
  76678. function TCAN1_C1FIFOCON14.getFRESET : TBits_1; inline;
  76679. begin
  76680. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  76681. end;
  76682. procedure TCAN1_C1FIFOCON14.setFSIZE(thebits : TBits_5); inline;
  76683. begin
  76684. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  76685. end;
  76686. function TCAN1_C1FIFOCON14.getFSIZE : TBits_5; inline;
  76687. begin
  76688. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  76689. end;
  76690. procedure TCAN1_C1FIFOCON14.setw(thebits : TBits_32); inline;
  76691. begin
  76692. pTDefRegMap(@Self)^.val := thebits;
  76693. end;
  76694. function TCAN1_C1FIFOCON14.getw : TBits_32; inline;
  76695. begin
  76696. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76697. end;
  76698. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIF; inline;
  76699. begin
  76700. pTDefRegMap(@Self)^.&set := $00000001;
  76701. end;
  76702. procedure TCAN1_C1FIFOINT14.clearRXNEMPTYIF; inline;
  76703. begin
  76704. pTDefRegMap(@Self)^.clr := $00000001;
  76705. end;
  76706. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIF(thebits : TBits_1); inline;
  76707. begin
  76708. if thebits = 0 then
  76709. pTDefRegMap(@Self)^.clr := $00000001
  76710. else
  76711. pTDefRegMap(@Self)^.&set := $00000001;
  76712. end;
  76713. function TCAN1_C1FIFOINT14.getRXNEMPTYIF : TBits_1; inline;
  76714. begin
  76715. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  76716. end;
  76717. procedure TCAN1_C1FIFOINT14.setRXHALFIF; inline;
  76718. begin
  76719. pTDefRegMap(@Self)^.&set := $00000002;
  76720. end;
  76721. procedure TCAN1_C1FIFOINT14.clearRXHALFIF; inline;
  76722. begin
  76723. pTDefRegMap(@Self)^.clr := $00000002;
  76724. end;
  76725. procedure TCAN1_C1FIFOINT14.setRXHALFIF(thebits : TBits_1); inline;
  76726. begin
  76727. if thebits = 0 then
  76728. pTDefRegMap(@Self)^.clr := $00000002
  76729. else
  76730. pTDefRegMap(@Self)^.&set := $00000002;
  76731. end;
  76732. function TCAN1_C1FIFOINT14.getRXHALFIF : TBits_1; inline;
  76733. begin
  76734. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  76735. end;
  76736. procedure TCAN1_C1FIFOINT14.setRXFULLIF; inline;
  76737. begin
  76738. pTDefRegMap(@Self)^.&set := $00000004;
  76739. end;
  76740. procedure TCAN1_C1FIFOINT14.clearRXFULLIF; inline;
  76741. begin
  76742. pTDefRegMap(@Self)^.clr := $00000004;
  76743. end;
  76744. procedure TCAN1_C1FIFOINT14.setRXFULLIF(thebits : TBits_1); inline;
  76745. begin
  76746. if thebits = 0 then
  76747. pTDefRegMap(@Self)^.clr := $00000004
  76748. else
  76749. pTDefRegMap(@Self)^.&set := $00000004;
  76750. end;
  76751. function TCAN1_C1FIFOINT14.getRXFULLIF : TBits_1; inline;
  76752. begin
  76753. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76754. end;
  76755. procedure TCAN1_C1FIFOINT14.setRXOVFLIF; inline;
  76756. begin
  76757. pTDefRegMap(@Self)^.&set := $00000008;
  76758. end;
  76759. procedure TCAN1_C1FIFOINT14.clearRXOVFLIF; inline;
  76760. begin
  76761. pTDefRegMap(@Self)^.clr := $00000008;
  76762. end;
  76763. procedure TCAN1_C1FIFOINT14.setRXOVFLIF(thebits : TBits_1); inline;
  76764. begin
  76765. if thebits = 0 then
  76766. pTDefRegMap(@Self)^.clr := $00000008
  76767. else
  76768. pTDefRegMap(@Self)^.&set := $00000008;
  76769. end;
  76770. function TCAN1_C1FIFOINT14.getRXOVFLIF : TBits_1; inline;
  76771. begin
  76772. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76773. end;
  76774. procedure TCAN1_C1FIFOINT14.setTXEMPTYIF; inline;
  76775. begin
  76776. pTDefRegMap(@Self)^.&set := $00000100;
  76777. end;
  76778. procedure TCAN1_C1FIFOINT14.clearTXEMPTYIF; inline;
  76779. begin
  76780. pTDefRegMap(@Self)^.clr := $00000100;
  76781. end;
  76782. procedure TCAN1_C1FIFOINT14.setTXEMPTYIF(thebits : TBits_1); inline;
  76783. begin
  76784. if thebits = 0 then
  76785. pTDefRegMap(@Self)^.clr := $00000100
  76786. else
  76787. pTDefRegMap(@Self)^.&set := $00000100;
  76788. end;
  76789. function TCAN1_C1FIFOINT14.getTXEMPTYIF : TBits_1; inline;
  76790. begin
  76791. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  76792. end;
  76793. procedure TCAN1_C1FIFOINT14.setTXHALFIF; inline;
  76794. begin
  76795. pTDefRegMap(@Self)^.&set := $00000200;
  76796. end;
  76797. procedure TCAN1_C1FIFOINT14.clearTXHALFIF; inline;
  76798. begin
  76799. pTDefRegMap(@Self)^.clr := $00000200;
  76800. end;
  76801. procedure TCAN1_C1FIFOINT14.setTXHALFIF(thebits : TBits_1); inline;
  76802. begin
  76803. if thebits = 0 then
  76804. pTDefRegMap(@Self)^.clr := $00000200
  76805. else
  76806. pTDefRegMap(@Self)^.&set := $00000200;
  76807. end;
  76808. function TCAN1_C1FIFOINT14.getTXHALFIF : TBits_1; inline;
  76809. begin
  76810. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  76811. end;
  76812. procedure TCAN1_C1FIFOINT14.setTXNFULLIF; inline;
  76813. begin
  76814. pTDefRegMap(@Self)^.&set := $00000400;
  76815. end;
  76816. procedure TCAN1_C1FIFOINT14.clearTXNFULLIF; inline;
  76817. begin
  76818. pTDefRegMap(@Self)^.clr := $00000400;
  76819. end;
  76820. procedure TCAN1_C1FIFOINT14.setTXNFULLIF(thebits : TBits_1); inline;
  76821. begin
  76822. if thebits = 0 then
  76823. pTDefRegMap(@Self)^.clr := $00000400
  76824. else
  76825. pTDefRegMap(@Self)^.&set := $00000400;
  76826. end;
  76827. function TCAN1_C1FIFOINT14.getTXNFULLIF : TBits_1; inline;
  76828. begin
  76829. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  76830. end;
  76831. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIE; inline;
  76832. begin
  76833. pTDefRegMap(@Self)^.&set := $00010000;
  76834. end;
  76835. procedure TCAN1_C1FIFOINT14.clearRXNEMPTYIE; inline;
  76836. begin
  76837. pTDefRegMap(@Self)^.clr := $00010000;
  76838. end;
  76839. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIE(thebits : TBits_1); inline;
  76840. begin
  76841. if thebits = 0 then
  76842. pTDefRegMap(@Self)^.clr := $00010000
  76843. else
  76844. pTDefRegMap(@Self)^.&set := $00010000;
  76845. end;
  76846. function TCAN1_C1FIFOINT14.getRXNEMPTYIE : TBits_1; inline;
  76847. begin
  76848. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  76849. end;
  76850. procedure TCAN1_C1FIFOINT14.setRXHALFIE; inline;
  76851. begin
  76852. pTDefRegMap(@Self)^.&set := $00020000;
  76853. end;
  76854. procedure TCAN1_C1FIFOINT14.clearRXHALFIE; inline;
  76855. begin
  76856. pTDefRegMap(@Self)^.clr := $00020000;
  76857. end;
  76858. procedure TCAN1_C1FIFOINT14.setRXHALFIE(thebits : TBits_1); inline;
  76859. begin
  76860. if thebits = 0 then
  76861. pTDefRegMap(@Self)^.clr := $00020000
  76862. else
  76863. pTDefRegMap(@Self)^.&set := $00020000;
  76864. end;
  76865. function TCAN1_C1FIFOINT14.getRXHALFIE : TBits_1; inline;
  76866. begin
  76867. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  76868. end;
  76869. procedure TCAN1_C1FIFOINT14.setRXFULLIE; inline;
  76870. begin
  76871. pTDefRegMap(@Self)^.&set := $00040000;
  76872. end;
  76873. procedure TCAN1_C1FIFOINT14.clearRXFULLIE; inline;
  76874. begin
  76875. pTDefRegMap(@Self)^.clr := $00040000;
  76876. end;
  76877. procedure TCAN1_C1FIFOINT14.setRXFULLIE(thebits : TBits_1); inline;
  76878. begin
  76879. if thebits = 0 then
  76880. pTDefRegMap(@Self)^.clr := $00040000
  76881. else
  76882. pTDefRegMap(@Self)^.&set := $00040000;
  76883. end;
  76884. function TCAN1_C1FIFOINT14.getRXFULLIE : TBits_1; inline;
  76885. begin
  76886. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  76887. end;
  76888. procedure TCAN1_C1FIFOINT14.setRXOVFLIE; inline;
  76889. begin
  76890. pTDefRegMap(@Self)^.&set := $00080000;
  76891. end;
  76892. procedure TCAN1_C1FIFOINT14.clearRXOVFLIE; inline;
  76893. begin
  76894. pTDefRegMap(@Self)^.clr := $00080000;
  76895. end;
  76896. procedure TCAN1_C1FIFOINT14.setRXOVFLIE(thebits : TBits_1); inline;
  76897. begin
  76898. if thebits = 0 then
  76899. pTDefRegMap(@Self)^.clr := $00080000
  76900. else
  76901. pTDefRegMap(@Self)^.&set := $00080000;
  76902. end;
  76903. function TCAN1_C1FIFOINT14.getRXOVFLIE : TBits_1; inline;
  76904. begin
  76905. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  76906. end;
  76907. procedure TCAN1_C1FIFOINT14.setTXEMPTYIE; inline;
  76908. begin
  76909. pTDefRegMap(@Self)^.&set := $01000000;
  76910. end;
  76911. procedure TCAN1_C1FIFOINT14.clearTXEMPTYIE; inline;
  76912. begin
  76913. pTDefRegMap(@Self)^.clr := $01000000;
  76914. end;
  76915. procedure TCAN1_C1FIFOINT14.setTXEMPTYIE(thebits : TBits_1); inline;
  76916. begin
  76917. if thebits = 0 then
  76918. pTDefRegMap(@Self)^.clr := $01000000
  76919. else
  76920. pTDefRegMap(@Self)^.&set := $01000000;
  76921. end;
  76922. function TCAN1_C1FIFOINT14.getTXEMPTYIE : TBits_1; inline;
  76923. begin
  76924. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  76925. end;
  76926. procedure TCAN1_C1FIFOINT14.setTXHALFIE; inline;
  76927. begin
  76928. pTDefRegMap(@Self)^.&set := $02000000;
  76929. end;
  76930. procedure TCAN1_C1FIFOINT14.clearTXHALFIE; inline;
  76931. begin
  76932. pTDefRegMap(@Self)^.clr := $02000000;
  76933. end;
  76934. procedure TCAN1_C1FIFOINT14.setTXHALFIE(thebits : TBits_1); inline;
  76935. begin
  76936. if thebits = 0 then
  76937. pTDefRegMap(@Self)^.clr := $02000000
  76938. else
  76939. pTDefRegMap(@Self)^.&set := $02000000;
  76940. end;
  76941. function TCAN1_C1FIFOINT14.getTXHALFIE : TBits_1; inline;
  76942. begin
  76943. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  76944. end;
  76945. procedure TCAN1_C1FIFOINT14.setTXNFULLIE; inline;
  76946. begin
  76947. pTDefRegMap(@Self)^.&set := $04000000;
  76948. end;
  76949. procedure TCAN1_C1FIFOINT14.clearTXNFULLIE; inline;
  76950. begin
  76951. pTDefRegMap(@Self)^.clr := $04000000;
  76952. end;
  76953. procedure TCAN1_C1FIFOINT14.setTXNFULLIE(thebits : TBits_1); inline;
  76954. begin
  76955. if thebits = 0 then
  76956. pTDefRegMap(@Self)^.clr := $04000000
  76957. else
  76958. pTDefRegMap(@Self)^.&set := $04000000;
  76959. end;
  76960. function TCAN1_C1FIFOINT14.getTXNFULLIE : TBits_1; inline;
  76961. begin
  76962. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  76963. end;
  76964. procedure TCAN1_C1FIFOINT14.setw(thebits : TBits_32); inline;
  76965. begin
  76966. pTDefRegMap(@Self)^.val := thebits;
  76967. end;
  76968. function TCAN1_C1FIFOINT14.getw : TBits_32; inline;
  76969. begin
  76970. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76971. end;
  76972. procedure TCAN1_C1FIFOCI14.setCFIFOCI(thebits : TBits_5); inline;
  76973. begin
  76974. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  76975. end;
  76976. function TCAN1_C1FIFOCI14.getCFIFOCI : TBits_5; inline;
  76977. begin
  76978. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  76979. end;
  76980. procedure TCAN1_C1FIFOCI14.setw(thebits : TBits_32); inline;
  76981. begin
  76982. pTDefRegMap(@Self)^.val := thebits;
  76983. end;
  76984. function TCAN1_C1FIFOCI14.getw : TBits_32; inline;
  76985. begin
  76986. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76987. end;
  76988. procedure TCAN1_C1FIFOCON15.setTXPRI(thebits : TBits_2); inline;
  76989. begin
  76990. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  76991. end;
  76992. function TCAN1_C1FIFOCON15.getTXPRI : TBits_2; inline;
  76993. begin
  76994. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  76995. end;
  76996. procedure TCAN1_C1FIFOCON15.setRTREN; inline;
  76997. begin
  76998. pTDefRegMap(@Self)^.&set := $00000004;
  76999. end;
  77000. procedure TCAN1_C1FIFOCON15.clearRTREN; inline;
  77001. begin
  77002. pTDefRegMap(@Self)^.clr := $00000004;
  77003. end;
  77004. procedure TCAN1_C1FIFOCON15.setRTREN(thebits : TBits_1); inline;
  77005. begin
  77006. if thebits = 0 then
  77007. pTDefRegMap(@Self)^.clr := $00000004
  77008. else
  77009. pTDefRegMap(@Self)^.&set := $00000004;
  77010. end;
  77011. function TCAN1_C1FIFOCON15.getRTREN : TBits_1; inline;
  77012. begin
  77013. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77014. end;
  77015. procedure TCAN1_C1FIFOCON15.setTXREQ; inline;
  77016. begin
  77017. pTDefRegMap(@Self)^.&set := $00000008;
  77018. end;
  77019. procedure TCAN1_C1FIFOCON15.clearTXREQ; inline;
  77020. begin
  77021. pTDefRegMap(@Self)^.clr := $00000008;
  77022. end;
  77023. procedure TCAN1_C1FIFOCON15.setTXREQ(thebits : TBits_1); inline;
  77024. begin
  77025. if thebits = 0 then
  77026. pTDefRegMap(@Self)^.clr := $00000008
  77027. else
  77028. pTDefRegMap(@Self)^.&set := $00000008;
  77029. end;
  77030. function TCAN1_C1FIFOCON15.getTXREQ : TBits_1; inline;
  77031. begin
  77032. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77033. end;
  77034. procedure TCAN1_C1FIFOCON15.setTXERR; inline;
  77035. begin
  77036. pTDefRegMap(@Self)^.&set := $00000010;
  77037. end;
  77038. procedure TCAN1_C1FIFOCON15.clearTXERR; inline;
  77039. begin
  77040. pTDefRegMap(@Self)^.clr := $00000010;
  77041. end;
  77042. procedure TCAN1_C1FIFOCON15.setTXERR(thebits : TBits_1); inline;
  77043. begin
  77044. if thebits = 0 then
  77045. pTDefRegMap(@Self)^.clr := $00000010
  77046. else
  77047. pTDefRegMap(@Self)^.&set := $00000010;
  77048. end;
  77049. function TCAN1_C1FIFOCON15.getTXERR : TBits_1; inline;
  77050. begin
  77051. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  77052. end;
  77053. procedure TCAN1_C1FIFOCON15.setTXLARB; inline;
  77054. begin
  77055. pTDefRegMap(@Self)^.&set := $00000020;
  77056. end;
  77057. procedure TCAN1_C1FIFOCON15.clearTXLARB; inline;
  77058. begin
  77059. pTDefRegMap(@Self)^.clr := $00000020;
  77060. end;
  77061. procedure TCAN1_C1FIFOCON15.setTXLARB(thebits : TBits_1); inline;
  77062. begin
  77063. if thebits = 0 then
  77064. pTDefRegMap(@Self)^.clr := $00000020
  77065. else
  77066. pTDefRegMap(@Self)^.&set := $00000020;
  77067. end;
  77068. function TCAN1_C1FIFOCON15.getTXLARB : TBits_1; inline;
  77069. begin
  77070. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  77071. end;
  77072. procedure TCAN1_C1FIFOCON15.setTXABAT; inline;
  77073. begin
  77074. pTDefRegMap(@Self)^.&set := $00000040;
  77075. end;
  77076. procedure TCAN1_C1FIFOCON15.clearTXABAT; inline;
  77077. begin
  77078. pTDefRegMap(@Self)^.clr := $00000040;
  77079. end;
  77080. procedure TCAN1_C1FIFOCON15.setTXABAT(thebits : TBits_1); inline;
  77081. begin
  77082. if thebits = 0 then
  77083. pTDefRegMap(@Self)^.clr := $00000040
  77084. else
  77085. pTDefRegMap(@Self)^.&set := $00000040;
  77086. end;
  77087. function TCAN1_C1FIFOCON15.getTXABAT : TBits_1; inline;
  77088. begin
  77089. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  77090. end;
  77091. procedure TCAN1_C1FIFOCON15.setTXEN; inline;
  77092. begin
  77093. pTDefRegMap(@Self)^.&set := $00000080;
  77094. end;
  77095. procedure TCAN1_C1FIFOCON15.clearTXEN; inline;
  77096. begin
  77097. pTDefRegMap(@Self)^.clr := $00000080;
  77098. end;
  77099. procedure TCAN1_C1FIFOCON15.setTXEN(thebits : TBits_1); inline;
  77100. begin
  77101. if thebits = 0 then
  77102. pTDefRegMap(@Self)^.clr := $00000080
  77103. else
  77104. pTDefRegMap(@Self)^.&set := $00000080;
  77105. end;
  77106. function TCAN1_C1FIFOCON15.getTXEN : TBits_1; inline;
  77107. begin
  77108. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  77109. end;
  77110. procedure TCAN1_C1FIFOCON15.setDONLY; inline;
  77111. begin
  77112. pTDefRegMap(@Self)^.&set := $00001000;
  77113. end;
  77114. procedure TCAN1_C1FIFOCON15.clearDONLY; inline;
  77115. begin
  77116. pTDefRegMap(@Self)^.clr := $00001000;
  77117. end;
  77118. procedure TCAN1_C1FIFOCON15.setDONLY(thebits : TBits_1); inline;
  77119. begin
  77120. if thebits = 0 then
  77121. pTDefRegMap(@Self)^.clr := $00001000
  77122. else
  77123. pTDefRegMap(@Self)^.&set := $00001000;
  77124. end;
  77125. function TCAN1_C1FIFOCON15.getDONLY : TBits_1; inline;
  77126. begin
  77127. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  77128. end;
  77129. procedure TCAN1_C1FIFOCON15.setUINC; inline;
  77130. begin
  77131. pTDefRegMap(@Self)^.&set := $00002000;
  77132. end;
  77133. procedure TCAN1_C1FIFOCON15.clearUINC; inline;
  77134. begin
  77135. pTDefRegMap(@Self)^.clr := $00002000;
  77136. end;
  77137. procedure TCAN1_C1FIFOCON15.setUINC(thebits : TBits_1); inline;
  77138. begin
  77139. if thebits = 0 then
  77140. pTDefRegMap(@Self)^.clr := $00002000
  77141. else
  77142. pTDefRegMap(@Self)^.&set := $00002000;
  77143. end;
  77144. function TCAN1_C1FIFOCON15.getUINC : TBits_1; inline;
  77145. begin
  77146. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  77147. end;
  77148. procedure TCAN1_C1FIFOCON15.setFRESET; inline;
  77149. begin
  77150. pTDefRegMap(@Self)^.&set := $00004000;
  77151. end;
  77152. procedure TCAN1_C1FIFOCON15.clearFRESET; inline;
  77153. begin
  77154. pTDefRegMap(@Self)^.clr := $00004000;
  77155. end;
  77156. procedure TCAN1_C1FIFOCON15.setFRESET(thebits : TBits_1); inline;
  77157. begin
  77158. if thebits = 0 then
  77159. pTDefRegMap(@Self)^.clr := $00004000
  77160. else
  77161. pTDefRegMap(@Self)^.&set := $00004000;
  77162. end;
  77163. function TCAN1_C1FIFOCON15.getFRESET : TBits_1; inline;
  77164. begin
  77165. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  77166. end;
  77167. procedure TCAN1_C1FIFOCON15.setFSIZE(thebits : TBits_5); inline;
  77168. begin
  77169. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  77170. end;
  77171. function TCAN1_C1FIFOCON15.getFSIZE : TBits_5; inline;
  77172. begin
  77173. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  77174. end;
  77175. procedure TCAN1_C1FIFOCON15.setw(thebits : TBits_32); inline;
  77176. begin
  77177. pTDefRegMap(@Self)^.val := thebits;
  77178. end;
  77179. function TCAN1_C1FIFOCON15.getw : TBits_32; inline;
  77180. begin
  77181. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77182. end;
  77183. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIF; inline;
  77184. begin
  77185. pTDefRegMap(@Self)^.&set := $00000001;
  77186. end;
  77187. procedure TCAN1_C1FIFOINT15.clearRXNEMPTYIF; inline;
  77188. begin
  77189. pTDefRegMap(@Self)^.clr := $00000001;
  77190. end;
  77191. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIF(thebits : TBits_1); inline;
  77192. begin
  77193. if thebits = 0 then
  77194. pTDefRegMap(@Self)^.clr := $00000001
  77195. else
  77196. pTDefRegMap(@Self)^.&set := $00000001;
  77197. end;
  77198. function TCAN1_C1FIFOINT15.getRXNEMPTYIF : TBits_1; inline;
  77199. begin
  77200. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  77201. end;
  77202. procedure TCAN1_C1FIFOINT15.setRXHALFIF; inline;
  77203. begin
  77204. pTDefRegMap(@Self)^.&set := $00000002;
  77205. end;
  77206. procedure TCAN1_C1FIFOINT15.clearRXHALFIF; inline;
  77207. begin
  77208. pTDefRegMap(@Self)^.clr := $00000002;
  77209. end;
  77210. procedure TCAN1_C1FIFOINT15.setRXHALFIF(thebits : TBits_1); inline;
  77211. begin
  77212. if thebits = 0 then
  77213. pTDefRegMap(@Self)^.clr := $00000002
  77214. else
  77215. pTDefRegMap(@Self)^.&set := $00000002;
  77216. end;
  77217. function TCAN1_C1FIFOINT15.getRXHALFIF : TBits_1; inline;
  77218. begin
  77219. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  77220. end;
  77221. procedure TCAN1_C1FIFOINT15.setRXFULLIF; inline;
  77222. begin
  77223. pTDefRegMap(@Self)^.&set := $00000004;
  77224. end;
  77225. procedure TCAN1_C1FIFOINT15.clearRXFULLIF; inline;
  77226. begin
  77227. pTDefRegMap(@Self)^.clr := $00000004;
  77228. end;
  77229. procedure TCAN1_C1FIFOINT15.setRXFULLIF(thebits : TBits_1); inline;
  77230. begin
  77231. if thebits = 0 then
  77232. pTDefRegMap(@Self)^.clr := $00000004
  77233. else
  77234. pTDefRegMap(@Self)^.&set := $00000004;
  77235. end;
  77236. function TCAN1_C1FIFOINT15.getRXFULLIF : TBits_1; inline;
  77237. begin
  77238. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77239. end;
  77240. procedure TCAN1_C1FIFOINT15.setRXOVFLIF; inline;
  77241. begin
  77242. pTDefRegMap(@Self)^.&set := $00000008;
  77243. end;
  77244. procedure TCAN1_C1FIFOINT15.clearRXOVFLIF; inline;
  77245. begin
  77246. pTDefRegMap(@Self)^.clr := $00000008;
  77247. end;
  77248. procedure TCAN1_C1FIFOINT15.setRXOVFLIF(thebits : TBits_1); inline;
  77249. begin
  77250. if thebits = 0 then
  77251. pTDefRegMap(@Self)^.clr := $00000008
  77252. else
  77253. pTDefRegMap(@Self)^.&set := $00000008;
  77254. end;
  77255. function TCAN1_C1FIFOINT15.getRXOVFLIF : TBits_1; inline;
  77256. begin
  77257. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77258. end;
  77259. procedure TCAN1_C1FIFOINT15.setTXEMPTYIF; inline;
  77260. begin
  77261. pTDefRegMap(@Self)^.&set := $00000100;
  77262. end;
  77263. procedure TCAN1_C1FIFOINT15.clearTXEMPTYIF; inline;
  77264. begin
  77265. pTDefRegMap(@Self)^.clr := $00000100;
  77266. end;
  77267. procedure TCAN1_C1FIFOINT15.setTXEMPTYIF(thebits : TBits_1); inline;
  77268. begin
  77269. if thebits = 0 then
  77270. pTDefRegMap(@Self)^.clr := $00000100
  77271. else
  77272. pTDefRegMap(@Self)^.&set := $00000100;
  77273. end;
  77274. function TCAN1_C1FIFOINT15.getTXEMPTYIF : TBits_1; inline;
  77275. begin
  77276. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  77277. end;
  77278. procedure TCAN1_C1FIFOINT15.setTXHALFIF; inline;
  77279. begin
  77280. pTDefRegMap(@Self)^.&set := $00000200;
  77281. end;
  77282. procedure TCAN1_C1FIFOINT15.clearTXHALFIF; inline;
  77283. begin
  77284. pTDefRegMap(@Self)^.clr := $00000200;
  77285. end;
  77286. procedure TCAN1_C1FIFOINT15.setTXHALFIF(thebits : TBits_1); inline;
  77287. begin
  77288. if thebits = 0 then
  77289. pTDefRegMap(@Self)^.clr := $00000200
  77290. else
  77291. pTDefRegMap(@Self)^.&set := $00000200;
  77292. end;
  77293. function TCAN1_C1FIFOINT15.getTXHALFIF : TBits_1; inline;
  77294. begin
  77295. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  77296. end;
  77297. procedure TCAN1_C1FIFOINT15.setTXNFULLIF; inline;
  77298. begin
  77299. pTDefRegMap(@Self)^.&set := $00000400;
  77300. end;
  77301. procedure TCAN1_C1FIFOINT15.clearTXNFULLIF; inline;
  77302. begin
  77303. pTDefRegMap(@Self)^.clr := $00000400;
  77304. end;
  77305. procedure TCAN1_C1FIFOINT15.setTXNFULLIF(thebits : TBits_1); inline;
  77306. begin
  77307. if thebits = 0 then
  77308. pTDefRegMap(@Self)^.clr := $00000400
  77309. else
  77310. pTDefRegMap(@Self)^.&set := $00000400;
  77311. end;
  77312. function TCAN1_C1FIFOINT15.getTXNFULLIF : TBits_1; inline;
  77313. begin
  77314. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  77315. end;
  77316. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIE; inline;
  77317. begin
  77318. pTDefRegMap(@Self)^.&set := $00010000;
  77319. end;
  77320. procedure TCAN1_C1FIFOINT15.clearRXNEMPTYIE; inline;
  77321. begin
  77322. pTDefRegMap(@Self)^.clr := $00010000;
  77323. end;
  77324. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIE(thebits : TBits_1); inline;
  77325. begin
  77326. if thebits = 0 then
  77327. pTDefRegMap(@Self)^.clr := $00010000
  77328. else
  77329. pTDefRegMap(@Self)^.&set := $00010000;
  77330. end;
  77331. function TCAN1_C1FIFOINT15.getRXNEMPTYIE : TBits_1; inline;
  77332. begin
  77333. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  77334. end;
  77335. procedure TCAN1_C1FIFOINT15.setRXHALFIE; inline;
  77336. begin
  77337. pTDefRegMap(@Self)^.&set := $00020000;
  77338. end;
  77339. procedure TCAN1_C1FIFOINT15.clearRXHALFIE; inline;
  77340. begin
  77341. pTDefRegMap(@Self)^.clr := $00020000;
  77342. end;
  77343. procedure TCAN1_C1FIFOINT15.setRXHALFIE(thebits : TBits_1); inline;
  77344. begin
  77345. if thebits = 0 then
  77346. pTDefRegMap(@Self)^.clr := $00020000
  77347. else
  77348. pTDefRegMap(@Self)^.&set := $00020000;
  77349. end;
  77350. function TCAN1_C1FIFOINT15.getRXHALFIE : TBits_1; inline;
  77351. begin
  77352. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  77353. end;
  77354. procedure TCAN1_C1FIFOINT15.setRXFULLIE; inline;
  77355. begin
  77356. pTDefRegMap(@Self)^.&set := $00040000;
  77357. end;
  77358. procedure TCAN1_C1FIFOINT15.clearRXFULLIE; inline;
  77359. begin
  77360. pTDefRegMap(@Self)^.clr := $00040000;
  77361. end;
  77362. procedure TCAN1_C1FIFOINT15.setRXFULLIE(thebits : TBits_1); inline;
  77363. begin
  77364. if thebits = 0 then
  77365. pTDefRegMap(@Self)^.clr := $00040000
  77366. else
  77367. pTDefRegMap(@Self)^.&set := $00040000;
  77368. end;
  77369. function TCAN1_C1FIFOINT15.getRXFULLIE : TBits_1; inline;
  77370. begin
  77371. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  77372. end;
  77373. procedure TCAN1_C1FIFOINT15.setRXOVFLIE; inline;
  77374. begin
  77375. pTDefRegMap(@Self)^.&set := $00080000;
  77376. end;
  77377. procedure TCAN1_C1FIFOINT15.clearRXOVFLIE; inline;
  77378. begin
  77379. pTDefRegMap(@Self)^.clr := $00080000;
  77380. end;
  77381. procedure TCAN1_C1FIFOINT15.setRXOVFLIE(thebits : TBits_1); inline;
  77382. begin
  77383. if thebits = 0 then
  77384. pTDefRegMap(@Self)^.clr := $00080000
  77385. else
  77386. pTDefRegMap(@Self)^.&set := $00080000;
  77387. end;
  77388. function TCAN1_C1FIFOINT15.getRXOVFLIE : TBits_1; inline;
  77389. begin
  77390. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77391. end;
  77392. procedure TCAN1_C1FIFOINT15.setTXEMPTYIE; inline;
  77393. begin
  77394. pTDefRegMap(@Self)^.&set := $01000000;
  77395. end;
  77396. procedure TCAN1_C1FIFOINT15.clearTXEMPTYIE; inline;
  77397. begin
  77398. pTDefRegMap(@Self)^.clr := $01000000;
  77399. end;
  77400. procedure TCAN1_C1FIFOINT15.setTXEMPTYIE(thebits : TBits_1); inline;
  77401. begin
  77402. if thebits = 0 then
  77403. pTDefRegMap(@Self)^.clr := $01000000
  77404. else
  77405. pTDefRegMap(@Self)^.&set := $01000000;
  77406. end;
  77407. function TCAN1_C1FIFOINT15.getTXEMPTYIE : TBits_1; inline;
  77408. begin
  77409. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  77410. end;
  77411. procedure TCAN1_C1FIFOINT15.setTXHALFIE; inline;
  77412. begin
  77413. pTDefRegMap(@Self)^.&set := $02000000;
  77414. end;
  77415. procedure TCAN1_C1FIFOINT15.clearTXHALFIE; inline;
  77416. begin
  77417. pTDefRegMap(@Self)^.clr := $02000000;
  77418. end;
  77419. procedure TCAN1_C1FIFOINT15.setTXHALFIE(thebits : TBits_1); inline;
  77420. begin
  77421. if thebits = 0 then
  77422. pTDefRegMap(@Self)^.clr := $02000000
  77423. else
  77424. pTDefRegMap(@Self)^.&set := $02000000;
  77425. end;
  77426. function TCAN1_C1FIFOINT15.getTXHALFIE : TBits_1; inline;
  77427. begin
  77428. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  77429. end;
  77430. procedure TCAN1_C1FIFOINT15.setTXNFULLIE; inline;
  77431. begin
  77432. pTDefRegMap(@Self)^.&set := $04000000;
  77433. end;
  77434. procedure TCAN1_C1FIFOINT15.clearTXNFULLIE; inline;
  77435. begin
  77436. pTDefRegMap(@Self)^.clr := $04000000;
  77437. end;
  77438. procedure TCAN1_C1FIFOINT15.setTXNFULLIE(thebits : TBits_1); inline;
  77439. begin
  77440. if thebits = 0 then
  77441. pTDefRegMap(@Self)^.clr := $04000000
  77442. else
  77443. pTDefRegMap(@Self)^.&set := $04000000;
  77444. end;
  77445. function TCAN1_C1FIFOINT15.getTXNFULLIE : TBits_1; inline;
  77446. begin
  77447. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  77448. end;
  77449. procedure TCAN1_C1FIFOINT15.setw(thebits : TBits_32); inline;
  77450. begin
  77451. pTDefRegMap(@Self)^.val := thebits;
  77452. end;
  77453. function TCAN1_C1FIFOINT15.getw : TBits_32; inline;
  77454. begin
  77455. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77456. end;
  77457. procedure TCAN1_C1FIFOCI15.setCFIFOCI(thebits : TBits_5); inline;
  77458. begin
  77459. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  77460. end;
  77461. function TCAN1_C1FIFOCI15.getCFIFOCI : TBits_5; inline;
  77462. begin
  77463. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  77464. end;
  77465. procedure TCAN1_C1FIFOCI15.setw(thebits : TBits_32); inline;
  77466. begin
  77467. pTDefRegMap(@Self)^.val := thebits;
  77468. end;
  77469. function TCAN1_C1FIFOCI15.getw : TBits_32; inline;
  77470. begin
  77471. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77472. end;
  77473. procedure TCAN1_C1FIFOCON16.setTXPRI(thebits : TBits_2); inline;
  77474. begin
  77475. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  77476. end;
  77477. function TCAN1_C1FIFOCON16.getTXPRI : TBits_2; inline;
  77478. begin
  77479. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  77480. end;
  77481. procedure TCAN1_C1FIFOCON16.setRTREN; inline;
  77482. begin
  77483. pTDefRegMap(@Self)^.&set := $00000004;
  77484. end;
  77485. procedure TCAN1_C1FIFOCON16.clearRTREN; inline;
  77486. begin
  77487. pTDefRegMap(@Self)^.clr := $00000004;
  77488. end;
  77489. procedure TCAN1_C1FIFOCON16.setRTREN(thebits : TBits_1); inline;
  77490. begin
  77491. if thebits = 0 then
  77492. pTDefRegMap(@Self)^.clr := $00000004
  77493. else
  77494. pTDefRegMap(@Self)^.&set := $00000004;
  77495. end;
  77496. function TCAN1_C1FIFOCON16.getRTREN : TBits_1; inline;
  77497. begin
  77498. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77499. end;
  77500. procedure TCAN1_C1FIFOCON16.setTXREQ; inline;
  77501. begin
  77502. pTDefRegMap(@Self)^.&set := $00000008;
  77503. end;
  77504. procedure TCAN1_C1FIFOCON16.clearTXREQ; inline;
  77505. begin
  77506. pTDefRegMap(@Self)^.clr := $00000008;
  77507. end;
  77508. procedure TCAN1_C1FIFOCON16.setTXREQ(thebits : TBits_1); inline;
  77509. begin
  77510. if thebits = 0 then
  77511. pTDefRegMap(@Self)^.clr := $00000008
  77512. else
  77513. pTDefRegMap(@Self)^.&set := $00000008;
  77514. end;
  77515. function TCAN1_C1FIFOCON16.getTXREQ : TBits_1; inline;
  77516. begin
  77517. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77518. end;
  77519. procedure TCAN1_C1FIFOCON16.setTXERR; inline;
  77520. begin
  77521. pTDefRegMap(@Self)^.&set := $00000010;
  77522. end;
  77523. procedure TCAN1_C1FIFOCON16.clearTXERR; inline;
  77524. begin
  77525. pTDefRegMap(@Self)^.clr := $00000010;
  77526. end;
  77527. procedure TCAN1_C1FIFOCON16.setTXERR(thebits : TBits_1); inline;
  77528. begin
  77529. if thebits = 0 then
  77530. pTDefRegMap(@Self)^.clr := $00000010
  77531. else
  77532. pTDefRegMap(@Self)^.&set := $00000010;
  77533. end;
  77534. function TCAN1_C1FIFOCON16.getTXERR : TBits_1; inline;
  77535. begin
  77536. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  77537. end;
  77538. procedure TCAN1_C1FIFOCON16.setTXLARB; inline;
  77539. begin
  77540. pTDefRegMap(@Self)^.&set := $00000020;
  77541. end;
  77542. procedure TCAN1_C1FIFOCON16.clearTXLARB; inline;
  77543. begin
  77544. pTDefRegMap(@Self)^.clr := $00000020;
  77545. end;
  77546. procedure TCAN1_C1FIFOCON16.setTXLARB(thebits : TBits_1); inline;
  77547. begin
  77548. if thebits = 0 then
  77549. pTDefRegMap(@Self)^.clr := $00000020
  77550. else
  77551. pTDefRegMap(@Self)^.&set := $00000020;
  77552. end;
  77553. function TCAN1_C1FIFOCON16.getTXLARB : TBits_1; inline;
  77554. begin
  77555. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  77556. end;
  77557. procedure TCAN1_C1FIFOCON16.setTXABAT; inline;
  77558. begin
  77559. pTDefRegMap(@Self)^.&set := $00000040;
  77560. end;
  77561. procedure TCAN1_C1FIFOCON16.clearTXABAT; inline;
  77562. begin
  77563. pTDefRegMap(@Self)^.clr := $00000040;
  77564. end;
  77565. procedure TCAN1_C1FIFOCON16.setTXABAT(thebits : TBits_1); inline;
  77566. begin
  77567. if thebits = 0 then
  77568. pTDefRegMap(@Self)^.clr := $00000040
  77569. else
  77570. pTDefRegMap(@Self)^.&set := $00000040;
  77571. end;
  77572. function TCAN1_C1FIFOCON16.getTXABAT : TBits_1; inline;
  77573. begin
  77574. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  77575. end;
  77576. procedure TCAN1_C1FIFOCON16.setTXEN; inline;
  77577. begin
  77578. pTDefRegMap(@Self)^.&set := $00000080;
  77579. end;
  77580. procedure TCAN1_C1FIFOCON16.clearTXEN; inline;
  77581. begin
  77582. pTDefRegMap(@Self)^.clr := $00000080;
  77583. end;
  77584. procedure TCAN1_C1FIFOCON16.setTXEN(thebits : TBits_1); inline;
  77585. begin
  77586. if thebits = 0 then
  77587. pTDefRegMap(@Self)^.clr := $00000080
  77588. else
  77589. pTDefRegMap(@Self)^.&set := $00000080;
  77590. end;
  77591. function TCAN1_C1FIFOCON16.getTXEN : TBits_1; inline;
  77592. begin
  77593. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  77594. end;
  77595. procedure TCAN1_C1FIFOCON16.setDONLY; inline;
  77596. begin
  77597. pTDefRegMap(@Self)^.&set := $00001000;
  77598. end;
  77599. procedure TCAN1_C1FIFOCON16.clearDONLY; inline;
  77600. begin
  77601. pTDefRegMap(@Self)^.clr := $00001000;
  77602. end;
  77603. procedure TCAN1_C1FIFOCON16.setDONLY(thebits : TBits_1); inline;
  77604. begin
  77605. if thebits = 0 then
  77606. pTDefRegMap(@Self)^.clr := $00001000
  77607. else
  77608. pTDefRegMap(@Self)^.&set := $00001000;
  77609. end;
  77610. function TCAN1_C1FIFOCON16.getDONLY : TBits_1; inline;
  77611. begin
  77612. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  77613. end;
  77614. procedure TCAN1_C1FIFOCON16.setUINC; inline;
  77615. begin
  77616. pTDefRegMap(@Self)^.&set := $00002000;
  77617. end;
  77618. procedure TCAN1_C1FIFOCON16.clearUINC; inline;
  77619. begin
  77620. pTDefRegMap(@Self)^.clr := $00002000;
  77621. end;
  77622. procedure TCAN1_C1FIFOCON16.setUINC(thebits : TBits_1); inline;
  77623. begin
  77624. if thebits = 0 then
  77625. pTDefRegMap(@Self)^.clr := $00002000
  77626. else
  77627. pTDefRegMap(@Self)^.&set := $00002000;
  77628. end;
  77629. function TCAN1_C1FIFOCON16.getUINC : TBits_1; inline;
  77630. begin
  77631. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  77632. end;
  77633. procedure TCAN1_C1FIFOCON16.setFRESET; inline;
  77634. begin
  77635. pTDefRegMap(@Self)^.&set := $00004000;
  77636. end;
  77637. procedure TCAN1_C1FIFOCON16.clearFRESET; inline;
  77638. begin
  77639. pTDefRegMap(@Self)^.clr := $00004000;
  77640. end;
  77641. procedure TCAN1_C1FIFOCON16.setFRESET(thebits : TBits_1); inline;
  77642. begin
  77643. if thebits = 0 then
  77644. pTDefRegMap(@Self)^.clr := $00004000
  77645. else
  77646. pTDefRegMap(@Self)^.&set := $00004000;
  77647. end;
  77648. function TCAN1_C1FIFOCON16.getFRESET : TBits_1; inline;
  77649. begin
  77650. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  77651. end;
  77652. procedure TCAN1_C1FIFOCON16.setFSIZE(thebits : TBits_5); inline;
  77653. begin
  77654. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  77655. end;
  77656. function TCAN1_C1FIFOCON16.getFSIZE : TBits_5; inline;
  77657. begin
  77658. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  77659. end;
  77660. procedure TCAN1_C1FIFOCON16.setw(thebits : TBits_32); inline;
  77661. begin
  77662. pTDefRegMap(@Self)^.val := thebits;
  77663. end;
  77664. function TCAN1_C1FIFOCON16.getw : TBits_32; inline;
  77665. begin
  77666. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77667. end;
  77668. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIF; inline;
  77669. begin
  77670. pTDefRegMap(@Self)^.&set := $00000001;
  77671. end;
  77672. procedure TCAN1_C1FIFOINT16.clearRXNEMPTYIF; inline;
  77673. begin
  77674. pTDefRegMap(@Self)^.clr := $00000001;
  77675. end;
  77676. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIF(thebits : TBits_1); inline;
  77677. begin
  77678. if thebits = 0 then
  77679. pTDefRegMap(@Self)^.clr := $00000001
  77680. else
  77681. pTDefRegMap(@Self)^.&set := $00000001;
  77682. end;
  77683. function TCAN1_C1FIFOINT16.getRXNEMPTYIF : TBits_1; inline;
  77684. begin
  77685. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  77686. end;
  77687. procedure TCAN1_C1FIFOINT16.setRXHALFIF; inline;
  77688. begin
  77689. pTDefRegMap(@Self)^.&set := $00000002;
  77690. end;
  77691. procedure TCAN1_C1FIFOINT16.clearRXHALFIF; inline;
  77692. begin
  77693. pTDefRegMap(@Self)^.clr := $00000002;
  77694. end;
  77695. procedure TCAN1_C1FIFOINT16.setRXHALFIF(thebits : TBits_1); inline;
  77696. begin
  77697. if thebits = 0 then
  77698. pTDefRegMap(@Self)^.clr := $00000002
  77699. else
  77700. pTDefRegMap(@Self)^.&set := $00000002;
  77701. end;
  77702. function TCAN1_C1FIFOINT16.getRXHALFIF : TBits_1; inline;
  77703. begin
  77704. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  77705. end;
  77706. procedure TCAN1_C1FIFOINT16.setRXFULLIF; inline;
  77707. begin
  77708. pTDefRegMap(@Self)^.&set := $00000004;
  77709. end;
  77710. procedure TCAN1_C1FIFOINT16.clearRXFULLIF; inline;
  77711. begin
  77712. pTDefRegMap(@Self)^.clr := $00000004;
  77713. end;
  77714. procedure TCAN1_C1FIFOINT16.setRXFULLIF(thebits : TBits_1); inline;
  77715. begin
  77716. if thebits = 0 then
  77717. pTDefRegMap(@Self)^.clr := $00000004
  77718. else
  77719. pTDefRegMap(@Self)^.&set := $00000004;
  77720. end;
  77721. function TCAN1_C1FIFOINT16.getRXFULLIF : TBits_1; inline;
  77722. begin
  77723. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77724. end;
  77725. procedure TCAN1_C1FIFOINT16.setRXOVFLIF; inline;
  77726. begin
  77727. pTDefRegMap(@Self)^.&set := $00000008;
  77728. end;
  77729. procedure TCAN1_C1FIFOINT16.clearRXOVFLIF; inline;
  77730. begin
  77731. pTDefRegMap(@Self)^.clr := $00000008;
  77732. end;
  77733. procedure TCAN1_C1FIFOINT16.setRXOVFLIF(thebits : TBits_1); inline;
  77734. begin
  77735. if thebits = 0 then
  77736. pTDefRegMap(@Self)^.clr := $00000008
  77737. else
  77738. pTDefRegMap(@Self)^.&set := $00000008;
  77739. end;
  77740. function TCAN1_C1FIFOINT16.getRXOVFLIF : TBits_1; inline;
  77741. begin
  77742. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77743. end;
  77744. procedure TCAN1_C1FIFOINT16.setTXEMPTYIF; inline;
  77745. begin
  77746. pTDefRegMap(@Self)^.&set := $00000100;
  77747. end;
  77748. procedure TCAN1_C1FIFOINT16.clearTXEMPTYIF; inline;
  77749. begin
  77750. pTDefRegMap(@Self)^.clr := $00000100;
  77751. end;
  77752. procedure TCAN1_C1FIFOINT16.setTXEMPTYIF(thebits : TBits_1); inline;
  77753. begin
  77754. if thebits = 0 then
  77755. pTDefRegMap(@Self)^.clr := $00000100
  77756. else
  77757. pTDefRegMap(@Self)^.&set := $00000100;
  77758. end;
  77759. function TCAN1_C1FIFOINT16.getTXEMPTYIF : TBits_1; inline;
  77760. begin
  77761. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  77762. end;
  77763. procedure TCAN1_C1FIFOINT16.setTXHALFIF; inline;
  77764. begin
  77765. pTDefRegMap(@Self)^.&set := $00000200;
  77766. end;
  77767. procedure TCAN1_C1FIFOINT16.clearTXHALFIF; inline;
  77768. begin
  77769. pTDefRegMap(@Self)^.clr := $00000200;
  77770. end;
  77771. procedure TCAN1_C1FIFOINT16.setTXHALFIF(thebits : TBits_1); inline;
  77772. begin
  77773. if thebits = 0 then
  77774. pTDefRegMap(@Self)^.clr := $00000200
  77775. else
  77776. pTDefRegMap(@Self)^.&set := $00000200;
  77777. end;
  77778. function TCAN1_C1FIFOINT16.getTXHALFIF : TBits_1; inline;
  77779. begin
  77780. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  77781. end;
  77782. procedure TCAN1_C1FIFOINT16.setTXNFULLIF; inline;
  77783. begin
  77784. pTDefRegMap(@Self)^.&set := $00000400;
  77785. end;
  77786. procedure TCAN1_C1FIFOINT16.clearTXNFULLIF; inline;
  77787. begin
  77788. pTDefRegMap(@Self)^.clr := $00000400;
  77789. end;
  77790. procedure TCAN1_C1FIFOINT16.setTXNFULLIF(thebits : TBits_1); inline;
  77791. begin
  77792. if thebits = 0 then
  77793. pTDefRegMap(@Self)^.clr := $00000400
  77794. else
  77795. pTDefRegMap(@Self)^.&set := $00000400;
  77796. end;
  77797. function TCAN1_C1FIFOINT16.getTXNFULLIF : TBits_1; inline;
  77798. begin
  77799. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  77800. end;
  77801. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIE; inline;
  77802. begin
  77803. pTDefRegMap(@Self)^.&set := $00010000;
  77804. end;
  77805. procedure TCAN1_C1FIFOINT16.clearRXNEMPTYIE; inline;
  77806. begin
  77807. pTDefRegMap(@Self)^.clr := $00010000;
  77808. end;
  77809. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIE(thebits : TBits_1); inline;
  77810. begin
  77811. if thebits = 0 then
  77812. pTDefRegMap(@Self)^.clr := $00010000
  77813. else
  77814. pTDefRegMap(@Self)^.&set := $00010000;
  77815. end;
  77816. function TCAN1_C1FIFOINT16.getRXNEMPTYIE : TBits_1; inline;
  77817. begin
  77818. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  77819. end;
  77820. procedure TCAN1_C1FIFOINT16.setRXHALFIE; inline;
  77821. begin
  77822. pTDefRegMap(@Self)^.&set := $00020000;
  77823. end;
  77824. procedure TCAN1_C1FIFOINT16.clearRXHALFIE; inline;
  77825. begin
  77826. pTDefRegMap(@Self)^.clr := $00020000;
  77827. end;
  77828. procedure TCAN1_C1FIFOINT16.setRXHALFIE(thebits : TBits_1); inline;
  77829. begin
  77830. if thebits = 0 then
  77831. pTDefRegMap(@Self)^.clr := $00020000
  77832. else
  77833. pTDefRegMap(@Self)^.&set := $00020000;
  77834. end;
  77835. function TCAN1_C1FIFOINT16.getRXHALFIE : TBits_1; inline;
  77836. begin
  77837. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  77838. end;
  77839. procedure TCAN1_C1FIFOINT16.setRXFULLIE; inline;
  77840. begin
  77841. pTDefRegMap(@Self)^.&set := $00040000;
  77842. end;
  77843. procedure TCAN1_C1FIFOINT16.clearRXFULLIE; inline;
  77844. begin
  77845. pTDefRegMap(@Self)^.clr := $00040000;
  77846. end;
  77847. procedure TCAN1_C1FIFOINT16.setRXFULLIE(thebits : TBits_1); inline;
  77848. begin
  77849. if thebits = 0 then
  77850. pTDefRegMap(@Self)^.clr := $00040000
  77851. else
  77852. pTDefRegMap(@Self)^.&set := $00040000;
  77853. end;
  77854. function TCAN1_C1FIFOINT16.getRXFULLIE : TBits_1; inline;
  77855. begin
  77856. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  77857. end;
  77858. procedure TCAN1_C1FIFOINT16.setRXOVFLIE; inline;
  77859. begin
  77860. pTDefRegMap(@Self)^.&set := $00080000;
  77861. end;
  77862. procedure TCAN1_C1FIFOINT16.clearRXOVFLIE; inline;
  77863. begin
  77864. pTDefRegMap(@Self)^.clr := $00080000;
  77865. end;
  77866. procedure TCAN1_C1FIFOINT16.setRXOVFLIE(thebits : TBits_1); inline;
  77867. begin
  77868. if thebits = 0 then
  77869. pTDefRegMap(@Self)^.clr := $00080000
  77870. else
  77871. pTDefRegMap(@Self)^.&set := $00080000;
  77872. end;
  77873. function TCAN1_C1FIFOINT16.getRXOVFLIE : TBits_1; inline;
  77874. begin
  77875. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77876. end;
  77877. procedure TCAN1_C1FIFOINT16.setTXEMPTYIE; inline;
  77878. begin
  77879. pTDefRegMap(@Self)^.&set := $01000000;
  77880. end;
  77881. procedure TCAN1_C1FIFOINT16.clearTXEMPTYIE; inline;
  77882. begin
  77883. pTDefRegMap(@Self)^.clr := $01000000;
  77884. end;
  77885. procedure TCAN1_C1FIFOINT16.setTXEMPTYIE(thebits : TBits_1); inline;
  77886. begin
  77887. if thebits = 0 then
  77888. pTDefRegMap(@Self)^.clr := $01000000
  77889. else
  77890. pTDefRegMap(@Self)^.&set := $01000000;
  77891. end;
  77892. function TCAN1_C1FIFOINT16.getTXEMPTYIE : TBits_1; inline;
  77893. begin
  77894. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  77895. end;
  77896. procedure TCAN1_C1FIFOINT16.setTXHALFIE; inline;
  77897. begin
  77898. pTDefRegMap(@Self)^.&set := $02000000;
  77899. end;
  77900. procedure TCAN1_C1FIFOINT16.clearTXHALFIE; inline;
  77901. begin
  77902. pTDefRegMap(@Self)^.clr := $02000000;
  77903. end;
  77904. procedure TCAN1_C1FIFOINT16.setTXHALFIE(thebits : TBits_1); inline;
  77905. begin
  77906. if thebits = 0 then
  77907. pTDefRegMap(@Self)^.clr := $02000000
  77908. else
  77909. pTDefRegMap(@Self)^.&set := $02000000;
  77910. end;
  77911. function TCAN1_C1FIFOINT16.getTXHALFIE : TBits_1; inline;
  77912. begin
  77913. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  77914. end;
  77915. procedure TCAN1_C1FIFOINT16.setTXNFULLIE; inline;
  77916. begin
  77917. pTDefRegMap(@Self)^.&set := $04000000;
  77918. end;
  77919. procedure TCAN1_C1FIFOINT16.clearTXNFULLIE; inline;
  77920. begin
  77921. pTDefRegMap(@Self)^.clr := $04000000;
  77922. end;
  77923. procedure TCAN1_C1FIFOINT16.setTXNFULLIE(thebits : TBits_1); inline;
  77924. begin
  77925. if thebits = 0 then
  77926. pTDefRegMap(@Self)^.clr := $04000000
  77927. else
  77928. pTDefRegMap(@Self)^.&set := $04000000;
  77929. end;
  77930. function TCAN1_C1FIFOINT16.getTXNFULLIE : TBits_1; inline;
  77931. begin
  77932. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  77933. end;
  77934. procedure TCAN1_C1FIFOINT16.setw(thebits : TBits_32); inline;
  77935. begin
  77936. pTDefRegMap(@Self)^.val := thebits;
  77937. end;
  77938. function TCAN1_C1FIFOINT16.getw : TBits_32; inline;
  77939. begin
  77940. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77941. end;
  77942. procedure TCAN1_C1FIFOCI16.setCFIFOCI(thebits : TBits_5); inline;
  77943. begin
  77944. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  77945. end;
  77946. function TCAN1_C1FIFOCI16.getCFIFOCI : TBits_5; inline;
  77947. begin
  77948. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  77949. end;
  77950. procedure TCAN1_C1FIFOCI16.setw(thebits : TBits_32); inline;
  77951. begin
  77952. pTDefRegMap(@Self)^.val := thebits;
  77953. end;
  77954. function TCAN1_C1FIFOCI16.getw : TBits_32; inline;
  77955. begin
  77956. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77957. end;
  77958. procedure TCAN1_C1FIFOCON17.setTXPRI(thebits : TBits_2); inline;
  77959. begin
  77960. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  77961. end;
  77962. function TCAN1_C1FIFOCON17.getTXPRI : TBits_2; inline;
  77963. begin
  77964. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  77965. end;
  77966. procedure TCAN1_C1FIFOCON17.setRTREN; inline;
  77967. begin
  77968. pTDefRegMap(@Self)^.&set := $00000004;
  77969. end;
  77970. procedure TCAN1_C1FIFOCON17.clearRTREN; inline;
  77971. begin
  77972. pTDefRegMap(@Self)^.clr := $00000004;
  77973. end;
  77974. procedure TCAN1_C1FIFOCON17.setRTREN(thebits : TBits_1); inline;
  77975. begin
  77976. if thebits = 0 then
  77977. pTDefRegMap(@Self)^.clr := $00000004
  77978. else
  77979. pTDefRegMap(@Self)^.&set := $00000004;
  77980. end;
  77981. function TCAN1_C1FIFOCON17.getRTREN : TBits_1; inline;
  77982. begin
  77983. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77984. end;
  77985. procedure TCAN1_C1FIFOCON17.setTXREQ; inline;
  77986. begin
  77987. pTDefRegMap(@Self)^.&set := $00000008;
  77988. end;
  77989. procedure TCAN1_C1FIFOCON17.clearTXREQ; inline;
  77990. begin
  77991. pTDefRegMap(@Self)^.clr := $00000008;
  77992. end;
  77993. procedure TCAN1_C1FIFOCON17.setTXREQ(thebits : TBits_1); inline;
  77994. begin
  77995. if thebits = 0 then
  77996. pTDefRegMap(@Self)^.clr := $00000008
  77997. else
  77998. pTDefRegMap(@Self)^.&set := $00000008;
  77999. end;
  78000. function TCAN1_C1FIFOCON17.getTXREQ : TBits_1; inline;
  78001. begin
  78002. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78003. end;
  78004. procedure TCAN1_C1FIFOCON17.setTXERR; inline;
  78005. begin
  78006. pTDefRegMap(@Self)^.&set := $00000010;
  78007. end;
  78008. procedure TCAN1_C1FIFOCON17.clearTXERR; inline;
  78009. begin
  78010. pTDefRegMap(@Self)^.clr := $00000010;
  78011. end;
  78012. procedure TCAN1_C1FIFOCON17.setTXERR(thebits : TBits_1); inline;
  78013. begin
  78014. if thebits = 0 then
  78015. pTDefRegMap(@Self)^.clr := $00000010
  78016. else
  78017. pTDefRegMap(@Self)^.&set := $00000010;
  78018. end;
  78019. function TCAN1_C1FIFOCON17.getTXERR : TBits_1; inline;
  78020. begin
  78021. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  78022. end;
  78023. procedure TCAN1_C1FIFOCON17.setTXLARB; inline;
  78024. begin
  78025. pTDefRegMap(@Self)^.&set := $00000020;
  78026. end;
  78027. procedure TCAN1_C1FIFOCON17.clearTXLARB; inline;
  78028. begin
  78029. pTDefRegMap(@Self)^.clr := $00000020;
  78030. end;
  78031. procedure TCAN1_C1FIFOCON17.setTXLARB(thebits : TBits_1); inline;
  78032. begin
  78033. if thebits = 0 then
  78034. pTDefRegMap(@Self)^.clr := $00000020
  78035. else
  78036. pTDefRegMap(@Self)^.&set := $00000020;
  78037. end;
  78038. function TCAN1_C1FIFOCON17.getTXLARB : TBits_1; inline;
  78039. begin
  78040. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  78041. end;
  78042. procedure TCAN1_C1FIFOCON17.setTXABAT; inline;
  78043. begin
  78044. pTDefRegMap(@Self)^.&set := $00000040;
  78045. end;
  78046. procedure TCAN1_C1FIFOCON17.clearTXABAT; inline;
  78047. begin
  78048. pTDefRegMap(@Self)^.clr := $00000040;
  78049. end;
  78050. procedure TCAN1_C1FIFOCON17.setTXABAT(thebits : TBits_1); inline;
  78051. begin
  78052. if thebits = 0 then
  78053. pTDefRegMap(@Self)^.clr := $00000040
  78054. else
  78055. pTDefRegMap(@Self)^.&set := $00000040;
  78056. end;
  78057. function TCAN1_C1FIFOCON17.getTXABAT : TBits_1; inline;
  78058. begin
  78059. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  78060. end;
  78061. procedure TCAN1_C1FIFOCON17.setTXEN; inline;
  78062. begin
  78063. pTDefRegMap(@Self)^.&set := $00000080;
  78064. end;
  78065. procedure TCAN1_C1FIFOCON17.clearTXEN; inline;
  78066. begin
  78067. pTDefRegMap(@Self)^.clr := $00000080;
  78068. end;
  78069. procedure TCAN1_C1FIFOCON17.setTXEN(thebits : TBits_1); inline;
  78070. begin
  78071. if thebits = 0 then
  78072. pTDefRegMap(@Self)^.clr := $00000080
  78073. else
  78074. pTDefRegMap(@Self)^.&set := $00000080;
  78075. end;
  78076. function TCAN1_C1FIFOCON17.getTXEN : TBits_1; inline;
  78077. begin
  78078. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78079. end;
  78080. procedure TCAN1_C1FIFOCON17.setDONLY; inline;
  78081. begin
  78082. pTDefRegMap(@Self)^.&set := $00001000;
  78083. end;
  78084. procedure TCAN1_C1FIFOCON17.clearDONLY; inline;
  78085. begin
  78086. pTDefRegMap(@Self)^.clr := $00001000;
  78087. end;
  78088. procedure TCAN1_C1FIFOCON17.setDONLY(thebits : TBits_1); inline;
  78089. begin
  78090. if thebits = 0 then
  78091. pTDefRegMap(@Self)^.clr := $00001000
  78092. else
  78093. pTDefRegMap(@Self)^.&set := $00001000;
  78094. end;
  78095. function TCAN1_C1FIFOCON17.getDONLY : TBits_1; inline;
  78096. begin
  78097. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  78098. end;
  78099. procedure TCAN1_C1FIFOCON17.setUINC; inline;
  78100. begin
  78101. pTDefRegMap(@Self)^.&set := $00002000;
  78102. end;
  78103. procedure TCAN1_C1FIFOCON17.clearUINC; inline;
  78104. begin
  78105. pTDefRegMap(@Self)^.clr := $00002000;
  78106. end;
  78107. procedure TCAN1_C1FIFOCON17.setUINC(thebits : TBits_1); inline;
  78108. begin
  78109. if thebits = 0 then
  78110. pTDefRegMap(@Self)^.clr := $00002000
  78111. else
  78112. pTDefRegMap(@Self)^.&set := $00002000;
  78113. end;
  78114. function TCAN1_C1FIFOCON17.getUINC : TBits_1; inline;
  78115. begin
  78116. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  78117. end;
  78118. procedure TCAN1_C1FIFOCON17.setFRESET; inline;
  78119. begin
  78120. pTDefRegMap(@Self)^.&set := $00004000;
  78121. end;
  78122. procedure TCAN1_C1FIFOCON17.clearFRESET; inline;
  78123. begin
  78124. pTDefRegMap(@Self)^.clr := $00004000;
  78125. end;
  78126. procedure TCAN1_C1FIFOCON17.setFRESET(thebits : TBits_1); inline;
  78127. begin
  78128. if thebits = 0 then
  78129. pTDefRegMap(@Self)^.clr := $00004000
  78130. else
  78131. pTDefRegMap(@Self)^.&set := $00004000;
  78132. end;
  78133. function TCAN1_C1FIFOCON17.getFRESET : TBits_1; inline;
  78134. begin
  78135. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  78136. end;
  78137. procedure TCAN1_C1FIFOCON17.setFSIZE(thebits : TBits_5); inline;
  78138. begin
  78139. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78140. end;
  78141. function TCAN1_C1FIFOCON17.getFSIZE : TBits_5; inline;
  78142. begin
  78143. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78144. end;
  78145. procedure TCAN1_C1FIFOCON17.setw(thebits : TBits_32); inline;
  78146. begin
  78147. pTDefRegMap(@Self)^.val := thebits;
  78148. end;
  78149. function TCAN1_C1FIFOCON17.getw : TBits_32; inline;
  78150. begin
  78151. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78152. end;
  78153. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIF; inline;
  78154. begin
  78155. pTDefRegMap(@Self)^.&set := $00000001;
  78156. end;
  78157. procedure TCAN1_C1FIFOINT17.clearRXNEMPTYIF; inline;
  78158. begin
  78159. pTDefRegMap(@Self)^.clr := $00000001;
  78160. end;
  78161. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIF(thebits : TBits_1); inline;
  78162. begin
  78163. if thebits = 0 then
  78164. pTDefRegMap(@Self)^.clr := $00000001
  78165. else
  78166. pTDefRegMap(@Self)^.&set := $00000001;
  78167. end;
  78168. function TCAN1_C1FIFOINT17.getRXNEMPTYIF : TBits_1; inline;
  78169. begin
  78170. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  78171. end;
  78172. procedure TCAN1_C1FIFOINT17.setRXHALFIF; inline;
  78173. begin
  78174. pTDefRegMap(@Self)^.&set := $00000002;
  78175. end;
  78176. procedure TCAN1_C1FIFOINT17.clearRXHALFIF; inline;
  78177. begin
  78178. pTDefRegMap(@Self)^.clr := $00000002;
  78179. end;
  78180. procedure TCAN1_C1FIFOINT17.setRXHALFIF(thebits : TBits_1); inline;
  78181. begin
  78182. if thebits = 0 then
  78183. pTDefRegMap(@Self)^.clr := $00000002
  78184. else
  78185. pTDefRegMap(@Self)^.&set := $00000002;
  78186. end;
  78187. function TCAN1_C1FIFOINT17.getRXHALFIF : TBits_1; inline;
  78188. begin
  78189. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  78190. end;
  78191. procedure TCAN1_C1FIFOINT17.setRXFULLIF; inline;
  78192. begin
  78193. pTDefRegMap(@Self)^.&set := $00000004;
  78194. end;
  78195. procedure TCAN1_C1FIFOINT17.clearRXFULLIF; inline;
  78196. begin
  78197. pTDefRegMap(@Self)^.clr := $00000004;
  78198. end;
  78199. procedure TCAN1_C1FIFOINT17.setRXFULLIF(thebits : TBits_1); inline;
  78200. begin
  78201. if thebits = 0 then
  78202. pTDefRegMap(@Self)^.clr := $00000004
  78203. else
  78204. pTDefRegMap(@Self)^.&set := $00000004;
  78205. end;
  78206. function TCAN1_C1FIFOINT17.getRXFULLIF : TBits_1; inline;
  78207. begin
  78208. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78209. end;
  78210. procedure TCAN1_C1FIFOINT17.setRXOVFLIF; inline;
  78211. begin
  78212. pTDefRegMap(@Self)^.&set := $00000008;
  78213. end;
  78214. procedure TCAN1_C1FIFOINT17.clearRXOVFLIF; inline;
  78215. begin
  78216. pTDefRegMap(@Self)^.clr := $00000008;
  78217. end;
  78218. procedure TCAN1_C1FIFOINT17.setRXOVFLIF(thebits : TBits_1); inline;
  78219. begin
  78220. if thebits = 0 then
  78221. pTDefRegMap(@Self)^.clr := $00000008
  78222. else
  78223. pTDefRegMap(@Self)^.&set := $00000008;
  78224. end;
  78225. function TCAN1_C1FIFOINT17.getRXOVFLIF : TBits_1; inline;
  78226. begin
  78227. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78228. end;
  78229. procedure TCAN1_C1FIFOINT17.setTXEMPTYIF; inline;
  78230. begin
  78231. pTDefRegMap(@Self)^.&set := $00000100;
  78232. end;
  78233. procedure TCAN1_C1FIFOINT17.clearTXEMPTYIF; inline;
  78234. begin
  78235. pTDefRegMap(@Self)^.clr := $00000100;
  78236. end;
  78237. procedure TCAN1_C1FIFOINT17.setTXEMPTYIF(thebits : TBits_1); inline;
  78238. begin
  78239. if thebits = 0 then
  78240. pTDefRegMap(@Self)^.clr := $00000100
  78241. else
  78242. pTDefRegMap(@Self)^.&set := $00000100;
  78243. end;
  78244. function TCAN1_C1FIFOINT17.getTXEMPTYIF : TBits_1; inline;
  78245. begin
  78246. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  78247. end;
  78248. procedure TCAN1_C1FIFOINT17.setTXHALFIF; inline;
  78249. begin
  78250. pTDefRegMap(@Self)^.&set := $00000200;
  78251. end;
  78252. procedure TCAN1_C1FIFOINT17.clearTXHALFIF; inline;
  78253. begin
  78254. pTDefRegMap(@Self)^.clr := $00000200;
  78255. end;
  78256. procedure TCAN1_C1FIFOINT17.setTXHALFIF(thebits : TBits_1); inline;
  78257. begin
  78258. if thebits = 0 then
  78259. pTDefRegMap(@Self)^.clr := $00000200
  78260. else
  78261. pTDefRegMap(@Self)^.&set := $00000200;
  78262. end;
  78263. function TCAN1_C1FIFOINT17.getTXHALFIF : TBits_1; inline;
  78264. begin
  78265. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  78266. end;
  78267. procedure TCAN1_C1FIFOINT17.setTXNFULLIF; inline;
  78268. begin
  78269. pTDefRegMap(@Self)^.&set := $00000400;
  78270. end;
  78271. procedure TCAN1_C1FIFOINT17.clearTXNFULLIF; inline;
  78272. begin
  78273. pTDefRegMap(@Self)^.clr := $00000400;
  78274. end;
  78275. procedure TCAN1_C1FIFOINT17.setTXNFULLIF(thebits : TBits_1); inline;
  78276. begin
  78277. if thebits = 0 then
  78278. pTDefRegMap(@Self)^.clr := $00000400
  78279. else
  78280. pTDefRegMap(@Self)^.&set := $00000400;
  78281. end;
  78282. function TCAN1_C1FIFOINT17.getTXNFULLIF : TBits_1; inline;
  78283. begin
  78284. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  78285. end;
  78286. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIE; inline;
  78287. begin
  78288. pTDefRegMap(@Self)^.&set := $00010000;
  78289. end;
  78290. procedure TCAN1_C1FIFOINT17.clearRXNEMPTYIE; inline;
  78291. begin
  78292. pTDefRegMap(@Self)^.clr := $00010000;
  78293. end;
  78294. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIE(thebits : TBits_1); inline;
  78295. begin
  78296. if thebits = 0 then
  78297. pTDefRegMap(@Self)^.clr := $00010000
  78298. else
  78299. pTDefRegMap(@Self)^.&set := $00010000;
  78300. end;
  78301. function TCAN1_C1FIFOINT17.getRXNEMPTYIE : TBits_1; inline;
  78302. begin
  78303. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  78304. end;
  78305. procedure TCAN1_C1FIFOINT17.setRXHALFIE; inline;
  78306. begin
  78307. pTDefRegMap(@Self)^.&set := $00020000;
  78308. end;
  78309. procedure TCAN1_C1FIFOINT17.clearRXHALFIE; inline;
  78310. begin
  78311. pTDefRegMap(@Self)^.clr := $00020000;
  78312. end;
  78313. procedure TCAN1_C1FIFOINT17.setRXHALFIE(thebits : TBits_1); inline;
  78314. begin
  78315. if thebits = 0 then
  78316. pTDefRegMap(@Self)^.clr := $00020000
  78317. else
  78318. pTDefRegMap(@Self)^.&set := $00020000;
  78319. end;
  78320. function TCAN1_C1FIFOINT17.getRXHALFIE : TBits_1; inline;
  78321. begin
  78322. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  78323. end;
  78324. procedure TCAN1_C1FIFOINT17.setRXFULLIE; inline;
  78325. begin
  78326. pTDefRegMap(@Self)^.&set := $00040000;
  78327. end;
  78328. procedure TCAN1_C1FIFOINT17.clearRXFULLIE; inline;
  78329. begin
  78330. pTDefRegMap(@Self)^.clr := $00040000;
  78331. end;
  78332. procedure TCAN1_C1FIFOINT17.setRXFULLIE(thebits : TBits_1); inline;
  78333. begin
  78334. if thebits = 0 then
  78335. pTDefRegMap(@Self)^.clr := $00040000
  78336. else
  78337. pTDefRegMap(@Self)^.&set := $00040000;
  78338. end;
  78339. function TCAN1_C1FIFOINT17.getRXFULLIE : TBits_1; inline;
  78340. begin
  78341. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  78342. end;
  78343. procedure TCAN1_C1FIFOINT17.setRXOVFLIE; inline;
  78344. begin
  78345. pTDefRegMap(@Self)^.&set := $00080000;
  78346. end;
  78347. procedure TCAN1_C1FIFOINT17.clearRXOVFLIE; inline;
  78348. begin
  78349. pTDefRegMap(@Self)^.clr := $00080000;
  78350. end;
  78351. procedure TCAN1_C1FIFOINT17.setRXOVFLIE(thebits : TBits_1); inline;
  78352. begin
  78353. if thebits = 0 then
  78354. pTDefRegMap(@Self)^.clr := $00080000
  78355. else
  78356. pTDefRegMap(@Self)^.&set := $00080000;
  78357. end;
  78358. function TCAN1_C1FIFOINT17.getRXOVFLIE : TBits_1; inline;
  78359. begin
  78360. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  78361. end;
  78362. procedure TCAN1_C1FIFOINT17.setTXEMPTYIE; inline;
  78363. begin
  78364. pTDefRegMap(@Self)^.&set := $01000000;
  78365. end;
  78366. procedure TCAN1_C1FIFOINT17.clearTXEMPTYIE; inline;
  78367. begin
  78368. pTDefRegMap(@Self)^.clr := $01000000;
  78369. end;
  78370. procedure TCAN1_C1FIFOINT17.setTXEMPTYIE(thebits : TBits_1); inline;
  78371. begin
  78372. if thebits = 0 then
  78373. pTDefRegMap(@Self)^.clr := $01000000
  78374. else
  78375. pTDefRegMap(@Self)^.&set := $01000000;
  78376. end;
  78377. function TCAN1_C1FIFOINT17.getTXEMPTYIE : TBits_1; inline;
  78378. begin
  78379. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  78380. end;
  78381. procedure TCAN1_C1FIFOINT17.setTXHALFIE; inline;
  78382. begin
  78383. pTDefRegMap(@Self)^.&set := $02000000;
  78384. end;
  78385. procedure TCAN1_C1FIFOINT17.clearTXHALFIE; inline;
  78386. begin
  78387. pTDefRegMap(@Self)^.clr := $02000000;
  78388. end;
  78389. procedure TCAN1_C1FIFOINT17.setTXHALFIE(thebits : TBits_1); inline;
  78390. begin
  78391. if thebits = 0 then
  78392. pTDefRegMap(@Self)^.clr := $02000000
  78393. else
  78394. pTDefRegMap(@Self)^.&set := $02000000;
  78395. end;
  78396. function TCAN1_C1FIFOINT17.getTXHALFIE : TBits_1; inline;
  78397. begin
  78398. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  78399. end;
  78400. procedure TCAN1_C1FIFOINT17.setTXNFULLIE; inline;
  78401. begin
  78402. pTDefRegMap(@Self)^.&set := $04000000;
  78403. end;
  78404. procedure TCAN1_C1FIFOINT17.clearTXNFULLIE; inline;
  78405. begin
  78406. pTDefRegMap(@Self)^.clr := $04000000;
  78407. end;
  78408. procedure TCAN1_C1FIFOINT17.setTXNFULLIE(thebits : TBits_1); inline;
  78409. begin
  78410. if thebits = 0 then
  78411. pTDefRegMap(@Self)^.clr := $04000000
  78412. else
  78413. pTDefRegMap(@Self)^.&set := $04000000;
  78414. end;
  78415. function TCAN1_C1FIFOINT17.getTXNFULLIE : TBits_1; inline;
  78416. begin
  78417. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  78418. end;
  78419. procedure TCAN1_C1FIFOINT17.setw(thebits : TBits_32); inline;
  78420. begin
  78421. pTDefRegMap(@Self)^.val := thebits;
  78422. end;
  78423. function TCAN1_C1FIFOINT17.getw : TBits_32; inline;
  78424. begin
  78425. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78426. end;
  78427. procedure TCAN1_C1FIFOCI17.setCFIFOCI(thebits : TBits_5); inline;
  78428. begin
  78429. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  78430. end;
  78431. function TCAN1_C1FIFOCI17.getCFIFOCI : TBits_5; inline;
  78432. begin
  78433. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  78434. end;
  78435. procedure TCAN1_C1FIFOCI17.setw(thebits : TBits_32); inline;
  78436. begin
  78437. pTDefRegMap(@Self)^.val := thebits;
  78438. end;
  78439. function TCAN1_C1FIFOCI17.getw : TBits_32; inline;
  78440. begin
  78441. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78442. end;
  78443. procedure TCAN1_C1FIFOCON18.setTXPRI(thebits : TBits_2); inline;
  78444. begin
  78445. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  78446. end;
  78447. function TCAN1_C1FIFOCON18.getTXPRI : TBits_2; inline;
  78448. begin
  78449. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  78450. end;
  78451. procedure TCAN1_C1FIFOCON18.setRTREN; inline;
  78452. begin
  78453. pTDefRegMap(@Self)^.&set := $00000004;
  78454. end;
  78455. procedure TCAN1_C1FIFOCON18.clearRTREN; inline;
  78456. begin
  78457. pTDefRegMap(@Self)^.clr := $00000004;
  78458. end;
  78459. procedure TCAN1_C1FIFOCON18.setRTREN(thebits : TBits_1); inline;
  78460. begin
  78461. if thebits = 0 then
  78462. pTDefRegMap(@Self)^.clr := $00000004
  78463. else
  78464. pTDefRegMap(@Self)^.&set := $00000004;
  78465. end;
  78466. function TCAN1_C1FIFOCON18.getRTREN : TBits_1; inline;
  78467. begin
  78468. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78469. end;
  78470. procedure TCAN1_C1FIFOCON18.setTXREQ; inline;
  78471. begin
  78472. pTDefRegMap(@Self)^.&set := $00000008;
  78473. end;
  78474. procedure TCAN1_C1FIFOCON18.clearTXREQ; inline;
  78475. begin
  78476. pTDefRegMap(@Self)^.clr := $00000008;
  78477. end;
  78478. procedure TCAN1_C1FIFOCON18.setTXREQ(thebits : TBits_1); inline;
  78479. begin
  78480. if thebits = 0 then
  78481. pTDefRegMap(@Self)^.clr := $00000008
  78482. else
  78483. pTDefRegMap(@Self)^.&set := $00000008;
  78484. end;
  78485. function TCAN1_C1FIFOCON18.getTXREQ : TBits_1; inline;
  78486. begin
  78487. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78488. end;
  78489. procedure TCAN1_C1FIFOCON18.setTXERR; inline;
  78490. begin
  78491. pTDefRegMap(@Self)^.&set := $00000010;
  78492. end;
  78493. procedure TCAN1_C1FIFOCON18.clearTXERR; inline;
  78494. begin
  78495. pTDefRegMap(@Self)^.clr := $00000010;
  78496. end;
  78497. procedure TCAN1_C1FIFOCON18.setTXERR(thebits : TBits_1); inline;
  78498. begin
  78499. if thebits = 0 then
  78500. pTDefRegMap(@Self)^.clr := $00000010
  78501. else
  78502. pTDefRegMap(@Self)^.&set := $00000010;
  78503. end;
  78504. function TCAN1_C1FIFOCON18.getTXERR : TBits_1; inline;
  78505. begin
  78506. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  78507. end;
  78508. procedure TCAN1_C1FIFOCON18.setTXLARB; inline;
  78509. begin
  78510. pTDefRegMap(@Self)^.&set := $00000020;
  78511. end;
  78512. procedure TCAN1_C1FIFOCON18.clearTXLARB; inline;
  78513. begin
  78514. pTDefRegMap(@Self)^.clr := $00000020;
  78515. end;
  78516. procedure TCAN1_C1FIFOCON18.setTXLARB(thebits : TBits_1); inline;
  78517. begin
  78518. if thebits = 0 then
  78519. pTDefRegMap(@Self)^.clr := $00000020
  78520. else
  78521. pTDefRegMap(@Self)^.&set := $00000020;
  78522. end;
  78523. function TCAN1_C1FIFOCON18.getTXLARB : TBits_1; inline;
  78524. begin
  78525. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  78526. end;
  78527. procedure TCAN1_C1FIFOCON18.setTXABAT; inline;
  78528. begin
  78529. pTDefRegMap(@Self)^.&set := $00000040;
  78530. end;
  78531. procedure TCAN1_C1FIFOCON18.clearTXABAT; inline;
  78532. begin
  78533. pTDefRegMap(@Self)^.clr := $00000040;
  78534. end;
  78535. procedure TCAN1_C1FIFOCON18.setTXABAT(thebits : TBits_1); inline;
  78536. begin
  78537. if thebits = 0 then
  78538. pTDefRegMap(@Self)^.clr := $00000040
  78539. else
  78540. pTDefRegMap(@Self)^.&set := $00000040;
  78541. end;
  78542. function TCAN1_C1FIFOCON18.getTXABAT : TBits_1; inline;
  78543. begin
  78544. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  78545. end;
  78546. procedure TCAN1_C1FIFOCON18.setTXEN; inline;
  78547. begin
  78548. pTDefRegMap(@Self)^.&set := $00000080;
  78549. end;
  78550. procedure TCAN1_C1FIFOCON18.clearTXEN; inline;
  78551. begin
  78552. pTDefRegMap(@Self)^.clr := $00000080;
  78553. end;
  78554. procedure TCAN1_C1FIFOCON18.setTXEN(thebits : TBits_1); inline;
  78555. begin
  78556. if thebits = 0 then
  78557. pTDefRegMap(@Self)^.clr := $00000080
  78558. else
  78559. pTDefRegMap(@Self)^.&set := $00000080;
  78560. end;
  78561. function TCAN1_C1FIFOCON18.getTXEN : TBits_1; inline;
  78562. begin
  78563. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78564. end;
  78565. procedure TCAN1_C1FIFOCON18.setDONLY; inline;
  78566. begin
  78567. pTDefRegMap(@Self)^.&set := $00001000;
  78568. end;
  78569. procedure TCAN1_C1FIFOCON18.clearDONLY; inline;
  78570. begin
  78571. pTDefRegMap(@Self)^.clr := $00001000;
  78572. end;
  78573. procedure TCAN1_C1FIFOCON18.setDONLY(thebits : TBits_1); inline;
  78574. begin
  78575. if thebits = 0 then
  78576. pTDefRegMap(@Self)^.clr := $00001000
  78577. else
  78578. pTDefRegMap(@Self)^.&set := $00001000;
  78579. end;
  78580. function TCAN1_C1FIFOCON18.getDONLY : TBits_1; inline;
  78581. begin
  78582. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  78583. end;
  78584. procedure TCAN1_C1FIFOCON18.setUINC; inline;
  78585. begin
  78586. pTDefRegMap(@Self)^.&set := $00002000;
  78587. end;
  78588. procedure TCAN1_C1FIFOCON18.clearUINC; inline;
  78589. begin
  78590. pTDefRegMap(@Self)^.clr := $00002000;
  78591. end;
  78592. procedure TCAN1_C1FIFOCON18.setUINC(thebits : TBits_1); inline;
  78593. begin
  78594. if thebits = 0 then
  78595. pTDefRegMap(@Self)^.clr := $00002000
  78596. else
  78597. pTDefRegMap(@Self)^.&set := $00002000;
  78598. end;
  78599. function TCAN1_C1FIFOCON18.getUINC : TBits_1; inline;
  78600. begin
  78601. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  78602. end;
  78603. procedure TCAN1_C1FIFOCON18.setFRESET; inline;
  78604. begin
  78605. pTDefRegMap(@Self)^.&set := $00004000;
  78606. end;
  78607. procedure TCAN1_C1FIFOCON18.clearFRESET; inline;
  78608. begin
  78609. pTDefRegMap(@Self)^.clr := $00004000;
  78610. end;
  78611. procedure TCAN1_C1FIFOCON18.setFRESET(thebits : TBits_1); inline;
  78612. begin
  78613. if thebits = 0 then
  78614. pTDefRegMap(@Self)^.clr := $00004000
  78615. else
  78616. pTDefRegMap(@Self)^.&set := $00004000;
  78617. end;
  78618. function TCAN1_C1FIFOCON18.getFRESET : TBits_1; inline;
  78619. begin
  78620. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  78621. end;
  78622. procedure TCAN1_C1FIFOCON18.setFSIZE(thebits : TBits_5); inline;
  78623. begin
  78624. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78625. end;
  78626. function TCAN1_C1FIFOCON18.getFSIZE : TBits_5; inline;
  78627. begin
  78628. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78629. end;
  78630. procedure TCAN1_C1FIFOCON18.setw(thebits : TBits_32); inline;
  78631. begin
  78632. pTDefRegMap(@Self)^.val := thebits;
  78633. end;
  78634. function TCAN1_C1FIFOCON18.getw : TBits_32; inline;
  78635. begin
  78636. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78637. end;
  78638. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIF; inline;
  78639. begin
  78640. pTDefRegMap(@Self)^.&set := $00000001;
  78641. end;
  78642. procedure TCAN1_C1FIFOINT18.clearRXNEMPTYIF; inline;
  78643. begin
  78644. pTDefRegMap(@Self)^.clr := $00000001;
  78645. end;
  78646. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIF(thebits : TBits_1); inline;
  78647. begin
  78648. if thebits = 0 then
  78649. pTDefRegMap(@Self)^.clr := $00000001
  78650. else
  78651. pTDefRegMap(@Self)^.&set := $00000001;
  78652. end;
  78653. function TCAN1_C1FIFOINT18.getRXNEMPTYIF : TBits_1; inline;
  78654. begin
  78655. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  78656. end;
  78657. procedure TCAN1_C1FIFOINT18.setRXHALFIF; inline;
  78658. begin
  78659. pTDefRegMap(@Self)^.&set := $00000002;
  78660. end;
  78661. procedure TCAN1_C1FIFOINT18.clearRXHALFIF; inline;
  78662. begin
  78663. pTDefRegMap(@Self)^.clr := $00000002;
  78664. end;
  78665. procedure TCAN1_C1FIFOINT18.setRXHALFIF(thebits : TBits_1); inline;
  78666. begin
  78667. if thebits = 0 then
  78668. pTDefRegMap(@Self)^.clr := $00000002
  78669. else
  78670. pTDefRegMap(@Self)^.&set := $00000002;
  78671. end;
  78672. function TCAN1_C1FIFOINT18.getRXHALFIF : TBits_1; inline;
  78673. begin
  78674. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  78675. end;
  78676. procedure TCAN1_C1FIFOINT18.setRXFULLIF; inline;
  78677. begin
  78678. pTDefRegMap(@Self)^.&set := $00000004;
  78679. end;
  78680. procedure TCAN1_C1FIFOINT18.clearRXFULLIF; inline;
  78681. begin
  78682. pTDefRegMap(@Self)^.clr := $00000004;
  78683. end;
  78684. procedure TCAN1_C1FIFOINT18.setRXFULLIF(thebits : TBits_1); inline;
  78685. begin
  78686. if thebits = 0 then
  78687. pTDefRegMap(@Self)^.clr := $00000004
  78688. else
  78689. pTDefRegMap(@Self)^.&set := $00000004;
  78690. end;
  78691. function TCAN1_C1FIFOINT18.getRXFULLIF : TBits_1; inline;
  78692. begin
  78693. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78694. end;
  78695. procedure TCAN1_C1FIFOINT18.setRXOVFLIF; inline;
  78696. begin
  78697. pTDefRegMap(@Self)^.&set := $00000008;
  78698. end;
  78699. procedure TCAN1_C1FIFOINT18.clearRXOVFLIF; inline;
  78700. begin
  78701. pTDefRegMap(@Self)^.clr := $00000008;
  78702. end;
  78703. procedure TCAN1_C1FIFOINT18.setRXOVFLIF(thebits : TBits_1); inline;
  78704. begin
  78705. if thebits = 0 then
  78706. pTDefRegMap(@Self)^.clr := $00000008
  78707. else
  78708. pTDefRegMap(@Self)^.&set := $00000008;
  78709. end;
  78710. function TCAN1_C1FIFOINT18.getRXOVFLIF : TBits_1; inline;
  78711. begin
  78712. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78713. end;
  78714. procedure TCAN1_C1FIFOINT18.setTXEMPTYIF; inline;
  78715. begin
  78716. pTDefRegMap(@Self)^.&set := $00000100;
  78717. end;
  78718. procedure TCAN1_C1FIFOINT18.clearTXEMPTYIF; inline;
  78719. begin
  78720. pTDefRegMap(@Self)^.clr := $00000100;
  78721. end;
  78722. procedure TCAN1_C1FIFOINT18.setTXEMPTYIF(thebits : TBits_1); inline;
  78723. begin
  78724. if thebits = 0 then
  78725. pTDefRegMap(@Self)^.clr := $00000100
  78726. else
  78727. pTDefRegMap(@Self)^.&set := $00000100;
  78728. end;
  78729. function TCAN1_C1FIFOINT18.getTXEMPTYIF : TBits_1; inline;
  78730. begin
  78731. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  78732. end;
  78733. procedure TCAN1_C1FIFOINT18.setTXHALFIF; inline;
  78734. begin
  78735. pTDefRegMap(@Self)^.&set := $00000200;
  78736. end;
  78737. procedure TCAN1_C1FIFOINT18.clearTXHALFIF; inline;
  78738. begin
  78739. pTDefRegMap(@Self)^.clr := $00000200;
  78740. end;
  78741. procedure TCAN1_C1FIFOINT18.setTXHALFIF(thebits : TBits_1); inline;
  78742. begin
  78743. if thebits = 0 then
  78744. pTDefRegMap(@Self)^.clr := $00000200
  78745. else
  78746. pTDefRegMap(@Self)^.&set := $00000200;
  78747. end;
  78748. function TCAN1_C1FIFOINT18.getTXHALFIF : TBits_1; inline;
  78749. begin
  78750. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  78751. end;
  78752. procedure TCAN1_C1FIFOINT18.setTXNFULLIF; inline;
  78753. begin
  78754. pTDefRegMap(@Self)^.&set := $00000400;
  78755. end;
  78756. procedure TCAN1_C1FIFOINT18.clearTXNFULLIF; inline;
  78757. begin
  78758. pTDefRegMap(@Self)^.clr := $00000400;
  78759. end;
  78760. procedure TCAN1_C1FIFOINT18.setTXNFULLIF(thebits : TBits_1); inline;
  78761. begin
  78762. if thebits = 0 then
  78763. pTDefRegMap(@Self)^.clr := $00000400
  78764. else
  78765. pTDefRegMap(@Self)^.&set := $00000400;
  78766. end;
  78767. function TCAN1_C1FIFOINT18.getTXNFULLIF : TBits_1; inline;
  78768. begin
  78769. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  78770. end;
  78771. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIE; inline;
  78772. begin
  78773. pTDefRegMap(@Self)^.&set := $00010000;
  78774. end;
  78775. procedure TCAN1_C1FIFOINT18.clearRXNEMPTYIE; inline;
  78776. begin
  78777. pTDefRegMap(@Self)^.clr := $00010000;
  78778. end;
  78779. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIE(thebits : TBits_1); inline;
  78780. begin
  78781. if thebits = 0 then
  78782. pTDefRegMap(@Self)^.clr := $00010000
  78783. else
  78784. pTDefRegMap(@Self)^.&set := $00010000;
  78785. end;
  78786. function TCAN1_C1FIFOINT18.getRXNEMPTYIE : TBits_1; inline;
  78787. begin
  78788. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  78789. end;
  78790. procedure TCAN1_C1FIFOINT18.setRXHALFIE; inline;
  78791. begin
  78792. pTDefRegMap(@Self)^.&set := $00020000;
  78793. end;
  78794. procedure TCAN1_C1FIFOINT18.clearRXHALFIE; inline;
  78795. begin
  78796. pTDefRegMap(@Self)^.clr := $00020000;
  78797. end;
  78798. procedure TCAN1_C1FIFOINT18.setRXHALFIE(thebits : TBits_1); inline;
  78799. begin
  78800. if thebits = 0 then
  78801. pTDefRegMap(@Self)^.clr := $00020000
  78802. else
  78803. pTDefRegMap(@Self)^.&set := $00020000;
  78804. end;
  78805. function TCAN1_C1FIFOINT18.getRXHALFIE : TBits_1; inline;
  78806. begin
  78807. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  78808. end;
  78809. procedure TCAN1_C1FIFOINT18.setRXFULLIE; inline;
  78810. begin
  78811. pTDefRegMap(@Self)^.&set := $00040000;
  78812. end;
  78813. procedure TCAN1_C1FIFOINT18.clearRXFULLIE; inline;
  78814. begin
  78815. pTDefRegMap(@Self)^.clr := $00040000;
  78816. end;
  78817. procedure TCAN1_C1FIFOINT18.setRXFULLIE(thebits : TBits_1); inline;
  78818. begin
  78819. if thebits = 0 then
  78820. pTDefRegMap(@Self)^.clr := $00040000
  78821. else
  78822. pTDefRegMap(@Self)^.&set := $00040000;
  78823. end;
  78824. function TCAN1_C1FIFOINT18.getRXFULLIE : TBits_1; inline;
  78825. begin
  78826. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  78827. end;
  78828. procedure TCAN1_C1FIFOINT18.setRXOVFLIE; inline;
  78829. begin
  78830. pTDefRegMap(@Self)^.&set := $00080000;
  78831. end;
  78832. procedure TCAN1_C1FIFOINT18.clearRXOVFLIE; inline;
  78833. begin
  78834. pTDefRegMap(@Self)^.clr := $00080000;
  78835. end;
  78836. procedure TCAN1_C1FIFOINT18.setRXOVFLIE(thebits : TBits_1); inline;
  78837. begin
  78838. if thebits = 0 then
  78839. pTDefRegMap(@Self)^.clr := $00080000
  78840. else
  78841. pTDefRegMap(@Self)^.&set := $00080000;
  78842. end;
  78843. function TCAN1_C1FIFOINT18.getRXOVFLIE : TBits_1; inline;
  78844. begin
  78845. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  78846. end;
  78847. procedure TCAN1_C1FIFOINT18.setTXEMPTYIE; inline;
  78848. begin
  78849. pTDefRegMap(@Self)^.&set := $01000000;
  78850. end;
  78851. procedure TCAN1_C1FIFOINT18.clearTXEMPTYIE; inline;
  78852. begin
  78853. pTDefRegMap(@Self)^.clr := $01000000;
  78854. end;
  78855. procedure TCAN1_C1FIFOINT18.setTXEMPTYIE(thebits : TBits_1); inline;
  78856. begin
  78857. if thebits = 0 then
  78858. pTDefRegMap(@Self)^.clr := $01000000
  78859. else
  78860. pTDefRegMap(@Self)^.&set := $01000000;
  78861. end;
  78862. function TCAN1_C1FIFOINT18.getTXEMPTYIE : TBits_1; inline;
  78863. begin
  78864. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  78865. end;
  78866. procedure TCAN1_C1FIFOINT18.setTXHALFIE; inline;
  78867. begin
  78868. pTDefRegMap(@Self)^.&set := $02000000;
  78869. end;
  78870. procedure TCAN1_C1FIFOINT18.clearTXHALFIE; inline;
  78871. begin
  78872. pTDefRegMap(@Self)^.clr := $02000000;
  78873. end;
  78874. procedure TCAN1_C1FIFOINT18.setTXHALFIE(thebits : TBits_1); inline;
  78875. begin
  78876. if thebits = 0 then
  78877. pTDefRegMap(@Self)^.clr := $02000000
  78878. else
  78879. pTDefRegMap(@Self)^.&set := $02000000;
  78880. end;
  78881. function TCAN1_C1FIFOINT18.getTXHALFIE : TBits_1; inline;
  78882. begin
  78883. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  78884. end;
  78885. procedure TCAN1_C1FIFOINT18.setTXNFULLIE; inline;
  78886. begin
  78887. pTDefRegMap(@Self)^.&set := $04000000;
  78888. end;
  78889. procedure TCAN1_C1FIFOINT18.clearTXNFULLIE; inline;
  78890. begin
  78891. pTDefRegMap(@Self)^.clr := $04000000;
  78892. end;
  78893. procedure TCAN1_C1FIFOINT18.setTXNFULLIE(thebits : TBits_1); inline;
  78894. begin
  78895. if thebits = 0 then
  78896. pTDefRegMap(@Self)^.clr := $04000000
  78897. else
  78898. pTDefRegMap(@Self)^.&set := $04000000;
  78899. end;
  78900. function TCAN1_C1FIFOINT18.getTXNFULLIE : TBits_1; inline;
  78901. begin
  78902. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  78903. end;
  78904. procedure TCAN1_C1FIFOINT18.setw(thebits : TBits_32); inline;
  78905. begin
  78906. pTDefRegMap(@Self)^.val := thebits;
  78907. end;
  78908. function TCAN1_C1FIFOINT18.getw : TBits_32; inline;
  78909. begin
  78910. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78911. end;
  78912. procedure TCAN1_C1FIFOCI18.setCFIFOCI(thebits : TBits_5); inline;
  78913. begin
  78914. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  78915. end;
  78916. function TCAN1_C1FIFOCI18.getCFIFOCI : TBits_5; inline;
  78917. begin
  78918. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  78919. end;
  78920. procedure TCAN1_C1FIFOCI18.setw(thebits : TBits_32); inline;
  78921. begin
  78922. pTDefRegMap(@Self)^.val := thebits;
  78923. end;
  78924. function TCAN1_C1FIFOCI18.getw : TBits_32; inline;
  78925. begin
  78926. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78927. end;
  78928. procedure TCAN1_C1FIFOCON19.setTXPRI(thebits : TBits_2); inline;
  78929. begin
  78930. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  78931. end;
  78932. function TCAN1_C1FIFOCON19.getTXPRI : TBits_2; inline;
  78933. begin
  78934. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  78935. end;
  78936. procedure TCAN1_C1FIFOCON19.setRTREN; inline;
  78937. begin
  78938. pTDefRegMap(@Self)^.&set := $00000004;
  78939. end;
  78940. procedure TCAN1_C1FIFOCON19.clearRTREN; inline;
  78941. begin
  78942. pTDefRegMap(@Self)^.clr := $00000004;
  78943. end;
  78944. procedure TCAN1_C1FIFOCON19.setRTREN(thebits : TBits_1); inline;
  78945. begin
  78946. if thebits = 0 then
  78947. pTDefRegMap(@Self)^.clr := $00000004
  78948. else
  78949. pTDefRegMap(@Self)^.&set := $00000004;
  78950. end;
  78951. function TCAN1_C1FIFOCON19.getRTREN : TBits_1; inline;
  78952. begin
  78953. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78954. end;
  78955. procedure TCAN1_C1FIFOCON19.setTXREQ; inline;
  78956. begin
  78957. pTDefRegMap(@Self)^.&set := $00000008;
  78958. end;
  78959. procedure TCAN1_C1FIFOCON19.clearTXREQ; inline;
  78960. begin
  78961. pTDefRegMap(@Self)^.clr := $00000008;
  78962. end;
  78963. procedure TCAN1_C1FIFOCON19.setTXREQ(thebits : TBits_1); inline;
  78964. begin
  78965. if thebits = 0 then
  78966. pTDefRegMap(@Self)^.clr := $00000008
  78967. else
  78968. pTDefRegMap(@Self)^.&set := $00000008;
  78969. end;
  78970. function TCAN1_C1FIFOCON19.getTXREQ : TBits_1; inline;
  78971. begin
  78972. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78973. end;
  78974. procedure TCAN1_C1FIFOCON19.setTXERR; inline;
  78975. begin
  78976. pTDefRegMap(@Self)^.&set := $00000010;
  78977. end;
  78978. procedure TCAN1_C1FIFOCON19.clearTXERR; inline;
  78979. begin
  78980. pTDefRegMap(@Self)^.clr := $00000010;
  78981. end;
  78982. procedure TCAN1_C1FIFOCON19.setTXERR(thebits : TBits_1); inline;
  78983. begin
  78984. if thebits = 0 then
  78985. pTDefRegMap(@Self)^.clr := $00000010
  78986. else
  78987. pTDefRegMap(@Self)^.&set := $00000010;
  78988. end;
  78989. function TCAN1_C1FIFOCON19.getTXERR : TBits_1; inline;
  78990. begin
  78991. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  78992. end;
  78993. procedure TCAN1_C1FIFOCON19.setTXLARB; inline;
  78994. begin
  78995. pTDefRegMap(@Self)^.&set := $00000020;
  78996. end;
  78997. procedure TCAN1_C1FIFOCON19.clearTXLARB; inline;
  78998. begin
  78999. pTDefRegMap(@Self)^.clr := $00000020;
  79000. end;
  79001. procedure TCAN1_C1FIFOCON19.setTXLARB(thebits : TBits_1); inline;
  79002. begin
  79003. if thebits = 0 then
  79004. pTDefRegMap(@Self)^.clr := $00000020
  79005. else
  79006. pTDefRegMap(@Self)^.&set := $00000020;
  79007. end;
  79008. function TCAN1_C1FIFOCON19.getTXLARB : TBits_1; inline;
  79009. begin
  79010. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  79011. end;
  79012. procedure TCAN1_C1FIFOCON19.setTXABAT; inline;
  79013. begin
  79014. pTDefRegMap(@Self)^.&set := $00000040;
  79015. end;
  79016. procedure TCAN1_C1FIFOCON19.clearTXABAT; inline;
  79017. begin
  79018. pTDefRegMap(@Self)^.clr := $00000040;
  79019. end;
  79020. procedure TCAN1_C1FIFOCON19.setTXABAT(thebits : TBits_1); inline;
  79021. begin
  79022. if thebits = 0 then
  79023. pTDefRegMap(@Self)^.clr := $00000040
  79024. else
  79025. pTDefRegMap(@Self)^.&set := $00000040;
  79026. end;
  79027. function TCAN1_C1FIFOCON19.getTXABAT : TBits_1; inline;
  79028. begin
  79029. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  79030. end;
  79031. procedure TCAN1_C1FIFOCON19.setTXEN; inline;
  79032. begin
  79033. pTDefRegMap(@Self)^.&set := $00000080;
  79034. end;
  79035. procedure TCAN1_C1FIFOCON19.clearTXEN; inline;
  79036. begin
  79037. pTDefRegMap(@Self)^.clr := $00000080;
  79038. end;
  79039. procedure TCAN1_C1FIFOCON19.setTXEN(thebits : TBits_1); inline;
  79040. begin
  79041. if thebits = 0 then
  79042. pTDefRegMap(@Self)^.clr := $00000080
  79043. else
  79044. pTDefRegMap(@Self)^.&set := $00000080;
  79045. end;
  79046. function TCAN1_C1FIFOCON19.getTXEN : TBits_1; inline;
  79047. begin
  79048. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  79049. end;
  79050. procedure TCAN1_C1FIFOCON19.setDONLY; inline;
  79051. begin
  79052. pTDefRegMap(@Self)^.&set := $00001000;
  79053. end;
  79054. procedure TCAN1_C1FIFOCON19.clearDONLY; inline;
  79055. begin
  79056. pTDefRegMap(@Self)^.clr := $00001000;
  79057. end;
  79058. procedure TCAN1_C1FIFOCON19.setDONLY(thebits : TBits_1); inline;
  79059. begin
  79060. if thebits = 0 then
  79061. pTDefRegMap(@Self)^.clr := $00001000
  79062. else
  79063. pTDefRegMap(@Self)^.&set := $00001000;
  79064. end;
  79065. function TCAN1_C1FIFOCON19.getDONLY : TBits_1; inline;
  79066. begin
  79067. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  79068. end;
  79069. procedure TCAN1_C1FIFOCON19.setUINC; inline;
  79070. begin
  79071. pTDefRegMap(@Self)^.&set := $00002000;
  79072. end;
  79073. procedure TCAN1_C1FIFOCON19.clearUINC; inline;
  79074. begin
  79075. pTDefRegMap(@Self)^.clr := $00002000;
  79076. end;
  79077. procedure TCAN1_C1FIFOCON19.setUINC(thebits : TBits_1); inline;
  79078. begin
  79079. if thebits = 0 then
  79080. pTDefRegMap(@Self)^.clr := $00002000
  79081. else
  79082. pTDefRegMap(@Self)^.&set := $00002000;
  79083. end;
  79084. function TCAN1_C1FIFOCON19.getUINC : TBits_1; inline;
  79085. begin
  79086. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  79087. end;
  79088. procedure TCAN1_C1FIFOCON19.setFRESET; inline;
  79089. begin
  79090. pTDefRegMap(@Self)^.&set := $00004000;
  79091. end;
  79092. procedure TCAN1_C1FIFOCON19.clearFRESET; inline;
  79093. begin
  79094. pTDefRegMap(@Self)^.clr := $00004000;
  79095. end;
  79096. procedure TCAN1_C1FIFOCON19.setFRESET(thebits : TBits_1); inline;
  79097. begin
  79098. if thebits = 0 then
  79099. pTDefRegMap(@Self)^.clr := $00004000
  79100. else
  79101. pTDefRegMap(@Self)^.&set := $00004000;
  79102. end;
  79103. function TCAN1_C1FIFOCON19.getFRESET : TBits_1; inline;
  79104. begin
  79105. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  79106. end;
  79107. procedure TCAN1_C1FIFOCON19.setFSIZE(thebits : TBits_5); inline;
  79108. begin
  79109. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  79110. end;
  79111. function TCAN1_C1FIFOCON19.getFSIZE : TBits_5; inline;
  79112. begin
  79113. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  79114. end;
  79115. procedure TCAN1_C1FIFOCON19.setw(thebits : TBits_32); inline;
  79116. begin
  79117. pTDefRegMap(@Self)^.val := thebits;
  79118. end;
  79119. function TCAN1_C1FIFOCON19.getw : TBits_32; inline;
  79120. begin
  79121. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79122. end;
  79123. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIF; inline;
  79124. begin
  79125. pTDefRegMap(@Self)^.&set := $00000001;
  79126. end;
  79127. procedure TCAN1_C1FIFOINT19.clearRXNEMPTYIF; inline;
  79128. begin
  79129. pTDefRegMap(@Self)^.clr := $00000001;
  79130. end;
  79131. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIF(thebits : TBits_1); inline;
  79132. begin
  79133. if thebits = 0 then
  79134. pTDefRegMap(@Self)^.clr := $00000001
  79135. else
  79136. pTDefRegMap(@Self)^.&set := $00000001;
  79137. end;
  79138. function TCAN1_C1FIFOINT19.getRXNEMPTYIF : TBits_1; inline;
  79139. begin
  79140. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  79141. end;
  79142. procedure TCAN1_C1FIFOINT19.setRXHALFIF; inline;
  79143. begin
  79144. pTDefRegMap(@Self)^.&set := $00000002;
  79145. end;
  79146. procedure TCAN1_C1FIFOINT19.clearRXHALFIF; inline;
  79147. begin
  79148. pTDefRegMap(@Self)^.clr := $00000002;
  79149. end;
  79150. procedure TCAN1_C1FIFOINT19.setRXHALFIF(thebits : TBits_1); inline;
  79151. begin
  79152. if thebits = 0 then
  79153. pTDefRegMap(@Self)^.clr := $00000002
  79154. else
  79155. pTDefRegMap(@Self)^.&set := $00000002;
  79156. end;
  79157. function TCAN1_C1FIFOINT19.getRXHALFIF : TBits_1; inline;
  79158. begin
  79159. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  79160. end;
  79161. procedure TCAN1_C1FIFOINT19.setRXFULLIF; inline;
  79162. begin
  79163. pTDefRegMap(@Self)^.&set := $00000004;
  79164. end;
  79165. procedure TCAN1_C1FIFOINT19.clearRXFULLIF; inline;
  79166. begin
  79167. pTDefRegMap(@Self)^.clr := $00000004;
  79168. end;
  79169. procedure TCAN1_C1FIFOINT19.setRXFULLIF(thebits : TBits_1); inline;
  79170. begin
  79171. if thebits = 0 then
  79172. pTDefRegMap(@Self)^.clr := $00000004
  79173. else
  79174. pTDefRegMap(@Self)^.&set := $00000004;
  79175. end;
  79176. function TCAN1_C1FIFOINT19.getRXFULLIF : TBits_1; inline;
  79177. begin
  79178. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79179. end;
  79180. procedure TCAN1_C1FIFOINT19.setRXOVFLIF; inline;
  79181. begin
  79182. pTDefRegMap(@Self)^.&set := $00000008;
  79183. end;
  79184. procedure TCAN1_C1FIFOINT19.clearRXOVFLIF; inline;
  79185. begin
  79186. pTDefRegMap(@Self)^.clr := $00000008;
  79187. end;
  79188. procedure TCAN1_C1FIFOINT19.setRXOVFLIF(thebits : TBits_1); inline;
  79189. begin
  79190. if thebits = 0 then
  79191. pTDefRegMap(@Self)^.clr := $00000008
  79192. else
  79193. pTDefRegMap(@Self)^.&set := $00000008;
  79194. end;
  79195. function TCAN1_C1FIFOINT19.getRXOVFLIF : TBits_1; inline;
  79196. begin
  79197. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79198. end;
  79199. procedure TCAN1_C1FIFOINT19.setTXEMPTYIF; inline;
  79200. begin
  79201. pTDefRegMap(@Self)^.&set := $00000100;
  79202. end;
  79203. procedure TCAN1_C1FIFOINT19.clearTXEMPTYIF; inline;
  79204. begin
  79205. pTDefRegMap(@Self)^.clr := $00000100;
  79206. end;
  79207. procedure TCAN1_C1FIFOINT19.setTXEMPTYIF(thebits : TBits_1); inline;
  79208. begin
  79209. if thebits = 0 then
  79210. pTDefRegMap(@Self)^.clr := $00000100
  79211. else
  79212. pTDefRegMap(@Self)^.&set := $00000100;
  79213. end;
  79214. function TCAN1_C1FIFOINT19.getTXEMPTYIF : TBits_1; inline;
  79215. begin
  79216. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  79217. end;
  79218. procedure TCAN1_C1FIFOINT19.setTXHALFIF; inline;
  79219. begin
  79220. pTDefRegMap(@Self)^.&set := $00000200;
  79221. end;
  79222. procedure TCAN1_C1FIFOINT19.clearTXHALFIF; inline;
  79223. begin
  79224. pTDefRegMap(@Self)^.clr := $00000200;
  79225. end;
  79226. procedure TCAN1_C1FIFOINT19.setTXHALFIF(thebits : TBits_1); inline;
  79227. begin
  79228. if thebits = 0 then
  79229. pTDefRegMap(@Self)^.clr := $00000200
  79230. else
  79231. pTDefRegMap(@Self)^.&set := $00000200;
  79232. end;
  79233. function TCAN1_C1FIFOINT19.getTXHALFIF : TBits_1; inline;
  79234. begin
  79235. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  79236. end;
  79237. procedure TCAN1_C1FIFOINT19.setTXNFULLIF; inline;
  79238. begin
  79239. pTDefRegMap(@Self)^.&set := $00000400;
  79240. end;
  79241. procedure TCAN1_C1FIFOINT19.clearTXNFULLIF; inline;
  79242. begin
  79243. pTDefRegMap(@Self)^.clr := $00000400;
  79244. end;
  79245. procedure TCAN1_C1FIFOINT19.setTXNFULLIF(thebits : TBits_1); inline;
  79246. begin
  79247. if thebits = 0 then
  79248. pTDefRegMap(@Self)^.clr := $00000400
  79249. else
  79250. pTDefRegMap(@Self)^.&set := $00000400;
  79251. end;
  79252. function TCAN1_C1FIFOINT19.getTXNFULLIF : TBits_1; inline;
  79253. begin
  79254. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  79255. end;
  79256. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIE; inline;
  79257. begin
  79258. pTDefRegMap(@Self)^.&set := $00010000;
  79259. end;
  79260. procedure TCAN1_C1FIFOINT19.clearRXNEMPTYIE; inline;
  79261. begin
  79262. pTDefRegMap(@Self)^.clr := $00010000;
  79263. end;
  79264. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIE(thebits : TBits_1); inline;
  79265. begin
  79266. if thebits = 0 then
  79267. pTDefRegMap(@Self)^.clr := $00010000
  79268. else
  79269. pTDefRegMap(@Self)^.&set := $00010000;
  79270. end;
  79271. function TCAN1_C1FIFOINT19.getRXNEMPTYIE : TBits_1; inline;
  79272. begin
  79273. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  79274. end;
  79275. procedure TCAN1_C1FIFOINT19.setRXHALFIE; inline;
  79276. begin
  79277. pTDefRegMap(@Self)^.&set := $00020000;
  79278. end;
  79279. procedure TCAN1_C1FIFOINT19.clearRXHALFIE; inline;
  79280. begin
  79281. pTDefRegMap(@Self)^.clr := $00020000;
  79282. end;
  79283. procedure TCAN1_C1FIFOINT19.setRXHALFIE(thebits : TBits_1); inline;
  79284. begin
  79285. if thebits = 0 then
  79286. pTDefRegMap(@Self)^.clr := $00020000
  79287. else
  79288. pTDefRegMap(@Self)^.&set := $00020000;
  79289. end;
  79290. function TCAN1_C1FIFOINT19.getRXHALFIE : TBits_1; inline;
  79291. begin
  79292. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  79293. end;
  79294. procedure TCAN1_C1FIFOINT19.setRXFULLIE; inline;
  79295. begin
  79296. pTDefRegMap(@Self)^.&set := $00040000;
  79297. end;
  79298. procedure TCAN1_C1FIFOINT19.clearRXFULLIE; inline;
  79299. begin
  79300. pTDefRegMap(@Self)^.clr := $00040000;
  79301. end;
  79302. procedure TCAN1_C1FIFOINT19.setRXFULLIE(thebits : TBits_1); inline;
  79303. begin
  79304. if thebits = 0 then
  79305. pTDefRegMap(@Self)^.clr := $00040000
  79306. else
  79307. pTDefRegMap(@Self)^.&set := $00040000;
  79308. end;
  79309. function TCAN1_C1FIFOINT19.getRXFULLIE : TBits_1; inline;
  79310. begin
  79311. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  79312. end;
  79313. procedure TCAN1_C1FIFOINT19.setRXOVFLIE; inline;
  79314. begin
  79315. pTDefRegMap(@Self)^.&set := $00080000;
  79316. end;
  79317. procedure TCAN1_C1FIFOINT19.clearRXOVFLIE; inline;
  79318. begin
  79319. pTDefRegMap(@Self)^.clr := $00080000;
  79320. end;
  79321. procedure TCAN1_C1FIFOINT19.setRXOVFLIE(thebits : TBits_1); inline;
  79322. begin
  79323. if thebits = 0 then
  79324. pTDefRegMap(@Self)^.clr := $00080000
  79325. else
  79326. pTDefRegMap(@Self)^.&set := $00080000;
  79327. end;
  79328. function TCAN1_C1FIFOINT19.getRXOVFLIE : TBits_1; inline;
  79329. begin
  79330. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79331. end;
  79332. procedure TCAN1_C1FIFOINT19.setTXEMPTYIE; inline;
  79333. begin
  79334. pTDefRegMap(@Self)^.&set := $01000000;
  79335. end;
  79336. procedure TCAN1_C1FIFOINT19.clearTXEMPTYIE; inline;
  79337. begin
  79338. pTDefRegMap(@Self)^.clr := $01000000;
  79339. end;
  79340. procedure TCAN1_C1FIFOINT19.setTXEMPTYIE(thebits : TBits_1); inline;
  79341. begin
  79342. if thebits = 0 then
  79343. pTDefRegMap(@Self)^.clr := $01000000
  79344. else
  79345. pTDefRegMap(@Self)^.&set := $01000000;
  79346. end;
  79347. function TCAN1_C1FIFOINT19.getTXEMPTYIE : TBits_1; inline;
  79348. begin
  79349. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  79350. end;
  79351. procedure TCAN1_C1FIFOINT19.setTXHALFIE; inline;
  79352. begin
  79353. pTDefRegMap(@Self)^.&set := $02000000;
  79354. end;
  79355. procedure TCAN1_C1FIFOINT19.clearTXHALFIE; inline;
  79356. begin
  79357. pTDefRegMap(@Self)^.clr := $02000000;
  79358. end;
  79359. procedure TCAN1_C1FIFOINT19.setTXHALFIE(thebits : TBits_1); inline;
  79360. begin
  79361. if thebits = 0 then
  79362. pTDefRegMap(@Self)^.clr := $02000000
  79363. else
  79364. pTDefRegMap(@Self)^.&set := $02000000;
  79365. end;
  79366. function TCAN1_C1FIFOINT19.getTXHALFIE : TBits_1; inline;
  79367. begin
  79368. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  79369. end;
  79370. procedure TCAN1_C1FIFOINT19.setTXNFULLIE; inline;
  79371. begin
  79372. pTDefRegMap(@Self)^.&set := $04000000;
  79373. end;
  79374. procedure TCAN1_C1FIFOINT19.clearTXNFULLIE; inline;
  79375. begin
  79376. pTDefRegMap(@Self)^.clr := $04000000;
  79377. end;
  79378. procedure TCAN1_C1FIFOINT19.setTXNFULLIE(thebits : TBits_1); inline;
  79379. begin
  79380. if thebits = 0 then
  79381. pTDefRegMap(@Self)^.clr := $04000000
  79382. else
  79383. pTDefRegMap(@Self)^.&set := $04000000;
  79384. end;
  79385. function TCAN1_C1FIFOINT19.getTXNFULLIE : TBits_1; inline;
  79386. begin
  79387. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  79388. end;
  79389. procedure TCAN1_C1FIFOINT19.setw(thebits : TBits_32); inline;
  79390. begin
  79391. pTDefRegMap(@Self)^.val := thebits;
  79392. end;
  79393. function TCAN1_C1FIFOINT19.getw : TBits_32; inline;
  79394. begin
  79395. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79396. end;
  79397. procedure TCAN1_C1FIFOCI19.setCFIFOCI(thebits : TBits_5); inline;
  79398. begin
  79399. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  79400. end;
  79401. function TCAN1_C1FIFOCI19.getCFIFOCI : TBits_5; inline;
  79402. begin
  79403. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  79404. end;
  79405. procedure TCAN1_C1FIFOCI19.setw(thebits : TBits_32); inline;
  79406. begin
  79407. pTDefRegMap(@Self)^.val := thebits;
  79408. end;
  79409. function TCAN1_C1FIFOCI19.getw : TBits_32; inline;
  79410. begin
  79411. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79412. end;
  79413. procedure TCAN1_C1FIFOCON20.setTXPRI(thebits : TBits_2); inline;
  79414. begin
  79415. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  79416. end;
  79417. function TCAN1_C1FIFOCON20.getTXPRI : TBits_2; inline;
  79418. begin
  79419. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  79420. end;
  79421. procedure TCAN1_C1FIFOCON20.setRTREN; inline;
  79422. begin
  79423. pTDefRegMap(@Self)^.&set := $00000004;
  79424. end;
  79425. procedure TCAN1_C1FIFOCON20.clearRTREN; inline;
  79426. begin
  79427. pTDefRegMap(@Self)^.clr := $00000004;
  79428. end;
  79429. procedure TCAN1_C1FIFOCON20.setRTREN(thebits : TBits_1); inline;
  79430. begin
  79431. if thebits = 0 then
  79432. pTDefRegMap(@Self)^.clr := $00000004
  79433. else
  79434. pTDefRegMap(@Self)^.&set := $00000004;
  79435. end;
  79436. function TCAN1_C1FIFOCON20.getRTREN : TBits_1; inline;
  79437. begin
  79438. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79439. end;
  79440. procedure TCAN1_C1FIFOCON20.setTXREQ; inline;
  79441. begin
  79442. pTDefRegMap(@Self)^.&set := $00000008;
  79443. end;
  79444. procedure TCAN1_C1FIFOCON20.clearTXREQ; inline;
  79445. begin
  79446. pTDefRegMap(@Self)^.clr := $00000008;
  79447. end;
  79448. procedure TCAN1_C1FIFOCON20.setTXREQ(thebits : TBits_1); inline;
  79449. begin
  79450. if thebits = 0 then
  79451. pTDefRegMap(@Self)^.clr := $00000008
  79452. else
  79453. pTDefRegMap(@Self)^.&set := $00000008;
  79454. end;
  79455. function TCAN1_C1FIFOCON20.getTXREQ : TBits_1; inline;
  79456. begin
  79457. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79458. end;
  79459. procedure TCAN1_C1FIFOCON20.setTXERR; inline;
  79460. begin
  79461. pTDefRegMap(@Self)^.&set := $00000010;
  79462. end;
  79463. procedure TCAN1_C1FIFOCON20.clearTXERR; inline;
  79464. begin
  79465. pTDefRegMap(@Self)^.clr := $00000010;
  79466. end;
  79467. procedure TCAN1_C1FIFOCON20.setTXERR(thebits : TBits_1); inline;
  79468. begin
  79469. if thebits = 0 then
  79470. pTDefRegMap(@Self)^.clr := $00000010
  79471. else
  79472. pTDefRegMap(@Self)^.&set := $00000010;
  79473. end;
  79474. function TCAN1_C1FIFOCON20.getTXERR : TBits_1; inline;
  79475. begin
  79476. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  79477. end;
  79478. procedure TCAN1_C1FIFOCON20.setTXLARB; inline;
  79479. begin
  79480. pTDefRegMap(@Self)^.&set := $00000020;
  79481. end;
  79482. procedure TCAN1_C1FIFOCON20.clearTXLARB; inline;
  79483. begin
  79484. pTDefRegMap(@Self)^.clr := $00000020;
  79485. end;
  79486. procedure TCAN1_C1FIFOCON20.setTXLARB(thebits : TBits_1); inline;
  79487. begin
  79488. if thebits = 0 then
  79489. pTDefRegMap(@Self)^.clr := $00000020
  79490. else
  79491. pTDefRegMap(@Self)^.&set := $00000020;
  79492. end;
  79493. function TCAN1_C1FIFOCON20.getTXLARB : TBits_1; inline;
  79494. begin
  79495. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  79496. end;
  79497. procedure TCAN1_C1FIFOCON20.setTXABAT; inline;
  79498. begin
  79499. pTDefRegMap(@Self)^.&set := $00000040;
  79500. end;
  79501. procedure TCAN1_C1FIFOCON20.clearTXABAT; inline;
  79502. begin
  79503. pTDefRegMap(@Self)^.clr := $00000040;
  79504. end;
  79505. procedure TCAN1_C1FIFOCON20.setTXABAT(thebits : TBits_1); inline;
  79506. begin
  79507. if thebits = 0 then
  79508. pTDefRegMap(@Self)^.clr := $00000040
  79509. else
  79510. pTDefRegMap(@Self)^.&set := $00000040;
  79511. end;
  79512. function TCAN1_C1FIFOCON20.getTXABAT : TBits_1; inline;
  79513. begin
  79514. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  79515. end;
  79516. procedure TCAN1_C1FIFOCON20.setTXEN; inline;
  79517. begin
  79518. pTDefRegMap(@Self)^.&set := $00000080;
  79519. end;
  79520. procedure TCAN1_C1FIFOCON20.clearTXEN; inline;
  79521. begin
  79522. pTDefRegMap(@Self)^.clr := $00000080;
  79523. end;
  79524. procedure TCAN1_C1FIFOCON20.setTXEN(thebits : TBits_1); inline;
  79525. begin
  79526. if thebits = 0 then
  79527. pTDefRegMap(@Self)^.clr := $00000080
  79528. else
  79529. pTDefRegMap(@Self)^.&set := $00000080;
  79530. end;
  79531. function TCAN1_C1FIFOCON20.getTXEN : TBits_1; inline;
  79532. begin
  79533. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  79534. end;
  79535. procedure TCAN1_C1FIFOCON20.setDONLY; inline;
  79536. begin
  79537. pTDefRegMap(@Self)^.&set := $00001000;
  79538. end;
  79539. procedure TCAN1_C1FIFOCON20.clearDONLY; inline;
  79540. begin
  79541. pTDefRegMap(@Self)^.clr := $00001000;
  79542. end;
  79543. procedure TCAN1_C1FIFOCON20.setDONLY(thebits : TBits_1); inline;
  79544. begin
  79545. if thebits = 0 then
  79546. pTDefRegMap(@Self)^.clr := $00001000
  79547. else
  79548. pTDefRegMap(@Self)^.&set := $00001000;
  79549. end;
  79550. function TCAN1_C1FIFOCON20.getDONLY : TBits_1; inline;
  79551. begin
  79552. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  79553. end;
  79554. procedure TCAN1_C1FIFOCON20.setUINC; inline;
  79555. begin
  79556. pTDefRegMap(@Self)^.&set := $00002000;
  79557. end;
  79558. procedure TCAN1_C1FIFOCON20.clearUINC; inline;
  79559. begin
  79560. pTDefRegMap(@Self)^.clr := $00002000;
  79561. end;
  79562. procedure TCAN1_C1FIFOCON20.setUINC(thebits : TBits_1); inline;
  79563. begin
  79564. if thebits = 0 then
  79565. pTDefRegMap(@Self)^.clr := $00002000
  79566. else
  79567. pTDefRegMap(@Self)^.&set := $00002000;
  79568. end;
  79569. function TCAN1_C1FIFOCON20.getUINC : TBits_1; inline;
  79570. begin
  79571. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  79572. end;
  79573. procedure TCAN1_C1FIFOCON20.setFRESET; inline;
  79574. begin
  79575. pTDefRegMap(@Self)^.&set := $00004000;
  79576. end;
  79577. procedure TCAN1_C1FIFOCON20.clearFRESET; inline;
  79578. begin
  79579. pTDefRegMap(@Self)^.clr := $00004000;
  79580. end;
  79581. procedure TCAN1_C1FIFOCON20.setFRESET(thebits : TBits_1); inline;
  79582. begin
  79583. if thebits = 0 then
  79584. pTDefRegMap(@Self)^.clr := $00004000
  79585. else
  79586. pTDefRegMap(@Self)^.&set := $00004000;
  79587. end;
  79588. function TCAN1_C1FIFOCON20.getFRESET : TBits_1; inline;
  79589. begin
  79590. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  79591. end;
  79592. procedure TCAN1_C1FIFOCON20.setFSIZE(thebits : TBits_5); inline;
  79593. begin
  79594. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  79595. end;
  79596. function TCAN1_C1FIFOCON20.getFSIZE : TBits_5; inline;
  79597. begin
  79598. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  79599. end;
  79600. procedure TCAN1_C1FIFOCON20.setw(thebits : TBits_32); inline;
  79601. begin
  79602. pTDefRegMap(@Self)^.val := thebits;
  79603. end;
  79604. function TCAN1_C1FIFOCON20.getw : TBits_32; inline;
  79605. begin
  79606. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79607. end;
  79608. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIF; inline;
  79609. begin
  79610. pTDefRegMap(@Self)^.&set := $00000001;
  79611. end;
  79612. procedure TCAN1_C1FIFOINT20.clearRXNEMPTYIF; inline;
  79613. begin
  79614. pTDefRegMap(@Self)^.clr := $00000001;
  79615. end;
  79616. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIF(thebits : TBits_1); inline;
  79617. begin
  79618. if thebits = 0 then
  79619. pTDefRegMap(@Self)^.clr := $00000001
  79620. else
  79621. pTDefRegMap(@Self)^.&set := $00000001;
  79622. end;
  79623. function TCAN1_C1FIFOINT20.getRXNEMPTYIF : TBits_1; inline;
  79624. begin
  79625. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  79626. end;
  79627. procedure TCAN1_C1FIFOINT20.setRXHALFIF; inline;
  79628. begin
  79629. pTDefRegMap(@Self)^.&set := $00000002;
  79630. end;
  79631. procedure TCAN1_C1FIFOINT20.clearRXHALFIF; inline;
  79632. begin
  79633. pTDefRegMap(@Self)^.clr := $00000002;
  79634. end;
  79635. procedure TCAN1_C1FIFOINT20.setRXHALFIF(thebits : TBits_1); inline;
  79636. begin
  79637. if thebits = 0 then
  79638. pTDefRegMap(@Self)^.clr := $00000002
  79639. else
  79640. pTDefRegMap(@Self)^.&set := $00000002;
  79641. end;
  79642. function TCAN1_C1FIFOINT20.getRXHALFIF : TBits_1; inline;
  79643. begin
  79644. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  79645. end;
  79646. procedure TCAN1_C1FIFOINT20.setRXFULLIF; inline;
  79647. begin
  79648. pTDefRegMap(@Self)^.&set := $00000004;
  79649. end;
  79650. procedure TCAN1_C1FIFOINT20.clearRXFULLIF; inline;
  79651. begin
  79652. pTDefRegMap(@Self)^.clr := $00000004;
  79653. end;
  79654. procedure TCAN1_C1FIFOINT20.setRXFULLIF(thebits : TBits_1); inline;
  79655. begin
  79656. if thebits = 0 then
  79657. pTDefRegMap(@Self)^.clr := $00000004
  79658. else
  79659. pTDefRegMap(@Self)^.&set := $00000004;
  79660. end;
  79661. function TCAN1_C1FIFOINT20.getRXFULLIF : TBits_1; inline;
  79662. begin
  79663. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79664. end;
  79665. procedure TCAN1_C1FIFOINT20.setRXOVFLIF; inline;
  79666. begin
  79667. pTDefRegMap(@Self)^.&set := $00000008;
  79668. end;
  79669. procedure TCAN1_C1FIFOINT20.clearRXOVFLIF; inline;
  79670. begin
  79671. pTDefRegMap(@Self)^.clr := $00000008;
  79672. end;
  79673. procedure TCAN1_C1FIFOINT20.setRXOVFLIF(thebits : TBits_1); inline;
  79674. begin
  79675. if thebits = 0 then
  79676. pTDefRegMap(@Self)^.clr := $00000008
  79677. else
  79678. pTDefRegMap(@Self)^.&set := $00000008;
  79679. end;
  79680. function TCAN1_C1FIFOINT20.getRXOVFLIF : TBits_1; inline;
  79681. begin
  79682. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79683. end;
  79684. procedure TCAN1_C1FIFOINT20.setTXEMPTYIF; inline;
  79685. begin
  79686. pTDefRegMap(@Self)^.&set := $00000100;
  79687. end;
  79688. procedure TCAN1_C1FIFOINT20.clearTXEMPTYIF; inline;
  79689. begin
  79690. pTDefRegMap(@Self)^.clr := $00000100;
  79691. end;
  79692. procedure TCAN1_C1FIFOINT20.setTXEMPTYIF(thebits : TBits_1); inline;
  79693. begin
  79694. if thebits = 0 then
  79695. pTDefRegMap(@Self)^.clr := $00000100
  79696. else
  79697. pTDefRegMap(@Self)^.&set := $00000100;
  79698. end;
  79699. function TCAN1_C1FIFOINT20.getTXEMPTYIF : TBits_1; inline;
  79700. begin
  79701. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  79702. end;
  79703. procedure TCAN1_C1FIFOINT20.setTXHALFIF; inline;
  79704. begin
  79705. pTDefRegMap(@Self)^.&set := $00000200;
  79706. end;
  79707. procedure TCAN1_C1FIFOINT20.clearTXHALFIF; inline;
  79708. begin
  79709. pTDefRegMap(@Self)^.clr := $00000200;
  79710. end;
  79711. procedure TCAN1_C1FIFOINT20.setTXHALFIF(thebits : TBits_1); inline;
  79712. begin
  79713. if thebits = 0 then
  79714. pTDefRegMap(@Self)^.clr := $00000200
  79715. else
  79716. pTDefRegMap(@Self)^.&set := $00000200;
  79717. end;
  79718. function TCAN1_C1FIFOINT20.getTXHALFIF : TBits_1; inline;
  79719. begin
  79720. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  79721. end;
  79722. procedure TCAN1_C1FIFOINT20.setTXNFULLIF; inline;
  79723. begin
  79724. pTDefRegMap(@Self)^.&set := $00000400;
  79725. end;
  79726. procedure TCAN1_C1FIFOINT20.clearTXNFULLIF; inline;
  79727. begin
  79728. pTDefRegMap(@Self)^.clr := $00000400;
  79729. end;
  79730. procedure TCAN1_C1FIFOINT20.setTXNFULLIF(thebits : TBits_1); inline;
  79731. begin
  79732. if thebits = 0 then
  79733. pTDefRegMap(@Self)^.clr := $00000400
  79734. else
  79735. pTDefRegMap(@Self)^.&set := $00000400;
  79736. end;
  79737. function TCAN1_C1FIFOINT20.getTXNFULLIF : TBits_1; inline;
  79738. begin
  79739. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  79740. end;
  79741. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIE; inline;
  79742. begin
  79743. pTDefRegMap(@Self)^.&set := $00010000;
  79744. end;
  79745. procedure TCAN1_C1FIFOINT20.clearRXNEMPTYIE; inline;
  79746. begin
  79747. pTDefRegMap(@Self)^.clr := $00010000;
  79748. end;
  79749. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIE(thebits : TBits_1); inline;
  79750. begin
  79751. if thebits = 0 then
  79752. pTDefRegMap(@Self)^.clr := $00010000
  79753. else
  79754. pTDefRegMap(@Self)^.&set := $00010000;
  79755. end;
  79756. function TCAN1_C1FIFOINT20.getRXNEMPTYIE : TBits_1; inline;
  79757. begin
  79758. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  79759. end;
  79760. procedure TCAN1_C1FIFOINT20.setRXHALFIE; inline;
  79761. begin
  79762. pTDefRegMap(@Self)^.&set := $00020000;
  79763. end;
  79764. procedure TCAN1_C1FIFOINT20.clearRXHALFIE; inline;
  79765. begin
  79766. pTDefRegMap(@Self)^.clr := $00020000;
  79767. end;
  79768. procedure TCAN1_C1FIFOINT20.setRXHALFIE(thebits : TBits_1); inline;
  79769. begin
  79770. if thebits = 0 then
  79771. pTDefRegMap(@Self)^.clr := $00020000
  79772. else
  79773. pTDefRegMap(@Self)^.&set := $00020000;
  79774. end;
  79775. function TCAN1_C1FIFOINT20.getRXHALFIE : TBits_1; inline;
  79776. begin
  79777. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  79778. end;
  79779. procedure TCAN1_C1FIFOINT20.setRXFULLIE; inline;
  79780. begin
  79781. pTDefRegMap(@Self)^.&set := $00040000;
  79782. end;
  79783. procedure TCAN1_C1FIFOINT20.clearRXFULLIE; inline;
  79784. begin
  79785. pTDefRegMap(@Self)^.clr := $00040000;
  79786. end;
  79787. procedure TCAN1_C1FIFOINT20.setRXFULLIE(thebits : TBits_1); inline;
  79788. begin
  79789. if thebits = 0 then
  79790. pTDefRegMap(@Self)^.clr := $00040000
  79791. else
  79792. pTDefRegMap(@Self)^.&set := $00040000;
  79793. end;
  79794. function TCAN1_C1FIFOINT20.getRXFULLIE : TBits_1; inline;
  79795. begin
  79796. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  79797. end;
  79798. procedure TCAN1_C1FIFOINT20.setRXOVFLIE; inline;
  79799. begin
  79800. pTDefRegMap(@Self)^.&set := $00080000;
  79801. end;
  79802. procedure TCAN1_C1FIFOINT20.clearRXOVFLIE; inline;
  79803. begin
  79804. pTDefRegMap(@Self)^.clr := $00080000;
  79805. end;
  79806. procedure TCAN1_C1FIFOINT20.setRXOVFLIE(thebits : TBits_1); inline;
  79807. begin
  79808. if thebits = 0 then
  79809. pTDefRegMap(@Self)^.clr := $00080000
  79810. else
  79811. pTDefRegMap(@Self)^.&set := $00080000;
  79812. end;
  79813. function TCAN1_C1FIFOINT20.getRXOVFLIE : TBits_1; inline;
  79814. begin
  79815. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79816. end;
  79817. procedure TCAN1_C1FIFOINT20.setTXEMPTYIE; inline;
  79818. begin
  79819. pTDefRegMap(@Self)^.&set := $01000000;
  79820. end;
  79821. procedure TCAN1_C1FIFOINT20.clearTXEMPTYIE; inline;
  79822. begin
  79823. pTDefRegMap(@Self)^.clr := $01000000;
  79824. end;
  79825. procedure TCAN1_C1FIFOINT20.setTXEMPTYIE(thebits : TBits_1); inline;
  79826. begin
  79827. if thebits = 0 then
  79828. pTDefRegMap(@Self)^.clr := $01000000
  79829. else
  79830. pTDefRegMap(@Self)^.&set := $01000000;
  79831. end;
  79832. function TCAN1_C1FIFOINT20.getTXEMPTYIE : TBits_1; inline;
  79833. begin
  79834. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  79835. end;
  79836. procedure TCAN1_C1FIFOINT20.setTXHALFIE; inline;
  79837. begin
  79838. pTDefRegMap(@Self)^.&set := $02000000;
  79839. end;
  79840. procedure TCAN1_C1FIFOINT20.clearTXHALFIE; inline;
  79841. begin
  79842. pTDefRegMap(@Self)^.clr := $02000000;
  79843. end;
  79844. procedure TCAN1_C1FIFOINT20.setTXHALFIE(thebits : TBits_1); inline;
  79845. begin
  79846. if thebits = 0 then
  79847. pTDefRegMap(@Self)^.clr := $02000000
  79848. else
  79849. pTDefRegMap(@Self)^.&set := $02000000;
  79850. end;
  79851. function TCAN1_C1FIFOINT20.getTXHALFIE : TBits_1; inline;
  79852. begin
  79853. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  79854. end;
  79855. procedure TCAN1_C1FIFOINT20.setTXNFULLIE; inline;
  79856. begin
  79857. pTDefRegMap(@Self)^.&set := $04000000;
  79858. end;
  79859. procedure TCAN1_C1FIFOINT20.clearTXNFULLIE; inline;
  79860. begin
  79861. pTDefRegMap(@Self)^.clr := $04000000;
  79862. end;
  79863. procedure TCAN1_C1FIFOINT20.setTXNFULLIE(thebits : TBits_1); inline;
  79864. begin
  79865. if thebits = 0 then
  79866. pTDefRegMap(@Self)^.clr := $04000000
  79867. else
  79868. pTDefRegMap(@Self)^.&set := $04000000;
  79869. end;
  79870. function TCAN1_C1FIFOINT20.getTXNFULLIE : TBits_1; inline;
  79871. begin
  79872. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  79873. end;
  79874. procedure TCAN1_C1FIFOINT20.setw(thebits : TBits_32); inline;
  79875. begin
  79876. pTDefRegMap(@Self)^.val := thebits;
  79877. end;
  79878. function TCAN1_C1FIFOINT20.getw : TBits_32; inline;
  79879. begin
  79880. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79881. end;
  79882. procedure TCAN1_C1FIFOCI20.setCFIFOCI(thebits : TBits_5); inline;
  79883. begin
  79884. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  79885. end;
  79886. function TCAN1_C1FIFOCI20.getCFIFOCI : TBits_5; inline;
  79887. begin
  79888. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  79889. end;
  79890. procedure TCAN1_C1FIFOCI20.setw(thebits : TBits_32); inline;
  79891. begin
  79892. pTDefRegMap(@Self)^.val := thebits;
  79893. end;
  79894. function TCAN1_C1FIFOCI20.getw : TBits_32; inline;
  79895. begin
  79896. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79897. end;
  79898. procedure TCAN1_C1FIFOCON21.setTXPRI(thebits : TBits_2); inline;
  79899. begin
  79900. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  79901. end;
  79902. function TCAN1_C1FIFOCON21.getTXPRI : TBits_2; inline;
  79903. begin
  79904. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  79905. end;
  79906. procedure TCAN1_C1FIFOCON21.setRTREN; inline;
  79907. begin
  79908. pTDefRegMap(@Self)^.&set := $00000004;
  79909. end;
  79910. procedure TCAN1_C1FIFOCON21.clearRTREN; inline;
  79911. begin
  79912. pTDefRegMap(@Self)^.clr := $00000004;
  79913. end;
  79914. procedure TCAN1_C1FIFOCON21.setRTREN(thebits : TBits_1); inline;
  79915. begin
  79916. if thebits = 0 then
  79917. pTDefRegMap(@Self)^.clr := $00000004
  79918. else
  79919. pTDefRegMap(@Self)^.&set := $00000004;
  79920. end;
  79921. function TCAN1_C1FIFOCON21.getRTREN : TBits_1; inline;
  79922. begin
  79923. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79924. end;
  79925. procedure TCAN1_C1FIFOCON21.setTXREQ; inline;
  79926. begin
  79927. pTDefRegMap(@Self)^.&set := $00000008;
  79928. end;
  79929. procedure TCAN1_C1FIFOCON21.clearTXREQ; inline;
  79930. begin
  79931. pTDefRegMap(@Self)^.clr := $00000008;
  79932. end;
  79933. procedure TCAN1_C1FIFOCON21.setTXREQ(thebits : TBits_1); inline;
  79934. begin
  79935. if thebits = 0 then
  79936. pTDefRegMap(@Self)^.clr := $00000008
  79937. else
  79938. pTDefRegMap(@Self)^.&set := $00000008;
  79939. end;
  79940. function TCAN1_C1FIFOCON21.getTXREQ : TBits_1; inline;
  79941. begin
  79942. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79943. end;
  79944. procedure TCAN1_C1FIFOCON21.setTXERR; inline;
  79945. begin
  79946. pTDefRegMap(@Self)^.&set := $00000010;
  79947. end;
  79948. procedure TCAN1_C1FIFOCON21.clearTXERR; inline;
  79949. begin
  79950. pTDefRegMap(@Self)^.clr := $00000010;
  79951. end;
  79952. procedure TCAN1_C1FIFOCON21.setTXERR(thebits : TBits_1); inline;
  79953. begin
  79954. if thebits = 0 then
  79955. pTDefRegMap(@Self)^.clr := $00000010
  79956. else
  79957. pTDefRegMap(@Self)^.&set := $00000010;
  79958. end;
  79959. function TCAN1_C1FIFOCON21.getTXERR : TBits_1; inline;
  79960. begin
  79961. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  79962. end;
  79963. procedure TCAN1_C1FIFOCON21.setTXLARB; inline;
  79964. begin
  79965. pTDefRegMap(@Self)^.&set := $00000020;
  79966. end;
  79967. procedure TCAN1_C1FIFOCON21.clearTXLARB; inline;
  79968. begin
  79969. pTDefRegMap(@Self)^.clr := $00000020;
  79970. end;
  79971. procedure TCAN1_C1FIFOCON21.setTXLARB(thebits : TBits_1); inline;
  79972. begin
  79973. if thebits = 0 then
  79974. pTDefRegMap(@Self)^.clr := $00000020
  79975. else
  79976. pTDefRegMap(@Self)^.&set := $00000020;
  79977. end;
  79978. function TCAN1_C1FIFOCON21.getTXLARB : TBits_1; inline;
  79979. begin
  79980. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  79981. end;
  79982. procedure TCAN1_C1FIFOCON21.setTXABAT; inline;
  79983. begin
  79984. pTDefRegMap(@Self)^.&set := $00000040;
  79985. end;
  79986. procedure TCAN1_C1FIFOCON21.clearTXABAT; inline;
  79987. begin
  79988. pTDefRegMap(@Self)^.clr := $00000040;
  79989. end;
  79990. procedure TCAN1_C1FIFOCON21.setTXABAT(thebits : TBits_1); inline;
  79991. begin
  79992. if thebits = 0 then
  79993. pTDefRegMap(@Self)^.clr := $00000040
  79994. else
  79995. pTDefRegMap(@Self)^.&set := $00000040;
  79996. end;
  79997. function TCAN1_C1FIFOCON21.getTXABAT : TBits_1; inline;
  79998. begin
  79999. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  80000. end;
  80001. procedure TCAN1_C1FIFOCON21.setTXEN; inline;
  80002. begin
  80003. pTDefRegMap(@Self)^.&set := $00000080;
  80004. end;
  80005. procedure TCAN1_C1FIFOCON21.clearTXEN; inline;
  80006. begin
  80007. pTDefRegMap(@Self)^.clr := $00000080;
  80008. end;
  80009. procedure TCAN1_C1FIFOCON21.setTXEN(thebits : TBits_1); inline;
  80010. begin
  80011. if thebits = 0 then
  80012. pTDefRegMap(@Self)^.clr := $00000080
  80013. else
  80014. pTDefRegMap(@Self)^.&set := $00000080;
  80015. end;
  80016. function TCAN1_C1FIFOCON21.getTXEN : TBits_1; inline;
  80017. begin
  80018. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  80019. end;
  80020. procedure TCAN1_C1FIFOCON21.setDONLY; inline;
  80021. begin
  80022. pTDefRegMap(@Self)^.&set := $00001000;
  80023. end;
  80024. procedure TCAN1_C1FIFOCON21.clearDONLY; inline;
  80025. begin
  80026. pTDefRegMap(@Self)^.clr := $00001000;
  80027. end;
  80028. procedure TCAN1_C1FIFOCON21.setDONLY(thebits : TBits_1); inline;
  80029. begin
  80030. if thebits = 0 then
  80031. pTDefRegMap(@Self)^.clr := $00001000
  80032. else
  80033. pTDefRegMap(@Self)^.&set := $00001000;
  80034. end;
  80035. function TCAN1_C1FIFOCON21.getDONLY : TBits_1; inline;
  80036. begin
  80037. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  80038. end;
  80039. procedure TCAN1_C1FIFOCON21.setUINC; inline;
  80040. begin
  80041. pTDefRegMap(@Self)^.&set := $00002000;
  80042. end;
  80043. procedure TCAN1_C1FIFOCON21.clearUINC; inline;
  80044. begin
  80045. pTDefRegMap(@Self)^.clr := $00002000;
  80046. end;
  80047. procedure TCAN1_C1FIFOCON21.setUINC(thebits : TBits_1); inline;
  80048. begin
  80049. if thebits = 0 then
  80050. pTDefRegMap(@Self)^.clr := $00002000
  80051. else
  80052. pTDefRegMap(@Self)^.&set := $00002000;
  80053. end;
  80054. function TCAN1_C1FIFOCON21.getUINC : TBits_1; inline;
  80055. begin
  80056. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  80057. end;
  80058. procedure TCAN1_C1FIFOCON21.setFRESET; inline;
  80059. begin
  80060. pTDefRegMap(@Self)^.&set := $00004000;
  80061. end;
  80062. procedure TCAN1_C1FIFOCON21.clearFRESET; inline;
  80063. begin
  80064. pTDefRegMap(@Self)^.clr := $00004000;
  80065. end;
  80066. procedure TCAN1_C1FIFOCON21.setFRESET(thebits : TBits_1); inline;
  80067. begin
  80068. if thebits = 0 then
  80069. pTDefRegMap(@Self)^.clr := $00004000
  80070. else
  80071. pTDefRegMap(@Self)^.&set := $00004000;
  80072. end;
  80073. function TCAN1_C1FIFOCON21.getFRESET : TBits_1; inline;
  80074. begin
  80075. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  80076. end;
  80077. procedure TCAN1_C1FIFOCON21.setFSIZE(thebits : TBits_5); inline;
  80078. begin
  80079. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  80080. end;
  80081. function TCAN1_C1FIFOCON21.getFSIZE : TBits_5; inline;
  80082. begin
  80083. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  80084. end;
  80085. procedure TCAN1_C1FIFOCON21.setw(thebits : TBits_32); inline;
  80086. begin
  80087. pTDefRegMap(@Self)^.val := thebits;
  80088. end;
  80089. function TCAN1_C1FIFOCON21.getw : TBits_32; inline;
  80090. begin
  80091. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80092. end;
  80093. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIF; inline;
  80094. begin
  80095. pTDefRegMap(@Self)^.&set := $00000001;
  80096. end;
  80097. procedure TCAN1_C1FIFOINT21.clearRXNEMPTYIF; inline;
  80098. begin
  80099. pTDefRegMap(@Self)^.clr := $00000001;
  80100. end;
  80101. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIF(thebits : TBits_1); inline;
  80102. begin
  80103. if thebits = 0 then
  80104. pTDefRegMap(@Self)^.clr := $00000001
  80105. else
  80106. pTDefRegMap(@Self)^.&set := $00000001;
  80107. end;
  80108. function TCAN1_C1FIFOINT21.getRXNEMPTYIF : TBits_1; inline;
  80109. begin
  80110. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80111. end;
  80112. procedure TCAN1_C1FIFOINT21.setRXHALFIF; inline;
  80113. begin
  80114. pTDefRegMap(@Self)^.&set := $00000002;
  80115. end;
  80116. procedure TCAN1_C1FIFOINT21.clearRXHALFIF; inline;
  80117. begin
  80118. pTDefRegMap(@Self)^.clr := $00000002;
  80119. end;
  80120. procedure TCAN1_C1FIFOINT21.setRXHALFIF(thebits : TBits_1); inline;
  80121. begin
  80122. if thebits = 0 then
  80123. pTDefRegMap(@Self)^.clr := $00000002
  80124. else
  80125. pTDefRegMap(@Self)^.&set := $00000002;
  80126. end;
  80127. function TCAN1_C1FIFOINT21.getRXHALFIF : TBits_1; inline;
  80128. begin
  80129. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80130. end;
  80131. procedure TCAN1_C1FIFOINT21.setRXFULLIF; inline;
  80132. begin
  80133. pTDefRegMap(@Self)^.&set := $00000004;
  80134. end;
  80135. procedure TCAN1_C1FIFOINT21.clearRXFULLIF; inline;
  80136. begin
  80137. pTDefRegMap(@Self)^.clr := $00000004;
  80138. end;
  80139. procedure TCAN1_C1FIFOINT21.setRXFULLIF(thebits : TBits_1); inline;
  80140. begin
  80141. if thebits = 0 then
  80142. pTDefRegMap(@Self)^.clr := $00000004
  80143. else
  80144. pTDefRegMap(@Self)^.&set := $00000004;
  80145. end;
  80146. function TCAN1_C1FIFOINT21.getRXFULLIF : TBits_1; inline;
  80147. begin
  80148. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80149. end;
  80150. procedure TCAN1_C1FIFOINT21.setRXOVFLIF; inline;
  80151. begin
  80152. pTDefRegMap(@Self)^.&set := $00000008;
  80153. end;
  80154. procedure TCAN1_C1FIFOINT21.clearRXOVFLIF; inline;
  80155. begin
  80156. pTDefRegMap(@Self)^.clr := $00000008;
  80157. end;
  80158. procedure TCAN1_C1FIFOINT21.setRXOVFLIF(thebits : TBits_1); inline;
  80159. begin
  80160. if thebits = 0 then
  80161. pTDefRegMap(@Self)^.clr := $00000008
  80162. else
  80163. pTDefRegMap(@Self)^.&set := $00000008;
  80164. end;
  80165. function TCAN1_C1FIFOINT21.getRXOVFLIF : TBits_1; inline;
  80166. begin
  80167. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80168. end;
  80169. procedure TCAN1_C1FIFOINT21.setTXEMPTYIF; inline;
  80170. begin
  80171. pTDefRegMap(@Self)^.&set := $00000100;
  80172. end;
  80173. procedure TCAN1_C1FIFOINT21.clearTXEMPTYIF; inline;
  80174. begin
  80175. pTDefRegMap(@Self)^.clr := $00000100;
  80176. end;
  80177. procedure TCAN1_C1FIFOINT21.setTXEMPTYIF(thebits : TBits_1); inline;
  80178. begin
  80179. if thebits = 0 then
  80180. pTDefRegMap(@Self)^.clr := $00000100
  80181. else
  80182. pTDefRegMap(@Self)^.&set := $00000100;
  80183. end;
  80184. function TCAN1_C1FIFOINT21.getTXEMPTYIF : TBits_1; inline;
  80185. begin
  80186. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  80187. end;
  80188. procedure TCAN1_C1FIFOINT21.setTXHALFIF; inline;
  80189. begin
  80190. pTDefRegMap(@Self)^.&set := $00000200;
  80191. end;
  80192. procedure TCAN1_C1FIFOINT21.clearTXHALFIF; inline;
  80193. begin
  80194. pTDefRegMap(@Self)^.clr := $00000200;
  80195. end;
  80196. procedure TCAN1_C1FIFOINT21.setTXHALFIF(thebits : TBits_1); inline;
  80197. begin
  80198. if thebits = 0 then
  80199. pTDefRegMap(@Self)^.clr := $00000200
  80200. else
  80201. pTDefRegMap(@Self)^.&set := $00000200;
  80202. end;
  80203. function TCAN1_C1FIFOINT21.getTXHALFIF : TBits_1; inline;
  80204. begin
  80205. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  80206. end;
  80207. procedure TCAN1_C1FIFOINT21.setTXNFULLIF; inline;
  80208. begin
  80209. pTDefRegMap(@Self)^.&set := $00000400;
  80210. end;
  80211. procedure TCAN1_C1FIFOINT21.clearTXNFULLIF; inline;
  80212. begin
  80213. pTDefRegMap(@Self)^.clr := $00000400;
  80214. end;
  80215. procedure TCAN1_C1FIFOINT21.setTXNFULLIF(thebits : TBits_1); inline;
  80216. begin
  80217. if thebits = 0 then
  80218. pTDefRegMap(@Self)^.clr := $00000400
  80219. else
  80220. pTDefRegMap(@Self)^.&set := $00000400;
  80221. end;
  80222. function TCAN1_C1FIFOINT21.getTXNFULLIF : TBits_1; inline;
  80223. begin
  80224. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  80225. end;
  80226. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIE; inline;
  80227. begin
  80228. pTDefRegMap(@Self)^.&set := $00010000;
  80229. end;
  80230. procedure TCAN1_C1FIFOINT21.clearRXNEMPTYIE; inline;
  80231. begin
  80232. pTDefRegMap(@Self)^.clr := $00010000;
  80233. end;
  80234. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIE(thebits : TBits_1); inline;
  80235. begin
  80236. if thebits = 0 then
  80237. pTDefRegMap(@Self)^.clr := $00010000
  80238. else
  80239. pTDefRegMap(@Self)^.&set := $00010000;
  80240. end;
  80241. function TCAN1_C1FIFOINT21.getRXNEMPTYIE : TBits_1; inline;
  80242. begin
  80243. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  80244. end;
  80245. procedure TCAN1_C1FIFOINT21.setRXHALFIE; inline;
  80246. begin
  80247. pTDefRegMap(@Self)^.&set := $00020000;
  80248. end;
  80249. procedure TCAN1_C1FIFOINT21.clearRXHALFIE; inline;
  80250. begin
  80251. pTDefRegMap(@Self)^.clr := $00020000;
  80252. end;
  80253. procedure TCAN1_C1FIFOINT21.setRXHALFIE(thebits : TBits_1); inline;
  80254. begin
  80255. if thebits = 0 then
  80256. pTDefRegMap(@Self)^.clr := $00020000
  80257. else
  80258. pTDefRegMap(@Self)^.&set := $00020000;
  80259. end;
  80260. function TCAN1_C1FIFOINT21.getRXHALFIE : TBits_1; inline;
  80261. begin
  80262. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  80263. end;
  80264. procedure TCAN1_C1FIFOINT21.setRXFULLIE; inline;
  80265. begin
  80266. pTDefRegMap(@Self)^.&set := $00040000;
  80267. end;
  80268. procedure TCAN1_C1FIFOINT21.clearRXFULLIE; inline;
  80269. begin
  80270. pTDefRegMap(@Self)^.clr := $00040000;
  80271. end;
  80272. procedure TCAN1_C1FIFOINT21.setRXFULLIE(thebits : TBits_1); inline;
  80273. begin
  80274. if thebits = 0 then
  80275. pTDefRegMap(@Self)^.clr := $00040000
  80276. else
  80277. pTDefRegMap(@Self)^.&set := $00040000;
  80278. end;
  80279. function TCAN1_C1FIFOINT21.getRXFULLIE : TBits_1; inline;
  80280. begin
  80281. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  80282. end;
  80283. procedure TCAN1_C1FIFOINT21.setRXOVFLIE; inline;
  80284. begin
  80285. pTDefRegMap(@Self)^.&set := $00080000;
  80286. end;
  80287. procedure TCAN1_C1FIFOINT21.clearRXOVFLIE; inline;
  80288. begin
  80289. pTDefRegMap(@Self)^.clr := $00080000;
  80290. end;
  80291. procedure TCAN1_C1FIFOINT21.setRXOVFLIE(thebits : TBits_1); inline;
  80292. begin
  80293. if thebits = 0 then
  80294. pTDefRegMap(@Self)^.clr := $00080000
  80295. else
  80296. pTDefRegMap(@Self)^.&set := $00080000;
  80297. end;
  80298. function TCAN1_C1FIFOINT21.getRXOVFLIE : TBits_1; inline;
  80299. begin
  80300. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80301. end;
  80302. procedure TCAN1_C1FIFOINT21.setTXEMPTYIE; inline;
  80303. begin
  80304. pTDefRegMap(@Self)^.&set := $01000000;
  80305. end;
  80306. procedure TCAN1_C1FIFOINT21.clearTXEMPTYIE; inline;
  80307. begin
  80308. pTDefRegMap(@Self)^.clr := $01000000;
  80309. end;
  80310. procedure TCAN1_C1FIFOINT21.setTXEMPTYIE(thebits : TBits_1); inline;
  80311. begin
  80312. if thebits = 0 then
  80313. pTDefRegMap(@Self)^.clr := $01000000
  80314. else
  80315. pTDefRegMap(@Self)^.&set := $01000000;
  80316. end;
  80317. function TCAN1_C1FIFOINT21.getTXEMPTYIE : TBits_1; inline;
  80318. begin
  80319. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  80320. end;
  80321. procedure TCAN1_C1FIFOINT21.setTXHALFIE; inline;
  80322. begin
  80323. pTDefRegMap(@Self)^.&set := $02000000;
  80324. end;
  80325. procedure TCAN1_C1FIFOINT21.clearTXHALFIE; inline;
  80326. begin
  80327. pTDefRegMap(@Self)^.clr := $02000000;
  80328. end;
  80329. procedure TCAN1_C1FIFOINT21.setTXHALFIE(thebits : TBits_1); inline;
  80330. begin
  80331. if thebits = 0 then
  80332. pTDefRegMap(@Self)^.clr := $02000000
  80333. else
  80334. pTDefRegMap(@Self)^.&set := $02000000;
  80335. end;
  80336. function TCAN1_C1FIFOINT21.getTXHALFIE : TBits_1; inline;
  80337. begin
  80338. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  80339. end;
  80340. procedure TCAN1_C1FIFOINT21.setTXNFULLIE; inline;
  80341. begin
  80342. pTDefRegMap(@Self)^.&set := $04000000;
  80343. end;
  80344. procedure TCAN1_C1FIFOINT21.clearTXNFULLIE; inline;
  80345. begin
  80346. pTDefRegMap(@Self)^.clr := $04000000;
  80347. end;
  80348. procedure TCAN1_C1FIFOINT21.setTXNFULLIE(thebits : TBits_1); inline;
  80349. begin
  80350. if thebits = 0 then
  80351. pTDefRegMap(@Self)^.clr := $04000000
  80352. else
  80353. pTDefRegMap(@Self)^.&set := $04000000;
  80354. end;
  80355. function TCAN1_C1FIFOINT21.getTXNFULLIE : TBits_1; inline;
  80356. begin
  80357. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  80358. end;
  80359. procedure TCAN1_C1FIFOINT21.setw(thebits : TBits_32); inline;
  80360. begin
  80361. pTDefRegMap(@Self)^.val := thebits;
  80362. end;
  80363. function TCAN1_C1FIFOINT21.getw : TBits_32; inline;
  80364. begin
  80365. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80366. end;
  80367. procedure TCAN1_C1FIFOCI21.setCFIFOCI(thebits : TBits_5); inline;
  80368. begin
  80369. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  80370. end;
  80371. function TCAN1_C1FIFOCI21.getCFIFOCI : TBits_5; inline;
  80372. begin
  80373. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  80374. end;
  80375. procedure TCAN1_C1FIFOCI21.setw(thebits : TBits_32); inline;
  80376. begin
  80377. pTDefRegMap(@Self)^.val := thebits;
  80378. end;
  80379. function TCAN1_C1FIFOCI21.getw : TBits_32; inline;
  80380. begin
  80381. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80382. end;
  80383. procedure TCAN1_C1FIFOCON22.setTXPRI(thebits : TBits_2); inline;
  80384. begin
  80385. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  80386. end;
  80387. function TCAN1_C1FIFOCON22.getTXPRI : TBits_2; inline;
  80388. begin
  80389. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  80390. end;
  80391. procedure TCAN1_C1FIFOCON22.setRTREN; inline;
  80392. begin
  80393. pTDefRegMap(@Self)^.&set := $00000004;
  80394. end;
  80395. procedure TCAN1_C1FIFOCON22.clearRTREN; inline;
  80396. begin
  80397. pTDefRegMap(@Self)^.clr := $00000004;
  80398. end;
  80399. procedure TCAN1_C1FIFOCON22.setRTREN(thebits : TBits_1); inline;
  80400. begin
  80401. if thebits = 0 then
  80402. pTDefRegMap(@Self)^.clr := $00000004
  80403. else
  80404. pTDefRegMap(@Self)^.&set := $00000004;
  80405. end;
  80406. function TCAN1_C1FIFOCON22.getRTREN : TBits_1; inline;
  80407. begin
  80408. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80409. end;
  80410. procedure TCAN1_C1FIFOCON22.setTXREQ; inline;
  80411. begin
  80412. pTDefRegMap(@Self)^.&set := $00000008;
  80413. end;
  80414. procedure TCAN1_C1FIFOCON22.clearTXREQ; inline;
  80415. begin
  80416. pTDefRegMap(@Self)^.clr := $00000008;
  80417. end;
  80418. procedure TCAN1_C1FIFOCON22.setTXREQ(thebits : TBits_1); inline;
  80419. begin
  80420. if thebits = 0 then
  80421. pTDefRegMap(@Self)^.clr := $00000008
  80422. else
  80423. pTDefRegMap(@Self)^.&set := $00000008;
  80424. end;
  80425. function TCAN1_C1FIFOCON22.getTXREQ : TBits_1; inline;
  80426. begin
  80427. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80428. end;
  80429. procedure TCAN1_C1FIFOCON22.setTXERR; inline;
  80430. begin
  80431. pTDefRegMap(@Self)^.&set := $00000010;
  80432. end;
  80433. procedure TCAN1_C1FIFOCON22.clearTXERR; inline;
  80434. begin
  80435. pTDefRegMap(@Self)^.clr := $00000010;
  80436. end;
  80437. procedure TCAN1_C1FIFOCON22.setTXERR(thebits : TBits_1); inline;
  80438. begin
  80439. if thebits = 0 then
  80440. pTDefRegMap(@Self)^.clr := $00000010
  80441. else
  80442. pTDefRegMap(@Self)^.&set := $00000010;
  80443. end;
  80444. function TCAN1_C1FIFOCON22.getTXERR : TBits_1; inline;
  80445. begin
  80446. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  80447. end;
  80448. procedure TCAN1_C1FIFOCON22.setTXLARB; inline;
  80449. begin
  80450. pTDefRegMap(@Self)^.&set := $00000020;
  80451. end;
  80452. procedure TCAN1_C1FIFOCON22.clearTXLARB; inline;
  80453. begin
  80454. pTDefRegMap(@Self)^.clr := $00000020;
  80455. end;
  80456. procedure TCAN1_C1FIFOCON22.setTXLARB(thebits : TBits_1); inline;
  80457. begin
  80458. if thebits = 0 then
  80459. pTDefRegMap(@Self)^.clr := $00000020
  80460. else
  80461. pTDefRegMap(@Self)^.&set := $00000020;
  80462. end;
  80463. function TCAN1_C1FIFOCON22.getTXLARB : TBits_1; inline;
  80464. begin
  80465. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  80466. end;
  80467. procedure TCAN1_C1FIFOCON22.setTXABAT; inline;
  80468. begin
  80469. pTDefRegMap(@Self)^.&set := $00000040;
  80470. end;
  80471. procedure TCAN1_C1FIFOCON22.clearTXABAT; inline;
  80472. begin
  80473. pTDefRegMap(@Self)^.clr := $00000040;
  80474. end;
  80475. procedure TCAN1_C1FIFOCON22.setTXABAT(thebits : TBits_1); inline;
  80476. begin
  80477. if thebits = 0 then
  80478. pTDefRegMap(@Self)^.clr := $00000040
  80479. else
  80480. pTDefRegMap(@Self)^.&set := $00000040;
  80481. end;
  80482. function TCAN1_C1FIFOCON22.getTXABAT : TBits_1; inline;
  80483. begin
  80484. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  80485. end;
  80486. procedure TCAN1_C1FIFOCON22.setTXEN; inline;
  80487. begin
  80488. pTDefRegMap(@Self)^.&set := $00000080;
  80489. end;
  80490. procedure TCAN1_C1FIFOCON22.clearTXEN; inline;
  80491. begin
  80492. pTDefRegMap(@Self)^.clr := $00000080;
  80493. end;
  80494. procedure TCAN1_C1FIFOCON22.setTXEN(thebits : TBits_1); inline;
  80495. begin
  80496. if thebits = 0 then
  80497. pTDefRegMap(@Self)^.clr := $00000080
  80498. else
  80499. pTDefRegMap(@Self)^.&set := $00000080;
  80500. end;
  80501. function TCAN1_C1FIFOCON22.getTXEN : TBits_1; inline;
  80502. begin
  80503. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  80504. end;
  80505. procedure TCAN1_C1FIFOCON22.setDONLY; inline;
  80506. begin
  80507. pTDefRegMap(@Self)^.&set := $00001000;
  80508. end;
  80509. procedure TCAN1_C1FIFOCON22.clearDONLY; inline;
  80510. begin
  80511. pTDefRegMap(@Self)^.clr := $00001000;
  80512. end;
  80513. procedure TCAN1_C1FIFOCON22.setDONLY(thebits : TBits_1); inline;
  80514. begin
  80515. if thebits = 0 then
  80516. pTDefRegMap(@Self)^.clr := $00001000
  80517. else
  80518. pTDefRegMap(@Self)^.&set := $00001000;
  80519. end;
  80520. function TCAN1_C1FIFOCON22.getDONLY : TBits_1; inline;
  80521. begin
  80522. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  80523. end;
  80524. procedure TCAN1_C1FIFOCON22.setUINC; inline;
  80525. begin
  80526. pTDefRegMap(@Self)^.&set := $00002000;
  80527. end;
  80528. procedure TCAN1_C1FIFOCON22.clearUINC; inline;
  80529. begin
  80530. pTDefRegMap(@Self)^.clr := $00002000;
  80531. end;
  80532. procedure TCAN1_C1FIFOCON22.setUINC(thebits : TBits_1); inline;
  80533. begin
  80534. if thebits = 0 then
  80535. pTDefRegMap(@Self)^.clr := $00002000
  80536. else
  80537. pTDefRegMap(@Self)^.&set := $00002000;
  80538. end;
  80539. function TCAN1_C1FIFOCON22.getUINC : TBits_1; inline;
  80540. begin
  80541. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  80542. end;
  80543. procedure TCAN1_C1FIFOCON22.setFRESET; inline;
  80544. begin
  80545. pTDefRegMap(@Self)^.&set := $00004000;
  80546. end;
  80547. procedure TCAN1_C1FIFOCON22.clearFRESET; inline;
  80548. begin
  80549. pTDefRegMap(@Self)^.clr := $00004000;
  80550. end;
  80551. procedure TCAN1_C1FIFOCON22.setFRESET(thebits : TBits_1); inline;
  80552. begin
  80553. if thebits = 0 then
  80554. pTDefRegMap(@Self)^.clr := $00004000
  80555. else
  80556. pTDefRegMap(@Self)^.&set := $00004000;
  80557. end;
  80558. function TCAN1_C1FIFOCON22.getFRESET : TBits_1; inline;
  80559. begin
  80560. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  80561. end;
  80562. procedure TCAN1_C1FIFOCON22.setFSIZE(thebits : TBits_5); inline;
  80563. begin
  80564. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  80565. end;
  80566. function TCAN1_C1FIFOCON22.getFSIZE : TBits_5; inline;
  80567. begin
  80568. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  80569. end;
  80570. procedure TCAN1_C1FIFOCON22.setw(thebits : TBits_32); inline;
  80571. begin
  80572. pTDefRegMap(@Self)^.val := thebits;
  80573. end;
  80574. function TCAN1_C1FIFOCON22.getw : TBits_32; inline;
  80575. begin
  80576. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80577. end;
  80578. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIF; inline;
  80579. begin
  80580. pTDefRegMap(@Self)^.&set := $00000001;
  80581. end;
  80582. procedure TCAN1_C1FIFOINT22.clearRXNEMPTYIF; inline;
  80583. begin
  80584. pTDefRegMap(@Self)^.clr := $00000001;
  80585. end;
  80586. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIF(thebits : TBits_1); inline;
  80587. begin
  80588. if thebits = 0 then
  80589. pTDefRegMap(@Self)^.clr := $00000001
  80590. else
  80591. pTDefRegMap(@Self)^.&set := $00000001;
  80592. end;
  80593. function TCAN1_C1FIFOINT22.getRXNEMPTYIF : TBits_1; inline;
  80594. begin
  80595. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80596. end;
  80597. procedure TCAN1_C1FIFOINT22.setRXHALFIF; inline;
  80598. begin
  80599. pTDefRegMap(@Self)^.&set := $00000002;
  80600. end;
  80601. procedure TCAN1_C1FIFOINT22.clearRXHALFIF; inline;
  80602. begin
  80603. pTDefRegMap(@Self)^.clr := $00000002;
  80604. end;
  80605. procedure TCAN1_C1FIFOINT22.setRXHALFIF(thebits : TBits_1); inline;
  80606. begin
  80607. if thebits = 0 then
  80608. pTDefRegMap(@Self)^.clr := $00000002
  80609. else
  80610. pTDefRegMap(@Self)^.&set := $00000002;
  80611. end;
  80612. function TCAN1_C1FIFOINT22.getRXHALFIF : TBits_1; inline;
  80613. begin
  80614. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80615. end;
  80616. procedure TCAN1_C1FIFOINT22.setRXFULLIF; inline;
  80617. begin
  80618. pTDefRegMap(@Self)^.&set := $00000004;
  80619. end;
  80620. procedure TCAN1_C1FIFOINT22.clearRXFULLIF; inline;
  80621. begin
  80622. pTDefRegMap(@Self)^.clr := $00000004;
  80623. end;
  80624. procedure TCAN1_C1FIFOINT22.setRXFULLIF(thebits : TBits_1); inline;
  80625. begin
  80626. if thebits = 0 then
  80627. pTDefRegMap(@Self)^.clr := $00000004
  80628. else
  80629. pTDefRegMap(@Self)^.&set := $00000004;
  80630. end;
  80631. function TCAN1_C1FIFOINT22.getRXFULLIF : TBits_1; inline;
  80632. begin
  80633. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80634. end;
  80635. procedure TCAN1_C1FIFOINT22.setRXOVFLIF; inline;
  80636. begin
  80637. pTDefRegMap(@Self)^.&set := $00000008;
  80638. end;
  80639. procedure TCAN1_C1FIFOINT22.clearRXOVFLIF; inline;
  80640. begin
  80641. pTDefRegMap(@Self)^.clr := $00000008;
  80642. end;
  80643. procedure TCAN1_C1FIFOINT22.setRXOVFLIF(thebits : TBits_1); inline;
  80644. begin
  80645. if thebits = 0 then
  80646. pTDefRegMap(@Self)^.clr := $00000008
  80647. else
  80648. pTDefRegMap(@Self)^.&set := $00000008;
  80649. end;
  80650. function TCAN1_C1FIFOINT22.getRXOVFLIF : TBits_1; inline;
  80651. begin
  80652. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80653. end;
  80654. procedure TCAN1_C1FIFOINT22.setTXEMPTYIF; inline;
  80655. begin
  80656. pTDefRegMap(@Self)^.&set := $00000100;
  80657. end;
  80658. procedure TCAN1_C1FIFOINT22.clearTXEMPTYIF; inline;
  80659. begin
  80660. pTDefRegMap(@Self)^.clr := $00000100;
  80661. end;
  80662. procedure TCAN1_C1FIFOINT22.setTXEMPTYIF(thebits : TBits_1); inline;
  80663. begin
  80664. if thebits = 0 then
  80665. pTDefRegMap(@Self)^.clr := $00000100
  80666. else
  80667. pTDefRegMap(@Self)^.&set := $00000100;
  80668. end;
  80669. function TCAN1_C1FIFOINT22.getTXEMPTYIF : TBits_1; inline;
  80670. begin
  80671. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  80672. end;
  80673. procedure TCAN1_C1FIFOINT22.setTXHALFIF; inline;
  80674. begin
  80675. pTDefRegMap(@Self)^.&set := $00000200;
  80676. end;
  80677. procedure TCAN1_C1FIFOINT22.clearTXHALFIF; inline;
  80678. begin
  80679. pTDefRegMap(@Self)^.clr := $00000200;
  80680. end;
  80681. procedure TCAN1_C1FIFOINT22.setTXHALFIF(thebits : TBits_1); inline;
  80682. begin
  80683. if thebits = 0 then
  80684. pTDefRegMap(@Self)^.clr := $00000200
  80685. else
  80686. pTDefRegMap(@Self)^.&set := $00000200;
  80687. end;
  80688. function TCAN1_C1FIFOINT22.getTXHALFIF : TBits_1; inline;
  80689. begin
  80690. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  80691. end;
  80692. procedure TCAN1_C1FIFOINT22.setTXNFULLIF; inline;
  80693. begin
  80694. pTDefRegMap(@Self)^.&set := $00000400;
  80695. end;
  80696. procedure TCAN1_C1FIFOINT22.clearTXNFULLIF; inline;
  80697. begin
  80698. pTDefRegMap(@Self)^.clr := $00000400;
  80699. end;
  80700. procedure TCAN1_C1FIFOINT22.setTXNFULLIF(thebits : TBits_1); inline;
  80701. begin
  80702. if thebits = 0 then
  80703. pTDefRegMap(@Self)^.clr := $00000400
  80704. else
  80705. pTDefRegMap(@Self)^.&set := $00000400;
  80706. end;
  80707. function TCAN1_C1FIFOINT22.getTXNFULLIF : TBits_1; inline;
  80708. begin
  80709. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  80710. end;
  80711. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIE; inline;
  80712. begin
  80713. pTDefRegMap(@Self)^.&set := $00010000;
  80714. end;
  80715. procedure TCAN1_C1FIFOINT22.clearRXNEMPTYIE; inline;
  80716. begin
  80717. pTDefRegMap(@Self)^.clr := $00010000;
  80718. end;
  80719. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIE(thebits : TBits_1); inline;
  80720. begin
  80721. if thebits = 0 then
  80722. pTDefRegMap(@Self)^.clr := $00010000
  80723. else
  80724. pTDefRegMap(@Self)^.&set := $00010000;
  80725. end;
  80726. function TCAN1_C1FIFOINT22.getRXNEMPTYIE : TBits_1; inline;
  80727. begin
  80728. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  80729. end;
  80730. procedure TCAN1_C1FIFOINT22.setRXHALFIE; inline;
  80731. begin
  80732. pTDefRegMap(@Self)^.&set := $00020000;
  80733. end;
  80734. procedure TCAN1_C1FIFOINT22.clearRXHALFIE; inline;
  80735. begin
  80736. pTDefRegMap(@Self)^.clr := $00020000;
  80737. end;
  80738. procedure TCAN1_C1FIFOINT22.setRXHALFIE(thebits : TBits_1); inline;
  80739. begin
  80740. if thebits = 0 then
  80741. pTDefRegMap(@Self)^.clr := $00020000
  80742. else
  80743. pTDefRegMap(@Self)^.&set := $00020000;
  80744. end;
  80745. function TCAN1_C1FIFOINT22.getRXHALFIE : TBits_1; inline;
  80746. begin
  80747. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  80748. end;
  80749. procedure TCAN1_C1FIFOINT22.setRXFULLIE; inline;
  80750. begin
  80751. pTDefRegMap(@Self)^.&set := $00040000;
  80752. end;
  80753. procedure TCAN1_C1FIFOINT22.clearRXFULLIE; inline;
  80754. begin
  80755. pTDefRegMap(@Self)^.clr := $00040000;
  80756. end;
  80757. procedure TCAN1_C1FIFOINT22.setRXFULLIE(thebits : TBits_1); inline;
  80758. begin
  80759. if thebits = 0 then
  80760. pTDefRegMap(@Self)^.clr := $00040000
  80761. else
  80762. pTDefRegMap(@Self)^.&set := $00040000;
  80763. end;
  80764. function TCAN1_C1FIFOINT22.getRXFULLIE : TBits_1; inline;
  80765. begin
  80766. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  80767. end;
  80768. procedure TCAN1_C1FIFOINT22.setRXOVFLIE; inline;
  80769. begin
  80770. pTDefRegMap(@Self)^.&set := $00080000;
  80771. end;
  80772. procedure TCAN1_C1FIFOINT22.clearRXOVFLIE; inline;
  80773. begin
  80774. pTDefRegMap(@Self)^.clr := $00080000;
  80775. end;
  80776. procedure TCAN1_C1FIFOINT22.setRXOVFLIE(thebits : TBits_1); inline;
  80777. begin
  80778. if thebits = 0 then
  80779. pTDefRegMap(@Self)^.clr := $00080000
  80780. else
  80781. pTDefRegMap(@Self)^.&set := $00080000;
  80782. end;
  80783. function TCAN1_C1FIFOINT22.getRXOVFLIE : TBits_1; inline;
  80784. begin
  80785. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80786. end;
  80787. procedure TCAN1_C1FIFOINT22.setTXEMPTYIE; inline;
  80788. begin
  80789. pTDefRegMap(@Self)^.&set := $01000000;
  80790. end;
  80791. procedure TCAN1_C1FIFOINT22.clearTXEMPTYIE; inline;
  80792. begin
  80793. pTDefRegMap(@Self)^.clr := $01000000;
  80794. end;
  80795. procedure TCAN1_C1FIFOINT22.setTXEMPTYIE(thebits : TBits_1); inline;
  80796. begin
  80797. if thebits = 0 then
  80798. pTDefRegMap(@Self)^.clr := $01000000
  80799. else
  80800. pTDefRegMap(@Self)^.&set := $01000000;
  80801. end;
  80802. function TCAN1_C1FIFOINT22.getTXEMPTYIE : TBits_1; inline;
  80803. begin
  80804. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  80805. end;
  80806. procedure TCAN1_C1FIFOINT22.setTXHALFIE; inline;
  80807. begin
  80808. pTDefRegMap(@Self)^.&set := $02000000;
  80809. end;
  80810. procedure TCAN1_C1FIFOINT22.clearTXHALFIE; inline;
  80811. begin
  80812. pTDefRegMap(@Self)^.clr := $02000000;
  80813. end;
  80814. procedure TCAN1_C1FIFOINT22.setTXHALFIE(thebits : TBits_1); inline;
  80815. begin
  80816. if thebits = 0 then
  80817. pTDefRegMap(@Self)^.clr := $02000000
  80818. else
  80819. pTDefRegMap(@Self)^.&set := $02000000;
  80820. end;
  80821. function TCAN1_C1FIFOINT22.getTXHALFIE : TBits_1; inline;
  80822. begin
  80823. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  80824. end;
  80825. procedure TCAN1_C1FIFOINT22.setTXNFULLIE; inline;
  80826. begin
  80827. pTDefRegMap(@Self)^.&set := $04000000;
  80828. end;
  80829. procedure TCAN1_C1FIFOINT22.clearTXNFULLIE; inline;
  80830. begin
  80831. pTDefRegMap(@Self)^.clr := $04000000;
  80832. end;
  80833. procedure TCAN1_C1FIFOINT22.setTXNFULLIE(thebits : TBits_1); inline;
  80834. begin
  80835. if thebits = 0 then
  80836. pTDefRegMap(@Self)^.clr := $04000000
  80837. else
  80838. pTDefRegMap(@Self)^.&set := $04000000;
  80839. end;
  80840. function TCAN1_C1FIFOINT22.getTXNFULLIE : TBits_1; inline;
  80841. begin
  80842. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  80843. end;
  80844. procedure TCAN1_C1FIFOINT22.setw(thebits : TBits_32); inline;
  80845. begin
  80846. pTDefRegMap(@Self)^.val := thebits;
  80847. end;
  80848. function TCAN1_C1FIFOINT22.getw : TBits_32; inline;
  80849. begin
  80850. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80851. end;
  80852. procedure TCAN1_C1FIFOCI22.setCFIFOCI(thebits : TBits_5); inline;
  80853. begin
  80854. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  80855. end;
  80856. function TCAN1_C1FIFOCI22.getCFIFOCI : TBits_5; inline;
  80857. begin
  80858. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  80859. end;
  80860. procedure TCAN1_C1FIFOCI22.setw(thebits : TBits_32); inline;
  80861. begin
  80862. pTDefRegMap(@Self)^.val := thebits;
  80863. end;
  80864. function TCAN1_C1FIFOCI22.getw : TBits_32; inline;
  80865. begin
  80866. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80867. end;
  80868. procedure TCAN1_C1FIFOCON23.setTXPRI(thebits : TBits_2); inline;
  80869. begin
  80870. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  80871. end;
  80872. function TCAN1_C1FIFOCON23.getTXPRI : TBits_2; inline;
  80873. begin
  80874. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  80875. end;
  80876. procedure TCAN1_C1FIFOCON23.setRTREN; inline;
  80877. begin
  80878. pTDefRegMap(@Self)^.&set := $00000004;
  80879. end;
  80880. procedure TCAN1_C1FIFOCON23.clearRTREN; inline;
  80881. begin
  80882. pTDefRegMap(@Self)^.clr := $00000004;
  80883. end;
  80884. procedure TCAN1_C1FIFOCON23.setRTREN(thebits : TBits_1); inline;
  80885. begin
  80886. if thebits = 0 then
  80887. pTDefRegMap(@Self)^.clr := $00000004
  80888. else
  80889. pTDefRegMap(@Self)^.&set := $00000004;
  80890. end;
  80891. function TCAN1_C1FIFOCON23.getRTREN : TBits_1; inline;
  80892. begin
  80893. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80894. end;
  80895. procedure TCAN1_C1FIFOCON23.setTXREQ; inline;
  80896. begin
  80897. pTDefRegMap(@Self)^.&set := $00000008;
  80898. end;
  80899. procedure TCAN1_C1FIFOCON23.clearTXREQ; inline;
  80900. begin
  80901. pTDefRegMap(@Self)^.clr := $00000008;
  80902. end;
  80903. procedure TCAN1_C1FIFOCON23.setTXREQ(thebits : TBits_1); inline;
  80904. begin
  80905. if thebits = 0 then
  80906. pTDefRegMap(@Self)^.clr := $00000008
  80907. else
  80908. pTDefRegMap(@Self)^.&set := $00000008;
  80909. end;
  80910. function TCAN1_C1FIFOCON23.getTXREQ : TBits_1; inline;
  80911. begin
  80912. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80913. end;
  80914. procedure TCAN1_C1FIFOCON23.setTXERR; inline;
  80915. begin
  80916. pTDefRegMap(@Self)^.&set := $00000010;
  80917. end;
  80918. procedure TCAN1_C1FIFOCON23.clearTXERR; inline;
  80919. begin
  80920. pTDefRegMap(@Self)^.clr := $00000010;
  80921. end;
  80922. procedure TCAN1_C1FIFOCON23.setTXERR(thebits : TBits_1); inline;
  80923. begin
  80924. if thebits = 0 then
  80925. pTDefRegMap(@Self)^.clr := $00000010
  80926. else
  80927. pTDefRegMap(@Self)^.&set := $00000010;
  80928. end;
  80929. function TCAN1_C1FIFOCON23.getTXERR : TBits_1; inline;
  80930. begin
  80931. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  80932. end;
  80933. procedure TCAN1_C1FIFOCON23.setTXLARB; inline;
  80934. begin
  80935. pTDefRegMap(@Self)^.&set := $00000020;
  80936. end;
  80937. procedure TCAN1_C1FIFOCON23.clearTXLARB; inline;
  80938. begin
  80939. pTDefRegMap(@Self)^.clr := $00000020;
  80940. end;
  80941. procedure TCAN1_C1FIFOCON23.setTXLARB(thebits : TBits_1); inline;
  80942. begin
  80943. if thebits = 0 then
  80944. pTDefRegMap(@Self)^.clr := $00000020
  80945. else
  80946. pTDefRegMap(@Self)^.&set := $00000020;
  80947. end;
  80948. function TCAN1_C1FIFOCON23.getTXLARB : TBits_1; inline;
  80949. begin
  80950. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  80951. end;
  80952. procedure TCAN1_C1FIFOCON23.setTXABAT; inline;
  80953. begin
  80954. pTDefRegMap(@Self)^.&set := $00000040;
  80955. end;
  80956. procedure TCAN1_C1FIFOCON23.clearTXABAT; inline;
  80957. begin
  80958. pTDefRegMap(@Self)^.clr := $00000040;
  80959. end;
  80960. procedure TCAN1_C1FIFOCON23.setTXABAT(thebits : TBits_1); inline;
  80961. begin
  80962. if thebits = 0 then
  80963. pTDefRegMap(@Self)^.clr := $00000040
  80964. else
  80965. pTDefRegMap(@Self)^.&set := $00000040;
  80966. end;
  80967. function TCAN1_C1FIFOCON23.getTXABAT : TBits_1; inline;
  80968. begin
  80969. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  80970. end;
  80971. procedure TCAN1_C1FIFOCON23.setTXEN; inline;
  80972. begin
  80973. pTDefRegMap(@Self)^.&set := $00000080;
  80974. end;
  80975. procedure TCAN1_C1FIFOCON23.clearTXEN; inline;
  80976. begin
  80977. pTDefRegMap(@Self)^.clr := $00000080;
  80978. end;
  80979. procedure TCAN1_C1FIFOCON23.setTXEN(thebits : TBits_1); inline;
  80980. begin
  80981. if thebits = 0 then
  80982. pTDefRegMap(@Self)^.clr := $00000080
  80983. else
  80984. pTDefRegMap(@Self)^.&set := $00000080;
  80985. end;
  80986. function TCAN1_C1FIFOCON23.getTXEN : TBits_1; inline;
  80987. begin
  80988. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  80989. end;
  80990. procedure TCAN1_C1FIFOCON23.setDONLY; inline;
  80991. begin
  80992. pTDefRegMap(@Self)^.&set := $00001000;
  80993. end;
  80994. procedure TCAN1_C1FIFOCON23.clearDONLY; inline;
  80995. begin
  80996. pTDefRegMap(@Self)^.clr := $00001000;
  80997. end;
  80998. procedure TCAN1_C1FIFOCON23.setDONLY(thebits : TBits_1); inline;
  80999. begin
  81000. if thebits = 0 then
  81001. pTDefRegMap(@Self)^.clr := $00001000
  81002. else
  81003. pTDefRegMap(@Self)^.&set := $00001000;
  81004. end;
  81005. function TCAN1_C1FIFOCON23.getDONLY : TBits_1; inline;
  81006. begin
  81007. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  81008. end;
  81009. procedure TCAN1_C1FIFOCON23.setUINC; inline;
  81010. begin
  81011. pTDefRegMap(@Self)^.&set := $00002000;
  81012. end;
  81013. procedure TCAN1_C1FIFOCON23.clearUINC; inline;
  81014. begin
  81015. pTDefRegMap(@Self)^.clr := $00002000;
  81016. end;
  81017. procedure TCAN1_C1FIFOCON23.setUINC(thebits : TBits_1); inline;
  81018. begin
  81019. if thebits = 0 then
  81020. pTDefRegMap(@Self)^.clr := $00002000
  81021. else
  81022. pTDefRegMap(@Self)^.&set := $00002000;
  81023. end;
  81024. function TCAN1_C1FIFOCON23.getUINC : TBits_1; inline;
  81025. begin
  81026. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  81027. end;
  81028. procedure TCAN1_C1FIFOCON23.setFRESET; inline;
  81029. begin
  81030. pTDefRegMap(@Self)^.&set := $00004000;
  81031. end;
  81032. procedure TCAN1_C1FIFOCON23.clearFRESET; inline;
  81033. begin
  81034. pTDefRegMap(@Self)^.clr := $00004000;
  81035. end;
  81036. procedure TCAN1_C1FIFOCON23.setFRESET(thebits : TBits_1); inline;
  81037. begin
  81038. if thebits = 0 then
  81039. pTDefRegMap(@Self)^.clr := $00004000
  81040. else
  81041. pTDefRegMap(@Self)^.&set := $00004000;
  81042. end;
  81043. function TCAN1_C1FIFOCON23.getFRESET : TBits_1; inline;
  81044. begin
  81045. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  81046. end;
  81047. procedure TCAN1_C1FIFOCON23.setFSIZE(thebits : TBits_5); inline;
  81048. begin
  81049. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  81050. end;
  81051. function TCAN1_C1FIFOCON23.getFSIZE : TBits_5; inline;
  81052. begin
  81053. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  81054. end;
  81055. procedure TCAN1_C1FIFOCON23.setw(thebits : TBits_32); inline;
  81056. begin
  81057. pTDefRegMap(@Self)^.val := thebits;
  81058. end;
  81059. function TCAN1_C1FIFOCON23.getw : TBits_32; inline;
  81060. begin
  81061. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81062. end;
  81063. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIF; inline;
  81064. begin
  81065. pTDefRegMap(@Self)^.&set := $00000001;
  81066. end;
  81067. procedure TCAN1_C1FIFOINT23.clearRXNEMPTYIF; inline;
  81068. begin
  81069. pTDefRegMap(@Self)^.clr := $00000001;
  81070. end;
  81071. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIF(thebits : TBits_1); inline;
  81072. begin
  81073. if thebits = 0 then
  81074. pTDefRegMap(@Self)^.clr := $00000001
  81075. else
  81076. pTDefRegMap(@Self)^.&set := $00000001;
  81077. end;
  81078. function TCAN1_C1FIFOINT23.getRXNEMPTYIF : TBits_1; inline;
  81079. begin
  81080. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  81081. end;
  81082. procedure TCAN1_C1FIFOINT23.setRXHALFIF; inline;
  81083. begin
  81084. pTDefRegMap(@Self)^.&set := $00000002;
  81085. end;
  81086. procedure TCAN1_C1FIFOINT23.clearRXHALFIF; inline;
  81087. begin
  81088. pTDefRegMap(@Self)^.clr := $00000002;
  81089. end;
  81090. procedure TCAN1_C1FIFOINT23.setRXHALFIF(thebits : TBits_1); inline;
  81091. begin
  81092. if thebits = 0 then
  81093. pTDefRegMap(@Self)^.clr := $00000002
  81094. else
  81095. pTDefRegMap(@Self)^.&set := $00000002;
  81096. end;
  81097. function TCAN1_C1FIFOINT23.getRXHALFIF : TBits_1; inline;
  81098. begin
  81099. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  81100. end;
  81101. procedure TCAN1_C1FIFOINT23.setRXFULLIF; inline;
  81102. begin
  81103. pTDefRegMap(@Self)^.&set := $00000004;
  81104. end;
  81105. procedure TCAN1_C1FIFOINT23.clearRXFULLIF; inline;
  81106. begin
  81107. pTDefRegMap(@Self)^.clr := $00000004;
  81108. end;
  81109. procedure TCAN1_C1FIFOINT23.setRXFULLIF(thebits : TBits_1); inline;
  81110. begin
  81111. if thebits = 0 then
  81112. pTDefRegMap(@Self)^.clr := $00000004
  81113. else
  81114. pTDefRegMap(@Self)^.&set := $00000004;
  81115. end;
  81116. function TCAN1_C1FIFOINT23.getRXFULLIF : TBits_1; inline;
  81117. begin
  81118. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81119. end;
  81120. procedure TCAN1_C1FIFOINT23.setRXOVFLIF; inline;
  81121. begin
  81122. pTDefRegMap(@Self)^.&set := $00000008;
  81123. end;
  81124. procedure TCAN1_C1FIFOINT23.clearRXOVFLIF; inline;
  81125. begin
  81126. pTDefRegMap(@Self)^.clr := $00000008;
  81127. end;
  81128. procedure TCAN1_C1FIFOINT23.setRXOVFLIF(thebits : TBits_1); inline;
  81129. begin
  81130. if thebits = 0 then
  81131. pTDefRegMap(@Self)^.clr := $00000008
  81132. else
  81133. pTDefRegMap(@Self)^.&set := $00000008;
  81134. end;
  81135. function TCAN1_C1FIFOINT23.getRXOVFLIF : TBits_1; inline;
  81136. begin
  81137. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81138. end;
  81139. procedure TCAN1_C1FIFOINT23.setTXEMPTYIF; inline;
  81140. begin
  81141. pTDefRegMap(@Self)^.&set := $00000100;
  81142. end;
  81143. procedure TCAN1_C1FIFOINT23.clearTXEMPTYIF; inline;
  81144. begin
  81145. pTDefRegMap(@Self)^.clr := $00000100;
  81146. end;
  81147. procedure TCAN1_C1FIFOINT23.setTXEMPTYIF(thebits : TBits_1); inline;
  81148. begin
  81149. if thebits = 0 then
  81150. pTDefRegMap(@Self)^.clr := $00000100
  81151. else
  81152. pTDefRegMap(@Self)^.&set := $00000100;
  81153. end;
  81154. function TCAN1_C1FIFOINT23.getTXEMPTYIF : TBits_1; inline;
  81155. begin
  81156. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  81157. end;
  81158. procedure TCAN1_C1FIFOINT23.setTXHALFIF; inline;
  81159. begin
  81160. pTDefRegMap(@Self)^.&set := $00000200;
  81161. end;
  81162. procedure TCAN1_C1FIFOINT23.clearTXHALFIF; inline;
  81163. begin
  81164. pTDefRegMap(@Self)^.clr := $00000200;
  81165. end;
  81166. procedure TCAN1_C1FIFOINT23.setTXHALFIF(thebits : TBits_1); inline;
  81167. begin
  81168. if thebits = 0 then
  81169. pTDefRegMap(@Self)^.clr := $00000200
  81170. else
  81171. pTDefRegMap(@Self)^.&set := $00000200;
  81172. end;
  81173. function TCAN1_C1FIFOINT23.getTXHALFIF : TBits_1; inline;
  81174. begin
  81175. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  81176. end;
  81177. procedure TCAN1_C1FIFOINT23.setTXNFULLIF; inline;
  81178. begin
  81179. pTDefRegMap(@Self)^.&set := $00000400;
  81180. end;
  81181. procedure TCAN1_C1FIFOINT23.clearTXNFULLIF; inline;
  81182. begin
  81183. pTDefRegMap(@Self)^.clr := $00000400;
  81184. end;
  81185. procedure TCAN1_C1FIFOINT23.setTXNFULLIF(thebits : TBits_1); inline;
  81186. begin
  81187. if thebits = 0 then
  81188. pTDefRegMap(@Self)^.clr := $00000400
  81189. else
  81190. pTDefRegMap(@Self)^.&set := $00000400;
  81191. end;
  81192. function TCAN1_C1FIFOINT23.getTXNFULLIF : TBits_1; inline;
  81193. begin
  81194. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  81195. end;
  81196. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIE; inline;
  81197. begin
  81198. pTDefRegMap(@Self)^.&set := $00010000;
  81199. end;
  81200. procedure TCAN1_C1FIFOINT23.clearRXNEMPTYIE; inline;
  81201. begin
  81202. pTDefRegMap(@Self)^.clr := $00010000;
  81203. end;
  81204. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIE(thebits : TBits_1); inline;
  81205. begin
  81206. if thebits = 0 then
  81207. pTDefRegMap(@Self)^.clr := $00010000
  81208. else
  81209. pTDefRegMap(@Self)^.&set := $00010000;
  81210. end;
  81211. function TCAN1_C1FIFOINT23.getRXNEMPTYIE : TBits_1; inline;
  81212. begin
  81213. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  81214. end;
  81215. procedure TCAN1_C1FIFOINT23.setRXHALFIE; inline;
  81216. begin
  81217. pTDefRegMap(@Self)^.&set := $00020000;
  81218. end;
  81219. procedure TCAN1_C1FIFOINT23.clearRXHALFIE; inline;
  81220. begin
  81221. pTDefRegMap(@Self)^.clr := $00020000;
  81222. end;
  81223. procedure TCAN1_C1FIFOINT23.setRXHALFIE(thebits : TBits_1); inline;
  81224. begin
  81225. if thebits = 0 then
  81226. pTDefRegMap(@Self)^.clr := $00020000
  81227. else
  81228. pTDefRegMap(@Self)^.&set := $00020000;
  81229. end;
  81230. function TCAN1_C1FIFOINT23.getRXHALFIE : TBits_1; inline;
  81231. begin
  81232. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  81233. end;
  81234. procedure TCAN1_C1FIFOINT23.setRXFULLIE; inline;
  81235. begin
  81236. pTDefRegMap(@Self)^.&set := $00040000;
  81237. end;
  81238. procedure TCAN1_C1FIFOINT23.clearRXFULLIE; inline;
  81239. begin
  81240. pTDefRegMap(@Self)^.clr := $00040000;
  81241. end;
  81242. procedure TCAN1_C1FIFOINT23.setRXFULLIE(thebits : TBits_1); inline;
  81243. begin
  81244. if thebits = 0 then
  81245. pTDefRegMap(@Self)^.clr := $00040000
  81246. else
  81247. pTDefRegMap(@Self)^.&set := $00040000;
  81248. end;
  81249. function TCAN1_C1FIFOINT23.getRXFULLIE : TBits_1; inline;
  81250. begin
  81251. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  81252. end;
  81253. procedure TCAN1_C1FIFOINT23.setRXOVFLIE; inline;
  81254. begin
  81255. pTDefRegMap(@Self)^.&set := $00080000;
  81256. end;
  81257. procedure TCAN1_C1FIFOINT23.clearRXOVFLIE; inline;
  81258. begin
  81259. pTDefRegMap(@Self)^.clr := $00080000;
  81260. end;
  81261. procedure TCAN1_C1FIFOINT23.setRXOVFLIE(thebits : TBits_1); inline;
  81262. begin
  81263. if thebits = 0 then
  81264. pTDefRegMap(@Self)^.clr := $00080000
  81265. else
  81266. pTDefRegMap(@Self)^.&set := $00080000;
  81267. end;
  81268. function TCAN1_C1FIFOINT23.getRXOVFLIE : TBits_1; inline;
  81269. begin
  81270. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  81271. end;
  81272. procedure TCAN1_C1FIFOINT23.setTXEMPTYIE; inline;
  81273. begin
  81274. pTDefRegMap(@Self)^.&set := $01000000;
  81275. end;
  81276. procedure TCAN1_C1FIFOINT23.clearTXEMPTYIE; inline;
  81277. begin
  81278. pTDefRegMap(@Self)^.clr := $01000000;
  81279. end;
  81280. procedure TCAN1_C1FIFOINT23.setTXEMPTYIE(thebits : TBits_1); inline;
  81281. begin
  81282. if thebits = 0 then
  81283. pTDefRegMap(@Self)^.clr := $01000000
  81284. else
  81285. pTDefRegMap(@Self)^.&set := $01000000;
  81286. end;
  81287. function TCAN1_C1FIFOINT23.getTXEMPTYIE : TBits_1; inline;
  81288. begin
  81289. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  81290. end;
  81291. procedure TCAN1_C1FIFOINT23.setTXHALFIE; inline;
  81292. begin
  81293. pTDefRegMap(@Self)^.&set := $02000000;
  81294. end;
  81295. procedure TCAN1_C1FIFOINT23.clearTXHALFIE; inline;
  81296. begin
  81297. pTDefRegMap(@Self)^.clr := $02000000;
  81298. end;
  81299. procedure TCAN1_C1FIFOINT23.setTXHALFIE(thebits : TBits_1); inline;
  81300. begin
  81301. if thebits = 0 then
  81302. pTDefRegMap(@Self)^.clr := $02000000
  81303. else
  81304. pTDefRegMap(@Self)^.&set := $02000000;
  81305. end;
  81306. function TCAN1_C1FIFOINT23.getTXHALFIE : TBits_1; inline;
  81307. begin
  81308. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  81309. end;
  81310. procedure TCAN1_C1FIFOINT23.setTXNFULLIE; inline;
  81311. begin
  81312. pTDefRegMap(@Self)^.&set := $04000000;
  81313. end;
  81314. procedure TCAN1_C1FIFOINT23.clearTXNFULLIE; inline;
  81315. begin
  81316. pTDefRegMap(@Self)^.clr := $04000000;
  81317. end;
  81318. procedure TCAN1_C1FIFOINT23.setTXNFULLIE(thebits : TBits_1); inline;
  81319. begin
  81320. if thebits = 0 then
  81321. pTDefRegMap(@Self)^.clr := $04000000
  81322. else
  81323. pTDefRegMap(@Self)^.&set := $04000000;
  81324. end;
  81325. function TCAN1_C1FIFOINT23.getTXNFULLIE : TBits_1; inline;
  81326. begin
  81327. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  81328. end;
  81329. procedure TCAN1_C1FIFOINT23.setw(thebits : TBits_32); inline;
  81330. begin
  81331. pTDefRegMap(@Self)^.val := thebits;
  81332. end;
  81333. function TCAN1_C1FIFOINT23.getw : TBits_32; inline;
  81334. begin
  81335. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81336. end;
  81337. procedure TCAN1_C1FIFOCI23.setCFIFOCI(thebits : TBits_5); inline;
  81338. begin
  81339. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  81340. end;
  81341. function TCAN1_C1FIFOCI23.getCFIFOCI : TBits_5; inline;
  81342. begin
  81343. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  81344. end;
  81345. procedure TCAN1_C1FIFOCI23.setw(thebits : TBits_32); inline;
  81346. begin
  81347. pTDefRegMap(@Self)^.val := thebits;
  81348. end;
  81349. function TCAN1_C1FIFOCI23.getw : TBits_32; inline;
  81350. begin
  81351. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81352. end;
  81353. procedure TCAN1_C1FIFOCON24.setTXPRI(thebits : TBits_2); inline;
  81354. begin
  81355. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  81356. end;
  81357. function TCAN1_C1FIFOCON24.getTXPRI : TBits_2; inline;
  81358. begin
  81359. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  81360. end;
  81361. procedure TCAN1_C1FIFOCON24.setRTREN; inline;
  81362. begin
  81363. pTDefRegMap(@Self)^.&set := $00000004;
  81364. end;
  81365. procedure TCAN1_C1FIFOCON24.clearRTREN; inline;
  81366. begin
  81367. pTDefRegMap(@Self)^.clr := $00000004;
  81368. end;
  81369. procedure TCAN1_C1FIFOCON24.setRTREN(thebits : TBits_1); inline;
  81370. begin
  81371. if thebits = 0 then
  81372. pTDefRegMap(@Self)^.clr := $00000004
  81373. else
  81374. pTDefRegMap(@Self)^.&set := $00000004;
  81375. end;
  81376. function TCAN1_C1FIFOCON24.getRTREN : TBits_1; inline;
  81377. begin
  81378. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81379. end;
  81380. procedure TCAN1_C1FIFOCON24.setTXREQ; inline;
  81381. begin
  81382. pTDefRegMap(@Self)^.&set := $00000008;
  81383. end;
  81384. procedure TCAN1_C1FIFOCON24.clearTXREQ; inline;
  81385. begin
  81386. pTDefRegMap(@Self)^.clr := $00000008;
  81387. end;
  81388. procedure TCAN1_C1FIFOCON24.setTXREQ(thebits : TBits_1); inline;
  81389. begin
  81390. if thebits = 0 then
  81391. pTDefRegMap(@Self)^.clr := $00000008
  81392. else
  81393. pTDefRegMap(@Self)^.&set := $00000008;
  81394. end;
  81395. function TCAN1_C1FIFOCON24.getTXREQ : TBits_1; inline;
  81396. begin
  81397. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81398. end;
  81399. procedure TCAN1_C1FIFOCON24.setTXERR; inline;
  81400. begin
  81401. pTDefRegMap(@Self)^.&set := $00000010;
  81402. end;
  81403. procedure TCAN1_C1FIFOCON24.clearTXERR; inline;
  81404. begin
  81405. pTDefRegMap(@Self)^.clr := $00000010;
  81406. end;
  81407. procedure TCAN1_C1FIFOCON24.setTXERR(thebits : TBits_1); inline;
  81408. begin
  81409. if thebits = 0 then
  81410. pTDefRegMap(@Self)^.clr := $00000010
  81411. else
  81412. pTDefRegMap(@Self)^.&set := $00000010;
  81413. end;
  81414. function TCAN1_C1FIFOCON24.getTXERR : TBits_1; inline;
  81415. begin
  81416. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  81417. end;
  81418. procedure TCAN1_C1FIFOCON24.setTXLARB; inline;
  81419. begin
  81420. pTDefRegMap(@Self)^.&set := $00000020;
  81421. end;
  81422. procedure TCAN1_C1FIFOCON24.clearTXLARB; inline;
  81423. begin
  81424. pTDefRegMap(@Self)^.clr := $00000020;
  81425. end;
  81426. procedure TCAN1_C1FIFOCON24.setTXLARB(thebits : TBits_1); inline;
  81427. begin
  81428. if thebits = 0 then
  81429. pTDefRegMap(@Self)^.clr := $00000020
  81430. else
  81431. pTDefRegMap(@Self)^.&set := $00000020;
  81432. end;
  81433. function TCAN1_C1FIFOCON24.getTXLARB : TBits_1; inline;
  81434. begin
  81435. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  81436. end;
  81437. procedure TCAN1_C1FIFOCON24.setTXABAT; inline;
  81438. begin
  81439. pTDefRegMap(@Self)^.&set := $00000040;
  81440. end;
  81441. procedure TCAN1_C1FIFOCON24.clearTXABAT; inline;
  81442. begin
  81443. pTDefRegMap(@Self)^.clr := $00000040;
  81444. end;
  81445. procedure TCAN1_C1FIFOCON24.setTXABAT(thebits : TBits_1); inline;
  81446. begin
  81447. if thebits = 0 then
  81448. pTDefRegMap(@Self)^.clr := $00000040
  81449. else
  81450. pTDefRegMap(@Self)^.&set := $00000040;
  81451. end;
  81452. function TCAN1_C1FIFOCON24.getTXABAT : TBits_1; inline;
  81453. begin
  81454. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  81455. end;
  81456. procedure TCAN1_C1FIFOCON24.setTXEN; inline;
  81457. begin
  81458. pTDefRegMap(@Self)^.&set := $00000080;
  81459. end;
  81460. procedure TCAN1_C1FIFOCON24.clearTXEN; inline;
  81461. begin
  81462. pTDefRegMap(@Self)^.clr := $00000080;
  81463. end;
  81464. procedure TCAN1_C1FIFOCON24.setTXEN(thebits : TBits_1); inline;
  81465. begin
  81466. if thebits = 0 then
  81467. pTDefRegMap(@Self)^.clr := $00000080
  81468. else
  81469. pTDefRegMap(@Self)^.&set := $00000080;
  81470. end;
  81471. function TCAN1_C1FIFOCON24.getTXEN : TBits_1; inline;
  81472. begin
  81473. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  81474. end;
  81475. procedure TCAN1_C1FIFOCON24.setDONLY; inline;
  81476. begin
  81477. pTDefRegMap(@Self)^.&set := $00001000;
  81478. end;
  81479. procedure TCAN1_C1FIFOCON24.clearDONLY; inline;
  81480. begin
  81481. pTDefRegMap(@Self)^.clr := $00001000;
  81482. end;
  81483. procedure TCAN1_C1FIFOCON24.setDONLY(thebits : TBits_1); inline;
  81484. begin
  81485. if thebits = 0 then
  81486. pTDefRegMap(@Self)^.clr := $00001000
  81487. else
  81488. pTDefRegMap(@Self)^.&set := $00001000;
  81489. end;
  81490. function TCAN1_C1FIFOCON24.getDONLY : TBits_1; inline;
  81491. begin
  81492. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  81493. end;
  81494. procedure TCAN1_C1FIFOCON24.setUINC; inline;
  81495. begin
  81496. pTDefRegMap(@Self)^.&set := $00002000;
  81497. end;
  81498. procedure TCAN1_C1FIFOCON24.clearUINC; inline;
  81499. begin
  81500. pTDefRegMap(@Self)^.clr := $00002000;
  81501. end;
  81502. procedure TCAN1_C1FIFOCON24.setUINC(thebits : TBits_1); inline;
  81503. begin
  81504. if thebits = 0 then
  81505. pTDefRegMap(@Self)^.clr := $00002000
  81506. else
  81507. pTDefRegMap(@Self)^.&set := $00002000;
  81508. end;
  81509. function TCAN1_C1FIFOCON24.getUINC : TBits_1; inline;
  81510. begin
  81511. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  81512. end;
  81513. procedure TCAN1_C1FIFOCON24.setFRESET; inline;
  81514. begin
  81515. pTDefRegMap(@Self)^.&set := $00004000;
  81516. end;
  81517. procedure TCAN1_C1FIFOCON24.clearFRESET; inline;
  81518. begin
  81519. pTDefRegMap(@Self)^.clr := $00004000;
  81520. end;
  81521. procedure TCAN1_C1FIFOCON24.setFRESET(thebits : TBits_1); inline;
  81522. begin
  81523. if thebits = 0 then
  81524. pTDefRegMap(@Self)^.clr := $00004000
  81525. else
  81526. pTDefRegMap(@Self)^.&set := $00004000;
  81527. end;
  81528. function TCAN1_C1FIFOCON24.getFRESET : TBits_1; inline;
  81529. begin
  81530. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  81531. end;
  81532. procedure TCAN1_C1FIFOCON24.setFSIZE(thebits : TBits_5); inline;
  81533. begin
  81534. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  81535. end;
  81536. function TCAN1_C1FIFOCON24.getFSIZE : TBits_5; inline;
  81537. begin
  81538. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  81539. end;
  81540. procedure TCAN1_C1FIFOCON24.setw(thebits : TBits_32); inline;
  81541. begin
  81542. pTDefRegMap(@Self)^.val := thebits;
  81543. end;
  81544. function TCAN1_C1FIFOCON24.getw : TBits_32; inline;
  81545. begin
  81546. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81547. end;
  81548. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIF; inline;
  81549. begin
  81550. pTDefRegMap(@Self)^.&set := $00000001;
  81551. end;
  81552. procedure TCAN1_C1FIFOINT24.clearRXNEMPTYIF; inline;
  81553. begin
  81554. pTDefRegMap(@Self)^.clr := $00000001;
  81555. end;
  81556. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIF(thebits : TBits_1); inline;
  81557. begin
  81558. if thebits = 0 then
  81559. pTDefRegMap(@Self)^.clr := $00000001
  81560. else
  81561. pTDefRegMap(@Self)^.&set := $00000001;
  81562. end;
  81563. function TCAN1_C1FIFOINT24.getRXNEMPTYIF : TBits_1; inline;
  81564. begin
  81565. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  81566. end;
  81567. procedure TCAN1_C1FIFOINT24.setRXHALFIF; inline;
  81568. begin
  81569. pTDefRegMap(@Self)^.&set := $00000002;
  81570. end;
  81571. procedure TCAN1_C1FIFOINT24.clearRXHALFIF; inline;
  81572. begin
  81573. pTDefRegMap(@Self)^.clr := $00000002;
  81574. end;
  81575. procedure TCAN1_C1FIFOINT24.setRXHALFIF(thebits : TBits_1); inline;
  81576. begin
  81577. if thebits = 0 then
  81578. pTDefRegMap(@Self)^.clr := $00000002
  81579. else
  81580. pTDefRegMap(@Self)^.&set := $00000002;
  81581. end;
  81582. function TCAN1_C1FIFOINT24.getRXHALFIF : TBits_1; inline;
  81583. begin
  81584. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  81585. end;
  81586. procedure TCAN1_C1FIFOINT24.setRXFULLIF; inline;
  81587. begin
  81588. pTDefRegMap(@Self)^.&set := $00000004;
  81589. end;
  81590. procedure TCAN1_C1FIFOINT24.clearRXFULLIF; inline;
  81591. begin
  81592. pTDefRegMap(@Self)^.clr := $00000004;
  81593. end;
  81594. procedure TCAN1_C1FIFOINT24.setRXFULLIF(thebits : TBits_1); inline;
  81595. begin
  81596. if thebits = 0 then
  81597. pTDefRegMap(@Self)^.clr := $00000004
  81598. else
  81599. pTDefRegMap(@Self)^.&set := $00000004;
  81600. end;
  81601. function TCAN1_C1FIFOINT24.getRXFULLIF : TBits_1; inline;
  81602. begin
  81603. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81604. end;
  81605. procedure TCAN1_C1FIFOINT24.setRXOVFLIF; inline;
  81606. begin
  81607. pTDefRegMap(@Self)^.&set := $00000008;
  81608. end;
  81609. procedure TCAN1_C1FIFOINT24.clearRXOVFLIF; inline;
  81610. begin
  81611. pTDefRegMap(@Self)^.clr := $00000008;
  81612. end;
  81613. procedure TCAN1_C1FIFOINT24.setRXOVFLIF(thebits : TBits_1); inline;
  81614. begin
  81615. if thebits = 0 then
  81616. pTDefRegMap(@Self)^.clr := $00000008
  81617. else
  81618. pTDefRegMap(@Self)^.&set := $00000008;
  81619. end;
  81620. function TCAN1_C1FIFOINT24.getRXOVFLIF : TBits_1; inline;
  81621. begin
  81622. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81623. end;
  81624. procedure TCAN1_C1FIFOINT24.setTXEMPTYIF; inline;
  81625. begin
  81626. pTDefRegMap(@Self)^.&set := $00000100;
  81627. end;
  81628. procedure TCAN1_C1FIFOINT24.clearTXEMPTYIF; inline;
  81629. begin
  81630. pTDefRegMap(@Self)^.clr := $00000100;
  81631. end;
  81632. procedure TCAN1_C1FIFOINT24.setTXEMPTYIF(thebits : TBits_1); inline;
  81633. begin
  81634. if thebits = 0 then
  81635. pTDefRegMap(@Self)^.clr := $00000100
  81636. else
  81637. pTDefRegMap(@Self)^.&set := $00000100;
  81638. end;
  81639. function TCAN1_C1FIFOINT24.getTXEMPTYIF : TBits_1; inline;
  81640. begin
  81641. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  81642. end;
  81643. procedure TCAN1_C1FIFOINT24.setTXHALFIF; inline;
  81644. begin
  81645. pTDefRegMap(@Self)^.&set := $00000200;
  81646. end;
  81647. procedure TCAN1_C1FIFOINT24.clearTXHALFIF; inline;
  81648. begin
  81649. pTDefRegMap(@Self)^.clr := $00000200;
  81650. end;
  81651. procedure TCAN1_C1FIFOINT24.setTXHALFIF(thebits : TBits_1); inline;
  81652. begin
  81653. if thebits = 0 then
  81654. pTDefRegMap(@Self)^.clr := $00000200
  81655. else
  81656. pTDefRegMap(@Self)^.&set := $00000200;
  81657. end;
  81658. function TCAN1_C1FIFOINT24.getTXHALFIF : TBits_1; inline;
  81659. begin
  81660. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  81661. end;
  81662. procedure TCAN1_C1FIFOINT24.setTXNFULLIF; inline;
  81663. begin
  81664. pTDefRegMap(@Self)^.&set := $00000400;
  81665. end;
  81666. procedure TCAN1_C1FIFOINT24.clearTXNFULLIF; inline;
  81667. begin
  81668. pTDefRegMap(@Self)^.clr := $00000400;
  81669. end;
  81670. procedure TCAN1_C1FIFOINT24.setTXNFULLIF(thebits : TBits_1); inline;
  81671. begin
  81672. if thebits = 0 then
  81673. pTDefRegMap(@Self)^.clr := $00000400
  81674. else
  81675. pTDefRegMap(@Self)^.&set := $00000400;
  81676. end;
  81677. function TCAN1_C1FIFOINT24.getTXNFULLIF : TBits_1; inline;
  81678. begin
  81679. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  81680. end;
  81681. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIE; inline;
  81682. begin
  81683. pTDefRegMap(@Self)^.&set := $00010000;
  81684. end;
  81685. procedure TCAN1_C1FIFOINT24.clearRXNEMPTYIE; inline;
  81686. begin
  81687. pTDefRegMap(@Self)^.clr := $00010000;
  81688. end;
  81689. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIE(thebits : TBits_1); inline;
  81690. begin
  81691. if thebits = 0 then
  81692. pTDefRegMap(@Self)^.clr := $00010000
  81693. else
  81694. pTDefRegMap(@Self)^.&set := $00010000;
  81695. end;
  81696. function TCAN1_C1FIFOINT24.getRXNEMPTYIE : TBits_1; inline;
  81697. begin
  81698. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  81699. end;
  81700. procedure TCAN1_C1FIFOINT24.setRXHALFIE; inline;
  81701. begin
  81702. pTDefRegMap(@Self)^.&set := $00020000;
  81703. end;
  81704. procedure TCAN1_C1FIFOINT24.clearRXHALFIE; inline;
  81705. begin
  81706. pTDefRegMap(@Self)^.clr := $00020000;
  81707. end;
  81708. procedure TCAN1_C1FIFOINT24.setRXHALFIE(thebits : TBits_1); inline;
  81709. begin
  81710. if thebits = 0 then
  81711. pTDefRegMap(@Self)^.clr := $00020000
  81712. else
  81713. pTDefRegMap(@Self)^.&set := $00020000;
  81714. end;
  81715. function TCAN1_C1FIFOINT24.getRXHALFIE : TBits_1; inline;
  81716. begin
  81717. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  81718. end;
  81719. procedure TCAN1_C1FIFOINT24.setRXFULLIE; inline;
  81720. begin
  81721. pTDefRegMap(@Self)^.&set := $00040000;
  81722. end;
  81723. procedure TCAN1_C1FIFOINT24.clearRXFULLIE; inline;
  81724. begin
  81725. pTDefRegMap(@Self)^.clr := $00040000;
  81726. end;
  81727. procedure TCAN1_C1FIFOINT24.setRXFULLIE(thebits : TBits_1); inline;
  81728. begin
  81729. if thebits = 0 then
  81730. pTDefRegMap(@Self)^.clr := $00040000
  81731. else
  81732. pTDefRegMap(@Self)^.&set := $00040000;
  81733. end;
  81734. function TCAN1_C1FIFOINT24.getRXFULLIE : TBits_1; inline;
  81735. begin
  81736. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  81737. end;
  81738. procedure TCAN1_C1FIFOINT24.setRXOVFLIE; inline;
  81739. begin
  81740. pTDefRegMap(@Self)^.&set := $00080000;
  81741. end;
  81742. procedure TCAN1_C1FIFOINT24.clearRXOVFLIE; inline;
  81743. begin
  81744. pTDefRegMap(@Self)^.clr := $00080000;
  81745. end;
  81746. procedure TCAN1_C1FIFOINT24.setRXOVFLIE(thebits : TBits_1); inline;
  81747. begin
  81748. if thebits = 0 then
  81749. pTDefRegMap(@Self)^.clr := $00080000
  81750. else
  81751. pTDefRegMap(@Self)^.&set := $00080000;
  81752. end;
  81753. function TCAN1_C1FIFOINT24.getRXOVFLIE : TBits_1; inline;
  81754. begin
  81755. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  81756. end;
  81757. procedure TCAN1_C1FIFOINT24.setTXEMPTYIE; inline;
  81758. begin
  81759. pTDefRegMap(@Self)^.&set := $01000000;
  81760. end;
  81761. procedure TCAN1_C1FIFOINT24.clearTXEMPTYIE; inline;
  81762. begin
  81763. pTDefRegMap(@Self)^.clr := $01000000;
  81764. end;
  81765. procedure TCAN1_C1FIFOINT24.setTXEMPTYIE(thebits : TBits_1); inline;
  81766. begin
  81767. if thebits = 0 then
  81768. pTDefRegMap(@Self)^.clr := $01000000
  81769. else
  81770. pTDefRegMap(@Self)^.&set := $01000000;
  81771. end;
  81772. function TCAN1_C1FIFOINT24.getTXEMPTYIE : TBits_1; inline;
  81773. begin
  81774. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  81775. end;
  81776. procedure TCAN1_C1FIFOINT24.setTXHALFIE; inline;
  81777. begin
  81778. pTDefRegMap(@Self)^.&set := $02000000;
  81779. end;
  81780. procedure TCAN1_C1FIFOINT24.clearTXHALFIE; inline;
  81781. begin
  81782. pTDefRegMap(@Self)^.clr := $02000000;
  81783. end;
  81784. procedure TCAN1_C1FIFOINT24.setTXHALFIE(thebits : TBits_1); inline;
  81785. begin
  81786. if thebits = 0 then
  81787. pTDefRegMap(@Self)^.clr := $02000000
  81788. else
  81789. pTDefRegMap(@Self)^.&set := $02000000;
  81790. end;
  81791. function TCAN1_C1FIFOINT24.getTXHALFIE : TBits_1; inline;
  81792. begin
  81793. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  81794. end;
  81795. procedure TCAN1_C1FIFOINT24.setTXNFULLIE; inline;
  81796. begin
  81797. pTDefRegMap(@Self)^.&set := $04000000;
  81798. end;
  81799. procedure TCAN1_C1FIFOINT24.clearTXNFULLIE; inline;
  81800. begin
  81801. pTDefRegMap(@Self)^.clr := $04000000;
  81802. end;
  81803. procedure TCAN1_C1FIFOINT24.setTXNFULLIE(thebits : TBits_1); inline;
  81804. begin
  81805. if thebits = 0 then
  81806. pTDefRegMap(@Self)^.clr := $04000000
  81807. else
  81808. pTDefRegMap(@Self)^.&set := $04000000;
  81809. end;
  81810. function TCAN1_C1FIFOINT24.getTXNFULLIE : TBits_1; inline;
  81811. begin
  81812. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  81813. end;
  81814. procedure TCAN1_C1FIFOINT24.setw(thebits : TBits_32); inline;
  81815. begin
  81816. pTDefRegMap(@Self)^.val := thebits;
  81817. end;
  81818. function TCAN1_C1FIFOINT24.getw : TBits_32; inline;
  81819. begin
  81820. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81821. end;
  81822. procedure TCAN1_C1FIFOCI24.setCFIFOCI(thebits : TBits_5); inline;
  81823. begin
  81824. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  81825. end;
  81826. function TCAN1_C1FIFOCI24.getCFIFOCI : TBits_5; inline;
  81827. begin
  81828. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  81829. end;
  81830. procedure TCAN1_C1FIFOCI24.setw(thebits : TBits_32); inline;
  81831. begin
  81832. pTDefRegMap(@Self)^.val := thebits;
  81833. end;
  81834. function TCAN1_C1FIFOCI24.getw : TBits_32; inline;
  81835. begin
  81836. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81837. end;
  81838. procedure TCAN1_C1FIFOCON25.setTXPRI(thebits : TBits_2); inline;
  81839. begin
  81840. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  81841. end;
  81842. function TCAN1_C1FIFOCON25.getTXPRI : TBits_2; inline;
  81843. begin
  81844. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  81845. end;
  81846. procedure TCAN1_C1FIFOCON25.setRTREN; inline;
  81847. begin
  81848. pTDefRegMap(@Self)^.&set := $00000004;
  81849. end;
  81850. procedure TCAN1_C1FIFOCON25.clearRTREN; inline;
  81851. begin
  81852. pTDefRegMap(@Self)^.clr := $00000004;
  81853. end;
  81854. procedure TCAN1_C1FIFOCON25.setRTREN(thebits : TBits_1); inline;
  81855. begin
  81856. if thebits = 0 then
  81857. pTDefRegMap(@Self)^.clr := $00000004
  81858. else
  81859. pTDefRegMap(@Self)^.&set := $00000004;
  81860. end;
  81861. function TCAN1_C1FIFOCON25.getRTREN : TBits_1; inline;
  81862. begin
  81863. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81864. end;
  81865. procedure TCAN1_C1FIFOCON25.setTXREQ; inline;
  81866. begin
  81867. pTDefRegMap(@Self)^.&set := $00000008;
  81868. end;
  81869. procedure TCAN1_C1FIFOCON25.clearTXREQ; inline;
  81870. begin
  81871. pTDefRegMap(@Self)^.clr := $00000008;
  81872. end;
  81873. procedure TCAN1_C1FIFOCON25.setTXREQ(thebits : TBits_1); inline;
  81874. begin
  81875. if thebits = 0 then
  81876. pTDefRegMap(@Self)^.clr := $00000008
  81877. else
  81878. pTDefRegMap(@Self)^.&set := $00000008;
  81879. end;
  81880. function TCAN1_C1FIFOCON25.getTXREQ : TBits_1; inline;
  81881. begin
  81882. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81883. end;
  81884. procedure TCAN1_C1FIFOCON25.setTXERR; inline;
  81885. begin
  81886. pTDefRegMap(@Self)^.&set := $00000010;
  81887. end;
  81888. procedure TCAN1_C1FIFOCON25.clearTXERR; inline;
  81889. begin
  81890. pTDefRegMap(@Self)^.clr := $00000010;
  81891. end;
  81892. procedure TCAN1_C1FIFOCON25.setTXERR(thebits : TBits_1); inline;
  81893. begin
  81894. if thebits = 0 then
  81895. pTDefRegMap(@Self)^.clr := $00000010
  81896. else
  81897. pTDefRegMap(@Self)^.&set := $00000010;
  81898. end;
  81899. function TCAN1_C1FIFOCON25.getTXERR : TBits_1; inline;
  81900. begin
  81901. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  81902. end;
  81903. procedure TCAN1_C1FIFOCON25.setTXLARB; inline;
  81904. begin
  81905. pTDefRegMap(@Self)^.&set := $00000020;
  81906. end;
  81907. procedure TCAN1_C1FIFOCON25.clearTXLARB; inline;
  81908. begin
  81909. pTDefRegMap(@Self)^.clr := $00000020;
  81910. end;
  81911. procedure TCAN1_C1FIFOCON25.setTXLARB(thebits : TBits_1); inline;
  81912. begin
  81913. if thebits = 0 then
  81914. pTDefRegMap(@Self)^.clr := $00000020
  81915. else
  81916. pTDefRegMap(@Self)^.&set := $00000020;
  81917. end;
  81918. function TCAN1_C1FIFOCON25.getTXLARB : TBits_1; inline;
  81919. begin
  81920. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  81921. end;
  81922. procedure TCAN1_C1FIFOCON25.setTXABAT; inline;
  81923. begin
  81924. pTDefRegMap(@Self)^.&set := $00000040;
  81925. end;
  81926. procedure TCAN1_C1FIFOCON25.clearTXABAT; inline;
  81927. begin
  81928. pTDefRegMap(@Self)^.clr := $00000040;
  81929. end;
  81930. procedure TCAN1_C1FIFOCON25.setTXABAT(thebits : TBits_1); inline;
  81931. begin
  81932. if thebits = 0 then
  81933. pTDefRegMap(@Self)^.clr := $00000040
  81934. else
  81935. pTDefRegMap(@Self)^.&set := $00000040;
  81936. end;
  81937. function TCAN1_C1FIFOCON25.getTXABAT : TBits_1; inline;
  81938. begin
  81939. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  81940. end;
  81941. procedure TCAN1_C1FIFOCON25.setTXEN; inline;
  81942. begin
  81943. pTDefRegMap(@Self)^.&set := $00000080;
  81944. end;
  81945. procedure TCAN1_C1FIFOCON25.clearTXEN; inline;
  81946. begin
  81947. pTDefRegMap(@Self)^.clr := $00000080;
  81948. end;
  81949. procedure TCAN1_C1FIFOCON25.setTXEN(thebits : TBits_1); inline;
  81950. begin
  81951. if thebits = 0 then
  81952. pTDefRegMap(@Self)^.clr := $00000080
  81953. else
  81954. pTDefRegMap(@Self)^.&set := $00000080;
  81955. end;
  81956. function TCAN1_C1FIFOCON25.getTXEN : TBits_1; inline;
  81957. begin
  81958. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  81959. end;
  81960. procedure TCAN1_C1FIFOCON25.setDONLY; inline;
  81961. begin
  81962. pTDefRegMap(@Self)^.&set := $00001000;
  81963. end;
  81964. procedure TCAN1_C1FIFOCON25.clearDONLY; inline;
  81965. begin
  81966. pTDefRegMap(@Self)^.clr := $00001000;
  81967. end;
  81968. procedure TCAN1_C1FIFOCON25.setDONLY(thebits : TBits_1); inline;
  81969. begin
  81970. if thebits = 0 then
  81971. pTDefRegMap(@Self)^.clr := $00001000
  81972. else
  81973. pTDefRegMap(@Self)^.&set := $00001000;
  81974. end;
  81975. function TCAN1_C1FIFOCON25.getDONLY : TBits_1; inline;
  81976. begin
  81977. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  81978. end;
  81979. procedure TCAN1_C1FIFOCON25.setUINC; inline;
  81980. begin
  81981. pTDefRegMap(@Self)^.&set := $00002000;
  81982. end;
  81983. procedure TCAN1_C1FIFOCON25.clearUINC; inline;
  81984. begin
  81985. pTDefRegMap(@Self)^.clr := $00002000;
  81986. end;
  81987. procedure TCAN1_C1FIFOCON25.setUINC(thebits : TBits_1); inline;
  81988. begin
  81989. if thebits = 0 then
  81990. pTDefRegMap(@Self)^.clr := $00002000
  81991. else
  81992. pTDefRegMap(@Self)^.&set := $00002000;
  81993. end;
  81994. function TCAN1_C1FIFOCON25.getUINC : TBits_1; inline;
  81995. begin
  81996. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  81997. end;
  81998. procedure TCAN1_C1FIFOCON25.setFRESET; inline;
  81999. begin
  82000. pTDefRegMap(@Self)^.&set := $00004000;
  82001. end;
  82002. procedure TCAN1_C1FIFOCON25.clearFRESET; inline;
  82003. begin
  82004. pTDefRegMap(@Self)^.clr := $00004000;
  82005. end;
  82006. procedure TCAN1_C1FIFOCON25.setFRESET(thebits : TBits_1); inline;
  82007. begin
  82008. if thebits = 0 then
  82009. pTDefRegMap(@Self)^.clr := $00004000
  82010. else
  82011. pTDefRegMap(@Self)^.&set := $00004000;
  82012. end;
  82013. function TCAN1_C1FIFOCON25.getFRESET : TBits_1; inline;
  82014. begin
  82015. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  82016. end;
  82017. procedure TCAN1_C1FIFOCON25.setFSIZE(thebits : TBits_5); inline;
  82018. begin
  82019. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  82020. end;
  82021. function TCAN1_C1FIFOCON25.getFSIZE : TBits_5; inline;
  82022. begin
  82023. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  82024. end;
  82025. procedure TCAN1_C1FIFOCON25.setw(thebits : TBits_32); inline;
  82026. begin
  82027. pTDefRegMap(@Self)^.val := thebits;
  82028. end;
  82029. function TCAN1_C1FIFOCON25.getw : TBits_32; inline;
  82030. begin
  82031. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82032. end;
  82033. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIF; inline;
  82034. begin
  82035. pTDefRegMap(@Self)^.&set := $00000001;
  82036. end;
  82037. procedure TCAN1_C1FIFOINT25.clearRXNEMPTYIF; inline;
  82038. begin
  82039. pTDefRegMap(@Self)^.clr := $00000001;
  82040. end;
  82041. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIF(thebits : TBits_1); inline;
  82042. begin
  82043. if thebits = 0 then
  82044. pTDefRegMap(@Self)^.clr := $00000001
  82045. else
  82046. pTDefRegMap(@Self)^.&set := $00000001;
  82047. end;
  82048. function TCAN1_C1FIFOINT25.getRXNEMPTYIF : TBits_1; inline;
  82049. begin
  82050. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  82051. end;
  82052. procedure TCAN1_C1FIFOINT25.setRXHALFIF; inline;
  82053. begin
  82054. pTDefRegMap(@Self)^.&set := $00000002;
  82055. end;
  82056. procedure TCAN1_C1FIFOINT25.clearRXHALFIF; inline;
  82057. begin
  82058. pTDefRegMap(@Self)^.clr := $00000002;
  82059. end;
  82060. procedure TCAN1_C1FIFOINT25.setRXHALFIF(thebits : TBits_1); inline;
  82061. begin
  82062. if thebits = 0 then
  82063. pTDefRegMap(@Self)^.clr := $00000002
  82064. else
  82065. pTDefRegMap(@Self)^.&set := $00000002;
  82066. end;
  82067. function TCAN1_C1FIFOINT25.getRXHALFIF : TBits_1; inline;
  82068. begin
  82069. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  82070. end;
  82071. procedure TCAN1_C1FIFOINT25.setRXFULLIF; inline;
  82072. begin
  82073. pTDefRegMap(@Self)^.&set := $00000004;
  82074. end;
  82075. procedure TCAN1_C1FIFOINT25.clearRXFULLIF; inline;
  82076. begin
  82077. pTDefRegMap(@Self)^.clr := $00000004;
  82078. end;
  82079. procedure TCAN1_C1FIFOINT25.setRXFULLIF(thebits : TBits_1); inline;
  82080. begin
  82081. if thebits = 0 then
  82082. pTDefRegMap(@Self)^.clr := $00000004
  82083. else
  82084. pTDefRegMap(@Self)^.&set := $00000004;
  82085. end;
  82086. function TCAN1_C1FIFOINT25.getRXFULLIF : TBits_1; inline;
  82087. begin
  82088. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82089. end;
  82090. procedure TCAN1_C1FIFOINT25.setRXOVFLIF; inline;
  82091. begin
  82092. pTDefRegMap(@Self)^.&set := $00000008;
  82093. end;
  82094. procedure TCAN1_C1FIFOINT25.clearRXOVFLIF; inline;
  82095. begin
  82096. pTDefRegMap(@Self)^.clr := $00000008;
  82097. end;
  82098. procedure TCAN1_C1FIFOINT25.setRXOVFLIF(thebits : TBits_1); inline;
  82099. begin
  82100. if thebits = 0 then
  82101. pTDefRegMap(@Self)^.clr := $00000008
  82102. else
  82103. pTDefRegMap(@Self)^.&set := $00000008;
  82104. end;
  82105. function TCAN1_C1FIFOINT25.getRXOVFLIF : TBits_1; inline;
  82106. begin
  82107. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82108. end;
  82109. procedure TCAN1_C1FIFOINT25.setTXEMPTYIF; inline;
  82110. begin
  82111. pTDefRegMap(@Self)^.&set := $00000100;
  82112. end;
  82113. procedure TCAN1_C1FIFOINT25.clearTXEMPTYIF; inline;
  82114. begin
  82115. pTDefRegMap(@Self)^.clr := $00000100;
  82116. end;
  82117. procedure TCAN1_C1FIFOINT25.setTXEMPTYIF(thebits : TBits_1); inline;
  82118. begin
  82119. if thebits = 0 then
  82120. pTDefRegMap(@Self)^.clr := $00000100
  82121. else
  82122. pTDefRegMap(@Self)^.&set := $00000100;
  82123. end;
  82124. function TCAN1_C1FIFOINT25.getTXEMPTYIF : TBits_1; inline;
  82125. begin
  82126. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  82127. end;
  82128. procedure TCAN1_C1FIFOINT25.setTXHALFIF; inline;
  82129. begin
  82130. pTDefRegMap(@Self)^.&set := $00000200;
  82131. end;
  82132. procedure TCAN1_C1FIFOINT25.clearTXHALFIF; inline;
  82133. begin
  82134. pTDefRegMap(@Self)^.clr := $00000200;
  82135. end;
  82136. procedure TCAN1_C1FIFOINT25.setTXHALFIF(thebits : TBits_1); inline;
  82137. begin
  82138. if thebits = 0 then
  82139. pTDefRegMap(@Self)^.clr := $00000200
  82140. else
  82141. pTDefRegMap(@Self)^.&set := $00000200;
  82142. end;
  82143. function TCAN1_C1FIFOINT25.getTXHALFIF : TBits_1; inline;
  82144. begin
  82145. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  82146. end;
  82147. procedure TCAN1_C1FIFOINT25.setTXNFULLIF; inline;
  82148. begin
  82149. pTDefRegMap(@Self)^.&set := $00000400;
  82150. end;
  82151. procedure TCAN1_C1FIFOINT25.clearTXNFULLIF; inline;
  82152. begin
  82153. pTDefRegMap(@Self)^.clr := $00000400;
  82154. end;
  82155. procedure TCAN1_C1FIFOINT25.setTXNFULLIF(thebits : TBits_1); inline;
  82156. begin
  82157. if thebits = 0 then
  82158. pTDefRegMap(@Self)^.clr := $00000400
  82159. else
  82160. pTDefRegMap(@Self)^.&set := $00000400;
  82161. end;
  82162. function TCAN1_C1FIFOINT25.getTXNFULLIF : TBits_1; inline;
  82163. begin
  82164. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  82165. end;
  82166. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIE; inline;
  82167. begin
  82168. pTDefRegMap(@Self)^.&set := $00010000;
  82169. end;
  82170. procedure TCAN1_C1FIFOINT25.clearRXNEMPTYIE; inline;
  82171. begin
  82172. pTDefRegMap(@Self)^.clr := $00010000;
  82173. end;
  82174. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIE(thebits : TBits_1); inline;
  82175. begin
  82176. if thebits = 0 then
  82177. pTDefRegMap(@Self)^.clr := $00010000
  82178. else
  82179. pTDefRegMap(@Self)^.&set := $00010000;
  82180. end;
  82181. function TCAN1_C1FIFOINT25.getRXNEMPTYIE : TBits_1; inline;
  82182. begin
  82183. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  82184. end;
  82185. procedure TCAN1_C1FIFOINT25.setRXHALFIE; inline;
  82186. begin
  82187. pTDefRegMap(@Self)^.&set := $00020000;
  82188. end;
  82189. procedure TCAN1_C1FIFOINT25.clearRXHALFIE; inline;
  82190. begin
  82191. pTDefRegMap(@Self)^.clr := $00020000;
  82192. end;
  82193. procedure TCAN1_C1FIFOINT25.setRXHALFIE(thebits : TBits_1); inline;
  82194. begin
  82195. if thebits = 0 then
  82196. pTDefRegMap(@Self)^.clr := $00020000
  82197. else
  82198. pTDefRegMap(@Self)^.&set := $00020000;
  82199. end;
  82200. function TCAN1_C1FIFOINT25.getRXHALFIE : TBits_1; inline;
  82201. begin
  82202. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  82203. end;
  82204. procedure TCAN1_C1FIFOINT25.setRXFULLIE; inline;
  82205. begin
  82206. pTDefRegMap(@Self)^.&set := $00040000;
  82207. end;
  82208. procedure TCAN1_C1FIFOINT25.clearRXFULLIE; inline;
  82209. begin
  82210. pTDefRegMap(@Self)^.clr := $00040000;
  82211. end;
  82212. procedure TCAN1_C1FIFOINT25.setRXFULLIE(thebits : TBits_1); inline;
  82213. begin
  82214. if thebits = 0 then
  82215. pTDefRegMap(@Self)^.clr := $00040000
  82216. else
  82217. pTDefRegMap(@Self)^.&set := $00040000;
  82218. end;
  82219. function TCAN1_C1FIFOINT25.getRXFULLIE : TBits_1; inline;
  82220. begin
  82221. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  82222. end;
  82223. procedure TCAN1_C1FIFOINT25.setRXOVFLIE; inline;
  82224. begin
  82225. pTDefRegMap(@Self)^.&set := $00080000;
  82226. end;
  82227. procedure TCAN1_C1FIFOINT25.clearRXOVFLIE; inline;
  82228. begin
  82229. pTDefRegMap(@Self)^.clr := $00080000;
  82230. end;
  82231. procedure TCAN1_C1FIFOINT25.setRXOVFLIE(thebits : TBits_1); inline;
  82232. begin
  82233. if thebits = 0 then
  82234. pTDefRegMap(@Self)^.clr := $00080000
  82235. else
  82236. pTDefRegMap(@Self)^.&set := $00080000;
  82237. end;
  82238. function TCAN1_C1FIFOINT25.getRXOVFLIE : TBits_1; inline;
  82239. begin
  82240. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  82241. end;
  82242. procedure TCAN1_C1FIFOINT25.setTXEMPTYIE; inline;
  82243. begin
  82244. pTDefRegMap(@Self)^.&set := $01000000;
  82245. end;
  82246. procedure TCAN1_C1FIFOINT25.clearTXEMPTYIE; inline;
  82247. begin
  82248. pTDefRegMap(@Self)^.clr := $01000000;
  82249. end;
  82250. procedure TCAN1_C1FIFOINT25.setTXEMPTYIE(thebits : TBits_1); inline;
  82251. begin
  82252. if thebits = 0 then
  82253. pTDefRegMap(@Self)^.clr := $01000000
  82254. else
  82255. pTDefRegMap(@Self)^.&set := $01000000;
  82256. end;
  82257. function TCAN1_C1FIFOINT25.getTXEMPTYIE : TBits_1; inline;
  82258. begin
  82259. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  82260. end;
  82261. procedure TCAN1_C1FIFOINT25.setTXHALFIE; inline;
  82262. begin
  82263. pTDefRegMap(@Self)^.&set := $02000000;
  82264. end;
  82265. procedure TCAN1_C1FIFOINT25.clearTXHALFIE; inline;
  82266. begin
  82267. pTDefRegMap(@Self)^.clr := $02000000;
  82268. end;
  82269. procedure TCAN1_C1FIFOINT25.setTXHALFIE(thebits : TBits_1); inline;
  82270. begin
  82271. if thebits = 0 then
  82272. pTDefRegMap(@Self)^.clr := $02000000
  82273. else
  82274. pTDefRegMap(@Self)^.&set := $02000000;
  82275. end;
  82276. function TCAN1_C1FIFOINT25.getTXHALFIE : TBits_1; inline;
  82277. begin
  82278. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  82279. end;
  82280. procedure TCAN1_C1FIFOINT25.setTXNFULLIE; inline;
  82281. begin
  82282. pTDefRegMap(@Self)^.&set := $04000000;
  82283. end;
  82284. procedure TCAN1_C1FIFOINT25.clearTXNFULLIE; inline;
  82285. begin
  82286. pTDefRegMap(@Self)^.clr := $04000000;
  82287. end;
  82288. procedure TCAN1_C1FIFOINT25.setTXNFULLIE(thebits : TBits_1); inline;
  82289. begin
  82290. if thebits = 0 then
  82291. pTDefRegMap(@Self)^.clr := $04000000
  82292. else
  82293. pTDefRegMap(@Self)^.&set := $04000000;
  82294. end;
  82295. function TCAN1_C1FIFOINT25.getTXNFULLIE : TBits_1; inline;
  82296. begin
  82297. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  82298. end;
  82299. procedure TCAN1_C1FIFOINT25.setw(thebits : TBits_32); inline;
  82300. begin
  82301. pTDefRegMap(@Self)^.val := thebits;
  82302. end;
  82303. function TCAN1_C1FIFOINT25.getw : TBits_32; inline;
  82304. begin
  82305. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82306. end;
  82307. procedure TCAN1_C1FIFOCI25.setCFIFOCI(thebits : TBits_5); inline;
  82308. begin
  82309. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  82310. end;
  82311. function TCAN1_C1FIFOCI25.getCFIFOCI : TBits_5; inline;
  82312. begin
  82313. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  82314. end;
  82315. procedure TCAN1_C1FIFOCI25.setw(thebits : TBits_32); inline;
  82316. begin
  82317. pTDefRegMap(@Self)^.val := thebits;
  82318. end;
  82319. function TCAN1_C1FIFOCI25.getw : TBits_32; inline;
  82320. begin
  82321. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82322. end;
  82323. procedure TCAN1_C1FIFOCON26.setTXPRI(thebits : TBits_2); inline;
  82324. begin
  82325. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  82326. end;
  82327. function TCAN1_C1FIFOCON26.getTXPRI : TBits_2; inline;
  82328. begin
  82329. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  82330. end;
  82331. procedure TCAN1_C1FIFOCON26.setRTREN; inline;
  82332. begin
  82333. pTDefRegMap(@Self)^.&set := $00000004;
  82334. end;
  82335. procedure TCAN1_C1FIFOCON26.clearRTREN; inline;
  82336. begin
  82337. pTDefRegMap(@Self)^.clr := $00000004;
  82338. end;
  82339. procedure TCAN1_C1FIFOCON26.setRTREN(thebits : TBits_1); inline;
  82340. begin
  82341. if thebits = 0 then
  82342. pTDefRegMap(@Self)^.clr := $00000004
  82343. else
  82344. pTDefRegMap(@Self)^.&set := $00000004;
  82345. end;
  82346. function TCAN1_C1FIFOCON26.getRTREN : TBits_1; inline;
  82347. begin
  82348. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82349. end;
  82350. procedure TCAN1_C1FIFOCON26.setTXREQ; inline;
  82351. begin
  82352. pTDefRegMap(@Self)^.&set := $00000008;
  82353. end;
  82354. procedure TCAN1_C1FIFOCON26.clearTXREQ; inline;
  82355. begin
  82356. pTDefRegMap(@Self)^.clr := $00000008;
  82357. end;
  82358. procedure TCAN1_C1FIFOCON26.setTXREQ(thebits : TBits_1); inline;
  82359. begin
  82360. if thebits = 0 then
  82361. pTDefRegMap(@Self)^.clr := $00000008
  82362. else
  82363. pTDefRegMap(@Self)^.&set := $00000008;
  82364. end;
  82365. function TCAN1_C1FIFOCON26.getTXREQ : TBits_1; inline;
  82366. begin
  82367. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82368. end;
  82369. procedure TCAN1_C1FIFOCON26.setTXERR; inline;
  82370. begin
  82371. pTDefRegMap(@Self)^.&set := $00000010;
  82372. end;
  82373. procedure TCAN1_C1FIFOCON26.clearTXERR; inline;
  82374. begin
  82375. pTDefRegMap(@Self)^.clr := $00000010;
  82376. end;
  82377. procedure TCAN1_C1FIFOCON26.setTXERR(thebits : TBits_1); inline;
  82378. begin
  82379. if thebits = 0 then
  82380. pTDefRegMap(@Self)^.clr := $00000010
  82381. else
  82382. pTDefRegMap(@Self)^.&set := $00000010;
  82383. end;
  82384. function TCAN1_C1FIFOCON26.getTXERR : TBits_1; inline;
  82385. begin
  82386. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  82387. end;
  82388. procedure TCAN1_C1FIFOCON26.setTXLARB; inline;
  82389. begin
  82390. pTDefRegMap(@Self)^.&set := $00000020;
  82391. end;
  82392. procedure TCAN1_C1FIFOCON26.clearTXLARB; inline;
  82393. begin
  82394. pTDefRegMap(@Self)^.clr := $00000020;
  82395. end;
  82396. procedure TCAN1_C1FIFOCON26.setTXLARB(thebits : TBits_1); inline;
  82397. begin
  82398. if thebits = 0 then
  82399. pTDefRegMap(@Self)^.clr := $00000020
  82400. else
  82401. pTDefRegMap(@Self)^.&set := $00000020;
  82402. end;
  82403. function TCAN1_C1FIFOCON26.getTXLARB : TBits_1; inline;
  82404. begin
  82405. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  82406. end;
  82407. procedure TCAN1_C1FIFOCON26.setTXABAT; inline;
  82408. begin
  82409. pTDefRegMap(@Self)^.&set := $00000040;
  82410. end;
  82411. procedure TCAN1_C1FIFOCON26.clearTXABAT; inline;
  82412. begin
  82413. pTDefRegMap(@Self)^.clr := $00000040;
  82414. end;
  82415. procedure TCAN1_C1FIFOCON26.setTXABAT(thebits : TBits_1); inline;
  82416. begin
  82417. if thebits = 0 then
  82418. pTDefRegMap(@Self)^.clr := $00000040
  82419. else
  82420. pTDefRegMap(@Self)^.&set := $00000040;
  82421. end;
  82422. function TCAN1_C1FIFOCON26.getTXABAT : TBits_1; inline;
  82423. begin
  82424. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  82425. end;
  82426. procedure TCAN1_C1FIFOCON26.setTXEN; inline;
  82427. begin
  82428. pTDefRegMap(@Self)^.&set := $00000080;
  82429. end;
  82430. procedure TCAN1_C1FIFOCON26.clearTXEN; inline;
  82431. begin
  82432. pTDefRegMap(@Self)^.clr := $00000080;
  82433. end;
  82434. procedure TCAN1_C1FIFOCON26.setTXEN(thebits : TBits_1); inline;
  82435. begin
  82436. if thebits = 0 then
  82437. pTDefRegMap(@Self)^.clr := $00000080
  82438. else
  82439. pTDefRegMap(@Self)^.&set := $00000080;
  82440. end;
  82441. function TCAN1_C1FIFOCON26.getTXEN : TBits_1; inline;
  82442. begin
  82443. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  82444. end;
  82445. procedure TCAN1_C1FIFOCON26.setDONLY; inline;
  82446. begin
  82447. pTDefRegMap(@Self)^.&set := $00001000;
  82448. end;
  82449. procedure TCAN1_C1FIFOCON26.clearDONLY; inline;
  82450. begin
  82451. pTDefRegMap(@Self)^.clr := $00001000;
  82452. end;
  82453. procedure TCAN1_C1FIFOCON26.setDONLY(thebits : TBits_1); inline;
  82454. begin
  82455. if thebits = 0 then
  82456. pTDefRegMap(@Self)^.clr := $00001000
  82457. else
  82458. pTDefRegMap(@Self)^.&set := $00001000;
  82459. end;
  82460. function TCAN1_C1FIFOCON26.getDONLY : TBits_1; inline;
  82461. begin
  82462. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  82463. end;
  82464. procedure TCAN1_C1FIFOCON26.setUINC; inline;
  82465. begin
  82466. pTDefRegMap(@Self)^.&set := $00002000;
  82467. end;
  82468. procedure TCAN1_C1FIFOCON26.clearUINC; inline;
  82469. begin
  82470. pTDefRegMap(@Self)^.clr := $00002000;
  82471. end;
  82472. procedure TCAN1_C1FIFOCON26.setUINC(thebits : TBits_1); inline;
  82473. begin
  82474. if thebits = 0 then
  82475. pTDefRegMap(@Self)^.clr := $00002000
  82476. else
  82477. pTDefRegMap(@Self)^.&set := $00002000;
  82478. end;
  82479. function TCAN1_C1FIFOCON26.getUINC : TBits_1; inline;
  82480. begin
  82481. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  82482. end;
  82483. procedure TCAN1_C1FIFOCON26.setFRESET; inline;
  82484. begin
  82485. pTDefRegMap(@Self)^.&set := $00004000;
  82486. end;
  82487. procedure TCAN1_C1FIFOCON26.clearFRESET; inline;
  82488. begin
  82489. pTDefRegMap(@Self)^.clr := $00004000;
  82490. end;
  82491. procedure TCAN1_C1FIFOCON26.setFRESET(thebits : TBits_1); inline;
  82492. begin
  82493. if thebits = 0 then
  82494. pTDefRegMap(@Self)^.clr := $00004000
  82495. else
  82496. pTDefRegMap(@Self)^.&set := $00004000;
  82497. end;
  82498. function TCAN1_C1FIFOCON26.getFRESET : TBits_1; inline;
  82499. begin
  82500. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  82501. end;
  82502. procedure TCAN1_C1FIFOCON26.setFSIZE(thebits : TBits_5); inline;
  82503. begin
  82504. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  82505. end;
  82506. function TCAN1_C1FIFOCON26.getFSIZE : TBits_5; inline;
  82507. begin
  82508. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  82509. end;
  82510. procedure TCAN1_C1FIFOCON26.setw(thebits : TBits_32); inline;
  82511. begin
  82512. pTDefRegMap(@Self)^.val := thebits;
  82513. end;
  82514. function TCAN1_C1FIFOCON26.getw : TBits_32; inline;
  82515. begin
  82516. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82517. end;
  82518. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIF; inline;
  82519. begin
  82520. pTDefRegMap(@Self)^.&set := $00000001;
  82521. end;
  82522. procedure TCAN1_C1FIFOINT26.clearRXNEMPTYIF; inline;
  82523. begin
  82524. pTDefRegMap(@Self)^.clr := $00000001;
  82525. end;
  82526. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIF(thebits : TBits_1); inline;
  82527. begin
  82528. if thebits = 0 then
  82529. pTDefRegMap(@Self)^.clr := $00000001
  82530. else
  82531. pTDefRegMap(@Self)^.&set := $00000001;
  82532. end;
  82533. function TCAN1_C1FIFOINT26.getRXNEMPTYIF : TBits_1; inline;
  82534. begin
  82535. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  82536. end;
  82537. procedure TCAN1_C1FIFOINT26.setRXHALFIF; inline;
  82538. begin
  82539. pTDefRegMap(@Self)^.&set := $00000002;
  82540. end;
  82541. procedure TCAN1_C1FIFOINT26.clearRXHALFIF; inline;
  82542. begin
  82543. pTDefRegMap(@Self)^.clr := $00000002;
  82544. end;
  82545. procedure TCAN1_C1FIFOINT26.setRXHALFIF(thebits : TBits_1); inline;
  82546. begin
  82547. if thebits = 0 then
  82548. pTDefRegMap(@Self)^.clr := $00000002
  82549. else
  82550. pTDefRegMap(@Self)^.&set := $00000002;
  82551. end;
  82552. function TCAN1_C1FIFOINT26.getRXHALFIF : TBits_1; inline;
  82553. begin
  82554. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  82555. end;
  82556. procedure TCAN1_C1FIFOINT26.setRXFULLIF; inline;
  82557. begin
  82558. pTDefRegMap(@Self)^.&set := $00000004;
  82559. end;
  82560. procedure TCAN1_C1FIFOINT26.clearRXFULLIF; inline;
  82561. begin
  82562. pTDefRegMap(@Self)^.clr := $00000004;
  82563. end;
  82564. procedure TCAN1_C1FIFOINT26.setRXFULLIF(thebits : TBits_1); inline;
  82565. begin
  82566. if thebits = 0 then
  82567. pTDefRegMap(@Self)^.clr := $00000004
  82568. else
  82569. pTDefRegMap(@Self)^.&set := $00000004;
  82570. end;
  82571. function TCAN1_C1FIFOINT26.getRXFULLIF : TBits_1; inline;
  82572. begin
  82573. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82574. end;
  82575. procedure TCAN1_C1FIFOINT26.setRXOVFLIF; inline;
  82576. begin
  82577. pTDefRegMap(@Self)^.&set := $00000008;
  82578. end;
  82579. procedure TCAN1_C1FIFOINT26.clearRXOVFLIF; inline;
  82580. begin
  82581. pTDefRegMap(@Self)^.clr := $00000008;
  82582. end;
  82583. procedure TCAN1_C1FIFOINT26.setRXOVFLIF(thebits : TBits_1); inline;
  82584. begin
  82585. if thebits = 0 then
  82586. pTDefRegMap(@Self)^.clr := $00000008
  82587. else
  82588. pTDefRegMap(@Self)^.&set := $00000008;
  82589. end;
  82590. function TCAN1_C1FIFOINT26.getRXOVFLIF : TBits_1; inline;
  82591. begin
  82592. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82593. end;
  82594. procedure TCAN1_C1FIFOINT26.setTXEMPTYIF; inline;
  82595. begin
  82596. pTDefRegMap(@Self)^.&set := $00000100;
  82597. end;
  82598. procedure TCAN1_C1FIFOINT26.clearTXEMPTYIF; inline;
  82599. begin
  82600. pTDefRegMap(@Self)^.clr := $00000100;
  82601. end;
  82602. procedure TCAN1_C1FIFOINT26.setTXEMPTYIF(thebits : TBits_1); inline;
  82603. begin
  82604. if thebits = 0 then
  82605. pTDefRegMap(@Self)^.clr := $00000100
  82606. else
  82607. pTDefRegMap(@Self)^.&set := $00000100;
  82608. end;
  82609. function TCAN1_C1FIFOINT26.getTXEMPTYIF : TBits_1; inline;
  82610. begin
  82611. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  82612. end;
  82613. procedure TCAN1_C1FIFOINT26.setTXHALFIF; inline;
  82614. begin
  82615. pTDefRegMap(@Self)^.&set := $00000200;
  82616. end;
  82617. procedure TCAN1_C1FIFOINT26.clearTXHALFIF; inline;
  82618. begin
  82619. pTDefRegMap(@Self)^.clr := $00000200;
  82620. end;
  82621. procedure TCAN1_C1FIFOINT26.setTXHALFIF(thebits : TBits_1); inline;
  82622. begin
  82623. if thebits = 0 then
  82624. pTDefRegMap(@Self)^.clr := $00000200
  82625. else
  82626. pTDefRegMap(@Self)^.&set := $00000200;
  82627. end;
  82628. function TCAN1_C1FIFOINT26.getTXHALFIF : TBits_1; inline;
  82629. begin
  82630. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  82631. end;
  82632. procedure TCAN1_C1FIFOINT26.setTXNFULLIF; inline;
  82633. begin
  82634. pTDefRegMap(@Self)^.&set := $00000400;
  82635. end;
  82636. procedure TCAN1_C1FIFOINT26.clearTXNFULLIF; inline;
  82637. begin
  82638. pTDefRegMap(@Self)^.clr := $00000400;
  82639. end;
  82640. procedure TCAN1_C1FIFOINT26.setTXNFULLIF(thebits : TBits_1); inline;
  82641. begin
  82642. if thebits = 0 then
  82643. pTDefRegMap(@Self)^.clr := $00000400
  82644. else
  82645. pTDefRegMap(@Self)^.&set := $00000400;
  82646. end;
  82647. function TCAN1_C1FIFOINT26.getTXNFULLIF : TBits_1; inline;
  82648. begin
  82649. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  82650. end;
  82651. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIE; inline;
  82652. begin
  82653. pTDefRegMap(@Self)^.&set := $00010000;
  82654. end;
  82655. procedure TCAN1_C1FIFOINT26.clearRXNEMPTYIE; inline;
  82656. begin
  82657. pTDefRegMap(@Self)^.clr := $00010000;
  82658. end;
  82659. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIE(thebits : TBits_1); inline;
  82660. begin
  82661. if thebits = 0 then
  82662. pTDefRegMap(@Self)^.clr := $00010000
  82663. else
  82664. pTDefRegMap(@Self)^.&set := $00010000;
  82665. end;
  82666. function TCAN1_C1FIFOINT26.getRXNEMPTYIE : TBits_1; inline;
  82667. begin
  82668. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  82669. end;
  82670. procedure TCAN1_C1FIFOINT26.setRXHALFIE; inline;
  82671. begin
  82672. pTDefRegMap(@Self)^.&set := $00020000;
  82673. end;
  82674. procedure TCAN1_C1FIFOINT26.clearRXHALFIE; inline;
  82675. begin
  82676. pTDefRegMap(@Self)^.clr := $00020000;
  82677. end;
  82678. procedure TCAN1_C1FIFOINT26.setRXHALFIE(thebits : TBits_1); inline;
  82679. begin
  82680. if thebits = 0 then
  82681. pTDefRegMap(@Self)^.clr := $00020000
  82682. else
  82683. pTDefRegMap(@Self)^.&set := $00020000;
  82684. end;
  82685. function TCAN1_C1FIFOINT26.getRXHALFIE : TBits_1; inline;
  82686. begin
  82687. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  82688. end;
  82689. procedure TCAN1_C1FIFOINT26.setRXFULLIE; inline;
  82690. begin
  82691. pTDefRegMap(@Self)^.&set := $00040000;
  82692. end;
  82693. procedure TCAN1_C1FIFOINT26.clearRXFULLIE; inline;
  82694. begin
  82695. pTDefRegMap(@Self)^.clr := $00040000;
  82696. end;
  82697. procedure TCAN1_C1FIFOINT26.setRXFULLIE(thebits : TBits_1); inline;
  82698. begin
  82699. if thebits = 0 then
  82700. pTDefRegMap(@Self)^.clr := $00040000
  82701. else
  82702. pTDefRegMap(@Self)^.&set := $00040000;
  82703. end;
  82704. function TCAN1_C1FIFOINT26.getRXFULLIE : TBits_1; inline;
  82705. begin
  82706. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  82707. end;
  82708. procedure TCAN1_C1FIFOINT26.setRXOVFLIE; inline;
  82709. begin
  82710. pTDefRegMap(@Self)^.&set := $00080000;
  82711. end;
  82712. procedure TCAN1_C1FIFOINT26.clearRXOVFLIE; inline;
  82713. begin
  82714. pTDefRegMap(@Self)^.clr := $00080000;
  82715. end;
  82716. procedure TCAN1_C1FIFOINT26.setRXOVFLIE(thebits : TBits_1); inline;
  82717. begin
  82718. if thebits = 0 then
  82719. pTDefRegMap(@Self)^.clr := $00080000
  82720. else
  82721. pTDefRegMap(@Self)^.&set := $00080000;
  82722. end;
  82723. function TCAN1_C1FIFOINT26.getRXOVFLIE : TBits_1; inline;
  82724. begin
  82725. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  82726. end;
  82727. procedure TCAN1_C1FIFOINT26.setTXEMPTYIE; inline;
  82728. begin
  82729. pTDefRegMap(@Self)^.&set := $01000000;
  82730. end;
  82731. procedure TCAN1_C1FIFOINT26.clearTXEMPTYIE; inline;
  82732. begin
  82733. pTDefRegMap(@Self)^.clr := $01000000;
  82734. end;
  82735. procedure TCAN1_C1FIFOINT26.setTXEMPTYIE(thebits : TBits_1); inline;
  82736. begin
  82737. if thebits = 0 then
  82738. pTDefRegMap(@Self)^.clr := $01000000
  82739. else
  82740. pTDefRegMap(@Self)^.&set := $01000000;
  82741. end;
  82742. function TCAN1_C1FIFOINT26.getTXEMPTYIE : TBits_1; inline;
  82743. begin
  82744. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  82745. end;
  82746. procedure TCAN1_C1FIFOINT26.setTXHALFIE; inline;
  82747. begin
  82748. pTDefRegMap(@Self)^.&set := $02000000;
  82749. end;
  82750. procedure TCAN1_C1FIFOINT26.clearTXHALFIE; inline;
  82751. begin
  82752. pTDefRegMap(@Self)^.clr := $02000000;
  82753. end;
  82754. procedure TCAN1_C1FIFOINT26.setTXHALFIE(thebits : TBits_1); inline;
  82755. begin
  82756. if thebits = 0 then
  82757. pTDefRegMap(@Self)^.clr := $02000000
  82758. else
  82759. pTDefRegMap(@Self)^.&set := $02000000;
  82760. end;
  82761. function TCAN1_C1FIFOINT26.getTXHALFIE : TBits_1; inline;
  82762. begin
  82763. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  82764. end;
  82765. procedure TCAN1_C1FIFOINT26.setTXNFULLIE; inline;
  82766. begin
  82767. pTDefRegMap(@Self)^.&set := $04000000;
  82768. end;
  82769. procedure TCAN1_C1FIFOINT26.clearTXNFULLIE; inline;
  82770. begin
  82771. pTDefRegMap(@Self)^.clr := $04000000;
  82772. end;
  82773. procedure TCAN1_C1FIFOINT26.setTXNFULLIE(thebits : TBits_1); inline;
  82774. begin
  82775. if thebits = 0 then
  82776. pTDefRegMap(@Self)^.clr := $04000000
  82777. else
  82778. pTDefRegMap(@Self)^.&set := $04000000;
  82779. end;
  82780. function TCAN1_C1FIFOINT26.getTXNFULLIE : TBits_1; inline;
  82781. begin
  82782. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  82783. end;
  82784. procedure TCAN1_C1FIFOINT26.setw(thebits : TBits_32); inline;
  82785. begin
  82786. pTDefRegMap(@Self)^.val := thebits;
  82787. end;
  82788. function TCAN1_C1FIFOINT26.getw : TBits_32; inline;
  82789. begin
  82790. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82791. end;
  82792. procedure TCAN1_C1FIFOCI26.setCFIFOCI(thebits : TBits_5); inline;
  82793. begin
  82794. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  82795. end;
  82796. function TCAN1_C1FIFOCI26.getCFIFOCI : TBits_5; inline;
  82797. begin
  82798. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  82799. end;
  82800. procedure TCAN1_C1FIFOCI26.setw(thebits : TBits_32); inline;
  82801. begin
  82802. pTDefRegMap(@Self)^.val := thebits;
  82803. end;
  82804. function TCAN1_C1FIFOCI26.getw : TBits_32; inline;
  82805. begin
  82806. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82807. end;
  82808. procedure TCAN1_C1FIFOCON27.setTXPRI(thebits : TBits_2); inline;
  82809. begin
  82810. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  82811. end;
  82812. function TCAN1_C1FIFOCON27.getTXPRI : TBits_2; inline;
  82813. begin
  82814. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  82815. end;
  82816. procedure TCAN1_C1FIFOCON27.setRTREN; inline;
  82817. begin
  82818. pTDefRegMap(@Self)^.&set := $00000004;
  82819. end;
  82820. procedure TCAN1_C1FIFOCON27.clearRTREN; inline;
  82821. begin
  82822. pTDefRegMap(@Self)^.clr := $00000004;
  82823. end;
  82824. procedure TCAN1_C1FIFOCON27.setRTREN(thebits : TBits_1); inline;
  82825. begin
  82826. if thebits = 0 then
  82827. pTDefRegMap(@Self)^.clr := $00000004
  82828. else
  82829. pTDefRegMap(@Self)^.&set := $00000004;
  82830. end;
  82831. function TCAN1_C1FIFOCON27.getRTREN : TBits_1; inline;
  82832. begin
  82833. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82834. end;
  82835. procedure TCAN1_C1FIFOCON27.setTXREQ; inline;
  82836. begin
  82837. pTDefRegMap(@Self)^.&set := $00000008;
  82838. end;
  82839. procedure TCAN1_C1FIFOCON27.clearTXREQ; inline;
  82840. begin
  82841. pTDefRegMap(@Self)^.clr := $00000008;
  82842. end;
  82843. procedure TCAN1_C1FIFOCON27.setTXREQ(thebits : TBits_1); inline;
  82844. begin
  82845. if thebits = 0 then
  82846. pTDefRegMap(@Self)^.clr := $00000008
  82847. else
  82848. pTDefRegMap(@Self)^.&set := $00000008;
  82849. end;
  82850. function TCAN1_C1FIFOCON27.getTXREQ : TBits_1; inline;
  82851. begin
  82852. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82853. end;
  82854. procedure TCAN1_C1FIFOCON27.setTXERR; inline;
  82855. begin
  82856. pTDefRegMap(@Self)^.&set := $00000010;
  82857. end;
  82858. procedure TCAN1_C1FIFOCON27.clearTXERR; inline;
  82859. begin
  82860. pTDefRegMap(@Self)^.clr := $00000010;
  82861. end;
  82862. procedure TCAN1_C1FIFOCON27.setTXERR(thebits : TBits_1); inline;
  82863. begin
  82864. if thebits = 0 then
  82865. pTDefRegMap(@Self)^.clr := $00000010
  82866. else
  82867. pTDefRegMap(@Self)^.&set := $00000010;
  82868. end;
  82869. function TCAN1_C1FIFOCON27.getTXERR : TBits_1; inline;
  82870. begin
  82871. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  82872. end;
  82873. procedure TCAN1_C1FIFOCON27.setTXLARB; inline;
  82874. begin
  82875. pTDefRegMap(@Self)^.&set := $00000020;
  82876. end;
  82877. procedure TCAN1_C1FIFOCON27.clearTXLARB; inline;
  82878. begin
  82879. pTDefRegMap(@Self)^.clr := $00000020;
  82880. end;
  82881. procedure TCAN1_C1FIFOCON27.setTXLARB(thebits : TBits_1); inline;
  82882. begin
  82883. if thebits = 0 then
  82884. pTDefRegMap(@Self)^.clr := $00000020
  82885. else
  82886. pTDefRegMap(@Self)^.&set := $00000020;
  82887. end;
  82888. function TCAN1_C1FIFOCON27.getTXLARB : TBits_1; inline;
  82889. begin
  82890. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  82891. end;
  82892. procedure TCAN1_C1FIFOCON27.setTXABAT; inline;
  82893. begin
  82894. pTDefRegMap(@Self)^.&set := $00000040;
  82895. end;
  82896. procedure TCAN1_C1FIFOCON27.clearTXABAT; inline;
  82897. begin
  82898. pTDefRegMap(@Self)^.clr := $00000040;
  82899. end;
  82900. procedure TCAN1_C1FIFOCON27.setTXABAT(thebits : TBits_1); inline;
  82901. begin
  82902. if thebits = 0 then
  82903. pTDefRegMap(@Self)^.clr := $00000040
  82904. else
  82905. pTDefRegMap(@Self)^.&set := $00000040;
  82906. end;
  82907. function TCAN1_C1FIFOCON27.getTXABAT : TBits_1; inline;
  82908. begin
  82909. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  82910. end;
  82911. procedure TCAN1_C1FIFOCON27.setTXEN; inline;
  82912. begin
  82913. pTDefRegMap(@Self)^.&set := $00000080;
  82914. end;
  82915. procedure TCAN1_C1FIFOCON27.clearTXEN; inline;
  82916. begin
  82917. pTDefRegMap(@Self)^.clr := $00000080;
  82918. end;
  82919. procedure TCAN1_C1FIFOCON27.setTXEN(thebits : TBits_1); inline;
  82920. begin
  82921. if thebits = 0 then
  82922. pTDefRegMap(@Self)^.clr := $00000080
  82923. else
  82924. pTDefRegMap(@Self)^.&set := $00000080;
  82925. end;
  82926. function TCAN1_C1FIFOCON27.getTXEN : TBits_1; inline;
  82927. begin
  82928. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  82929. end;
  82930. procedure TCAN1_C1FIFOCON27.setDONLY; inline;
  82931. begin
  82932. pTDefRegMap(@Self)^.&set := $00001000;
  82933. end;
  82934. procedure TCAN1_C1FIFOCON27.clearDONLY; inline;
  82935. begin
  82936. pTDefRegMap(@Self)^.clr := $00001000;
  82937. end;
  82938. procedure TCAN1_C1FIFOCON27.setDONLY(thebits : TBits_1); inline;
  82939. begin
  82940. if thebits = 0 then
  82941. pTDefRegMap(@Self)^.clr := $00001000
  82942. else
  82943. pTDefRegMap(@Self)^.&set := $00001000;
  82944. end;
  82945. function TCAN1_C1FIFOCON27.getDONLY : TBits_1; inline;
  82946. begin
  82947. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  82948. end;
  82949. procedure TCAN1_C1FIFOCON27.setUINC; inline;
  82950. begin
  82951. pTDefRegMap(@Self)^.&set := $00002000;
  82952. end;
  82953. procedure TCAN1_C1FIFOCON27.clearUINC; inline;
  82954. begin
  82955. pTDefRegMap(@Self)^.clr := $00002000;
  82956. end;
  82957. procedure TCAN1_C1FIFOCON27.setUINC(thebits : TBits_1); inline;
  82958. begin
  82959. if thebits = 0 then
  82960. pTDefRegMap(@Self)^.clr := $00002000
  82961. else
  82962. pTDefRegMap(@Self)^.&set := $00002000;
  82963. end;
  82964. function TCAN1_C1FIFOCON27.getUINC : TBits_1; inline;
  82965. begin
  82966. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  82967. end;
  82968. procedure TCAN1_C1FIFOCON27.setFRESET; inline;
  82969. begin
  82970. pTDefRegMap(@Self)^.&set := $00004000;
  82971. end;
  82972. procedure TCAN1_C1FIFOCON27.clearFRESET; inline;
  82973. begin
  82974. pTDefRegMap(@Self)^.clr := $00004000;
  82975. end;
  82976. procedure TCAN1_C1FIFOCON27.setFRESET(thebits : TBits_1); inline;
  82977. begin
  82978. if thebits = 0 then
  82979. pTDefRegMap(@Self)^.clr := $00004000
  82980. else
  82981. pTDefRegMap(@Self)^.&set := $00004000;
  82982. end;
  82983. function TCAN1_C1FIFOCON27.getFRESET : TBits_1; inline;
  82984. begin
  82985. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  82986. end;
  82987. procedure TCAN1_C1FIFOCON27.setFSIZE(thebits : TBits_5); inline;
  82988. begin
  82989. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  82990. end;
  82991. function TCAN1_C1FIFOCON27.getFSIZE : TBits_5; inline;
  82992. begin
  82993. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  82994. end;
  82995. procedure TCAN1_C1FIFOCON27.setw(thebits : TBits_32); inline;
  82996. begin
  82997. pTDefRegMap(@Self)^.val := thebits;
  82998. end;
  82999. function TCAN1_C1FIFOCON27.getw : TBits_32; inline;
  83000. begin
  83001. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83002. end;
  83003. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIF; inline;
  83004. begin
  83005. pTDefRegMap(@Self)^.&set := $00000001;
  83006. end;
  83007. procedure TCAN1_C1FIFOINT27.clearRXNEMPTYIF; inline;
  83008. begin
  83009. pTDefRegMap(@Self)^.clr := $00000001;
  83010. end;
  83011. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIF(thebits : TBits_1); inline;
  83012. begin
  83013. if thebits = 0 then
  83014. pTDefRegMap(@Self)^.clr := $00000001
  83015. else
  83016. pTDefRegMap(@Self)^.&set := $00000001;
  83017. end;
  83018. function TCAN1_C1FIFOINT27.getRXNEMPTYIF : TBits_1; inline;
  83019. begin
  83020. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  83021. end;
  83022. procedure TCAN1_C1FIFOINT27.setRXHALFIF; inline;
  83023. begin
  83024. pTDefRegMap(@Self)^.&set := $00000002;
  83025. end;
  83026. procedure TCAN1_C1FIFOINT27.clearRXHALFIF; inline;
  83027. begin
  83028. pTDefRegMap(@Self)^.clr := $00000002;
  83029. end;
  83030. procedure TCAN1_C1FIFOINT27.setRXHALFIF(thebits : TBits_1); inline;
  83031. begin
  83032. if thebits = 0 then
  83033. pTDefRegMap(@Self)^.clr := $00000002
  83034. else
  83035. pTDefRegMap(@Self)^.&set := $00000002;
  83036. end;
  83037. function TCAN1_C1FIFOINT27.getRXHALFIF : TBits_1; inline;
  83038. begin
  83039. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  83040. end;
  83041. procedure TCAN1_C1FIFOINT27.setRXFULLIF; inline;
  83042. begin
  83043. pTDefRegMap(@Self)^.&set := $00000004;
  83044. end;
  83045. procedure TCAN1_C1FIFOINT27.clearRXFULLIF; inline;
  83046. begin
  83047. pTDefRegMap(@Self)^.clr := $00000004;
  83048. end;
  83049. procedure TCAN1_C1FIFOINT27.setRXFULLIF(thebits : TBits_1); inline;
  83050. begin
  83051. if thebits = 0 then
  83052. pTDefRegMap(@Self)^.clr := $00000004
  83053. else
  83054. pTDefRegMap(@Self)^.&set := $00000004;
  83055. end;
  83056. function TCAN1_C1FIFOINT27.getRXFULLIF : TBits_1; inline;
  83057. begin
  83058. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  83059. end;
  83060. procedure TCAN1_C1FIFOINT27.setRXOVFLIF; inline;
  83061. begin
  83062. pTDefRegMap(@Self)^.&set := $00000008;
  83063. end;
  83064. procedure TCAN1_C1FIFOINT27.clearRXOVFLIF; inline;
  83065. begin
  83066. pTDefRegMap(@Self)^.clr := $00000008;
  83067. end;
  83068. procedure TCAN1_C1FIFOINT27.setRXOVFLIF(thebits : TBits_1); inline;
  83069. begin
  83070. if thebits = 0 then
  83071. pTDefRegMap(@Self)^.clr := $00000008
  83072. else
  83073. pTDefRegMap(@Self)^.&set := $00000008;
  83074. end;
  83075. function TCAN1_C1FIFOINT27.getRXOVFLIF : TBits_1; inline;
  83076. begin
  83077. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  83078. end;
  83079. procedure TCAN1_C1FIFOINT27.setTXEMPTYIF; inline;
  83080. begin
  83081. pTDefRegMap(@Self)^.&set := $00000100;
  83082. end;
  83083. procedure TCAN1_C1FIFOINT27.clearTXEMPTYIF; inline;
  83084. begin
  83085. pTDefRegMap(@Self)^.clr := $00000100;
  83086. end;
  83087. procedure TCAN1_C1FIFOINT27.setTXEMPTYIF(thebits : TBits_1); inline;
  83088. begin
  83089. if thebits = 0 then
  83090. pTDefRegMap(@Self)^.clr := $00000100
  83091. else
  83092. pTDefRegMap(@Self)^.&set := $00000100;
  83093. end;
  83094. function TCAN1_C1FIFOINT27.getTXEMPTYIF : TBits_1; inline;
  83095. begin
  83096. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  83097. end;
  83098. procedure TCAN1_C1FIFOINT27.setTXHALFIF; inline;
  83099. begin
  83100. pTDefRegMap(@Self)^.&set := $00000200;
  83101. end;
  83102. procedure TCAN1_C1FIFOINT27.clearTXHALFIF; inline;
  83103. begin
  83104. pTDefRegMap(@Self)^.clr := $00000200;
  83105. end;
  83106. procedure TCAN1_C1FIFOINT27.setTXHALFIF(thebits : TBits_1); inline;
  83107. begin
  83108. if thebits = 0 then
  83109. pTDefRegMap(@Self)^.clr := $00000200
  83110. else
  83111. pTDefRegMap(@Self)^.&set := $00000200;
  83112. end;
  83113. function TCAN1_C1FIFOINT27.getTXHALFIF : TBits_1; inline;
  83114. begin
  83115. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  83116. end;
  83117. procedure TCAN1_C1FIFOINT27.setTXNFULLIF; inline;
  83118. begin
  83119. pTDefRegMap(@Self)^.&set := $00000400;
  83120. end;
  83121. procedure TCAN1_C1FIFOINT27.clearTXNFULLIF; inline;
  83122. begin
  83123. pTDefRegMap(@Self)^.clr := $00000400;
  83124. end;
  83125. procedure TCAN1_C1FIFOINT27.setTXNFULLIF(thebits : TBits_1); inline;
  83126. begin
  83127. if thebits = 0 then
  83128. pTDefRegMap(@Self)^.clr := $00000400
  83129. else
  83130. pTDefRegMap(@Self)^.&set := $00000400;
  83131. end;
  83132. function TCAN1_C1FIFOINT27.getTXNFULLIF : TBits_1; inline;
  83133. begin
  83134. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  83135. end;
  83136. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIE; inline;
  83137. begin
  83138. pTDefRegMap(@Self)^.&set := $00010000;
  83139. end;
  83140. procedure TCAN1_C1FIFOINT27.clearRXNEMPTYIE; inline;
  83141. begin
  83142. pTDefRegMap(@Self)^.clr := $00010000;
  83143. end;
  83144. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIE(thebits : TBits_1); inline;
  83145. begin
  83146. if thebits = 0 then
  83147. pTDefRegMap(@Self)^.clr := $00010000
  83148. else
  83149. pTDefRegMap(@Self)^.&set := $00010000;
  83150. end;
  83151. function TCAN1_C1FIFOINT27.getRXNEMPTYIE : TBits_1; inline;
  83152. begin
  83153. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  83154. end;
  83155. procedure TCAN1_C1FIFOINT27.setRXHALFIE; inline;
  83156. begin
  83157. pTDefRegMap(@Self)^.&set := $00020000;
  83158. end;
  83159. procedure TCAN1_C1FIFOINT27.clearRXHALFIE; inline;
  83160. begin
  83161. pTDefRegMap(@Self)^.clr := $00020000;
  83162. end;
  83163. procedure TCAN1_C1FIFOINT27.setRXHALFIE(thebits : TBits_1); inline;
  83164. begin
  83165. if thebits = 0 then
  83166. pTDefRegMap(@Self)^.clr := $00020000
  83167. else
  83168. pTDefRegMap(@Self)^.&set := $00020000;
  83169. end;
  83170. function TCAN1_C1FIFOINT27.getRXHALFIE : TBits_1; inline;
  83171. begin
  83172. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  83173. end;
  83174. procedure TCAN1_C1FIFOINT27.setRXFULLIE; inline;
  83175. begin
  83176. pTDefRegMap(@Self)^.&set := $00040000;
  83177. end;
  83178. procedure TCAN1_C1FIFOINT27.clearRXFULLIE; inline;
  83179. begin
  83180. pTDefRegMap(@Self)^.clr := $00040000;
  83181. end;
  83182. procedure TCAN1_C1FIFOINT27.setRXFULLIE(thebits : TBits_1); inline;
  83183. begin
  83184. if thebits = 0 then
  83185. pTDefRegMap(@Self)^.clr := $00040000
  83186. else
  83187. pTDefRegMap(@Self)^.&set := $00040000;
  83188. end;
  83189. function TCAN1_C1FIFOINT27.getRXFULLIE : TBits_1; inline;
  83190. begin
  83191. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  83192. end;
  83193. procedure TCAN1_C1FIFOINT27.setRXOVFLIE; inline;
  83194. begin
  83195. pTDefRegMap(@Self)^.&set := $00080000;
  83196. end;
  83197. procedure TCAN1_C1FIFOINT27.clearRXOVFLIE; inline;
  83198. begin
  83199. pTDefRegMap(@Self)^.clr := $00080000;
  83200. end;
  83201. procedure TCAN1_C1FIFOINT27.setRXOVFLIE(thebits : TBits_1); inline;
  83202. begin
  83203. if thebits = 0 then
  83204. pTDefRegMap(@Self)^.clr := $00080000
  83205. else
  83206. pTDefRegMap(@Self)^.&set := $00080000;
  83207. end;
  83208. function TCAN1_C1FIFOINT27.getRXOVFLIE : TBits_1; inline;
  83209. begin
  83210. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  83211. end;
  83212. procedure TCAN1_C1FIFOINT27.setTXEMPTYIE; inline;
  83213. begin
  83214. pTDefRegMap(@Self)^.&set := $01000000;
  83215. end;
  83216. procedure TCAN1_C1FIFOINT27.clearTXEMPTYIE; inline;
  83217. begin
  83218. pTDefRegMap(@Self)^.clr := $01000000;
  83219. end;
  83220. procedure TCAN1_C1FIFOINT27.setTXEMPTYIE(thebits : TBits_1); inline;
  83221. begin
  83222. if thebits = 0 then
  83223. pTDefRegMap(@Self)^.clr := $01000000
  83224. else
  83225. pTDefRegMap(@Self)^.&set := $01000000;
  83226. end;
  83227. function TCAN1_C1FIFOINT27.getTXEMPTYIE : TBits_1; inline;
  83228. begin
  83229. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  83230. end;
  83231. procedure TCAN1_C1FIFOINT27.setTXHALFIE; inline;
  83232. begin
  83233. pTDefRegMap(@Self)^.&set := $02000000;
  83234. end;
  83235. procedure TCAN1_C1FIFOINT27.clearTXHALFIE; inline;
  83236. begin
  83237. pTDefRegMap(@Self)^.clr := $02000000;
  83238. end;
  83239. procedure TCAN1_C1FIFOINT27.setTXHALFIE(thebits : TBits_1); inline;
  83240. begin
  83241. if thebits = 0 then
  83242. pTDefRegMap(@Self)^.clr := $02000000
  83243. else
  83244. pTDefRegMap(@Self)^.&set := $02000000;
  83245. end;
  83246. function TCAN1_C1FIFOINT27.getTXHALFIE : TBits_1; inline;
  83247. begin
  83248. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  83249. end;
  83250. procedure TCAN1_C1FIFOINT27.setTXNFULLIE; inline;
  83251. begin
  83252. pTDefRegMap(@Self)^.&set := $04000000;
  83253. end;
  83254. procedure TCAN1_C1FIFOINT27.clearTXNFULLIE; inline;
  83255. begin
  83256. pTDefRegMap(@Self)^.clr := $04000000;
  83257. end;
  83258. procedure TCAN1_C1FIFOINT27.setTXNFULLIE(thebits : TBits_1); inline;
  83259. begin
  83260. if thebits = 0 then
  83261. pTDefRegMap(@Self)^.clr := $04000000
  83262. else
  83263. pTDefRegMap(@Self)^.&set := $04000000;
  83264. end;
  83265. function TCAN1_C1FIFOINT27.getTXNFULLIE : TBits_1; inline;
  83266. begin
  83267. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  83268. end;
  83269. procedure TCAN1_C1FIFOINT27.setw(thebits : TBits_32); inline;
  83270. begin
  83271. pTDefRegMap(@Self)^.val := thebits;
  83272. end;
  83273. function TCAN1_C1FIFOINT27.getw : TBits_32; inline;
  83274. begin
  83275. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83276. end;
  83277. procedure TCAN1_C1FIFOCI27.setCFIFOCI(thebits : TBits_5); inline;
  83278. begin
  83279. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83280. end;
  83281. function TCAN1_C1FIFOCI27.getCFIFOCI : TBits_5; inline;
  83282. begin
  83283. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83284. end;
  83285. procedure TCAN1_C1FIFOCI27.setw(thebits : TBits_32); inline;
  83286. begin
  83287. pTDefRegMap(@Self)^.val := thebits;
  83288. end;
  83289. function TCAN1_C1FIFOCI27.getw : TBits_32; inline;
  83290. begin
  83291. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83292. end;
  83293. procedure TCAN1_C1FIFOCON28.setTXPRI(thebits : TBits_2); inline;
  83294. begin
  83295. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  83296. end;
  83297. function TCAN1_C1FIFOCON28.getTXPRI : TBits_2; inline;
  83298. begin
  83299. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  83300. end;
  83301. procedure TCAN1_C1FIFOCON28.setRTREN; inline;
  83302. begin
  83303. pTDefRegMap(@Self)^.&set := $00000004;
  83304. end;
  83305. procedure TCAN1_C1FIFOCON28.clearRTREN; inline;
  83306. begin
  83307. pTDefRegMap(@Self)^.clr := $00000004;
  83308. end;
  83309. procedure TCAN1_C1FIFOCON28.setRTREN(thebits : TBits_1); inline;
  83310. begin
  83311. if thebits = 0 then
  83312. pTDefRegMap(@Self)^.clr := $00000004
  83313. else
  83314. pTDefRegMap(@Self)^.&set := $00000004;
  83315. end;
  83316. function TCAN1_C1FIFOCON28.getRTREN : TBits_1; inline;
  83317. begin
  83318. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  83319. end;
  83320. procedure TCAN1_C1FIFOCON28.setTXREQ; inline;
  83321. begin
  83322. pTDefRegMap(@Self)^.&set := $00000008;
  83323. end;
  83324. procedure TCAN1_C1FIFOCON28.clearTXREQ; inline;
  83325. begin
  83326. pTDefRegMap(@Self)^.clr := $00000008;
  83327. end;
  83328. procedure TCAN1_C1FIFOCON28.setTXREQ(thebits : TBits_1); inline;
  83329. begin
  83330. if thebits = 0 then
  83331. pTDefRegMap(@Self)^.clr := $00000008
  83332. else
  83333. pTDefRegMap(@Self)^.&set := $00000008;
  83334. end;
  83335. function TCAN1_C1FIFOCON28.getTXREQ : TBits_1; inline;
  83336. begin
  83337. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  83338. end;
  83339. procedure TCAN1_C1FIFOCON28.setTXERR; inline;
  83340. begin
  83341. pTDefRegMap(@Self)^.&set := $00000010;
  83342. end;
  83343. procedure TCAN1_C1FIFOCON28.clearTXERR; inline;
  83344. begin
  83345. pTDefRegMap(@Self)^.clr := $00000010;
  83346. end;
  83347. procedure TCAN1_C1FIFOCON28.setTXERR(thebits : TBits_1); inline;
  83348. begin
  83349. if thebits = 0 then
  83350. pTDefRegMap(@Self)^.clr := $00000010
  83351. else
  83352. pTDefRegMap(@Self)^.&set := $00000010;
  83353. end;
  83354. function TCAN1_C1FIFOCON28.getTXERR : TBits_1; inline;
  83355. begin
  83356. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  83357. end;
  83358. procedure TCAN1_C1FIFOCON28.setTXLARB; inline;
  83359. begin
  83360. pTDefRegMap(@Self)^.&set := $00000020;
  83361. end;
  83362. procedure TCAN1_C1FIFOCON28.clearTXLARB; inline;
  83363. begin
  83364. pTDefRegMap(@Self)^.clr := $00000020;
  83365. end;
  83366. procedure TCAN1_C1FIFOCON28.setTXLARB(thebits : TBits_1); inline;
  83367. begin
  83368. if thebits = 0 then
  83369. pTDefRegMap(@Self)^.clr := $00000020
  83370. else
  83371. pTDefRegMap(@Self)^.&set := $00000020;
  83372. end;
  83373. function TCAN1_C1FIFOCON28.getTXLARB : TBits_1; inline;
  83374. begin
  83375. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  83376. end;
  83377. procedure TCAN1_C1FIFOCON28.setTXABAT; inline;
  83378. begin
  83379. pTDefRegMap(@Self)^.&set := $00000040;
  83380. end;
  83381. procedure TCAN1_C1FIFOCON28.clearTXABAT; inline;
  83382. begin
  83383. pTDefRegMap(@Self)^.clr := $00000040;
  83384. end;
  83385. procedure TCAN1_C1FIFOCON28.setTXABAT(thebits : TBits_1); inline;
  83386. begin
  83387. if thebits = 0 then
  83388. pTDefRegMap(@Self)^.clr := $00000040
  83389. else
  83390. pTDefRegMap(@Self)^.&set := $00000040;
  83391. end;
  83392. function TCAN1_C1FIFOCON28.getTXABAT : TBits_1; inline;
  83393. begin
  83394. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  83395. end;
  83396. procedure TCAN1_C1FIFOCON28.setTXEN; inline;
  83397. begin
  83398. pTDefRegMap(@Self)^.&set := $00000080;
  83399. end;
  83400. procedure TCAN1_C1FIFOCON28.clearTXEN; inline;
  83401. begin
  83402. pTDefRegMap(@Self)^.clr := $00000080;
  83403. end;
  83404. procedure TCAN1_C1FIFOCON28.setTXEN(thebits : TBits_1); inline;
  83405. begin
  83406. if thebits = 0 then
  83407. pTDefRegMap(@Self)^.clr := $00000080
  83408. else
  83409. pTDefRegMap(@Self)^.&set := $00000080;
  83410. end;
  83411. function TCAN1_C1FIFOCON28.getTXEN : TBits_1; inline;
  83412. begin
  83413. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83414. end;
  83415. procedure TCAN1_C1FIFOCON28.setDONLY; inline;
  83416. begin
  83417. pTDefRegMap(@Self)^.&set := $00001000;
  83418. end;
  83419. procedure TCAN1_C1FIFOCON28.clearDONLY; inline;
  83420. begin
  83421. pTDefRegMap(@Self)^.clr := $00001000;
  83422. end;
  83423. procedure TCAN1_C1FIFOCON28.setDONLY(thebits : TBits_1); inline;
  83424. begin
  83425. if thebits = 0 then
  83426. pTDefRegMap(@Self)^.clr := $00001000
  83427. else
  83428. pTDefRegMap(@Self)^.&set := $00001000;
  83429. end;
  83430. function TCAN1_C1FIFOCON28.getDONLY : TBits_1; inline;
  83431. begin
  83432. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  83433. end;
  83434. procedure TCAN1_C1FIFOCON28.setUINC; inline;
  83435. begin
  83436. pTDefRegMap(@Self)^.&set := $00002000;
  83437. end;
  83438. procedure TCAN1_C1FIFOCON28.clearUINC; inline;
  83439. begin
  83440. pTDefRegMap(@Self)^.clr := $00002000;
  83441. end;
  83442. procedure TCAN1_C1FIFOCON28.setUINC(thebits : TBits_1); inline;
  83443. begin
  83444. if thebits = 0 then
  83445. pTDefRegMap(@Self)^.clr := $00002000
  83446. else
  83447. pTDefRegMap(@Self)^.&set := $00002000;
  83448. end;
  83449. function TCAN1_C1FIFOCON28.getUINC : TBits_1; inline;
  83450. begin
  83451. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  83452. end;
  83453. procedure TCAN1_C1FIFOCON28.setFRESET; inline;
  83454. begin
  83455. pTDefRegMap(@Self)^.&set := $00004000;
  83456. end;
  83457. procedure TCAN1_C1FIFOCON28.clearFRESET; inline;
  83458. begin
  83459. pTDefRegMap(@Self)^.clr := $00004000;
  83460. end;
  83461. procedure TCAN1_C1FIFOCON28.setFRESET(thebits : TBits_1); inline;
  83462. begin
  83463. if thebits = 0 then
  83464. pTDefRegMap(@Self)^.clr := $00004000
  83465. else
  83466. pTDefRegMap(@Self)^.&set := $00004000;
  83467. end;
  83468. function TCAN1_C1FIFOCON28.getFRESET : TBits_1; inline;
  83469. begin
  83470. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  83471. end;
  83472. procedure TCAN1_C1FIFOCON28.setFSIZE(thebits : TBits_5); inline;
  83473. begin
  83474. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83475. end;
  83476. function TCAN1_C1FIFOCON28.getFSIZE : TBits_5; inline;
  83477. begin
  83478. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83479. end;
  83480. procedure TCAN1_C1FIFOCON28.setw(thebits : TBits_32); inline;
  83481. begin
  83482. pTDefRegMap(@Self)^.val := thebits;
  83483. end;
  83484. function TCAN1_C1FIFOCON28.getw : TBits_32; inline;
  83485. begin
  83486. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83487. end;
  83488. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIF; inline;
  83489. begin
  83490. pTDefRegMap(@Self)^.&set := $00000001;
  83491. end;
  83492. procedure TCAN1_C1FIFOINT28.clearRXNEMPTYIF; inline;
  83493. begin
  83494. pTDefRegMap(@Self)^.clr := $00000001;
  83495. end;
  83496. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIF(thebits : TBits_1); inline;
  83497. begin
  83498. if thebits = 0 then
  83499. pTDefRegMap(@Self)^.clr := $00000001
  83500. else
  83501. pTDefRegMap(@Self)^.&set := $00000001;
  83502. end;
  83503. function TCAN1_C1FIFOINT28.getRXNEMPTYIF : TBits_1; inline;
  83504. begin
  83505. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  83506. end;
  83507. procedure TCAN1_C1FIFOINT28.setRXHALFIF; inline;
  83508. begin
  83509. pTDefRegMap(@Self)^.&set := $00000002;
  83510. end;
  83511. procedure TCAN1_C1FIFOINT28.clearRXHALFIF; inline;
  83512. begin
  83513. pTDefRegMap(@Self)^.clr := $00000002;
  83514. end;
  83515. procedure TCAN1_C1FIFOINT28.setRXHALFIF(thebits : TBits_1); inline;
  83516. begin
  83517. if thebits = 0 then
  83518. pTDefRegMap(@Self)^.clr := $00000002
  83519. else
  83520. pTDefRegMap(@Self)^.&set := $00000002;
  83521. end;
  83522. function TCAN1_C1FIFOINT28.getRXHALFIF : TBits_1; inline;
  83523. begin
  83524. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  83525. end;
  83526. procedure TCAN1_C1FIFOINT28.setRXFULLIF; inline;
  83527. begin
  83528. pTDefRegMap(@Self)^.&set := $00000004;
  83529. end;
  83530. procedure TCAN1_C1FIFOINT28.clearRXFULLIF; inline;
  83531. begin
  83532. pTDefRegMap(@Self)^.clr := $00000004;
  83533. end;
  83534. procedure TCAN1_C1FIFOINT28.setRXFULLIF(thebits : TBits_1); inline;
  83535. begin
  83536. if thebits = 0 then
  83537. pTDefRegMap(@Self)^.clr := $00000004
  83538. else
  83539. pTDefRegMap(@Self)^.&set := $00000004;
  83540. end;
  83541. function TCAN1_C1FIFOINT28.getRXFULLIF : TBits_1; inline;
  83542. begin
  83543. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  83544. end;
  83545. procedure TCAN1_C1FIFOINT28.setRXOVFLIF; inline;
  83546. begin
  83547. pTDefRegMap(@Self)^.&set := $00000008;
  83548. end;
  83549. procedure TCAN1_C1FIFOINT28.clearRXOVFLIF; inline;
  83550. begin
  83551. pTDefRegMap(@Self)^.clr := $00000008;
  83552. end;
  83553. procedure TCAN1_C1FIFOINT28.setRXOVFLIF(thebits : TBits_1); inline;
  83554. begin
  83555. if thebits = 0 then
  83556. pTDefRegMap(@Self)^.clr := $00000008
  83557. else
  83558. pTDefRegMap(@Self)^.&set := $00000008;
  83559. end;
  83560. function TCAN1_C1FIFOINT28.getRXOVFLIF : TBits_1; inline;
  83561. begin
  83562. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  83563. end;
  83564. procedure TCAN1_C1FIFOINT28.setTXEMPTYIF; inline;
  83565. begin
  83566. pTDefRegMap(@Self)^.&set := $00000100;
  83567. end;
  83568. procedure TCAN1_C1FIFOINT28.clearTXEMPTYIF; inline;
  83569. begin
  83570. pTDefRegMap(@Self)^.clr := $00000100;
  83571. end;
  83572. procedure TCAN1_C1FIFOINT28.setTXEMPTYIF(thebits : TBits_1); inline;
  83573. begin
  83574. if thebits = 0 then
  83575. pTDefRegMap(@Self)^.clr := $00000100
  83576. else
  83577. pTDefRegMap(@Self)^.&set := $00000100;
  83578. end;
  83579. function TCAN1_C1FIFOINT28.getTXEMPTYIF : TBits_1; inline;
  83580. begin
  83581. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  83582. end;
  83583. procedure TCAN1_C1FIFOINT28.setTXHALFIF; inline;
  83584. begin
  83585. pTDefRegMap(@Self)^.&set := $00000200;
  83586. end;
  83587. procedure TCAN1_C1FIFOINT28.clearTXHALFIF; inline;
  83588. begin
  83589. pTDefRegMap(@Self)^.clr := $00000200;
  83590. end;
  83591. procedure TCAN1_C1FIFOINT28.setTXHALFIF(thebits : TBits_1); inline;
  83592. begin
  83593. if thebits = 0 then
  83594. pTDefRegMap(@Self)^.clr := $00000200
  83595. else
  83596. pTDefRegMap(@Self)^.&set := $00000200;
  83597. end;
  83598. function TCAN1_C1FIFOINT28.getTXHALFIF : TBits_1; inline;
  83599. begin
  83600. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  83601. end;
  83602. procedure TCAN1_C1FIFOINT28.setTXNFULLIF; inline;
  83603. begin
  83604. pTDefRegMap(@Self)^.&set := $00000400;
  83605. end;
  83606. procedure TCAN1_C1FIFOINT28.clearTXNFULLIF; inline;
  83607. begin
  83608. pTDefRegMap(@Self)^.clr := $00000400;
  83609. end;
  83610. procedure TCAN1_C1FIFOINT28.setTXNFULLIF(thebits : TBits_1); inline;
  83611. begin
  83612. if thebits = 0 then
  83613. pTDefRegMap(@Self)^.clr := $00000400
  83614. else
  83615. pTDefRegMap(@Self)^.&set := $00000400;
  83616. end;
  83617. function TCAN1_C1FIFOINT28.getTXNFULLIF : TBits_1; inline;
  83618. begin
  83619. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  83620. end;
  83621. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIE; inline;
  83622. begin
  83623. pTDefRegMap(@Self)^.&set := $00010000;
  83624. end;
  83625. procedure TCAN1_C1FIFOINT28.clearRXNEMPTYIE; inline;
  83626. begin
  83627. pTDefRegMap(@Self)^.clr := $00010000;
  83628. end;
  83629. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIE(thebits : TBits_1); inline;
  83630. begin
  83631. if thebits = 0 then
  83632. pTDefRegMap(@Self)^.clr := $00010000
  83633. else
  83634. pTDefRegMap(@Self)^.&set := $00010000;
  83635. end;
  83636. function TCAN1_C1FIFOINT28.getRXNEMPTYIE : TBits_1; inline;
  83637. begin
  83638. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  83639. end;
  83640. procedure TCAN1_C1FIFOINT28.setRXHALFIE; inline;
  83641. begin
  83642. pTDefRegMap(@Self)^.&set := $00020000;
  83643. end;
  83644. procedure TCAN1_C1FIFOINT28.clearRXHALFIE; inline;
  83645. begin
  83646. pTDefRegMap(@Self)^.clr := $00020000;
  83647. end;
  83648. procedure TCAN1_C1FIFOINT28.setRXHALFIE(thebits : TBits_1); inline;
  83649. begin
  83650. if thebits = 0 then
  83651. pTDefRegMap(@Self)^.clr := $00020000
  83652. else
  83653. pTDefRegMap(@Self)^.&set := $00020000;
  83654. end;
  83655. function TCAN1_C1FIFOINT28.getRXHALFIE : TBits_1; inline;
  83656. begin
  83657. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  83658. end;
  83659. procedure TCAN1_C1FIFOINT28.setRXFULLIE; inline;
  83660. begin
  83661. pTDefRegMap(@Self)^.&set := $00040000;
  83662. end;
  83663. procedure TCAN1_C1FIFOINT28.clearRXFULLIE; inline;
  83664. begin
  83665. pTDefRegMap(@Self)^.clr := $00040000;
  83666. end;
  83667. procedure TCAN1_C1FIFOINT28.setRXFULLIE(thebits : TBits_1); inline;
  83668. begin
  83669. if thebits = 0 then
  83670. pTDefRegMap(@Self)^.clr := $00040000
  83671. else
  83672. pTDefRegMap(@Self)^.&set := $00040000;
  83673. end;
  83674. function TCAN1_C1FIFOINT28.getRXFULLIE : TBits_1; inline;
  83675. begin
  83676. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  83677. end;
  83678. procedure TCAN1_C1FIFOINT28.setRXOVFLIE; inline;
  83679. begin
  83680. pTDefRegMap(@Self)^.&set := $00080000;
  83681. end;
  83682. procedure TCAN1_C1FIFOINT28.clearRXOVFLIE; inline;
  83683. begin
  83684. pTDefRegMap(@Self)^.clr := $00080000;
  83685. end;
  83686. procedure TCAN1_C1FIFOINT28.setRXOVFLIE(thebits : TBits_1); inline;
  83687. begin
  83688. if thebits = 0 then
  83689. pTDefRegMap(@Self)^.clr := $00080000
  83690. else
  83691. pTDefRegMap(@Self)^.&set := $00080000;
  83692. end;
  83693. function TCAN1_C1FIFOINT28.getRXOVFLIE : TBits_1; inline;
  83694. begin
  83695. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  83696. end;
  83697. procedure TCAN1_C1FIFOINT28.setTXEMPTYIE; inline;
  83698. begin
  83699. pTDefRegMap(@Self)^.&set := $01000000;
  83700. end;
  83701. procedure TCAN1_C1FIFOINT28.clearTXEMPTYIE; inline;
  83702. begin
  83703. pTDefRegMap(@Self)^.clr := $01000000;
  83704. end;
  83705. procedure TCAN1_C1FIFOINT28.setTXEMPTYIE(thebits : TBits_1); inline;
  83706. begin
  83707. if thebits = 0 then
  83708. pTDefRegMap(@Self)^.clr := $01000000
  83709. else
  83710. pTDefRegMap(@Self)^.&set := $01000000;
  83711. end;
  83712. function TCAN1_C1FIFOINT28.getTXEMPTYIE : TBits_1; inline;
  83713. begin
  83714. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  83715. end;
  83716. procedure TCAN1_C1FIFOINT28.setTXHALFIE; inline;
  83717. begin
  83718. pTDefRegMap(@Self)^.&set := $02000000;
  83719. end;
  83720. procedure TCAN1_C1FIFOINT28.clearTXHALFIE; inline;
  83721. begin
  83722. pTDefRegMap(@Self)^.clr := $02000000;
  83723. end;
  83724. procedure TCAN1_C1FIFOINT28.setTXHALFIE(thebits : TBits_1); inline;
  83725. begin
  83726. if thebits = 0 then
  83727. pTDefRegMap(@Self)^.clr := $02000000
  83728. else
  83729. pTDefRegMap(@Self)^.&set := $02000000;
  83730. end;
  83731. function TCAN1_C1FIFOINT28.getTXHALFIE : TBits_1; inline;
  83732. begin
  83733. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  83734. end;
  83735. procedure TCAN1_C1FIFOINT28.setTXNFULLIE; inline;
  83736. begin
  83737. pTDefRegMap(@Self)^.&set := $04000000;
  83738. end;
  83739. procedure TCAN1_C1FIFOINT28.clearTXNFULLIE; inline;
  83740. begin
  83741. pTDefRegMap(@Self)^.clr := $04000000;
  83742. end;
  83743. procedure TCAN1_C1FIFOINT28.setTXNFULLIE(thebits : TBits_1); inline;
  83744. begin
  83745. if thebits = 0 then
  83746. pTDefRegMap(@Self)^.clr := $04000000
  83747. else
  83748. pTDefRegMap(@Self)^.&set := $04000000;
  83749. end;
  83750. function TCAN1_C1FIFOINT28.getTXNFULLIE : TBits_1; inline;
  83751. begin
  83752. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  83753. end;
  83754. procedure TCAN1_C1FIFOINT28.setw(thebits : TBits_32); inline;
  83755. begin
  83756. pTDefRegMap(@Self)^.val := thebits;
  83757. end;
  83758. function TCAN1_C1FIFOINT28.getw : TBits_32; inline;
  83759. begin
  83760. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83761. end;
  83762. procedure TCAN1_C1FIFOCI28.setCFIFOCI(thebits : TBits_5); inline;
  83763. begin
  83764. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83765. end;
  83766. function TCAN1_C1FIFOCI28.getCFIFOCI : TBits_5; inline;
  83767. begin
  83768. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83769. end;
  83770. procedure TCAN1_C1FIFOCI28.setw(thebits : TBits_32); inline;
  83771. begin
  83772. pTDefRegMap(@Self)^.val := thebits;
  83773. end;
  83774. function TCAN1_C1FIFOCI28.getw : TBits_32; inline;
  83775. begin
  83776. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83777. end;
  83778. procedure TCAN1_C1FIFOCON29.setTXPRI(thebits : TBits_2); inline;
  83779. begin
  83780. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  83781. end;
  83782. function TCAN1_C1FIFOCON29.getTXPRI : TBits_2; inline;
  83783. begin
  83784. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  83785. end;
  83786. procedure TCAN1_C1FIFOCON29.setRTREN; inline;
  83787. begin
  83788. pTDefRegMap(@Self)^.&set := $00000004;
  83789. end;
  83790. procedure TCAN1_C1FIFOCON29.clearRTREN; inline;
  83791. begin
  83792. pTDefRegMap(@Self)^.clr := $00000004;
  83793. end;
  83794. procedure TCAN1_C1FIFOCON29.setRTREN(thebits : TBits_1); inline;
  83795. begin
  83796. if thebits = 0 then
  83797. pTDefRegMap(@Self)^.clr := $00000004
  83798. else
  83799. pTDefRegMap(@Self)^.&set := $00000004;
  83800. end;
  83801. function TCAN1_C1FIFOCON29.getRTREN : TBits_1; inline;
  83802. begin
  83803. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  83804. end;
  83805. procedure TCAN1_C1FIFOCON29.setTXREQ; inline;
  83806. begin
  83807. pTDefRegMap(@Self)^.&set := $00000008;
  83808. end;
  83809. procedure TCAN1_C1FIFOCON29.clearTXREQ; inline;
  83810. begin
  83811. pTDefRegMap(@Self)^.clr := $00000008;
  83812. end;
  83813. procedure TCAN1_C1FIFOCON29.setTXREQ(thebits : TBits_1); inline;
  83814. begin
  83815. if thebits = 0 then
  83816. pTDefRegMap(@Self)^.clr := $00000008
  83817. else
  83818. pTDefRegMap(@Self)^.&set := $00000008;
  83819. end;
  83820. function TCAN1_C1FIFOCON29.getTXREQ : TBits_1; inline;
  83821. begin
  83822. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  83823. end;
  83824. procedure TCAN1_C1FIFOCON29.setTXERR; inline;
  83825. begin
  83826. pTDefRegMap(@Self)^.&set := $00000010;
  83827. end;
  83828. procedure TCAN1_C1FIFOCON29.clearTXERR; inline;
  83829. begin
  83830. pTDefRegMap(@Self)^.clr := $00000010;
  83831. end;
  83832. procedure TCAN1_C1FIFOCON29.setTXERR(thebits : TBits_1); inline;
  83833. begin
  83834. if thebits = 0 then
  83835. pTDefRegMap(@Self)^.clr := $00000010
  83836. else
  83837. pTDefRegMap(@Self)^.&set := $00000010;
  83838. end;
  83839. function TCAN1_C1FIFOCON29.getTXERR : TBits_1; inline;
  83840. begin
  83841. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  83842. end;
  83843. procedure TCAN1_C1FIFOCON29.setTXLARB; inline;
  83844. begin
  83845. pTDefRegMap(@Self)^.&set := $00000020;
  83846. end;
  83847. procedure TCAN1_C1FIFOCON29.clearTXLARB; inline;
  83848. begin
  83849. pTDefRegMap(@Self)^.clr := $00000020;
  83850. end;
  83851. procedure TCAN1_C1FIFOCON29.setTXLARB(thebits : TBits_1); inline;
  83852. begin
  83853. if thebits = 0 then
  83854. pTDefRegMap(@Self)^.clr := $00000020
  83855. else
  83856. pTDefRegMap(@Self)^.&set := $00000020;
  83857. end;
  83858. function TCAN1_C1FIFOCON29.getTXLARB : TBits_1; inline;
  83859. begin
  83860. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  83861. end;
  83862. procedure TCAN1_C1FIFOCON29.setTXABAT; inline;
  83863. begin
  83864. pTDefRegMap(@Self)^.&set := $00000040;
  83865. end;
  83866. procedure TCAN1_C1FIFOCON29.clearTXABAT; inline;
  83867. begin
  83868. pTDefRegMap(@Self)^.clr := $00000040;
  83869. end;
  83870. procedure TCAN1_C1FIFOCON29.setTXABAT(thebits : TBits_1); inline;
  83871. begin
  83872. if thebits = 0 then
  83873. pTDefRegMap(@Self)^.clr := $00000040
  83874. else
  83875. pTDefRegMap(@Self)^.&set := $00000040;
  83876. end;
  83877. function TCAN1_C1FIFOCON29.getTXABAT : TBits_1; inline;
  83878. begin
  83879. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  83880. end;
  83881. procedure TCAN1_C1FIFOCON29.setTXEN; inline;
  83882. begin
  83883. pTDefRegMap(@Self)^.&set := $00000080;
  83884. end;
  83885. procedure TCAN1_C1FIFOCON29.clearTXEN; inline;
  83886. begin
  83887. pTDefRegMap(@Self)^.clr := $00000080;
  83888. end;
  83889. procedure TCAN1_C1FIFOCON29.setTXEN(thebits : TBits_1); inline;
  83890. begin
  83891. if thebits = 0 then
  83892. pTDefRegMap(@Self)^.clr := $00000080
  83893. else
  83894. pTDefRegMap(@Self)^.&set := $00000080;
  83895. end;
  83896. function TCAN1_C1FIFOCON29.getTXEN : TBits_1; inline;
  83897. begin
  83898. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83899. end;
  83900. procedure TCAN1_C1FIFOCON29.setDONLY; inline;
  83901. begin
  83902. pTDefRegMap(@Self)^.&set := $00001000;
  83903. end;
  83904. procedure TCAN1_C1FIFOCON29.clearDONLY; inline;
  83905. begin
  83906. pTDefRegMap(@Self)^.clr := $00001000;
  83907. end;
  83908. procedure TCAN1_C1FIFOCON29.setDONLY(thebits : TBits_1); inline;
  83909. begin
  83910. if thebits = 0 then
  83911. pTDefRegMap(@Self)^.clr := $00001000
  83912. else
  83913. pTDefRegMap(@Self)^.&set := $00001000;
  83914. end;
  83915. function TCAN1_C1FIFOCON29.getDONLY : TBits_1; inline;
  83916. begin
  83917. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  83918. end;
  83919. procedure TCAN1_C1FIFOCON29.setUINC; inline;
  83920. begin
  83921. pTDefRegMap(@Self)^.&set := $00002000;
  83922. end;
  83923. procedure TCAN1_C1FIFOCON29.clearUINC; inline;
  83924. begin
  83925. pTDefRegMap(@Self)^.clr := $00002000;
  83926. end;
  83927. procedure TCAN1_C1FIFOCON29.setUINC(thebits : TBits_1); inline;
  83928. begin
  83929. if thebits = 0 then
  83930. pTDefRegMap(@Self)^.clr := $00002000
  83931. else
  83932. pTDefRegMap(@Self)^.&set := $00002000;
  83933. end;
  83934. function TCAN1_C1FIFOCON29.getUINC : TBits_1; inline;
  83935. begin
  83936. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  83937. end;
  83938. procedure TCAN1_C1FIFOCON29.setFRESET; inline;
  83939. begin
  83940. pTDefRegMap(@Self)^.&set := $00004000;
  83941. end;
  83942. procedure TCAN1_C1FIFOCON29.clearFRESET; inline;
  83943. begin
  83944. pTDefRegMap(@Self)^.clr := $00004000;
  83945. end;
  83946. procedure TCAN1_C1FIFOCON29.setFRESET(thebits : TBits_1); inline;
  83947. begin
  83948. if thebits = 0 then
  83949. pTDefRegMap(@Self)^.clr := $00004000
  83950. else
  83951. pTDefRegMap(@Self)^.&set := $00004000;
  83952. end;
  83953. function TCAN1_C1FIFOCON29.getFRESET : TBits_1; inline;
  83954. begin
  83955. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  83956. end;
  83957. procedure TCAN1_C1FIFOCON29.setFSIZE(thebits : TBits_5); inline;
  83958. begin
  83959. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83960. end;
  83961. function TCAN1_C1FIFOCON29.getFSIZE : TBits_5; inline;
  83962. begin
  83963. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83964. end;
  83965. procedure TCAN1_C1FIFOCON29.setw(thebits : TBits_32); inline;
  83966. begin
  83967. pTDefRegMap(@Self)^.val := thebits;
  83968. end;
  83969. function TCAN1_C1FIFOCON29.getw : TBits_32; inline;
  83970. begin
  83971. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83972. end;
  83973. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIF; inline;
  83974. begin
  83975. pTDefRegMap(@Self)^.&set := $00000001;
  83976. end;
  83977. procedure TCAN1_C1FIFOINT29.clearRXNEMPTYIF; inline;
  83978. begin
  83979. pTDefRegMap(@Self)^.clr := $00000001;
  83980. end;
  83981. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIF(thebits : TBits_1); inline;
  83982. begin
  83983. if thebits = 0 then
  83984. pTDefRegMap(@Self)^.clr := $00000001
  83985. else
  83986. pTDefRegMap(@Self)^.&set := $00000001;
  83987. end;
  83988. function TCAN1_C1FIFOINT29.getRXNEMPTYIF : TBits_1; inline;
  83989. begin
  83990. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  83991. end;
  83992. procedure TCAN1_C1FIFOINT29.setRXHALFIF; inline;
  83993. begin
  83994. pTDefRegMap(@Self)^.&set := $00000002;
  83995. end;
  83996. procedure TCAN1_C1FIFOINT29.clearRXHALFIF; inline;
  83997. begin
  83998. pTDefRegMap(@Self)^.clr := $00000002;
  83999. end;
  84000. procedure TCAN1_C1FIFOINT29.setRXHALFIF(thebits : TBits_1); inline;
  84001. begin
  84002. if thebits = 0 then
  84003. pTDefRegMap(@Self)^.clr := $00000002
  84004. else
  84005. pTDefRegMap(@Self)^.&set := $00000002;
  84006. end;
  84007. function TCAN1_C1FIFOINT29.getRXHALFIF : TBits_1; inline;
  84008. begin
  84009. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  84010. end;
  84011. procedure TCAN1_C1FIFOINT29.setRXFULLIF; inline;
  84012. begin
  84013. pTDefRegMap(@Self)^.&set := $00000004;
  84014. end;
  84015. procedure TCAN1_C1FIFOINT29.clearRXFULLIF; inline;
  84016. begin
  84017. pTDefRegMap(@Self)^.clr := $00000004;
  84018. end;
  84019. procedure TCAN1_C1FIFOINT29.setRXFULLIF(thebits : TBits_1); inline;
  84020. begin
  84021. if thebits = 0 then
  84022. pTDefRegMap(@Self)^.clr := $00000004
  84023. else
  84024. pTDefRegMap(@Self)^.&set := $00000004;
  84025. end;
  84026. function TCAN1_C1FIFOINT29.getRXFULLIF : TBits_1; inline;
  84027. begin
  84028. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  84029. end;
  84030. procedure TCAN1_C1FIFOINT29.setRXOVFLIF; inline;
  84031. begin
  84032. pTDefRegMap(@Self)^.&set := $00000008;
  84033. end;
  84034. procedure TCAN1_C1FIFOINT29.clearRXOVFLIF; inline;
  84035. begin
  84036. pTDefRegMap(@Self)^.clr := $00000008;
  84037. end;
  84038. procedure TCAN1_C1FIFOINT29.setRXOVFLIF(thebits : TBits_1); inline;
  84039. begin
  84040. if thebits = 0 then
  84041. pTDefRegMap(@Self)^.clr := $00000008
  84042. else
  84043. pTDefRegMap(@Self)^.&set := $00000008;
  84044. end;
  84045. function TCAN1_C1FIFOINT29.getRXOVFLIF : TBits_1; inline;
  84046. begin
  84047. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  84048. end;
  84049. procedure TCAN1_C1FIFOINT29.setTXEMPTYIF; inline;
  84050. begin
  84051. pTDefRegMap(@Self)^.&set := $00000100;
  84052. end;
  84053. procedure TCAN1_C1FIFOINT29.clearTXEMPTYIF; inline;
  84054. begin
  84055. pTDefRegMap(@Self)^.clr := $00000100;
  84056. end;
  84057. procedure TCAN1_C1FIFOINT29.setTXEMPTYIF(thebits : TBits_1); inline;
  84058. begin
  84059. if thebits = 0 then
  84060. pTDefRegMap(@Self)^.clr := $00000100
  84061. else
  84062. pTDefRegMap(@Self)^.&set := $00000100;
  84063. end;
  84064. function TCAN1_C1FIFOINT29.getTXEMPTYIF : TBits_1; inline;
  84065. begin
  84066. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  84067. end;
  84068. procedure TCAN1_C1FIFOINT29.setTXHALFIF; inline;
  84069. begin
  84070. pTDefRegMap(@Self)^.&set := $00000200;
  84071. end;
  84072. procedure TCAN1_C1FIFOINT29.clearTXHALFIF; inline;
  84073. begin
  84074. pTDefRegMap(@Self)^.clr := $00000200;
  84075. end;
  84076. procedure TCAN1_C1FIFOINT29.setTXHALFIF(thebits : TBits_1); inline;
  84077. begin
  84078. if thebits = 0 then
  84079. pTDefRegMap(@Self)^.clr := $00000200
  84080. else
  84081. pTDefRegMap(@Self)^.&set := $00000200;
  84082. end;
  84083. function TCAN1_C1FIFOINT29.getTXHALFIF : TBits_1; inline;
  84084. begin
  84085. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  84086. end;
  84087. procedure TCAN1_C1FIFOINT29.setTXNFULLIF; inline;
  84088. begin
  84089. pTDefRegMap(@Self)^.&set := $00000400;
  84090. end;
  84091. procedure TCAN1_C1FIFOINT29.clearTXNFULLIF; inline;
  84092. begin
  84093. pTDefRegMap(@Self)^.clr := $00000400;
  84094. end;
  84095. procedure TCAN1_C1FIFOINT29.setTXNFULLIF(thebits : TBits_1); inline;
  84096. begin
  84097. if thebits = 0 then
  84098. pTDefRegMap(@Self)^.clr := $00000400
  84099. else
  84100. pTDefRegMap(@Self)^.&set := $00000400;
  84101. end;
  84102. function TCAN1_C1FIFOINT29.getTXNFULLIF : TBits_1; inline;
  84103. begin
  84104. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  84105. end;
  84106. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIE; inline;
  84107. begin
  84108. pTDefRegMap(@Self)^.&set := $00010000;
  84109. end;
  84110. procedure TCAN1_C1FIFOINT29.clearRXNEMPTYIE; inline;
  84111. begin
  84112. pTDefRegMap(@Self)^.clr := $00010000;
  84113. end;
  84114. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIE(thebits : TBits_1); inline;
  84115. begin
  84116. if thebits = 0 then
  84117. pTDefRegMap(@Self)^.clr := $00010000
  84118. else
  84119. pTDefRegMap(@Self)^.&set := $00010000;
  84120. end;
  84121. function TCAN1_C1FIFOINT29.getRXNEMPTYIE : TBits_1; inline;
  84122. begin
  84123. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  84124. end;
  84125. procedure TCAN1_C1FIFOINT29.setRXHALFIE; inline;
  84126. begin
  84127. pTDefRegMap(@Self)^.&set := $00020000;
  84128. end;
  84129. procedure TCAN1_C1FIFOINT29.clearRXHALFIE; inline;
  84130. begin
  84131. pTDefRegMap(@Self)^.clr := $00020000;
  84132. end;
  84133. procedure TCAN1_C1FIFOINT29.setRXHALFIE(thebits : TBits_1); inline;
  84134. begin
  84135. if thebits = 0 then
  84136. pTDefRegMap(@Self)^.clr := $00020000
  84137. else
  84138. pTDefRegMap(@Self)^.&set := $00020000;
  84139. end;
  84140. function TCAN1_C1FIFOINT29.getRXHALFIE : TBits_1; inline;
  84141. begin
  84142. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  84143. end;
  84144. procedure TCAN1_C1FIFOINT29.setRXFULLIE; inline;
  84145. begin
  84146. pTDefRegMap(@Self)^.&set := $00040000;
  84147. end;
  84148. procedure TCAN1_C1FIFOINT29.clearRXFULLIE; inline;
  84149. begin
  84150. pTDefRegMap(@Self)^.clr := $00040000;
  84151. end;
  84152. procedure TCAN1_C1FIFOINT29.setRXFULLIE(thebits : TBits_1); inline;
  84153. begin
  84154. if thebits = 0 then
  84155. pTDefRegMap(@Self)^.clr := $00040000
  84156. else
  84157. pTDefRegMap(@Self)^.&set := $00040000;
  84158. end;
  84159. function TCAN1_C1FIFOINT29.getRXFULLIE : TBits_1; inline;
  84160. begin
  84161. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  84162. end;
  84163. procedure TCAN1_C1FIFOINT29.setRXOVFLIE; inline;
  84164. begin
  84165. pTDefRegMap(@Self)^.&set := $00080000;
  84166. end;
  84167. procedure TCAN1_C1FIFOINT29.clearRXOVFLIE; inline;
  84168. begin
  84169. pTDefRegMap(@Self)^.clr := $00080000;
  84170. end;
  84171. procedure TCAN1_C1FIFOINT29.setRXOVFLIE(thebits : TBits_1); inline;
  84172. begin
  84173. if thebits = 0 then
  84174. pTDefRegMap(@Self)^.clr := $00080000
  84175. else
  84176. pTDefRegMap(@Self)^.&set := $00080000;
  84177. end;
  84178. function TCAN1_C1FIFOINT29.getRXOVFLIE : TBits_1; inline;
  84179. begin
  84180. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84181. end;
  84182. procedure TCAN1_C1FIFOINT29.setTXEMPTYIE; inline;
  84183. begin
  84184. pTDefRegMap(@Self)^.&set := $01000000;
  84185. end;
  84186. procedure TCAN1_C1FIFOINT29.clearTXEMPTYIE; inline;
  84187. begin
  84188. pTDefRegMap(@Self)^.clr := $01000000;
  84189. end;
  84190. procedure TCAN1_C1FIFOINT29.setTXEMPTYIE(thebits : TBits_1); inline;
  84191. begin
  84192. if thebits = 0 then
  84193. pTDefRegMap(@Self)^.clr := $01000000
  84194. else
  84195. pTDefRegMap(@Self)^.&set := $01000000;
  84196. end;
  84197. function TCAN1_C1FIFOINT29.getTXEMPTYIE : TBits_1; inline;
  84198. begin
  84199. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  84200. end;
  84201. procedure TCAN1_C1FIFOINT29.setTXHALFIE; inline;
  84202. begin
  84203. pTDefRegMap(@Self)^.&set := $02000000;
  84204. end;
  84205. procedure TCAN1_C1FIFOINT29.clearTXHALFIE; inline;
  84206. begin
  84207. pTDefRegMap(@Self)^.clr := $02000000;
  84208. end;
  84209. procedure TCAN1_C1FIFOINT29.setTXHALFIE(thebits : TBits_1); inline;
  84210. begin
  84211. if thebits = 0 then
  84212. pTDefRegMap(@Self)^.clr := $02000000
  84213. else
  84214. pTDefRegMap(@Self)^.&set := $02000000;
  84215. end;
  84216. function TCAN1_C1FIFOINT29.getTXHALFIE : TBits_1; inline;
  84217. begin
  84218. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  84219. end;
  84220. procedure TCAN1_C1FIFOINT29.setTXNFULLIE; inline;
  84221. begin
  84222. pTDefRegMap(@Self)^.&set := $04000000;
  84223. end;
  84224. procedure TCAN1_C1FIFOINT29.clearTXNFULLIE; inline;
  84225. begin
  84226. pTDefRegMap(@Self)^.clr := $04000000;
  84227. end;
  84228. procedure TCAN1_C1FIFOINT29.setTXNFULLIE(thebits : TBits_1); inline;
  84229. begin
  84230. if thebits = 0 then
  84231. pTDefRegMap(@Self)^.clr := $04000000
  84232. else
  84233. pTDefRegMap(@Self)^.&set := $04000000;
  84234. end;
  84235. function TCAN1_C1FIFOINT29.getTXNFULLIE : TBits_1; inline;
  84236. begin
  84237. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  84238. end;
  84239. procedure TCAN1_C1FIFOINT29.setw(thebits : TBits_32); inline;
  84240. begin
  84241. pTDefRegMap(@Self)^.val := thebits;
  84242. end;
  84243. function TCAN1_C1FIFOINT29.getw : TBits_32; inline;
  84244. begin
  84245. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84246. end;
  84247. procedure TCAN1_C1FIFOCI29.setCFIFOCI(thebits : TBits_5); inline;
  84248. begin
  84249. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  84250. end;
  84251. function TCAN1_C1FIFOCI29.getCFIFOCI : TBits_5; inline;
  84252. begin
  84253. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  84254. end;
  84255. procedure TCAN1_C1FIFOCI29.setw(thebits : TBits_32); inline;
  84256. begin
  84257. pTDefRegMap(@Self)^.val := thebits;
  84258. end;
  84259. function TCAN1_C1FIFOCI29.getw : TBits_32; inline;
  84260. begin
  84261. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84262. end;
  84263. procedure TCAN1_C1FIFOCON30.setTXPRI(thebits : TBits_2); inline;
  84264. begin
  84265. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  84266. end;
  84267. function TCAN1_C1FIFOCON30.getTXPRI : TBits_2; inline;
  84268. begin
  84269. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  84270. end;
  84271. procedure TCAN1_C1FIFOCON30.setRTREN; inline;
  84272. begin
  84273. pTDefRegMap(@Self)^.&set := $00000004;
  84274. end;
  84275. procedure TCAN1_C1FIFOCON30.clearRTREN; inline;
  84276. begin
  84277. pTDefRegMap(@Self)^.clr := $00000004;
  84278. end;
  84279. procedure TCAN1_C1FIFOCON30.setRTREN(thebits : TBits_1); inline;
  84280. begin
  84281. if thebits = 0 then
  84282. pTDefRegMap(@Self)^.clr := $00000004
  84283. else
  84284. pTDefRegMap(@Self)^.&set := $00000004;
  84285. end;
  84286. function TCAN1_C1FIFOCON30.getRTREN : TBits_1; inline;
  84287. begin
  84288. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  84289. end;
  84290. procedure TCAN1_C1FIFOCON30.setTXREQ; inline;
  84291. begin
  84292. pTDefRegMap(@Self)^.&set := $00000008;
  84293. end;
  84294. procedure TCAN1_C1FIFOCON30.clearTXREQ; inline;
  84295. begin
  84296. pTDefRegMap(@Self)^.clr := $00000008;
  84297. end;
  84298. procedure TCAN1_C1FIFOCON30.setTXREQ(thebits : TBits_1); inline;
  84299. begin
  84300. if thebits = 0 then
  84301. pTDefRegMap(@Self)^.clr := $00000008
  84302. else
  84303. pTDefRegMap(@Self)^.&set := $00000008;
  84304. end;
  84305. function TCAN1_C1FIFOCON30.getTXREQ : TBits_1; inline;
  84306. begin
  84307. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  84308. end;
  84309. procedure TCAN1_C1FIFOCON30.setTXERR; inline;
  84310. begin
  84311. pTDefRegMap(@Self)^.&set := $00000010;
  84312. end;
  84313. procedure TCAN1_C1FIFOCON30.clearTXERR; inline;
  84314. begin
  84315. pTDefRegMap(@Self)^.clr := $00000010;
  84316. end;
  84317. procedure TCAN1_C1FIFOCON30.setTXERR(thebits : TBits_1); inline;
  84318. begin
  84319. if thebits = 0 then
  84320. pTDefRegMap(@Self)^.clr := $00000010
  84321. else
  84322. pTDefRegMap(@Self)^.&set := $00000010;
  84323. end;
  84324. function TCAN1_C1FIFOCON30.getTXERR : TBits_1; inline;
  84325. begin
  84326. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  84327. end;
  84328. procedure TCAN1_C1FIFOCON30.setTXLARB; inline;
  84329. begin
  84330. pTDefRegMap(@Self)^.&set := $00000020;
  84331. end;
  84332. procedure TCAN1_C1FIFOCON30.clearTXLARB; inline;
  84333. begin
  84334. pTDefRegMap(@Self)^.clr := $00000020;
  84335. end;
  84336. procedure TCAN1_C1FIFOCON30.setTXLARB(thebits : TBits_1); inline;
  84337. begin
  84338. if thebits = 0 then
  84339. pTDefRegMap(@Self)^.clr := $00000020
  84340. else
  84341. pTDefRegMap(@Self)^.&set := $00000020;
  84342. end;
  84343. function TCAN1_C1FIFOCON30.getTXLARB : TBits_1; inline;
  84344. begin
  84345. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  84346. end;
  84347. procedure TCAN1_C1FIFOCON30.setTXABAT; inline;
  84348. begin
  84349. pTDefRegMap(@Self)^.&set := $00000040;
  84350. end;
  84351. procedure TCAN1_C1FIFOCON30.clearTXABAT; inline;
  84352. begin
  84353. pTDefRegMap(@Self)^.clr := $00000040;
  84354. end;
  84355. procedure TCAN1_C1FIFOCON30.setTXABAT(thebits : TBits_1); inline;
  84356. begin
  84357. if thebits = 0 then
  84358. pTDefRegMap(@Self)^.clr := $00000040
  84359. else
  84360. pTDefRegMap(@Self)^.&set := $00000040;
  84361. end;
  84362. function TCAN1_C1FIFOCON30.getTXABAT : TBits_1; inline;
  84363. begin
  84364. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  84365. end;
  84366. procedure TCAN1_C1FIFOCON30.setTXEN; inline;
  84367. begin
  84368. pTDefRegMap(@Self)^.&set := $00000080;
  84369. end;
  84370. procedure TCAN1_C1FIFOCON30.clearTXEN; inline;
  84371. begin
  84372. pTDefRegMap(@Self)^.clr := $00000080;
  84373. end;
  84374. procedure TCAN1_C1FIFOCON30.setTXEN(thebits : TBits_1); inline;
  84375. begin
  84376. if thebits = 0 then
  84377. pTDefRegMap(@Self)^.clr := $00000080
  84378. else
  84379. pTDefRegMap(@Self)^.&set := $00000080;
  84380. end;
  84381. function TCAN1_C1FIFOCON30.getTXEN : TBits_1; inline;
  84382. begin
  84383. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  84384. end;
  84385. procedure TCAN1_C1FIFOCON30.setDONLY; inline;
  84386. begin
  84387. pTDefRegMap(@Self)^.&set := $00001000;
  84388. end;
  84389. procedure TCAN1_C1FIFOCON30.clearDONLY; inline;
  84390. begin
  84391. pTDefRegMap(@Self)^.clr := $00001000;
  84392. end;
  84393. procedure TCAN1_C1FIFOCON30.setDONLY(thebits : TBits_1); inline;
  84394. begin
  84395. if thebits = 0 then
  84396. pTDefRegMap(@Self)^.clr := $00001000
  84397. else
  84398. pTDefRegMap(@Self)^.&set := $00001000;
  84399. end;
  84400. function TCAN1_C1FIFOCON30.getDONLY : TBits_1; inline;
  84401. begin
  84402. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  84403. end;
  84404. procedure TCAN1_C1FIFOCON30.setUINC; inline;
  84405. begin
  84406. pTDefRegMap(@Self)^.&set := $00002000;
  84407. end;
  84408. procedure TCAN1_C1FIFOCON30.clearUINC; inline;
  84409. begin
  84410. pTDefRegMap(@Self)^.clr := $00002000;
  84411. end;
  84412. procedure TCAN1_C1FIFOCON30.setUINC(thebits : TBits_1); inline;
  84413. begin
  84414. if thebits = 0 then
  84415. pTDefRegMap(@Self)^.clr := $00002000
  84416. else
  84417. pTDefRegMap(@Self)^.&set := $00002000;
  84418. end;
  84419. function TCAN1_C1FIFOCON30.getUINC : TBits_1; inline;
  84420. begin
  84421. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  84422. end;
  84423. procedure TCAN1_C1FIFOCON30.setFRESET; inline;
  84424. begin
  84425. pTDefRegMap(@Self)^.&set := $00004000;
  84426. end;
  84427. procedure TCAN1_C1FIFOCON30.clearFRESET; inline;
  84428. begin
  84429. pTDefRegMap(@Self)^.clr := $00004000;
  84430. end;
  84431. procedure TCAN1_C1FIFOCON30.setFRESET(thebits : TBits_1); inline;
  84432. begin
  84433. if thebits = 0 then
  84434. pTDefRegMap(@Self)^.clr := $00004000
  84435. else
  84436. pTDefRegMap(@Self)^.&set := $00004000;
  84437. end;
  84438. function TCAN1_C1FIFOCON30.getFRESET : TBits_1; inline;
  84439. begin
  84440. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  84441. end;
  84442. procedure TCAN1_C1FIFOCON30.setFSIZE(thebits : TBits_5); inline;
  84443. begin
  84444. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  84445. end;
  84446. function TCAN1_C1FIFOCON30.getFSIZE : TBits_5; inline;
  84447. begin
  84448. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  84449. end;
  84450. procedure TCAN1_C1FIFOCON30.setw(thebits : TBits_32); inline;
  84451. begin
  84452. pTDefRegMap(@Self)^.val := thebits;
  84453. end;
  84454. function TCAN1_C1FIFOCON30.getw : TBits_32; inline;
  84455. begin
  84456. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84457. end;
  84458. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIF; inline;
  84459. begin
  84460. pTDefRegMap(@Self)^.&set := $00000001;
  84461. end;
  84462. procedure TCAN1_C1FIFOINT30.clearRXNEMPTYIF; inline;
  84463. begin
  84464. pTDefRegMap(@Self)^.clr := $00000001;
  84465. end;
  84466. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIF(thebits : TBits_1); inline;
  84467. begin
  84468. if thebits = 0 then
  84469. pTDefRegMap(@Self)^.clr := $00000001
  84470. else
  84471. pTDefRegMap(@Self)^.&set := $00000001;
  84472. end;
  84473. function TCAN1_C1FIFOINT30.getRXNEMPTYIF : TBits_1; inline;
  84474. begin
  84475. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  84476. end;
  84477. procedure TCAN1_C1FIFOINT30.setRXHALFIF; inline;
  84478. begin
  84479. pTDefRegMap(@Self)^.&set := $00000002;
  84480. end;
  84481. procedure TCAN1_C1FIFOINT30.clearRXHALFIF; inline;
  84482. begin
  84483. pTDefRegMap(@Self)^.clr := $00000002;
  84484. end;
  84485. procedure TCAN1_C1FIFOINT30.setRXHALFIF(thebits : TBits_1); inline;
  84486. begin
  84487. if thebits = 0 then
  84488. pTDefRegMap(@Self)^.clr := $00000002
  84489. else
  84490. pTDefRegMap(@Self)^.&set := $00000002;
  84491. end;
  84492. function TCAN1_C1FIFOINT30.getRXHALFIF : TBits_1; inline;
  84493. begin
  84494. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  84495. end;
  84496. procedure TCAN1_C1FIFOINT30.setRXFULLIF; inline;
  84497. begin
  84498. pTDefRegMap(@Self)^.&set := $00000004;
  84499. end;
  84500. procedure TCAN1_C1FIFOINT30.clearRXFULLIF; inline;
  84501. begin
  84502. pTDefRegMap(@Self)^.clr := $00000004;
  84503. end;
  84504. procedure TCAN1_C1FIFOINT30.setRXFULLIF(thebits : TBits_1); inline;
  84505. begin
  84506. if thebits = 0 then
  84507. pTDefRegMap(@Self)^.clr := $00000004
  84508. else
  84509. pTDefRegMap(@Self)^.&set := $00000004;
  84510. end;
  84511. function TCAN1_C1FIFOINT30.getRXFULLIF : TBits_1; inline;
  84512. begin
  84513. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  84514. end;
  84515. procedure TCAN1_C1FIFOINT30.setRXOVFLIF; inline;
  84516. begin
  84517. pTDefRegMap(@Self)^.&set := $00000008;
  84518. end;
  84519. procedure TCAN1_C1FIFOINT30.clearRXOVFLIF; inline;
  84520. begin
  84521. pTDefRegMap(@Self)^.clr := $00000008;
  84522. end;
  84523. procedure TCAN1_C1FIFOINT30.setRXOVFLIF(thebits : TBits_1); inline;
  84524. begin
  84525. if thebits = 0 then
  84526. pTDefRegMap(@Self)^.clr := $00000008
  84527. else
  84528. pTDefRegMap(@Self)^.&set := $00000008;
  84529. end;
  84530. function TCAN1_C1FIFOINT30.getRXOVFLIF : TBits_1; inline;
  84531. begin
  84532. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  84533. end;
  84534. procedure TCAN1_C1FIFOINT30.setTXEMPTYIF; inline;
  84535. begin
  84536. pTDefRegMap(@Self)^.&set := $00000100;
  84537. end;
  84538. procedure TCAN1_C1FIFOINT30.clearTXEMPTYIF; inline;
  84539. begin
  84540. pTDefRegMap(@Self)^.clr := $00000100;
  84541. end;
  84542. procedure TCAN1_C1FIFOINT30.setTXEMPTYIF(thebits : TBits_1); inline;
  84543. begin
  84544. if thebits = 0 then
  84545. pTDefRegMap(@Self)^.clr := $00000100
  84546. else
  84547. pTDefRegMap(@Self)^.&set := $00000100;
  84548. end;
  84549. function TCAN1_C1FIFOINT30.getTXEMPTYIF : TBits_1; inline;
  84550. begin
  84551. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  84552. end;
  84553. procedure TCAN1_C1FIFOINT30.setTXHALFIF; inline;
  84554. begin
  84555. pTDefRegMap(@Self)^.&set := $00000200;
  84556. end;
  84557. procedure TCAN1_C1FIFOINT30.clearTXHALFIF; inline;
  84558. begin
  84559. pTDefRegMap(@Self)^.clr := $00000200;
  84560. end;
  84561. procedure TCAN1_C1FIFOINT30.setTXHALFIF(thebits : TBits_1); inline;
  84562. begin
  84563. if thebits = 0 then
  84564. pTDefRegMap(@Self)^.clr := $00000200
  84565. else
  84566. pTDefRegMap(@Self)^.&set := $00000200;
  84567. end;
  84568. function TCAN1_C1FIFOINT30.getTXHALFIF : TBits_1; inline;
  84569. begin
  84570. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  84571. end;
  84572. procedure TCAN1_C1FIFOINT30.setTXNFULLIF; inline;
  84573. begin
  84574. pTDefRegMap(@Self)^.&set := $00000400;
  84575. end;
  84576. procedure TCAN1_C1FIFOINT30.clearTXNFULLIF; inline;
  84577. begin
  84578. pTDefRegMap(@Self)^.clr := $00000400;
  84579. end;
  84580. procedure TCAN1_C1FIFOINT30.setTXNFULLIF(thebits : TBits_1); inline;
  84581. begin
  84582. if thebits = 0 then
  84583. pTDefRegMap(@Self)^.clr := $00000400
  84584. else
  84585. pTDefRegMap(@Self)^.&set := $00000400;
  84586. end;
  84587. function TCAN1_C1FIFOINT30.getTXNFULLIF : TBits_1; inline;
  84588. begin
  84589. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  84590. end;
  84591. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIE; inline;
  84592. begin
  84593. pTDefRegMap(@Self)^.&set := $00010000;
  84594. end;
  84595. procedure TCAN1_C1FIFOINT30.clearRXNEMPTYIE; inline;
  84596. begin
  84597. pTDefRegMap(@Self)^.clr := $00010000;
  84598. end;
  84599. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIE(thebits : TBits_1); inline;
  84600. begin
  84601. if thebits = 0 then
  84602. pTDefRegMap(@Self)^.clr := $00010000
  84603. else
  84604. pTDefRegMap(@Self)^.&set := $00010000;
  84605. end;
  84606. function TCAN1_C1FIFOINT30.getRXNEMPTYIE : TBits_1; inline;
  84607. begin
  84608. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  84609. end;
  84610. procedure TCAN1_C1FIFOINT30.setRXHALFIE; inline;
  84611. begin
  84612. pTDefRegMap(@Self)^.&set := $00020000;
  84613. end;
  84614. procedure TCAN1_C1FIFOINT30.clearRXHALFIE; inline;
  84615. begin
  84616. pTDefRegMap(@Self)^.clr := $00020000;
  84617. end;
  84618. procedure TCAN1_C1FIFOINT30.setRXHALFIE(thebits : TBits_1); inline;
  84619. begin
  84620. if thebits = 0 then
  84621. pTDefRegMap(@Self)^.clr := $00020000
  84622. else
  84623. pTDefRegMap(@Self)^.&set := $00020000;
  84624. end;
  84625. function TCAN1_C1FIFOINT30.getRXHALFIE : TBits_1; inline;
  84626. begin
  84627. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  84628. end;
  84629. procedure TCAN1_C1FIFOINT30.setRXFULLIE; inline;
  84630. begin
  84631. pTDefRegMap(@Self)^.&set := $00040000;
  84632. end;
  84633. procedure TCAN1_C1FIFOINT30.clearRXFULLIE; inline;
  84634. begin
  84635. pTDefRegMap(@Self)^.clr := $00040000;
  84636. end;
  84637. procedure TCAN1_C1FIFOINT30.setRXFULLIE(thebits : TBits_1); inline;
  84638. begin
  84639. if thebits = 0 then
  84640. pTDefRegMap(@Self)^.clr := $00040000
  84641. else
  84642. pTDefRegMap(@Self)^.&set := $00040000;
  84643. end;
  84644. function TCAN1_C1FIFOINT30.getRXFULLIE : TBits_1; inline;
  84645. begin
  84646. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  84647. end;
  84648. procedure TCAN1_C1FIFOINT30.setRXOVFLIE; inline;
  84649. begin
  84650. pTDefRegMap(@Self)^.&set := $00080000;
  84651. end;
  84652. procedure TCAN1_C1FIFOINT30.clearRXOVFLIE; inline;
  84653. begin
  84654. pTDefRegMap(@Self)^.clr := $00080000;
  84655. end;
  84656. procedure TCAN1_C1FIFOINT30.setRXOVFLIE(thebits : TBits_1); inline;
  84657. begin
  84658. if thebits = 0 then
  84659. pTDefRegMap(@Self)^.clr := $00080000
  84660. else
  84661. pTDefRegMap(@Self)^.&set := $00080000;
  84662. end;
  84663. function TCAN1_C1FIFOINT30.getRXOVFLIE : TBits_1; inline;
  84664. begin
  84665. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84666. end;
  84667. procedure TCAN1_C1FIFOINT30.setTXEMPTYIE; inline;
  84668. begin
  84669. pTDefRegMap(@Self)^.&set := $01000000;
  84670. end;
  84671. procedure TCAN1_C1FIFOINT30.clearTXEMPTYIE; inline;
  84672. begin
  84673. pTDefRegMap(@Self)^.clr := $01000000;
  84674. end;
  84675. procedure TCAN1_C1FIFOINT30.setTXEMPTYIE(thebits : TBits_1); inline;
  84676. begin
  84677. if thebits = 0 then
  84678. pTDefRegMap(@Self)^.clr := $01000000
  84679. else
  84680. pTDefRegMap(@Self)^.&set := $01000000;
  84681. end;
  84682. function TCAN1_C1FIFOINT30.getTXEMPTYIE : TBits_1; inline;
  84683. begin
  84684. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  84685. end;
  84686. procedure TCAN1_C1FIFOINT30.setTXHALFIE; inline;
  84687. begin
  84688. pTDefRegMap(@Self)^.&set := $02000000;
  84689. end;
  84690. procedure TCAN1_C1FIFOINT30.clearTXHALFIE; inline;
  84691. begin
  84692. pTDefRegMap(@Self)^.clr := $02000000;
  84693. end;
  84694. procedure TCAN1_C1FIFOINT30.setTXHALFIE(thebits : TBits_1); inline;
  84695. begin
  84696. if thebits = 0 then
  84697. pTDefRegMap(@Self)^.clr := $02000000
  84698. else
  84699. pTDefRegMap(@Self)^.&set := $02000000;
  84700. end;
  84701. function TCAN1_C1FIFOINT30.getTXHALFIE : TBits_1; inline;
  84702. begin
  84703. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  84704. end;
  84705. procedure TCAN1_C1FIFOINT30.setTXNFULLIE; inline;
  84706. begin
  84707. pTDefRegMap(@Self)^.&set := $04000000;
  84708. end;
  84709. procedure TCAN1_C1FIFOINT30.clearTXNFULLIE; inline;
  84710. begin
  84711. pTDefRegMap(@Self)^.clr := $04000000;
  84712. end;
  84713. procedure TCAN1_C1FIFOINT30.setTXNFULLIE(thebits : TBits_1); inline;
  84714. begin
  84715. if thebits = 0 then
  84716. pTDefRegMap(@Self)^.clr := $04000000
  84717. else
  84718. pTDefRegMap(@Self)^.&set := $04000000;
  84719. end;
  84720. function TCAN1_C1FIFOINT30.getTXNFULLIE : TBits_1; inline;
  84721. begin
  84722. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  84723. end;
  84724. procedure TCAN1_C1FIFOINT30.setw(thebits : TBits_32); inline;
  84725. begin
  84726. pTDefRegMap(@Self)^.val := thebits;
  84727. end;
  84728. function TCAN1_C1FIFOINT30.getw : TBits_32; inline;
  84729. begin
  84730. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84731. end;
  84732. procedure TCAN1_C1FIFOCI30.setCFIFOCI(thebits : TBits_5); inline;
  84733. begin
  84734. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  84735. end;
  84736. function TCAN1_C1FIFOCI30.getCFIFOCI : TBits_5; inline;
  84737. begin
  84738. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  84739. end;
  84740. procedure TCAN1_C1FIFOCI30.setw(thebits : TBits_32); inline;
  84741. begin
  84742. pTDefRegMap(@Self)^.val := thebits;
  84743. end;
  84744. function TCAN1_C1FIFOCI30.getw : TBits_32; inline;
  84745. begin
  84746. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84747. end;
  84748. procedure TCAN1_C1FIFOCON31.setTXPRI(thebits : TBits_2); inline;
  84749. begin
  84750. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  84751. end;
  84752. function TCAN1_C1FIFOCON31.getTXPRI : TBits_2; inline;
  84753. begin
  84754. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  84755. end;
  84756. procedure TCAN1_C1FIFOCON31.setRTREN; inline;
  84757. begin
  84758. pTDefRegMap(@Self)^.&set := $00000004;
  84759. end;
  84760. procedure TCAN1_C1FIFOCON31.clearRTREN; inline;
  84761. begin
  84762. pTDefRegMap(@Self)^.clr := $00000004;
  84763. end;
  84764. procedure TCAN1_C1FIFOCON31.setRTREN(thebits : TBits_1); inline;
  84765. begin
  84766. if thebits = 0 then
  84767. pTDefRegMap(@Self)^.clr := $00000004
  84768. else
  84769. pTDefRegMap(@Self)^.&set := $00000004;
  84770. end;
  84771. function TCAN1_C1FIFOCON31.getRTREN : TBits_1; inline;
  84772. begin
  84773. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  84774. end;
  84775. procedure TCAN1_C1FIFOCON31.setTXREQ; inline;
  84776. begin
  84777. pTDefRegMap(@Self)^.&set := $00000008;
  84778. end;
  84779. procedure TCAN1_C1FIFOCON31.clearTXREQ; inline;
  84780. begin
  84781. pTDefRegMap(@Self)^.clr := $00000008;
  84782. end;
  84783. procedure TCAN1_C1FIFOCON31.setTXREQ(thebits : TBits_1); inline;
  84784. begin
  84785. if thebits = 0 then
  84786. pTDefRegMap(@Self)^.clr := $00000008
  84787. else
  84788. pTDefRegMap(@Self)^.&set := $00000008;
  84789. end;
  84790. function TCAN1_C1FIFOCON31.getTXREQ : TBits_1; inline;
  84791. begin
  84792. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  84793. end;
  84794. procedure TCAN1_C1FIFOCON31.setTXERR; inline;
  84795. begin
  84796. pTDefRegMap(@Self)^.&set := $00000010;
  84797. end;
  84798. procedure TCAN1_C1FIFOCON31.clearTXERR; inline;
  84799. begin
  84800. pTDefRegMap(@Self)^.clr := $00000010;
  84801. end;
  84802. procedure TCAN1_C1FIFOCON31.setTXERR(thebits : TBits_1); inline;
  84803. begin
  84804. if thebits = 0 then
  84805. pTDefRegMap(@Self)^.clr := $00000010
  84806. else
  84807. pTDefRegMap(@Self)^.&set := $00000010;
  84808. end;
  84809. function TCAN1_C1FIFOCON31.getTXERR : TBits_1; inline;
  84810. begin
  84811. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  84812. end;
  84813. procedure TCAN1_C1FIFOCON31.setTXLARB; inline;
  84814. begin
  84815. pTDefRegMap(@Self)^.&set := $00000020;
  84816. end;
  84817. procedure TCAN1_C1FIFOCON31.clearTXLARB; inline;
  84818. begin
  84819. pTDefRegMap(@Self)^.clr := $00000020;
  84820. end;
  84821. procedure TCAN1_C1FIFOCON31.setTXLARB(thebits : TBits_1); inline;
  84822. begin
  84823. if thebits = 0 then
  84824. pTDefRegMap(@Self)^.clr := $00000020
  84825. else
  84826. pTDefRegMap(@Self)^.&set := $00000020;
  84827. end;
  84828. function TCAN1_C1FIFOCON31.getTXLARB : TBits_1; inline;
  84829. begin
  84830. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  84831. end;
  84832. procedure TCAN1_C1FIFOCON31.setTXABAT; inline;
  84833. begin
  84834. pTDefRegMap(@Self)^.&set := $00000040;
  84835. end;
  84836. procedure TCAN1_C1FIFOCON31.clearTXABAT; inline;
  84837. begin
  84838. pTDefRegMap(@Self)^.clr := $00000040;
  84839. end;
  84840. procedure TCAN1_C1FIFOCON31.setTXABAT(thebits : TBits_1); inline;
  84841. begin
  84842. if thebits = 0 then
  84843. pTDefRegMap(@Self)^.clr := $00000040
  84844. else
  84845. pTDefRegMap(@Self)^.&set := $00000040;
  84846. end;
  84847. function TCAN1_C1FIFOCON31.getTXABAT : TBits_1; inline;
  84848. begin
  84849. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  84850. end;
  84851. procedure TCAN1_C1FIFOCON31.setTXEN; inline;
  84852. begin
  84853. pTDefRegMap(@Self)^.&set := $00000080;
  84854. end;
  84855. procedure TCAN1_C1FIFOCON31.clearTXEN; inline;
  84856. begin
  84857. pTDefRegMap(@Self)^.clr := $00000080;
  84858. end;
  84859. procedure TCAN1_C1FIFOCON31.setTXEN(thebits : TBits_1); inline;
  84860. begin
  84861. if thebits = 0 then
  84862. pTDefRegMap(@Self)^.clr := $00000080
  84863. else
  84864. pTDefRegMap(@Self)^.&set := $00000080;
  84865. end;
  84866. function TCAN1_C1FIFOCON31.getTXEN : TBits_1; inline;
  84867. begin
  84868. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  84869. end;
  84870. procedure TCAN1_C1FIFOCON31.setDONLY; inline;
  84871. begin
  84872. pTDefRegMap(@Self)^.&set := $00001000;
  84873. end;
  84874. procedure TCAN1_C1FIFOCON31.clearDONLY; inline;
  84875. begin
  84876. pTDefRegMap(@Self)^.clr := $00001000;
  84877. end;
  84878. procedure TCAN1_C1FIFOCON31.setDONLY(thebits : TBits_1); inline;
  84879. begin
  84880. if thebits = 0 then
  84881. pTDefRegMap(@Self)^.clr := $00001000
  84882. else
  84883. pTDefRegMap(@Self)^.&set := $00001000;
  84884. end;
  84885. function TCAN1_C1FIFOCON31.getDONLY : TBits_1; inline;
  84886. begin
  84887. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  84888. end;
  84889. procedure TCAN1_C1FIFOCON31.setUINC; inline;
  84890. begin
  84891. pTDefRegMap(@Self)^.&set := $00002000;
  84892. end;
  84893. procedure TCAN1_C1FIFOCON31.clearUINC; inline;
  84894. begin
  84895. pTDefRegMap(@Self)^.clr := $00002000;
  84896. end;
  84897. procedure TCAN1_C1FIFOCON31.setUINC(thebits : TBits_1); inline;
  84898. begin
  84899. if thebits = 0 then
  84900. pTDefRegMap(@Self)^.clr := $00002000
  84901. else
  84902. pTDefRegMap(@Self)^.&set := $00002000;
  84903. end;
  84904. function TCAN1_C1FIFOCON31.getUINC : TBits_1; inline;
  84905. begin
  84906. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  84907. end;
  84908. procedure TCAN1_C1FIFOCON31.setFRESET; inline;
  84909. begin
  84910. pTDefRegMap(@Self)^.&set := $00004000;
  84911. end;
  84912. procedure TCAN1_C1FIFOCON31.clearFRESET; inline;
  84913. begin
  84914. pTDefRegMap(@Self)^.clr := $00004000;
  84915. end;
  84916. procedure TCAN1_C1FIFOCON31.setFRESET(thebits : TBits_1); inline;
  84917. begin
  84918. if thebits = 0 then
  84919. pTDefRegMap(@Self)^.clr := $00004000
  84920. else
  84921. pTDefRegMap(@Self)^.&set := $00004000;
  84922. end;
  84923. function TCAN1_C1FIFOCON31.getFRESET : TBits_1; inline;
  84924. begin
  84925. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  84926. end;
  84927. procedure TCAN1_C1FIFOCON31.setFSIZE(thebits : TBits_5); inline;
  84928. begin
  84929. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  84930. end;
  84931. function TCAN1_C1FIFOCON31.getFSIZE : TBits_5; inline;
  84932. begin
  84933. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  84934. end;
  84935. procedure TCAN1_C1FIFOCON31.setw(thebits : TBits_32); inline;
  84936. begin
  84937. pTDefRegMap(@Self)^.val := thebits;
  84938. end;
  84939. function TCAN1_C1FIFOCON31.getw : TBits_32; inline;
  84940. begin
  84941. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84942. end;
  84943. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIF; inline;
  84944. begin
  84945. pTDefRegMap(@Self)^.&set := $00000001;
  84946. end;
  84947. procedure TCAN1_C1FIFOINT31.clearRXNEMPTYIF; inline;
  84948. begin
  84949. pTDefRegMap(@Self)^.clr := $00000001;
  84950. end;
  84951. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIF(thebits : TBits_1); inline;
  84952. begin
  84953. if thebits = 0 then
  84954. pTDefRegMap(@Self)^.clr := $00000001
  84955. else
  84956. pTDefRegMap(@Self)^.&set := $00000001;
  84957. end;
  84958. function TCAN1_C1FIFOINT31.getRXNEMPTYIF : TBits_1; inline;
  84959. begin
  84960. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  84961. end;
  84962. procedure TCAN1_C1FIFOINT31.setRXHALFIF; inline;
  84963. begin
  84964. pTDefRegMap(@Self)^.&set := $00000002;
  84965. end;
  84966. procedure TCAN1_C1FIFOINT31.clearRXHALFIF; inline;
  84967. begin
  84968. pTDefRegMap(@Self)^.clr := $00000002;
  84969. end;
  84970. procedure TCAN1_C1FIFOINT31.setRXHALFIF(thebits : TBits_1); inline;
  84971. begin
  84972. if thebits = 0 then
  84973. pTDefRegMap(@Self)^.clr := $00000002
  84974. else
  84975. pTDefRegMap(@Self)^.&set := $00000002;
  84976. end;
  84977. function TCAN1_C1FIFOINT31.getRXHALFIF : TBits_1; inline;
  84978. begin
  84979. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  84980. end;
  84981. procedure TCAN1_C1FIFOINT31.setRXFULLIF; inline;
  84982. begin
  84983. pTDefRegMap(@Self)^.&set := $00000004;
  84984. end;
  84985. procedure TCAN1_C1FIFOINT31.clearRXFULLIF; inline;
  84986. begin
  84987. pTDefRegMap(@Self)^.clr := $00000004;
  84988. end;
  84989. procedure TCAN1_C1FIFOINT31.setRXFULLIF(thebits : TBits_1); inline;
  84990. begin
  84991. if thebits = 0 then
  84992. pTDefRegMap(@Self)^.clr := $00000004
  84993. else
  84994. pTDefRegMap(@Self)^.&set := $00000004;
  84995. end;
  84996. function TCAN1_C1FIFOINT31.getRXFULLIF : TBits_1; inline;
  84997. begin
  84998. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  84999. end;
  85000. procedure TCAN1_C1FIFOINT31.setRXOVFLIF; inline;
  85001. begin
  85002. pTDefRegMap(@Self)^.&set := $00000008;
  85003. end;
  85004. procedure TCAN1_C1FIFOINT31.clearRXOVFLIF; inline;
  85005. begin
  85006. pTDefRegMap(@Self)^.clr := $00000008;
  85007. end;
  85008. procedure TCAN1_C1FIFOINT31.setRXOVFLIF(thebits : TBits_1); inline;
  85009. begin
  85010. if thebits = 0 then
  85011. pTDefRegMap(@Self)^.clr := $00000008
  85012. else
  85013. pTDefRegMap(@Self)^.&set := $00000008;
  85014. end;
  85015. function TCAN1_C1FIFOINT31.getRXOVFLIF : TBits_1; inline;
  85016. begin
  85017. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  85018. end;
  85019. procedure TCAN1_C1FIFOINT31.setTXEMPTYIF; inline;
  85020. begin
  85021. pTDefRegMap(@Self)^.&set := $00000100;
  85022. end;
  85023. procedure TCAN1_C1FIFOINT31.clearTXEMPTYIF; inline;
  85024. begin
  85025. pTDefRegMap(@Self)^.clr := $00000100;
  85026. end;
  85027. procedure TCAN1_C1FIFOINT31.setTXEMPTYIF(thebits : TBits_1); inline;
  85028. begin
  85029. if thebits = 0 then
  85030. pTDefRegMap(@Self)^.clr := $00000100
  85031. else
  85032. pTDefRegMap(@Self)^.&set := $00000100;
  85033. end;
  85034. function TCAN1_C1FIFOINT31.getTXEMPTYIF : TBits_1; inline;
  85035. begin
  85036. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  85037. end;
  85038. procedure TCAN1_C1FIFOINT31.setTXHALFIF; inline;
  85039. begin
  85040. pTDefRegMap(@Self)^.&set := $00000200;
  85041. end;
  85042. procedure TCAN1_C1FIFOINT31.clearTXHALFIF; inline;
  85043. begin
  85044. pTDefRegMap(@Self)^.clr := $00000200;
  85045. end;
  85046. procedure TCAN1_C1FIFOINT31.setTXHALFIF(thebits : TBits_1); inline;
  85047. begin
  85048. if thebits = 0 then
  85049. pTDefRegMap(@Self)^.clr := $00000200
  85050. else
  85051. pTDefRegMap(@Self)^.&set := $00000200;
  85052. end;
  85053. function TCAN1_C1FIFOINT31.getTXHALFIF : TBits_1; inline;
  85054. begin
  85055. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  85056. end;
  85057. procedure TCAN1_C1FIFOINT31.setTXNFULLIF; inline;
  85058. begin
  85059. pTDefRegMap(@Self)^.&set := $00000400;
  85060. end;
  85061. procedure TCAN1_C1FIFOINT31.clearTXNFULLIF; inline;
  85062. begin
  85063. pTDefRegMap(@Self)^.clr := $00000400;
  85064. end;
  85065. procedure TCAN1_C1FIFOINT31.setTXNFULLIF(thebits : TBits_1); inline;
  85066. begin
  85067. if thebits = 0 then
  85068. pTDefRegMap(@Self)^.clr := $00000400
  85069. else
  85070. pTDefRegMap(@Self)^.&set := $00000400;
  85071. end;
  85072. function TCAN1_C1FIFOINT31.getTXNFULLIF : TBits_1; inline;
  85073. begin
  85074. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  85075. end;
  85076. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIE; inline;
  85077. begin
  85078. pTDefRegMap(@Self)^.&set := $00010000;
  85079. end;
  85080. procedure TCAN1_C1FIFOINT31.clearRXNEMPTYIE; inline;
  85081. begin
  85082. pTDefRegMap(@Self)^.clr := $00010000;
  85083. end;
  85084. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIE(thebits : TBits_1); inline;
  85085. begin
  85086. if thebits = 0 then
  85087. pTDefRegMap(@Self)^.clr := $00010000
  85088. else
  85089. pTDefRegMap(@Self)^.&set := $00010000;
  85090. end;
  85091. function TCAN1_C1FIFOINT31.getRXNEMPTYIE : TBits_1; inline;
  85092. begin
  85093. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  85094. end;
  85095. procedure TCAN1_C1FIFOINT31.setRXHALFIE; inline;
  85096. begin
  85097. pTDefRegMap(@Self)^.&set := $00020000;
  85098. end;
  85099. procedure TCAN1_C1FIFOINT31.clearRXHALFIE; inline;
  85100. begin
  85101. pTDefRegMap(@Self)^.clr := $00020000;
  85102. end;
  85103. procedure TCAN1_C1FIFOINT31.setRXHALFIE(thebits : TBits_1); inline;
  85104. begin
  85105. if thebits = 0 then
  85106. pTDefRegMap(@Self)^.clr := $00020000
  85107. else
  85108. pTDefRegMap(@Self)^.&set := $00020000;
  85109. end;
  85110. function TCAN1_C1FIFOINT31.getRXHALFIE : TBits_1; inline;
  85111. begin
  85112. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  85113. end;
  85114. procedure TCAN1_C1FIFOINT31.setRXFULLIE; inline;
  85115. begin
  85116. pTDefRegMap(@Self)^.&set := $00040000;
  85117. end;
  85118. procedure TCAN1_C1FIFOINT31.clearRXFULLIE; inline;
  85119. begin
  85120. pTDefRegMap(@Self)^.clr := $00040000;
  85121. end;
  85122. procedure TCAN1_C1FIFOINT31.setRXFULLIE(thebits : TBits_1); inline;
  85123. begin
  85124. if thebits = 0 then
  85125. pTDefRegMap(@Self)^.clr := $00040000
  85126. else
  85127. pTDefRegMap(@Self)^.&set := $00040000;
  85128. end;
  85129. function TCAN1_C1FIFOINT31.getRXFULLIE : TBits_1; inline;
  85130. begin
  85131. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  85132. end;
  85133. procedure TCAN1_C1FIFOINT31.setRXOVFLIE; inline;
  85134. begin
  85135. pTDefRegMap(@Self)^.&set := $00080000;
  85136. end;
  85137. procedure TCAN1_C1FIFOINT31.clearRXOVFLIE; inline;
  85138. begin
  85139. pTDefRegMap(@Self)^.clr := $00080000;
  85140. end;
  85141. procedure TCAN1_C1FIFOINT31.setRXOVFLIE(thebits : TBits_1); inline;
  85142. begin
  85143. if thebits = 0 then
  85144. pTDefRegMap(@Self)^.clr := $00080000
  85145. else
  85146. pTDefRegMap(@Self)^.&set := $00080000;
  85147. end;
  85148. function TCAN1_C1FIFOINT31.getRXOVFLIE : TBits_1; inline;
  85149. begin
  85150. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85151. end;
  85152. procedure TCAN1_C1FIFOINT31.setTXEMPTYIE; inline;
  85153. begin
  85154. pTDefRegMap(@Self)^.&set := $01000000;
  85155. end;
  85156. procedure TCAN1_C1FIFOINT31.clearTXEMPTYIE; inline;
  85157. begin
  85158. pTDefRegMap(@Self)^.clr := $01000000;
  85159. end;
  85160. procedure TCAN1_C1FIFOINT31.setTXEMPTYIE(thebits : TBits_1); inline;
  85161. begin
  85162. if thebits = 0 then
  85163. pTDefRegMap(@Self)^.clr := $01000000
  85164. else
  85165. pTDefRegMap(@Self)^.&set := $01000000;
  85166. end;
  85167. function TCAN1_C1FIFOINT31.getTXEMPTYIE : TBits_1; inline;
  85168. begin
  85169. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  85170. end;
  85171. procedure TCAN1_C1FIFOINT31.setTXHALFIE; inline;
  85172. begin
  85173. pTDefRegMap(@Self)^.&set := $02000000;
  85174. end;
  85175. procedure TCAN1_C1FIFOINT31.clearTXHALFIE; inline;
  85176. begin
  85177. pTDefRegMap(@Self)^.clr := $02000000;
  85178. end;
  85179. procedure TCAN1_C1FIFOINT31.setTXHALFIE(thebits : TBits_1); inline;
  85180. begin
  85181. if thebits = 0 then
  85182. pTDefRegMap(@Self)^.clr := $02000000
  85183. else
  85184. pTDefRegMap(@Self)^.&set := $02000000;
  85185. end;
  85186. function TCAN1_C1FIFOINT31.getTXHALFIE : TBits_1; inline;
  85187. begin
  85188. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  85189. end;
  85190. procedure TCAN1_C1FIFOINT31.setTXNFULLIE; inline;
  85191. begin
  85192. pTDefRegMap(@Self)^.&set := $04000000;
  85193. end;
  85194. procedure TCAN1_C1FIFOINT31.clearTXNFULLIE; inline;
  85195. begin
  85196. pTDefRegMap(@Self)^.clr := $04000000;
  85197. end;
  85198. procedure TCAN1_C1FIFOINT31.setTXNFULLIE(thebits : TBits_1); inline;
  85199. begin
  85200. if thebits = 0 then
  85201. pTDefRegMap(@Self)^.clr := $04000000
  85202. else
  85203. pTDefRegMap(@Self)^.&set := $04000000;
  85204. end;
  85205. function TCAN1_C1FIFOINT31.getTXNFULLIE : TBits_1; inline;
  85206. begin
  85207. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  85208. end;
  85209. procedure TCAN1_C1FIFOINT31.setw(thebits : TBits_32); inline;
  85210. begin
  85211. pTDefRegMap(@Self)^.val := thebits;
  85212. end;
  85213. function TCAN1_C1FIFOINT31.getw : TBits_32; inline;
  85214. begin
  85215. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85216. end;
  85217. procedure TCAN1_C1FIFOCI31.setCFIFOCI(thebits : TBits_5); inline;
  85218. begin
  85219. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  85220. end;
  85221. function TCAN1_C1FIFOCI31.getCFIFOCI : TBits_5; inline;
  85222. begin
  85223. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  85224. end;
  85225. procedure TCAN1_C1FIFOCI31.setw(thebits : TBits_32); inline;
  85226. begin
  85227. pTDefRegMap(@Self)^.val := thebits;
  85228. end;
  85229. function TCAN1_C1FIFOCI31.getw : TBits_32; inline;
  85230. begin
  85231. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85232. end;
  85233. procedure TDEVCFG_DEVCFG3.setUSERID(thebits : TBits_16); inline;
  85234. begin
  85235. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  85236. end;
  85237. function TDEVCFG_DEVCFG3.getUSERID : TBits_16; inline;
  85238. begin
  85239. getUSERID := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  85240. end;
  85241. procedure TDEVCFG_DEVCFG3.setFSRSSEL(thebits : TBits_3); inline;
  85242. begin
  85243. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  85244. end;
  85245. function TDEVCFG_DEVCFG3.getFSRSSEL : TBits_3; inline;
  85246. begin
  85247. getFSRSSEL := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  85248. end;
  85249. procedure TDEVCFG_DEVCFG3.setFMIIEN; inline;
  85250. begin
  85251. pTDefRegMap(@Self)^.&set := $01000000;
  85252. end;
  85253. procedure TDEVCFG_DEVCFG3.clearFMIIEN; inline;
  85254. begin
  85255. pTDefRegMap(@Self)^.clr := $01000000;
  85256. end;
  85257. procedure TDEVCFG_DEVCFG3.setFMIIEN(thebits : TBits_1); inline;
  85258. begin
  85259. if thebits = 0 then
  85260. pTDefRegMap(@Self)^.clr := $01000000
  85261. else
  85262. pTDefRegMap(@Self)^.&set := $01000000;
  85263. end;
  85264. function TDEVCFG_DEVCFG3.getFMIIEN : TBits_1; inline;
  85265. begin
  85266. getFMIIEN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  85267. end;
  85268. procedure TDEVCFG_DEVCFG3.setFETHIO; inline;
  85269. begin
  85270. pTDefRegMap(@Self)^.&set := $02000000;
  85271. end;
  85272. procedure TDEVCFG_DEVCFG3.clearFETHIO; inline;
  85273. begin
  85274. pTDefRegMap(@Self)^.clr := $02000000;
  85275. end;
  85276. procedure TDEVCFG_DEVCFG3.setFETHIO(thebits : TBits_1); inline;
  85277. begin
  85278. if thebits = 0 then
  85279. pTDefRegMap(@Self)^.clr := $02000000
  85280. else
  85281. pTDefRegMap(@Self)^.&set := $02000000;
  85282. end;
  85283. function TDEVCFG_DEVCFG3.getFETHIO : TBits_1; inline;
  85284. begin
  85285. getFETHIO := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  85286. end;
  85287. procedure TDEVCFG_DEVCFG3.setFCANIO; inline;
  85288. begin
  85289. pTDefRegMap(@Self)^.&set := $04000000;
  85290. end;
  85291. procedure TDEVCFG_DEVCFG3.clearFCANIO; inline;
  85292. begin
  85293. pTDefRegMap(@Self)^.clr := $04000000;
  85294. end;
  85295. procedure TDEVCFG_DEVCFG3.setFCANIO(thebits : TBits_1); inline;
  85296. begin
  85297. if thebits = 0 then
  85298. pTDefRegMap(@Self)^.clr := $04000000
  85299. else
  85300. pTDefRegMap(@Self)^.&set := $04000000;
  85301. end;
  85302. function TDEVCFG_DEVCFG3.getFCANIO : TBits_1; inline;
  85303. begin
  85304. getFCANIO := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  85305. end;
  85306. procedure TDEVCFG_DEVCFG3.setFUSBIDIO; inline;
  85307. begin
  85308. pTDefRegMap(@Self)^.&set := $40000000;
  85309. end;
  85310. procedure TDEVCFG_DEVCFG3.clearFUSBIDIO; inline;
  85311. begin
  85312. pTDefRegMap(@Self)^.clr := $40000000;
  85313. end;
  85314. procedure TDEVCFG_DEVCFG3.setFUSBIDIO(thebits : TBits_1); inline;
  85315. begin
  85316. if thebits = 0 then
  85317. pTDefRegMap(@Self)^.clr := $40000000
  85318. else
  85319. pTDefRegMap(@Self)^.&set := $40000000;
  85320. end;
  85321. function TDEVCFG_DEVCFG3.getFUSBIDIO : TBits_1; inline;
  85322. begin
  85323. getFUSBIDIO := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  85324. end;
  85325. procedure TDEVCFG_DEVCFG3.setFVBUSONIO; inline;
  85326. begin
  85327. pTDefRegMap(@Self)^.&set := $80000000;
  85328. end;
  85329. procedure TDEVCFG_DEVCFG3.clearFVBUSONIO; inline;
  85330. begin
  85331. pTDefRegMap(@Self)^.clr := $80000000;
  85332. end;
  85333. procedure TDEVCFG_DEVCFG3.setFVBUSONIO(thebits : TBits_1); inline;
  85334. begin
  85335. if thebits = 0 then
  85336. pTDefRegMap(@Self)^.clr := $80000000
  85337. else
  85338. pTDefRegMap(@Self)^.&set := $80000000;
  85339. end;
  85340. function TDEVCFG_DEVCFG3.getFVBUSONIO : TBits_1; inline;
  85341. begin
  85342. getFVBUSONIO := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  85343. end;
  85344. procedure TDEVCFG_DEVCFG3.setw(thebits : TBits_32); inline;
  85345. begin
  85346. pTDefRegMap(@Self)^.val := thebits;
  85347. end;
  85348. function TDEVCFG_DEVCFG3.getw : TBits_32; inline;
  85349. begin
  85350. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85351. end;
  85352. procedure TDEVCFG_DEVCFG2.setFPLLIDIV(thebits : TBits_3); inline;
  85353. begin
  85354. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  85355. end;
  85356. function TDEVCFG_DEVCFG2.getFPLLIDIV : TBits_3; inline;
  85357. begin
  85358. getFPLLIDIV := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  85359. end;
  85360. procedure TDEVCFG_DEVCFG2.setFPLLMUL(thebits : TBits_3); inline;
  85361. begin
  85362. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  85363. end;
  85364. function TDEVCFG_DEVCFG2.getFPLLMUL : TBits_3; inline;
  85365. begin
  85366. getFPLLMUL := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  85367. end;
  85368. procedure TDEVCFG_DEVCFG2.setUPLLIDIV(thebits : TBits_3); inline;
  85369. begin
  85370. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  85371. end;
  85372. function TDEVCFG_DEVCFG2.getUPLLIDIV : TBits_3; inline;
  85373. begin
  85374. getUPLLIDIV := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  85375. end;
  85376. procedure TDEVCFG_DEVCFG2.setUPLLEN; inline;
  85377. begin
  85378. pTDefRegMap(@Self)^.&set := $00008000;
  85379. end;
  85380. procedure TDEVCFG_DEVCFG2.clearUPLLEN; inline;
  85381. begin
  85382. pTDefRegMap(@Self)^.clr := $00008000;
  85383. end;
  85384. procedure TDEVCFG_DEVCFG2.setUPLLEN(thebits : TBits_1); inline;
  85385. begin
  85386. if thebits = 0 then
  85387. pTDefRegMap(@Self)^.clr := $00008000
  85388. else
  85389. pTDefRegMap(@Self)^.&set := $00008000;
  85390. end;
  85391. function TDEVCFG_DEVCFG2.getUPLLEN : TBits_1; inline;
  85392. begin
  85393. getUPLLEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  85394. end;
  85395. procedure TDEVCFG_DEVCFG2.setFPLLODIV(thebits : TBits_3); inline;
  85396. begin
  85397. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  85398. end;
  85399. function TDEVCFG_DEVCFG2.getFPLLODIV : TBits_3; inline;
  85400. begin
  85401. getFPLLODIV := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  85402. end;
  85403. procedure TDEVCFG_DEVCFG2.setw(thebits : TBits_32); inline;
  85404. begin
  85405. pTDefRegMap(@Self)^.val := thebits;
  85406. end;
  85407. function TDEVCFG_DEVCFG2.getw : TBits_32; inline;
  85408. begin
  85409. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85410. end;
  85411. procedure TDEVCFG_DEVCFG1.setFNOSC(thebits : TBits_3); inline;
  85412. begin
  85413. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  85414. end;
  85415. function TDEVCFG_DEVCFG1.getFNOSC : TBits_3; inline;
  85416. begin
  85417. getFNOSC := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  85418. end;
  85419. procedure TDEVCFG_DEVCFG1.setFSOSCEN; inline;
  85420. begin
  85421. pTDefRegMap(@Self)^.&set := $00000020;
  85422. end;
  85423. procedure TDEVCFG_DEVCFG1.clearFSOSCEN; inline;
  85424. begin
  85425. pTDefRegMap(@Self)^.clr := $00000020;
  85426. end;
  85427. procedure TDEVCFG_DEVCFG1.setFSOSCEN(thebits : TBits_1); inline;
  85428. begin
  85429. if thebits = 0 then
  85430. pTDefRegMap(@Self)^.clr := $00000020
  85431. else
  85432. pTDefRegMap(@Self)^.&set := $00000020;
  85433. end;
  85434. function TDEVCFG_DEVCFG1.getFSOSCEN : TBits_1; inline;
  85435. begin
  85436. getFSOSCEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  85437. end;
  85438. procedure TDEVCFG_DEVCFG1.setIESO; inline;
  85439. begin
  85440. pTDefRegMap(@Self)^.&set := $00000080;
  85441. end;
  85442. procedure TDEVCFG_DEVCFG1.clearIESO; inline;
  85443. begin
  85444. pTDefRegMap(@Self)^.clr := $00000080;
  85445. end;
  85446. procedure TDEVCFG_DEVCFG1.setIESO(thebits : TBits_1); inline;
  85447. begin
  85448. if thebits = 0 then
  85449. pTDefRegMap(@Self)^.clr := $00000080
  85450. else
  85451. pTDefRegMap(@Self)^.&set := $00000080;
  85452. end;
  85453. function TDEVCFG_DEVCFG1.getIESO : TBits_1; inline;
  85454. begin
  85455. getIESO := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  85456. end;
  85457. procedure TDEVCFG_DEVCFG1.setPOSCMOD(thebits : TBits_2); inline;
  85458. begin
  85459. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  85460. end;
  85461. function TDEVCFG_DEVCFG1.getPOSCMOD : TBits_2; inline;
  85462. begin
  85463. getPOSCMOD := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  85464. end;
  85465. procedure TDEVCFG_DEVCFG1.setOSCIOFNC; inline;
  85466. begin
  85467. pTDefRegMap(@Self)^.&set := $00000400;
  85468. end;
  85469. procedure TDEVCFG_DEVCFG1.clearOSCIOFNC; inline;
  85470. begin
  85471. pTDefRegMap(@Self)^.clr := $00000400;
  85472. end;
  85473. procedure TDEVCFG_DEVCFG1.setOSCIOFNC(thebits : TBits_1); inline;
  85474. begin
  85475. if thebits = 0 then
  85476. pTDefRegMap(@Self)^.clr := $00000400
  85477. else
  85478. pTDefRegMap(@Self)^.&set := $00000400;
  85479. end;
  85480. function TDEVCFG_DEVCFG1.getOSCIOFNC : TBits_1; inline;
  85481. begin
  85482. getOSCIOFNC := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  85483. end;
  85484. procedure TDEVCFG_DEVCFG1.setFPBDIV(thebits : TBits_2); inline;
  85485. begin
  85486. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFCFFF or ( thebits shl 12 );
  85487. end;
  85488. function TDEVCFG_DEVCFG1.getFPBDIV : TBits_2; inline;
  85489. begin
  85490. getFPBDIV := (pTDefRegMap(@Self)^.val and $00003000) shr 12;
  85491. end;
  85492. procedure TDEVCFG_DEVCFG1.setFCKSM(thebits : TBits_2); inline;
  85493. begin
  85494. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  85495. end;
  85496. function TDEVCFG_DEVCFG1.getFCKSM : TBits_2; inline;
  85497. begin
  85498. getFCKSM := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  85499. end;
  85500. procedure TDEVCFG_DEVCFG1.setWDTPS(thebits : TBits_5); inline;
  85501. begin
  85502. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  85503. end;
  85504. function TDEVCFG_DEVCFG1.getWDTPS : TBits_5; inline;
  85505. begin
  85506. getWDTPS := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  85507. end;
  85508. procedure TDEVCFG_DEVCFG1.setFWDTEN; inline;
  85509. begin
  85510. pTDefRegMap(@Self)^.&set := $00800000;
  85511. end;
  85512. procedure TDEVCFG_DEVCFG1.clearFWDTEN; inline;
  85513. begin
  85514. pTDefRegMap(@Self)^.clr := $00800000;
  85515. end;
  85516. procedure TDEVCFG_DEVCFG1.setFWDTEN(thebits : TBits_1); inline;
  85517. begin
  85518. if thebits = 0 then
  85519. pTDefRegMap(@Self)^.clr := $00800000
  85520. else
  85521. pTDefRegMap(@Self)^.&set := $00800000;
  85522. end;
  85523. function TDEVCFG_DEVCFG1.getFWDTEN : TBits_1; inline;
  85524. begin
  85525. getFWDTEN := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  85526. end;
  85527. procedure TDEVCFG_DEVCFG1.setw(thebits : TBits_32); inline;
  85528. begin
  85529. pTDefRegMap(@Self)^.val := thebits;
  85530. end;
  85531. function TDEVCFG_DEVCFG1.getw : TBits_32; inline;
  85532. begin
  85533. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85534. end;
  85535. procedure TDEVCFG_DEVCFG0.setDEBUG(thebits : TBits_2); inline;
  85536. begin
  85537. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  85538. end;
  85539. function TDEVCFG_DEVCFG0.getDEBUG : TBits_2; inline;
  85540. begin
  85541. getDEBUG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  85542. end;
  85543. procedure TDEVCFG_DEVCFG0.setICESEL; inline;
  85544. begin
  85545. pTDefRegMap(@Self)^.&set := $00000008;
  85546. end;
  85547. procedure TDEVCFG_DEVCFG0.clearICESEL; inline;
  85548. begin
  85549. pTDefRegMap(@Self)^.clr := $00000008;
  85550. end;
  85551. procedure TDEVCFG_DEVCFG0.setICESEL(thebits : TBits_1); inline;
  85552. begin
  85553. if thebits = 0 then
  85554. pTDefRegMap(@Self)^.clr := $00000008
  85555. else
  85556. pTDefRegMap(@Self)^.&set := $00000008;
  85557. end;
  85558. function TDEVCFG_DEVCFG0.getICESEL : TBits_1; inline;
  85559. begin
  85560. getICESEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  85561. end;
  85562. procedure TDEVCFG_DEVCFG0.setPWP(thebits : TBits_8); inline;
  85563. begin
  85564. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF00FFF or ( thebits shl 12 );
  85565. end;
  85566. function TDEVCFG_DEVCFG0.getPWP : TBits_8; inline;
  85567. begin
  85568. getPWP := (pTDefRegMap(@Self)^.val and $000FF000) shr 12;
  85569. end;
  85570. procedure TDEVCFG_DEVCFG0.setBWP; inline;
  85571. begin
  85572. pTDefRegMap(@Self)^.&set := $01000000;
  85573. end;
  85574. procedure TDEVCFG_DEVCFG0.clearBWP; inline;
  85575. begin
  85576. pTDefRegMap(@Self)^.clr := $01000000;
  85577. end;
  85578. procedure TDEVCFG_DEVCFG0.setBWP(thebits : TBits_1); inline;
  85579. begin
  85580. if thebits = 0 then
  85581. pTDefRegMap(@Self)^.clr := $01000000
  85582. else
  85583. pTDefRegMap(@Self)^.&set := $01000000;
  85584. end;
  85585. function TDEVCFG_DEVCFG0.getBWP : TBits_1; inline;
  85586. begin
  85587. getBWP := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  85588. end;
  85589. procedure TDEVCFG_DEVCFG0.setCP; inline;
  85590. begin
  85591. pTDefRegMap(@Self)^.&set := $10000000;
  85592. end;
  85593. procedure TDEVCFG_DEVCFG0.clearCP; inline;
  85594. begin
  85595. pTDefRegMap(@Self)^.clr := $10000000;
  85596. end;
  85597. procedure TDEVCFG_DEVCFG0.setCP(thebits : TBits_1); inline;
  85598. begin
  85599. if thebits = 0 then
  85600. pTDefRegMap(@Self)^.clr := $10000000
  85601. else
  85602. pTDefRegMap(@Self)^.&set := $10000000;
  85603. end;
  85604. function TDEVCFG_DEVCFG0.getCP : TBits_1; inline;
  85605. begin
  85606. getCP := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  85607. end;
  85608. procedure TDEVCFG_DEVCFG0.setFDEBUG(thebits : TBits_2); inline;
  85609. begin
  85610. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  85611. end;
  85612. function TDEVCFG_DEVCFG0.getFDEBUG : TBits_2; inline;
  85613. begin
  85614. getFDEBUG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  85615. end;
  85616. procedure TDEVCFG_DEVCFG0.setw(thebits : TBits_32); inline;
  85617. begin
  85618. pTDefRegMap(@Self)^.val := thebits;
  85619. end;
  85620. function TDEVCFG_DEVCFG0.getw : TBits_32; inline;
  85621. begin
  85622. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85623. end;
  85624. procedure _CORE_TIMER_VECTOR_interrupt; external name '_CORE_TIMER_VECTOR_interrupt';
  85625. procedure _CORE_SOFTWARE_0_VECTOR_interrupt; external name '_CORE_SOFTWARE_0_VECTOR_interrupt';
  85626. procedure _CORE_SOFTWARE_1_VECTOR_interrupt; external name '_CORE_SOFTWARE_1_VECTOR_interrupt';
  85627. procedure _EXTERNAL_0_VECTOR_interrupt; external name '_EXTERNAL_0_VECTOR_interrupt';
  85628. procedure _TIMER_1_VECTOR_interrupt; external name '_TIMER_1_VECTOR_interrupt';
  85629. procedure _INPUT_CAPTURE_1_VECTOR_interrupt; external name '_INPUT_CAPTURE_1_VECTOR_interrupt';
  85630. procedure _OUTPUT_COMPARE_1_VECTOR_interrupt; external name '_OUTPUT_COMPARE_1_VECTOR_interrupt';
  85631. procedure _EXTERNAL_1_VECTOR_interrupt; external name '_EXTERNAL_1_VECTOR_interrupt';
  85632. procedure _TIMER_2_VECTOR_interrupt; external name '_TIMER_2_VECTOR_interrupt';
  85633. procedure _INPUT_CAPTURE_2_VECTOR_interrupt; external name '_INPUT_CAPTURE_2_VECTOR_interrupt';
  85634. procedure _OUTPUT_COMPARE_2_VECTOR_interrupt; external name '_OUTPUT_COMPARE_2_VECTOR_interrupt';
  85635. procedure _EXTERNAL_2_VECTOR_interrupt; external name '_EXTERNAL_2_VECTOR_interrupt';
  85636. procedure _TIMER_3_VECTOR_interrupt; external name '_TIMER_3_VECTOR_interrupt';
  85637. procedure _INPUT_CAPTURE_3_VECTOR_interrupt; external name '_INPUT_CAPTURE_3_VECTOR_interrupt';
  85638. procedure _OUTPUT_COMPARE_3_VECTOR_interrupt; external name '_OUTPUT_COMPARE_3_VECTOR_interrupt';
  85639. procedure _EXTERNAL_3_VECTOR_interrupt; external name '_EXTERNAL_3_VECTOR_interrupt';
  85640. procedure _TIMER_4_VECTOR_interrupt; external name '_TIMER_4_VECTOR_interrupt';
  85641. procedure _INPUT_CAPTURE_4_VECTOR_interrupt; external name '_INPUT_CAPTURE_4_VECTOR_interrupt';
  85642. procedure _OUTPUT_COMPARE_4_VECTOR_interrupt; external name '_OUTPUT_COMPARE_4_VECTOR_interrupt';
  85643. procedure _EXTERNAL_4_VECTOR_interrupt; external name '_EXTERNAL_4_VECTOR_interrupt';
  85644. procedure _TIMER_5_VECTOR_interrupt; external name '_TIMER_5_VECTOR_interrupt';
  85645. procedure _INPUT_CAPTURE_5_VECTOR_interrupt; external name '_INPUT_CAPTURE_5_VECTOR_interrupt';
  85646. procedure _OUTPUT_COMPARE_5_VECTOR_interrupt; external name '_OUTPUT_COMPARE_5_VECTOR_interrupt';
  85647. procedure _SPI_1A_VECTOR_interrupt; external name '_SPI_1A_VECTOR_interrupt';
  85648. procedure _UART_1_VECTOR_interrupt; external name '_UART_1_VECTOR_interrupt';
  85649. procedure _UART_1A_VECTOR_interrupt; external name '_UART_1A_VECTOR_interrupt';
  85650. procedure _I2C_3_VECTOR_interrupt; external name '_I2C_3_VECTOR_interrupt';
  85651. procedure _I2C_1A_VECTOR_interrupt; external name '_I2C_1A_VECTOR_interrupt';
  85652. procedure _SPI_3_VECTOR_interrupt; external name '_SPI_3_VECTOR_interrupt';
  85653. procedure _I2C_1_VECTOR_interrupt; external name '_I2C_1_VECTOR_interrupt';
  85654. procedure _CHANGE_NOTICE_VECTOR_interrupt; external name '_CHANGE_NOTICE_VECTOR_interrupt';
  85655. procedure _ADC_VECTOR_interrupt; external name '_ADC_VECTOR_interrupt';
  85656. procedure _PMP_VECTOR_interrupt; external name '_PMP_VECTOR_interrupt';
  85657. procedure _COMPARATOR_1_VECTOR_interrupt; external name '_COMPARATOR_1_VECTOR_interrupt';
  85658. procedure _COMPARATOR_2_VECTOR_interrupt; external name '_COMPARATOR_2_VECTOR_interrupt';
  85659. procedure _SPI_2A_VECTOR_interrupt; external name '_SPI_2A_VECTOR_interrupt';
  85660. procedure _UART_3_VECTOR_interrupt; external name '_UART_3_VECTOR_interrupt';
  85661. procedure _UART_2A_VECTOR_interrupt; external name '_UART_2A_VECTOR_interrupt';
  85662. procedure _I2C_4_VECTOR_interrupt; external name '_I2C_4_VECTOR_interrupt';
  85663. procedure _I2C_2A_VECTOR_interrupt; external name '_I2C_2A_VECTOR_interrupt';
  85664. procedure _SPI_2_VECTOR_interrupt; external name '_SPI_2_VECTOR_interrupt';
  85665. procedure _SPI_3A_VECTOR_interrupt; external name '_SPI_3A_VECTOR_interrupt';
  85666. procedure _UART_2_VECTOR_interrupt; external name '_UART_2_VECTOR_interrupt';
  85667. procedure _UART_3A_VECTOR_interrupt; external name '_UART_3A_VECTOR_interrupt';
  85668. procedure _I2C_5_VECTOR_interrupt; external name '_I2C_5_VECTOR_interrupt';
  85669. procedure _I2C_3A_VECTOR_interrupt; external name '_I2C_3A_VECTOR_interrupt';
  85670. procedure _SPI_4_VECTOR_interrupt; external name '_SPI_4_VECTOR_interrupt';
  85671. procedure _I2C_2_VECTOR_interrupt; external name '_I2C_2_VECTOR_interrupt';
  85672. procedure _FAIL_SAFE_MONITOR_VECTOR_interrupt; external name '_FAIL_SAFE_MONITOR_VECTOR_interrupt';
  85673. procedure _RTCC_VECTOR_interrupt; external name '_RTCC_VECTOR_interrupt';
  85674. procedure _DMA_0_VECTOR_interrupt; external name '_DMA_0_VECTOR_interrupt';
  85675. procedure _DMA_1_VECTOR_interrupt; external name '_DMA_1_VECTOR_interrupt';
  85676. procedure _DMA_2_VECTOR_interrupt; external name '_DMA_2_VECTOR_interrupt';
  85677. procedure _DMA_3_VECTOR_interrupt; external name '_DMA_3_VECTOR_interrupt';
  85678. procedure _FCE_VECTOR_interrupt; external name '_FCE_VECTOR_interrupt';
  85679. procedure _USB_1_VECTOR_interrupt; external name '_USB_1_VECTOR_interrupt';
  85680. procedure _CAN_1_VECTOR_interrupt; external name '_CAN_1_VECTOR_interrupt';
  85681. procedure _ETH_VECTOR_interrupt; external name '_ETH_VECTOR_interrupt';
  85682. procedure _UART_1B_VECTOR_interrupt; external name '_UART_1B_VECTOR_interrupt';
  85683. procedure _UART_4_VECTOR_interrupt; external name '_UART_4_VECTOR_interrupt';
  85684. procedure _UART_2B_VECTOR_interrupt; external name '_UART_2B_VECTOR_interrupt';
  85685. procedure _UART_6_VECTOR_interrupt; external name '_UART_6_VECTOR_interrupt';
  85686. procedure _UART_3B_VECTOR_interrupt; external name '_UART_3B_VECTOR_interrupt';
  85687. procedure _UART_5_VECTOR_interrupt; external name '_UART_5_VECTOR_interrupt';
  85688. procedure Vectors; assembler; nostackframe;
  85689. label interrupt_vectors;
  85690. asm
  85691. .section ".init.interrupt_vectors,\"ax\",@progbits"
  85692. interrupt_vectors:
  85693. j _CORE_TIMER_VECTOR_interrupt
  85694. nop
  85695. nop
  85696. nop
  85697. nop
  85698. nop
  85699. nop
  85700. nop
  85701. j _CORE_SOFTWARE_0_VECTOR_interrupt
  85702. nop
  85703. nop
  85704. nop
  85705. nop
  85706. nop
  85707. nop
  85708. nop
  85709. j _CORE_SOFTWARE_1_VECTOR_interrupt
  85710. nop
  85711. nop
  85712. nop
  85713. nop
  85714. nop
  85715. nop
  85716. nop
  85717. j _EXTERNAL_0_VECTOR_interrupt
  85718. nop
  85719. nop
  85720. nop
  85721. nop
  85722. nop
  85723. nop
  85724. nop
  85725. j _TIMER_1_VECTOR_interrupt
  85726. nop
  85727. nop
  85728. nop
  85729. nop
  85730. nop
  85731. nop
  85732. nop
  85733. j _INPUT_CAPTURE_1_VECTOR_interrupt
  85734. nop
  85735. nop
  85736. nop
  85737. nop
  85738. nop
  85739. nop
  85740. nop
  85741. j _OUTPUT_COMPARE_1_VECTOR_interrupt
  85742. nop
  85743. nop
  85744. nop
  85745. nop
  85746. nop
  85747. nop
  85748. nop
  85749. j _EXTERNAL_1_VECTOR_interrupt
  85750. nop
  85751. nop
  85752. nop
  85753. nop
  85754. nop
  85755. nop
  85756. nop
  85757. j _TIMER_2_VECTOR_interrupt
  85758. nop
  85759. nop
  85760. nop
  85761. nop
  85762. nop
  85763. nop
  85764. nop
  85765. j _INPUT_CAPTURE_2_VECTOR_interrupt
  85766. nop
  85767. nop
  85768. nop
  85769. nop
  85770. nop
  85771. nop
  85772. nop
  85773. j _OUTPUT_COMPARE_2_VECTOR_interrupt
  85774. nop
  85775. nop
  85776. nop
  85777. nop
  85778. nop
  85779. nop
  85780. nop
  85781. j _EXTERNAL_2_VECTOR_interrupt
  85782. nop
  85783. nop
  85784. nop
  85785. nop
  85786. nop
  85787. nop
  85788. nop
  85789. j _TIMER_3_VECTOR_interrupt
  85790. nop
  85791. nop
  85792. nop
  85793. nop
  85794. nop
  85795. nop
  85796. nop
  85797. j _INPUT_CAPTURE_3_VECTOR_interrupt
  85798. nop
  85799. nop
  85800. nop
  85801. nop
  85802. nop
  85803. nop
  85804. nop
  85805. j _OUTPUT_COMPARE_3_VECTOR_interrupt
  85806. nop
  85807. nop
  85808. nop
  85809. nop
  85810. nop
  85811. nop
  85812. nop
  85813. j _EXTERNAL_3_VECTOR_interrupt
  85814. nop
  85815. nop
  85816. nop
  85817. nop
  85818. nop
  85819. nop
  85820. nop
  85821. j _TIMER_4_VECTOR_interrupt
  85822. nop
  85823. nop
  85824. nop
  85825. nop
  85826. nop
  85827. nop
  85828. nop
  85829. j _INPUT_CAPTURE_4_VECTOR_interrupt
  85830. nop
  85831. nop
  85832. nop
  85833. nop
  85834. nop
  85835. nop
  85836. nop
  85837. j _OUTPUT_COMPARE_4_VECTOR_interrupt
  85838. nop
  85839. nop
  85840. nop
  85841. nop
  85842. nop
  85843. nop
  85844. nop
  85845. j _EXTERNAL_4_VECTOR_interrupt
  85846. nop
  85847. nop
  85848. nop
  85849. nop
  85850. nop
  85851. nop
  85852. nop
  85853. j _TIMER_5_VECTOR_interrupt
  85854. nop
  85855. nop
  85856. nop
  85857. nop
  85858. nop
  85859. nop
  85860. nop
  85861. j _INPUT_CAPTURE_5_VECTOR_interrupt
  85862. nop
  85863. nop
  85864. nop
  85865. nop
  85866. nop
  85867. nop
  85868. nop
  85869. j _OUTPUT_COMPARE_5_VECTOR_interrupt
  85870. nop
  85871. nop
  85872. nop
  85873. nop
  85874. nop
  85875. nop
  85876. nop
  85877. nop
  85878. nop
  85879. nop
  85880. nop
  85881. nop
  85882. nop
  85883. nop
  85884. nop
  85885. j _SPI_1A_VECTOR_interrupt
  85886. nop
  85887. nop
  85888. nop
  85889. nop
  85890. nop
  85891. nop
  85892. nop
  85893. j _I2C_1_VECTOR_interrupt
  85894. nop
  85895. nop
  85896. nop
  85897. nop
  85898. nop
  85899. nop
  85900. nop
  85901. j _CHANGE_NOTICE_VECTOR_interrupt
  85902. nop
  85903. nop
  85904. nop
  85905. nop
  85906. nop
  85907. nop
  85908. nop
  85909. j _ADC_VECTOR_interrupt
  85910. nop
  85911. nop
  85912. nop
  85913. nop
  85914. nop
  85915. nop
  85916. nop
  85917. j _PMP_VECTOR_interrupt
  85918. nop
  85919. nop
  85920. nop
  85921. nop
  85922. nop
  85923. nop
  85924. nop
  85925. j _COMPARATOR_1_VECTOR_interrupt
  85926. nop
  85927. nop
  85928. nop
  85929. nop
  85930. nop
  85931. nop
  85932. nop
  85933. j _COMPARATOR_2_VECTOR_interrupt
  85934. nop
  85935. nop
  85936. nop
  85937. nop
  85938. nop
  85939. nop
  85940. nop
  85941. j _SPI_2A_VECTOR_interrupt
  85942. nop
  85943. nop
  85944. nop
  85945. nop
  85946. nop
  85947. nop
  85948. nop
  85949. j _SPI_3A_VECTOR_interrupt
  85950. nop
  85951. nop
  85952. nop
  85953. nop
  85954. nop
  85955. nop
  85956. nop
  85957. j _I2C_2_VECTOR_interrupt
  85958. nop
  85959. nop
  85960. nop
  85961. nop
  85962. nop
  85963. nop
  85964. nop
  85965. j _FAIL_SAFE_MONITOR_VECTOR_interrupt
  85966. nop
  85967. nop
  85968. nop
  85969. nop
  85970. nop
  85971. nop
  85972. nop
  85973. j _RTCC_VECTOR_interrupt
  85974. nop
  85975. nop
  85976. nop
  85977. nop
  85978. nop
  85979. nop
  85980. nop
  85981. j _DMA_0_VECTOR_interrupt
  85982. nop
  85983. nop
  85984. nop
  85985. nop
  85986. nop
  85987. nop
  85988. nop
  85989. j _DMA_1_VECTOR_interrupt
  85990. nop
  85991. nop
  85992. nop
  85993. nop
  85994. nop
  85995. nop
  85996. nop
  85997. j _DMA_2_VECTOR_interrupt
  85998. nop
  85999. nop
  86000. nop
  86001. nop
  86002. nop
  86003. nop
  86004. nop
  86005. j _DMA_3_VECTOR_interrupt
  86006. nop
  86007. nop
  86008. nop
  86009. nop
  86010. nop
  86011. nop
  86012. nop
  86013. nop
  86014. nop
  86015. nop
  86016. nop
  86017. nop
  86018. nop
  86019. nop
  86020. nop
  86021. nop
  86022. nop
  86023. nop
  86024. nop
  86025. nop
  86026. nop
  86027. nop
  86028. nop
  86029. nop
  86030. nop
  86031. nop
  86032. nop
  86033. nop
  86034. nop
  86035. nop
  86036. nop
  86037. nop
  86038. nop
  86039. nop
  86040. nop
  86041. nop
  86042. nop
  86043. nop
  86044. nop
  86045. j _FCE_VECTOR_interrupt
  86046. nop
  86047. nop
  86048. nop
  86049. nop
  86050. nop
  86051. nop
  86052. nop
  86053. j _USB_1_VECTOR_interrupt
  86054. nop
  86055. nop
  86056. nop
  86057. nop
  86058. nop
  86059. nop
  86060. nop
  86061. j _CAN_1_VECTOR_interrupt
  86062. nop
  86063. nop
  86064. nop
  86065. nop
  86066. nop
  86067. nop
  86068. nop
  86069. nop
  86070. nop
  86071. nop
  86072. nop
  86073. nop
  86074. nop
  86075. nop
  86076. nop
  86077. j _ETH_VECTOR_interrupt
  86078. nop
  86079. nop
  86080. nop
  86081. nop
  86082. nop
  86083. nop
  86084. nop
  86085. j _UART_1B_VECTOR_interrupt
  86086. nop
  86087. nop
  86088. nop
  86089. nop
  86090. nop
  86091. nop
  86092. nop
  86093. j _UART_2B_VECTOR_interrupt
  86094. nop
  86095. nop
  86096. nop
  86097. nop
  86098. nop
  86099. nop
  86100. nop
  86101. j _UART_3B_VECTOR_interrupt
  86102. nop
  86103. nop
  86104. nop
  86105. nop
  86106. nop
  86107. nop
  86108. nop
  86109. .weak _CORE_TIMER_VECTOR_interrupt
  86110. .weak _CORE_SOFTWARE_0_VECTOR_interrupt
  86111. .weak _CORE_SOFTWARE_1_VECTOR_interrupt
  86112. .weak _EXTERNAL_0_VECTOR_interrupt
  86113. .weak _TIMER_1_VECTOR_interrupt
  86114. .weak _INPUT_CAPTURE_1_VECTOR_interrupt
  86115. .weak _OUTPUT_COMPARE_1_VECTOR_interrupt
  86116. .weak _EXTERNAL_1_VECTOR_interrupt
  86117. .weak _TIMER_2_VECTOR_interrupt
  86118. .weak _INPUT_CAPTURE_2_VECTOR_interrupt
  86119. .weak _OUTPUT_COMPARE_2_VECTOR_interrupt
  86120. .weak _EXTERNAL_2_VECTOR_interrupt
  86121. .weak _TIMER_3_VECTOR_interrupt
  86122. .weak _INPUT_CAPTURE_3_VECTOR_interrupt
  86123. .weak _OUTPUT_COMPARE_3_VECTOR_interrupt
  86124. .weak _EXTERNAL_3_VECTOR_interrupt
  86125. .weak _TIMER_4_VECTOR_interrupt
  86126. .weak _INPUT_CAPTURE_4_VECTOR_interrupt
  86127. .weak _OUTPUT_COMPARE_4_VECTOR_interrupt
  86128. .weak _EXTERNAL_4_VECTOR_interrupt
  86129. .weak _TIMER_5_VECTOR_interrupt
  86130. .weak _INPUT_CAPTURE_5_VECTOR_interrupt
  86131. .weak _OUTPUT_COMPARE_5_VECTOR_interrupt
  86132. .weak _SPI_1A_VECTOR_interrupt
  86133. .weak _UART_1_VECTOR_interrupt
  86134. .weak _UART_1A_VECTOR_interrupt
  86135. .weak _I2C_3_VECTOR_interrupt
  86136. .weak _I2C_1A_VECTOR_interrupt
  86137. .weak _SPI_3_VECTOR_interrupt
  86138. .weak _I2C_1_VECTOR_interrupt
  86139. .weak _CHANGE_NOTICE_VECTOR_interrupt
  86140. .weak _ADC_VECTOR_interrupt
  86141. .weak _PMP_VECTOR_interrupt
  86142. .weak _COMPARATOR_1_VECTOR_interrupt
  86143. .weak _COMPARATOR_2_VECTOR_interrupt
  86144. .weak _SPI_2A_VECTOR_interrupt
  86145. .weak _UART_3_VECTOR_interrupt
  86146. .weak _UART_2A_VECTOR_interrupt
  86147. .weak _I2C_4_VECTOR_interrupt
  86148. .weak _I2C_2A_VECTOR_interrupt
  86149. .weak _SPI_2_VECTOR_interrupt
  86150. .weak _SPI_3A_VECTOR_interrupt
  86151. .weak _UART_2_VECTOR_interrupt
  86152. .weak _UART_3A_VECTOR_interrupt
  86153. .weak _I2C_5_VECTOR_interrupt
  86154. .weak _I2C_3A_VECTOR_interrupt
  86155. .weak _SPI_4_VECTOR_interrupt
  86156. .weak _I2C_2_VECTOR_interrupt
  86157. .weak _FAIL_SAFE_MONITOR_VECTOR_interrupt
  86158. .weak _RTCC_VECTOR_interrupt
  86159. .weak _DMA_0_VECTOR_interrupt
  86160. .weak _DMA_1_VECTOR_interrupt
  86161. .weak _DMA_2_VECTOR_interrupt
  86162. .weak _DMA_3_VECTOR_interrupt
  86163. .weak _FCE_VECTOR_interrupt
  86164. .weak _USB_1_VECTOR_interrupt
  86165. .weak _CAN_1_VECTOR_interrupt
  86166. .weak _ETH_VECTOR_interrupt
  86167. .weak _UART_1B_VECTOR_interrupt
  86168. .weak _UART_4_VECTOR_interrupt
  86169. .weak _UART_2B_VECTOR_interrupt
  86170. .weak _UART_6_VECTOR_interrupt
  86171. .weak _UART_3B_VECTOR_interrupt
  86172. .weak _UART_5_VECTOR_interrupt
  86173. .text
  86174. end;
  86175. end.