pic32mx575f512h.pp 2.5 MB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012401340144015401640174018401940204021402240234024402540264027402840294030403140324033403440354036403740384039404040414042404340444045404640474048404940504051405240534054405540564057405840594060406140624063406440654066406740684069407040714072407340744075407640774078407940804081408240834084408540864087408840894090409140924093409440954096409740984099410041014102410341044105410641074108410941104111411241134114411541164117411841194120412141224123412441254126412741284129413041314132413341344135413641374138413941404141414241434144414541464147414841494150415141524153415441554156415741584159416041614162416341644165416641674168416941704171417241734174417541764177417841794180418141824183418441854186418741884189419041914192419341944195419641974198419942004201420242034204420542064207420842094210421142124213421442154216421742184219422042214222422342244225422642274228422942304231423242334234423542364237423842394240424142424243424442454246424742484249425042514252425342544255425642574258425942604261426242634264426542664267426842694270427142724273427442754276427742784279428042814282428342844285428642874288428942904291429242934294429542964297429842994300430143024303430443054306430743084309431043114312431343144315431643174318431943204321432243234324432543264327432843294330433143324333433443354336433743384339434043414342434343444345434643474348434943504351435243534354435543564357435843594360436143624363436443654366436743684369437043714372437343744375437643774378437943804381438243834384438543864387438843894390439143924393439443954396439743984399440044014402440344044405440644074408440944104411441244134414441544164417441844194420442144224423442444254426442744284429443044314432443344344435443644374438443944404441444244434444444544464447444844494450445144524453445444554456445744584459446044614462446344644465446644674468446944704471447244734474447544764477447844794480448144824483448444854486448744884489449044914492449344944495449644974498449945004501450245034504450545064507450845094510451145124513451445154516451745184519452045214522452345244525452645274528452945304531453245334534453545364537453845394540454145424543454445454546454745484549455045514552455345544555455645574558455945604561456245634564456545664567456845694570457145724573457445754576457745784579458045814582458345844585458645874588458945904591459245934594459545964597459845994600460146024603460446054606460746084609461046114612461346144615461646174618461946204621462246234624462546264627462846294630463146324633463446354636463746384639464046414642464346444645464646474648464946504651465246534654465546564657465846594660466146624663466446654666466746684669467046714672467346744675467646774678467946804681468246834684468546864687468846894690469146924693469446954696469746984699470047014702470347044705470647074708470947104711471247134714471547164717471847194720472147224723472447254726472747284729473047314732473347344735473647374738473947404741474247434744474547464747474847494750475147524753475447554756475747584759476047614762476347644765476647674768476947704771477247734774477547764777477847794780478147824783478447854786478747884789479047914792479347944795479647974798479948004801480248034804480548064807480848094810481148124813481448154816481748184819482048214822482348244825482648274828482948304831483248334834483548364837483848394840484148424843484448454846484748484849485048514852485348544855485648574858485948604861486248634864486548664867486848694870487148724873487448754876487748784879488048814882488348844885488648874888488948904891489248934894489548964897489848994900490149024903490449054906490749084909491049114912491349144915491649174918491949204921492249234924492549264927492849294930493149324933493449354936493749384939494049414942494349444945494649474948494949504951495249534954495549564957495849594960496149624963496449654966496749684969497049714972497349744975497649774978497949804981498249834984498549864987498849894990499149924993499449954996499749984999500050015002500350045005500650075008500950105011501250135014501550165017501850195020502150225023502450255026502750285029503050315032503350345035503650375038503950405041504250435044504550465047504850495050505150525053505450555056505750585059506050615062506350645065506650675068506950705071507250735074507550765077507850795080508150825083508450855086508750885089509050915092509350945095509650975098509951005101510251035104510551065107510851095110511151125113511451155116511751185119512051215122512351245125512651275128512951305131513251335134513551365137513851395140514151425143514451455146514751485149515051515152515351545155515651575158515951605161516251635164516551665167516851695170517151725173517451755176517751785179518051815182518351845185518651875188518951905191519251935194519551965197519851995200520152025203520452055206520752085209521052115212521352145215521652175218521952205221522252235224522552265227522852295230523152325233523452355236523752385239524052415242524352445245524652475248524952505251525252535254525552565257525852595260526152625263526452655266526752685269527052715272527352745275527652775278527952805281528252835284528552865287528852895290529152925293529452955296529752985299530053015302530353045305530653075308530953105311531253135314531553165317531853195320532153225323532453255326532753285329533053315332533353345335533653375338533953405341534253435344534553465347534853495350535153525353535453555356535753585359536053615362536353645365536653675368536953705371537253735374537553765377537853795380538153825383538453855386538753885389539053915392539353945395539653975398539954005401540254035404540554065407540854095410541154125413541454155416541754185419542054215422542354245425542654275428542954305431543254335434543554365437543854395440544154425443544454455446544754485449545054515452545354545455545654575458545954605461546254635464546554665467546854695470547154725473547454755476547754785479548054815482548354845485548654875488548954905491549254935494549554965497549854995500550155025503550455055506550755085509551055115512551355145515551655175518551955205521552255235524552555265527552855295530553155325533553455355536553755385539554055415542554355445545554655475548554955505551555255535554555555565557555855595560556155625563556455655566556755685569557055715572557355745575557655775578557955805581558255835584558555865587558855895590559155925593559455955596559755985599560056015602560356045605560656075608560956105611561256135614561556165617561856195620562156225623562456255626562756285629563056315632563356345635563656375638563956405641564256435644564556465647564856495650565156525653565456555656565756585659566056615662566356645665566656675668566956705671567256735674567556765677567856795680568156825683568456855686568756885689569056915692569356945695569656975698569957005701570257035704570557065707570857095710571157125713571457155716571757185719572057215722572357245725572657275728572957305731573257335734573557365737573857395740574157425743574457455746574757485749575057515752575357545755575657575758575957605761576257635764576557665767576857695770577157725773577457755776577757785779578057815782578357845785578657875788578957905791579257935794579557965797579857995800580158025803580458055806580758085809581058115812581358145815581658175818581958205821582258235824582558265827582858295830583158325833583458355836583758385839584058415842584358445845584658475848584958505851585258535854585558565857585858595860586158625863586458655866586758685869587058715872587358745875587658775878587958805881588258835884588558865887588858895890589158925893589458955896589758985899590059015902590359045905590659075908590959105911591259135914591559165917591859195920592159225923592459255926592759285929593059315932593359345935593659375938593959405941594259435944594559465947594859495950595159525953595459555956595759585959596059615962596359645965596659675968596959705971597259735974597559765977597859795980598159825983598459855986598759885989599059915992599359945995599659975998599960006001600260036004600560066007600860096010601160126013601460156016601760186019602060216022602360246025602660276028602960306031603260336034603560366037603860396040604160426043604460456046604760486049605060516052605360546055605660576058605960606061606260636064606560666067606860696070607160726073607460756076607760786079608060816082608360846085608660876088608960906091609260936094609560966097609860996100610161026103610461056106610761086109611061116112611361146115611661176118611961206121612261236124612561266127612861296130613161326133613461356136613761386139614061416142614361446145614661476148614961506151615261536154615561566157615861596160616161626163616461656166616761686169617061716172617361746175617661776178617961806181618261836184618561866187618861896190619161926193619461956196619761986199620062016202620362046205620662076208620962106211621262136214621562166217621862196220622162226223622462256226622762286229623062316232623362346235623662376238623962406241624262436244624562466247624862496250625162526253625462556256625762586259626062616262626362646265626662676268626962706271627262736274627562766277627862796280628162826283628462856286628762886289629062916292629362946295629662976298629963006301630263036304630563066307630863096310631163126313631463156316631763186319632063216322632363246325632663276328632963306331633263336334633563366337633863396340634163426343634463456346634763486349635063516352635363546355635663576358635963606361636263636364636563666367636863696370637163726373637463756376637763786379638063816382638363846385638663876388638963906391639263936394639563966397639863996400640164026403640464056406640764086409641064116412641364146415641664176418641964206421642264236424642564266427642864296430643164326433643464356436643764386439644064416442644364446445644664476448644964506451645264536454645564566457645864596460646164626463646464656466646764686469647064716472647364746475647664776478647964806481648264836484648564866487648864896490649164926493649464956496649764986499650065016502650365046505650665076508650965106511651265136514651565166517651865196520652165226523652465256526652765286529653065316532653365346535653665376538653965406541654265436544654565466547654865496550655165526553655465556556655765586559656065616562656365646565656665676568656965706571657265736574657565766577657865796580658165826583658465856586658765886589659065916592659365946595659665976598659966006601660266036604660566066607660866096610661166126613661466156616661766186619662066216622662366246625662666276628662966306631663266336634663566366637663866396640664166426643664466456646664766486649665066516652665366546655665666576658665966606661666266636664666566666667666866696670667166726673667466756676667766786679668066816682668366846685668666876688668966906691669266936694669566966697669866996700670167026703670467056706670767086709671067116712671367146715671667176718671967206721672267236724672567266727672867296730673167326733673467356736673767386739674067416742674367446745674667476748674967506751675267536754675567566757675867596760676167626763676467656766676767686769677067716772677367746775677667776778677967806781678267836784678567866787678867896790679167926793679467956796679767986799680068016802680368046805680668076808680968106811681268136814681568166817681868196820682168226823682468256826682768286829683068316832683368346835683668376838683968406841684268436844684568466847684868496850685168526853685468556856685768586859686068616862686368646865686668676868686968706871687268736874687568766877687868796880688168826883688468856886688768886889689068916892689368946895689668976898689969006901690269036904690569066907690869096910691169126913691469156916691769186919692069216922692369246925692669276928692969306931693269336934693569366937693869396940694169426943694469456946694769486949695069516952695369546955695669576958695969606961696269636964696569666967696869696970697169726973697469756976697769786979698069816982698369846985698669876988698969906991699269936994699569966997699869997000700170027003700470057006700770087009701070117012701370147015701670177018701970207021702270237024702570267027702870297030703170327033703470357036703770387039704070417042704370447045704670477048704970507051705270537054705570567057705870597060706170627063706470657066706770687069707070717072707370747075707670777078707970807081708270837084708570867087708870897090709170927093709470957096709770987099710071017102710371047105710671077108710971107111711271137114711571167117711871197120712171227123712471257126712771287129713071317132713371347135713671377138713971407141714271437144714571467147714871497150715171527153715471557156715771587159716071617162716371647165716671677168716971707171717271737174717571767177717871797180718171827183718471857186718771887189719071917192719371947195719671977198719972007201720272037204720572067207720872097210721172127213721472157216721772187219722072217222722372247225722672277228722972307231723272337234723572367237723872397240724172427243724472457246724772487249725072517252725372547255725672577258725972607261726272637264726572667267726872697270727172727273727472757276727772787279728072817282728372847285728672877288728972907291729272937294729572967297729872997300730173027303730473057306730773087309731073117312731373147315731673177318731973207321732273237324732573267327732873297330733173327333733473357336733773387339734073417342734373447345734673477348734973507351735273537354735573567357735873597360736173627363736473657366736773687369737073717372737373747375737673777378737973807381738273837384738573867387738873897390739173927393739473957396739773987399740074017402740374047405740674077408740974107411741274137414741574167417741874197420742174227423742474257426742774287429743074317432743374347435743674377438743974407441744274437444744574467447744874497450745174527453745474557456745774587459746074617462746374647465746674677468746974707471747274737474747574767477747874797480748174827483748474857486748774887489749074917492749374947495749674977498749975007501750275037504750575067507750875097510751175127513751475157516751775187519752075217522752375247525752675277528752975307531753275337534753575367537753875397540754175427543754475457546754775487549755075517552755375547555755675577558755975607561756275637564756575667567756875697570757175727573757475757576757775787579758075817582758375847585758675877588758975907591759275937594759575967597759875997600760176027603760476057606760776087609761076117612761376147615761676177618761976207621762276237624762576267627762876297630763176327633763476357636763776387639764076417642764376447645764676477648764976507651765276537654765576567657765876597660766176627663766476657666766776687669767076717672767376747675767676777678767976807681768276837684768576867687768876897690769176927693769476957696769776987699770077017702770377047705770677077708770977107711771277137714771577167717771877197720772177227723772477257726772777287729773077317732773377347735773677377738773977407741774277437744774577467747774877497750775177527753775477557756775777587759776077617762776377647765776677677768776977707771777277737774777577767777777877797780778177827783778477857786778777887789779077917792779377947795779677977798779978007801780278037804780578067807780878097810781178127813781478157816781778187819782078217822782378247825782678277828782978307831783278337834783578367837783878397840784178427843784478457846784778487849785078517852785378547855785678577858785978607861786278637864786578667867786878697870787178727873787478757876787778787879788078817882788378847885788678877888788978907891789278937894789578967897789878997900790179027903790479057906790779087909791079117912791379147915791679177918791979207921792279237924792579267927792879297930793179327933793479357936793779387939794079417942794379447945794679477948794979507951795279537954795579567957795879597960796179627963796479657966796779687969797079717972797379747975797679777978797979807981798279837984798579867987798879897990799179927993799479957996799779987999800080018002800380048005800680078008800980108011801280138014801580168017801880198020802180228023802480258026802780288029803080318032803380348035803680378038803980408041804280438044804580468047804880498050805180528053805480558056805780588059806080618062806380648065806680678068806980708071807280738074807580768077807880798080808180828083808480858086808780888089809080918092809380948095809680978098809981008101810281038104810581068107810881098110811181128113811481158116811781188119812081218122812381248125812681278128812981308131813281338134813581368137813881398140814181428143814481458146814781488149815081518152815381548155815681578158815981608161816281638164816581668167816881698170817181728173817481758176817781788179818081818182818381848185818681878188818981908191819281938194819581968197819881998200820182028203820482058206820782088209821082118212821382148215821682178218821982208221822282238224822582268227822882298230823182328233823482358236823782388239824082418242824382448245824682478248824982508251825282538254825582568257825882598260826182628263826482658266826782688269827082718272827382748275827682778278827982808281828282838284828582868287828882898290829182928293829482958296829782988299830083018302830383048305830683078308830983108311831283138314831583168317831883198320832183228323832483258326832783288329833083318332833383348335833683378338833983408341834283438344834583468347834883498350835183528353835483558356835783588359836083618362836383648365836683678368836983708371837283738374837583768377837883798380838183828383838483858386838783888389839083918392839383948395839683978398839984008401840284038404840584068407840884098410841184128413841484158416841784188419842084218422842384248425842684278428842984308431843284338434843584368437843884398440844184428443844484458446844784488449845084518452845384548455845684578458845984608461846284638464846584668467846884698470847184728473847484758476847784788479848084818482848384848485848684878488848984908491849284938494849584968497849884998500850185028503850485058506850785088509851085118512851385148515851685178518851985208521852285238524852585268527852885298530853185328533853485358536853785388539854085418542854385448545854685478548854985508551855285538554855585568557855885598560856185628563856485658566856785688569857085718572857385748575857685778578857985808581858285838584858585868587858885898590859185928593859485958596859785988599860086018602860386048605860686078608860986108611861286138614861586168617861886198620862186228623862486258626862786288629863086318632863386348635863686378638863986408641864286438644864586468647864886498650865186528653865486558656865786588659866086618662866386648665866686678668866986708671867286738674867586768677867886798680868186828683868486858686868786888689869086918692869386948695869686978698869987008701870287038704870587068707870887098710871187128713871487158716871787188719872087218722872387248725872687278728872987308731873287338734873587368737873887398740874187428743874487458746874787488749875087518752875387548755875687578758875987608761876287638764876587668767876887698770877187728773877487758776877787788779878087818782878387848785878687878788878987908791879287938794879587968797879887998800880188028803880488058806880788088809881088118812881388148815881688178818881988208821882288238824882588268827882888298830883188328833883488358836883788388839884088418842884388448845884688478848884988508851885288538854885588568857885888598860886188628863886488658866886788688869887088718872887388748875887688778878887988808881888288838884888588868887888888898890889188928893889488958896889788988899890089018902890389048905890689078908890989108911891289138914891589168917891889198920892189228923892489258926892789288929893089318932893389348935893689378938893989408941894289438944894589468947894889498950895189528953895489558956895789588959896089618962896389648965896689678968896989708971897289738974897589768977897889798980898189828983898489858986898789888989899089918992899389948995899689978998899990009001900290039004900590069007900890099010901190129013901490159016901790189019902090219022902390249025902690279028902990309031903290339034903590369037903890399040904190429043904490459046904790489049905090519052905390549055905690579058905990609061906290639064906590669067906890699070907190729073907490759076907790789079908090819082908390849085908690879088908990909091909290939094909590969097909890999100910191029103910491059106910791089109911091119112911391149115911691179118911991209121912291239124912591269127912891299130913191329133913491359136913791389139914091419142914391449145914691479148914991509151915291539154915591569157915891599160916191629163916491659166916791689169917091719172917391749175917691779178917991809181918291839184918591869187918891899190919191929193919491959196919791989199920092019202920392049205920692079208920992109211921292139214921592169217921892199220922192229223922492259226922792289229923092319232923392349235923692379238923992409241924292439244924592469247924892499250925192529253925492559256925792589259926092619262926392649265926692679268926992709271927292739274927592769277927892799280928192829283928492859286928792889289929092919292929392949295929692979298929993009301930293039304930593069307930893099310931193129313931493159316931793189319932093219322932393249325932693279328932993309331933293339334933593369337933893399340934193429343934493459346934793489349935093519352935393549355935693579358935993609361936293639364936593669367936893699370937193729373937493759376937793789379938093819382938393849385938693879388938993909391939293939394939593969397939893999400940194029403940494059406940794089409941094119412941394149415941694179418941994209421942294239424942594269427942894299430943194329433943494359436943794389439944094419442944394449445944694479448944994509451945294539454945594569457945894599460946194629463946494659466946794689469947094719472947394749475947694779478947994809481948294839484948594869487948894899490949194929493949494959496949794989499950095019502950395049505950695079508950995109511951295139514951595169517951895199520952195229523952495259526952795289529953095319532953395349535953695379538953995409541954295439544954595469547954895499550955195529553955495559556955795589559956095619562956395649565956695679568956995709571957295739574957595769577957895799580958195829583958495859586958795889589959095919592959395949595959695979598959996009601960296039604960596069607960896099610961196129613961496159616961796189619962096219622962396249625962696279628962996309631963296339634963596369637963896399640964196429643964496459646964796489649965096519652965396549655965696579658965996609661966296639664966596669667966896699670967196729673967496759676967796789679968096819682968396849685968696879688968996909691969296939694969596969697969896999700970197029703970497059706970797089709971097119712971397149715971697179718971997209721972297239724972597269727972897299730973197329733973497359736973797389739974097419742974397449745974697479748974997509751975297539754975597569757975897599760976197629763976497659766976797689769977097719772977397749775977697779778977997809781978297839784978597869787978897899790979197929793979497959796979797989799980098019802980398049805980698079808980998109811981298139814981598169817981898199820982198229823982498259826982798289829983098319832983398349835983698379838983998409841984298439844984598469847984898499850985198529853985498559856985798589859986098619862986398649865986698679868986998709871987298739874987598769877987898799880988198829883988498859886988798889889989098919892989398949895989698979898989999009901990299039904990599069907990899099910991199129913991499159916991799189919992099219922992399249925992699279928992999309931993299339934993599369937993899399940994199429943994499459946994799489949995099519952995399549955995699579958995999609961996299639964996599669967996899699970997199729973997499759976997799789979998099819982998399849985998699879988998999909991999299939994999599969997999899991000010001100021000310004100051000610007100081000910010100111001210013100141001510016100171001810019100201002110022100231002410025100261002710028100291003010031100321003310034100351003610037100381003910040100411004210043100441004510046100471004810049100501005110052100531005410055100561005710058100591006010061100621006310064100651006610067100681006910070100711007210073100741007510076100771007810079100801008110082100831008410085100861008710088100891009010091100921009310094100951009610097100981009910100101011010210103101041010510106101071010810109101101011110112101131011410115101161011710118101191012010121101221012310124101251012610127101281012910130101311013210133101341013510136101371013810139101401014110142101431014410145101461014710148101491015010151101521015310154101551015610157101581015910160101611016210163101641016510166101671016810169101701017110172101731017410175101761017710178101791018010181101821018310184101851018610187101881018910190101911019210193101941019510196101971019810199102001020110202102031020410205102061020710208102091021010211102121021310214102151021610217102181021910220102211022210223102241022510226102271022810229102301023110232102331023410235102361023710238102391024010241102421024310244102451024610247102481024910250102511025210253102541025510256102571025810259102601026110262102631026410265102661026710268102691027010271102721027310274102751027610277102781027910280102811028210283102841028510286102871028810289102901029110292102931029410295102961029710298102991030010301103021030310304103051030610307103081030910310103111031210313103141031510316103171031810319103201032110322103231032410325103261032710328103291033010331103321033310334103351033610337103381033910340103411034210343103441034510346103471034810349103501035110352103531035410355103561035710358103591036010361103621036310364103651036610367103681036910370103711037210373103741037510376103771037810379103801038110382103831038410385103861038710388103891039010391103921039310394103951039610397103981039910400104011040210403104041040510406104071040810409104101041110412104131041410415104161041710418104191042010421104221042310424104251042610427104281042910430104311043210433104341043510436104371043810439104401044110442104431044410445104461044710448104491045010451104521045310454104551045610457104581045910460104611046210463104641046510466104671046810469104701047110472104731047410475104761047710478104791048010481104821048310484104851048610487104881048910490104911049210493104941049510496104971049810499105001050110502105031050410505105061050710508105091051010511105121051310514105151051610517105181051910520105211052210523105241052510526105271052810529105301053110532105331053410535105361053710538105391054010541105421054310544105451054610547105481054910550105511055210553105541055510556105571055810559105601056110562105631056410565105661056710568105691057010571105721057310574105751057610577105781057910580105811058210583105841058510586105871058810589105901059110592105931059410595105961059710598105991060010601106021060310604106051060610607106081060910610106111061210613106141061510616106171061810619106201062110622106231062410625106261062710628106291063010631106321063310634106351063610637106381063910640106411064210643106441064510646106471064810649106501065110652106531065410655106561065710658106591066010661106621066310664106651066610667106681066910670106711067210673106741067510676106771067810679106801068110682106831068410685106861068710688106891069010691106921069310694106951069610697106981069910700107011070210703107041070510706107071070810709107101071110712107131071410715107161071710718107191072010721107221072310724107251072610727107281072910730107311073210733107341073510736107371073810739107401074110742107431074410745107461074710748107491075010751107521075310754107551075610757107581075910760107611076210763107641076510766107671076810769107701077110772107731077410775107761077710778107791078010781107821078310784107851078610787107881078910790107911079210793107941079510796107971079810799108001080110802108031080410805108061080710808108091081010811108121081310814108151081610817108181081910820108211082210823108241082510826108271082810829108301083110832108331083410835108361083710838108391084010841108421084310844108451084610847108481084910850108511085210853108541085510856108571085810859108601086110862108631086410865108661086710868108691087010871108721087310874108751087610877108781087910880108811088210883108841088510886108871088810889108901089110892108931089410895108961089710898108991090010901109021090310904109051090610907109081090910910109111091210913109141091510916109171091810919109201092110922109231092410925109261092710928109291093010931109321093310934109351093610937109381093910940109411094210943109441094510946109471094810949109501095110952109531095410955109561095710958109591096010961109621096310964109651096610967109681096910970109711097210973109741097510976109771097810979109801098110982109831098410985109861098710988109891099010991109921099310994109951099610997109981099911000110011100211003110041100511006110071100811009110101101111012110131101411015110161101711018110191102011021110221102311024110251102611027110281102911030110311103211033110341103511036110371103811039110401104111042110431104411045110461104711048110491105011051110521105311054110551105611057110581105911060110611106211063110641106511066110671106811069110701107111072110731107411075110761107711078110791108011081110821108311084110851108611087110881108911090110911109211093110941109511096110971109811099111001110111102111031110411105111061110711108111091111011111111121111311114111151111611117111181111911120111211112211123111241112511126111271112811129111301113111132111331113411135111361113711138111391114011141111421114311144111451114611147111481114911150111511115211153111541115511156111571115811159111601116111162111631116411165111661116711168111691117011171111721117311174111751117611177111781117911180111811118211183111841118511186111871118811189111901119111192111931119411195111961119711198111991120011201112021120311204112051120611207112081120911210112111121211213112141121511216112171121811219112201122111222112231122411225112261122711228112291123011231112321123311234112351123611237112381123911240112411124211243112441124511246112471124811249112501125111252112531125411255112561125711258112591126011261112621126311264112651126611267112681126911270112711127211273112741127511276112771127811279112801128111282112831128411285112861128711288112891129011291112921129311294112951129611297112981129911300113011130211303113041130511306113071130811309113101131111312113131131411315113161131711318113191132011321113221132311324113251132611327113281132911330113311133211333113341133511336113371133811339113401134111342113431134411345113461134711348113491135011351113521135311354113551135611357113581135911360113611136211363113641136511366113671136811369113701137111372113731137411375113761137711378113791138011381113821138311384113851138611387113881138911390113911139211393113941139511396113971139811399114001140111402114031140411405114061140711408114091141011411114121141311414114151141611417114181141911420114211142211423114241142511426114271142811429114301143111432114331143411435114361143711438114391144011441114421144311444114451144611447114481144911450114511145211453114541145511456114571145811459114601146111462114631146411465114661146711468114691147011471114721147311474114751147611477114781147911480114811148211483114841148511486114871148811489114901149111492114931149411495114961149711498114991150011501115021150311504115051150611507115081150911510115111151211513115141151511516115171151811519115201152111522115231152411525115261152711528115291153011531115321153311534115351153611537115381153911540115411154211543115441154511546115471154811549115501155111552115531155411555115561155711558115591156011561115621156311564115651156611567115681156911570115711157211573115741157511576115771157811579115801158111582115831158411585115861158711588115891159011591115921159311594115951159611597115981159911600116011160211603116041160511606116071160811609116101161111612116131161411615116161161711618116191162011621116221162311624116251162611627116281162911630116311163211633116341163511636116371163811639116401164111642116431164411645116461164711648116491165011651116521165311654116551165611657116581165911660116611166211663116641166511666116671166811669116701167111672116731167411675116761167711678116791168011681116821168311684116851168611687116881168911690116911169211693116941169511696116971169811699117001170111702117031170411705117061170711708117091171011711117121171311714117151171611717117181171911720117211172211723117241172511726117271172811729117301173111732117331173411735117361173711738117391174011741117421174311744117451174611747117481174911750117511175211753117541175511756117571175811759117601176111762117631176411765117661176711768117691177011771117721177311774117751177611777117781177911780117811178211783117841178511786117871178811789117901179111792117931179411795117961179711798117991180011801118021180311804118051180611807118081180911810118111181211813118141181511816118171181811819118201182111822118231182411825118261182711828118291183011831118321183311834118351183611837118381183911840118411184211843118441184511846118471184811849118501185111852118531185411855118561185711858118591186011861118621186311864118651186611867118681186911870118711187211873118741187511876118771187811879118801188111882118831188411885118861188711888118891189011891118921189311894118951189611897118981189911900119011190211903119041190511906119071190811909119101191111912119131191411915119161191711918119191192011921119221192311924119251192611927119281192911930119311193211933119341193511936119371193811939119401194111942119431194411945119461194711948119491195011951119521195311954119551195611957119581195911960119611196211963119641196511966119671196811969119701197111972119731197411975119761197711978119791198011981119821198311984119851198611987119881198911990119911199211993119941199511996119971199811999120001200112002120031200412005120061200712008120091201012011120121201312014120151201612017120181201912020120211202212023120241202512026120271202812029120301203112032120331203412035120361203712038120391204012041120421204312044120451204612047120481204912050120511205212053120541205512056120571205812059120601206112062120631206412065120661206712068120691207012071120721207312074120751207612077120781207912080120811208212083120841208512086120871208812089120901209112092120931209412095120961209712098120991210012101121021210312104121051210612107121081210912110121111211212113121141211512116121171211812119121201212112122121231212412125121261212712128121291213012131121321213312134121351213612137121381213912140121411214212143121441214512146121471214812149121501215112152121531215412155121561215712158121591216012161121621216312164121651216612167121681216912170121711217212173121741217512176121771217812179121801218112182121831218412185121861218712188121891219012191121921219312194121951219612197121981219912200122011220212203122041220512206122071220812209122101221112212122131221412215122161221712218122191222012221122221222312224122251222612227122281222912230122311223212233122341223512236122371223812239122401224112242122431224412245122461224712248122491225012251122521225312254122551225612257122581225912260122611226212263122641226512266122671226812269122701227112272122731227412275122761227712278122791228012281122821228312284122851228612287122881228912290122911229212293122941229512296122971229812299123001230112302123031230412305123061230712308123091231012311123121231312314123151231612317123181231912320123211232212323123241232512326123271232812329123301233112332123331233412335123361233712338123391234012341123421234312344123451234612347123481234912350123511235212353123541235512356123571235812359123601236112362123631236412365123661236712368123691237012371123721237312374123751237612377123781237912380123811238212383123841238512386123871238812389123901239112392123931239412395123961239712398123991240012401124021240312404124051240612407124081240912410124111241212413124141241512416124171241812419124201242112422124231242412425124261242712428124291243012431124321243312434124351243612437124381243912440124411244212443124441244512446124471244812449124501245112452124531245412455124561245712458124591246012461124621246312464124651246612467124681246912470124711247212473124741247512476124771247812479124801248112482124831248412485124861248712488124891249012491124921249312494124951249612497124981249912500125011250212503125041250512506125071250812509125101251112512125131251412515125161251712518125191252012521125221252312524125251252612527125281252912530125311253212533125341253512536125371253812539125401254112542125431254412545125461254712548125491255012551125521255312554125551255612557125581255912560125611256212563125641256512566125671256812569125701257112572125731257412575125761257712578125791258012581125821258312584125851258612587125881258912590125911259212593125941259512596125971259812599126001260112602126031260412605126061260712608126091261012611126121261312614126151261612617126181261912620126211262212623126241262512626126271262812629126301263112632126331263412635126361263712638126391264012641126421264312644126451264612647126481264912650126511265212653126541265512656126571265812659126601266112662126631266412665126661266712668126691267012671126721267312674126751267612677126781267912680126811268212683126841268512686126871268812689126901269112692126931269412695126961269712698126991270012701127021270312704127051270612707127081270912710127111271212713127141271512716127171271812719127201272112722127231272412725127261272712728127291273012731127321273312734127351273612737127381273912740127411274212743127441274512746127471274812749127501275112752127531275412755127561275712758127591276012761127621276312764127651276612767127681276912770127711277212773127741277512776127771277812779127801278112782127831278412785127861278712788127891279012791127921279312794127951279612797127981279912800128011280212803128041280512806128071280812809128101281112812128131281412815128161281712818128191282012821128221282312824128251282612827128281282912830128311283212833128341283512836128371283812839128401284112842128431284412845128461284712848128491285012851128521285312854128551285612857128581285912860128611286212863128641286512866128671286812869128701287112872128731287412875128761287712878128791288012881128821288312884128851288612887128881288912890128911289212893128941289512896128971289812899129001290112902129031290412905129061290712908129091291012911129121291312914129151291612917129181291912920129211292212923129241292512926129271292812929129301293112932129331293412935129361293712938129391294012941129421294312944129451294612947129481294912950129511295212953129541295512956129571295812959129601296112962129631296412965129661296712968129691297012971129721297312974129751297612977129781297912980129811298212983129841298512986129871298812989129901299112992129931299412995129961299712998129991300013001130021300313004130051300613007130081300913010130111301213013130141301513016130171301813019130201302113022130231302413025130261302713028130291303013031130321303313034130351303613037130381303913040130411304213043130441304513046130471304813049130501305113052130531305413055130561305713058130591306013061130621306313064130651306613067130681306913070130711307213073130741307513076130771307813079130801308113082130831308413085130861308713088130891309013091130921309313094130951309613097130981309913100131011310213103131041310513106131071310813109131101311113112131131311413115131161311713118131191312013121131221312313124131251312613127131281312913130131311313213133131341313513136131371313813139131401314113142131431314413145131461314713148131491315013151131521315313154131551315613157131581315913160131611316213163131641316513166131671316813169131701317113172131731317413175131761317713178131791318013181131821318313184131851318613187131881318913190131911319213193131941319513196131971319813199132001320113202132031320413205132061320713208132091321013211132121321313214132151321613217132181321913220132211322213223132241322513226132271322813229132301323113232132331323413235132361323713238132391324013241132421324313244132451324613247132481324913250132511325213253132541325513256132571325813259132601326113262132631326413265132661326713268132691327013271132721327313274132751327613277132781327913280132811328213283132841328513286132871328813289132901329113292132931329413295132961329713298132991330013301133021330313304133051330613307133081330913310133111331213313133141331513316133171331813319133201332113322133231332413325133261332713328133291333013331133321333313334133351333613337133381333913340133411334213343133441334513346133471334813349133501335113352133531335413355133561335713358133591336013361133621336313364133651336613367133681336913370133711337213373133741337513376133771337813379133801338113382133831338413385133861338713388133891339013391133921339313394133951339613397133981339913400134011340213403134041340513406134071340813409134101341113412134131341413415134161341713418134191342013421134221342313424134251342613427134281342913430134311343213433134341343513436134371343813439134401344113442134431344413445134461344713448134491345013451134521345313454134551345613457134581345913460134611346213463134641346513466134671346813469134701347113472134731347413475134761347713478134791348013481134821348313484134851348613487134881348913490134911349213493134941349513496134971349813499135001350113502135031350413505135061350713508135091351013511135121351313514135151351613517135181351913520135211352213523135241352513526135271352813529135301353113532135331353413535135361353713538135391354013541135421354313544135451354613547135481354913550135511355213553135541355513556135571355813559135601356113562135631356413565135661356713568135691357013571135721357313574135751357613577135781357913580135811358213583135841358513586135871358813589135901359113592135931359413595135961359713598135991360013601136021360313604136051360613607136081360913610136111361213613136141361513616136171361813619136201362113622136231362413625136261362713628136291363013631136321363313634136351363613637136381363913640136411364213643136441364513646136471364813649136501365113652136531365413655136561365713658136591366013661136621366313664136651366613667136681366913670136711367213673136741367513676136771367813679136801368113682136831368413685136861368713688136891369013691136921369313694136951369613697136981369913700137011370213703137041370513706137071370813709137101371113712137131371413715137161371713718137191372013721137221372313724137251372613727137281372913730137311373213733137341373513736137371373813739137401374113742137431374413745137461374713748137491375013751137521375313754137551375613757137581375913760137611376213763137641376513766137671376813769137701377113772137731377413775137761377713778137791378013781137821378313784137851378613787137881378913790137911379213793137941379513796137971379813799138001380113802138031380413805138061380713808138091381013811138121381313814138151381613817138181381913820138211382213823138241382513826138271382813829138301383113832138331383413835138361383713838138391384013841138421384313844138451384613847138481384913850138511385213853138541385513856138571385813859138601386113862138631386413865138661386713868138691387013871138721387313874138751387613877138781387913880138811388213883138841388513886138871388813889138901389113892138931389413895138961389713898138991390013901139021390313904139051390613907139081390913910139111391213913139141391513916139171391813919139201392113922139231392413925139261392713928139291393013931139321393313934139351393613937139381393913940139411394213943139441394513946139471394813949139501395113952139531395413955139561395713958139591396013961139621396313964139651396613967139681396913970139711397213973139741397513976139771397813979139801398113982139831398413985139861398713988139891399013991139921399313994139951399613997139981399914000140011400214003140041400514006140071400814009140101401114012140131401414015140161401714018140191402014021140221402314024140251402614027140281402914030140311403214033140341403514036140371403814039140401404114042140431404414045140461404714048140491405014051140521405314054140551405614057140581405914060140611406214063140641406514066140671406814069140701407114072140731407414075140761407714078140791408014081140821408314084140851408614087140881408914090140911409214093140941409514096140971409814099141001410114102141031410414105141061410714108141091411014111141121411314114141151411614117141181411914120141211412214123141241412514126141271412814129141301413114132141331413414135141361413714138141391414014141141421414314144141451414614147141481414914150141511415214153141541415514156141571415814159141601416114162141631416414165141661416714168141691417014171141721417314174141751417614177141781417914180141811418214183141841418514186141871418814189141901419114192141931419414195141961419714198141991420014201142021420314204142051420614207142081420914210142111421214213142141421514216142171421814219142201422114222142231422414225142261422714228142291423014231142321423314234142351423614237142381423914240142411424214243142441424514246142471424814249142501425114252142531425414255142561425714258142591426014261142621426314264142651426614267142681426914270142711427214273142741427514276142771427814279142801428114282142831428414285142861428714288142891429014291142921429314294142951429614297142981429914300143011430214303143041430514306143071430814309143101431114312143131431414315143161431714318143191432014321143221432314324143251432614327143281432914330143311433214333143341433514336143371433814339143401434114342143431434414345143461434714348143491435014351143521435314354143551435614357143581435914360143611436214363143641436514366143671436814369143701437114372143731437414375143761437714378143791438014381143821438314384143851438614387143881438914390143911439214393143941439514396143971439814399144001440114402144031440414405144061440714408144091441014411144121441314414144151441614417144181441914420144211442214423144241442514426144271442814429144301443114432144331443414435144361443714438144391444014441144421444314444144451444614447144481444914450144511445214453144541445514456144571445814459144601446114462144631446414465144661446714468144691447014471144721447314474144751447614477144781447914480144811448214483144841448514486144871448814489144901449114492144931449414495144961449714498144991450014501145021450314504145051450614507145081450914510145111451214513145141451514516145171451814519145201452114522145231452414525145261452714528145291453014531145321453314534145351453614537145381453914540145411454214543145441454514546145471454814549145501455114552145531455414555145561455714558145591456014561145621456314564145651456614567145681456914570145711457214573145741457514576145771457814579145801458114582145831458414585145861458714588145891459014591145921459314594145951459614597145981459914600146011460214603146041460514606146071460814609146101461114612146131461414615146161461714618146191462014621146221462314624146251462614627146281462914630146311463214633146341463514636146371463814639146401464114642146431464414645146461464714648146491465014651146521465314654146551465614657146581465914660146611466214663146641466514666146671466814669146701467114672146731467414675146761467714678146791468014681146821468314684146851468614687146881468914690146911469214693146941469514696146971469814699147001470114702147031470414705147061470714708147091471014711147121471314714147151471614717147181471914720147211472214723147241472514726147271472814729147301473114732147331473414735147361473714738147391474014741147421474314744147451474614747147481474914750147511475214753147541475514756147571475814759147601476114762147631476414765147661476714768147691477014771147721477314774147751477614777147781477914780147811478214783147841478514786147871478814789147901479114792147931479414795147961479714798147991480014801148021480314804148051480614807148081480914810148111481214813148141481514816148171481814819148201482114822148231482414825148261482714828148291483014831148321483314834148351483614837148381483914840148411484214843148441484514846148471484814849148501485114852148531485414855148561485714858148591486014861148621486314864148651486614867148681486914870148711487214873148741487514876148771487814879148801488114882148831488414885148861488714888148891489014891148921489314894148951489614897148981489914900149011490214903149041490514906149071490814909149101491114912149131491414915149161491714918149191492014921149221492314924149251492614927149281492914930149311493214933149341493514936149371493814939149401494114942149431494414945149461494714948149491495014951149521495314954149551495614957149581495914960149611496214963149641496514966149671496814969149701497114972149731497414975149761497714978149791498014981149821498314984149851498614987149881498914990149911499214993149941499514996149971499814999150001500115002150031500415005150061500715008150091501015011150121501315014150151501615017150181501915020150211502215023150241502515026150271502815029150301503115032150331503415035150361503715038150391504015041150421504315044150451504615047150481504915050150511505215053150541505515056150571505815059150601506115062150631506415065150661506715068150691507015071150721507315074150751507615077150781507915080150811508215083150841508515086150871508815089150901509115092150931509415095150961509715098150991510015101151021510315104151051510615107151081510915110151111511215113151141511515116151171511815119151201512115122151231512415125151261512715128151291513015131151321513315134151351513615137151381513915140151411514215143151441514515146151471514815149151501515115152151531515415155151561515715158151591516015161151621516315164151651516615167151681516915170151711517215173151741517515176151771517815179151801518115182151831518415185151861518715188151891519015191151921519315194151951519615197151981519915200152011520215203152041520515206152071520815209152101521115212152131521415215152161521715218152191522015221152221522315224152251522615227152281522915230152311523215233152341523515236152371523815239152401524115242152431524415245152461524715248152491525015251152521525315254152551525615257152581525915260152611526215263152641526515266152671526815269152701527115272152731527415275152761527715278152791528015281152821528315284152851528615287152881528915290152911529215293152941529515296152971529815299153001530115302153031530415305153061530715308153091531015311153121531315314153151531615317153181531915320153211532215323153241532515326153271532815329153301533115332153331533415335153361533715338153391534015341153421534315344153451534615347153481534915350153511535215353153541535515356153571535815359153601536115362153631536415365153661536715368153691537015371153721537315374153751537615377153781537915380153811538215383153841538515386153871538815389153901539115392153931539415395153961539715398153991540015401154021540315404154051540615407154081540915410154111541215413154141541515416154171541815419154201542115422154231542415425154261542715428154291543015431154321543315434154351543615437154381543915440154411544215443154441544515446154471544815449154501545115452154531545415455154561545715458154591546015461154621546315464154651546615467154681546915470154711547215473154741547515476154771547815479154801548115482154831548415485154861548715488154891549015491154921549315494154951549615497154981549915500155011550215503155041550515506155071550815509155101551115512155131551415515155161551715518155191552015521155221552315524155251552615527155281552915530155311553215533155341553515536155371553815539155401554115542155431554415545155461554715548155491555015551155521555315554155551555615557155581555915560155611556215563155641556515566155671556815569155701557115572155731557415575155761557715578155791558015581155821558315584155851558615587155881558915590155911559215593155941559515596155971559815599156001560115602156031560415605156061560715608156091561015611156121561315614156151561615617156181561915620156211562215623156241562515626156271562815629156301563115632156331563415635156361563715638156391564015641156421564315644156451564615647156481564915650156511565215653156541565515656156571565815659156601566115662156631566415665156661566715668156691567015671156721567315674156751567615677156781567915680156811568215683156841568515686156871568815689156901569115692156931569415695156961569715698156991570015701157021570315704157051570615707157081570915710157111571215713157141571515716157171571815719157201572115722157231572415725157261572715728157291573015731157321573315734157351573615737157381573915740157411574215743157441574515746157471574815749157501575115752157531575415755157561575715758157591576015761157621576315764157651576615767157681576915770157711577215773157741577515776157771577815779157801578115782157831578415785157861578715788157891579015791157921579315794157951579615797157981579915800158011580215803158041580515806158071580815809158101581115812158131581415815158161581715818158191582015821158221582315824158251582615827158281582915830158311583215833158341583515836158371583815839158401584115842158431584415845158461584715848158491585015851158521585315854158551585615857158581585915860158611586215863158641586515866158671586815869158701587115872158731587415875158761587715878158791588015881158821588315884158851588615887158881588915890158911589215893158941589515896158971589815899159001590115902159031590415905159061590715908159091591015911159121591315914159151591615917159181591915920159211592215923159241592515926159271592815929159301593115932159331593415935159361593715938159391594015941159421594315944159451594615947159481594915950159511595215953159541595515956159571595815959159601596115962159631596415965159661596715968159691597015971159721597315974159751597615977159781597915980159811598215983159841598515986159871598815989159901599115992159931599415995159961599715998159991600016001160021600316004160051600616007160081600916010160111601216013160141601516016160171601816019160201602116022160231602416025160261602716028160291603016031160321603316034160351603616037160381603916040160411604216043160441604516046160471604816049160501605116052160531605416055160561605716058160591606016061160621606316064160651606616067160681606916070160711607216073160741607516076160771607816079160801608116082160831608416085160861608716088160891609016091160921609316094160951609616097160981609916100161011610216103161041610516106161071610816109161101611116112161131611416115161161611716118161191612016121161221612316124161251612616127161281612916130161311613216133161341613516136161371613816139161401614116142161431614416145161461614716148161491615016151161521615316154161551615616157161581615916160161611616216163161641616516166161671616816169161701617116172161731617416175161761617716178161791618016181161821618316184161851618616187161881618916190161911619216193161941619516196161971619816199162001620116202162031620416205162061620716208162091621016211162121621316214162151621616217162181621916220162211622216223162241622516226162271622816229162301623116232162331623416235162361623716238162391624016241162421624316244162451624616247162481624916250162511625216253162541625516256162571625816259162601626116262162631626416265162661626716268162691627016271162721627316274162751627616277162781627916280162811628216283162841628516286162871628816289162901629116292162931629416295162961629716298162991630016301163021630316304163051630616307163081630916310163111631216313163141631516316163171631816319163201632116322163231632416325163261632716328163291633016331163321633316334163351633616337163381633916340163411634216343163441634516346163471634816349163501635116352163531635416355163561635716358163591636016361163621636316364163651636616367163681636916370163711637216373163741637516376163771637816379163801638116382163831638416385163861638716388163891639016391163921639316394163951639616397163981639916400164011640216403164041640516406164071640816409164101641116412164131641416415164161641716418164191642016421164221642316424164251642616427164281642916430164311643216433164341643516436164371643816439164401644116442164431644416445164461644716448164491645016451164521645316454164551645616457164581645916460164611646216463164641646516466164671646816469164701647116472164731647416475164761647716478164791648016481164821648316484164851648616487164881648916490164911649216493164941649516496164971649816499165001650116502165031650416505165061650716508165091651016511165121651316514165151651616517165181651916520165211652216523165241652516526165271652816529165301653116532165331653416535165361653716538165391654016541165421654316544165451654616547165481654916550165511655216553165541655516556165571655816559165601656116562165631656416565165661656716568165691657016571165721657316574165751657616577165781657916580165811658216583165841658516586165871658816589165901659116592165931659416595165961659716598165991660016601166021660316604166051660616607166081660916610166111661216613166141661516616166171661816619166201662116622166231662416625166261662716628166291663016631166321663316634166351663616637166381663916640166411664216643166441664516646166471664816649166501665116652166531665416655166561665716658166591666016661166621666316664166651666616667166681666916670166711667216673166741667516676166771667816679166801668116682166831668416685166861668716688166891669016691166921669316694166951669616697166981669916700167011670216703167041670516706167071670816709167101671116712167131671416715167161671716718167191672016721167221672316724167251672616727167281672916730167311673216733167341673516736167371673816739167401674116742167431674416745167461674716748167491675016751167521675316754167551675616757167581675916760167611676216763167641676516766167671676816769167701677116772167731677416775167761677716778167791678016781167821678316784167851678616787167881678916790167911679216793167941679516796167971679816799168001680116802168031680416805168061680716808168091681016811168121681316814168151681616817168181681916820168211682216823168241682516826168271682816829168301683116832168331683416835168361683716838168391684016841168421684316844168451684616847168481684916850168511685216853168541685516856168571685816859168601686116862168631686416865168661686716868168691687016871168721687316874168751687616877168781687916880168811688216883168841688516886168871688816889168901689116892168931689416895168961689716898168991690016901169021690316904169051690616907169081690916910169111691216913169141691516916169171691816919169201692116922169231692416925169261692716928169291693016931169321693316934169351693616937169381693916940169411694216943169441694516946169471694816949169501695116952169531695416955169561695716958169591696016961169621696316964169651696616967169681696916970169711697216973169741697516976169771697816979169801698116982169831698416985169861698716988169891699016991169921699316994169951699616997169981699917000170011700217003170041700517006170071700817009170101701117012170131701417015170161701717018170191702017021170221702317024170251702617027170281702917030170311703217033170341703517036170371703817039170401704117042170431704417045170461704717048170491705017051170521705317054170551705617057170581705917060170611706217063170641706517066170671706817069170701707117072170731707417075170761707717078170791708017081170821708317084170851708617087170881708917090170911709217093170941709517096170971709817099171001710117102171031710417105171061710717108171091711017111171121711317114171151711617117171181711917120171211712217123171241712517126171271712817129171301713117132171331713417135171361713717138171391714017141171421714317144171451714617147171481714917150171511715217153171541715517156171571715817159171601716117162171631716417165171661716717168171691717017171171721717317174171751717617177171781717917180171811718217183171841718517186171871718817189171901719117192171931719417195171961719717198171991720017201172021720317204172051720617207172081720917210172111721217213172141721517216172171721817219172201722117222172231722417225172261722717228172291723017231172321723317234172351723617237172381723917240172411724217243172441724517246172471724817249172501725117252172531725417255172561725717258172591726017261172621726317264172651726617267172681726917270172711727217273172741727517276172771727817279172801728117282172831728417285172861728717288172891729017291172921729317294172951729617297172981729917300173011730217303173041730517306173071730817309173101731117312173131731417315173161731717318173191732017321173221732317324173251732617327173281732917330173311733217333173341733517336173371733817339173401734117342173431734417345173461734717348173491735017351173521735317354173551735617357173581735917360173611736217363173641736517366173671736817369173701737117372173731737417375173761737717378173791738017381173821738317384173851738617387173881738917390173911739217393173941739517396173971739817399174001740117402174031740417405174061740717408174091741017411174121741317414174151741617417174181741917420174211742217423174241742517426174271742817429174301743117432174331743417435174361743717438174391744017441174421744317444174451744617447174481744917450174511745217453174541745517456174571745817459174601746117462174631746417465174661746717468174691747017471174721747317474174751747617477174781747917480174811748217483174841748517486174871748817489174901749117492174931749417495174961749717498174991750017501175021750317504175051750617507175081750917510175111751217513175141751517516175171751817519175201752117522175231752417525175261752717528175291753017531175321753317534175351753617537175381753917540175411754217543175441754517546175471754817549175501755117552175531755417555175561755717558175591756017561175621756317564175651756617567175681756917570175711757217573175741757517576175771757817579175801758117582175831758417585175861758717588175891759017591175921759317594175951759617597175981759917600176011760217603176041760517606176071760817609176101761117612176131761417615176161761717618176191762017621176221762317624176251762617627176281762917630176311763217633176341763517636176371763817639176401764117642176431764417645176461764717648176491765017651176521765317654176551765617657176581765917660176611766217663176641766517666176671766817669176701767117672176731767417675176761767717678176791768017681176821768317684176851768617687176881768917690176911769217693176941769517696176971769817699177001770117702177031770417705177061770717708177091771017711177121771317714177151771617717177181771917720177211772217723177241772517726177271772817729177301773117732177331773417735177361773717738177391774017741177421774317744177451774617747177481774917750177511775217753177541775517756177571775817759177601776117762177631776417765177661776717768177691777017771177721777317774177751777617777177781777917780177811778217783177841778517786177871778817789177901779117792177931779417795177961779717798177991780017801178021780317804178051780617807178081780917810178111781217813178141781517816178171781817819178201782117822178231782417825178261782717828178291783017831178321783317834178351783617837178381783917840178411784217843178441784517846178471784817849178501785117852178531785417855178561785717858178591786017861178621786317864178651786617867178681786917870178711787217873178741787517876178771787817879178801788117882178831788417885178861788717888178891789017891178921789317894178951789617897178981789917900179011790217903179041790517906179071790817909179101791117912179131791417915179161791717918179191792017921179221792317924179251792617927179281792917930179311793217933179341793517936179371793817939179401794117942179431794417945179461794717948179491795017951179521795317954179551795617957179581795917960179611796217963179641796517966179671796817969179701797117972179731797417975179761797717978179791798017981179821798317984179851798617987179881798917990179911799217993179941799517996179971799817999180001800118002180031800418005180061800718008180091801018011180121801318014180151801618017180181801918020180211802218023180241802518026180271802818029180301803118032180331803418035180361803718038180391804018041180421804318044180451804618047180481804918050180511805218053180541805518056180571805818059180601806118062180631806418065180661806718068180691807018071180721807318074180751807618077180781807918080180811808218083180841808518086180871808818089180901809118092180931809418095180961809718098180991810018101181021810318104181051810618107181081810918110181111811218113181141811518116181171811818119181201812118122181231812418125181261812718128181291813018131181321813318134181351813618137181381813918140181411814218143181441814518146181471814818149181501815118152181531815418155181561815718158181591816018161181621816318164181651816618167181681816918170181711817218173181741817518176181771817818179181801818118182181831818418185181861818718188181891819018191181921819318194181951819618197181981819918200182011820218203182041820518206182071820818209182101821118212182131821418215182161821718218182191822018221182221822318224182251822618227182281822918230182311823218233182341823518236182371823818239182401824118242182431824418245182461824718248182491825018251182521825318254182551825618257182581825918260182611826218263182641826518266182671826818269182701827118272182731827418275182761827718278182791828018281182821828318284182851828618287182881828918290182911829218293182941829518296182971829818299183001830118302183031830418305183061830718308183091831018311183121831318314183151831618317183181831918320183211832218323183241832518326183271832818329183301833118332183331833418335183361833718338183391834018341183421834318344183451834618347183481834918350183511835218353183541835518356183571835818359183601836118362183631836418365183661836718368183691837018371183721837318374183751837618377183781837918380183811838218383183841838518386183871838818389183901839118392183931839418395183961839718398183991840018401184021840318404184051840618407184081840918410184111841218413184141841518416184171841818419184201842118422184231842418425184261842718428184291843018431184321843318434184351843618437184381843918440184411844218443184441844518446184471844818449184501845118452184531845418455184561845718458184591846018461184621846318464184651846618467184681846918470184711847218473184741847518476184771847818479184801848118482184831848418485184861848718488184891849018491184921849318494184951849618497184981849918500185011850218503185041850518506185071850818509185101851118512185131851418515185161851718518185191852018521185221852318524185251852618527185281852918530185311853218533185341853518536185371853818539185401854118542185431854418545185461854718548185491855018551185521855318554185551855618557185581855918560185611856218563185641856518566185671856818569185701857118572185731857418575185761857718578185791858018581185821858318584185851858618587185881858918590185911859218593185941859518596185971859818599186001860118602186031860418605186061860718608186091861018611186121861318614186151861618617186181861918620186211862218623186241862518626186271862818629186301863118632186331863418635186361863718638186391864018641186421864318644186451864618647186481864918650186511865218653186541865518656186571865818659186601866118662186631866418665186661866718668186691867018671186721867318674186751867618677186781867918680186811868218683186841868518686186871868818689186901869118692186931869418695186961869718698186991870018701187021870318704187051870618707187081870918710187111871218713187141871518716187171871818719187201872118722187231872418725187261872718728187291873018731187321873318734187351873618737187381873918740187411874218743187441874518746187471874818749187501875118752187531875418755187561875718758187591876018761187621876318764187651876618767187681876918770187711877218773187741877518776187771877818779187801878118782187831878418785187861878718788187891879018791187921879318794187951879618797187981879918800188011880218803188041880518806188071880818809188101881118812188131881418815188161881718818188191882018821188221882318824188251882618827188281882918830188311883218833188341883518836188371883818839188401884118842188431884418845188461884718848188491885018851188521885318854188551885618857188581885918860188611886218863188641886518866188671886818869188701887118872188731887418875188761887718878188791888018881188821888318884188851888618887188881888918890188911889218893188941889518896188971889818899189001890118902189031890418905189061890718908189091891018911189121891318914189151891618917189181891918920189211892218923189241892518926189271892818929189301893118932189331893418935189361893718938189391894018941189421894318944189451894618947189481894918950189511895218953189541895518956189571895818959189601896118962189631896418965189661896718968189691897018971189721897318974189751897618977189781897918980189811898218983189841898518986189871898818989189901899118992189931899418995189961899718998189991900019001190021900319004190051900619007190081900919010190111901219013190141901519016190171901819019190201902119022190231902419025190261902719028190291903019031190321903319034190351903619037190381903919040190411904219043190441904519046190471904819049190501905119052190531905419055190561905719058190591906019061190621906319064190651906619067190681906919070190711907219073190741907519076190771907819079190801908119082190831908419085190861908719088190891909019091190921909319094190951909619097190981909919100191011910219103191041910519106191071910819109191101911119112191131911419115191161911719118191191912019121191221912319124191251912619127191281912919130191311913219133191341913519136191371913819139191401914119142191431914419145191461914719148191491915019151191521915319154191551915619157191581915919160191611916219163191641916519166191671916819169191701917119172191731917419175191761917719178191791918019181191821918319184191851918619187191881918919190191911919219193191941919519196191971919819199192001920119202192031920419205192061920719208192091921019211192121921319214192151921619217192181921919220192211922219223192241922519226192271922819229192301923119232192331923419235192361923719238192391924019241192421924319244192451924619247192481924919250192511925219253192541925519256192571925819259192601926119262192631926419265192661926719268192691927019271192721927319274192751927619277192781927919280192811928219283192841928519286192871928819289192901929119292192931929419295192961929719298192991930019301193021930319304193051930619307193081930919310193111931219313193141931519316193171931819319193201932119322193231932419325193261932719328193291933019331193321933319334193351933619337193381933919340193411934219343193441934519346193471934819349193501935119352193531935419355193561935719358193591936019361193621936319364193651936619367193681936919370193711937219373193741937519376193771937819379193801938119382193831938419385193861938719388193891939019391193921939319394193951939619397193981939919400194011940219403194041940519406194071940819409194101941119412194131941419415194161941719418194191942019421194221942319424194251942619427194281942919430194311943219433194341943519436194371943819439194401944119442194431944419445194461944719448194491945019451194521945319454194551945619457194581945919460194611946219463194641946519466194671946819469194701947119472194731947419475194761947719478194791948019481194821948319484194851948619487194881948919490194911949219493194941949519496194971949819499195001950119502195031950419505195061950719508195091951019511195121951319514195151951619517195181951919520195211952219523195241952519526195271952819529195301953119532195331953419535195361953719538195391954019541195421954319544195451954619547195481954919550195511955219553195541955519556195571955819559195601956119562195631956419565195661956719568195691957019571195721957319574195751957619577195781957919580195811958219583195841958519586195871958819589195901959119592195931959419595195961959719598195991960019601196021960319604196051960619607196081960919610196111961219613196141961519616196171961819619196201962119622196231962419625196261962719628196291963019631196321963319634196351963619637196381963919640196411964219643196441964519646196471964819649196501965119652196531965419655196561965719658196591966019661196621966319664196651966619667196681966919670196711967219673196741967519676196771967819679196801968119682196831968419685196861968719688196891969019691196921969319694196951969619697196981969919700197011970219703197041970519706197071970819709197101971119712197131971419715197161971719718197191972019721197221972319724197251972619727197281972919730197311973219733197341973519736197371973819739197401974119742197431974419745197461974719748197491975019751197521975319754197551975619757197581975919760197611976219763197641976519766197671976819769197701977119772197731977419775197761977719778197791978019781197821978319784197851978619787197881978919790197911979219793197941979519796197971979819799198001980119802198031980419805198061980719808198091981019811198121981319814198151981619817198181981919820198211982219823198241982519826198271982819829198301983119832198331983419835198361983719838198391984019841198421984319844198451984619847198481984919850198511985219853198541985519856198571985819859198601986119862198631986419865198661986719868198691987019871198721987319874198751987619877198781987919880198811988219883198841988519886198871988819889198901989119892198931989419895198961989719898198991990019901199021990319904199051990619907199081990919910199111991219913199141991519916199171991819919199201992119922199231992419925199261992719928199291993019931199321993319934199351993619937199381993919940199411994219943199441994519946199471994819949199501995119952199531995419955199561995719958199591996019961199621996319964199651996619967199681996919970199711997219973199741997519976199771997819979199801998119982199831998419985199861998719988199891999019991199921999319994199951999619997199981999920000200012000220003200042000520006200072000820009200102001120012200132001420015200162001720018200192002020021200222002320024200252002620027200282002920030200312003220033200342003520036200372003820039200402004120042200432004420045200462004720048200492005020051200522005320054200552005620057200582005920060200612006220063200642006520066200672006820069200702007120072200732007420075200762007720078200792008020081200822008320084200852008620087200882008920090200912009220093200942009520096200972009820099201002010120102201032010420105201062010720108201092011020111201122011320114201152011620117201182011920120201212012220123201242012520126201272012820129201302013120132201332013420135201362013720138201392014020141201422014320144201452014620147201482014920150201512015220153201542015520156201572015820159201602016120162201632016420165201662016720168201692017020171201722017320174201752017620177201782017920180201812018220183201842018520186201872018820189201902019120192201932019420195201962019720198201992020020201202022020320204202052020620207202082020920210202112021220213202142021520216202172021820219202202022120222202232022420225202262022720228202292023020231202322023320234202352023620237202382023920240202412024220243202442024520246202472024820249202502025120252202532025420255202562025720258202592026020261202622026320264202652026620267202682026920270202712027220273202742027520276202772027820279202802028120282202832028420285202862028720288202892029020291202922029320294202952029620297202982029920300203012030220303203042030520306203072030820309203102031120312203132031420315203162031720318203192032020321203222032320324203252032620327203282032920330203312033220333203342033520336203372033820339203402034120342203432034420345203462034720348203492035020351203522035320354203552035620357203582035920360203612036220363203642036520366203672036820369203702037120372203732037420375203762037720378203792038020381203822038320384203852038620387203882038920390203912039220393203942039520396203972039820399204002040120402204032040420405204062040720408204092041020411204122041320414204152041620417204182041920420204212042220423204242042520426204272042820429204302043120432204332043420435204362043720438204392044020441204422044320444204452044620447204482044920450204512045220453204542045520456204572045820459204602046120462204632046420465204662046720468204692047020471204722047320474204752047620477204782047920480204812048220483204842048520486204872048820489204902049120492204932049420495204962049720498204992050020501205022050320504205052050620507205082050920510205112051220513205142051520516205172051820519205202052120522205232052420525205262052720528205292053020531205322053320534205352053620537205382053920540205412054220543205442054520546205472054820549205502055120552205532055420555205562055720558205592056020561205622056320564205652056620567205682056920570205712057220573205742057520576205772057820579205802058120582205832058420585205862058720588205892059020591205922059320594205952059620597205982059920600206012060220603206042060520606206072060820609206102061120612206132061420615206162061720618206192062020621206222062320624206252062620627206282062920630206312063220633206342063520636206372063820639206402064120642206432064420645206462064720648206492065020651206522065320654206552065620657206582065920660206612066220663206642066520666206672066820669206702067120672206732067420675206762067720678206792068020681206822068320684206852068620687206882068920690206912069220693206942069520696206972069820699207002070120702207032070420705207062070720708207092071020711207122071320714207152071620717207182071920720207212072220723207242072520726207272072820729207302073120732207332073420735207362073720738207392074020741207422074320744207452074620747207482074920750207512075220753207542075520756207572075820759207602076120762207632076420765207662076720768207692077020771207722077320774207752077620777207782077920780207812078220783207842078520786207872078820789207902079120792207932079420795207962079720798207992080020801208022080320804208052080620807208082080920810208112081220813208142081520816208172081820819208202082120822208232082420825208262082720828208292083020831208322083320834208352083620837208382083920840208412084220843208442084520846208472084820849208502085120852208532085420855208562085720858208592086020861208622086320864208652086620867208682086920870208712087220873208742087520876208772087820879208802088120882208832088420885208862088720888208892089020891208922089320894208952089620897208982089920900209012090220903209042090520906209072090820909209102091120912209132091420915209162091720918209192092020921209222092320924209252092620927209282092920930209312093220933209342093520936209372093820939209402094120942209432094420945209462094720948209492095020951209522095320954209552095620957209582095920960209612096220963209642096520966209672096820969209702097120972209732097420975209762097720978209792098020981209822098320984209852098620987209882098920990209912099220993209942099520996209972099820999210002100121002210032100421005210062100721008210092101021011210122101321014210152101621017210182101921020210212102221023210242102521026210272102821029210302103121032210332103421035210362103721038210392104021041210422104321044210452104621047210482104921050210512105221053210542105521056210572105821059210602106121062210632106421065210662106721068210692107021071210722107321074210752107621077210782107921080210812108221083210842108521086210872108821089210902109121092210932109421095210962109721098210992110021101211022110321104211052110621107211082110921110211112111221113211142111521116211172111821119211202112121122211232112421125211262112721128211292113021131211322113321134211352113621137211382113921140211412114221143211442114521146211472114821149211502115121152211532115421155211562115721158211592116021161211622116321164211652116621167211682116921170211712117221173211742117521176211772117821179211802118121182211832118421185211862118721188211892119021191211922119321194211952119621197211982119921200212012120221203212042120521206212072120821209212102121121212212132121421215212162121721218212192122021221212222122321224212252122621227212282122921230212312123221233212342123521236212372123821239212402124121242212432124421245212462124721248212492125021251212522125321254212552125621257212582125921260212612126221263212642126521266212672126821269212702127121272212732127421275212762127721278212792128021281212822128321284212852128621287212882128921290212912129221293212942129521296212972129821299213002130121302213032130421305213062130721308213092131021311213122131321314213152131621317213182131921320213212132221323213242132521326213272132821329213302133121332213332133421335213362133721338213392134021341213422134321344213452134621347213482134921350213512135221353213542135521356213572135821359213602136121362213632136421365213662136721368213692137021371213722137321374213752137621377213782137921380213812138221383213842138521386213872138821389213902139121392213932139421395213962139721398213992140021401214022140321404214052140621407214082140921410214112141221413214142141521416214172141821419214202142121422214232142421425214262142721428214292143021431214322143321434214352143621437214382143921440214412144221443214442144521446214472144821449214502145121452214532145421455214562145721458214592146021461214622146321464214652146621467214682146921470214712147221473214742147521476214772147821479214802148121482214832148421485214862148721488214892149021491214922149321494214952149621497214982149921500215012150221503215042150521506215072150821509215102151121512215132151421515215162151721518215192152021521215222152321524215252152621527215282152921530215312153221533215342153521536215372153821539215402154121542215432154421545215462154721548215492155021551215522155321554215552155621557215582155921560215612156221563215642156521566215672156821569215702157121572215732157421575215762157721578215792158021581215822158321584215852158621587215882158921590215912159221593215942159521596215972159821599216002160121602216032160421605216062160721608216092161021611216122161321614216152161621617216182161921620216212162221623216242162521626216272162821629216302163121632216332163421635216362163721638216392164021641216422164321644216452164621647216482164921650216512165221653216542165521656216572165821659216602166121662216632166421665216662166721668216692167021671216722167321674216752167621677216782167921680216812168221683216842168521686216872168821689216902169121692216932169421695216962169721698216992170021701217022170321704217052170621707217082170921710217112171221713217142171521716217172171821719217202172121722217232172421725217262172721728217292173021731217322173321734217352173621737217382173921740217412174221743217442174521746217472174821749217502175121752217532175421755217562175721758217592176021761217622176321764217652176621767217682176921770217712177221773217742177521776217772177821779217802178121782217832178421785217862178721788217892179021791217922179321794217952179621797217982179921800218012180221803218042180521806218072180821809218102181121812218132181421815218162181721818218192182021821218222182321824218252182621827218282182921830218312183221833218342183521836218372183821839218402184121842218432184421845218462184721848218492185021851218522185321854218552185621857218582185921860218612186221863218642186521866218672186821869218702187121872218732187421875218762187721878218792188021881218822188321884218852188621887218882188921890218912189221893218942189521896218972189821899219002190121902219032190421905219062190721908219092191021911219122191321914219152191621917219182191921920219212192221923219242192521926219272192821929219302193121932219332193421935219362193721938219392194021941219422194321944219452194621947219482194921950219512195221953219542195521956219572195821959219602196121962219632196421965219662196721968219692197021971219722197321974219752197621977219782197921980219812198221983219842198521986219872198821989219902199121992219932199421995219962199721998219992200022001220022200322004220052200622007220082200922010220112201222013220142201522016220172201822019220202202122022220232202422025220262202722028220292203022031220322203322034220352203622037220382203922040220412204222043220442204522046220472204822049220502205122052220532205422055220562205722058220592206022061220622206322064220652206622067220682206922070220712207222073220742207522076220772207822079220802208122082220832208422085220862208722088220892209022091220922209322094220952209622097220982209922100221012210222103221042210522106221072210822109221102211122112221132211422115221162211722118221192212022121221222212322124221252212622127221282212922130221312213222133221342213522136221372213822139221402214122142221432214422145221462214722148221492215022151221522215322154221552215622157221582215922160221612216222163221642216522166221672216822169221702217122172221732217422175221762217722178221792218022181221822218322184221852218622187221882218922190221912219222193221942219522196221972219822199222002220122202222032220422205222062220722208222092221022211222122221322214222152221622217222182221922220222212222222223222242222522226222272222822229222302223122232222332223422235222362223722238222392224022241222422224322244222452224622247222482224922250222512225222253222542225522256222572225822259222602226122262222632226422265222662226722268222692227022271222722227322274222752227622277222782227922280222812228222283222842228522286222872228822289222902229122292222932229422295222962229722298222992230022301223022230322304223052230622307223082230922310223112231222313223142231522316223172231822319223202232122322223232232422325223262232722328223292233022331223322233322334223352233622337223382233922340223412234222343223442234522346223472234822349223502235122352223532235422355223562235722358223592236022361223622236322364223652236622367223682236922370223712237222373223742237522376223772237822379223802238122382223832238422385223862238722388223892239022391223922239322394223952239622397223982239922400224012240222403224042240522406224072240822409224102241122412224132241422415224162241722418224192242022421224222242322424224252242622427224282242922430224312243222433224342243522436224372243822439224402244122442224432244422445224462244722448224492245022451224522245322454224552245622457224582245922460224612246222463224642246522466224672246822469224702247122472224732247422475224762247722478224792248022481224822248322484224852248622487224882248922490224912249222493224942249522496224972249822499225002250122502225032250422505225062250722508225092251022511225122251322514225152251622517225182251922520225212252222523225242252522526225272252822529225302253122532225332253422535225362253722538225392254022541225422254322544225452254622547225482254922550225512255222553225542255522556225572255822559225602256122562225632256422565225662256722568225692257022571225722257322574225752257622577225782257922580225812258222583225842258522586225872258822589225902259122592225932259422595225962259722598225992260022601226022260322604226052260622607226082260922610226112261222613226142261522616226172261822619226202262122622226232262422625226262262722628226292263022631226322263322634226352263622637226382263922640226412264222643226442264522646226472264822649226502265122652226532265422655226562265722658226592266022661226622266322664226652266622667226682266922670226712267222673226742267522676226772267822679226802268122682226832268422685226862268722688226892269022691226922269322694226952269622697226982269922700227012270222703227042270522706227072270822709227102271122712227132271422715227162271722718227192272022721227222272322724227252272622727227282272922730227312273222733227342273522736227372273822739227402274122742227432274422745227462274722748227492275022751227522275322754227552275622757227582275922760227612276222763227642276522766227672276822769227702277122772227732277422775227762277722778227792278022781227822278322784227852278622787227882278922790227912279222793227942279522796227972279822799228002280122802228032280422805228062280722808228092281022811228122281322814228152281622817228182281922820228212282222823228242282522826228272282822829228302283122832228332283422835228362283722838228392284022841228422284322844228452284622847228482284922850228512285222853228542285522856228572285822859228602286122862228632286422865228662286722868228692287022871228722287322874228752287622877228782287922880228812288222883228842288522886228872288822889228902289122892228932289422895228962289722898228992290022901229022290322904229052290622907229082290922910229112291222913229142291522916229172291822919229202292122922229232292422925229262292722928229292293022931229322293322934229352293622937229382293922940229412294222943229442294522946229472294822949229502295122952229532295422955229562295722958229592296022961229622296322964229652296622967229682296922970229712297222973229742297522976229772297822979229802298122982229832298422985229862298722988229892299022991229922299322994229952299622997229982299923000230012300223003230042300523006230072300823009230102301123012230132301423015230162301723018230192302023021230222302323024230252302623027230282302923030230312303223033230342303523036230372303823039230402304123042230432304423045230462304723048230492305023051230522305323054230552305623057230582305923060230612306223063230642306523066230672306823069230702307123072230732307423075230762307723078230792308023081230822308323084230852308623087230882308923090230912309223093230942309523096230972309823099231002310123102231032310423105231062310723108231092311023111231122311323114231152311623117231182311923120231212312223123231242312523126231272312823129231302313123132231332313423135231362313723138231392314023141231422314323144231452314623147231482314923150231512315223153231542315523156231572315823159231602316123162231632316423165231662316723168231692317023171231722317323174231752317623177231782317923180231812318223183231842318523186231872318823189231902319123192231932319423195231962319723198231992320023201232022320323204232052320623207232082320923210232112321223213232142321523216232172321823219232202322123222232232322423225232262322723228232292323023231232322323323234232352323623237232382323923240232412324223243232442324523246232472324823249232502325123252232532325423255232562325723258232592326023261232622326323264232652326623267232682326923270232712327223273232742327523276232772327823279232802328123282232832328423285232862328723288232892329023291232922329323294232952329623297232982329923300233012330223303233042330523306233072330823309233102331123312233132331423315233162331723318233192332023321233222332323324233252332623327233282332923330233312333223333233342333523336233372333823339233402334123342233432334423345233462334723348233492335023351233522335323354233552335623357233582335923360233612336223363233642336523366233672336823369233702337123372233732337423375233762337723378233792338023381233822338323384233852338623387233882338923390233912339223393233942339523396233972339823399234002340123402234032340423405234062340723408234092341023411234122341323414234152341623417234182341923420234212342223423234242342523426234272342823429234302343123432234332343423435234362343723438234392344023441234422344323444234452344623447234482344923450234512345223453234542345523456234572345823459234602346123462234632346423465234662346723468234692347023471234722347323474234752347623477234782347923480234812348223483234842348523486234872348823489234902349123492234932349423495234962349723498234992350023501235022350323504235052350623507235082350923510235112351223513235142351523516235172351823519235202352123522235232352423525235262352723528235292353023531235322353323534235352353623537235382353923540235412354223543235442354523546235472354823549235502355123552235532355423555235562355723558235592356023561235622356323564235652356623567235682356923570235712357223573235742357523576235772357823579235802358123582235832358423585235862358723588235892359023591235922359323594235952359623597235982359923600236012360223603236042360523606236072360823609236102361123612236132361423615236162361723618236192362023621236222362323624236252362623627236282362923630236312363223633236342363523636236372363823639236402364123642236432364423645236462364723648236492365023651236522365323654236552365623657236582365923660236612366223663236642366523666236672366823669236702367123672236732367423675236762367723678236792368023681236822368323684236852368623687236882368923690236912369223693236942369523696236972369823699237002370123702237032370423705237062370723708237092371023711237122371323714237152371623717237182371923720237212372223723237242372523726237272372823729237302373123732237332373423735237362373723738237392374023741237422374323744237452374623747237482374923750237512375223753237542375523756237572375823759237602376123762237632376423765237662376723768237692377023771237722377323774237752377623777237782377923780237812378223783237842378523786237872378823789237902379123792237932379423795237962379723798237992380023801238022380323804238052380623807238082380923810238112381223813238142381523816238172381823819238202382123822238232382423825238262382723828238292383023831238322383323834238352383623837238382383923840238412384223843238442384523846238472384823849238502385123852238532385423855238562385723858238592386023861238622386323864238652386623867238682386923870238712387223873238742387523876238772387823879238802388123882238832388423885238862388723888238892389023891238922389323894238952389623897238982389923900239012390223903239042390523906239072390823909239102391123912239132391423915239162391723918239192392023921239222392323924239252392623927239282392923930239312393223933239342393523936239372393823939239402394123942239432394423945239462394723948239492395023951239522395323954239552395623957239582395923960239612396223963239642396523966239672396823969239702397123972239732397423975239762397723978239792398023981239822398323984239852398623987239882398923990239912399223993239942399523996239972399823999240002400124002240032400424005240062400724008240092401024011240122401324014240152401624017240182401924020240212402224023240242402524026240272402824029240302403124032240332403424035240362403724038240392404024041240422404324044240452404624047240482404924050240512405224053240542405524056240572405824059240602406124062240632406424065240662406724068240692407024071240722407324074240752407624077240782407924080240812408224083240842408524086240872408824089240902409124092240932409424095240962409724098240992410024101241022410324104241052410624107241082410924110241112411224113241142411524116241172411824119241202412124122241232412424125241262412724128241292413024131241322413324134241352413624137241382413924140241412414224143241442414524146241472414824149241502415124152241532415424155241562415724158241592416024161241622416324164241652416624167241682416924170241712417224173241742417524176241772417824179241802418124182241832418424185241862418724188241892419024191241922419324194241952419624197241982419924200242012420224203242042420524206242072420824209242102421124212242132421424215242162421724218242192422024221242222422324224242252422624227242282422924230242312423224233242342423524236242372423824239242402424124242242432424424245242462424724248242492425024251242522425324254242552425624257242582425924260242612426224263242642426524266242672426824269242702427124272242732427424275242762427724278242792428024281242822428324284242852428624287242882428924290242912429224293242942429524296242972429824299243002430124302243032430424305243062430724308243092431024311243122431324314243152431624317243182431924320243212432224323243242432524326243272432824329243302433124332243332433424335243362433724338243392434024341243422434324344243452434624347243482434924350243512435224353243542435524356243572435824359243602436124362243632436424365243662436724368243692437024371243722437324374243752437624377243782437924380243812438224383243842438524386243872438824389243902439124392243932439424395243962439724398243992440024401244022440324404244052440624407244082440924410244112441224413244142441524416244172441824419244202442124422244232442424425244262442724428244292443024431244322443324434244352443624437244382443924440244412444224443244442444524446244472444824449244502445124452244532445424455244562445724458244592446024461244622446324464244652446624467244682446924470244712447224473244742447524476244772447824479244802448124482244832448424485244862448724488244892449024491244922449324494244952449624497244982449924500245012450224503245042450524506245072450824509245102451124512245132451424515245162451724518245192452024521245222452324524245252452624527245282452924530245312453224533245342453524536245372453824539245402454124542245432454424545245462454724548245492455024551245522455324554245552455624557245582455924560245612456224563245642456524566245672456824569245702457124572245732457424575245762457724578245792458024581245822458324584245852458624587245882458924590245912459224593245942459524596245972459824599246002460124602246032460424605246062460724608246092461024611246122461324614246152461624617246182461924620246212462224623246242462524626246272462824629246302463124632246332463424635246362463724638246392464024641246422464324644246452464624647246482464924650246512465224653246542465524656246572465824659246602466124662246632466424665246662466724668246692467024671246722467324674246752467624677246782467924680246812468224683246842468524686246872468824689246902469124692246932469424695246962469724698246992470024701247022470324704247052470624707247082470924710247112471224713247142471524716247172471824719247202472124722247232472424725247262472724728247292473024731247322473324734247352473624737247382473924740247412474224743247442474524746247472474824749247502475124752247532475424755247562475724758247592476024761247622476324764247652476624767247682476924770247712477224773247742477524776247772477824779247802478124782247832478424785247862478724788247892479024791247922479324794247952479624797247982479924800248012480224803248042480524806248072480824809248102481124812248132481424815248162481724818248192482024821248222482324824248252482624827248282482924830248312483224833248342483524836248372483824839248402484124842248432484424845248462484724848248492485024851248522485324854248552485624857248582485924860248612486224863248642486524866248672486824869248702487124872248732487424875248762487724878248792488024881248822488324884248852488624887248882488924890248912489224893248942489524896248972489824899249002490124902249032490424905249062490724908249092491024911249122491324914249152491624917249182491924920249212492224923249242492524926249272492824929249302493124932249332493424935249362493724938249392494024941249422494324944249452494624947249482494924950249512495224953249542495524956249572495824959249602496124962249632496424965249662496724968249692497024971249722497324974249752497624977249782497924980249812498224983249842498524986249872498824989249902499124992249932499424995249962499724998249992500025001250022500325004250052500625007250082500925010250112501225013250142501525016250172501825019250202502125022250232502425025250262502725028250292503025031250322503325034250352503625037250382503925040250412504225043250442504525046250472504825049250502505125052250532505425055250562505725058250592506025061250622506325064250652506625067250682506925070250712507225073250742507525076250772507825079250802508125082250832508425085250862508725088250892509025091250922509325094250952509625097250982509925100251012510225103251042510525106251072510825109251102511125112251132511425115251162511725118251192512025121251222512325124251252512625127251282512925130251312513225133251342513525136251372513825139251402514125142251432514425145251462514725148251492515025151251522515325154251552515625157251582515925160251612516225163251642516525166251672516825169251702517125172251732517425175251762517725178251792518025181251822518325184251852518625187251882518925190251912519225193251942519525196251972519825199252002520125202252032520425205252062520725208252092521025211252122521325214252152521625217252182521925220252212522225223252242522525226252272522825229252302523125232252332523425235252362523725238252392524025241252422524325244252452524625247252482524925250252512525225253252542525525256252572525825259252602526125262252632526425265252662526725268252692527025271252722527325274252752527625277252782527925280252812528225283252842528525286252872528825289252902529125292252932529425295252962529725298252992530025301253022530325304253052530625307253082530925310253112531225313253142531525316253172531825319253202532125322253232532425325253262532725328253292533025331253322533325334253352533625337253382533925340253412534225343253442534525346253472534825349253502535125352253532535425355253562535725358253592536025361253622536325364253652536625367253682536925370253712537225373253742537525376253772537825379253802538125382253832538425385253862538725388253892539025391253922539325394253952539625397253982539925400254012540225403254042540525406254072540825409254102541125412254132541425415254162541725418254192542025421254222542325424254252542625427254282542925430254312543225433254342543525436254372543825439254402544125442254432544425445254462544725448254492545025451254522545325454254552545625457254582545925460254612546225463254642546525466254672546825469254702547125472254732547425475254762547725478254792548025481254822548325484254852548625487254882548925490254912549225493254942549525496254972549825499255002550125502255032550425505255062550725508255092551025511255122551325514255152551625517255182551925520255212552225523255242552525526255272552825529255302553125532255332553425535255362553725538255392554025541255422554325544255452554625547255482554925550255512555225553255542555525556255572555825559255602556125562255632556425565255662556725568255692557025571255722557325574255752557625577255782557925580255812558225583255842558525586255872558825589255902559125592255932559425595255962559725598255992560025601256022560325604256052560625607256082560925610256112561225613256142561525616256172561825619256202562125622256232562425625256262562725628256292563025631256322563325634256352563625637256382563925640256412564225643256442564525646256472564825649256502565125652256532565425655256562565725658256592566025661256622566325664256652566625667256682566925670256712567225673256742567525676256772567825679256802568125682256832568425685256862568725688256892569025691256922569325694256952569625697256982569925700257012570225703257042570525706257072570825709257102571125712257132571425715257162571725718257192572025721257222572325724257252572625727257282572925730257312573225733257342573525736257372573825739257402574125742257432574425745257462574725748257492575025751257522575325754257552575625757257582575925760257612576225763257642576525766257672576825769257702577125772257732577425775257762577725778257792578025781257822578325784257852578625787257882578925790257912579225793257942579525796257972579825799258002580125802258032580425805258062580725808258092581025811258122581325814258152581625817258182581925820258212582225823258242582525826258272582825829258302583125832258332583425835258362583725838258392584025841258422584325844258452584625847258482584925850258512585225853258542585525856258572585825859258602586125862258632586425865258662586725868258692587025871258722587325874258752587625877258782587925880258812588225883258842588525886258872588825889258902589125892258932589425895258962589725898258992590025901259022590325904259052590625907259082590925910259112591225913259142591525916259172591825919259202592125922259232592425925259262592725928259292593025931259322593325934259352593625937259382593925940259412594225943259442594525946259472594825949259502595125952259532595425955259562595725958259592596025961259622596325964259652596625967259682596925970259712597225973259742597525976259772597825979259802598125982259832598425985259862598725988259892599025991259922599325994259952599625997259982599926000260012600226003260042600526006260072600826009260102601126012260132601426015260162601726018260192602026021260222602326024260252602626027260282602926030260312603226033260342603526036260372603826039260402604126042260432604426045260462604726048260492605026051260522605326054260552605626057260582605926060260612606226063260642606526066260672606826069260702607126072260732607426075260762607726078260792608026081260822608326084260852608626087260882608926090260912609226093260942609526096260972609826099261002610126102261032610426105261062610726108261092611026111261122611326114261152611626117261182611926120261212612226123261242612526126261272612826129261302613126132261332613426135261362613726138261392614026141261422614326144261452614626147261482614926150261512615226153261542615526156261572615826159261602616126162261632616426165261662616726168261692617026171261722617326174261752617626177261782617926180261812618226183261842618526186261872618826189261902619126192261932619426195261962619726198261992620026201262022620326204262052620626207262082620926210262112621226213262142621526216262172621826219262202622126222262232622426225262262622726228262292623026231262322623326234262352623626237262382623926240262412624226243262442624526246262472624826249262502625126252262532625426255262562625726258262592626026261262622626326264262652626626267262682626926270262712627226273262742627526276262772627826279262802628126282262832628426285262862628726288262892629026291262922629326294262952629626297262982629926300263012630226303263042630526306263072630826309263102631126312263132631426315263162631726318263192632026321263222632326324263252632626327263282632926330263312633226333263342633526336263372633826339263402634126342263432634426345263462634726348263492635026351263522635326354263552635626357263582635926360263612636226363263642636526366263672636826369263702637126372263732637426375263762637726378263792638026381263822638326384263852638626387263882638926390263912639226393263942639526396263972639826399264002640126402264032640426405264062640726408264092641026411264122641326414264152641626417264182641926420264212642226423264242642526426264272642826429264302643126432264332643426435264362643726438264392644026441264422644326444264452644626447264482644926450264512645226453264542645526456264572645826459264602646126462264632646426465264662646726468264692647026471264722647326474264752647626477264782647926480264812648226483264842648526486264872648826489264902649126492264932649426495264962649726498264992650026501265022650326504265052650626507265082650926510265112651226513265142651526516265172651826519265202652126522265232652426525265262652726528265292653026531265322653326534265352653626537265382653926540265412654226543265442654526546265472654826549265502655126552265532655426555265562655726558265592656026561265622656326564265652656626567265682656926570265712657226573265742657526576265772657826579265802658126582265832658426585265862658726588265892659026591265922659326594265952659626597265982659926600266012660226603266042660526606266072660826609266102661126612266132661426615266162661726618266192662026621266222662326624266252662626627266282662926630266312663226633266342663526636266372663826639266402664126642266432664426645266462664726648266492665026651266522665326654266552665626657266582665926660266612666226663266642666526666266672666826669266702667126672266732667426675266762667726678266792668026681266822668326684266852668626687266882668926690266912669226693266942669526696266972669826699267002670126702267032670426705267062670726708267092671026711267122671326714267152671626717267182671926720267212672226723267242672526726267272672826729267302673126732267332673426735267362673726738267392674026741267422674326744267452674626747267482674926750267512675226753267542675526756267572675826759267602676126762267632676426765267662676726768267692677026771267722677326774267752677626777267782677926780267812678226783267842678526786267872678826789267902679126792267932679426795267962679726798267992680026801268022680326804268052680626807268082680926810268112681226813268142681526816268172681826819268202682126822268232682426825268262682726828268292683026831268322683326834268352683626837268382683926840268412684226843268442684526846268472684826849268502685126852268532685426855268562685726858268592686026861268622686326864268652686626867268682686926870268712687226873268742687526876268772687826879268802688126882268832688426885268862688726888268892689026891268922689326894268952689626897268982689926900269012690226903269042690526906269072690826909269102691126912269132691426915269162691726918269192692026921269222692326924269252692626927269282692926930269312693226933269342693526936269372693826939269402694126942269432694426945269462694726948269492695026951269522695326954269552695626957269582695926960269612696226963269642696526966269672696826969269702697126972269732697426975269762697726978269792698026981269822698326984269852698626987269882698926990269912699226993269942699526996269972699826999270002700127002270032700427005270062700727008270092701027011270122701327014270152701627017270182701927020270212702227023270242702527026270272702827029270302703127032270332703427035270362703727038270392704027041270422704327044270452704627047270482704927050270512705227053270542705527056270572705827059270602706127062270632706427065270662706727068270692707027071270722707327074270752707627077270782707927080270812708227083270842708527086270872708827089270902709127092270932709427095270962709727098270992710027101271022710327104271052710627107271082710927110271112711227113271142711527116271172711827119271202712127122271232712427125271262712727128271292713027131271322713327134271352713627137271382713927140271412714227143271442714527146271472714827149271502715127152271532715427155271562715727158271592716027161271622716327164271652716627167271682716927170271712717227173271742717527176271772717827179271802718127182271832718427185271862718727188271892719027191271922719327194271952719627197271982719927200272012720227203272042720527206272072720827209272102721127212272132721427215272162721727218272192722027221272222722327224272252722627227272282722927230272312723227233272342723527236272372723827239272402724127242272432724427245272462724727248272492725027251272522725327254272552725627257272582725927260272612726227263272642726527266272672726827269272702727127272272732727427275272762727727278272792728027281272822728327284272852728627287272882728927290272912729227293272942729527296272972729827299273002730127302273032730427305273062730727308273092731027311273122731327314273152731627317273182731927320273212732227323273242732527326273272732827329273302733127332273332733427335273362733727338273392734027341273422734327344273452734627347273482734927350273512735227353273542735527356273572735827359273602736127362273632736427365273662736727368273692737027371273722737327374273752737627377273782737927380273812738227383273842738527386273872738827389273902739127392273932739427395273962739727398273992740027401274022740327404274052740627407274082740927410274112741227413274142741527416274172741827419274202742127422274232742427425274262742727428274292743027431274322743327434274352743627437274382743927440274412744227443274442744527446274472744827449274502745127452274532745427455274562745727458274592746027461274622746327464274652746627467274682746927470274712747227473274742747527476274772747827479274802748127482274832748427485274862748727488274892749027491274922749327494274952749627497274982749927500275012750227503275042750527506275072750827509275102751127512275132751427515275162751727518275192752027521275222752327524275252752627527275282752927530275312753227533275342753527536275372753827539275402754127542275432754427545275462754727548275492755027551275522755327554275552755627557275582755927560275612756227563275642756527566275672756827569275702757127572275732757427575275762757727578275792758027581275822758327584275852758627587275882758927590275912759227593275942759527596275972759827599276002760127602276032760427605276062760727608276092761027611276122761327614276152761627617276182761927620276212762227623276242762527626276272762827629276302763127632276332763427635276362763727638276392764027641276422764327644276452764627647276482764927650276512765227653276542765527656276572765827659276602766127662276632766427665276662766727668276692767027671276722767327674276752767627677276782767927680276812768227683276842768527686276872768827689276902769127692276932769427695276962769727698276992770027701277022770327704277052770627707277082770927710277112771227713277142771527716277172771827719277202772127722277232772427725277262772727728277292773027731277322773327734277352773627737277382773927740277412774227743277442774527746277472774827749277502775127752277532775427755277562775727758277592776027761277622776327764277652776627767277682776927770277712777227773277742777527776277772777827779277802778127782277832778427785277862778727788277892779027791277922779327794277952779627797277982779927800278012780227803278042780527806278072780827809278102781127812278132781427815278162781727818278192782027821278222782327824278252782627827278282782927830278312783227833278342783527836278372783827839278402784127842278432784427845278462784727848278492785027851278522785327854278552785627857278582785927860278612786227863278642786527866278672786827869278702787127872278732787427875278762787727878278792788027881278822788327884278852788627887278882788927890278912789227893278942789527896278972789827899279002790127902279032790427905279062790727908279092791027911279122791327914279152791627917279182791927920279212792227923279242792527926279272792827929279302793127932279332793427935279362793727938279392794027941279422794327944279452794627947279482794927950279512795227953279542795527956279572795827959279602796127962279632796427965279662796727968279692797027971279722797327974279752797627977279782797927980279812798227983279842798527986279872798827989279902799127992279932799427995279962799727998279992800028001280022800328004280052800628007280082800928010280112801228013280142801528016280172801828019280202802128022280232802428025280262802728028280292803028031280322803328034280352803628037280382803928040280412804228043280442804528046280472804828049280502805128052280532805428055280562805728058280592806028061280622806328064280652806628067280682806928070280712807228073280742807528076280772807828079280802808128082280832808428085280862808728088280892809028091280922809328094280952809628097280982809928100281012810228103281042810528106281072810828109281102811128112281132811428115281162811728118281192812028121281222812328124281252812628127281282812928130281312813228133281342813528136281372813828139281402814128142281432814428145281462814728148281492815028151281522815328154281552815628157281582815928160281612816228163281642816528166281672816828169281702817128172281732817428175281762817728178281792818028181281822818328184281852818628187281882818928190281912819228193281942819528196281972819828199282002820128202282032820428205282062820728208282092821028211282122821328214282152821628217282182821928220282212822228223282242822528226282272822828229282302823128232282332823428235282362823728238282392824028241282422824328244282452824628247282482824928250282512825228253282542825528256282572825828259282602826128262282632826428265282662826728268282692827028271282722827328274282752827628277282782827928280282812828228283282842828528286282872828828289282902829128292282932829428295282962829728298282992830028301283022830328304283052830628307283082830928310283112831228313283142831528316283172831828319283202832128322283232832428325283262832728328283292833028331283322833328334283352833628337283382833928340283412834228343283442834528346283472834828349283502835128352283532835428355283562835728358283592836028361283622836328364283652836628367283682836928370283712837228373283742837528376283772837828379283802838128382283832838428385283862838728388283892839028391283922839328394283952839628397283982839928400284012840228403284042840528406284072840828409284102841128412284132841428415284162841728418284192842028421284222842328424284252842628427284282842928430284312843228433284342843528436284372843828439284402844128442284432844428445284462844728448284492845028451284522845328454284552845628457284582845928460284612846228463284642846528466284672846828469284702847128472284732847428475284762847728478284792848028481284822848328484284852848628487284882848928490284912849228493284942849528496284972849828499285002850128502285032850428505285062850728508285092851028511285122851328514285152851628517285182851928520285212852228523285242852528526285272852828529285302853128532285332853428535285362853728538285392854028541285422854328544285452854628547285482854928550285512855228553285542855528556285572855828559285602856128562285632856428565285662856728568285692857028571285722857328574285752857628577285782857928580285812858228583285842858528586285872858828589285902859128592285932859428595285962859728598285992860028601286022860328604286052860628607286082860928610286112861228613286142861528616286172861828619286202862128622286232862428625286262862728628286292863028631286322863328634286352863628637286382863928640286412864228643286442864528646286472864828649286502865128652286532865428655286562865728658286592866028661286622866328664286652866628667286682866928670286712867228673286742867528676286772867828679286802868128682286832868428685286862868728688286892869028691286922869328694286952869628697286982869928700287012870228703287042870528706287072870828709287102871128712287132871428715287162871728718287192872028721287222872328724287252872628727287282872928730287312873228733287342873528736287372873828739287402874128742287432874428745287462874728748287492875028751287522875328754287552875628757287582875928760287612876228763287642876528766287672876828769287702877128772287732877428775287762877728778287792878028781287822878328784287852878628787287882878928790287912879228793287942879528796287972879828799288002880128802288032880428805288062880728808288092881028811288122881328814288152881628817288182881928820288212882228823288242882528826288272882828829288302883128832288332883428835288362883728838288392884028841288422884328844288452884628847288482884928850288512885228853288542885528856288572885828859288602886128862288632886428865288662886728868288692887028871288722887328874288752887628877288782887928880288812888228883288842888528886288872888828889288902889128892288932889428895288962889728898288992890028901289022890328904289052890628907289082890928910289112891228913289142891528916289172891828919289202892128922289232892428925289262892728928289292893028931289322893328934289352893628937289382893928940289412894228943289442894528946289472894828949289502895128952289532895428955289562895728958289592896028961289622896328964289652896628967289682896928970289712897228973289742897528976289772897828979289802898128982289832898428985289862898728988289892899028991289922899328994289952899628997289982899929000290012900229003290042900529006290072900829009290102901129012290132901429015290162901729018290192902029021290222902329024290252902629027290282902929030290312903229033290342903529036290372903829039290402904129042290432904429045290462904729048290492905029051290522905329054290552905629057290582905929060290612906229063290642906529066290672906829069290702907129072290732907429075290762907729078290792908029081290822908329084290852908629087290882908929090290912909229093290942909529096290972909829099291002910129102291032910429105291062910729108291092911029111291122911329114291152911629117291182911929120291212912229123291242912529126291272912829129291302913129132291332913429135291362913729138291392914029141291422914329144291452914629147291482914929150291512915229153291542915529156291572915829159291602916129162291632916429165291662916729168291692917029171291722917329174291752917629177291782917929180291812918229183291842918529186291872918829189291902919129192291932919429195291962919729198291992920029201292022920329204292052920629207292082920929210292112921229213292142921529216292172921829219292202922129222292232922429225292262922729228292292923029231292322923329234292352923629237292382923929240292412924229243292442924529246292472924829249292502925129252292532925429255292562925729258292592926029261292622926329264292652926629267292682926929270292712927229273292742927529276292772927829279292802928129282292832928429285292862928729288292892929029291292922929329294292952929629297292982929929300293012930229303293042930529306293072930829309293102931129312293132931429315293162931729318293192932029321293222932329324293252932629327293282932929330293312933229333293342933529336293372933829339293402934129342293432934429345293462934729348293492935029351293522935329354293552935629357293582935929360293612936229363293642936529366293672936829369293702937129372293732937429375293762937729378293792938029381293822938329384293852938629387293882938929390293912939229393293942939529396293972939829399294002940129402294032940429405294062940729408294092941029411294122941329414294152941629417294182941929420294212942229423294242942529426294272942829429294302943129432294332943429435294362943729438294392944029441294422944329444294452944629447294482944929450294512945229453294542945529456294572945829459294602946129462294632946429465294662946729468294692947029471294722947329474294752947629477294782947929480294812948229483294842948529486294872948829489294902949129492294932949429495294962949729498294992950029501295022950329504295052950629507295082950929510295112951229513295142951529516295172951829519295202952129522295232952429525295262952729528295292953029531295322953329534295352953629537295382953929540295412954229543295442954529546295472954829549295502955129552295532955429555295562955729558295592956029561295622956329564295652956629567295682956929570295712957229573295742957529576295772957829579295802958129582295832958429585295862958729588295892959029591295922959329594295952959629597295982959929600296012960229603296042960529606296072960829609296102961129612296132961429615296162961729618296192962029621296222962329624296252962629627296282962929630296312963229633296342963529636296372963829639296402964129642296432964429645296462964729648296492965029651296522965329654296552965629657296582965929660296612966229663296642966529666296672966829669296702967129672296732967429675296762967729678296792968029681296822968329684296852968629687296882968929690296912969229693296942969529696296972969829699297002970129702297032970429705297062970729708297092971029711297122971329714297152971629717297182971929720297212972229723297242972529726297272972829729297302973129732297332973429735297362973729738297392974029741297422974329744297452974629747297482974929750297512975229753297542975529756297572975829759297602976129762297632976429765297662976729768297692977029771297722977329774297752977629777297782977929780297812978229783297842978529786297872978829789297902979129792297932979429795297962979729798297992980029801298022980329804298052980629807298082980929810298112981229813298142981529816298172981829819298202982129822298232982429825298262982729828298292983029831298322983329834298352983629837298382983929840298412984229843298442984529846298472984829849298502985129852298532985429855298562985729858298592986029861298622986329864298652986629867298682986929870298712987229873298742987529876298772987829879298802988129882298832988429885298862988729888298892989029891298922989329894298952989629897298982989929900299012990229903299042990529906299072990829909299102991129912299132991429915299162991729918299192992029921299222992329924299252992629927299282992929930299312993229933299342993529936299372993829939299402994129942299432994429945299462994729948299492995029951299522995329954299552995629957299582995929960299612996229963299642996529966299672996829969299702997129972299732997429975299762997729978299792998029981299822998329984299852998629987299882998929990299912999229993299942999529996299972999829999300003000130002300033000430005300063000730008300093001030011300123001330014300153001630017300183001930020300213002230023300243002530026300273002830029300303003130032300333003430035300363003730038300393004030041300423004330044300453004630047300483004930050300513005230053300543005530056300573005830059300603006130062300633006430065300663006730068300693007030071300723007330074300753007630077300783007930080300813008230083300843008530086300873008830089300903009130092300933009430095300963009730098300993010030101301023010330104301053010630107301083010930110301113011230113301143011530116301173011830119301203012130122301233012430125301263012730128301293013030131301323013330134301353013630137301383013930140301413014230143301443014530146301473014830149301503015130152301533015430155301563015730158301593016030161301623016330164301653016630167301683016930170301713017230173301743017530176301773017830179301803018130182301833018430185301863018730188301893019030191301923019330194301953019630197301983019930200302013020230203302043020530206302073020830209302103021130212302133021430215302163021730218302193022030221302223022330224302253022630227302283022930230302313023230233302343023530236302373023830239302403024130242302433024430245302463024730248302493025030251302523025330254302553025630257302583025930260302613026230263302643026530266302673026830269302703027130272302733027430275302763027730278302793028030281302823028330284302853028630287302883028930290302913029230293302943029530296302973029830299303003030130302303033030430305303063030730308303093031030311303123031330314303153031630317303183031930320303213032230323303243032530326303273032830329303303033130332303333033430335303363033730338303393034030341303423034330344303453034630347303483034930350303513035230353303543035530356303573035830359303603036130362303633036430365303663036730368303693037030371303723037330374303753037630377303783037930380303813038230383303843038530386303873038830389303903039130392303933039430395303963039730398303993040030401304023040330404304053040630407304083040930410304113041230413304143041530416304173041830419304203042130422304233042430425304263042730428304293043030431304323043330434304353043630437304383043930440304413044230443304443044530446304473044830449304503045130452304533045430455304563045730458304593046030461304623046330464304653046630467304683046930470304713047230473304743047530476304773047830479304803048130482304833048430485304863048730488304893049030491304923049330494304953049630497304983049930500305013050230503305043050530506305073050830509305103051130512305133051430515305163051730518305193052030521305223052330524305253052630527305283052930530305313053230533305343053530536305373053830539305403054130542305433054430545305463054730548305493055030551305523055330554305553055630557305583055930560305613056230563305643056530566305673056830569305703057130572305733057430575305763057730578305793058030581305823058330584305853058630587305883058930590305913059230593305943059530596305973059830599306003060130602306033060430605306063060730608306093061030611306123061330614306153061630617306183061930620306213062230623306243062530626306273062830629306303063130632306333063430635306363063730638306393064030641306423064330644306453064630647306483064930650306513065230653306543065530656306573065830659306603066130662306633066430665306663066730668306693067030671306723067330674306753067630677306783067930680306813068230683306843068530686306873068830689306903069130692306933069430695306963069730698306993070030701307023070330704307053070630707307083070930710307113071230713307143071530716307173071830719307203072130722307233072430725307263072730728307293073030731307323073330734307353073630737307383073930740307413074230743307443074530746307473074830749307503075130752307533075430755307563075730758307593076030761307623076330764307653076630767307683076930770307713077230773307743077530776307773077830779307803078130782307833078430785307863078730788307893079030791307923079330794307953079630797307983079930800308013080230803308043080530806308073080830809308103081130812308133081430815308163081730818308193082030821308223082330824308253082630827308283082930830308313083230833308343083530836308373083830839308403084130842308433084430845308463084730848308493085030851308523085330854308553085630857308583085930860308613086230863308643086530866308673086830869308703087130872308733087430875308763087730878308793088030881308823088330884308853088630887308883088930890308913089230893308943089530896308973089830899309003090130902309033090430905309063090730908309093091030911309123091330914309153091630917309183091930920309213092230923309243092530926309273092830929309303093130932309333093430935309363093730938309393094030941309423094330944309453094630947309483094930950309513095230953309543095530956309573095830959309603096130962309633096430965309663096730968309693097030971309723097330974309753097630977309783097930980309813098230983309843098530986309873098830989309903099130992309933099430995309963099730998309993100031001310023100331004310053100631007310083100931010310113101231013310143101531016310173101831019310203102131022310233102431025310263102731028310293103031031310323103331034310353103631037310383103931040310413104231043310443104531046310473104831049310503105131052310533105431055310563105731058310593106031061310623106331064310653106631067310683106931070310713107231073310743107531076310773107831079310803108131082310833108431085310863108731088310893109031091310923109331094310953109631097310983109931100311013110231103311043110531106311073110831109311103111131112311133111431115311163111731118311193112031121311223112331124311253112631127311283112931130311313113231133311343113531136311373113831139311403114131142311433114431145311463114731148311493115031151311523115331154311553115631157311583115931160311613116231163311643116531166311673116831169311703117131172311733117431175311763117731178311793118031181311823118331184311853118631187311883118931190311913119231193311943119531196311973119831199312003120131202312033120431205312063120731208312093121031211312123121331214312153121631217312183121931220312213122231223312243122531226312273122831229312303123131232312333123431235312363123731238312393124031241312423124331244312453124631247312483124931250312513125231253312543125531256312573125831259312603126131262312633126431265312663126731268312693127031271312723127331274312753127631277312783127931280312813128231283312843128531286312873128831289312903129131292312933129431295312963129731298312993130031301313023130331304313053130631307313083130931310313113131231313313143131531316313173131831319313203132131322313233132431325313263132731328313293133031331313323133331334313353133631337313383133931340313413134231343313443134531346313473134831349313503135131352313533135431355313563135731358313593136031361313623136331364313653136631367313683136931370313713137231373313743137531376313773137831379313803138131382313833138431385313863138731388313893139031391313923139331394313953139631397313983139931400314013140231403314043140531406314073140831409314103141131412314133141431415314163141731418314193142031421314223142331424314253142631427314283142931430314313143231433314343143531436314373143831439314403144131442314433144431445314463144731448314493145031451314523145331454314553145631457314583145931460314613146231463314643146531466314673146831469314703147131472314733147431475314763147731478314793148031481314823148331484314853148631487314883148931490314913149231493314943149531496314973149831499315003150131502315033150431505315063150731508315093151031511315123151331514315153151631517315183151931520315213152231523315243152531526315273152831529315303153131532315333153431535315363153731538315393154031541315423154331544315453154631547315483154931550315513155231553315543155531556315573155831559315603156131562315633156431565315663156731568315693157031571315723157331574315753157631577315783157931580315813158231583315843158531586315873158831589315903159131592315933159431595315963159731598315993160031601316023160331604316053160631607316083160931610316113161231613316143161531616316173161831619316203162131622316233162431625316263162731628316293163031631316323163331634316353163631637316383163931640316413164231643316443164531646316473164831649316503165131652316533165431655316563165731658316593166031661316623166331664316653166631667316683166931670316713167231673316743167531676316773167831679316803168131682316833168431685316863168731688316893169031691316923169331694316953169631697316983169931700317013170231703317043170531706317073170831709317103171131712317133171431715317163171731718317193172031721317223172331724317253172631727317283172931730317313173231733317343173531736317373173831739317403174131742317433174431745317463174731748317493175031751317523175331754317553175631757317583175931760317613176231763317643176531766317673176831769317703177131772317733177431775317763177731778317793178031781317823178331784317853178631787317883178931790317913179231793317943179531796317973179831799318003180131802318033180431805318063180731808318093181031811318123181331814318153181631817318183181931820318213182231823318243182531826318273182831829318303183131832318333183431835318363183731838318393184031841318423184331844318453184631847318483184931850318513185231853318543185531856318573185831859318603186131862318633186431865318663186731868318693187031871318723187331874318753187631877318783187931880318813188231883318843188531886318873188831889318903189131892318933189431895318963189731898318993190031901319023190331904319053190631907319083190931910319113191231913319143191531916319173191831919319203192131922319233192431925319263192731928319293193031931319323193331934319353193631937319383193931940319413194231943319443194531946319473194831949319503195131952319533195431955319563195731958319593196031961319623196331964319653196631967319683196931970319713197231973319743197531976319773197831979319803198131982319833198431985319863198731988319893199031991319923199331994319953199631997319983199932000320013200232003320043200532006320073200832009320103201132012320133201432015320163201732018320193202032021320223202332024320253202632027320283202932030320313203232033320343203532036320373203832039320403204132042320433204432045320463204732048320493205032051320523205332054320553205632057320583205932060320613206232063320643206532066320673206832069320703207132072320733207432075320763207732078320793208032081320823208332084320853208632087320883208932090320913209232093320943209532096320973209832099321003210132102321033210432105321063210732108321093211032111321123211332114321153211632117321183211932120321213212232123321243212532126321273212832129321303213132132321333213432135321363213732138321393214032141321423214332144321453214632147321483214932150321513215232153321543215532156321573215832159321603216132162321633216432165321663216732168321693217032171321723217332174321753217632177321783217932180321813218232183321843218532186321873218832189321903219132192321933219432195321963219732198321993220032201322023220332204322053220632207322083220932210322113221232213322143221532216322173221832219322203222132222322233222432225322263222732228322293223032231322323223332234322353223632237322383223932240322413224232243322443224532246322473224832249322503225132252322533225432255322563225732258322593226032261322623226332264322653226632267322683226932270322713227232273322743227532276322773227832279322803228132282322833228432285322863228732288322893229032291322923229332294322953229632297322983229932300323013230232303323043230532306323073230832309323103231132312323133231432315323163231732318323193232032321323223232332324323253232632327323283232932330323313233232333323343233532336323373233832339323403234132342323433234432345323463234732348323493235032351323523235332354323553235632357323583235932360323613236232363323643236532366323673236832369323703237132372323733237432375323763237732378323793238032381323823238332384323853238632387323883238932390323913239232393323943239532396323973239832399324003240132402324033240432405324063240732408324093241032411324123241332414324153241632417324183241932420324213242232423324243242532426324273242832429324303243132432324333243432435324363243732438324393244032441324423244332444324453244632447324483244932450324513245232453324543245532456324573245832459324603246132462324633246432465324663246732468324693247032471324723247332474324753247632477324783247932480324813248232483324843248532486324873248832489324903249132492324933249432495324963249732498324993250032501325023250332504325053250632507325083250932510325113251232513325143251532516325173251832519325203252132522325233252432525325263252732528325293253032531325323253332534325353253632537325383253932540325413254232543325443254532546325473254832549325503255132552325533255432555325563255732558325593256032561325623256332564325653256632567325683256932570325713257232573325743257532576325773257832579325803258132582325833258432585325863258732588325893259032591325923259332594325953259632597325983259932600326013260232603326043260532606326073260832609326103261132612326133261432615326163261732618326193262032621326223262332624326253262632627326283262932630326313263232633326343263532636326373263832639326403264132642326433264432645326463264732648326493265032651326523265332654326553265632657326583265932660326613266232663326643266532666326673266832669326703267132672326733267432675326763267732678326793268032681326823268332684326853268632687326883268932690326913269232693326943269532696326973269832699327003270132702327033270432705327063270732708327093271032711327123271332714327153271632717327183271932720327213272232723327243272532726327273272832729327303273132732327333273432735327363273732738327393274032741327423274332744327453274632747327483274932750327513275232753327543275532756327573275832759327603276132762327633276432765327663276732768327693277032771327723277332774327753277632777327783277932780327813278232783327843278532786327873278832789327903279132792327933279432795327963279732798327993280032801328023280332804328053280632807328083280932810328113281232813328143281532816328173281832819328203282132822328233282432825328263282732828328293283032831328323283332834328353283632837328383283932840328413284232843328443284532846328473284832849328503285132852328533285432855328563285732858328593286032861328623286332864328653286632867328683286932870328713287232873328743287532876328773287832879328803288132882328833288432885328863288732888328893289032891328923289332894328953289632897328983289932900329013290232903329043290532906329073290832909329103291132912329133291432915329163291732918329193292032921329223292332924329253292632927329283292932930329313293232933329343293532936329373293832939329403294132942329433294432945329463294732948329493295032951329523295332954329553295632957329583295932960329613296232963329643296532966329673296832969329703297132972329733297432975329763297732978329793298032981329823298332984329853298632987329883298932990329913299232993329943299532996329973299832999330003300133002330033300433005330063300733008330093301033011330123301333014330153301633017330183301933020330213302233023330243302533026330273302833029330303303133032330333303433035330363303733038330393304033041330423304333044330453304633047330483304933050330513305233053330543305533056330573305833059330603306133062330633306433065330663306733068330693307033071330723307333074330753307633077330783307933080330813308233083330843308533086330873308833089330903309133092330933309433095330963309733098330993310033101331023310333104331053310633107331083310933110331113311233113331143311533116331173311833119331203312133122331233312433125331263312733128331293313033131331323313333134331353313633137331383313933140331413314233143331443314533146331473314833149331503315133152331533315433155331563315733158331593316033161331623316333164331653316633167331683316933170331713317233173331743317533176331773317833179331803318133182331833318433185331863318733188331893319033191331923319333194331953319633197331983319933200332013320233203332043320533206332073320833209332103321133212332133321433215332163321733218332193322033221332223322333224332253322633227332283322933230332313323233233332343323533236332373323833239332403324133242332433324433245332463324733248332493325033251332523325333254332553325633257332583325933260332613326233263332643326533266332673326833269332703327133272332733327433275332763327733278332793328033281332823328333284332853328633287332883328933290332913329233293332943329533296332973329833299333003330133302333033330433305333063330733308333093331033311333123331333314333153331633317333183331933320333213332233323333243332533326333273332833329333303333133332333333333433335333363333733338333393334033341333423334333344333453334633347333483334933350333513335233353333543335533356333573335833359333603336133362333633336433365333663336733368333693337033371333723337333374333753337633377333783337933380333813338233383333843338533386333873338833389333903339133392333933339433395333963339733398333993340033401334023340333404334053340633407334083340933410334113341233413334143341533416334173341833419334203342133422334233342433425334263342733428334293343033431334323343333434334353343633437334383343933440334413344233443334443344533446334473344833449334503345133452334533345433455334563345733458334593346033461334623346333464334653346633467334683346933470334713347233473334743347533476334773347833479334803348133482334833348433485334863348733488334893349033491334923349333494334953349633497334983349933500335013350233503335043350533506335073350833509335103351133512335133351433515335163351733518335193352033521335223352333524335253352633527335283352933530335313353233533335343353533536335373353833539335403354133542335433354433545335463354733548335493355033551335523355333554335553355633557335583355933560335613356233563335643356533566335673356833569335703357133572335733357433575335763357733578335793358033581335823358333584335853358633587335883358933590335913359233593335943359533596335973359833599336003360133602336033360433605336063360733608336093361033611336123361333614336153361633617336183361933620336213362233623336243362533626336273362833629336303363133632336333363433635336363363733638336393364033641336423364333644336453364633647336483364933650336513365233653336543365533656336573365833659336603366133662336633366433665336663366733668336693367033671336723367333674336753367633677336783367933680336813368233683336843368533686336873368833689336903369133692336933369433695336963369733698336993370033701337023370333704337053370633707337083370933710337113371233713337143371533716337173371833719337203372133722337233372433725337263372733728337293373033731337323373333734337353373633737337383373933740337413374233743337443374533746337473374833749337503375133752337533375433755337563375733758337593376033761337623376333764337653376633767337683376933770337713377233773337743377533776337773377833779337803378133782337833378433785337863378733788337893379033791337923379333794337953379633797337983379933800338013380233803338043380533806338073380833809338103381133812338133381433815338163381733818338193382033821338223382333824338253382633827338283382933830338313383233833338343383533836338373383833839338403384133842338433384433845338463384733848338493385033851338523385333854338553385633857338583385933860338613386233863338643386533866338673386833869338703387133872338733387433875338763387733878338793388033881338823388333884338853388633887338883388933890338913389233893338943389533896338973389833899339003390133902339033390433905339063390733908339093391033911339123391333914339153391633917339183391933920339213392233923339243392533926339273392833929339303393133932339333393433935339363393733938339393394033941339423394333944339453394633947339483394933950339513395233953339543395533956339573395833959339603396133962339633396433965339663396733968339693397033971339723397333974339753397633977339783397933980339813398233983339843398533986339873398833989339903399133992339933399433995339963399733998339993400034001340023400334004340053400634007340083400934010340113401234013340143401534016340173401834019340203402134022340233402434025340263402734028340293403034031340323403334034340353403634037340383403934040340413404234043340443404534046340473404834049340503405134052340533405434055340563405734058340593406034061340623406334064340653406634067340683406934070340713407234073340743407534076340773407834079340803408134082340833408434085340863408734088340893409034091340923409334094340953409634097340983409934100341013410234103341043410534106341073410834109341103411134112341133411434115341163411734118341193412034121341223412334124341253412634127341283412934130341313413234133341343413534136341373413834139341403414134142341433414434145341463414734148341493415034151341523415334154341553415634157341583415934160341613416234163341643416534166341673416834169341703417134172341733417434175341763417734178341793418034181341823418334184341853418634187341883418934190341913419234193341943419534196341973419834199342003420134202342033420434205342063420734208342093421034211342123421334214342153421634217342183421934220342213422234223342243422534226342273422834229342303423134232342333423434235342363423734238342393424034241342423424334244342453424634247342483424934250342513425234253342543425534256342573425834259342603426134262342633426434265342663426734268342693427034271342723427334274342753427634277342783427934280342813428234283342843428534286342873428834289342903429134292342933429434295342963429734298342993430034301343023430334304343053430634307343083430934310343113431234313343143431534316343173431834319343203432134322343233432434325343263432734328343293433034331343323433334334343353433634337343383433934340343413434234343343443434534346343473434834349343503435134352343533435434355343563435734358343593436034361343623436334364343653436634367343683436934370343713437234373343743437534376343773437834379343803438134382343833438434385343863438734388343893439034391343923439334394343953439634397343983439934400344013440234403344043440534406344073440834409344103441134412344133441434415344163441734418344193442034421344223442334424344253442634427344283442934430344313443234433344343443534436344373443834439344403444134442344433444434445344463444734448344493445034451344523445334454344553445634457344583445934460344613446234463344643446534466344673446834469344703447134472344733447434475344763447734478344793448034481344823448334484344853448634487344883448934490344913449234493344943449534496344973449834499345003450134502345033450434505345063450734508345093451034511345123451334514345153451634517345183451934520345213452234523345243452534526345273452834529345303453134532345333453434535345363453734538345393454034541345423454334544345453454634547345483454934550345513455234553345543455534556345573455834559345603456134562345633456434565345663456734568345693457034571345723457334574345753457634577345783457934580345813458234583345843458534586345873458834589345903459134592345933459434595345963459734598345993460034601346023460334604346053460634607346083460934610346113461234613346143461534616346173461834619346203462134622346233462434625346263462734628346293463034631346323463334634346353463634637346383463934640346413464234643346443464534646346473464834649346503465134652346533465434655346563465734658346593466034661346623466334664346653466634667346683466934670346713467234673346743467534676346773467834679346803468134682346833468434685346863468734688346893469034691346923469334694346953469634697346983469934700347013470234703347043470534706347073470834709347103471134712347133471434715347163471734718347193472034721347223472334724347253472634727347283472934730347313473234733347343473534736347373473834739347403474134742347433474434745347463474734748347493475034751347523475334754347553475634757347583475934760347613476234763347643476534766347673476834769347703477134772347733477434775347763477734778347793478034781347823478334784347853478634787347883478934790347913479234793347943479534796347973479834799348003480134802348033480434805348063480734808348093481034811348123481334814348153481634817348183481934820348213482234823348243482534826348273482834829348303483134832348333483434835348363483734838348393484034841348423484334844348453484634847348483484934850348513485234853348543485534856348573485834859348603486134862348633486434865348663486734868348693487034871348723487334874348753487634877348783487934880348813488234883348843488534886348873488834889348903489134892348933489434895348963489734898348993490034901349023490334904349053490634907349083490934910349113491234913349143491534916349173491834919349203492134922349233492434925349263492734928349293493034931349323493334934349353493634937349383493934940349413494234943349443494534946349473494834949349503495134952349533495434955349563495734958349593496034961349623496334964349653496634967349683496934970349713497234973349743497534976349773497834979349803498134982349833498434985349863498734988349893499034991349923499334994349953499634997349983499935000350013500235003350043500535006350073500835009350103501135012350133501435015350163501735018350193502035021350223502335024350253502635027350283502935030350313503235033350343503535036350373503835039350403504135042350433504435045350463504735048350493505035051350523505335054350553505635057350583505935060350613506235063350643506535066350673506835069350703507135072350733507435075350763507735078350793508035081350823508335084350853508635087350883508935090350913509235093350943509535096350973509835099351003510135102351033510435105351063510735108351093511035111351123511335114351153511635117351183511935120351213512235123351243512535126351273512835129351303513135132351333513435135351363513735138351393514035141351423514335144351453514635147351483514935150351513515235153351543515535156351573515835159351603516135162351633516435165351663516735168351693517035171351723517335174351753517635177351783517935180351813518235183351843518535186351873518835189351903519135192351933519435195351963519735198351993520035201352023520335204352053520635207352083520935210352113521235213352143521535216352173521835219352203522135222352233522435225352263522735228352293523035231352323523335234352353523635237352383523935240352413524235243352443524535246352473524835249352503525135252352533525435255352563525735258352593526035261352623526335264352653526635267352683526935270352713527235273352743527535276352773527835279352803528135282352833528435285352863528735288352893529035291352923529335294352953529635297352983529935300353013530235303353043530535306353073530835309353103531135312353133531435315353163531735318353193532035321353223532335324353253532635327353283532935330353313533235333353343533535336353373533835339353403534135342353433534435345353463534735348353493535035351353523535335354353553535635357353583535935360353613536235363353643536535366353673536835369353703537135372353733537435375353763537735378353793538035381353823538335384353853538635387353883538935390353913539235393353943539535396353973539835399354003540135402354033540435405354063540735408354093541035411354123541335414354153541635417354183541935420354213542235423354243542535426354273542835429354303543135432354333543435435354363543735438354393544035441354423544335444354453544635447354483544935450354513545235453354543545535456354573545835459354603546135462354633546435465354663546735468354693547035471354723547335474354753547635477354783547935480354813548235483354843548535486354873548835489354903549135492354933549435495354963549735498354993550035501355023550335504355053550635507355083550935510355113551235513355143551535516355173551835519355203552135522355233552435525355263552735528355293553035531355323553335534355353553635537355383553935540355413554235543355443554535546355473554835549355503555135552355533555435555355563555735558355593556035561355623556335564355653556635567355683556935570355713557235573355743557535576355773557835579355803558135582355833558435585355863558735588355893559035591355923559335594355953559635597355983559935600356013560235603356043560535606356073560835609356103561135612356133561435615356163561735618356193562035621356223562335624356253562635627356283562935630356313563235633356343563535636356373563835639356403564135642356433564435645356463564735648356493565035651356523565335654356553565635657356583565935660356613566235663356643566535666356673566835669356703567135672356733567435675356763567735678356793568035681356823568335684356853568635687356883568935690356913569235693356943569535696356973569835699357003570135702357033570435705357063570735708357093571035711357123571335714357153571635717357183571935720357213572235723357243572535726357273572835729357303573135732357333573435735357363573735738357393574035741357423574335744357453574635747357483574935750357513575235753357543575535756357573575835759357603576135762357633576435765357663576735768357693577035771357723577335774357753577635777357783577935780357813578235783357843578535786357873578835789357903579135792357933579435795357963579735798357993580035801358023580335804358053580635807358083580935810358113581235813358143581535816358173581835819358203582135822358233582435825358263582735828358293583035831358323583335834358353583635837358383583935840358413584235843358443584535846358473584835849358503585135852358533585435855358563585735858358593586035861358623586335864358653586635867358683586935870358713587235873358743587535876358773587835879358803588135882358833588435885358863588735888358893589035891358923589335894358953589635897358983589935900359013590235903359043590535906359073590835909359103591135912359133591435915359163591735918359193592035921359223592335924359253592635927359283592935930359313593235933359343593535936359373593835939359403594135942359433594435945359463594735948359493595035951359523595335954359553595635957359583595935960359613596235963359643596535966359673596835969359703597135972359733597435975359763597735978359793598035981359823598335984359853598635987359883598935990359913599235993359943599535996359973599835999360003600136002360033600436005360063600736008360093601036011360123601336014360153601636017360183601936020360213602236023360243602536026360273602836029360303603136032360333603436035360363603736038360393604036041360423604336044360453604636047360483604936050360513605236053360543605536056360573605836059360603606136062360633606436065360663606736068360693607036071360723607336074360753607636077360783607936080360813608236083360843608536086360873608836089360903609136092360933609436095360963609736098360993610036101361023610336104361053610636107361083610936110361113611236113361143611536116361173611836119361203612136122361233612436125361263612736128361293613036131361323613336134361353613636137361383613936140361413614236143361443614536146361473614836149361503615136152361533615436155361563615736158361593616036161361623616336164361653616636167361683616936170361713617236173361743617536176361773617836179361803618136182361833618436185361863618736188361893619036191361923619336194361953619636197361983619936200362013620236203362043620536206362073620836209362103621136212362133621436215362163621736218362193622036221362223622336224362253622636227362283622936230362313623236233362343623536236362373623836239362403624136242362433624436245362463624736248362493625036251362523625336254362553625636257362583625936260362613626236263362643626536266362673626836269362703627136272362733627436275362763627736278362793628036281362823628336284362853628636287362883628936290362913629236293362943629536296362973629836299363003630136302363033630436305363063630736308363093631036311363123631336314363153631636317363183631936320363213632236323363243632536326363273632836329363303633136332363333633436335363363633736338363393634036341363423634336344363453634636347363483634936350363513635236353363543635536356363573635836359363603636136362363633636436365363663636736368363693637036371363723637336374363753637636377363783637936380363813638236383363843638536386363873638836389363903639136392363933639436395363963639736398363993640036401364023640336404364053640636407364083640936410364113641236413364143641536416364173641836419364203642136422364233642436425364263642736428364293643036431364323643336434364353643636437364383643936440364413644236443364443644536446364473644836449364503645136452364533645436455364563645736458364593646036461364623646336464364653646636467364683646936470364713647236473364743647536476364773647836479364803648136482364833648436485364863648736488364893649036491364923649336494364953649636497364983649936500365013650236503365043650536506365073650836509365103651136512365133651436515365163651736518365193652036521365223652336524365253652636527365283652936530365313653236533365343653536536365373653836539365403654136542365433654436545365463654736548365493655036551365523655336554365553655636557365583655936560365613656236563365643656536566365673656836569365703657136572365733657436575365763657736578365793658036581365823658336584365853658636587365883658936590365913659236593365943659536596365973659836599366003660136602366033660436605366063660736608366093661036611366123661336614366153661636617366183661936620366213662236623366243662536626366273662836629366303663136632366333663436635366363663736638366393664036641366423664336644366453664636647366483664936650366513665236653366543665536656366573665836659366603666136662366633666436665366663666736668366693667036671366723667336674366753667636677366783667936680366813668236683366843668536686366873668836689366903669136692366933669436695366963669736698366993670036701367023670336704367053670636707367083670936710367113671236713367143671536716367173671836719367203672136722367233672436725367263672736728367293673036731367323673336734367353673636737367383673936740367413674236743367443674536746367473674836749367503675136752367533675436755367563675736758367593676036761367623676336764367653676636767367683676936770367713677236773367743677536776367773677836779367803678136782367833678436785367863678736788367893679036791367923679336794367953679636797367983679936800368013680236803368043680536806368073680836809368103681136812368133681436815368163681736818368193682036821368223682336824368253682636827368283682936830368313683236833368343683536836368373683836839368403684136842368433684436845368463684736848368493685036851368523685336854368553685636857368583685936860368613686236863368643686536866368673686836869368703687136872368733687436875368763687736878368793688036881368823688336884368853688636887368883688936890368913689236893368943689536896368973689836899369003690136902369033690436905369063690736908369093691036911369123691336914369153691636917369183691936920369213692236923369243692536926369273692836929369303693136932369333693436935369363693736938369393694036941369423694336944369453694636947369483694936950369513695236953369543695536956369573695836959369603696136962369633696436965369663696736968369693697036971369723697336974369753697636977369783697936980369813698236983369843698536986369873698836989369903699136992369933699436995369963699736998369993700037001370023700337004370053700637007370083700937010370113701237013370143701537016370173701837019370203702137022370233702437025370263702737028370293703037031370323703337034370353703637037370383703937040370413704237043370443704537046370473704837049370503705137052370533705437055370563705737058370593706037061370623706337064370653706637067370683706937070370713707237073370743707537076370773707837079370803708137082370833708437085370863708737088370893709037091370923709337094370953709637097370983709937100371013710237103371043710537106371073710837109371103711137112371133711437115371163711737118371193712037121371223712337124371253712637127371283712937130371313713237133371343713537136371373713837139371403714137142371433714437145371463714737148371493715037151371523715337154371553715637157371583715937160371613716237163371643716537166371673716837169371703717137172371733717437175371763717737178371793718037181371823718337184371853718637187371883718937190371913719237193371943719537196371973719837199372003720137202372033720437205372063720737208372093721037211372123721337214372153721637217372183721937220372213722237223372243722537226372273722837229372303723137232372333723437235372363723737238372393724037241372423724337244372453724637247372483724937250372513725237253372543725537256372573725837259372603726137262372633726437265372663726737268372693727037271372723727337274372753727637277372783727937280372813728237283372843728537286372873728837289372903729137292372933729437295372963729737298372993730037301373023730337304373053730637307373083730937310373113731237313373143731537316373173731837319373203732137322373233732437325373263732737328373293733037331373323733337334373353733637337373383733937340373413734237343373443734537346373473734837349373503735137352373533735437355373563735737358373593736037361373623736337364373653736637367373683736937370373713737237373373743737537376373773737837379373803738137382373833738437385373863738737388373893739037391373923739337394373953739637397373983739937400374013740237403374043740537406374073740837409374103741137412374133741437415374163741737418374193742037421374223742337424374253742637427374283742937430374313743237433374343743537436374373743837439374403744137442374433744437445374463744737448374493745037451374523745337454374553745637457374583745937460374613746237463374643746537466374673746837469374703747137472374733747437475374763747737478374793748037481374823748337484374853748637487374883748937490374913749237493374943749537496374973749837499375003750137502375033750437505375063750737508375093751037511375123751337514375153751637517375183751937520375213752237523375243752537526375273752837529375303753137532375333753437535375363753737538375393754037541375423754337544375453754637547375483754937550375513755237553375543755537556375573755837559375603756137562375633756437565375663756737568375693757037571375723757337574375753757637577375783757937580375813758237583375843758537586375873758837589375903759137592375933759437595375963759737598375993760037601376023760337604376053760637607376083760937610376113761237613376143761537616376173761837619376203762137622376233762437625376263762737628376293763037631376323763337634376353763637637376383763937640376413764237643376443764537646376473764837649376503765137652376533765437655376563765737658376593766037661376623766337664376653766637667376683766937670376713767237673376743767537676376773767837679376803768137682376833768437685376863768737688376893769037691376923769337694376953769637697376983769937700377013770237703377043770537706377073770837709377103771137712377133771437715377163771737718377193772037721377223772337724377253772637727377283772937730377313773237733377343773537736377373773837739377403774137742377433774437745377463774737748377493775037751377523775337754377553775637757377583775937760377613776237763377643776537766377673776837769377703777137772377733777437775377763777737778377793778037781377823778337784377853778637787377883778937790377913779237793377943779537796377973779837799378003780137802378033780437805378063780737808378093781037811378123781337814378153781637817378183781937820378213782237823378243782537826378273782837829378303783137832378333783437835378363783737838378393784037841378423784337844378453784637847378483784937850378513785237853378543785537856378573785837859378603786137862378633786437865378663786737868378693787037871378723787337874378753787637877378783787937880378813788237883378843788537886378873788837889378903789137892378933789437895378963789737898378993790037901379023790337904379053790637907379083790937910379113791237913379143791537916379173791837919379203792137922379233792437925379263792737928379293793037931379323793337934379353793637937379383793937940379413794237943379443794537946379473794837949379503795137952379533795437955379563795737958379593796037961379623796337964379653796637967379683796937970379713797237973379743797537976379773797837979379803798137982379833798437985379863798737988379893799037991379923799337994379953799637997379983799938000380013800238003380043800538006380073800838009380103801138012380133801438015380163801738018380193802038021380223802338024380253802638027380283802938030380313803238033380343803538036380373803838039380403804138042380433804438045380463804738048380493805038051380523805338054380553805638057380583805938060380613806238063380643806538066380673806838069380703807138072380733807438075380763807738078380793808038081380823808338084380853808638087380883808938090380913809238093380943809538096380973809838099381003810138102381033810438105381063810738108381093811038111381123811338114381153811638117381183811938120381213812238123381243812538126381273812838129381303813138132381333813438135381363813738138381393814038141381423814338144381453814638147381483814938150381513815238153381543815538156381573815838159381603816138162381633816438165381663816738168381693817038171381723817338174381753817638177381783817938180381813818238183381843818538186381873818838189381903819138192381933819438195381963819738198381993820038201382023820338204382053820638207382083820938210382113821238213382143821538216382173821838219382203822138222382233822438225382263822738228382293823038231382323823338234382353823638237382383823938240382413824238243382443824538246382473824838249382503825138252382533825438255382563825738258382593826038261382623826338264382653826638267382683826938270382713827238273382743827538276382773827838279382803828138282382833828438285382863828738288382893829038291382923829338294382953829638297382983829938300383013830238303383043830538306383073830838309383103831138312383133831438315383163831738318383193832038321383223832338324383253832638327383283832938330383313833238333383343833538336383373833838339383403834138342383433834438345383463834738348383493835038351383523835338354383553835638357383583835938360383613836238363383643836538366383673836838369383703837138372383733837438375383763837738378383793838038381383823838338384383853838638387383883838938390383913839238393383943839538396383973839838399384003840138402384033840438405384063840738408384093841038411384123841338414384153841638417384183841938420384213842238423384243842538426384273842838429384303843138432384333843438435384363843738438384393844038441384423844338444384453844638447384483844938450384513845238453384543845538456384573845838459384603846138462384633846438465384663846738468384693847038471384723847338474384753847638477384783847938480384813848238483384843848538486384873848838489384903849138492384933849438495384963849738498384993850038501385023850338504385053850638507385083850938510385113851238513385143851538516385173851838519385203852138522385233852438525385263852738528385293853038531385323853338534385353853638537385383853938540385413854238543385443854538546385473854838549385503855138552385533855438555385563855738558385593856038561385623856338564385653856638567385683856938570385713857238573385743857538576385773857838579385803858138582385833858438585385863858738588385893859038591385923859338594385953859638597385983859938600386013860238603386043860538606386073860838609386103861138612386133861438615386163861738618386193862038621386223862338624386253862638627386283862938630386313863238633386343863538636386373863838639386403864138642386433864438645386463864738648386493865038651386523865338654386553865638657386583865938660386613866238663386643866538666386673866838669386703867138672386733867438675386763867738678386793868038681386823868338684386853868638687386883868938690386913869238693386943869538696386973869838699387003870138702387033870438705387063870738708387093871038711387123871338714387153871638717387183871938720387213872238723387243872538726387273872838729387303873138732387333873438735387363873738738387393874038741387423874338744387453874638747387483874938750387513875238753387543875538756387573875838759387603876138762387633876438765387663876738768387693877038771387723877338774387753877638777387783877938780387813878238783387843878538786387873878838789387903879138792387933879438795387963879738798387993880038801388023880338804388053880638807388083880938810388113881238813388143881538816388173881838819388203882138822388233882438825388263882738828388293883038831388323883338834388353883638837388383883938840388413884238843388443884538846388473884838849388503885138852388533885438855388563885738858388593886038861388623886338864388653886638867388683886938870388713887238873388743887538876388773887838879388803888138882388833888438885388863888738888388893889038891388923889338894388953889638897388983889938900389013890238903389043890538906389073890838909389103891138912389133891438915389163891738918389193892038921389223892338924389253892638927389283892938930389313893238933389343893538936389373893838939389403894138942389433894438945389463894738948389493895038951389523895338954389553895638957389583895938960389613896238963389643896538966389673896838969389703897138972389733897438975389763897738978389793898038981389823898338984389853898638987389883898938990389913899238993389943899538996389973899838999390003900139002390033900439005390063900739008390093901039011390123901339014390153901639017390183901939020390213902239023390243902539026390273902839029390303903139032390333903439035390363903739038390393904039041390423904339044390453904639047390483904939050390513905239053390543905539056390573905839059390603906139062390633906439065390663906739068390693907039071390723907339074390753907639077390783907939080390813908239083390843908539086390873908839089390903909139092390933909439095390963909739098390993910039101391023910339104391053910639107391083910939110391113911239113391143911539116391173911839119391203912139122391233912439125391263912739128391293913039131391323913339134391353913639137391383913939140391413914239143391443914539146391473914839149391503915139152391533915439155391563915739158391593916039161391623916339164391653916639167391683916939170391713917239173391743917539176391773917839179391803918139182391833918439185391863918739188391893919039191391923919339194391953919639197391983919939200392013920239203392043920539206392073920839209392103921139212392133921439215392163921739218392193922039221392223922339224392253922639227392283922939230392313923239233392343923539236392373923839239392403924139242392433924439245392463924739248392493925039251392523925339254392553925639257392583925939260392613926239263392643926539266392673926839269392703927139272392733927439275392763927739278392793928039281392823928339284392853928639287392883928939290392913929239293392943929539296392973929839299393003930139302393033930439305393063930739308393093931039311393123931339314393153931639317393183931939320393213932239323393243932539326393273932839329393303933139332393333933439335393363933739338393393934039341393423934339344393453934639347393483934939350393513935239353393543935539356393573935839359393603936139362393633936439365393663936739368393693937039371393723937339374393753937639377393783937939380393813938239383393843938539386393873938839389393903939139392393933939439395393963939739398393993940039401394023940339404394053940639407394083940939410394113941239413394143941539416394173941839419394203942139422394233942439425394263942739428394293943039431394323943339434394353943639437394383943939440394413944239443394443944539446394473944839449394503945139452394533945439455394563945739458394593946039461394623946339464394653946639467394683946939470394713947239473394743947539476394773947839479394803948139482394833948439485394863948739488394893949039491394923949339494394953949639497394983949939500395013950239503395043950539506395073950839509395103951139512395133951439515395163951739518395193952039521395223952339524395253952639527395283952939530395313953239533395343953539536395373953839539395403954139542395433954439545395463954739548395493955039551395523955339554395553955639557395583955939560395613956239563395643956539566395673956839569395703957139572395733957439575395763957739578395793958039581395823958339584395853958639587395883958939590395913959239593395943959539596395973959839599396003960139602396033960439605396063960739608396093961039611396123961339614396153961639617396183961939620396213962239623396243962539626396273962839629396303963139632396333963439635396363963739638396393964039641396423964339644396453964639647396483964939650396513965239653396543965539656396573965839659396603966139662396633966439665396663966739668396693967039671396723967339674396753967639677396783967939680396813968239683396843968539686396873968839689396903969139692396933969439695396963969739698396993970039701397023970339704397053970639707397083970939710397113971239713397143971539716397173971839719397203972139722397233972439725397263972739728397293973039731397323973339734397353973639737397383973939740397413974239743397443974539746397473974839749397503975139752397533975439755397563975739758397593976039761397623976339764397653976639767397683976939770397713977239773397743977539776397773977839779397803978139782397833978439785397863978739788397893979039791397923979339794397953979639797397983979939800398013980239803398043980539806398073980839809398103981139812398133981439815398163981739818398193982039821398223982339824398253982639827398283982939830398313983239833398343983539836398373983839839398403984139842398433984439845398463984739848398493985039851398523985339854398553985639857398583985939860398613986239863398643986539866398673986839869398703987139872398733987439875398763987739878398793988039881398823988339884398853988639887398883988939890398913989239893398943989539896398973989839899399003990139902399033990439905399063990739908399093991039911399123991339914399153991639917399183991939920399213992239923399243992539926399273992839929399303993139932399333993439935399363993739938399393994039941399423994339944399453994639947399483994939950399513995239953399543995539956399573995839959399603996139962399633996439965399663996739968399693997039971399723997339974399753997639977399783997939980399813998239983399843998539986399873998839989399903999139992399933999439995399963999739998399994000040001400024000340004400054000640007400084000940010400114001240013400144001540016400174001840019400204002140022400234002440025400264002740028400294003040031400324003340034400354003640037400384003940040400414004240043400444004540046400474004840049400504005140052400534005440055400564005740058400594006040061400624006340064400654006640067400684006940070400714007240073400744007540076400774007840079400804008140082400834008440085400864008740088400894009040091400924009340094400954009640097400984009940100401014010240103401044010540106401074010840109401104011140112401134011440115401164011740118401194012040121401224012340124401254012640127401284012940130401314013240133401344013540136401374013840139401404014140142401434014440145401464014740148401494015040151401524015340154401554015640157401584015940160401614016240163401644016540166401674016840169401704017140172401734017440175401764017740178401794018040181401824018340184401854018640187401884018940190401914019240193401944019540196401974019840199402004020140202402034020440205402064020740208402094021040211402124021340214402154021640217402184021940220402214022240223402244022540226402274022840229402304023140232402334023440235402364023740238402394024040241402424024340244402454024640247402484024940250402514025240253402544025540256402574025840259402604026140262402634026440265402664026740268402694027040271402724027340274402754027640277402784027940280402814028240283402844028540286402874028840289402904029140292402934029440295402964029740298402994030040301403024030340304403054030640307403084030940310403114031240313403144031540316403174031840319403204032140322403234032440325403264032740328403294033040331403324033340334403354033640337403384033940340403414034240343403444034540346403474034840349403504035140352403534035440355403564035740358403594036040361403624036340364403654036640367403684036940370403714037240373403744037540376403774037840379403804038140382403834038440385403864038740388403894039040391403924039340394403954039640397403984039940400404014040240403404044040540406404074040840409404104041140412404134041440415404164041740418404194042040421404224042340424404254042640427404284042940430404314043240433404344043540436404374043840439404404044140442404434044440445404464044740448404494045040451404524045340454404554045640457404584045940460404614046240463404644046540466404674046840469404704047140472404734047440475404764047740478404794048040481404824048340484404854048640487404884048940490404914049240493404944049540496404974049840499405004050140502405034050440505405064050740508405094051040511405124051340514405154051640517405184051940520405214052240523405244052540526405274052840529405304053140532405334053440535405364053740538405394054040541405424054340544405454054640547405484054940550405514055240553405544055540556405574055840559405604056140562405634056440565405664056740568405694057040571405724057340574405754057640577405784057940580405814058240583405844058540586405874058840589405904059140592405934059440595405964059740598405994060040601406024060340604406054060640607406084060940610406114061240613406144061540616406174061840619406204062140622406234062440625406264062740628406294063040631406324063340634406354063640637406384063940640406414064240643406444064540646406474064840649406504065140652406534065440655406564065740658406594066040661406624066340664406654066640667406684066940670406714067240673406744067540676406774067840679406804068140682406834068440685406864068740688406894069040691406924069340694406954069640697406984069940700407014070240703407044070540706407074070840709407104071140712407134071440715407164071740718407194072040721407224072340724407254072640727407284072940730407314073240733407344073540736407374073840739407404074140742407434074440745407464074740748407494075040751407524075340754407554075640757407584075940760407614076240763407644076540766407674076840769407704077140772407734077440775407764077740778407794078040781407824078340784407854078640787407884078940790407914079240793407944079540796407974079840799408004080140802408034080440805408064080740808408094081040811408124081340814408154081640817408184081940820408214082240823408244082540826408274082840829408304083140832408334083440835408364083740838408394084040841408424084340844408454084640847408484084940850408514085240853408544085540856408574085840859408604086140862408634086440865408664086740868408694087040871408724087340874408754087640877408784087940880408814088240883408844088540886408874088840889408904089140892408934089440895408964089740898408994090040901409024090340904409054090640907409084090940910409114091240913409144091540916409174091840919409204092140922409234092440925409264092740928409294093040931409324093340934409354093640937409384093940940409414094240943409444094540946409474094840949409504095140952409534095440955409564095740958409594096040961409624096340964409654096640967409684096940970409714097240973409744097540976409774097840979409804098140982409834098440985409864098740988409894099040991409924099340994409954099640997409984099941000410014100241003410044100541006410074100841009410104101141012410134101441015410164101741018410194102041021410224102341024410254102641027410284102941030410314103241033410344103541036410374103841039410404104141042410434104441045410464104741048410494105041051410524105341054410554105641057410584105941060410614106241063410644106541066410674106841069410704107141072410734107441075410764107741078410794108041081410824108341084410854108641087410884108941090410914109241093410944109541096410974109841099411004110141102411034110441105411064110741108411094111041111411124111341114411154111641117411184111941120411214112241123411244112541126411274112841129411304113141132411334113441135411364113741138411394114041141411424114341144411454114641147411484114941150411514115241153411544115541156411574115841159411604116141162411634116441165411664116741168411694117041171411724117341174411754117641177411784117941180411814118241183411844118541186411874118841189411904119141192411934119441195411964119741198411994120041201412024120341204412054120641207412084120941210412114121241213412144121541216412174121841219412204122141222412234122441225412264122741228412294123041231412324123341234412354123641237412384123941240412414124241243412444124541246412474124841249412504125141252412534125441255412564125741258412594126041261412624126341264412654126641267412684126941270412714127241273412744127541276412774127841279412804128141282412834128441285412864128741288412894129041291412924129341294412954129641297412984129941300413014130241303413044130541306413074130841309413104131141312413134131441315413164131741318413194132041321413224132341324413254132641327413284132941330413314133241333413344133541336413374133841339413404134141342413434134441345413464134741348413494135041351413524135341354413554135641357413584135941360413614136241363413644136541366413674136841369413704137141372413734137441375413764137741378413794138041381413824138341384413854138641387413884138941390413914139241393413944139541396413974139841399414004140141402414034140441405414064140741408414094141041411414124141341414414154141641417414184141941420414214142241423414244142541426414274142841429414304143141432414334143441435414364143741438414394144041441414424144341444414454144641447414484144941450414514145241453414544145541456414574145841459414604146141462414634146441465414664146741468414694147041471414724147341474414754147641477414784147941480414814148241483414844148541486414874148841489414904149141492414934149441495414964149741498414994150041501415024150341504415054150641507415084150941510415114151241513415144151541516415174151841519415204152141522415234152441525415264152741528415294153041531415324153341534415354153641537415384153941540415414154241543415444154541546415474154841549415504155141552415534155441555415564155741558415594156041561415624156341564415654156641567415684156941570415714157241573415744157541576415774157841579415804158141582415834158441585415864158741588415894159041591415924159341594415954159641597415984159941600416014160241603416044160541606416074160841609416104161141612416134161441615416164161741618416194162041621416224162341624416254162641627416284162941630416314163241633416344163541636416374163841639416404164141642416434164441645416464164741648416494165041651416524165341654416554165641657416584165941660416614166241663416644166541666416674166841669416704167141672416734167441675416764167741678416794168041681416824168341684416854168641687416884168941690416914169241693416944169541696416974169841699417004170141702417034170441705417064170741708417094171041711417124171341714417154171641717417184171941720417214172241723417244172541726417274172841729417304173141732417334173441735417364173741738417394174041741417424174341744417454174641747417484174941750417514175241753417544175541756417574175841759417604176141762417634176441765417664176741768417694177041771417724177341774417754177641777417784177941780417814178241783417844178541786417874178841789417904179141792417934179441795417964179741798417994180041801418024180341804418054180641807418084180941810418114181241813418144181541816418174181841819418204182141822418234182441825418264182741828418294183041831418324183341834418354183641837418384183941840418414184241843418444184541846418474184841849418504185141852418534185441855418564185741858418594186041861418624186341864418654186641867418684186941870418714187241873418744187541876418774187841879418804188141882418834188441885418864188741888418894189041891418924189341894418954189641897418984189941900419014190241903419044190541906419074190841909419104191141912419134191441915419164191741918419194192041921419224192341924419254192641927419284192941930419314193241933419344193541936419374193841939419404194141942419434194441945419464194741948419494195041951419524195341954419554195641957419584195941960419614196241963419644196541966419674196841969419704197141972419734197441975419764197741978419794198041981419824198341984419854198641987419884198941990419914199241993419944199541996419974199841999420004200142002420034200442005420064200742008420094201042011420124201342014420154201642017420184201942020420214202242023420244202542026420274202842029420304203142032420334203442035420364203742038420394204042041420424204342044420454204642047420484204942050420514205242053420544205542056420574205842059420604206142062420634206442065420664206742068420694207042071420724207342074420754207642077420784207942080420814208242083420844208542086420874208842089420904209142092420934209442095420964209742098420994210042101421024210342104421054210642107421084210942110421114211242113421144211542116421174211842119421204212142122421234212442125421264212742128421294213042131421324213342134421354213642137421384213942140421414214242143421444214542146421474214842149421504215142152421534215442155421564215742158421594216042161421624216342164421654216642167421684216942170421714217242173421744217542176421774217842179421804218142182421834218442185421864218742188421894219042191421924219342194421954219642197421984219942200422014220242203422044220542206422074220842209422104221142212422134221442215422164221742218422194222042221422224222342224422254222642227422284222942230422314223242233422344223542236422374223842239422404224142242422434224442245422464224742248422494225042251422524225342254422554225642257422584225942260422614226242263422644226542266422674226842269422704227142272422734227442275422764227742278422794228042281422824228342284422854228642287422884228942290422914229242293422944229542296422974229842299423004230142302423034230442305423064230742308423094231042311423124231342314423154231642317423184231942320423214232242323423244232542326423274232842329423304233142332423334233442335423364233742338423394234042341423424234342344423454234642347423484234942350423514235242353423544235542356423574235842359423604236142362423634236442365423664236742368423694237042371423724237342374423754237642377423784237942380423814238242383423844238542386423874238842389423904239142392423934239442395423964239742398423994240042401424024240342404424054240642407424084240942410424114241242413424144241542416424174241842419424204242142422424234242442425424264242742428424294243042431424324243342434424354243642437424384243942440424414244242443424444244542446424474244842449424504245142452424534245442455424564245742458424594246042461424624246342464424654246642467424684246942470424714247242473424744247542476424774247842479424804248142482424834248442485424864248742488424894249042491424924249342494424954249642497424984249942500425014250242503425044250542506425074250842509425104251142512425134251442515425164251742518425194252042521425224252342524425254252642527425284252942530425314253242533425344253542536425374253842539425404254142542425434254442545425464254742548425494255042551425524255342554425554255642557425584255942560425614256242563425644256542566425674256842569425704257142572425734257442575425764257742578425794258042581425824258342584425854258642587425884258942590425914259242593425944259542596425974259842599426004260142602426034260442605426064260742608426094261042611426124261342614426154261642617426184261942620426214262242623426244262542626426274262842629426304263142632426334263442635426364263742638426394264042641426424264342644426454264642647426484264942650426514265242653426544265542656426574265842659426604266142662426634266442665426664266742668426694267042671426724267342674426754267642677426784267942680426814268242683426844268542686426874268842689426904269142692426934269442695426964269742698426994270042701427024270342704427054270642707427084270942710427114271242713427144271542716427174271842719427204272142722427234272442725427264272742728427294273042731427324273342734427354273642737427384273942740427414274242743427444274542746427474274842749427504275142752427534275442755427564275742758427594276042761427624276342764427654276642767427684276942770427714277242773427744277542776427774277842779427804278142782427834278442785427864278742788427894279042791427924279342794427954279642797427984279942800428014280242803428044280542806428074280842809428104281142812428134281442815428164281742818428194282042821428224282342824428254282642827428284282942830428314283242833428344283542836428374283842839428404284142842428434284442845428464284742848428494285042851428524285342854428554285642857428584285942860428614286242863428644286542866428674286842869428704287142872428734287442875428764287742878428794288042881428824288342884428854288642887428884288942890428914289242893428944289542896428974289842899429004290142902429034290442905429064290742908429094291042911429124291342914429154291642917429184291942920429214292242923429244292542926429274292842929429304293142932429334293442935429364293742938429394294042941429424294342944429454294642947429484294942950429514295242953429544295542956429574295842959429604296142962429634296442965429664296742968429694297042971429724297342974429754297642977429784297942980429814298242983429844298542986429874298842989429904299142992429934299442995429964299742998429994300043001430024300343004430054300643007430084300943010430114301243013430144301543016430174301843019430204302143022430234302443025430264302743028430294303043031430324303343034430354303643037430384303943040430414304243043430444304543046430474304843049430504305143052430534305443055430564305743058430594306043061430624306343064430654306643067430684306943070430714307243073430744307543076430774307843079430804308143082430834308443085430864308743088430894309043091430924309343094430954309643097430984309943100431014310243103431044310543106431074310843109431104311143112431134311443115431164311743118431194312043121431224312343124431254312643127431284312943130431314313243133431344313543136431374313843139431404314143142431434314443145431464314743148431494315043151431524315343154431554315643157431584315943160431614316243163431644316543166431674316843169431704317143172431734317443175431764317743178431794318043181431824318343184431854318643187431884318943190431914319243193431944319543196431974319843199432004320143202432034320443205432064320743208432094321043211432124321343214432154321643217432184321943220432214322243223432244322543226432274322843229432304323143232432334323443235432364323743238432394324043241432424324343244432454324643247432484324943250432514325243253432544325543256432574325843259432604326143262432634326443265432664326743268432694327043271432724327343274432754327643277432784327943280432814328243283432844328543286432874328843289432904329143292432934329443295432964329743298432994330043301433024330343304433054330643307433084330943310433114331243313433144331543316433174331843319433204332143322433234332443325433264332743328433294333043331433324333343334433354333643337433384333943340433414334243343433444334543346433474334843349433504335143352433534335443355433564335743358433594336043361433624336343364433654336643367433684336943370433714337243373433744337543376433774337843379433804338143382433834338443385433864338743388433894339043391433924339343394433954339643397433984339943400434014340243403434044340543406434074340843409434104341143412434134341443415434164341743418434194342043421434224342343424434254342643427434284342943430434314343243433434344343543436434374343843439434404344143442434434344443445434464344743448434494345043451434524345343454434554345643457434584345943460434614346243463434644346543466434674346843469434704347143472434734347443475434764347743478434794348043481434824348343484434854348643487434884348943490434914349243493434944349543496434974349843499435004350143502435034350443505435064350743508435094351043511435124351343514435154351643517435184351943520435214352243523435244352543526435274352843529435304353143532435334353443535435364353743538435394354043541435424354343544435454354643547435484354943550435514355243553435544355543556435574355843559435604356143562435634356443565435664356743568435694357043571435724357343574435754357643577435784357943580435814358243583435844358543586435874358843589435904359143592435934359443595435964359743598435994360043601436024360343604436054360643607436084360943610436114361243613436144361543616436174361843619436204362143622436234362443625436264362743628436294363043631436324363343634436354363643637436384363943640436414364243643436444364543646436474364843649436504365143652436534365443655436564365743658436594366043661436624366343664436654366643667436684366943670436714367243673436744367543676436774367843679436804368143682436834368443685436864368743688436894369043691436924369343694436954369643697436984369943700437014370243703437044370543706437074370843709437104371143712437134371443715437164371743718437194372043721437224372343724437254372643727437284372943730437314373243733437344373543736437374373843739437404374143742437434374443745437464374743748437494375043751437524375343754437554375643757437584375943760437614376243763437644376543766437674376843769437704377143772437734377443775437764377743778437794378043781437824378343784437854378643787437884378943790437914379243793437944379543796437974379843799438004380143802438034380443805438064380743808438094381043811438124381343814438154381643817438184381943820438214382243823438244382543826438274382843829438304383143832438334383443835438364383743838438394384043841438424384343844438454384643847438484384943850438514385243853438544385543856438574385843859438604386143862438634386443865438664386743868438694387043871438724387343874438754387643877438784387943880438814388243883438844388543886438874388843889438904389143892438934389443895438964389743898438994390043901439024390343904439054390643907439084390943910439114391243913439144391543916439174391843919439204392143922439234392443925439264392743928439294393043931439324393343934439354393643937439384393943940439414394243943439444394543946439474394843949439504395143952439534395443955439564395743958439594396043961439624396343964439654396643967439684396943970439714397243973439744397543976439774397843979439804398143982439834398443985439864398743988439894399043991439924399343994439954399643997439984399944000440014400244003440044400544006440074400844009440104401144012440134401444015440164401744018440194402044021440224402344024440254402644027440284402944030440314403244033440344403544036440374403844039440404404144042440434404444045440464404744048440494405044051440524405344054440554405644057440584405944060440614406244063440644406544066440674406844069440704407144072440734407444075440764407744078440794408044081440824408344084440854408644087440884408944090440914409244093440944409544096440974409844099441004410144102441034410444105441064410744108441094411044111441124411344114441154411644117441184411944120441214412244123441244412544126441274412844129441304413144132441334413444135441364413744138441394414044141441424414344144441454414644147441484414944150441514415244153441544415544156441574415844159441604416144162441634416444165441664416744168441694417044171441724417344174441754417644177441784417944180441814418244183441844418544186441874418844189441904419144192441934419444195441964419744198441994420044201442024420344204442054420644207442084420944210442114421244213442144421544216442174421844219442204422144222442234422444225442264422744228442294423044231442324423344234442354423644237442384423944240442414424244243442444424544246442474424844249442504425144252442534425444255442564425744258442594426044261442624426344264442654426644267442684426944270442714427244273442744427544276442774427844279442804428144282442834428444285442864428744288442894429044291442924429344294442954429644297442984429944300443014430244303443044430544306443074430844309443104431144312443134431444315443164431744318443194432044321443224432344324443254432644327443284432944330443314433244333443344433544336443374433844339443404434144342443434434444345443464434744348443494435044351443524435344354443554435644357443584435944360443614436244363443644436544366443674436844369443704437144372443734437444375443764437744378443794438044381443824438344384443854438644387443884438944390443914439244393443944439544396443974439844399444004440144402444034440444405444064440744408444094441044411444124441344414444154441644417444184441944420444214442244423444244442544426444274442844429444304443144432444334443444435444364443744438444394444044441444424444344444444454444644447444484444944450444514445244453444544445544456444574445844459444604446144462444634446444465444664446744468444694447044471444724447344474444754447644477444784447944480444814448244483444844448544486444874448844489444904449144492444934449444495444964449744498444994450044501445024450344504445054450644507445084450944510445114451244513445144451544516445174451844519445204452144522445234452444525445264452744528445294453044531445324453344534445354453644537445384453944540445414454244543445444454544546445474454844549445504455144552445534455444555445564455744558445594456044561445624456344564445654456644567445684456944570445714457244573445744457544576445774457844579445804458144582445834458444585445864458744588445894459044591445924459344594445954459644597445984459944600446014460244603446044460544606446074460844609446104461144612446134461444615446164461744618446194462044621446224462344624446254462644627446284462944630446314463244633446344463544636446374463844639446404464144642446434464444645446464464744648446494465044651446524465344654446554465644657446584465944660446614466244663446644466544666446674466844669446704467144672446734467444675446764467744678446794468044681446824468344684446854468644687446884468944690446914469244693446944469544696446974469844699447004470144702447034470444705447064470744708447094471044711447124471344714447154471644717447184471944720447214472244723447244472544726447274472844729447304473144732447334473444735447364473744738447394474044741447424474344744447454474644747447484474944750447514475244753447544475544756447574475844759447604476144762447634476444765447664476744768447694477044771447724477344774447754477644777447784477944780447814478244783447844478544786447874478844789447904479144792447934479444795447964479744798447994480044801448024480344804448054480644807448084480944810448114481244813448144481544816448174481844819448204482144822448234482444825448264482744828448294483044831448324483344834448354483644837448384483944840448414484244843448444484544846448474484844849448504485144852448534485444855448564485744858448594486044861448624486344864448654486644867448684486944870448714487244873448744487544876448774487844879448804488144882448834488444885448864488744888448894489044891448924489344894448954489644897448984489944900449014490244903449044490544906449074490844909449104491144912449134491444915449164491744918449194492044921449224492344924449254492644927449284492944930449314493244933449344493544936449374493844939449404494144942449434494444945449464494744948449494495044951449524495344954449554495644957449584495944960449614496244963449644496544966449674496844969449704497144972449734497444975449764497744978449794498044981449824498344984449854498644987449884498944990449914499244993449944499544996449974499844999450004500145002450034500445005450064500745008450094501045011450124501345014450154501645017450184501945020450214502245023450244502545026450274502845029450304503145032450334503445035450364503745038450394504045041450424504345044450454504645047450484504945050450514505245053450544505545056450574505845059450604506145062450634506445065450664506745068450694507045071450724507345074450754507645077450784507945080450814508245083450844508545086450874508845089450904509145092450934509445095450964509745098450994510045101451024510345104451054510645107451084510945110451114511245113451144511545116451174511845119451204512145122451234512445125451264512745128451294513045131451324513345134451354513645137451384513945140451414514245143451444514545146451474514845149451504515145152451534515445155451564515745158451594516045161451624516345164451654516645167451684516945170451714517245173451744517545176451774517845179451804518145182451834518445185451864518745188451894519045191451924519345194451954519645197451984519945200452014520245203452044520545206452074520845209452104521145212452134521445215452164521745218452194522045221452224522345224452254522645227452284522945230452314523245233452344523545236452374523845239452404524145242452434524445245452464524745248452494525045251452524525345254452554525645257452584525945260452614526245263452644526545266452674526845269452704527145272452734527445275452764527745278452794528045281452824528345284452854528645287452884528945290452914529245293452944529545296452974529845299453004530145302453034530445305453064530745308453094531045311453124531345314453154531645317453184531945320453214532245323453244532545326453274532845329453304533145332453334533445335453364533745338453394534045341453424534345344453454534645347453484534945350453514535245353453544535545356453574535845359453604536145362453634536445365453664536745368453694537045371453724537345374453754537645377453784537945380453814538245383453844538545386453874538845389453904539145392453934539445395453964539745398453994540045401454024540345404454054540645407454084540945410454114541245413454144541545416454174541845419454204542145422454234542445425454264542745428454294543045431454324543345434454354543645437454384543945440454414544245443454444544545446454474544845449454504545145452454534545445455454564545745458454594546045461454624546345464454654546645467454684546945470454714547245473454744547545476454774547845479454804548145482454834548445485454864548745488454894549045491454924549345494454954549645497454984549945500455014550245503455044550545506455074550845509455104551145512455134551445515455164551745518455194552045521455224552345524455254552645527455284552945530455314553245533455344553545536455374553845539455404554145542455434554445545455464554745548455494555045551455524555345554455554555645557455584555945560455614556245563455644556545566455674556845569455704557145572455734557445575455764557745578455794558045581455824558345584455854558645587455884558945590455914559245593455944559545596455974559845599456004560145602456034560445605456064560745608456094561045611456124561345614456154561645617456184561945620456214562245623456244562545626456274562845629456304563145632456334563445635456364563745638456394564045641456424564345644456454564645647456484564945650456514565245653456544565545656456574565845659456604566145662456634566445665456664566745668456694567045671456724567345674456754567645677456784567945680456814568245683456844568545686456874568845689456904569145692456934569445695456964569745698456994570045701457024570345704457054570645707457084570945710457114571245713457144571545716457174571845719457204572145722457234572445725457264572745728457294573045731457324573345734457354573645737457384573945740457414574245743457444574545746457474574845749457504575145752457534575445755457564575745758457594576045761457624576345764457654576645767457684576945770457714577245773457744577545776457774577845779457804578145782457834578445785457864578745788457894579045791457924579345794457954579645797457984579945800458014580245803458044580545806458074580845809458104581145812458134581445815458164581745818458194582045821458224582345824458254582645827458284582945830458314583245833458344583545836458374583845839458404584145842458434584445845458464584745848458494585045851458524585345854458554585645857458584585945860458614586245863458644586545866458674586845869458704587145872458734587445875458764587745878458794588045881458824588345884458854588645887458884588945890458914589245893458944589545896458974589845899459004590145902459034590445905459064590745908459094591045911459124591345914459154591645917459184591945920459214592245923459244592545926459274592845929459304593145932459334593445935459364593745938459394594045941459424594345944459454594645947459484594945950459514595245953459544595545956459574595845959459604596145962459634596445965459664596745968459694597045971459724597345974459754597645977459784597945980459814598245983459844598545986459874598845989459904599145992459934599445995459964599745998459994600046001460024600346004460054600646007460084600946010460114601246013460144601546016460174601846019460204602146022460234602446025460264602746028460294603046031460324603346034460354603646037460384603946040460414604246043460444604546046460474604846049460504605146052460534605446055460564605746058460594606046061460624606346064460654606646067460684606946070460714607246073460744607546076460774607846079460804608146082460834608446085460864608746088460894609046091460924609346094460954609646097460984609946100461014610246103461044610546106461074610846109461104611146112461134611446115461164611746118461194612046121461224612346124461254612646127461284612946130461314613246133461344613546136461374613846139461404614146142461434614446145461464614746148461494615046151461524615346154461554615646157461584615946160461614616246163461644616546166461674616846169461704617146172461734617446175461764617746178461794618046181461824618346184461854618646187461884618946190461914619246193461944619546196461974619846199462004620146202462034620446205462064620746208462094621046211462124621346214462154621646217462184621946220462214622246223462244622546226462274622846229462304623146232462334623446235462364623746238462394624046241462424624346244462454624646247462484624946250462514625246253462544625546256462574625846259462604626146262462634626446265462664626746268462694627046271462724627346274462754627646277462784627946280462814628246283462844628546286462874628846289462904629146292462934629446295462964629746298462994630046301463024630346304463054630646307463084630946310463114631246313463144631546316463174631846319463204632146322463234632446325463264632746328463294633046331463324633346334463354633646337463384633946340463414634246343463444634546346463474634846349463504635146352463534635446355463564635746358463594636046361463624636346364463654636646367463684636946370463714637246373463744637546376463774637846379463804638146382463834638446385463864638746388463894639046391463924639346394463954639646397463984639946400464014640246403464044640546406464074640846409464104641146412464134641446415464164641746418464194642046421464224642346424464254642646427464284642946430464314643246433464344643546436464374643846439464404644146442464434644446445464464644746448464494645046451464524645346454464554645646457464584645946460464614646246463464644646546466464674646846469464704647146472464734647446475464764647746478464794648046481464824648346484464854648646487464884648946490464914649246493464944649546496464974649846499465004650146502465034650446505465064650746508465094651046511465124651346514465154651646517465184651946520465214652246523465244652546526465274652846529465304653146532465334653446535465364653746538465394654046541465424654346544465454654646547465484654946550465514655246553465544655546556465574655846559465604656146562465634656446565465664656746568465694657046571465724657346574465754657646577465784657946580465814658246583465844658546586465874658846589465904659146592465934659446595465964659746598465994660046601466024660346604466054660646607466084660946610466114661246613466144661546616466174661846619466204662146622466234662446625466264662746628466294663046631466324663346634466354663646637466384663946640466414664246643466444664546646466474664846649466504665146652466534665446655466564665746658466594666046661466624666346664466654666646667466684666946670466714667246673466744667546676466774667846679466804668146682466834668446685466864668746688466894669046691466924669346694466954669646697466984669946700467014670246703467044670546706467074670846709467104671146712467134671446715467164671746718467194672046721467224672346724467254672646727467284672946730467314673246733467344673546736467374673846739467404674146742467434674446745467464674746748467494675046751467524675346754467554675646757467584675946760467614676246763467644676546766467674676846769467704677146772467734677446775467764677746778467794678046781467824678346784467854678646787467884678946790467914679246793467944679546796467974679846799468004680146802468034680446805468064680746808468094681046811468124681346814468154681646817468184681946820468214682246823468244682546826468274682846829468304683146832468334683446835468364683746838468394684046841468424684346844468454684646847468484684946850468514685246853468544685546856468574685846859468604686146862468634686446865468664686746868468694687046871468724687346874468754687646877468784687946880468814688246883468844688546886468874688846889468904689146892468934689446895468964689746898468994690046901469024690346904469054690646907469084690946910469114691246913469144691546916469174691846919469204692146922469234692446925469264692746928469294693046931469324693346934469354693646937469384693946940469414694246943469444694546946469474694846949469504695146952469534695446955469564695746958469594696046961469624696346964469654696646967469684696946970469714697246973469744697546976469774697846979469804698146982469834698446985469864698746988469894699046991469924699346994469954699646997469984699947000470014700247003470044700547006470074700847009470104701147012470134701447015470164701747018470194702047021470224702347024470254702647027470284702947030470314703247033470344703547036470374703847039470404704147042470434704447045470464704747048470494705047051470524705347054470554705647057470584705947060470614706247063470644706547066470674706847069470704707147072470734707447075470764707747078470794708047081470824708347084470854708647087470884708947090470914709247093470944709547096470974709847099471004710147102471034710447105471064710747108471094711047111471124711347114471154711647117471184711947120471214712247123471244712547126471274712847129471304713147132471334713447135471364713747138471394714047141471424714347144471454714647147471484714947150471514715247153471544715547156471574715847159471604716147162471634716447165471664716747168471694717047171471724717347174471754717647177471784717947180471814718247183471844718547186471874718847189471904719147192471934719447195471964719747198471994720047201472024720347204472054720647207472084720947210472114721247213472144721547216472174721847219472204722147222472234722447225472264722747228472294723047231472324723347234472354723647237472384723947240472414724247243472444724547246472474724847249472504725147252472534725447255472564725747258472594726047261472624726347264472654726647267472684726947270472714727247273472744727547276472774727847279472804728147282472834728447285472864728747288472894729047291472924729347294472954729647297472984729947300473014730247303473044730547306473074730847309473104731147312473134731447315473164731747318473194732047321473224732347324473254732647327473284732947330473314733247333473344733547336473374733847339473404734147342473434734447345473464734747348473494735047351473524735347354473554735647357473584735947360473614736247363473644736547366473674736847369473704737147372473734737447375473764737747378473794738047381473824738347384473854738647387473884738947390473914739247393473944739547396473974739847399474004740147402474034740447405474064740747408474094741047411474124741347414474154741647417474184741947420474214742247423474244742547426474274742847429474304743147432474334743447435474364743747438474394744047441474424744347444474454744647447474484744947450474514745247453474544745547456474574745847459474604746147462474634746447465474664746747468474694747047471474724747347474474754747647477474784747947480474814748247483474844748547486474874748847489474904749147492474934749447495474964749747498474994750047501475024750347504475054750647507475084750947510475114751247513475144751547516475174751847519475204752147522475234752447525475264752747528475294753047531475324753347534475354753647537475384753947540475414754247543475444754547546475474754847549475504755147552475534755447555475564755747558475594756047561475624756347564475654756647567475684756947570475714757247573475744757547576475774757847579475804758147582475834758447585475864758747588475894759047591475924759347594475954759647597475984759947600476014760247603476044760547606476074760847609476104761147612476134761447615476164761747618476194762047621476224762347624476254762647627476284762947630476314763247633476344763547636476374763847639476404764147642476434764447645476464764747648476494765047651476524765347654476554765647657476584765947660476614766247663476644766547666476674766847669476704767147672476734767447675476764767747678476794768047681476824768347684476854768647687476884768947690476914769247693476944769547696476974769847699477004770147702477034770447705477064770747708477094771047711477124771347714477154771647717477184771947720477214772247723477244772547726477274772847729477304773147732477334773447735477364773747738477394774047741477424774347744477454774647747477484774947750477514775247753477544775547756477574775847759477604776147762477634776447765477664776747768477694777047771477724777347774477754777647777477784777947780477814778247783477844778547786477874778847789477904779147792477934779447795477964779747798477994780047801478024780347804478054780647807478084780947810478114781247813478144781547816478174781847819478204782147822478234782447825478264782747828478294783047831478324783347834478354783647837478384783947840478414784247843478444784547846478474784847849478504785147852478534785447855478564785747858478594786047861478624786347864478654786647867478684786947870478714787247873478744787547876478774787847879478804788147882478834788447885478864788747888478894789047891478924789347894478954789647897478984789947900479014790247903479044790547906479074790847909479104791147912479134791447915479164791747918479194792047921479224792347924479254792647927479284792947930479314793247933479344793547936479374793847939479404794147942479434794447945479464794747948479494795047951479524795347954479554795647957479584795947960479614796247963479644796547966479674796847969479704797147972479734797447975479764797747978479794798047981479824798347984479854798647987479884798947990479914799247993479944799547996479974799847999480004800148002480034800448005480064800748008480094801048011480124801348014480154801648017480184801948020480214802248023480244802548026480274802848029480304803148032480334803448035480364803748038480394804048041480424804348044480454804648047480484804948050480514805248053480544805548056480574805848059480604806148062480634806448065480664806748068480694807048071480724807348074480754807648077480784807948080480814808248083480844808548086480874808848089480904809148092480934809448095480964809748098480994810048101481024810348104481054810648107481084810948110481114811248113481144811548116481174811848119481204812148122481234812448125481264812748128481294813048131481324813348134481354813648137481384813948140481414814248143481444814548146481474814848149481504815148152481534815448155481564815748158481594816048161481624816348164481654816648167481684816948170481714817248173481744817548176481774817848179481804818148182481834818448185481864818748188481894819048191481924819348194481954819648197481984819948200482014820248203482044820548206482074820848209482104821148212482134821448215482164821748218482194822048221482224822348224482254822648227482284822948230482314823248233482344823548236482374823848239482404824148242482434824448245482464824748248482494825048251482524825348254482554825648257482584825948260482614826248263482644826548266482674826848269482704827148272482734827448275482764827748278482794828048281482824828348284482854828648287482884828948290482914829248293482944829548296482974829848299483004830148302483034830448305483064830748308483094831048311483124831348314483154831648317483184831948320483214832248323483244832548326483274832848329483304833148332483334833448335483364833748338483394834048341483424834348344483454834648347483484834948350483514835248353483544835548356483574835848359483604836148362483634836448365483664836748368483694837048371483724837348374483754837648377483784837948380483814838248383483844838548386483874838848389483904839148392483934839448395483964839748398483994840048401484024840348404484054840648407484084840948410484114841248413484144841548416484174841848419484204842148422484234842448425484264842748428484294843048431484324843348434484354843648437484384843948440484414844248443484444844548446484474844848449484504845148452484534845448455484564845748458484594846048461484624846348464484654846648467484684846948470484714847248473484744847548476484774847848479484804848148482484834848448485484864848748488484894849048491484924849348494484954849648497484984849948500485014850248503485044850548506485074850848509485104851148512485134851448515485164851748518485194852048521485224852348524485254852648527485284852948530485314853248533485344853548536485374853848539485404854148542485434854448545485464854748548485494855048551485524855348554485554855648557485584855948560485614856248563485644856548566485674856848569485704857148572485734857448575485764857748578485794858048581485824858348584485854858648587485884858948590485914859248593485944859548596485974859848599486004860148602486034860448605486064860748608486094861048611486124861348614486154861648617486184861948620486214862248623486244862548626486274862848629486304863148632486334863448635486364863748638486394864048641486424864348644486454864648647486484864948650486514865248653486544865548656486574865848659486604866148662486634866448665486664866748668486694867048671486724867348674486754867648677486784867948680486814868248683486844868548686486874868848689486904869148692486934869448695486964869748698486994870048701487024870348704487054870648707487084870948710487114871248713487144871548716487174871848719487204872148722487234872448725487264872748728487294873048731487324873348734487354873648737487384873948740487414874248743487444874548746487474874848749487504875148752487534875448755487564875748758487594876048761487624876348764487654876648767487684876948770487714877248773487744877548776487774877848779487804878148782487834878448785487864878748788487894879048791487924879348794487954879648797487984879948800488014880248803488044880548806488074880848809488104881148812488134881448815488164881748818488194882048821488224882348824488254882648827488284882948830488314883248833488344883548836488374883848839488404884148842488434884448845488464884748848488494885048851488524885348854488554885648857488584885948860488614886248863488644886548866488674886848869488704887148872488734887448875488764887748878488794888048881488824888348884488854888648887488884888948890488914889248893488944889548896488974889848899489004890148902489034890448905489064890748908489094891048911489124891348914489154891648917489184891948920489214892248923489244892548926489274892848929489304893148932489334893448935489364893748938489394894048941489424894348944489454894648947489484894948950489514895248953489544895548956489574895848959489604896148962489634896448965489664896748968489694897048971489724897348974489754897648977489784897948980489814898248983489844898548986489874898848989489904899148992489934899448995489964899748998489994900049001490024900349004490054900649007490084900949010490114901249013490144901549016490174901849019490204902149022490234902449025490264902749028490294903049031490324903349034490354903649037490384903949040490414904249043490444904549046490474904849049490504905149052490534905449055490564905749058490594906049061490624906349064490654906649067490684906949070490714907249073490744907549076490774907849079490804908149082490834908449085490864908749088490894909049091490924909349094490954909649097490984909949100491014910249103491044910549106491074910849109491104911149112491134911449115491164911749118491194912049121491224912349124491254912649127491284912949130491314913249133491344913549136491374913849139491404914149142491434914449145491464914749148491494915049151491524915349154491554915649157491584915949160491614916249163491644916549166491674916849169491704917149172491734917449175491764917749178491794918049181491824918349184491854918649187491884918949190491914919249193491944919549196491974919849199492004920149202492034920449205492064920749208492094921049211492124921349214492154921649217492184921949220492214922249223492244922549226492274922849229492304923149232492334923449235492364923749238492394924049241492424924349244492454924649247492484924949250492514925249253492544925549256492574925849259492604926149262492634926449265492664926749268492694927049271492724927349274492754927649277492784927949280492814928249283492844928549286492874928849289492904929149292492934929449295492964929749298492994930049301493024930349304493054930649307493084930949310493114931249313493144931549316493174931849319493204932149322493234932449325493264932749328493294933049331493324933349334493354933649337493384933949340493414934249343493444934549346493474934849349493504935149352493534935449355493564935749358493594936049361493624936349364493654936649367493684936949370493714937249373493744937549376493774937849379493804938149382493834938449385493864938749388493894939049391493924939349394493954939649397493984939949400494014940249403494044940549406494074940849409494104941149412494134941449415494164941749418494194942049421494224942349424494254942649427494284942949430494314943249433494344943549436494374943849439494404944149442494434944449445494464944749448494494945049451494524945349454494554945649457494584945949460494614946249463494644946549466494674946849469494704947149472494734947449475494764947749478494794948049481494824948349484494854948649487494884948949490494914949249493494944949549496494974949849499495004950149502495034950449505495064950749508495094951049511495124951349514495154951649517495184951949520495214952249523495244952549526495274952849529495304953149532495334953449535495364953749538495394954049541495424954349544495454954649547495484954949550495514955249553495544955549556495574955849559495604956149562495634956449565495664956749568495694957049571495724957349574495754957649577495784957949580495814958249583495844958549586495874958849589495904959149592495934959449595495964959749598495994960049601496024960349604496054960649607496084960949610496114961249613496144961549616496174961849619496204962149622496234962449625496264962749628496294963049631496324963349634496354963649637496384963949640496414964249643496444964549646496474964849649496504965149652496534965449655496564965749658496594966049661496624966349664496654966649667496684966949670496714967249673496744967549676496774967849679496804968149682496834968449685496864968749688496894969049691496924969349694496954969649697496984969949700497014970249703497044970549706497074970849709497104971149712497134971449715497164971749718497194972049721497224972349724497254972649727497284972949730497314973249733497344973549736497374973849739497404974149742497434974449745497464974749748497494975049751497524975349754497554975649757497584975949760497614976249763497644976549766497674976849769497704977149772497734977449775497764977749778497794978049781497824978349784497854978649787497884978949790497914979249793497944979549796497974979849799498004980149802498034980449805498064980749808498094981049811498124981349814498154981649817498184981949820498214982249823498244982549826498274982849829498304983149832498334983449835498364983749838498394984049841498424984349844498454984649847498484984949850498514985249853498544985549856498574985849859498604986149862498634986449865498664986749868498694987049871498724987349874498754987649877498784987949880498814988249883498844988549886498874988849889498904989149892498934989449895498964989749898498994990049901499024990349904499054990649907499084990949910499114991249913499144991549916499174991849919499204992149922499234992449925499264992749928499294993049931499324993349934499354993649937499384993949940499414994249943499444994549946499474994849949499504995149952499534995449955499564995749958499594996049961499624996349964499654996649967499684996949970499714997249973499744997549976499774997849979499804998149982499834998449985499864998749988499894999049991499924999349994499954999649997499984999950000500015000250003500045000550006500075000850009500105001150012500135001450015500165001750018500195002050021500225002350024500255002650027500285002950030500315003250033500345003550036500375003850039500405004150042500435004450045500465004750048500495005050051500525005350054500555005650057500585005950060500615006250063500645006550066500675006850069500705007150072500735007450075500765007750078500795008050081500825008350084500855008650087500885008950090500915009250093500945009550096500975009850099501005010150102501035010450105501065010750108501095011050111501125011350114501155011650117501185011950120501215012250123501245012550126501275012850129501305013150132501335013450135501365013750138501395014050141501425014350144501455014650147501485014950150501515015250153501545015550156501575015850159501605016150162501635016450165501665016750168501695017050171501725017350174501755017650177501785017950180501815018250183501845018550186501875018850189501905019150192501935019450195501965019750198501995020050201502025020350204502055020650207502085020950210502115021250213502145021550216502175021850219502205022150222502235022450225502265022750228502295023050231502325023350234502355023650237502385023950240502415024250243502445024550246502475024850249502505025150252502535025450255502565025750258502595026050261502625026350264502655026650267502685026950270502715027250273502745027550276502775027850279502805028150282502835028450285502865028750288502895029050291502925029350294502955029650297502985029950300503015030250303503045030550306503075030850309503105031150312503135031450315503165031750318503195032050321503225032350324503255032650327503285032950330503315033250333503345033550336503375033850339503405034150342503435034450345503465034750348503495035050351503525035350354503555035650357503585035950360503615036250363503645036550366503675036850369503705037150372503735037450375503765037750378503795038050381503825038350384503855038650387503885038950390503915039250393503945039550396503975039850399504005040150402504035040450405504065040750408504095041050411504125041350414504155041650417504185041950420504215042250423504245042550426504275042850429504305043150432504335043450435504365043750438504395044050441504425044350444504455044650447504485044950450504515045250453504545045550456504575045850459504605046150462504635046450465504665046750468504695047050471504725047350474504755047650477504785047950480504815048250483504845048550486504875048850489504905049150492504935049450495504965049750498504995050050501505025050350504505055050650507505085050950510505115051250513505145051550516505175051850519505205052150522505235052450525505265052750528505295053050531505325053350534505355053650537505385053950540505415054250543505445054550546505475054850549505505055150552505535055450555505565055750558505595056050561505625056350564505655056650567505685056950570505715057250573505745057550576505775057850579505805058150582505835058450585505865058750588505895059050591505925059350594505955059650597505985059950600506015060250603506045060550606506075060850609506105061150612506135061450615506165061750618506195062050621506225062350624506255062650627506285062950630506315063250633506345063550636506375063850639506405064150642506435064450645506465064750648506495065050651506525065350654506555065650657506585065950660506615066250663506645066550666506675066850669506705067150672506735067450675506765067750678506795068050681506825068350684506855068650687506885068950690506915069250693506945069550696506975069850699507005070150702507035070450705507065070750708507095071050711507125071350714507155071650717507185071950720507215072250723507245072550726507275072850729507305073150732507335073450735507365073750738507395074050741507425074350744507455074650747507485074950750507515075250753507545075550756507575075850759507605076150762507635076450765507665076750768507695077050771507725077350774507755077650777507785077950780507815078250783507845078550786507875078850789507905079150792507935079450795507965079750798507995080050801508025080350804508055080650807508085080950810508115081250813508145081550816508175081850819508205082150822508235082450825508265082750828508295083050831508325083350834508355083650837508385083950840508415084250843508445084550846508475084850849508505085150852508535085450855508565085750858508595086050861508625086350864508655086650867508685086950870508715087250873508745087550876508775087850879508805088150882508835088450885508865088750888508895089050891508925089350894508955089650897508985089950900509015090250903509045090550906509075090850909509105091150912509135091450915509165091750918509195092050921509225092350924509255092650927509285092950930509315093250933509345093550936509375093850939509405094150942509435094450945509465094750948509495095050951509525095350954509555095650957509585095950960509615096250963509645096550966509675096850969509705097150972509735097450975509765097750978509795098050981509825098350984509855098650987509885098950990509915099250993509945099550996509975099850999510005100151002510035100451005510065100751008510095101051011510125101351014510155101651017510185101951020510215102251023510245102551026510275102851029510305103151032510335103451035510365103751038510395104051041510425104351044510455104651047510485104951050510515105251053510545105551056510575105851059510605106151062510635106451065510665106751068510695107051071510725107351074510755107651077510785107951080510815108251083510845108551086510875108851089510905109151092510935109451095510965109751098510995110051101511025110351104511055110651107511085110951110511115111251113511145111551116511175111851119511205112151122511235112451125511265112751128511295113051131511325113351134511355113651137511385113951140511415114251143511445114551146511475114851149511505115151152511535115451155511565115751158511595116051161511625116351164511655116651167511685116951170511715117251173511745117551176511775117851179511805118151182511835118451185511865118751188511895119051191511925119351194511955119651197511985119951200512015120251203512045120551206512075120851209512105121151212512135121451215512165121751218512195122051221512225122351224512255122651227512285122951230512315123251233512345123551236512375123851239512405124151242512435124451245512465124751248512495125051251512525125351254512555125651257512585125951260512615126251263512645126551266512675126851269512705127151272512735127451275512765127751278512795128051281512825128351284512855128651287512885128951290512915129251293512945129551296512975129851299513005130151302513035130451305513065130751308513095131051311513125131351314513155131651317513185131951320513215132251323513245132551326513275132851329513305133151332513335133451335513365133751338513395134051341513425134351344513455134651347513485134951350513515135251353513545135551356513575135851359513605136151362513635136451365513665136751368513695137051371513725137351374513755137651377513785137951380513815138251383513845138551386513875138851389513905139151392513935139451395513965139751398513995140051401514025140351404514055140651407514085140951410514115141251413514145141551416514175141851419514205142151422514235142451425514265142751428514295143051431514325143351434514355143651437514385143951440514415144251443514445144551446514475144851449514505145151452514535145451455514565145751458514595146051461514625146351464514655146651467514685146951470514715147251473514745147551476514775147851479514805148151482514835148451485514865148751488514895149051491514925149351494514955149651497514985149951500515015150251503515045150551506515075150851509515105151151512515135151451515515165151751518515195152051521515225152351524515255152651527515285152951530515315153251533515345153551536515375153851539515405154151542515435154451545515465154751548515495155051551515525155351554515555155651557515585155951560515615156251563515645156551566515675156851569515705157151572515735157451575515765157751578515795158051581515825158351584515855158651587515885158951590515915159251593515945159551596515975159851599516005160151602516035160451605516065160751608516095161051611516125161351614516155161651617516185161951620516215162251623516245162551626516275162851629516305163151632516335163451635516365163751638516395164051641516425164351644516455164651647516485164951650516515165251653516545165551656516575165851659516605166151662516635166451665516665166751668516695167051671516725167351674516755167651677516785167951680516815168251683516845168551686516875168851689516905169151692516935169451695516965169751698516995170051701517025170351704517055170651707517085170951710517115171251713517145171551716517175171851719517205172151722517235172451725517265172751728517295173051731517325173351734517355173651737517385173951740517415174251743517445174551746517475174851749517505175151752517535175451755517565175751758517595176051761517625176351764517655176651767517685176951770517715177251773517745177551776517775177851779517805178151782517835178451785517865178751788517895179051791517925179351794517955179651797517985179951800518015180251803518045180551806518075180851809518105181151812518135181451815518165181751818518195182051821518225182351824518255182651827518285182951830518315183251833518345183551836518375183851839518405184151842518435184451845518465184751848518495185051851518525185351854518555185651857518585185951860518615186251863518645186551866518675186851869518705187151872518735187451875518765187751878518795188051881518825188351884518855188651887518885188951890518915189251893518945189551896518975189851899519005190151902519035190451905519065190751908519095191051911519125191351914519155191651917519185191951920519215192251923519245192551926519275192851929519305193151932519335193451935519365193751938519395194051941519425194351944519455194651947519485194951950519515195251953519545195551956519575195851959519605196151962519635196451965519665196751968519695197051971519725197351974519755197651977519785197951980519815198251983519845198551986519875198851989519905199151992519935199451995519965199751998519995200052001520025200352004520055200652007520085200952010520115201252013520145201552016520175201852019520205202152022520235202452025520265202752028520295203052031520325203352034520355203652037520385203952040520415204252043520445204552046520475204852049520505205152052520535205452055520565205752058520595206052061520625206352064520655206652067520685206952070520715207252073520745207552076520775207852079520805208152082520835208452085520865208752088520895209052091520925209352094520955209652097520985209952100521015210252103521045210552106521075210852109521105211152112521135211452115521165211752118521195212052121521225212352124521255212652127521285212952130521315213252133521345213552136521375213852139521405214152142521435214452145521465214752148521495215052151521525215352154521555215652157521585215952160521615216252163521645216552166521675216852169521705217152172521735217452175521765217752178521795218052181521825218352184521855218652187521885218952190521915219252193521945219552196521975219852199522005220152202522035220452205522065220752208522095221052211522125221352214522155221652217522185221952220522215222252223522245222552226522275222852229522305223152232522335223452235522365223752238522395224052241522425224352244522455224652247522485224952250522515225252253522545225552256522575225852259522605226152262522635226452265522665226752268522695227052271522725227352274522755227652277522785227952280522815228252283522845228552286522875228852289522905229152292522935229452295522965229752298522995230052301523025230352304523055230652307523085230952310523115231252313523145231552316523175231852319523205232152322523235232452325523265232752328523295233052331523325233352334523355233652337523385233952340523415234252343523445234552346523475234852349523505235152352523535235452355523565235752358523595236052361523625236352364523655236652367523685236952370523715237252373523745237552376523775237852379523805238152382523835238452385523865238752388523895239052391523925239352394523955239652397523985239952400524015240252403524045240552406524075240852409524105241152412524135241452415524165241752418524195242052421524225242352424524255242652427524285242952430524315243252433524345243552436524375243852439524405244152442524435244452445524465244752448524495245052451524525245352454524555245652457524585245952460524615246252463524645246552466524675246852469524705247152472524735247452475524765247752478524795248052481524825248352484524855248652487524885248952490524915249252493524945249552496524975249852499525005250152502525035250452505525065250752508525095251052511525125251352514525155251652517525185251952520525215252252523525245252552526525275252852529525305253152532525335253452535525365253752538525395254052541525425254352544525455254652547525485254952550525515255252553525545255552556525575255852559525605256152562525635256452565525665256752568525695257052571525725257352574525755257652577525785257952580525815258252583525845258552586525875258852589525905259152592525935259452595525965259752598525995260052601526025260352604526055260652607526085260952610526115261252613526145261552616526175261852619526205262152622526235262452625526265262752628526295263052631526325263352634526355263652637526385263952640526415264252643526445264552646526475264852649526505265152652526535265452655526565265752658526595266052661526625266352664526655266652667526685266952670526715267252673526745267552676526775267852679526805268152682526835268452685526865268752688526895269052691526925269352694526955269652697526985269952700527015270252703527045270552706527075270852709527105271152712527135271452715527165271752718527195272052721527225272352724527255272652727527285272952730527315273252733527345273552736527375273852739527405274152742527435274452745527465274752748527495275052751527525275352754527555275652757527585275952760527615276252763527645276552766527675276852769527705277152772527735277452775527765277752778527795278052781527825278352784527855278652787527885278952790527915279252793527945279552796527975279852799528005280152802528035280452805528065280752808528095281052811528125281352814528155281652817528185281952820528215282252823528245282552826528275282852829528305283152832528335283452835528365283752838528395284052841528425284352844528455284652847528485284952850528515285252853528545285552856528575285852859528605286152862528635286452865528665286752868528695287052871528725287352874528755287652877528785287952880528815288252883528845288552886528875288852889528905289152892528935289452895528965289752898528995290052901529025290352904529055290652907529085290952910529115291252913529145291552916529175291852919529205292152922529235292452925529265292752928529295293052931529325293352934529355293652937529385293952940529415294252943529445294552946529475294852949529505295152952529535295452955529565295752958529595296052961529625296352964529655296652967529685296952970529715297252973529745297552976529775297852979529805298152982529835298452985529865298752988529895299052991529925299352994529955299652997529985299953000530015300253003530045300553006530075300853009530105301153012530135301453015530165301753018530195302053021530225302353024530255302653027530285302953030530315303253033530345303553036530375303853039530405304153042530435304453045530465304753048530495305053051530525305353054530555305653057530585305953060530615306253063530645306553066530675306853069530705307153072530735307453075530765307753078530795308053081530825308353084530855308653087530885308953090530915309253093530945309553096530975309853099531005310153102531035310453105531065310753108531095311053111531125311353114531155311653117531185311953120531215312253123531245312553126531275312853129531305313153132531335313453135531365313753138531395314053141531425314353144531455314653147531485314953150531515315253153531545315553156531575315853159531605316153162531635316453165531665316753168531695317053171531725317353174531755317653177531785317953180531815318253183531845318553186531875318853189531905319153192531935319453195531965319753198531995320053201532025320353204532055320653207532085320953210532115321253213532145321553216532175321853219532205322153222532235322453225532265322753228532295323053231532325323353234532355323653237532385323953240532415324253243532445324553246532475324853249532505325153252532535325453255532565325753258532595326053261532625326353264532655326653267532685326953270532715327253273532745327553276532775327853279532805328153282532835328453285532865328753288532895329053291532925329353294532955329653297532985329953300533015330253303533045330553306533075330853309533105331153312533135331453315533165331753318533195332053321533225332353324533255332653327533285332953330533315333253333533345333553336533375333853339533405334153342533435334453345533465334753348533495335053351533525335353354533555335653357533585335953360533615336253363533645336553366533675336853369533705337153372533735337453375533765337753378533795338053381533825338353384533855338653387533885338953390533915339253393533945339553396533975339853399534005340153402534035340453405534065340753408534095341053411534125341353414534155341653417534185341953420534215342253423534245342553426534275342853429534305343153432534335343453435534365343753438534395344053441534425344353444534455344653447534485344953450534515345253453534545345553456534575345853459534605346153462534635346453465534665346753468534695347053471534725347353474534755347653477534785347953480534815348253483534845348553486534875348853489534905349153492534935349453495534965349753498534995350053501535025350353504535055350653507535085350953510535115351253513535145351553516535175351853519535205352153522535235352453525535265352753528535295353053531535325353353534535355353653537535385353953540535415354253543535445354553546535475354853549535505355153552535535355453555535565355753558535595356053561535625356353564535655356653567535685356953570535715357253573535745357553576535775357853579535805358153582535835358453585535865358753588535895359053591535925359353594535955359653597535985359953600536015360253603536045360553606536075360853609536105361153612536135361453615536165361753618536195362053621536225362353624536255362653627536285362953630536315363253633536345363553636536375363853639536405364153642536435364453645536465364753648536495365053651536525365353654536555365653657536585365953660536615366253663536645366553666536675366853669536705367153672536735367453675536765367753678536795368053681536825368353684536855368653687536885368953690536915369253693536945369553696536975369853699537005370153702537035370453705537065370753708537095371053711537125371353714537155371653717537185371953720537215372253723537245372553726537275372853729537305373153732537335373453735537365373753738537395374053741537425374353744537455374653747537485374953750537515375253753537545375553756537575375853759537605376153762537635376453765537665376753768537695377053771537725377353774537755377653777537785377953780537815378253783537845378553786537875378853789537905379153792537935379453795537965379753798537995380053801538025380353804538055380653807538085380953810538115381253813538145381553816538175381853819538205382153822538235382453825538265382753828538295383053831538325383353834538355383653837538385383953840538415384253843538445384553846538475384853849538505385153852538535385453855538565385753858538595386053861538625386353864538655386653867538685386953870538715387253873538745387553876538775387853879538805388153882538835388453885538865388753888538895389053891538925389353894538955389653897538985389953900539015390253903539045390553906539075390853909539105391153912539135391453915539165391753918539195392053921539225392353924539255392653927539285392953930539315393253933539345393553936539375393853939539405394153942539435394453945539465394753948539495395053951539525395353954539555395653957539585395953960539615396253963539645396553966539675396853969539705397153972539735397453975539765397753978539795398053981539825398353984539855398653987539885398953990539915399253993539945399553996539975399853999540005400154002540035400454005540065400754008540095401054011540125401354014540155401654017540185401954020540215402254023540245402554026540275402854029540305403154032540335403454035540365403754038540395404054041540425404354044540455404654047540485404954050540515405254053540545405554056540575405854059540605406154062540635406454065540665406754068540695407054071540725407354074540755407654077540785407954080540815408254083540845408554086540875408854089540905409154092540935409454095540965409754098540995410054101541025410354104541055410654107541085410954110541115411254113541145411554116541175411854119541205412154122541235412454125541265412754128541295413054131541325413354134541355413654137541385413954140541415414254143541445414554146541475414854149541505415154152541535415454155541565415754158541595416054161541625416354164541655416654167541685416954170541715417254173541745417554176541775417854179541805418154182541835418454185541865418754188541895419054191541925419354194541955419654197541985419954200542015420254203542045420554206542075420854209542105421154212542135421454215542165421754218542195422054221542225422354224542255422654227542285422954230542315423254233542345423554236542375423854239542405424154242542435424454245542465424754248542495425054251542525425354254542555425654257542585425954260542615426254263542645426554266542675426854269542705427154272542735427454275542765427754278542795428054281542825428354284542855428654287542885428954290542915429254293542945429554296542975429854299543005430154302543035430454305543065430754308543095431054311543125431354314543155431654317543185431954320543215432254323543245432554326543275432854329543305433154332543335433454335543365433754338543395434054341543425434354344543455434654347543485434954350543515435254353543545435554356543575435854359543605436154362543635436454365543665436754368543695437054371543725437354374543755437654377543785437954380543815438254383543845438554386543875438854389543905439154392543935439454395543965439754398543995440054401544025440354404544055440654407544085440954410544115441254413544145441554416544175441854419544205442154422544235442454425544265442754428544295443054431544325443354434544355443654437544385443954440544415444254443544445444554446544475444854449544505445154452544535445454455544565445754458544595446054461544625446354464544655446654467544685446954470544715447254473544745447554476544775447854479544805448154482544835448454485544865448754488544895449054491544925449354494544955449654497544985449954500545015450254503545045450554506545075450854509545105451154512545135451454515545165451754518545195452054521545225452354524545255452654527545285452954530545315453254533545345453554536545375453854539545405454154542545435454454545545465454754548545495455054551545525455354554545555455654557545585455954560545615456254563545645456554566545675456854569545705457154572545735457454575545765457754578545795458054581545825458354584545855458654587545885458954590545915459254593545945459554596545975459854599546005460154602546035460454605546065460754608546095461054611546125461354614546155461654617546185461954620546215462254623546245462554626546275462854629546305463154632546335463454635546365463754638546395464054641546425464354644546455464654647546485464954650546515465254653546545465554656546575465854659546605466154662546635466454665546665466754668546695467054671546725467354674546755467654677546785467954680546815468254683546845468554686546875468854689546905469154692546935469454695546965469754698546995470054701547025470354704547055470654707547085470954710547115471254713547145471554716547175471854719547205472154722547235472454725547265472754728547295473054731547325473354734547355473654737547385473954740547415474254743547445474554746547475474854749547505475154752547535475454755547565475754758547595476054761547625476354764547655476654767547685476954770547715477254773547745477554776547775477854779547805478154782547835478454785547865478754788547895479054791547925479354794547955479654797547985479954800548015480254803548045480554806548075480854809548105481154812548135481454815548165481754818548195482054821548225482354824548255482654827548285482954830548315483254833548345483554836548375483854839548405484154842548435484454845548465484754848548495485054851548525485354854548555485654857548585485954860548615486254863548645486554866548675486854869548705487154872548735487454875548765487754878548795488054881548825488354884548855488654887548885488954890548915489254893548945489554896548975489854899549005490154902549035490454905549065490754908549095491054911549125491354914549155491654917549185491954920549215492254923549245492554926549275492854929549305493154932549335493454935549365493754938549395494054941549425494354944549455494654947549485494954950549515495254953549545495554956549575495854959549605496154962549635496454965549665496754968549695497054971549725497354974549755497654977549785497954980549815498254983549845498554986549875498854989549905499154992549935499454995549965499754998549995500055001550025500355004550055500655007550085500955010550115501255013550145501555016550175501855019550205502155022550235502455025550265502755028550295503055031550325503355034550355503655037550385503955040550415504255043550445504555046550475504855049550505505155052550535505455055550565505755058550595506055061550625506355064550655506655067550685506955070550715507255073550745507555076550775507855079550805508155082550835508455085550865508755088550895509055091550925509355094550955509655097550985509955100551015510255103551045510555106551075510855109551105511155112551135511455115551165511755118551195512055121551225512355124551255512655127551285512955130551315513255133551345513555136551375513855139551405514155142551435514455145551465514755148551495515055151551525515355154551555515655157551585515955160551615516255163551645516555166551675516855169551705517155172551735517455175551765517755178551795518055181551825518355184551855518655187551885518955190551915519255193551945519555196551975519855199552005520155202552035520455205552065520755208552095521055211552125521355214552155521655217552185521955220552215522255223552245522555226552275522855229552305523155232552335523455235552365523755238552395524055241552425524355244552455524655247552485524955250552515525255253552545525555256552575525855259552605526155262552635526455265552665526755268552695527055271552725527355274552755527655277552785527955280552815528255283552845528555286552875528855289552905529155292552935529455295552965529755298552995530055301553025530355304553055530655307553085530955310553115531255313553145531555316553175531855319553205532155322553235532455325553265532755328553295533055331553325533355334553355533655337553385533955340553415534255343553445534555346553475534855349553505535155352553535535455355553565535755358553595536055361553625536355364553655536655367553685536955370553715537255373553745537555376553775537855379553805538155382553835538455385553865538755388553895539055391553925539355394553955539655397553985539955400554015540255403554045540555406554075540855409554105541155412554135541455415554165541755418554195542055421554225542355424554255542655427554285542955430554315543255433554345543555436554375543855439554405544155442554435544455445554465544755448554495545055451554525545355454554555545655457554585545955460554615546255463554645546555466554675546855469554705547155472554735547455475554765547755478554795548055481554825548355484554855548655487554885548955490554915549255493554945549555496554975549855499555005550155502555035550455505555065550755508555095551055511555125551355514555155551655517555185551955520555215552255523555245552555526555275552855529555305553155532555335553455535555365553755538555395554055541555425554355544555455554655547555485554955550555515555255553555545555555556555575555855559555605556155562555635556455565555665556755568555695557055571555725557355574555755557655577555785557955580555815558255583555845558555586555875558855589555905559155592555935559455595555965559755598555995560055601556025560355604556055560655607556085560955610556115561255613556145561555616556175561855619556205562155622556235562455625556265562755628556295563055631556325563355634556355563655637556385563955640556415564255643556445564555646556475564855649556505565155652556535565455655556565565755658556595566055661556625566355664556655566655667556685566955670556715567255673556745567555676556775567855679556805568155682556835568455685556865568755688556895569055691556925569355694556955569655697556985569955700557015570255703557045570555706557075570855709557105571155712557135571455715557165571755718557195572055721557225572355724557255572655727557285572955730557315573255733557345573555736557375573855739557405574155742557435574455745557465574755748557495575055751557525575355754557555575655757557585575955760557615576255763557645576555766557675576855769557705577155772557735577455775557765577755778557795578055781557825578355784557855578655787557885578955790557915579255793557945579555796557975579855799558005580155802558035580455805558065580755808558095581055811558125581355814558155581655817558185581955820558215582255823558245582555826558275582855829558305583155832558335583455835558365583755838558395584055841558425584355844558455584655847558485584955850558515585255853558545585555856558575585855859558605586155862558635586455865558665586755868558695587055871558725587355874558755587655877558785587955880558815588255883558845588555886558875588855889558905589155892558935589455895558965589755898558995590055901559025590355904559055590655907559085590955910559115591255913559145591555916559175591855919559205592155922559235592455925559265592755928559295593055931559325593355934559355593655937559385593955940559415594255943559445594555946559475594855949559505595155952559535595455955559565595755958559595596055961559625596355964559655596655967559685596955970559715597255973559745597555976559775597855979559805598155982559835598455985559865598755988559895599055991559925599355994559955599655997559985599956000560015600256003560045600556006560075600856009560105601156012560135601456015560165601756018560195602056021560225602356024560255602656027560285602956030560315603256033560345603556036560375603856039560405604156042560435604456045560465604756048560495605056051560525605356054560555605656057560585605956060560615606256063560645606556066560675606856069560705607156072560735607456075560765607756078560795608056081560825608356084560855608656087560885608956090560915609256093560945609556096560975609856099561005610156102561035610456105561065610756108561095611056111561125611356114561155611656117561185611956120561215612256123561245612556126561275612856129561305613156132561335613456135561365613756138561395614056141561425614356144561455614656147561485614956150561515615256153561545615556156561575615856159561605616156162561635616456165561665616756168561695617056171561725617356174561755617656177561785617956180561815618256183561845618556186561875618856189561905619156192561935619456195561965619756198561995620056201562025620356204562055620656207562085620956210562115621256213562145621556216562175621856219562205622156222562235622456225562265622756228562295623056231562325623356234562355623656237562385623956240562415624256243562445624556246562475624856249562505625156252562535625456255562565625756258562595626056261562625626356264562655626656267562685626956270562715627256273562745627556276562775627856279562805628156282562835628456285562865628756288562895629056291562925629356294562955629656297562985629956300563015630256303563045630556306563075630856309563105631156312563135631456315563165631756318563195632056321563225632356324563255632656327563285632956330563315633256333563345633556336563375633856339563405634156342563435634456345563465634756348563495635056351563525635356354563555635656357563585635956360563615636256363563645636556366563675636856369563705637156372563735637456375563765637756378563795638056381563825638356384563855638656387563885638956390563915639256393563945639556396563975639856399564005640156402564035640456405564065640756408564095641056411564125641356414564155641656417564185641956420564215642256423564245642556426564275642856429564305643156432564335643456435564365643756438564395644056441564425644356444564455644656447564485644956450564515645256453564545645556456564575645856459564605646156462564635646456465564665646756468564695647056471564725647356474564755647656477564785647956480564815648256483564845648556486564875648856489564905649156492564935649456495564965649756498564995650056501565025650356504565055650656507565085650956510565115651256513565145651556516565175651856519565205652156522565235652456525565265652756528565295653056531565325653356534565355653656537565385653956540565415654256543565445654556546565475654856549565505655156552565535655456555565565655756558565595656056561565625656356564565655656656567565685656956570565715657256573565745657556576565775657856579565805658156582565835658456585565865658756588565895659056591565925659356594565955659656597565985659956600566015660256603566045660556606566075660856609566105661156612566135661456615566165661756618566195662056621566225662356624566255662656627566285662956630566315663256633566345663556636566375663856639566405664156642566435664456645566465664756648566495665056651566525665356654566555665656657566585665956660566615666256663566645666556666566675666856669566705667156672566735667456675566765667756678566795668056681566825668356684566855668656687566885668956690566915669256693566945669556696566975669856699567005670156702567035670456705567065670756708567095671056711567125671356714567155671656717567185671956720567215672256723567245672556726567275672856729567305673156732567335673456735567365673756738567395674056741567425674356744567455674656747567485674956750567515675256753567545675556756567575675856759567605676156762567635676456765567665676756768567695677056771567725677356774567755677656777567785677956780567815678256783567845678556786567875678856789567905679156792567935679456795567965679756798567995680056801568025680356804568055680656807568085680956810568115681256813568145681556816568175681856819568205682156822568235682456825568265682756828568295683056831568325683356834568355683656837568385683956840568415684256843568445684556846568475684856849568505685156852568535685456855568565685756858568595686056861568625686356864568655686656867568685686956870568715687256873568745687556876568775687856879568805688156882568835688456885568865688756888568895689056891568925689356894568955689656897568985689956900569015690256903569045690556906569075690856909569105691156912569135691456915569165691756918569195692056921569225692356924569255692656927569285692956930569315693256933569345693556936569375693856939569405694156942569435694456945569465694756948569495695056951569525695356954569555695656957569585695956960569615696256963569645696556966569675696856969569705697156972569735697456975569765697756978569795698056981569825698356984569855698656987569885698956990569915699256993569945699556996569975699856999570005700157002570035700457005570065700757008570095701057011570125701357014570155701657017570185701957020570215702257023570245702557026570275702857029570305703157032570335703457035570365703757038570395704057041570425704357044570455704657047570485704957050570515705257053570545705557056570575705857059570605706157062570635706457065570665706757068570695707057071570725707357074570755707657077570785707957080570815708257083570845708557086570875708857089570905709157092570935709457095570965709757098570995710057101571025710357104571055710657107571085710957110571115711257113571145711557116571175711857119571205712157122571235712457125571265712757128571295713057131571325713357134571355713657137571385713957140571415714257143571445714557146571475714857149571505715157152571535715457155571565715757158571595716057161571625716357164571655716657167571685716957170571715717257173571745717557176571775717857179571805718157182571835718457185571865718757188571895719057191571925719357194571955719657197571985719957200572015720257203572045720557206572075720857209572105721157212572135721457215572165721757218572195722057221572225722357224572255722657227572285722957230572315723257233572345723557236572375723857239572405724157242572435724457245572465724757248572495725057251572525725357254572555725657257572585725957260572615726257263572645726557266572675726857269572705727157272572735727457275572765727757278572795728057281572825728357284572855728657287572885728957290572915729257293572945729557296572975729857299573005730157302573035730457305573065730757308573095731057311573125731357314573155731657317573185731957320573215732257323573245732557326573275732857329573305733157332573335733457335573365733757338573395734057341573425734357344573455734657347573485734957350573515735257353573545735557356573575735857359573605736157362573635736457365573665736757368573695737057371573725737357374573755737657377573785737957380573815738257383573845738557386573875738857389573905739157392573935739457395573965739757398573995740057401574025740357404574055740657407574085740957410574115741257413574145741557416574175741857419574205742157422574235742457425574265742757428574295743057431574325743357434574355743657437574385743957440574415744257443574445744557446574475744857449574505745157452574535745457455574565745757458574595746057461574625746357464574655746657467574685746957470574715747257473574745747557476574775747857479574805748157482574835748457485574865748757488574895749057491574925749357494574955749657497574985749957500575015750257503575045750557506575075750857509575105751157512575135751457515575165751757518575195752057521575225752357524575255752657527575285752957530575315753257533575345753557536575375753857539575405754157542575435754457545575465754757548575495755057551575525755357554575555755657557575585755957560575615756257563575645756557566575675756857569575705757157572575735757457575575765757757578575795758057581575825758357584575855758657587575885758957590575915759257593575945759557596575975759857599576005760157602576035760457605576065760757608576095761057611576125761357614576155761657617576185761957620576215762257623576245762557626576275762857629576305763157632576335763457635576365763757638576395764057641576425764357644576455764657647576485764957650576515765257653576545765557656576575765857659576605766157662576635766457665576665766757668576695767057671576725767357674576755767657677576785767957680576815768257683576845768557686576875768857689576905769157692576935769457695576965769757698576995770057701577025770357704577055770657707577085770957710577115771257713577145771557716577175771857719577205772157722577235772457725577265772757728577295773057731577325773357734577355773657737577385773957740577415774257743577445774557746577475774857749577505775157752577535775457755577565775757758577595776057761577625776357764577655776657767577685776957770577715777257773577745777557776577775777857779577805778157782577835778457785577865778757788577895779057791577925779357794577955779657797577985779957800578015780257803578045780557806578075780857809578105781157812578135781457815578165781757818578195782057821578225782357824578255782657827578285782957830578315783257833578345783557836578375783857839578405784157842578435784457845578465784757848578495785057851578525785357854578555785657857578585785957860578615786257863578645786557866578675786857869578705787157872578735787457875578765787757878578795788057881578825788357884578855788657887578885788957890578915789257893578945789557896578975789857899579005790157902579035790457905579065790757908579095791057911579125791357914579155791657917579185791957920579215792257923579245792557926579275792857929579305793157932579335793457935579365793757938579395794057941579425794357944579455794657947579485794957950579515795257953579545795557956579575795857959579605796157962579635796457965579665796757968579695797057971579725797357974579755797657977579785797957980579815798257983579845798557986579875798857989579905799157992579935799457995579965799757998579995800058001580025800358004580055800658007580085800958010580115801258013580145801558016580175801858019580205802158022580235802458025580265802758028580295803058031580325803358034580355803658037580385803958040580415804258043580445804558046580475804858049580505805158052580535805458055580565805758058580595806058061580625806358064580655806658067580685806958070580715807258073580745807558076580775807858079580805808158082580835808458085580865808758088580895809058091580925809358094580955809658097580985809958100581015810258103581045810558106581075810858109581105811158112581135811458115581165811758118581195812058121581225812358124581255812658127581285812958130581315813258133581345813558136581375813858139581405814158142581435814458145581465814758148581495815058151581525815358154581555815658157581585815958160581615816258163581645816558166581675816858169581705817158172581735817458175581765817758178581795818058181581825818358184581855818658187581885818958190581915819258193581945819558196581975819858199582005820158202582035820458205582065820758208582095821058211582125821358214582155821658217582185821958220582215822258223582245822558226582275822858229582305823158232582335823458235582365823758238582395824058241582425824358244582455824658247582485824958250582515825258253582545825558256582575825858259582605826158262582635826458265582665826758268582695827058271582725827358274582755827658277582785827958280582815828258283582845828558286582875828858289582905829158292582935829458295582965829758298582995830058301583025830358304583055830658307583085830958310583115831258313583145831558316583175831858319583205832158322583235832458325583265832758328583295833058331583325833358334583355833658337583385833958340583415834258343583445834558346583475834858349583505835158352583535835458355583565835758358583595836058361583625836358364583655836658367583685836958370583715837258373583745837558376583775837858379583805838158382583835838458385583865838758388583895839058391583925839358394583955839658397583985839958400584015840258403584045840558406584075840858409584105841158412584135841458415584165841758418584195842058421584225842358424584255842658427584285842958430584315843258433584345843558436584375843858439584405844158442584435844458445584465844758448584495845058451584525845358454584555845658457584585845958460584615846258463584645846558466584675846858469584705847158472584735847458475584765847758478584795848058481584825848358484584855848658487584885848958490584915849258493584945849558496584975849858499585005850158502585035850458505585065850758508585095851058511585125851358514585155851658517585185851958520585215852258523585245852558526585275852858529585305853158532585335853458535585365853758538585395854058541585425854358544585455854658547585485854958550585515855258553585545855558556585575855858559585605856158562585635856458565585665856758568585695857058571585725857358574585755857658577585785857958580585815858258583585845858558586585875858858589585905859158592585935859458595585965859758598585995860058601586025860358604586055860658607586085860958610586115861258613586145861558616586175861858619586205862158622586235862458625586265862758628586295863058631586325863358634586355863658637586385863958640586415864258643586445864558646586475864858649586505865158652586535865458655586565865758658586595866058661586625866358664586655866658667586685866958670586715867258673586745867558676586775867858679586805868158682586835868458685586865868758688586895869058691586925869358694586955869658697586985869958700587015870258703587045870558706587075870858709587105871158712587135871458715587165871758718587195872058721587225872358724587255872658727587285872958730587315873258733587345873558736587375873858739587405874158742587435874458745587465874758748587495875058751587525875358754587555875658757587585875958760587615876258763587645876558766587675876858769587705877158772587735877458775587765877758778587795878058781587825878358784587855878658787587885878958790587915879258793587945879558796587975879858799588005880158802588035880458805588065880758808588095881058811588125881358814588155881658817588185881958820588215882258823588245882558826588275882858829588305883158832588335883458835588365883758838588395884058841588425884358844588455884658847588485884958850588515885258853588545885558856588575885858859588605886158862588635886458865588665886758868588695887058871588725887358874588755887658877588785887958880588815888258883588845888558886588875888858889588905889158892588935889458895588965889758898588995890058901589025890358904589055890658907589085890958910589115891258913589145891558916589175891858919589205892158922589235892458925589265892758928589295893058931589325893358934589355893658937589385893958940589415894258943589445894558946589475894858949589505895158952589535895458955589565895758958589595896058961589625896358964589655896658967589685896958970589715897258973589745897558976589775897858979589805898158982589835898458985589865898758988589895899058991589925899358994589955899658997589985899959000590015900259003590045900559006590075900859009590105901159012590135901459015590165901759018590195902059021590225902359024590255902659027590285902959030590315903259033590345903559036590375903859039590405904159042590435904459045590465904759048590495905059051590525905359054590555905659057590585905959060590615906259063590645906559066590675906859069590705907159072590735907459075590765907759078590795908059081590825908359084590855908659087590885908959090590915909259093590945909559096590975909859099591005910159102591035910459105591065910759108591095911059111591125911359114591155911659117591185911959120591215912259123591245912559126591275912859129591305913159132591335913459135591365913759138591395914059141591425914359144591455914659147591485914959150591515915259153591545915559156591575915859159591605916159162591635916459165591665916759168591695917059171591725917359174591755917659177591785917959180591815918259183591845918559186591875918859189591905919159192591935919459195591965919759198591995920059201592025920359204592055920659207592085920959210592115921259213592145921559216592175921859219592205922159222592235922459225592265922759228592295923059231592325923359234592355923659237592385923959240592415924259243592445924559246592475924859249592505925159252592535925459255592565925759258592595926059261592625926359264592655926659267592685926959270592715927259273592745927559276592775927859279592805928159282592835928459285592865928759288592895929059291592925929359294592955929659297592985929959300593015930259303593045930559306593075930859309593105931159312593135931459315593165931759318593195932059321593225932359324593255932659327593285932959330593315933259333593345933559336593375933859339593405934159342593435934459345593465934759348593495935059351593525935359354593555935659357593585935959360593615936259363593645936559366593675936859369593705937159372593735937459375593765937759378593795938059381593825938359384593855938659387593885938959390593915939259393593945939559396593975939859399594005940159402594035940459405594065940759408594095941059411594125941359414594155941659417594185941959420594215942259423594245942559426594275942859429594305943159432594335943459435594365943759438594395944059441594425944359444594455944659447594485944959450594515945259453594545945559456594575945859459594605946159462594635946459465594665946759468594695947059471594725947359474594755947659477594785947959480594815948259483594845948559486594875948859489594905949159492594935949459495594965949759498594995950059501595025950359504595055950659507595085950959510595115951259513595145951559516595175951859519595205952159522595235952459525595265952759528595295953059531595325953359534595355953659537595385953959540595415954259543595445954559546595475954859549595505955159552595535955459555595565955759558595595956059561595625956359564595655956659567595685956959570595715957259573595745957559576595775957859579595805958159582595835958459585595865958759588595895959059591595925959359594595955959659597595985959959600596015960259603596045960559606596075960859609596105961159612596135961459615596165961759618596195962059621596225962359624596255962659627596285962959630596315963259633596345963559636596375963859639596405964159642596435964459645596465964759648596495965059651596525965359654596555965659657596585965959660596615966259663596645966559666596675966859669596705967159672596735967459675596765967759678596795968059681596825968359684596855968659687596885968959690596915969259693596945969559696596975969859699597005970159702597035970459705597065970759708597095971059711597125971359714597155971659717597185971959720597215972259723597245972559726597275972859729597305973159732597335973459735597365973759738597395974059741597425974359744597455974659747597485974959750597515975259753597545975559756597575975859759597605976159762597635976459765597665976759768597695977059771597725977359774597755977659777597785977959780597815978259783597845978559786597875978859789597905979159792597935979459795597965979759798597995980059801598025980359804598055980659807598085980959810598115981259813598145981559816598175981859819598205982159822598235982459825598265982759828598295983059831598325983359834598355983659837598385983959840598415984259843598445984559846598475984859849598505985159852598535985459855598565985759858598595986059861598625986359864598655986659867598685986959870598715987259873598745987559876598775987859879598805988159882598835988459885598865988759888598895989059891598925989359894598955989659897598985989959900599015990259903599045990559906599075990859909599105991159912599135991459915599165991759918599195992059921599225992359924599255992659927599285992959930599315993259933599345993559936599375993859939599405994159942599435994459945599465994759948599495995059951599525995359954599555995659957599585995959960599615996259963599645996559966599675996859969599705997159972599735997459975599765997759978599795998059981599825998359984599855998659987599885998959990599915999259993599945999559996599975999859999600006000160002600036000460005600066000760008600096001060011600126001360014600156001660017600186001960020600216002260023600246002560026600276002860029600306003160032600336003460035600366003760038600396004060041600426004360044600456004660047600486004960050600516005260053600546005560056600576005860059600606006160062600636006460065600666006760068600696007060071600726007360074600756007660077600786007960080600816008260083600846008560086600876008860089600906009160092600936009460095600966009760098600996010060101601026010360104601056010660107601086010960110601116011260113601146011560116601176011860119601206012160122601236012460125601266012760128601296013060131601326013360134601356013660137601386013960140601416014260143601446014560146601476014860149601506015160152601536015460155601566015760158601596016060161601626016360164601656016660167601686016960170601716017260173601746017560176601776017860179601806018160182601836018460185601866018760188601896019060191601926019360194601956019660197601986019960200602016020260203602046020560206602076020860209602106021160212602136021460215602166021760218602196022060221602226022360224602256022660227602286022960230602316023260233602346023560236602376023860239602406024160242602436024460245602466024760248602496025060251602526025360254602556025660257602586025960260602616026260263602646026560266602676026860269602706027160272602736027460275602766027760278602796028060281602826028360284602856028660287602886028960290602916029260293602946029560296602976029860299603006030160302603036030460305603066030760308603096031060311603126031360314603156031660317603186031960320603216032260323603246032560326603276032860329603306033160332603336033460335603366033760338603396034060341603426034360344603456034660347603486034960350603516035260353603546035560356603576035860359603606036160362603636036460365603666036760368603696037060371603726037360374603756037660377603786037960380603816038260383603846038560386603876038860389603906039160392603936039460395603966039760398603996040060401604026040360404604056040660407604086040960410604116041260413604146041560416604176041860419604206042160422604236042460425604266042760428604296043060431604326043360434604356043660437604386043960440604416044260443604446044560446604476044860449604506045160452604536045460455604566045760458604596046060461604626046360464604656046660467604686046960470604716047260473604746047560476604776047860479604806048160482604836048460485604866048760488604896049060491604926049360494604956049660497604986049960500605016050260503605046050560506605076050860509605106051160512605136051460515605166051760518605196052060521605226052360524605256052660527605286052960530605316053260533605346053560536605376053860539605406054160542605436054460545605466054760548605496055060551605526055360554605556055660557605586055960560605616056260563605646056560566605676056860569605706057160572605736057460575605766057760578605796058060581605826058360584605856058660587605886058960590605916059260593605946059560596605976059860599606006060160602606036060460605606066060760608606096061060611606126061360614606156061660617606186061960620606216062260623606246062560626606276062860629606306063160632606336063460635606366063760638606396064060641606426064360644606456064660647606486064960650606516065260653606546065560656606576065860659606606066160662606636066460665606666066760668606696067060671606726067360674606756067660677606786067960680606816068260683606846068560686606876068860689606906069160692606936069460695606966069760698606996070060701607026070360704607056070660707607086070960710607116071260713607146071560716607176071860719607206072160722607236072460725607266072760728607296073060731607326073360734607356073660737607386073960740607416074260743607446074560746607476074860749607506075160752607536075460755607566075760758607596076060761607626076360764607656076660767607686076960770607716077260773607746077560776607776077860779607806078160782607836078460785607866078760788607896079060791607926079360794607956079660797607986079960800608016080260803608046080560806608076080860809608106081160812608136081460815608166081760818608196082060821608226082360824608256082660827608286082960830608316083260833608346083560836608376083860839608406084160842608436084460845608466084760848608496085060851608526085360854608556085660857608586085960860608616086260863608646086560866608676086860869608706087160872608736087460875608766087760878608796088060881608826088360884608856088660887608886088960890608916089260893608946089560896608976089860899609006090160902609036090460905609066090760908609096091060911609126091360914609156091660917609186091960920609216092260923609246092560926609276092860929609306093160932609336093460935609366093760938609396094060941609426094360944609456094660947609486094960950609516095260953609546095560956609576095860959609606096160962609636096460965609666096760968609696097060971609726097360974609756097660977609786097960980609816098260983609846098560986609876098860989609906099160992609936099460995609966099760998609996100061001610026100361004610056100661007610086100961010610116101261013610146101561016610176101861019610206102161022610236102461025610266102761028610296103061031610326103361034610356103661037610386103961040610416104261043610446104561046610476104861049610506105161052610536105461055610566105761058610596106061061610626106361064610656106661067610686106961070610716107261073610746107561076610776107861079610806108161082610836108461085610866108761088610896109061091610926109361094610956109661097610986109961100611016110261103611046110561106611076110861109611106111161112611136111461115611166111761118611196112061121611226112361124611256112661127611286112961130611316113261133611346113561136611376113861139611406114161142611436114461145611466114761148611496115061151611526115361154611556115661157611586115961160611616116261163611646116561166611676116861169611706117161172611736117461175611766117761178611796118061181611826118361184611856118661187611886118961190611916119261193611946119561196611976119861199612006120161202612036120461205612066120761208612096121061211612126121361214612156121661217612186121961220612216122261223612246122561226612276122861229612306123161232612336123461235612366123761238612396124061241612426124361244612456124661247612486124961250612516125261253612546125561256612576125861259612606126161262612636126461265612666126761268612696127061271612726127361274612756127661277612786127961280612816128261283612846128561286612876128861289612906129161292612936129461295612966129761298612996130061301613026130361304613056130661307613086130961310613116131261313613146131561316613176131861319613206132161322613236132461325613266132761328613296133061331613326133361334613356133661337613386133961340613416134261343613446134561346613476134861349613506135161352613536135461355613566135761358613596136061361613626136361364613656136661367613686136961370613716137261373613746137561376613776137861379613806138161382613836138461385613866138761388613896139061391613926139361394613956139661397613986139961400614016140261403614046140561406614076140861409614106141161412614136141461415614166141761418614196142061421614226142361424614256142661427614286142961430614316143261433614346143561436614376143861439614406144161442614436144461445614466144761448614496145061451614526145361454614556145661457614586145961460614616146261463614646146561466614676146861469614706147161472614736147461475614766147761478614796148061481614826148361484614856148661487614886148961490614916149261493614946149561496614976149861499615006150161502615036150461505615066150761508615096151061511615126151361514615156151661517615186151961520615216152261523615246152561526615276152861529615306153161532615336153461535615366153761538615396154061541615426154361544615456154661547615486154961550615516155261553615546155561556615576155861559615606156161562615636156461565615666156761568615696157061571615726157361574615756157661577615786157961580615816158261583615846158561586615876158861589615906159161592615936159461595615966159761598615996160061601616026160361604616056160661607616086160961610616116161261613616146161561616616176161861619616206162161622616236162461625616266162761628616296163061631616326163361634616356163661637616386163961640616416164261643616446164561646616476164861649616506165161652616536165461655616566165761658616596166061661616626166361664616656166661667616686166961670616716167261673616746167561676616776167861679616806168161682616836168461685616866168761688616896169061691616926169361694616956169661697616986169961700617016170261703617046170561706617076170861709617106171161712617136171461715617166171761718617196172061721617226172361724617256172661727617286172961730617316173261733617346173561736617376173861739617406174161742617436174461745617466174761748617496175061751617526175361754617556175661757617586175961760617616176261763617646176561766617676176861769617706177161772617736177461775617766177761778617796178061781617826178361784617856178661787617886178961790617916179261793617946179561796617976179861799618006180161802618036180461805618066180761808618096181061811618126181361814618156181661817618186181961820618216182261823618246182561826618276182861829618306183161832618336183461835618366183761838618396184061841618426184361844618456184661847618486184961850618516185261853618546185561856618576185861859618606186161862618636186461865618666186761868618696187061871618726187361874618756187661877618786187961880618816188261883618846188561886618876188861889618906189161892618936189461895618966189761898618996190061901619026190361904619056190661907619086190961910619116191261913619146191561916619176191861919619206192161922619236192461925619266192761928619296193061931619326193361934619356193661937619386193961940619416194261943619446194561946619476194861949619506195161952619536195461955619566195761958619596196061961619626196361964619656196661967619686196961970619716197261973619746197561976619776197861979619806198161982619836198461985619866198761988619896199061991619926199361994619956199661997619986199962000620016200262003620046200562006620076200862009620106201162012620136201462015620166201762018620196202062021620226202362024620256202662027620286202962030620316203262033620346203562036620376203862039620406204162042620436204462045620466204762048620496205062051620526205362054620556205662057620586205962060620616206262063620646206562066620676206862069620706207162072620736207462075620766207762078620796208062081620826208362084620856208662087620886208962090620916209262093620946209562096620976209862099621006210162102621036210462105621066210762108621096211062111621126211362114621156211662117621186211962120621216212262123621246212562126621276212862129621306213162132621336213462135621366213762138621396214062141621426214362144621456214662147621486214962150621516215262153621546215562156621576215862159621606216162162621636216462165621666216762168621696217062171621726217362174621756217662177621786217962180621816218262183621846218562186621876218862189621906219162192621936219462195621966219762198621996220062201622026220362204622056220662207622086220962210622116221262213622146221562216622176221862219622206222162222622236222462225622266222762228622296223062231622326223362234622356223662237622386223962240622416224262243622446224562246622476224862249622506225162252622536225462255622566225762258622596226062261622626226362264622656226662267622686226962270622716227262273622746227562276622776227862279622806228162282622836228462285622866228762288622896229062291622926229362294622956229662297622986229962300623016230262303623046230562306623076230862309623106231162312623136231462315623166231762318623196232062321623226232362324623256232662327623286232962330623316233262333623346233562336623376233862339623406234162342623436234462345623466234762348623496235062351623526235362354623556235662357623586235962360623616236262363623646236562366623676236862369623706237162372623736237462375623766237762378623796238062381623826238362384623856238662387623886238962390623916239262393623946239562396623976239862399624006240162402624036240462405624066240762408624096241062411624126241362414624156241662417624186241962420624216242262423624246242562426624276242862429624306243162432624336243462435624366243762438624396244062441624426244362444624456244662447624486244962450624516245262453624546245562456624576245862459624606246162462624636246462465624666246762468624696247062471624726247362474624756247662477624786247962480624816248262483624846248562486624876248862489624906249162492624936249462495624966249762498624996250062501625026250362504625056250662507625086250962510625116251262513625146251562516625176251862519625206252162522625236252462525625266252762528625296253062531625326253362534625356253662537625386253962540625416254262543625446254562546625476254862549625506255162552625536255462555625566255762558625596256062561625626256362564625656256662567625686256962570625716257262573625746257562576625776257862579625806258162582625836258462585625866258762588625896259062591625926259362594625956259662597625986259962600626016260262603626046260562606626076260862609626106261162612626136261462615626166261762618626196262062621626226262362624626256262662627626286262962630626316263262633626346263562636626376263862639626406264162642626436264462645626466264762648626496265062651626526265362654626556265662657626586265962660626616266262663626646266562666626676266862669626706267162672626736267462675626766267762678626796268062681626826268362684626856268662687626886268962690626916269262693626946269562696626976269862699627006270162702627036270462705627066270762708627096271062711627126271362714627156271662717627186271962720627216272262723627246272562726627276272862729627306273162732627336273462735627366273762738627396274062741627426274362744627456274662747627486274962750627516275262753627546275562756627576275862759627606276162762627636276462765627666276762768627696277062771627726277362774627756277662777627786277962780627816278262783627846278562786627876278862789627906279162792627936279462795627966279762798627996280062801628026280362804628056280662807628086280962810628116281262813628146281562816628176281862819628206282162822628236282462825628266282762828628296283062831628326283362834628356283662837628386283962840628416284262843628446284562846628476284862849628506285162852628536285462855628566285762858628596286062861628626286362864628656286662867628686286962870628716287262873628746287562876628776287862879628806288162882628836288462885628866288762888628896289062891628926289362894628956289662897628986289962900629016290262903629046290562906629076290862909629106291162912629136291462915629166291762918629196292062921629226292362924629256292662927629286292962930629316293262933629346293562936629376293862939629406294162942629436294462945629466294762948629496295062951629526295362954629556295662957629586295962960629616296262963629646296562966629676296862969629706297162972629736297462975629766297762978629796298062981629826298362984629856298662987629886298962990629916299262993629946299562996629976299862999630006300163002630036300463005630066300763008630096301063011630126301363014630156301663017630186301963020630216302263023630246302563026630276302863029630306303163032630336303463035630366303763038630396304063041630426304363044630456304663047630486304963050630516305263053630546305563056630576305863059630606306163062630636306463065630666306763068630696307063071630726307363074630756307663077630786307963080630816308263083630846308563086630876308863089630906309163092630936309463095630966309763098630996310063101631026310363104631056310663107631086310963110631116311263113631146311563116631176311863119631206312163122631236312463125631266312763128631296313063131631326313363134631356313663137631386313963140631416314263143631446314563146631476314863149631506315163152631536315463155631566315763158631596316063161631626316363164631656316663167631686316963170631716317263173631746317563176631776317863179631806318163182631836318463185631866318763188631896319063191631926319363194631956319663197631986319963200632016320263203632046320563206632076320863209632106321163212632136321463215632166321763218632196322063221632226322363224632256322663227632286322963230632316323263233632346323563236632376323863239632406324163242632436324463245632466324763248632496325063251632526325363254632556325663257632586325963260632616326263263632646326563266632676326863269632706327163272632736327463275632766327763278632796328063281632826328363284632856328663287632886328963290632916329263293632946329563296632976329863299633006330163302633036330463305633066330763308633096331063311633126331363314633156331663317633186331963320633216332263323633246332563326633276332863329633306333163332633336333463335633366333763338633396334063341633426334363344633456334663347633486334963350633516335263353633546335563356633576335863359633606336163362633636336463365633666336763368633696337063371633726337363374633756337663377633786337963380633816338263383633846338563386633876338863389633906339163392633936339463395633966339763398633996340063401634026340363404634056340663407634086340963410634116341263413634146341563416634176341863419634206342163422634236342463425634266342763428634296343063431634326343363434634356343663437634386343963440634416344263443634446344563446634476344863449634506345163452634536345463455634566345763458634596346063461634626346363464634656346663467634686346963470634716347263473634746347563476634776347863479634806348163482634836348463485634866348763488634896349063491634926349363494634956349663497634986349963500635016350263503635046350563506635076350863509635106351163512635136351463515635166351763518635196352063521635226352363524635256352663527635286352963530635316353263533635346353563536635376353863539635406354163542635436354463545635466354763548635496355063551635526355363554635556355663557635586355963560635616356263563635646356563566635676356863569635706357163572635736357463575635766357763578635796358063581635826358363584635856358663587635886358963590635916359263593635946359563596635976359863599636006360163602636036360463605636066360763608636096361063611636126361363614636156361663617636186361963620636216362263623636246362563626636276362863629636306363163632636336363463635636366363763638636396364063641636426364363644636456364663647636486364963650636516365263653636546365563656636576365863659636606366163662636636366463665636666366763668636696367063671636726367363674636756367663677636786367963680636816368263683636846368563686636876368863689636906369163692636936369463695636966369763698636996370063701637026370363704637056370663707637086370963710637116371263713637146371563716637176371863719637206372163722637236372463725637266372763728637296373063731637326373363734637356373663737637386373963740637416374263743637446374563746637476374863749637506375163752637536375463755637566375763758637596376063761637626376363764637656376663767637686376963770637716377263773637746377563776637776377863779637806378163782637836378463785637866378763788637896379063791637926379363794637956379663797637986379963800638016380263803638046380563806638076380863809638106381163812638136381463815638166381763818638196382063821638226382363824638256382663827638286382963830638316383263833638346383563836638376383863839638406384163842638436384463845638466384763848638496385063851638526385363854638556385663857638586385963860638616386263863638646386563866638676386863869638706387163872638736387463875638766387763878638796388063881638826388363884638856388663887638886388963890638916389263893638946389563896638976389863899639006390163902639036390463905639066390763908639096391063911639126391363914639156391663917639186391963920639216392263923639246392563926639276392863929639306393163932639336393463935639366393763938639396394063941639426394363944639456394663947639486394963950639516395263953639546395563956639576395863959639606396163962639636396463965639666396763968639696397063971639726397363974639756397663977639786397963980639816398263983639846398563986639876398863989639906399163992639936399463995639966399763998639996400064001640026400364004640056400664007640086400964010640116401264013640146401564016640176401864019640206402164022640236402464025640266402764028640296403064031640326403364034640356403664037640386403964040640416404264043640446404564046640476404864049640506405164052640536405464055640566405764058640596406064061640626406364064640656406664067640686406964070640716407264073640746407564076640776407864079640806408164082640836408464085640866408764088640896409064091640926409364094640956409664097640986409964100641016410264103641046410564106641076410864109641106411164112641136411464115641166411764118641196412064121641226412364124641256412664127641286412964130641316413264133641346413564136641376413864139641406414164142641436414464145641466414764148641496415064151641526415364154641556415664157641586415964160641616416264163641646416564166641676416864169641706417164172641736417464175641766417764178641796418064181641826418364184641856418664187641886418964190641916419264193641946419564196641976419864199642006420164202642036420464205642066420764208642096421064211642126421364214642156421664217642186421964220642216422264223642246422564226642276422864229642306423164232642336423464235642366423764238642396424064241642426424364244642456424664247642486424964250642516425264253642546425564256642576425864259642606426164262642636426464265642666426764268642696427064271642726427364274642756427664277642786427964280642816428264283642846428564286642876428864289642906429164292642936429464295642966429764298642996430064301643026430364304643056430664307643086430964310643116431264313643146431564316643176431864319643206432164322643236432464325643266432764328643296433064331643326433364334643356433664337643386433964340643416434264343643446434564346643476434864349643506435164352643536435464355643566435764358643596436064361643626436364364643656436664367643686436964370643716437264373643746437564376643776437864379643806438164382643836438464385643866438764388643896439064391643926439364394643956439664397643986439964400644016440264403644046440564406644076440864409644106441164412644136441464415644166441764418644196442064421644226442364424644256442664427644286442964430644316443264433644346443564436644376443864439644406444164442644436444464445644466444764448644496445064451644526445364454644556445664457644586445964460644616446264463644646446564466644676446864469644706447164472644736447464475644766447764478644796448064481644826448364484644856448664487644886448964490644916449264493644946449564496644976449864499645006450164502645036450464505645066450764508645096451064511645126451364514645156451664517645186451964520645216452264523645246452564526645276452864529645306453164532645336453464535645366453764538645396454064541645426454364544645456454664547645486454964550645516455264553645546455564556645576455864559645606456164562645636456464565645666456764568645696457064571645726457364574645756457664577645786457964580645816458264583645846458564586645876458864589645906459164592645936459464595645966459764598645996460064601646026460364604646056460664607646086460964610646116461264613646146461564616646176461864619646206462164622646236462464625646266462764628646296463064631646326463364634646356463664637646386463964640646416464264643646446464564646646476464864649646506465164652646536465464655646566465764658646596466064661646626466364664646656466664667646686466964670646716467264673646746467564676646776467864679646806468164682646836468464685646866468764688646896469064691646926469364694646956469664697646986469964700647016470264703647046470564706647076470864709647106471164712647136471464715647166471764718647196472064721647226472364724647256472664727647286472964730647316473264733647346473564736647376473864739647406474164742647436474464745647466474764748647496475064751647526475364754647556475664757647586475964760647616476264763647646476564766647676476864769647706477164772647736477464775647766477764778647796478064781647826478364784647856478664787647886478964790647916479264793647946479564796647976479864799648006480164802648036480464805648066480764808648096481064811648126481364814648156481664817648186481964820648216482264823648246482564826648276482864829648306483164832648336483464835648366483764838648396484064841648426484364844648456484664847648486484964850648516485264853648546485564856648576485864859648606486164862648636486464865648666486764868648696487064871648726487364874648756487664877648786487964880648816488264883648846488564886648876488864889648906489164892648936489464895648966489764898648996490064901649026490364904649056490664907649086490964910649116491264913649146491564916649176491864919649206492164922649236492464925649266492764928649296493064931649326493364934649356493664937649386493964940649416494264943649446494564946649476494864949649506495164952649536495464955649566495764958649596496064961649626496364964649656496664967649686496964970649716497264973649746497564976649776497864979649806498164982649836498464985649866498764988649896499064991649926499364994649956499664997649986499965000650016500265003650046500565006650076500865009650106501165012650136501465015650166501765018650196502065021650226502365024650256502665027650286502965030650316503265033650346503565036650376503865039650406504165042650436504465045650466504765048650496505065051650526505365054650556505665057650586505965060650616506265063650646506565066650676506865069650706507165072650736507465075650766507765078650796508065081650826508365084650856508665087650886508965090650916509265093650946509565096650976509865099651006510165102651036510465105651066510765108651096511065111651126511365114651156511665117651186511965120651216512265123651246512565126651276512865129651306513165132651336513465135651366513765138651396514065141651426514365144651456514665147651486514965150651516515265153651546515565156651576515865159651606516165162651636516465165651666516765168651696517065171651726517365174651756517665177651786517965180651816518265183651846518565186651876518865189651906519165192651936519465195651966519765198651996520065201652026520365204652056520665207652086520965210652116521265213652146521565216652176521865219652206522165222652236522465225652266522765228652296523065231652326523365234652356523665237652386523965240652416524265243652446524565246652476524865249652506525165252652536525465255652566525765258652596526065261652626526365264652656526665267652686526965270652716527265273652746527565276652776527865279652806528165282652836528465285652866528765288652896529065291652926529365294652956529665297652986529965300653016530265303653046530565306653076530865309653106531165312653136531465315653166531765318653196532065321653226532365324653256532665327653286532965330653316533265333653346533565336653376533865339653406534165342653436534465345653466534765348653496535065351653526535365354653556535665357653586535965360653616536265363653646536565366653676536865369653706537165372653736537465375653766537765378653796538065381653826538365384653856538665387653886538965390653916539265393653946539565396653976539865399654006540165402654036540465405654066540765408654096541065411654126541365414654156541665417654186541965420654216542265423654246542565426654276542865429654306543165432654336543465435654366543765438654396544065441654426544365444654456544665447654486544965450654516545265453654546545565456654576545865459654606546165462654636546465465654666546765468654696547065471654726547365474654756547665477654786547965480654816548265483654846548565486654876548865489654906549165492654936549465495654966549765498654996550065501655026550365504655056550665507655086550965510655116551265513655146551565516655176551865519655206552165522655236552465525655266552765528655296553065531655326553365534655356553665537655386553965540655416554265543655446554565546655476554865549655506555165552655536555465555655566555765558655596556065561655626556365564655656556665567655686556965570655716557265573655746557565576655776557865579655806558165582655836558465585655866558765588655896559065591655926559365594655956559665597655986559965600656016560265603656046560565606656076560865609656106561165612656136561465615656166561765618656196562065621656226562365624656256562665627656286562965630656316563265633656346563565636656376563865639656406564165642656436564465645656466564765648656496565065651656526565365654656556565665657656586565965660656616566265663656646566565666656676566865669656706567165672656736567465675656766567765678656796568065681656826568365684656856568665687656886568965690656916569265693656946569565696656976569865699657006570165702657036570465705657066570765708657096571065711657126571365714657156571665717657186571965720657216572265723657246572565726657276572865729657306573165732657336573465735657366573765738657396574065741657426574365744657456574665747657486574965750657516575265753657546575565756657576575865759657606576165762657636576465765657666576765768657696577065771657726577365774657756577665777657786577965780657816578265783657846578565786657876578865789657906579165792657936579465795657966579765798657996580065801658026580365804658056580665807658086580965810658116581265813658146581565816658176581865819658206582165822658236582465825658266582765828658296583065831658326583365834658356583665837658386583965840658416584265843658446584565846658476584865849658506585165852658536585465855658566585765858658596586065861658626586365864658656586665867658686586965870658716587265873658746587565876658776587865879658806588165882658836588465885658866588765888658896589065891658926589365894658956589665897658986589965900659016590265903659046590565906659076590865909659106591165912659136591465915659166591765918659196592065921659226592365924659256592665927659286592965930659316593265933659346593565936659376593865939659406594165942659436594465945659466594765948659496595065951659526595365954659556595665957659586595965960659616596265963659646596565966659676596865969659706597165972659736597465975659766597765978659796598065981659826598365984659856598665987659886598965990659916599265993659946599565996659976599865999660006600166002660036600466005660066600766008660096601066011660126601366014660156601666017660186601966020660216602266023660246602566026660276602866029660306603166032660336603466035660366603766038660396604066041660426604366044660456604666047660486604966050660516605266053660546605566056660576605866059660606606166062660636606466065660666606766068660696607066071660726607366074660756607666077660786607966080660816608266083660846608566086660876608866089660906609166092660936609466095660966609766098660996610066101661026610366104661056610666107661086610966110661116611266113661146611566116661176611866119661206612166122661236612466125661266612766128661296613066131661326613366134661356613666137661386613966140661416614266143661446614566146661476614866149661506615166152661536615466155661566615766158661596616066161661626616366164661656616666167661686616966170661716617266173661746617566176661776617866179661806618166182661836618466185661866618766188661896619066191661926619366194661956619666197661986619966200662016620266203662046620566206662076620866209662106621166212662136621466215662166621766218662196622066221662226622366224662256622666227662286622966230662316623266233662346623566236662376623866239662406624166242662436624466245662466624766248662496625066251662526625366254662556625666257662586625966260662616626266263662646626566266662676626866269662706627166272662736627466275662766627766278662796628066281662826628366284662856628666287662886628966290662916629266293662946629566296662976629866299663006630166302663036630466305663066630766308663096631066311663126631366314663156631666317663186631966320663216632266323663246632566326663276632866329663306633166332663336633466335663366633766338663396634066341663426634366344663456634666347663486634966350663516635266353663546635566356663576635866359663606636166362663636636466365663666636766368663696637066371663726637366374663756637666377663786637966380663816638266383663846638566386663876638866389663906639166392663936639466395663966639766398663996640066401664026640366404664056640666407664086640966410664116641266413664146641566416664176641866419664206642166422664236642466425664266642766428664296643066431664326643366434664356643666437664386643966440664416644266443664446644566446664476644866449664506645166452664536645466455664566645766458664596646066461664626646366464664656646666467664686646966470664716647266473664746647566476664776647866479664806648166482664836648466485664866648766488664896649066491664926649366494664956649666497664986649966500665016650266503665046650566506665076650866509665106651166512665136651466515665166651766518665196652066521665226652366524665256652666527665286652966530665316653266533665346653566536665376653866539665406654166542665436654466545665466654766548665496655066551665526655366554665556655666557665586655966560665616656266563665646656566566665676656866569665706657166572665736657466575665766657766578665796658066581665826658366584665856658666587665886658966590665916659266593665946659566596665976659866599666006660166602666036660466605666066660766608666096661066611666126661366614666156661666617666186661966620666216662266623666246662566626666276662866629666306663166632666336663466635666366663766638666396664066641666426664366644666456664666647666486664966650666516665266653666546665566656666576665866659666606666166662666636666466665666666666766668666696667066671666726667366674666756667666677666786667966680666816668266683666846668566686666876668866689666906669166692666936669466695666966669766698666996670066701667026670366704667056670666707667086670966710667116671266713667146671566716667176671866719667206672166722667236672466725667266672766728667296673066731667326673366734667356673666737667386673966740667416674266743667446674566746667476674866749667506675166752667536675466755667566675766758667596676066761667626676366764667656676666767667686676966770667716677266773667746677566776667776677866779667806678166782667836678466785667866678766788667896679066791667926679366794667956679666797667986679966800668016680266803668046680566806668076680866809668106681166812668136681466815668166681766818668196682066821668226682366824668256682666827668286682966830668316683266833668346683566836668376683866839668406684166842668436684466845668466684766848668496685066851668526685366854668556685666857668586685966860668616686266863668646686566866668676686866869668706687166872668736687466875668766687766878668796688066881668826688366884668856688666887668886688966890668916689266893668946689566896668976689866899669006690166902669036690466905669066690766908669096691066911669126691366914669156691666917669186691966920669216692266923669246692566926669276692866929669306693166932669336693466935669366693766938669396694066941669426694366944669456694666947669486694966950669516695266953669546695566956669576695866959669606696166962669636696466965669666696766968669696697066971669726697366974669756697666977669786697966980669816698266983669846698566986669876698866989669906699166992669936699466995669966699766998669996700067001670026700367004670056700667007670086700967010670116701267013670146701567016670176701867019670206702167022670236702467025670266702767028670296703067031670326703367034670356703667037670386703967040670416704267043670446704567046670476704867049670506705167052670536705467055670566705767058670596706067061670626706367064670656706667067670686706967070670716707267073670746707567076670776707867079670806708167082670836708467085670866708767088670896709067091670926709367094670956709667097670986709967100671016710267103671046710567106671076710867109671106711167112671136711467115671166711767118671196712067121671226712367124671256712667127671286712967130671316713267133671346713567136671376713867139671406714167142671436714467145671466714767148671496715067151671526715367154671556715667157671586715967160671616716267163671646716567166671676716867169671706717167172671736717467175671766717767178671796718067181671826718367184671856718667187671886718967190671916719267193671946719567196671976719867199672006720167202672036720467205672066720767208672096721067211672126721367214672156721667217672186721967220672216722267223672246722567226672276722867229672306723167232672336723467235672366723767238672396724067241672426724367244672456724667247672486724967250672516725267253672546725567256672576725867259672606726167262672636726467265672666726767268672696727067271672726727367274672756727667277672786727967280672816728267283672846728567286672876728867289672906729167292672936729467295672966729767298672996730067301673026730367304673056730667307673086730967310673116731267313673146731567316673176731867319673206732167322673236732467325673266732767328673296733067331673326733367334673356733667337673386733967340673416734267343673446734567346673476734867349673506735167352673536735467355673566735767358673596736067361673626736367364673656736667367673686736967370673716737267373673746737567376673776737867379673806738167382673836738467385673866738767388673896739067391673926739367394673956739667397673986739967400674016740267403674046740567406674076740867409674106741167412674136741467415674166741767418674196742067421674226742367424674256742667427674286742967430674316743267433674346743567436674376743867439674406744167442674436744467445674466744767448674496745067451674526745367454674556745667457674586745967460674616746267463674646746567466674676746867469674706747167472674736747467475674766747767478674796748067481674826748367484674856748667487674886748967490674916749267493674946749567496674976749867499675006750167502675036750467505675066750767508675096751067511675126751367514675156751667517675186751967520675216752267523675246752567526675276752867529675306753167532675336753467535675366753767538675396754067541675426754367544675456754667547675486754967550675516755267553675546755567556675576755867559675606756167562675636756467565675666756767568675696757067571675726757367574675756757667577675786757967580675816758267583675846758567586675876758867589675906759167592675936759467595675966759767598675996760067601676026760367604676056760667607676086760967610676116761267613676146761567616676176761867619676206762167622676236762467625676266762767628676296763067631676326763367634676356763667637676386763967640676416764267643676446764567646676476764867649676506765167652676536765467655676566765767658676596766067661676626766367664676656766667667676686766967670676716767267673676746767567676676776767867679676806768167682676836768467685676866768767688676896769067691676926769367694676956769667697676986769967700677016770267703677046770567706677076770867709677106771167712677136771467715677166771767718677196772067721677226772367724677256772667727677286772967730677316773267733677346773567736677376773867739677406774167742677436774467745677466774767748677496775067751677526775367754677556775667757677586775967760677616776267763677646776567766677676776867769677706777167772677736777467775677766777767778677796778067781677826778367784677856778667787677886778967790677916779267793677946779567796677976779867799678006780167802678036780467805678066780767808678096781067811678126781367814678156781667817678186781967820678216782267823678246782567826678276782867829678306783167832678336783467835678366783767838678396784067841678426784367844678456784667847678486784967850678516785267853678546785567856678576785867859678606786167862678636786467865678666786767868678696787067871678726787367874678756787667877678786787967880678816788267883678846788567886678876788867889678906789167892678936789467895678966789767898678996790067901679026790367904679056790667907679086790967910679116791267913679146791567916679176791867919679206792167922679236792467925679266792767928679296793067931679326793367934679356793667937679386793967940679416794267943679446794567946679476794867949679506795167952679536795467955679566795767958679596796067961679626796367964679656796667967679686796967970679716797267973679746797567976679776797867979679806798167982679836798467985679866798767988679896799067991679926799367994679956799667997679986799968000680016800268003680046800568006680076800868009680106801168012680136801468015680166801768018680196802068021680226802368024680256802668027680286802968030680316803268033680346803568036680376803868039680406804168042680436804468045680466804768048680496805068051680526805368054680556805668057680586805968060680616806268063680646806568066680676806868069680706807168072680736807468075680766807768078680796808068081680826808368084680856808668087680886808968090680916809268093680946809568096680976809868099681006810168102681036810468105681066810768108681096811068111681126811368114681156811668117681186811968120681216812268123681246812568126681276812868129681306813168132681336813468135681366813768138681396814068141681426814368144681456814668147681486814968150681516815268153681546815568156681576815868159681606816168162681636816468165681666816768168681696817068171681726817368174681756817668177681786817968180681816818268183681846818568186681876818868189681906819168192681936819468195681966819768198681996820068201682026820368204682056820668207682086820968210682116821268213682146821568216682176821868219682206822168222682236822468225682266822768228682296823068231682326823368234682356823668237682386823968240682416824268243682446824568246682476824868249682506825168252682536825468255682566825768258682596826068261682626826368264682656826668267682686826968270682716827268273682746827568276682776827868279682806828168282682836828468285682866828768288682896829068291682926829368294682956829668297682986829968300683016830268303683046830568306683076830868309683106831168312683136831468315683166831768318683196832068321683226832368324683256832668327683286832968330683316833268333683346833568336683376833868339683406834168342683436834468345683466834768348683496835068351683526835368354683556835668357683586835968360683616836268363683646836568366683676836868369683706837168372683736837468375683766837768378683796838068381683826838368384683856838668387683886838968390683916839268393683946839568396683976839868399684006840168402684036840468405684066840768408684096841068411684126841368414684156841668417684186841968420684216842268423684246842568426684276842868429684306843168432684336843468435684366843768438684396844068441684426844368444684456844668447684486844968450684516845268453684546845568456684576845868459684606846168462684636846468465684666846768468684696847068471684726847368474684756847668477684786847968480684816848268483684846848568486684876848868489684906849168492684936849468495684966849768498684996850068501685026850368504685056850668507685086850968510685116851268513685146851568516685176851868519685206852168522685236852468525685266852768528685296853068531685326853368534685356853668537685386853968540685416854268543685446854568546685476854868549685506855168552685536855468555685566855768558685596856068561685626856368564685656856668567685686856968570685716857268573685746857568576685776857868579685806858168582685836858468585685866858768588685896859068591685926859368594685956859668597685986859968600686016860268603686046860568606686076860868609686106861168612686136861468615686166861768618686196862068621686226862368624686256862668627686286862968630686316863268633686346863568636686376863868639686406864168642686436864468645686466864768648686496865068651686526865368654686556865668657686586865968660686616866268663686646866568666686676866868669686706867168672686736867468675686766867768678686796868068681686826868368684686856868668687686886868968690686916869268693686946869568696686976869868699687006870168702687036870468705687066870768708687096871068711687126871368714687156871668717687186871968720687216872268723687246872568726687276872868729687306873168732687336873468735687366873768738687396874068741687426874368744687456874668747687486874968750687516875268753687546875568756687576875868759687606876168762687636876468765687666876768768687696877068771687726877368774687756877668777687786877968780687816878268783687846878568786687876878868789687906879168792687936879468795687966879768798687996880068801688026880368804688056880668807688086880968810688116881268813688146881568816688176881868819688206882168822688236882468825688266882768828688296883068831688326883368834688356883668837688386883968840688416884268843688446884568846688476884868849688506885168852688536885468855688566885768858688596886068861688626886368864688656886668867688686886968870688716887268873688746887568876688776887868879688806888168882688836888468885688866888768888688896889068891688926889368894688956889668897688986889968900689016890268903689046890568906689076890868909689106891168912689136891468915689166891768918689196892068921689226892368924689256892668927689286892968930689316893268933689346893568936689376893868939689406894168942689436894468945689466894768948689496895068951689526895368954689556895668957689586895968960689616896268963689646896568966689676896868969689706897168972689736897468975689766897768978689796898068981689826898368984689856898668987689886898968990689916899268993689946899568996689976899868999690006900169002690036900469005690066900769008690096901069011690126901369014690156901669017690186901969020690216902269023690246902569026690276902869029690306903169032690336903469035690366903769038690396904069041690426904369044690456904669047690486904969050690516905269053690546905569056690576905869059690606906169062690636906469065690666906769068690696907069071690726907369074690756907669077690786907969080690816908269083690846908569086690876908869089690906909169092690936909469095690966909769098690996910069101691026910369104691056910669107691086910969110691116911269113691146911569116691176911869119691206912169122691236912469125691266912769128691296913069131691326913369134691356913669137691386913969140691416914269143691446914569146691476914869149691506915169152691536915469155691566915769158691596916069161691626916369164691656916669167691686916969170691716917269173691746917569176691776917869179691806918169182691836918469185691866918769188691896919069191691926919369194691956919669197691986919969200692016920269203692046920569206692076920869209692106921169212692136921469215692166921769218692196922069221692226922369224692256922669227692286922969230692316923269233692346923569236692376923869239692406924169242692436924469245692466924769248692496925069251692526925369254692556925669257692586925969260692616926269263692646926569266692676926869269692706927169272692736927469275692766927769278692796928069281692826928369284692856928669287692886928969290692916929269293692946929569296692976929869299693006930169302693036930469305693066930769308693096931069311693126931369314693156931669317693186931969320693216932269323693246932569326693276932869329693306933169332693336933469335693366933769338693396934069341693426934369344693456934669347693486934969350693516935269353693546935569356693576935869359693606936169362693636936469365693666936769368693696937069371693726937369374693756937669377693786937969380693816938269383693846938569386693876938869389693906939169392693936939469395693966939769398693996940069401694026940369404694056940669407694086940969410694116941269413694146941569416694176941869419694206942169422694236942469425694266942769428694296943069431694326943369434694356943669437694386943969440694416944269443694446944569446694476944869449694506945169452694536945469455694566945769458694596946069461694626946369464694656946669467694686946969470694716947269473694746947569476694776947869479694806948169482694836948469485694866948769488694896949069491694926949369494694956949669497694986949969500695016950269503695046950569506695076950869509695106951169512695136951469515695166951769518695196952069521695226952369524695256952669527695286952969530695316953269533695346953569536695376953869539695406954169542695436954469545695466954769548695496955069551695526955369554695556955669557695586955969560695616956269563695646956569566695676956869569695706957169572695736957469575695766957769578695796958069581695826958369584695856958669587695886958969590695916959269593695946959569596695976959869599696006960169602696036960469605696066960769608696096961069611696126961369614696156961669617696186961969620696216962269623696246962569626696276962869629696306963169632696336963469635696366963769638696396964069641696426964369644696456964669647696486964969650696516965269653696546965569656696576965869659696606966169662696636966469665696666966769668696696967069671696726967369674696756967669677696786967969680696816968269683696846968569686696876968869689696906969169692696936969469695696966969769698696996970069701697026970369704697056970669707697086970969710697116971269713697146971569716697176971869719697206972169722697236972469725697266972769728697296973069731697326973369734697356973669737697386973969740697416974269743697446974569746697476974869749697506975169752697536975469755697566975769758697596976069761697626976369764697656976669767697686976969770697716977269773697746977569776697776977869779697806978169782697836978469785697866978769788697896979069791697926979369794697956979669797697986979969800698016980269803698046980569806698076980869809698106981169812698136981469815698166981769818698196982069821698226982369824698256982669827698286982969830698316983269833698346983569836698376983869839698406984169842698436984469845698466984769848698496985069851698526985369854698556985669857698586985969860698616986269863698646986569866698676986869869698706987169872698736987469875698766987769878698796988069881698826988369884698856988669887698886988969890698916989269893698946989569896698976989869899699006990169902699036990469905699066990769908699096991069911699126991369914699156991669917699186991969920699216992269923699246992569926699276992869929699306993169932699336993469935699366993769938699396994069941699426994369944699456994669947699486994969950699516995269953699546995569956699576995869959699606996169962699636996469965699666996769968699696997069971699726997369974699756997669977699786997969980699816998269983699846998569986699876998869989699906999169992699936999469995699966999769998699997000070001700027000370004700057000670007700087000970010700117001270013700147001570016700177001870019700207002170022700237002470025700267002770028700297003070031700327003370034700357003670037700387003970040700417004270043700447004570046700477004870049700507005170052700537005470055700567005770058700597006070061700627006370064700657006670067700687006970070700717007270073700747007570076700777007870079700807008170082700837008470085700867008770088700897009070091700927009370094700957009670097700987009970100701017010270103701047010570106701077010870109701107011170112701137011470115701167011770118701197012070121701227012370124701257012670127701287012970130701317013270133701347013570136701377013870139701407014170142701437014470145701467014770148701497015070151701527015370154701557015670157701587015970160701617016270163701647016570166701677016870169701707017170172701737017470175701767017770178701797018070181701827018370184701857018670187701887018970190701917019270193701947019570196701977019870199702007020170202702037020470205702067020770208702097021070211702127021370214702157021670217702187021970220702217022270223702247022570226702277022870229702307023170232702337023470235702367023770238702397024070241702427024370244702457024670247702487024970250702517025270253702547025570256702577025870259702607026170262702637026470265702667026770268702697027070271702727027370274702757027670277702787027970280702817028270283702847028570286702877028870289702907029170292702937029470295702967029770298702997030070301703027030370304703057030670307703087030970310703117031270313703147031570316703177031870319703207032170322703237032470325703267032770328703297033070331703327033370334703357033670337703387033970340703417034270343703447034570346703477034870349703507035170352703537035470355703567035770358703597036070361703627036370364703657036670367703687036970370703717037270373703747037570376703777037870379703807038170382703837038470385703867038770388703897039070391703927039370394703957039670397703987039970400704017040270403704047040570406704077040870409704107041170412704137041470415704167041770418704197042070421704227042370424704257042670427704287042970430704317043270433704347043570436704377043870439704407044170442704437044470445704467044770448704497045070451704527045370454704557045670457704587045970460704617046270463704647046570466704677046870469704707047170472704737047470475704767047770478704797048070481704827048370484704857048670487704887048970490704917049270493704947049570496704977049870499705007050170502705037050470505705067050770508705097051070511705127051370514705157051670517705187051970520705217052270523705247052570526705277052870529705307053170532705337053470535705367053770538705397054070541705427054370544705457054670547705487054970550705517055270553705547055570556705577055870559705607056170562705637056470565705667056770568705697057070571705727057370574705757057670577705787057970580705817058270583705847058570586705877058870589705907059170592705937059470595705967059770598705997060070601706027060370604706057060670607706087060970610706117061270613706147061570616706177061870619706207062170622706237062470625706267062770628706297063070631706327063370634706357063670637706387063970640706417064270643706447064570646706477064870649706507065170652706537065470655706567065770658706597066070661706627066370664706657066670667706687066970670706717067270673706747067570676706777067870679706807068170682706837068470685706867068770688706897069070691706927069370694706957069670697706987069970700707017070270703707047070570706707077070870709707107071170712707137071470715707167071770718707197072070721707227072370724707257072670727707287072970730707317073270733707347073570736707377073870739707407074170742707437074470745707467074770748707497075070751707527075370754707557075670757707587075970760707617076270763707647076570766707677076870769707707077170772707737077470775707767077770778707797078070781707827078370784707857078670787707887078970790707917079270793707947079570796707977079870799708007080170802708037080470805708067080770808708097081070811708127081370814708157081670817708187081970820708217082270823708247082570826708277082870829708307083170832708337083470835708367083770838708397084070841708427084370844708457084670847708487084970850708517085270853708547085570856708577085870859708607086170862708637086470865708667086770868708697087070871708727087370874708757087670877708787087970880708817088270883708847088570886708877088870889708907089170892708937089470895708967089770898708997090070901709027090370904709057090670907709087090970910709117091270913709147091570916709177091870919709207092170922709237092470925709267092770928709297093070931709327093370934709357093670937709387093970940709417094270943709447094570946709477094870949709507095170952709537095470955709567095770958709597096070961709627096370964709657096670967709687096970970709717097270973709747097570976709777097870979709807098170982709837098470985709867098770988709897099070991709927099370994709957099670997709987099971000710017100271003710047100571006710077100871009710107101171012710137101471015710167101771018710197102071021710227102371024710257102671027710287102971030710317103271033710347103571036710377103871039710407104171042710437104471045710467104771048710497105071051710527105371054710557105671057710587105971060710617106271063710647106571066710677106871069710707107171072710737107471075710767107771078710797108071081710827108371084710857108671087710887108971090710917109271093710947109571096710977109871099711007110171102711037110471105711067110771108711097111071111711127111371114711157111671117711187111971120711217112271123711247112571126711277112871129711307113171132711337113471135711367113771138711397114071141711427114371144711457114671147711487114971150711517115271153711547115571156711577115871159711607116171162711637116471165711667116771168711697117071171711727117371174711757117671177711787117971180711817118271183711847118571186711877118871189711907119171192711937119471195711967119771198711997120071201712027120371204712057120671207712087120971210712117121271213712147121571216712177121871219712207122171222712237122471225712267122771228712297123071231712327123371234712357123671237712387123971240712417124271243712447124571246712477124871249712507125171252712537125471255712567125771258712597126071261712627126371264712657126671267712687126971270712717127271273712747127571276712777127871279712807128171282712837128471285712867128771288712897129071291712927129371294712957129671297712987129971300713017130271303713047130571306713077130871309713107131171312713137131471315713167131771318713197132071321713227132371324713257132671327713287132971330713317133271333713347133571336713377133871339713407134171342713437134471345713467134771348713497135071351713527135371354713557135671357713587135971360713617136271363713647136571366713677136871369713707137171372713737137471375713767137771378713797138071381713827138371384713857138671387713887138971390713917139271393713947139571396713977139871399714007140171402714037140471405714067140771408714097141071411714127141371414714157141671417714187141971420714217142271423714247142571426714277142871429714307143171432714337143471435714367143771438714397144071441714427144371444714457144671447714487144971450714517145271453714547145571456714577145871459714607146171462714637146471465714667146771468714697147071471714727147371474714757147671477714787147971480714817148271483714847148571486714877148871489714907149171492714937149471495714967149771498714997150071501715027150371504715057150671507715087150971510715117151271513715147151571516715177151871519715207152171522715237152471525715267152771528715297153071531715327153371534715357153671537715387153971540715417154271543715447154571546715477154871549715507155171552715537155471555715567155771558715597156071561715627156371564715657156671567715687156971570715717157271573715747157571576715777157871579715807158171582715837158471585715867158771588715897159071591715927159371594715957159671597715987159971600716017160271603716047160571606716077160871609716107161171612716137161471615716167161771618716197162071621716227162371624716257162671627716287162971630716317163271633716347163571636716377163871639716407164171642716437164471645716467164771648716497165071651716527165371654716557165671657716587165971660716617166271663716647166571666716677166871669716707167171672716737167471675716767167771678716797168071681716827168371684716857168671687716887168971690716917169271693716947169571696716977169871699717007170171702717037170471705717067170771708717097171071711717127171371714717157171671717717187171971720717217172271723717247172571726717277172871729717307173171732717337173471735717367173771738717397174071741717427174371744717457174671747717487174971750717517175271753717547175571756717577175871759717607176171762717637176471765717667176771768717697177071771717727177371774717757177671777717787177971780717817178271783717847178571786717877178871789717907179171792717937179471795717967179771798717997180071801718027180371804718057180671807718087180971810718117181271813718147181571816718177181871819718207182171822718237182471825718267182771828718297183071831718327183371834718357183671837718387183971840718417184271843718447184571846718477184871849718507185171852718537185471855718567185771858718597186071861718627186371864718657186671867718687186971870718717187271873718747187571876718777187871879718807188171882718837188471885718867188771888718897189071891718927189371894718957189671897718987189971900719017190271903719047190571906719077190871909719107191171912719137191471915719167191771918719197192071921719227192371924719257192671927719287192971930719317193271933719347193571936719377193871939719407194171942719437194471945719467194771948719497195071951719527195371954719557195671957719587195971960719617196271963719647196571966719677196871969719707197171972719737197471975719767197771978719797198071981719827198371984719857198671987719887198971990719917199271993719947199571996719977199871999720007200172002720037200472005720067200772008720097201072011720127201372014720157201672017720187201972020720217202272023720247202572026720277202872029720307203172032720337203472035720367203772038720397204072041720427204372044720457204672047720487204972050720517205272053720547205572056720577205872059720607206172062720637206472065720667206772068720697207072071720727207372074720757207672077720787207972080720817208272083720847208572086720877208872089720907209172092720937209472095720967209772098720997210072101721027210372104721057210672107721087210972110721117211272113721147211572116721177211872119721207212172122721237212472125721267212772128721297213072131721327213372134721357213672137721387213972140721417214272143721447214572146721477214872149721507215172152721537215472155721567215772158721597216072161721627216372164721657216672167721687216972170721717217272173721747217572176721777217872179721807218172182721837218472185721867218772188721897219072191721927219372194721957219672197721987219972200722017220272203722047220572206722077220872209722107221172212722137221472215722167221772218722197222072221722227222372224722257222672227722287222972230722317223272233722347223572236722377223872239722407224172242722437224472245722467224772248722497225072251722527225372254722557225672257722587225972260722617226272263722647226572266722677226872269722707227172272722737227472275722767227772278722797228072281722827228372284722857228672287722887228972290722917229272293722947229572296722977229872299723007230172302723037230472305723067230772308723097231072311723127231372314723157231672317723187231972320723217232272323723247232572326723277232872329723307233172332723337233472335723367233772338723397234072341723427234372344723457234672347723487234972350723517235272353723547235572356723577235872359723607236172362723637236472365723667236772368723697237072371723727237372374723757237672377723787237972380723817238272383723847238572386723877238872389723907239172392723937239472395723967239772398723997240072401724027240372404724057240672407724087240972410724117241272413724147241572416724177241872419724207242172422724237242472425724267242772428724297243072431724327243372434724357243672437724387243972440724417244272443724447244572446724477244872449724507245172452724537245472455724567245772458724597246072461724627246372464724657246672467724687246972470724717247272473724747247572476724777247872479724807248172482724837248472485724867248772488724897249072491724927249372494724957249672497724987249972500725017250272503725047250572506725077250872509725107251172512725137251472515725167251772518725197252072521725227252372524725257252672527725287252972530725317253272533725347253572536725377253872539725407254172542725437254472545725467254772548725497255072551725527255372554725557255672557725587255972560725617256272563725647256572566725677256872569725707257172572725737257472575725767257772578725797258072581725827258372584725857258672587725887258972590725917259272593725947259572596725977259872599726007260172602726037260472605726067260772608726097261072611726127261372614726157261672617726187261972620726217262272623726247262572626726277262872629726307263172632726337263472635726367263772638726397264072641726427264372644726457264672647726487264972650726517265272653726547265572656726577265872659726607266172662726637266472665726667266772668726697267072671726727267372674726757267672677726787267972680726817268272683726847268572686726877268872689726907269172692726937269472695726967269772698726997270072701727027270372704727057270672707727087270972710727117271272713727147271572716727177271872719727207272172722727237272472725727267272772728727297273072731727327273372734727357273672737727387273972740727417274272743727447274572746727477274872749727507275172752727537275472755727567275772758727597276072761727627276372764727657276672767727687276972770727717277272773727747277572776727777277872779727807278172782727837278472785727867278772788727897279072791727927279372794727957279672797727987279972800728017280272803728047280572806728077280872809728107281172812728137281472815728167281772818728197282072821728227282372824728257282672827728287282972830728317283272833728347283572836728377283872839728407284172842728437284472845728467284772848728497285072851728527285372854728557285672857728587285972860728617286272863728647286572866728677286872869728707287172872728737287472875728767287772878728797288072881728827288372884728857288672887728887288972890728917289272893728947289572896728977289872899729007290172902729037290472905729067290772908729097291072911729127291372914729157291672917729187291972920729217292272923729247292572926729277292872929729307293172932729337293472935729367293772938729397294072941729427294372944729457294672947729487294972950729517295272953729547295572956729577295872959729607296172962729637296472965729667296772968729697297072971729727297372974729757297672977729787297972980729817298272983729847298572986729877298872989729907299172992729937299472995729967299772998729997300073001730027300373004730057300673007730087300973010730117301273013730147301573016730177301873019730207302173022730237302473025730267302773028730297303073031730327303373034730357303673037730387303973040730417304273043730447304573046730477304873049730507305173052730537305473055730567305773058730597306073061730627306373064730657306673067730687306973070730717307273073730747307573076730777307873079730807308173082730837308473085730867308773088730897309073091730927309373094730957309673097730987309973100731017310273103731047310573106731077310873109731107311173112731137311473115731167311773118731197312073121731227312373124731257312673127731287312973130731317313273133731347313573136731377313873139731407314173142731437314473145731467314773148731497315073151731527315373154731557315673157731587315973160731617316273163731647316573166731677316873169731707317173172731737317473175731767317773178731797318073181731827318373184731857318673187731887318973190731917319273193731947319573196731977319873199732007320173202732037320473205732067320773208732097321073211732127321373214732157321673217732187321973220732217322273223732247322573226732277322873229732307323173232732337323473235732367323773238732397324073241732427324373244732457324673247732487324973250732517325273253732547325573256732577325873259732607326173262732637326473265732667326773268732697327073271732727327373274732757327673277732787327973280732817328273283732847328573286732877328873289732907329173292732937329473295732967329773298732997330073301733027330373304733057330673307733087330973310733117331273313733147331573316733177331873319733207332173322733237332473325733267332773328733297333073331733327333373334733357333673337733387333973340733417334273343733447334573346733477334873349733507335173352733537335473355733567335773358733597336073361733627336373364733657336673367733687336973370733717337273373733747337573376733777337873379733807338173382733837338473385733867338773388733897339073391733927339373394733957339673397733987339973400734017340273403734047340573406734077340873409734107341173412734137341473415734167341773418734197342073421734227342373424734257342673427734287342973430734317343273433734347343573436734377343873439734407344173442734437344473445734467344773448734497345073451734527345373454734557345673457734587345973460734617346273463734647346573466734677346873469734707347173472734737347473475734767347773478734797348073481734827348373484734857348673487734887348973490734917349273493734947349573496734977349873499735007350173502735037350473505735067350773508735097351073511735127351373514735157351673517735187351973520735217352273523735247352573526735277352873529735307353173532735337353473535735367353773538735397354073541735427354373544735457354673547735487354973550735517355273553735547355573556735577355873559735607356173562735637356473565735667356773568735697357073571735727357373574735757357673577735787357973580735817358273583735847358573586735877358873589735907359173592735937359473595735967359773598735997360073601736027360373604736057360673607736087360973610736117361273613736147361573616736177361873619736207362173622736237362473625736267362773628736297363073631736327363373634736357363673637736387363973640736417364273643736447364573646736477364873649736507365173652736537365473655736567365773658736597366073661736627366373664736657366673667736687366973670736717367273673736747367573676736777367873679736807368173682736837368473685736867368773688736897369073691736927369373694736957369673697736987369973700737017370273703737047370573706737077370873709737107371173712737137371473715737167371773718737197372073721737227372373724737257372673727737287372973730737317373273733737347373573736737377373873739737407374173742737437374473745737467374773748737497375073751737527375373754737557375673757737587375973760737617376273763737647376573766737677376873769737707377173772737737377473775737767377773778737797378073781737827378373784737857378673787737887378973790737917379273793737947379573796737977379873799738007380173802738037380473805738067380773808738097381073811738127381373814738157381673817738187381973820738217382273823738247382573826738277382873829738307383173832738337383473835738367383773838738397384073841738427384373844738457384673847738487384973850738517385273853738547385573856738577385873859738607386173862738637386473865738667386773868738697387073871738727387373874738757387673877738787387973880738817388273883738847388573886738877388873889738907389173892738937389473895738967389773898738997390073901739027390373904739057390673907739087390973910739117391273913739147391573916739177391873919739207392173922739237392473925739267392773928739297393073931739327393373934739357393673937739387393973940739417394273943739447394573946739477394873949739507395173952739537395473955739567395773958739597396073961739627396373964739657396673967739687396973970739717397273973739747397573976739777397873979739807398173982739837398473985739867398773988739897399073991739927399373994739957399673997739987399974000740017400274003740047400574006740077400874009740107401174012740137401474015740167401774018740197402074021740227402374024740257402674027740287402974030740317403274033740347403574036740377403874039740407404174042740437404474045740467404774048740497405074051740527405374054740557405674057740587405974060740617406274063740647406574066740677406874069740707407174072740737407474075740767407774078740797408074081740827408374084740857408674087740887408974090740917409274093740947409574096740977409874099741007410174102741037410474105741067410774108741097411074111741127411374114741157411674117741187411974120741217412274123741247412574126741277412874129741307413174132741337413474135741367413774138741397414074141741427414374144741457414674147741487414974150741517415274153741547415574156741577415874159741607416174162741637416474165741667416774168741697417074171741727417374174741757417674177741787417974180741817418274183741847418574186741877418874189741907419174192741937419474195741967419774198741997420074201742027420374204742057420674207742087420974210742117421274213742147421574216742177421874219742207422174222742237422474225742267422774228742297423074231742327423374234742357423674237742387423974240742417424274243742447424574246742477424874249742507425174252742537425474255742567425774258742597426074261742627426374264742657426674267742687426974270742717427274273742747427574276742777427874279742807428174282742837428474285742867428774288742897429074291742927429374294742957429674297742987429974300743017430274303743047430574306743077430874309743107431174312743137431474315743167431774318743197432074321743227432374324743257432674327743287432974330743317433274333743347433574336743377433874339743407434174342743437434474345743467434774348743497435074351743527435374354743557435674357743587435974360743617436274363743647436574366743677436874369743707437174372743737437474375743767437774378743797438074381743827438374384743857438674387743887438974390743917439274393743947439574396743977439874399744007440174402744037440474405744067440774408744097441074411744127441374414744157441674417744187441974420744217442274423744247442574426744277442874429744307443174432744337443474435744367443774438744397444074441744427444374444744457444674447744487444974450744517445274453744547445574456744577445874459744607446174462744637446474465744667446774468744697447074471744727447374474744757447674477744787447974480744817448274483744847448574486744877448874489744907449174492744937449474495744967449774498744997450074501745027450374504745057450674507745087450974510745117451274513745147451574516745177451874519745207452174522745237452474525745267452774528745297453074531745327453374534745357453674537745387453974540745417454274543745447454574546745477454874549745507455174552745537455474555745567455774558745597456074561745627456374564745657456674567745687456974570745717457274573745747457574576745777457874579745807458174582745837458474585745867458774588745897459074591745927459374594745957459674597745987459974600746017460274603746047460574606746077460874609746107461174612746137461474615746167461774618746197462074621746227462374624746257462674627746287462974630746317463274633746347463574636746377463874639746407464174642746437464474645746467464774648746497465074651746527465374654746557465674657746587465974660746617466274663746647466574666746677466874669746707467174672746737467474675746767467774678746797468074681746827468374684746857468674687746887468974690746917469274693746947469574696746977469874699747007470174702747037470474705747067470774708747097471074711747127471374714747157471674717747187471974720747217472274723747247472574726747277472874729747307473174732747337473474735747367473774738747397474074741747427474374744747457474674747747487474974750747517475274753747547475574756747577475874759747607476174762747637476474765747667476774768747697477074771747727477374774747757477674777747787477974780747817478274783747847478574786747877478874789747907479174792747937479474795747967479774798747997480074801748027480374804748057480674807748087480974810748117481274813748147481574816748177481874819748207482174822748237482474825748267482774828748297483074831748327483374834748357483674837748387483974840748417484274843748447484574846748477484874849748507485174852748537485474855748567485774858748597486074861748627486374864748657486674867748687486974870748717487274873748747487574876748777487874879748807488174882748837488474885748867488774888748897489074891748927489374894748957489674897748987489974900749017490274903749047490574906749077490874909749107491174912749137491474915749167491774918749197492074921749227492374924749257492674927749287492974930749317493274933749347493574936749377493874939749407494174942749437494474945749467494774948749497495074951749527495374954749557495674957749587495974960749617496274963749647496574966749677496874969749707497174972749737497474975749767497774978749797498074981749827498374984749857498674987749887498974990749917499274993749947499574996749977499874999750007500175002750037500475005750067500775008750097501075011750127501375014750157501675017750187501975020750217502275023750247502575026750277502875029750307503175032750337503475035750367503775038750397504075041750427504375044750457504675047750487504975050750517505275053750547505575056750577505875059750607506175062750637506475065750667506775068750697507075071750727507375074750757507675077750787507975080750817508275083750847508575086750877508875089750907509175092750937509475095750967509775098750997510075101751027510375104751057510675107751087510975110751117511275113751147511575116751177511875119751207512175122751237512475125751267512775128751297513075131751327513375134751357513675137751387513975140751417514275143751447514575146751477514875149751507515175152751537515475155751567515775158751597516075161751627516375164751657516675167751687516975170751717517275173751747517575176751777517875179751807518175182751837518475185751867518775188751897519075191751927519375194751957519675197751987519975200752017520275203752047520575206752077520875209752107521175212752137521475215752167521775218752197522075221752227522375224752257522675227752287522975230752317523275233752347523575236752377523875239752407524175242752437524475245752467524775248752497525075251752527525375254752557525675257752587525975260752617526275263752647526575266752677526875269752707527175272752737527475275752767527775278752797528075281752827528375284752857528675287752887528975290752917529275293752947529575296752977529875299753007530175302753037530475305753067530775308753097531075311753127531375314753157531675317753187531975320753217532275323753247532575326753277532875329753307533175332753337533475335753367533775338753397534075341753427534375344753457534675347753487534975350753517535275353753547535575356753577535875359753607536175362753637536475365753667536775368753697537075371753727537375374753757537675377753787537975380753817538275383753847538575386753877538875389753907539175392753937539475395753967539775398753997540075401754027540375404754057540675407754087540975410754117541275413754147541575416754177541875419754207542175422754237542475425754267542775428754297543075431754327543375434754357543675437754387543975440754417544275443754447544575446754477544875449754507545175452754537545475455754567545775458754597546075461754627546375464754657546675467754687546975470754717547275473754747547575476754777547875479754807548175482754837548475485754867548775488754897549075491754927549375494754957549675497754987549975500755017550275503755047550575506755077550875509755107551175512755137551475515755167551775518755197552075521755227552375524755257552675527755287552975530755317553275533755347553575536755377553875539755407554175542755437554475545755467554775548755497555075551755527555375554755557555675557755587555975560755617556275563755647556575566755677556875569755707557175572755737557475575755767557775578755797558075581755827558375584755857558675587755887558975590755917559275593755947559575596755977559875599756007560175602756037560475605756067560775608756097561075611756127561375614756157561675617756187561975620756217562275623756247562575626756277562875629756307563175632756337563475635756367563775638756397564075641756427564375644756457564675647756487564975650756517565275653756547565575656756577565875659756607566175662756637566475665756667566775668756697567075671756727567375674756757567675677756787567975680756817568275683756847568575686756877568875689756907569175692756937569475695756967569775698756997570075701757027570375704757057570675707757087570975710757117571275713757147571575716757177571875719757207572175722757237572475725757267572775728757297573075731757327573375734757357573675737757387573975740757417574275743757447574575746757477574875749757507575175752757537575475755757567575775758757597576075761757627576375764757657576675767757687576975770757717577275773757747577575776757777577875779757807578175782757837578475785757867578775788757897579075791757927579375794757957579675797757987579975800758017580275803758047580575806758077580875809758107581175812758137581475815758167581775818758197582075821758227582375824758257582675827758287582975830758317583275833758347583575836758377583875839758407584175842758437584475845758467584775848758497585075851758527585375854758557585675857758587585975860758617586275863758647586575866758677586875869758707587175872758737587475875758767587775878758797588075881758827588375884758857588675887758887588975890758917589275893758947589575896758977589875899759007590175902759037590475905759067590775908759097591075911759127591375914759157591675917759187591975920759217592275923759247592575926759277592875929759307593175932759337593475935759367593775938759397594075941759427594375944759457594675947759487594975950759517595275953759547595575956759577595875959759607596175962759637596475965759667596775968759697597075971759727597375974759757597675977759787597975980759817598275983759847598575986759877598875989759907599175992759937599475995759967599775998759997600076001760027600376004760057600676007760087600976010760117601276013760147601576016760177601876019760207602176022760237602476025760267602776028760297603076031760327603376034760357603676037760387603976040760417604276043760447604576046760477604876049760507605176052760537605476055760567605776058760597606076061760627606376064760657606676067760687606976070760717607276073760747607576076760777607876079760807608176082760837608476085760867608776088760897609076091760927609376094760957609676097760987609976100761017610276103761047610576106761077610876109761107611176112761137611476115761167611776118761197612076121761227612376124761257612676127761287612976130761317613276133761347613576136761377613876139761407614176142761437614476145761467614776148761497615076151761527615376154761557615676157761587615976160761617616276163761647616576166761677616876169761707617176172761737617476175761767617776178761797618076181761827618376184761857618676187761887618976190761917619276193761947619576196761977619876199762007620176202762037620476205762067620776208762097621076211762127621376214762157621676217762187621976220762217622276223762247622576226762277622876229762307623176232762337623476235762367623776238762397624076241762427624376244762457624676247762487624976250762517625276253762547625576256762577625876259762607626176262762637626476265762667626776268762697627076271762727627376274762757627676277762787627976280762817628276283762847628576286762877628876289762907629176292762937629476295762967629776298762997630076301763027630376304763057630676307763087630976310763117631276313763147631576316763177631876319763207632176322763237632476325763267632776328763297633076331763327633376334763357633676337763387633976340763417634276343763447634576346763477634876349763507635176352763537635476355763567635776358763597636076361763627636376364763657636676367763687636976370763717637276373763747637576376763777637876379763807638176382763837638476385763867638776388763897639076391763927639376394763957639676397763987639976400764017640276403764047640576406764077640876409764107641176412764137641476415764167641776418764197642076421764227642376424764257642676427764287642976430764317643276433764347643576436764377643876439764407644176442764437644476445764467644776448764497645076451764527645376454764557645676457764587645976460764617646276463764647646576466764677646876469764707647176472764737647476475764767647776478764797648076481764827648376484764857648676487764887648976490764917649276493764947649576496764977649876499765007650176502765037650476505765067650776508765097651076511765127651376514765157651676517765187651976520765217652276523765247652576526765277652876529765307653176532765337653476535765367653776538765397654076541765427654376544765457654676547765487654976550765517655276553765547655576556765577655876559765607656176562765637656476565765667656776568765697657076571765727657376574765757657676577765787657976580765817658276583765847658576586765877658876589765907659176592765937659476595765967659776598765997660076601766027660376604766057660676607766087660976610766117661276613766147661576616766177661876619766207662176622766237662476625766267662776628766297663076631766327663376634766357663676637766387663976640766417664276643766447664576646766477664876649766507665176652766537665476655766567665776658766597666076661766627666376664766657666676667766687666976670766717667276673766747667576676766777667876679766807668176682766837668476685766867668776688766897669076691766927669376694766957669676697766987669976700767017670276703767047670576706767077670876709767107671176712767137671476715767167671776718767197672076721767227672376724767257672676727767287672976730767317673276733767347673576736767377673876739767407674176742767437674476745767467674776748767497675076751767527675376754767557675676757767587675976760767617676276763767647676576766767677676876769767707677176772767737677476775767767677776778767797678076781767827678376784767857678676787767887678976790767917679276793767947679576796767977679876799768007680176802768037680476805768067680776808768097681076811768127681376814768157681676817768187681976820768217682276823768247682576826768277682876829768307683176832768337683476835768367683776838768397684076841768427684376844768457684676847768487684976850768517685276853768547685576856768577685876859768607686176862768637686476865768667686776868768697687076871768727687376874768757687676877768787687976880768817688276883768847688576886768877688876889768907689176892768937689476895768967689776898768997690076901769027690376904769057690676907769087690976910769117691276913769147691576916769177691876919769207692176922769237692476925769267692776928769297693076931769327693376934769357693676937769387693976940769417694276943769447694576946769477694876949769507695176952769537695476955769567695776958769597696076961769627696376964769657696676967769687696976970769717697276973769747697576976769777697876979769807698176982769837698476985769867698776988769897699076991769927699376994769957699676997769987699977000770017700277003770047700577006770077700877009770107701177012770137701477015770167701777018770197702077021770227702377024770257702677027770287702977030770317703277033770347703577036770377703877039770407704177042770437704477045770467704777048770497705077051770527705377054770557705677057770587705977060770617706277063770647706577066770677706877069770707707177072770737707477075770767707777078770797708077081770827708377084770857708677087770887708977090770917709277093770947709577096770977709877099771007710177102771037710477105771067710777108771097711077111771127711377114771157711677117771187711977120771217712277123771247712577126771277712877129771307713177132771337713477135771367713777138771397714077141771427714377144771457714677147771487714977150771517715277153771547715577156771577715877159771607716177162771637716477165771667716777168771697717077171771727717377174771757717677177771787717977180771817718277183771847718577186771877718877189771907719177192771937719477195771967719777198771997720077201772027720377204772057720677207772087720977210772117721277213772147721577216772177721877219772207722177222772237722477225772267722777228772297723077231772327723377234772357723677237772387723977240772417724277243772447724577246772477724877249772507725177252772537725477255772567725777258772597726077261772627726377264772657726677267772687726977270772717727277273772747727577276772777727877279772807728177282772837728477285772867728777288772897729077291772927729377294772957729677297772987729977300773017730277303773047730577306773077730877309773107731177312773137731477315773167731777318773197732077321773227732377324773257732677327773287732977330773317733277333773347733577336773377733877339773407734177342773437734477345773467734777348773497735077351773527735377354773557735677357773587735977360773617736277363773647736577366773677736877369773707737177372773737737477375773767737777378773797738077381773827738377384773857738677387773887738977390773917739277393773947739577396773977739877399774007740177402774037740477405774067740777408774097741077411774127741377414774157741677417774187741977420774217742277423774247742577426774277742877429774307743177432774337743477435774367743777438774397744077441774427744377444774457744677447774487744977450774517745277453774547745577456774577745877459774607746177462774637746477465774667746777468774697747077471774727747377474774757747677477774787747977480774817748277483774847748577486774877748877489774907749177492774937749477495774967749777498774997750077501775027750377504775057750677507775087750977510775117751277513775147751577516775177751877519775207752177522775237752477525775267752777528775297753077531775327753377534775357753677537775387753977540775417754277543775447754577546775477754877549775507755177552775537755477555775567755777558775597756077561775627756377564775657756677567775687756977570775717757277573775747757577576775777757877579775807758177582775837758477585775867758777588775897759077591775927759377594775957759677597775987759977600776017760277603776047760577606776077760877609776107761177612776137761477615776167761777618776197762077621776227762377624776257762677627776287762977630776317763277633776347763577636776377763877639776407764177642776437764477645776467764777648776497765077651776527765377654776557765677657776587765977660776617766277663776647766577666776677766877669776707767177672776737767477675776767767777678776797768077681776827768377684776857768677687776887768977690776917769277693776947769577696776977769877699777007770177702777037770477705777067770777708777097771077711777127771377714777157771677717777187771977720777217772277723777247772577726777277772877729777307773177732777337773477735777367773777738777397774077741777427774377744777457774677747777487774977750777517775277753777547775577756777577775877759777607776177762777637776477765777667776777768777697777077771777727777377774777757777677777777787777977780777817778277783777847778577786777877778877789777907779177792777937779477795777967779777798777997780077801778027780377804778057780677807778087780977810778117781277813778147781577816778177781877819778207782177822778237782477825778267782777828778297783077831778327783377834778357783677837778387783977840778417784277843778447784577846778477784877849778507785177852778537785477855778567785777858778597786077861778627786377864778657786677867778687786977870778717787277873778747787577876778777787877879778807788177882778837788477885778867788777888778897789077891778927789377894778957789677897778987789977900779017790277903779047790577906779077790877909779107791177912779137791477915779167791777918779197792077921779227792377924779257792677927779287792977930779317793277933779347793577936779377793877939779407794177942779437794477945779467794777948779497795077951779527795377954779557795677957779587795977960779617796277963779647796577966779677796877969779707797177972779737797477975779767797777978779797798077981779827798377984779857798677987779887798977990779917799277993779947799577996779977799877999780007800178002780037800478005780067800778008780097801078011780127801378014780157801678017780187801978020780217802278023780247802578026780277802878029780307803178032780337803478035780367803778038780397804078041780427804378044780457804678047780487804978050780517805278053780547805578056780577805878059780607806178062780637806478065780667806778068780697807078071780727807378074780757807678077780787807978080780817808278083780847808578086780877808878089780907809178092780937809478095780967809778098780997810078101781027810378104781057810678107781087810978110781117811278113781147811578116781177811878119781207812178122781237812478125781267812778128781297813078131781327813378134781357813678137781387813978140781417814278143781447814578146781477814878149781507815178152781537815478155781567815778158781597816078161781627816378164781657816678167781687816978170781717817278173781747817578176781777817878179781807818178182781837818478185781867818778188781897819078191781927819378194781957819678197781987819978200782017820278203782047820578206782077820878209782107821178212782137821478215782167821778218782197822078221782227822378224782257822678227782287822978230782317823278233782347823578236782377823878239782407824178242782437824478245782467824778248782497825078251782527825378254782557825678257782587825978260782617826278263782647826578266782677826878269782707827178272782737827478275782767827778278782797828078281782827828378284782857828678287782887828978290782917829278293782947829578296782977829878299783007830178302783037830478305783067830778308783097831078311783127831378314783157831678317783187831978320783217832278323783247832578326783277832878329783307833178332783337833478335783367833778338783397834078341783427834378344783457834678347783487834978350783517835278353783547835578356783577835878359783607836178362783637836478365783667836778368783697837078371783727837378374783757837678377783787837978380783817838278383783847838578386783877838878389783907839178392783937839478395783967839778398783997840078401784027840378404784057840678407784087840978410784117841278413784147841578416784177841878419784207842178422784237842478425784267842778428784297843078431784327843378434784357843678437784387843978440784417844278443784447844578446784477844878449784507845178452784537845478455784567845778458784597846078461784627846378464784657846678467784687846978470784717847278473784747847578476784777847878479784807848178482784837848478485784867848778488784897849078491784927849378494784957849678497784987849978500785017850278503785047850578506785077850878509785107851178512785137851478515785167851778518785197852078521785227852378524785257852678527785287852978530785317853278533785347853578536785377853878539785407854178542785437854478545785467854778548785497855078551785527855378554785557855678557785587855978560785617856278563785647856578566785677856878569785707857178572785737857478575785767857778578785797858078581785827858378584785857858678587785887858978590785917859278593785947859578596785977859878599786007860178602786037860478605786067860778608786097861078611786127861378614786157861678617786187861978620786217862278623786247862578626786277862878629786307863178632786337863478635786367863778638786397864078641786427864378644786457864678647786487864978650786517865278653786547865578656786577865878659786607866178662786637866478665786667866778668786697867078671786727867378674786757867678677786787867978680786817868278683786847868578686786877868878689786907869178692786937869478695786967869778698786997870078701787027870378704787057870678707787087870978710787117871278713787147871578716787177871878719787207872178722787237872478725787267872778728787297873078731787327873378734787357873678737787387873978740787417874278743787447874578746787477874878749787507875178752787537875478755787567875778758787597876078761787627876378764787657876678767787687876978770787717877278773787747877578776787777877878779787807878178782787837878478785787867878778788787897879078791787927879378794787957879678797787987879978800788017880278803788047880578806788077880878809788107881178812788137881478815788167881778818788197882078821788227882378824788257882678827788287882978830788317883278833788347883578836788377883878839788407884178842788437884478845788467884778848788497885078851788527885378854788557885678857788587885978860788617886278863788647886578866788677886878869788707887178872788737887478875788767887778878788797888078881788827888378884788857888678887788887888978890788917889278893788947889578896788977889878899789007890178902789037890478905789067890778908789097891078911789127891378914789157891678917789187891978920789217892278923789247892578926789277892878929789307893178932789337893478935789367893778938789397894078941789427894378944789457894678947789487894978950789517895278953789547895578956789577895878959789607896178962789637896478965789667896778968789697897078971789727897378974789757897678977789787897978980789817898278983789847898578986789877898878989789907899178992789937899478995789967899778998789997900079001790027900379004790057900679007790087900979010790117901279013790147901579016790177901879019790207902179022790237902479025790267902779028790297903079031790327903379034790357903679037790387903979040790417904279043790447904579046790477904879049790507905179052790537905479055790567905779058790597906079061790627906379064790657906679067790687906979070790717907279073790747907579076790777907879079790807908179082790837908479085790867908779088790897909079091790927909379094790957909679097790987909979100791017910279103791047910579106791077910879109791107911179112791137911479115791167911779118791197912079121791227912379124791257912679127791287912979130791317913279133791347913579136791377913879139791407914179142791437914479145791467914779148791497915079151791527915379154791557915679157791587915979160791617916279163791647916579166791677916879169791707917179172791737917479175791767917779178791797918079181791827918379184791857918679187791887918979190791917919279193791947919579196791977919879199792007920179202792037920479205792067920779208792097921079211792127921379214792157921679217792187921979220792217922279223792247922579226792277922879229792307923179232792337923479235792367923779238792397924079241792427924379244792457924679247792487924979250792517925279253792547925579256792577925879259792607926179262792637926479265792667926779268792697927079271792727927379274792757927679277792787927979280792817928279283792847928579286792877928879289792907929179292792937929479295792967929779298792997930079301793027930379304793057930679307793087930979310793117931279313793147931579316793177931879319793207932179322793237932479325793267932779328793297933079331793327933379334793357933679337793387933979340793417934279343793447934579346793477934879349793507935179352793537935479355793567935779358793597936079361793627936379364793657936679367793687936979370793717937279373793747937579376793777937879379793807938179382793837938479385793867938779388793897939079391793927939379394793957939679397793987939979400794017940279403794047940579406794077940879409794107941179412794137941479415794167941779418794197942079421794227942379424794257942679427794287942979430794317943279433794347943579436794377943879439794407944179442794437944479445794467944779448794497945079451794527945379454794557945679457794587945979460794617946279463794647946579466794677946879469794707947179472794737947479475794767947779478794797948079481794827948379484794857948679487794887948979490794917949279493794947949579496794977949879499795007950179502795037950479505795067950779508795097951079511795127951379514795157951679517795187951979520795217952279523795247952579526795277952879529795307953179532795337953479535795367953779538795397954079541795427954379544795457954679547795487954979550795517955279553795547955579556795577955879559795607956179562795637956479565795667956779568795697957079571795727957379574795757957679577795787957979580795817958279583795847958579586795877958879589795907959179592795937959479595795967959779598795997960079601796027960379604796057960679607796087960979610796117961279613796147961579616796177961879619796207962179622796237962479625796267962779628796297963079631796327963379634796357963679637796387963979640796417964279643796447964579646796477964879649796507965179652796537965479655796567965779658796597966079661796627966379664796657966679667796687966979670796717967279673796747967579676796777967879679796807968179682796837968479685796867968779688796897969079691796927969379694796957969679697796987969979700797017970279703797047970579706797077970879709797107971179712797137971479715797167971779718797197972079721797227972379724797257972679727797287972979730797317973279733797347973579736797377973879739797407974179742797437974479745797467974779748797497975079751797527975379754797557975679757797587975979760797617976279763797647976579766797677976879769797707977179772797737977479775797767977779778797797978079781797827978379784797857978679787797887978979790797917979279793797947979579796797977979879799798007980179802798037980479805798067980779808798097981079811798127981379814798157981679817798187981979820798217982279823798247982579826798277982879829798307983179832798337983479835798367983779838798397984079841798427984379844798457984679847798487984979850798517985279853798547985579856798577985879859798607986179862798637986479865798667986779868798697987079871798727987379874798757987679877798787987979880798817988279883798847988579886798877988879889798907989179892798937989479895798967989779898798997990079901799027990379904799057990679907799087990979910799117991279913799147991579916799177991879919799207992179922799237992479925799267992779928799297993079931799327993379934799357993679937799387993979940799417994279943799447994579946799477994879949799507995179952799537995479955799567995779958799597996079961799627996379964799657996679967799687996979970799717997279973799747997579976799777997879979799807998179982799837998479985799867998779988799897999079991799927999379994799957999679997799987999980000800018000280003800048000580006800078000880009800108001180012800138001480015800168001780018800198002080021800228002380024800258002680027800288002980030800318003280033800348003580036800378003880039800408004180042800438004480045800468004780048800498005080051800528005380054800558005680057800588005980060800618006280063800648006580066800678006880069800708007180072800738007480075800768007780078800798008080081800828008380084800858008680087800888008980090800918009280093800948009580096800978009880099801008010180102801038010480105801068010780108801098011080111801128011380114801158011680117801188011980120801218012280123801248012580126801278012880129801308013180132801338013480135801368013780138801398014080141801428014380144801458014680147801488014980150801518015280153801548015580156801578015880159801608016180162801638016480165801668016780168801698017080171801728017380174801758017680177801788017980180801818018280183801848018580186801878018880189801908019180192801938019480195801968019780198801998020080201802028020380204802058020680207802088020980210802118021280213802148021580216802178021880219802208022180222802238022480225802268022780228802298023080231802328023380234802358023680237802388023980240802418024280243802448024580246802478024880249802508025180252802538025480255802568025780258802598026080261802628026380264802658026680267802688026980270802718027280273802748027580276802778027880279802808028180282802838028480285802868028780288802898029080291802928029380294802958029680297802988029980300803018030280303803048030580306803078030880309803108031180312803138031480315803168031780318803198032080321803228032380324803258032680327803288032980330803318033280333803348033580336803378033880339803408034180342803438034480345803468034780348803498035080351803528035380354803558035680357803588035980360803618036280363803648036580366803678036880369803708037180372803738037480375803768037780378803798038080381803828038380384803858038680387803888038980390803918039280393803948039580396803978039880399804008040180402804038040480405804068040780408804098041080411804128041380414804158041680417804188041980420804218042280423804248042580426804278042880429804308043180432804338043480435804368043780438804398044080441804428044380444804458044680447804488044980450804518045280453804548045580456804578045880459804608046180462804638046480465804668046780468804698047080471804728047380474804758047680477804788047980480804818048280483804848048580486804878048880489804908049180492804938049480495804968049780498804998050080501805028050380504805058050680507805088050980510805118051280513805148051580516805178051880519805208052180522805238052480525805268052780528805298053080531805328053380534805358053680537805388053980540805418054280543805448054580546805478054880549805508055180552805538055480555805568055780558805598056080561805628056380564805658056680567805688056980570805718057280573805748057580576805778057880579805808058180582805838058480585805868058780588805898059080591805928059380594805958059680597805988059980600806018060280603806048060580606806078060880609806108061180612806138061480615806168061780618806198062080621806228062380624806258062680627806288062980630806318063280633806348063580636806378063880639806408064180642806438064480645806468064780648806498065080651806528065380654806558065680657806588065980660806618066280663806648066580666806678066880669806708067180672806738067480675806768067780678806798068080681806828068380684806858068680687806888068980690806918069280693806948069580696806978069880699807008070180702807038070480705807068070780708807098071080711807128071380714807158071680717807188071980720807218072280723807248072580726807278072880729807308073180732807338073480735807368073780738807398074080741807428074380744807458074680747807488074980750807518075280753807548075580756807578075880759807608076180762807638076480765807668076780768807698077080771807728077380774807758077680777807788077980780807818078280783807848078580786807878078880789807908079180792807938079480795807968079780798807998080080801808028080380804808058080680807808088080980810808118081280813808148081580816808178081880819808208082180822808238082480825808268082780828808298083080831808328083380834808358083680837808388083980840808418084280843808448084580846808478084880849808508085180852808538085480855808568085780858808598086080861808628086380864808658086680867808688086980870808718087280873808748087580876808778087880879808808088180882808838088480885808868088780888808898089080891808928089380894808958089680897808988089980900809018090280903809048090580906809078090880909809108091180912809138091480915809168091780918809198092080921809228092380924809258092680927809288092980930809318093280933809348093580936809378093880939809408094180942809438094480945809468094780948809498095080951809528095380954809558095680957809588095980960809618096280963809648096580966809678096880969809708097180972809738097480975809768097780978809798098080981809828098380984809858098680987809888098980990809918099280993809948099580996809978099880999810008100181002810038100481005810068100781008810098101081011810128101381014810158101681017810188101981020810218102281023810248102581026810278102881029810308103181032810338103481035810368103781038810398104081041810428104381044810458104681047810488104981050810518105281053810548105581056810578105881059810608106181062810638106481065810668106781068810698107081071810728107381074810758107681077810788107981080810818108281083810848108581086810878108881089810908109181092810938109481095810968109781098810998110081101811028110381104811058110681107811088110981110811118111281113811148111581116811178111881119811208112181122811238112481125811268112781128811298113081131811328113381134811358113681137811388113981140811418114281143811448114581146811478114881149811508115181152811538115481155811568115781158811598116081161811628116381164811658116681167811688116981170811718117281173811748117581176811778117881179811808118181182811838118481185811868118781188811898119081191811928119381194811958119681197811988119981200812018120281203812048120581206812078120881209812108121181212812138121481215812168121781218812198122081221812228122381224812258122681227812288122981230812318123281233812348123581236812378123881239812408124181242812438124481245812468124781248812498125081251812528125381254812558125681257812588125981260812618126281263812648126581266812678126881269812708127181272812738127481275812768127781278812798128081281812828128381284812858128681287812888128981290812918129281293812948129581296812978129881299813008130181302813038130481305813068130781308813098131081311813128131381314813158131681317813188131981320813218132281323813248132581326813278132881329813308133181332813338133481335813368133781338813398134081341813428134381344813458134681347813488134981350813518135281353813548135581356813578135881359813608136181362813638136481365813668136781368813698137081371813728137381374813758137681377813788137981380813818138281383813848138581386813878138881389813908139181392813938139481395813968139781398813998140081401814028140381404814058140681407814088140981410814118141281413814148141581416814178141881419814208142181422814238142481425814268142781428814298143081431814328143381434814358143681437814388143981440814418144281443814448144581446814478144881449814508145181452814538145481455814568145781458814598146081461814628146381464814658146681467814688146981470814718147281473814748147581476814778147881479814808148181482814838148481485814868148781488814898149081491814928149381494814958149681497814988149981500815018150281503815048150581506815078150881509815108151181512815138151481515815168151781518815198152081521815228152381524815258152681527815288152981530815318153281533815348153581536815378153881539815408154181542815438154481545815468154781548815498155081551815528155381554815558155681557815588155981560815618156281563815648156581566815678156881569815708157181572815738157481575815768157781578815798158081581815828158381584815858158681587815888158981590815918159281593815948159581596815978159881599816008160181602816038160481605816068160781608816098161081611816128161381614816158161681617816188161981620816218162281623816248162581626816278162881629816308163181632816338163481635816368163781638816398164081641816428164381644816458164681647816488164981650816518165281653816548165581656816578165881659816608166181662816638166481665816668166781668816698167081671816728167381674816758167681677816788167981680816818168281683816848168581686816878168881689816908169181692816938169481695816968169781698816998170081701817028170381704817058170681707817088170981710817118171281713817148171581716817178171881719817208172181722817238172481725817268172781728817298173081731817328173381734817358173681737817388173981740817418174281743817448174581746817478174881749817508175181752817538175481755817568175781758817598176081761817628176381764817658176681767817688176981770817718177281773817748177581776817778177881779817808178181782817838178481785817868178781788817898179081791817928179381794817958179681797817988179981800818018180281803818048180581806818078180881809818108181181812818138181481815818168181781818818198182081821818228182381824818258182681827818288182981830818318183281833818348183581836818378183881839818408184181842818438184481845818468184781848818498185081851818528185381854818558185681857818588185981860818618186281863818648186581866818678186881869818708187181872818738187481875818768187781878818798188081881818828188381884818858188681887818888188981890818918189281893818948189581896818978189881899819008190181902819038190481905819068190781908819098191081911819128191381914819158191681917819188191981920819218192281923819248192581926819278192881929819308193181932819338193481935819368193781938819398194081941819428194381944819458194681947819488194981950819518195281953819548195581956819578195881959819608196181962819638196481965819668196781968819698197081971819728197381974819758197681977819788197981980819818198281983819848198581986819878198881989819908199181992819938199481995819968199781998819998200082001820028200382004820058200682007820088200982010820118201282013820148201582016820178201882019820208202182022820238202482025820268202782028820298203082031820328203382034820358203682037820388203982040820418204282043820448204582046820478204882049820508205182052820538205482055820568205782058820598206082061820628206382064820658206682067820688206982070820718207282073820748207582076820778207882079820808208182082820838208482085820868208782088820898209082091820928209382094820958209682097820988209982100821018210282103821048210582106821078210882109821108211182112821138211482115821168211782118821198212082121821228212382124821258212682127821288212982130821318213282133821348213582136821378213882139821408214182142821438214482145821468214782148821498215082151821528215382154821558215682157821588215982160821618216282163821648216582166821678216882169821708217182172821738217482175821768217782178821798218082181821828218382184821858218682187821888218982190821918219282193821948219582196821978219882199822008220182202822038220482205822068220782208822098221082211822128221382214822158221682217822188221982220822218222282223822248222582226822278222882229822308223182232822338223482235822368223782238822398224082241822428224382244822458224682247822488224982250822518225282253822548225582256822578225882259822608226182262822638226482265822668226782268822698227082271822728227382274822758227682277822788227982280822818228282283822848228582286822878228882289822908229182292822938229482295822968229782298822998230082301823028230382304823058230682307823088230982310823118231282313823148231582316823178231882319823208232182322823238232482325823268232782328823298233082331823328233382334823358233682337823388233982340823418234282343823448234582346823478234882349823508235182352823538235482355823568235782358823598236082361823628236382364823658236682367823688236982370823718237282373823748237582376823778237882379823808238182382823838238482385823868238782388823898239082391823928239382394823958239682397823988239982400824018240282403824048240582406824078240882409824108241182412824138241482415824168241782418824198242082421824228242382424824258242682427824288242982430824318243282433824348243582436824378243882439824408244182442824438244482445824468244782448824498245082451824528245382454824558245682457824588245982460824618246282463824648246582466824678246882469824708247182472824738247482475824768247782478824798248082481824828248382484824858248682487824888248982490824918249282493824948249582496824978249882499825008250182502825038250482505825068250782508825098251082511825128251382514825158251682517825188251982520825218252282523825248252582526825278252882529825308253182532825338253482535825368253782538825398254082541825428254382544825458254682547825488254982550825518255282553825548255582556825578255882559825608256182562825638256482565825668256782568825698257082571825728257382574825758257682577825788257982580825818258282583825848258582586825878258882589825908259182592825938259482595825968259782598825998260082601826028260382604826058260682607826088260982610826118261282613826148261582616826178261882619826208262182622826238262482625826268262782628826298263082631826328263382634826358263682637826388263982640826418264282643826448264582646826478264882649826508265182652826538265482655826568265782658826598266082661826628266382664826658266682667826688266982670826718267282673826748267582676826778267882679826808268182682826838268482685826868268782688826898269082691826928269382694826958269682697826988269982700827018270282703827048270582706827078270882709827108271182712827138271482715827168271782718827198272082721827228272382724827258272682727827288272982730827318273282733827348273582736827378273882739827408274182742827438274482745827468274782748827498275082751827528275382754827558275682757827588275982760827618276282763827648276582766827678276882769827708277182772827738277482775827768277782778827798278082781827828278382784827858278682787827888278982790827918279282793827948279582796827978279882799828008280182802828038280482805828068280782808828098281082811828128281382814828158281682817828188281982820828218282282823828248282582826828278282882829828308283182832828338283482835828368283782838828398284082841828428284382844828458284682847828488284982850828518285282853828548285582856828578285882859828608286182862828638286482865828668286782868828698287082871828728287382874828758287682877828788287982880828818288282883828848288582886828878288882889828908289182892828938289482895828968289782898828998290082901829028290382904829058290682907829088290982910829118291282913829148291582916829178291882919829208292182922829238292482925829268292782928829298293082931829328293382934829358293682937829388293982940829418294282943829448294582946829478294882949829508295182952829538295482955829568295782958829598296082961829628296382964829658296682967829688296982970829718297282973829748297582976829778297882979829808298182982829838298482985829868298782988829898299082991829928299382994829958299682997829988299983000830018300283003830048300583006830078300883009830108301183012830138301483015830168301783018830198302083021830228302383024830258302683027830288302983030830318303283033830348303583036830378303883039830408304183042830438304483045830468304783048830498305083051830528305383054830558305683057830588305983060830618306283063830648306583066830678306883069830708307183072830738307483075830768307783078830798308083081830828308383084830858308683087830888308983090830918309283093830948309583096830978309883099831008310183102831038310483105831068310783108831098311083111831128311383114831158311683117831188311983120831218312283123831248312583126831278312883129831308313183132831338313483135831368313783138831398314083141831428314383144831458314683147831488314983150831518315283153831548315583156831578315883159831608316183162831638316483165831668316783168831698317083171831728317383174831758317683177831788317983180831818318283183831848318583186831878318883189831908319183192831938319483195831968319783198831998320083201832028320383204832058320683207832088320983210832118321283213832148321583216832178321883219832208322183222832238322483225832268322783228832298323083231832328323383234832358323683237832388323983240832418324283243832448324583246832478324883249832508325183252832538325483255832568325783258832598326083261832628326383264832658326683267832688326983270832718327283273832748327583276832778327883279832808328183282832838328483285832868328783288832898329083291832928329383294832958329683297832988329983300833018330283303833048330583306833078330883309833108331183312833138331483315833168331783318833198332083321833228332383324833258332683327833288332983330833318333283333833348333583336833378333883339833408334183342833438334483345833468334783348833498335083351833528335383354833558335683357833588335983360833618336283363833648336583366833678336883369833708337183372833738337483375833768337783378833798338083381833828338383384833858338683387833888338983390833918339283393833948339583396833978339883399834008340183402834038340483405834068340783408834098341083411834128341383414834158341683417834188341983420834218342283423834248342583426834278342883429834308343183432834338343483435834368343783438834398344083441834428344383444834458344683447834488344983450834518345283453834548345583456834578345883459834608346183462834638346483465834668346783468834698347083471834728347383474834758347683477834788347983480834818348283483834848348583486834878348883489834908349183492834938349483495834968349783498834998350083501835028350383504835058350683507835088350983510835118351283513835148351583516835178351883519835208352183522835238352483525835268352783528835298353083531835328353383534835358353683537835388353983540835418354283543835448354583546835478354883549835508355183552835538355483555835568355783558835598356083561835628356383564835658356683567835688356983570835718357283573835748357583576835778357883579835808358183582835838358483585835868358783588835898359083591835928359383594835958359683597835988359983600836018360283603836048360583606836078360883609836108361183612836138361483615836168361783618836198362083621836228362383624836258362683627836288362983630836318363283633836348363583636836378363883639836408364183642836438364483645836468364783648836498365083651836528365383654836558365683657836588365983660836618366283663836648366583666836678366883669836708367183672836738367483675836768367783678836798368083681836828368383684836858368683687836888368983690836918369283693836948369583696836978369883699837008370183702837038370483705837068370783708837098371083711837128371383714837158371683717837188371983720837218372283723837248372583726837278372883729837308373183732837338373483735837368373783738837398374083741837428374383744837458374683747837488374983750837518375283753837548375583756837578375883759837608376183762837638376483765837668376783768837698377083771837728377383774837758377683777837788377983780837818378283783837848378583786837878378883789837908379183792837938379483795837968379783798837998380083801838028380383804838058380683807838088380983810838118381283813838148381583816838178381883819838208382183822838238382483825838268382783828838298383083831838328383383834838358383683837838388383983840838418384283843838448384583846838478384883849838508385183852838538385483855838568385783858838598386083861838628386383864838658386683867838688386983870838718387283873838748387583876838778387883879838808388183882838838388483885838868388783888838898389083891838928389383894838958389683897838988389983900839018390283903839048390583906839078390883909839108391183912839138391483915839168391783918839198392083921839228392383924839258392683927839288392983930839318393283933839348393583936839378393883939839408394183942839438394483945839468394783948839498395083951839528395383954839558395683957839588395983960839618396283963839648396583966839678396883969839708397183972839738397483975839768397783978839798398083981839828398383984839858398683987839888398983990839918399283993839948399583996839978399883999840008400184002840038400484005840068400784008840098401084011840128401384014840158401684017840188401984020840218402284023840248402584026840278402884029840308403184032840338403484035840368403784038840398404084041840428404384044840458404684047840488404984050840518405284053840548405584056840578405884059840608406184062840638406484065840668406784068840698407084071840728407384074840758407684077840788407984080840818408284083840848408584086840878408884089840908409184092840938409484095840968409784098840998410084101841028410384104841058410684107841088410984110841118411284113841148411584116841178411884119841208412184122841238412484125841268412784128841298413084131841328413384134841358413684137841388413984140841418414284143841448414584146841478414884149841508415184152841538415484155841568415784158841598416084161841628416384164841658416684167841688416984170841718417284173841748417584176841778417884179841808418184182841838418484185841868418784188841898419084191841928419384194841958419684197841988419984200842018420284203842048420584206842078420884209842108421184212842138421484215842168421784218842198422084221842228422384224842258422684227842288422984230842318423284233842348423584236842378423884239842408424184242842438424484245842468424784248842498425084251842528425384254842558425684257842588425984260842618426284263842648426584266842678426884269842708427184272842738427484275842768427784278842798428084281842828428384284842858428684287842888428984290842918429284293842948429584296842978429884299843008430184302843038430484305843068430784308843098431084311843128431384314843158431684317843188431984320843218432284323843248432584326843278432884329843308433184332843338433484335843368433784338843398434084341843428434384344843458434684347843488434984350843518435284353843548435584356843578435884359843608436184362843638436484365843668436784368843698437084371843728437384374843758437684377843788437984380843818438284383843848438584386843878438884389843908439184392843938439484395843968439784398843998440084401844028440384404844058440684407844088440984410844118441284413844148441584416844178441884419844208442184422844238442484425844268442784428844298443084431844328443384434844358443684437844388443984440844418444284443844448444584446844478444884449844508445184452844538445484455844568445784458844598446084461844628446384464844658446684467844688446984470844718447284473844748447584476844778447884479844808448184482844838448484485844868448784488844898449084491844928449384494844958449684497844988449984500845018450284503845048450584506845078450884509845108451184512845138451484515845168451784518845198452084521845228452384524845258452684527845288452984530845318453284533845348453584536845378453884539845408454184542845438454484545845468454784548845498455084551845528455384554845558455684557845588455984560845618456284563845648456584566845678456884569845708457184572845738457484575845768457784578845798458084581845828458384584845858458684587845888458984590845918459284593845948459584596845978459884599846008460184602846038460484605846068460784608846098461084611846128461384614846158461684617846188461984620846218462284623846248462584626846278462884629846308463184632846338463484635846368463784638846398464084641846428464384644846458464684647846488464984650846518465284653846548465584656846578465884659846608466184662846638466484665846668466784668846698467084671846728467384674846758467684677846788467984680846818468284683846848468584686846878468884689846908469184692846938469484695846968469784698846998470084701847028470384704847058470684707847088470984710847118471284713847148471584716847178471884719847208472184722847238472484725847268472784728847298473084731847328473384734847358473684737847388473984740847418474284743847448474584746847478474884749847508475184752847538475484755847568475784758847598476084761847628476384764847658476684767847688476984770847718477284773847748477584776847778477884779847808478184782847838478484785847868478784788847898479084791847928479384794847958479684797847988479984800848018480284803848048480584806848078480884809848108481184812848138481484815848168481784818848198482084821848228482384824848258482684827848288482984830848318483284833848348483584836848378483884839848408484184842848438484484845848468484784848848498485084851848528485384854848558485684857848588485984860848618486284863848648486584866848678486884869848708487184872848738487484875848768487784878848798488084881848828488384884848858488684887848888488984890848918489284893
  1. unit pic32mx575f512h;
  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. TI2C3_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. TI2C3_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. TI2C3_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. TI2C3_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. TI2C3Registers = record
  1812. I2C1ACONbits : TI2C3_I2C1ACON;
  1813. I2C1ACON : longWord;
  1814. I2C3CONbits : TI2C3_I2C3CON;
  1815. I2C3CON : longWord;
  1816. I2C1ACONCLR : longWord;
  1817. I2C3CONCLR : longWord;
  1818. I2C1ACONSET : longWord;
  1819. I2C3CONSET : longWord;
  1820. I2C1ACONINV : longWord;
  1821. I2C3CONINV : longWord;
  1822. I2C1ASTATbits : TI2C3_I2C1ASTAT;
  1823. I2C1ASTAT : longWord;
  1824. I2C3STATbits : TI2C3_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. TI2C4_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. TI2C4_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. TI2C4_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. TI2C4_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. TI2C4Registers = record
  2217. I2C2ACONbits : TI2C4_I2C2ACON;
  2218. I2C2ACON : longWord;
  2219. I2C4CONbits : TI2C4_I2C4CON;
  2220. I2C4CON : longWord;
  2221. I2C2ACONCLR : longWord;
  2222. I2C4CONCLR : longWord;
  2223. I2C2ACONSET : longWord;
  2224. I2C4CONSET : longWord;
  2225. I2C2ACONINV : longWord;
  2226. I2C4CONINV : longWord;
  2227. I2C2ASTATbits : TI2C4_I2C2ASTAT;
  2228. I2C2ASTAT : longWord;
  2229. I2C4STATbits : TI2C4_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. TI2C3A_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. TI2C3A_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. TI2C3A_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. TI2C3A_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. TI2C3ARegisters = record
  2622. I2C3ACONbits : TI2C3A_I2C3ACON;
  2623. I2C3ACON : longWord;
  2624. I2C5CONbits : TI2C3A_I2C5CON;
  2625. I2C5CON : longWord;
  2626. I2C3ACONCLR : longWord;
  2627. I2C5CONCLR : longWord;
  2628. I2C3ACONSET : longWord;
  2629. I2C5CONSET : longWord;
  2630. I2C3ACONINV : longWord;
  2631. I2C5CONINV : longWord;
  2632. I2C3ASTATbits : TI2C3A_I2C3ASTAT;
  2633. I2C3ASTAT : longWord;
  2634. I2C5STATbits : TI2C3A_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. TSPI1A_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. TSPI1A_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. TSPI1A_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. TSPI1A_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. TSPI1ARegisters = record
  3191. SPI1ACONbits : TSPI1A_SPI1ACON;
  3192. SPI1ACON : longWord;
  3193. SPI3CONbits : TSPI1A_SPI3CON;
  3194. SPI3CON : longWord;
  3195. SPI1ACONCLR : longWord;
  3196. SPI3CONCLR : longWord;
  3197. SPI1ACONSET : longWord;
  3198. SPI3CONSET : longWord;
  3199. SPI1ACONINV : longWord;
  3200. SPI3CONINV : longWord;
  3201. SPI1ASTATbits : TSPI1A_SPI1ASTAT;
  3202. SPI1ASTAT : longWord;
  3203. SPI3STATbits : TSPI1A_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. TSPI2_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. TSPI2_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. TSPI2_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. TSPI2_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. TSPI2Registers = record
  3532. SPI2ACONbits : TSPI2_SPI2ACON;
  3533. SPI2ACON : longWord;
  3534. SPI2CONbits : TSPI2_SPI2CON;
  3535. SPI2CON : longWord;
  3536. SPI2ACONCLR : longWord;
  3537. SPI2CONCLR : longWord;
  3538. SPI2ACONSET : longWord;
  3539. SPI2CONSET : longWord;
  3540. SPI2ACONINV : longWord;
  3541. SPI2CONINV : longWord;
  3542. SPI2ASTATbits : TSPI2_SPI2ASTAT;
  3543. SPI2ASTAT : longWord;
  3544. SPI2STATbits : TSPI2_SPI2STAT;
  3545. SPI2STAT : longWord;
  3546. SPI2ASTATCLR : longWord;
  3547. SPI2STATCLR : longWord;
  3548. SPI2ASTATSET : longWord;
  3549. SPI2STATSET : longWord;
  3550. SPI2ASTATINV : longWord;
  3551. SPI2STATINV : longWord;
  3552. SPI2ABUF : longWord;
  3553. SPI2BUF : longWord;
  3554. SPI2ABRG : longWord;
  3555. SPI2BRG : longWord;
  3556. SPI2ABRGCLR : longWord;
  3557. SPI2BRGCLR : longWord;
  3558. SPI2ABRGSET : longWord;
  3559. SPI2BRGSET : longWord;
  3560. SPI2ABRGINV : longWord;
  3561. SPI2BRGINV : longWord;
  3562. end;
  3563. TSPI3A_SPI3ACON = record
  3564. private
  3565. function getCKE : TBits_1; inline;
  3566. function getCKP : TBits_1; inline;
  3567. function getDISSDO : TBits_1; inline;
  3568. function getENHBUF : TBits_1; inline;
  3569. function getFRMCNT : TBits_3; inline;
  3570. function getFRMEN : TBits_1; inline;
  3571. function getFRMPOL : TBits_1; inline;
  3572. function getFRMSYNC : TBits_1; inline;
  3573. function getFRMSYPW : TBits_1; inline;
  3574. function getMODE16 : TBits_1; inline;
  3575. function getMODE32 : TBits_1; inline;
  3576. function getMSSEN : TBits_1; inline;
  3577. function getMSTEN : TBits_1; inline;
  3578. function getON : TBits_1; inline;
  3579. function getSIDL : TBits_1; inline;
  3580. function getSMP : TBits_1; inline;
  3581. function getSPIFE : TBits_1; inline;
  3582. function getSRXISEL : TBits_2; inline;
  3583. function getSSEN : TBits_1; inline;
  3584. function getSTXISEL : TBits_2; inline;
  3585. function getw : TBits_32; inline;
  3586. procedure setCKE(thebits : TBits_1); inline;
  3587. procedure setCKP(thebits : TBits_1); inline;
  3588. procedure setDISSDO(thebits : TBits_1); inline;
  3589. procedure setENHBUF(thebits : TBits_1); inline;
  3590. procedure setFRMCNT(thebits : TBits_3); inline;
  3591. procedure setFRMEN(thebits : TBits_1); inline;
  3592. procedure setFRMPOL(thebits : TBits_1); inline;
  3593. procedure setFRMSYNC(thebits : TBits_1); inline;
  3594. procedure setFRMSYPW(thebits : TBits_1); inline;
  3595. procedure setMODE16(thebits : TBits_1); inline;
  3596. procedure setMODE32(thebits : TBits_1); inline;
  3597. procedure setMSSEN(thebits : TBits_1); inline;
  3598. procedure setMSTEN(thebits : TBits_1); inline;
  3599. procedure setON(thebits : TBits_1); inline;
  3600. procedure setSIDL(thebits : TBits_1); inline;
  3601. procedure setSMP(thebits : TBits_1); inline;
  3602. procedure setSPIFE(thebits : TBits_1); inline;
  3603. procedure setSRXISEL(thebits : TBits_2); inline;
  3604. procedure setSSEN(thebits : TBits_1); inline;
  3605. procedure setSTXISEL(thebits : TBits_2); inline;
  3606. procedure setw(thebits : TBits_32); inline;
  3607. public
  3608. procedure clearCKE; inline;
  3609. procedure clearCKP; inline;
  3610. procedure clearDISSDO; inline;
  3611. procedure clearENHBUF; inline;
  3612. procedure clearFRMEN; inline;
  3613. procedure clearFRMPOL; inline;
  3614. procedure clearFRMSYNC; inline;
  3615. procedure clearFRMSYPW; inline;
  3616. procedure clearMODE16; inline;
  3617. procedure clearMODE32; inline;
  3618. procedure clearMSSEN; inline;
  3619. procedure clearMSTEN; inline;
  3620. procedure clearON; inline;
  3621. procedure clearSIDL; inline;
  3622. procedure clearSMP; inline;
  3623. procedure clearSPIFE; inline;
  3624. procedure clearSSEN; inline;
  3625. procedure setCKE; inline;
  3626. procedure setCKP; inline;
  3627. procedure setDISSDO; inline;
  3628. procedure setENHBUF; inline;
  3629. procedure setFRMEN; inline;
  3630. procedure setFRMPOL; inline;
  3631. procedure setFRMSYNC; inline;
  3632. procedure setFRMSYPW; inline;
  3633. procedure setMODE16; inline;
  3634. procedure setMODE32; inline;
  3635. procedure setMSSEN; inline;
  3636. procedure setMSTEN; inline;
  3637. procedure setON; inline;
  3638. procedure setSIDL; inline;
  3639. procedure setSMP; inline;
  3640. procedure setSPIFE; inline;
  3641. procedure setSSEN; inline;
  3642. property CKE : TBits_1 read getCKE write setCKE;
  3643. property CKP : TBits_1 read getCKP write setCKP;
  3644. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3645. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3646. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3647. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3648. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3649. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3650. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3651. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3652. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3653. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3654. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3655. property ON : TBits_1 read getON write setON;
  3656. property SIDL : TBits_1 read getSIDL write setSIDL;
  3657. property SMP : TBits_1 read getSMP write setSMP;
  3658. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3659. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3660. property SSEN : TBits_1 read getSSEN write setSSEN;
  3661. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3662. property w : TBits_32 read getw write setw;
  3663. end;
  3664. TSPI3A_SPI4CON = record
  3665. private
  3666. function getCKE : TBits_1; inline;
  3667. function getCKP : TBits_1; inline;
  3668. function getDISSDO : TBits_1; inline;
  3669. function getENHBUF : TBits_1; inline;
  3670. function getFRMCNT : TBits_3; inline;
  3671. function getFRMEN : TBits_1; inline;
  3672. function getFRMPOL : TBits_1; inline;
  3673. function getFRMSYNC : TBits_1; inline;
  3674. function getFRMSYPW : TBits_1; inline;
  3675. function getMODE16 : TBits_1; inline;
  3676. function getMODE32 : TBits_1; inline;
  3677. function getMSSEN : TBits_1; inline;
  3678. function getMSTEN : TBits_1; inline;
  3679. function getON : TBits_1; inline;
  3680. function getSIDL : TBits_1; inline;
  3681. function getSMP : TBits_1; inline;
  3682. function getSPIFE : TBits_1; inline;
  3683. function getSRXISEL : TBits_2; inline;
  3684. function getSSEN : TBits_1; inline;
  3685. function getSTXISEL : TBits_2; inline;
  3686. function getw : TBits_32; inline;
  3687. procedure setCKE(thebits : TBits_1); inline;
  3688. procedure setCKP(thebits : TBits_1); inline;
  3689. procedure setDISSDO(thebits : TBits_1); inline;
  3690. procedure setENHBUF(thebits : TBits_1); inline;
  3691. procedure setFRMCNT(thebits : TBits_3); inline;
  3692. procedure setFRMEN(thebits : TBits_1); inline;
  3693. procedure setFRMPOL(thebits : TBits_1); inline;
  3694. procedure setFRMSYNC(thebits : TBits_1); inline;
  3695. procedure setFRMSYPW(thebits : TBits_1); inline;
  3696. procedure setMODE16(thebits : TBits_1); inline;
  3697. procedure setMODE32(thebits : TBits_1); inline;
  3698. procedure setMSSEN(thebits : TBits_1); inline;
  3699. procedure setMSTEN(thebits : TBits_1); inline;
  3700. procedure setON(thebits : TBits_1); inline;
  3701. procedure setSIDL(thebits : TBits_1); inline;
  3702. procedure setSMP(thebits : TBits_1); inline;
  3703. procedure setSPIFE(thebits : TBits_1); inline;
  3704. procedure setSRXISEL(thebits : TBits_2); inline;
  3705. procedure setSSEN(thebits : TBits_1); inline;
  3706. procedure setSTXISEL(thebits : TBits_2); inline;
  3707. procedure setw(thebits : TBits_32); inline;
  3708. public
  3709. procedure clearCKE; inline;
  3710. procedure clearCKP; inline;
  3711. procedure clearDISSDO; inline;
  3712. procedure clearENHBUF; inline;
  3713. procedure clearFRMEN; inline;
  3714. procedure clearFRMPOL; inline;
  3715. procedure clearFRMSYNC; inline;
  3716. procedure clearFRMSYPW; inline;
  3717. procedure clearMODE16; inline;
  3718. procedure clearMODE32; inline;
  3719. procedure clearMSSEN; inline;
  3720. procedure clearMSTEN; inline;
  3721. procedure clearON; inline;
  3722. procedure clearSIDL; inline;
  3723. procedure clearSMP; inline;
  3724. procedure clearSPIFE; inline;
  3725. procedure clearSSEN; inline;
  3726. procedure setCKE; inline;
  3727. procedure setCKP; inline;
  3728. procedure setDISSDO; inline;
  3729. procedure setENHBUF; inline;
  3730. procedure setFRMEN; inline;
  3731. procedure setFRMPOL; inline;
  3732. procedure setFRMSYNC; inline;
  3733. procedure setFRMSYPW; inline;
  3734. procedure setMODE16; inline;
  3735. procedure setMODE32; inline;
  3736. procedure setMSSEN; inline;
  3737. procedure setMSTEN; inline;
  3738. procedure setON; inline;
  3739. procedure setSIDL; inline;
  3740. procedure setSMP; inline;
  3741. procedure setSPIFE; inline;
  3742. procedure setSSEN; inline;
  3743. property CKE : TBits_1 read getCKE write setCKE;
  3744. property CKP : TBits_1 read getCKP write setCKP;
  3745. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3746. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3747. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3748. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3749. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3750. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3751. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3752. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3753. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3754. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3755. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3756. property ON : TBits_1 read getON write setON;
  3757. property SIDL : TBits_1 read getSIDL write setSIDL;
  3758. property SMP : TBits_1 read getSMP write setSMP;
  3759. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3760. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3761. property SSEN : TBits_1 read getSSEN write setSSEN;
  3762. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3763. property w : TBits_32 read getw write setw;
  3764. end;
  3765. TSPI3A_SPI3ASTAT = record
  3766. private
  3767. function getRXBUFELM : TBits_5; inline;
  3768. function getSPIBUSY : TBits_1; inline;
  3769. function getSPIRBE : TBits_1; inline;
  3770. function getSPIRBF : TBits_1; inline;
  3771. function getSPIROV : TBits_1; inline;
  3772. function getSPITBE : TBits_1; inline;
  3773. function getSPITBF : TBits_1; inline;
  3774. function getSPITUR : TBits_1; inline;
  3775. function getSRMT : TBits_1; inline;
  3776. function getTXBUFELM : TBits_5; inline;
  3777. function getw : TBits_32; inline;
  3778. procedure setRXBUFELM(thebits : TBits_5); inline;
  3779. procedure setSPIBUSY(thebits : TBits_1); inline;
  3780. procedure setSPIRBE(thebits : TBits_1); inline;
  3781. procedure setSPIRBF(thebits : TBits_1); inline;
  3782. procedure setSPIROV(thebits : TBits_1); inline;
  3783. procedure setSPITBE(thebits : TBits_1); inline;
  3784. procedure setSPITBF(thebits : TBits_1); inline;
  3785. procedure setSPITUR(thebits : TBits_1); inline;
  3786. procedure setSRMT(thebits : TBits_1); inline;
  3787. procedure setTXBUFELM(thebits : TBits_5); inline;
  3788. procedure setw(thebits : TBits_32); inline;
  3789. public
  3790. procedure clearSPIBUSY; inline;
  3791. procedure clearSPIRBE; inline;
  3792. procedure clearSPIRBF; inline;
  3793. procedure clearSPIROV; inline;
  3794. procedure clearSPITBE; inline;
  3795. procedure clearSPITBF; inline;
  3796. procedure clearSPITUR; inline;
  3797. procedure clearSRMT; inline;
  3798. procedure setSPIBUSY; inline;
  3799. procedure setSPIRBE; inline;
  3800. procedure setSPIRBF; inline;
  3801. procedure setSPIROV; inline;
  3802. procedure setSPITBE; inline;
  3803. procedure setSPITBF; inline;
  3804. procedure setSPITUR; inline;
  3805. procedure setSRMT; inline;
  3806. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3807. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3808. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3809. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3810. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3811. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3812. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3813. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3814. property SRMT : TBits_1 read getSRMT write setSRMT;
  3815. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3816. property w : TBits_32 read getw write setw;
  3817. end;
  3818. TSPI3A_SPI4STAT = record
  3819. private
  3820. function getRXBUFELM : TBits_5; inline;
  3821. function getSPIBUSY : TBits_1; inline;
  3822. function getSPIRBE : TBits_1; inline;
  3823. function getSPIRBF : TBits_1; inline;
  3824. function getSPIROV : TBits_1; inline;
  3825. function getSPITBE : TBits_1; inline;
  3826. function getSPITBF : TBits_1; inline;
  3827. function getSPITUR : TBits_1; inline;
  3828. function getSRMT : TBits_1; inline;
  3829. function getTXBUFELM : TBits_5; inline;
  3830. function getw : TBits_32; inline;
  3831. procedure setRXBUFELM(thebits : TBits_5); inline;
  3832. procedure setSPIBUSY(thebits : TBits_1); inline;
  3833. procedure setSPIRBE(thebits : TBits_1); inline;
  3834. procedure setSPIRBF(thebits : TBits_1); inline;
  3835. procedure setSPIROV(thebits : TBits_1); inline;
  3836. procedure setSPITBE(thebits : TBits_1); inline;
  3837. procedure setSPITBF(thebits : TBits_1); inline;
  3838. procedure setSPITUR(thebits : TBits_1); inline;
  3839. procedure setSRMT(thebits : TBits_1); inline;
  3840. procedure setTXBUFELM(thebits : TBits_5); inline;
  3841. procedure setw(thebits : TBits_32); inline;
  3842. public
  3843. procedure clearSPIBUSY; inline;
  3844. procedure clearSPIRBE; inline;
  3845. procedure clearSPIRBF; inline;
  3846. procedure clearSPIROV; inline;
  3847. procedure clearSPITBE; inline;
  3848. procedure clearSPITBF; inline;
  3849. procedure clearSPITUR; inline;
  3850. procedure clearSRMT; inline;
  3851. procedure setSPIBUSY; inline;
  3852. procedure setSPIRBE; inline;
  3853. procedure setSPIRBF; inline;
  3854. procedure setSPIROV; inline;
  3855. procedure setSPITBE; inline;
  3856. procedure setSPITBF; inline;
  3857. procedure setSPITUR; inline;
  3858. procedure setSRMT; inline;
  3859. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3860. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3861. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3862. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3863. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3864. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3865. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3866. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3867. property SRMT : TBits_1 read getSRMT write setSRMT;
  3868. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3869. property w : TBits_32 read getw write setw;
  3870. end;
  3871. type
  3872. TSPI3ARegisters = record
  3873. SPI3ACONbits : TSPI3A_SPI3ACON;
  3874. SPI3ACON : longWord;
  3875. SPI4CONbits : TSPI3A_SPI4CON;
  3876. SPI4CON : longWord;
  3877. SPI3ACONCLR : longWord;
  3878. SPI4CONCLR : longWord;
  3879. SPI3ACONSET : longWord;
  3880. SPI4CONSET : longWord;
  3881. SPI3ACONINV : longWord;
  3882. SPI4CONINV : longWord;
  3883. SPI3ASTATbits : TSPI3A_SPI3ASTAT;
  3884. SPI3ASTAT : longWord;
  3885. SPI4STATbits : TSPI3A_SPI4STAT;
  3886. SPI4STAT : longWord;
  3887. SPI3ASTATCLR : longWord;
  3888. SPI4STATCLR : longWord;
  3889. SPI3ASTATSET : longWord;
  3890. SPI4STATSET : longWord;
  3891. SPI3ASTATINV : longWord;
  3892. SPI4STATINV : longWord;
  3893. SPI3ABUF : longWord;
  3894. SPI4BUF : longWord;
  3895. SPI3ABRG : longWord;
  3896. SPI4BRG : longWord;
  3897. SPI3ABRGCLR : longWord;
  3898. SPI4BRGCLR : longWord;
  3899. SPI3ABRGSET : longWord;
  3900. SPI4BRGSET : longWord;
  3901. SPI3ABRGINV : longWord;
  3902. SPI4BRGINV : longWord;
  3903. end;
  3904. TUART1_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. TUART1_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. TUART1_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. TUART1_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. TUART1Registers = record
  4300. U1AMODEbits : TUART1_U1AMODE;
  4301. U1AMODE : longWord;
  4302. U1MODEbits : TUART1_U1MODE;
  4303. U1MODE : longWord;
  4304. U1AMODECLR : longWord;
  4305. U1MODECLR : longWord;
  4306. U1AMODESET : longWord;
  4307. U1MODESET : longWord;
  4308. U1AMODEINV : longWord;
  4309. U1MODEINV : longWord;
  4310. U1ASTAbits : TUART1_U1ASTA;
  4311. U1ASTA : longWord;
  4312. U1STAbits : TUART1_U1STA;
  4313. U1STA : longWord;
  4314. U1ASTACLR : longWord;
  4315. U1STACLR : longWord;
  4316. U1ASTASET : longWord;
  4317. U1STASET : longWord;
  4318. U1ASTAINV : longWord;
  4319. U1STAINV : longWord;
  4320. U1ATXREG : longWord;
  4321. U1TXREG : longWord;
  4322. U1ARXREG : longWord;
  4323. U1RXREG : longWord;
  4324. U1ABRG : longWord;
  4325. U1BRG : longWord;
  4326. U1ABRGCLR : longWord;
  4327. U1BRGCLR : longWord;
  4328. U1ABRGSET : longWord;
  4329. U1BRGSET : longWord;
  4330. U1ABRGINV : longWord;
  4331. U1BRGINV : longWord;
  4332. end;
  4333. TUART4_U1BMODE = record
  4334. private
  4335. function getABAUD : TBits_1; inline;
  4336. function getBRGH : TBits_1; inline;
  4337. function getIREN : TBits_1; inline;
  4338. function getLPBACK : TBits_1; inline;
  4339. function getON : TBits_1; inline;
  4340. function getPDSEL : TBits_2; inline;
  4341. function getPDSEL0 : TBits_1; inline;
  4342. function getPDSEL1 : TBits_1; inline;
  4343. function getRXINV : TBits_1; inline;
  4344. function getSIDL : TBits_1; inline;
  4345. function getSTSEL : TBits_1; inline;
  4346. function getUARTEN : TBits_1; inline;
  4347. function getUSIDL : TBits_1; inline;
  4348. function getWAKE : TBits_1; inline;
  4349. function getw : TBits_32; inline;
  4350. procedure setABAUD(thebits : TBits_1); inline;
  4351. procedure setBRGH(thebits : TBits_1); inline;
  4352. procedure setIREN(thebits : TBits_1); inline;
  4353. procedure setLPBACK(thebits : TBits_1); inline;
  4354. procedure setON(thebits : TBits_1); inline;
  4355. procedure setPDSEL(thebits : TBits_2); inline;
  4356. procedure setPDSEL0(thebits : TBits_1); inline;
  4357. procedure setPDSEL1(thebits : TBits_1); inline;
  4358. procedure setRXINV(thebits : TBits_1); inline;
  4359. procedure setSIDL(thebits : TBits_1); inline;
  4360. procedure setSTSEL(thebits : TBits_1); inline;
  4361. procedure setUARTEN(thebits : TBits_1); inline;
  4362. procedure setUSIDL(thebits : TBits_1); inline;
  4363. procedure setWAKE(thebits : TBits_1); inline;
  4364. procedure setw(thebits : TBits_32); inline;
  4365. public
  4366. procedure clearABAUD; inline;
  4367. procedure clearBRGH; inline;
  4368. procedure clearIREN; inline;
  4369. procedure clearLPBACK; inline;
  4370. procedure clearON; inline;
  4371. procedure clearPDSEL0; inline;
  4372. procedure clearPDSEL1; inline;
  4373. procedure clearRXINV; inline;
  4374. procedure clearSIDL; inline;
  4375. procedure clearSTSEL; inline;
  4376. procedure clearUARTEN; inline;
  4377. procedure clearUSIDL; inline;
  4378. procedure clearWAKE; inline;
  4379. procedure setABAUD; inline;
  4380. procedure setBRGH; inline;
  4381. procedure setIREN; inline;
  4382. procedure setLPBACK; inline;
  4383. procedure setON; inline;
  4384. procedure setPDSEL0; inline;
  4385. procedure setPDSEL1; inline;
  4386. procedure setRXINV; inline;
  4387. procedure setSIDL; inline;
  4388. procedure setSTSEL; inline;
  4389. procedure setUARTEN; inline;
  4390. procedure setUSIDL; inline;
  4391. procedure setWAKE; inline;
  4392. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4393. property BRGH : TBits_1 read getBRGH write setBRGH;
  4394. property IREN : TBits_1 read getIREN write setIREN;
  4395. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4396. property ON : TBits_1 read getON write setON;
  4397. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4398. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4399. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4400. property RXINV : TBits_1 read getRXINV write setRXINV;
  4401. property SIDL : TBits_1 read getSIDL write setSIDL;
  4402. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4403. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4404. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4405. property WAKE : TBits_1 read getWAKE write setWAKE;
  4406. property w : TBits_32 read getw write setw;
  4407. end;
  4408. TUART4_U4MODE = record
  4409. private
  4410. function getABAUD : TBits_1; inline;
  4411. function getBRGH : TBits_1; inline;
  4412. function getIREN : TBits_1; inline;
  4413. function getLPBACK : TBits_1; inline;
  4414. function getON : TBits_1; inline;
  4415. function getPDSEL : TBits_2; inline;
  4416. function getPDSEL0 : TBits_1; inline;
  4417. function getPDSEL1 : TBits_1; inline;
  4418. function getRXINV : TBits_1; inline;
  4419. function getSIDL : TBits_1; inline;
  4420. function getSTSEL : TBits_1; inline;
  4421. function getUARTEN : TBits_1; inline;
  4422. function getUSIDL : TBits_1; inline;
  4423. function getWAKE : TBits_1; inline;
  4424. function getw : TBits_32; inline;
  4425. procedure setABAUD(thebits : TBits_1); inline;
  4426. procedure setBRGH(thebits : TBits_1); inline;
  4427. procedure setIREN(thebits : TBits_1); inline;
  4428. procedure setLPBACK(thebits : TBits_1); inline;
  4429. procedure setON(thebits : TBits_1); inline;
  4430. procedure setPDSEL(thebits : TBits_2); inline;
  4431. procedure setPDSEL0(thebits : TBits_1); inline;
  4432. procedure setPDSEL1(thebits : TBits_1); inline;
  4433. procedure setRXINV(thebits : TBits_1); inline;
  4434. procedure setSIDL(thebits : TBits_1); inline;
  4435. procedure setSTSEL(thebits : TBits_1); inline;
  4436. procedure setUARTEN(thebits : TBits_1); inline;
  4437. procedure setUSIDL(thebits : TBits_1); inline;
  4438. procedure setWAKE(thebits : TBits_1); inline;
  4439. procedure setw(thebits : TBits_32); inline;
  4440. public
  4441. procedure clearABAUD; inline;
  4442. procedure clearBRGH; inline;
  4443. procedure clearIREN; inline;
  4444. procedure clearLPBACK; inline;
  4445. procedure clearON; inline;
  4446. procedure clearPDSEL0; inline;
  4447. procedure clearPDSEL1; inline;
  4448. procedure clearRXINV; inline;
  4449. procedure clearSIDL; inline;
  4450. procedure clearSTSEL; inline;
  4451. procedure clearUARTEN; inline;
  4452. procedure clearUSIDL; inline;
  4453. procedure clearWAKE; inline;
  4454. procedure setABAUD; inline;
  4455. procedure setBRGH; inline;
  4456. procedure setIREN; inline;
  4457. procedure setLPBACK; inline;
  4458. procedure setON; inline;
  4459. procedure setPDSEL0; inline;
  4460. procedure setPDSEL1; inline;
  4461. procedure setRXINV; inline;
  4462. procedure setSIDL; inline;
  4463. procedure setSTSEL; inline;
  4464. procedure setUARTEN; inline;
  4465. procedure setUSIDL; inline;
  4466. procedure setWAKE; inline;
  4467. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4468. property BRGH : TBits_1 read getBRGH write setBRGH;
  4469. property IREN : TBits_1 read getIREN write setIREN;
  4470. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4471. property ON : TBits_1 read getON write setON;
  4472. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4473. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4474. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4475. property RXINV : TBits_1 read getRXINV write setRXINV;
  4476. property SIDL : TBits_1 read getSIDL write setSIDL;
  4477. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4478. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4479. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4480. property WAKE : TBits_1 read getWAKE write setWAKE;
  4481. property w : TBits_32 read getw write setw;
  4482. end;
  4483. TUART4_U1BSTA = record
  4484. private
  4485. function getADDEN : TBits_1; inline;
  4486. function getADDR : TBits_8; inline;
  4487. function getADM_EN : TBits_1; inline;
  4488. function getFERR : TBits_1; inline;
  4489. function getOERR : TBits_1; inline;
  4490. function getPERR : TBits_1; inline;
  4491. function getRIDLE : TBits_1; inline;
  4492. function getTRMT : TBits_1; inline;
  4493. function getURXDA : TBits_1; inline;
  4494. function getURXEN : TBits_1; inline;
  4495. function getURXISEL : TBits_2; inline;
  4496. function getURXISEL0 : TBits_1; inline;
  4497. function getURXISEL1 : TBits_1; inline;
  4498. function getUTXBF : TBits_1; inline;
  4499. function getUTXBRK : TBits_1; inline;
  4500. function getUTXEN : TBits_1; inline;
  4501. function getUTXINV : TBits_1; inline;
  4502. function getUTXISEL : TBits_2; inline;
  4503. function getUTXISEL0 : TBits_1; inline;
  4504. function getUTXISEL1 : TBits_1; inline;
  4505. function getUTXSEL : TBits_2; inline;
  4506. function getw : TBits_32; inline;
  4507. procedure setADDEN(thebits : TBits_1); inline;
  4508. procedure setADDR(thebits : TBits_8); inline;
  4509. procedure setADM_EN(thebits : TBits_1); inline;
  4510. procedure setFERR(thebits : TBits_1); inline;
  4511. procedure setOERR(thebits : TBits_1); inline;
  4512. procedure setPERR(thebits : TBits_1); inline;
  4513. procedure setRIDLE(thebits : TBits_1); inline;
  4514. procedure setTRMT(thebits : TBits_1); inline;
  4515. procedure setURXDA(thebits : TBits_1); inline;
  4516. procedure setURXEN(thebits : TBits_1); inline;
  4517. procedure setURXISEL(thebits : TBits_2); inline;
  4518. procedure setURXISEL0(thebits : TBits_1); inline;
  4519. procedure setURXISEL1(thebits : TBits_1); inline;
  4520. procedure setUTXBF(thebits : TBits_1); inline;
  4521. procedure setUTXBRK(thebits : TBits_1); inline;
  4522. procedure setUTXEN(thebits : TBits_1); inline;
  4523. procedure setUTXINV(thebits : TBits_1); inline;
  4524. procedure setUTXISEL(thebits : TBits_2); inline;
  4525. procedure setUTXISEL0(thebits : TBits_1); inline;
  4526. procedure setUTXISEL1(thebits : TBits_1); inline;
  4527. procedure setUTXSEL(thebits : TBits_2); inline;
  4528. procedure setw(thebits : TBits_32); inline;
  4529. public
  4530. procedure clearADDEN; inline;
  4531. procedure clearADM_EN; inline;
  4532. procedure clearFERR; inline;
  4533. procedure clearOERR; inline;
  4534. procedure clearPERR; inline;
  4535. procedure clearRIDLE; inline;
  4536. procedure clearTRMT; inline;
  4537. procedure clearURXDA; inline;
  4538. procedure clearURXEN; inline;
  4539. procedure clearURXISEL0; inline;
  4540. procedure clearURXISEL1; inline;
  4541. procedure clearUTXBF; inline;
  4542. procedure clearUTXBRK; inline;
  4543. procedure clearUTXEN; inline;
  4544. procedure clearUTXINV; inline;
  4545. procedure clearUTXISEL0; inline;
  4546. procedure clearUTXISEL1; inline;
  4547. procedure setADDEN; inline;
  4548. procedure setADM_EN; inline;
  4549. procedure setFERR; inline;
  4550. procedure setOERR; inline;
  4551. procedure setPERR; inline;
  4552. procedure setRIDLE; inline;
  4553. procedure setTRMT; inline;
  4554. procedure setURXDA; inline;
  4555. procedure setURXEN; inline;
  4556. procedure setURXISEL0; inline;
  4557. procedure setURXISEL1; inline;
  4558. procedure setUTXBF; inline;
  4559. procedure setUTXBRK; inline;
  4560. procedure setUTXEN; inline;
  4561. procedure setUTXINV; inline;
  4562. procedure setUTXISEL0; inline;
  4563. procedure setUTXISEL1; inline;
  4564. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4565. property ADDR : TBits_8 read getADDR write setADDR;
  4566. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4567. property FERR : TBits_1 read getFERR write setFERR;
  4568. property OERR : TBits_1 read getOERR write setOERR;
  4569. property PERR : TBits_1 read getPERR write setPERR;
  4570. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4571. property TRMT : TBits_1 read getTRMT write setTRMT;
  4572. property URXDA : TBits_1 read getURXDA write setURXDA;
  4573. property URXEN : TBits_1 read getURXEN write setURXEN;
  4574. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4575. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4576. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4577. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4578. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4579. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4580. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4581. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4582. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4583. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4584. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4585. property w : TBits_32 read getw write setw;
  4586. end;
  4587. TUART4_U4STA = record
  4588. private
  4589. function getADDEN : TBits_1; inline;
  4590. function getADDR : TBits_8; inline;
  4591. function getADM_EN : TBits_1; inline;
  4592. function getFERR : TBits_1; inline;
  4593. function getOERR : TBits_1; inline;
  4594. function getPERR : TBits_1; inline;
  4595. function getRIDLE : TBits_1; inline;
  4596. function getTRMT : TBits_1; inline;
  4597. function getURXDA : TBits_1; inline;
  4598. function getURXEN : TBits_1; inline;
  4599. function getURXISEL : TBits_2; inline;
  4600. function getURXISEL0 : TBits_1; inline;
  4601. function getURXISEL1 : TBits_1; inline;
  4602. function getUTXBF : TBits_1; inline;
  4603. function getUTXBRK : TBits_1; inline;
  4604. function getUTXEN : TBits_1; inline;
  4605. function getUTXINV : TBits_1; inline;
  4606. function getUTXISEL : TBits_2; inline;
  4607. function getUTXISEL0 : TBits_1; inline;
  4608. function getUTXISEL1 : TBits_1; inline;
  4609. function getUTXSEL : TBits_2; inline;
  4610. function getw : TBits_32; inline;
  4611. procedure setADDEN(thebits : TBits_1); inline;
  4612. procedure setADDR(thebits : TBits_8); inline;
  4613. procedure setADM_EN(thebits : TBits_1); inline;
  4614. procedure setFERR(thebits : TBits_1); inline;
  4615. procedure setOERR(thebits : TBits_1); inline;
  4616. procedure setPERR(thebits : TBits_1); inline;
  4617. procedure setRIDLE(thebits : TBits_1); inline;
  4618. procedure setTRMT(thebits : TBits_1); inline;
  4619. procedure setURXDA(thebits : TBits_1); inline;
  4620. procedure setURXEN(thebits : TBits_1); inline;
  4621. procedure setURXISEL(thebits : TBits_2); inline;
  4622. procedure setURXISEL0(thebits : TBits_1); inline;
  4623. procedure setURXISEL1(thebits : TBits_1); inline;
  4624. procedure setUTXBF(thebits : TBits_1); inline;
  4625. procedure setUTXBRK(thebits : TBits_1); inline;
  4626. procedure setUTXEN(thebits : TBits_1); inline;
  4627. procedure setUTXINV(thebits : TBits_1); inline;
  4628. procedure setUTXISEL(thebits : TBits_2); inline;
  4629. procedure setUTXISEL0(thebits : TBits_1); inline;
  4630. procedure setUTXISEL1(thebits : TBits_1); inline;
  4631. procedure setUTXSEL(thebits : TBits_2); inline;
  4632. procedure setw(thebits : TBits_32); inline;
  4633. public
  4634. procedure clearADDEN; inline;
  4635. procedure clearADM_EN; inline;
  4636. procedure clearFERR; inline;
  4637. procedure clearOERR; inline;
  4638. procedure clearPERR; inline;
  4639. procedure clearRIDLE; inline;
  4640. procedure clearTRMT; inline;
  4641. procedure clearURXDA; inline;
  4642. procedure clearURXEN; inline;
  4643. procedure clearURXISEL0; inline;
  4644. procedure clearURXISEL1; inline;
  4645. procedure clearUTXBF; inline;
  4646. procedure clearUTXBRK; inline;
  4647. procedure clearUTXEN; inline;
  4648. procedure clearUTXINV; inline;
  4649. procedure clearUTXISEL0; inline;
  4650. procedure clearUTXISEL1; inline;
  4651. procedure setADDEN; inline;
  4652. procedure setADM_EN; inline;
  4653. procedure setFERR; inline;
  4654. procedure setOERR; inline;
  4655. procedure setPERR; inline;
  4656. procedure setRIDLE; inline;
  4657. procedure setTRMT; inline;
  4658. procedure setURXDA; inline;
  4659. procedure setURXEN; inline;
  4660. procedure setURXISEL0; inline;
  4661. procedure setURXISEL1; inline;
  4662. procedure setUTXBF; inline;
  4663. procedure setUTXBRK; inline;
  4664. procedure setUTXEN; inline;
  4665. procedure setUTXINV; inline;
  4666. procedure setUTXISEL0; inline;
  4667. procedure setUTXISEL1; inline;
  4668. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4669. property ADDR : TBits_8 read getADDR write setADDR;
  4670. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4671. property FERR : TBits_1 read getFERR write setFERR;
  4672. property OERR : TBits_1 read getOERR write setOERR;
  4673. property PERR : TBits_1 read getPERR write setPERR;
  4674. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4675. property TRMT : TBits_1 read getTRMT write setTRMT;
  4676. property URXDA : TBits_1 read getURXDA write setURXDA;
  4677. property URXEN : TBits_1 read getURXEN write setURXEN;
  4678. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4679. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4680. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4681. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4682. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4683. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4684. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4685. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4686. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4687. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4688. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4689. property w : TBits_32 read getw write setw;
  4690. end;
  4691. type
  4692. TUART4Registers = record
  4693. U1BMODEbits : TUART4_U1BMODE;
  4694. U1BMODE : longWord;
  4695. U4MODEbits : TUART4_U4MODE;
  4696. U4MODE : longWord;
  4697. U1BMODECLR : longWord;
  4698. U4MODECLR : longWord;
  4699. U1BMODESET : longWord;
  4700. U4MODESET : longWord;
  4701. U1BMODEINV : longWord;
  4702. U4MODEINV : longWord;
  4703. U1BSTAbits : TUART4_U1BSTA;
  4704. U1BSTA : longWord;
  4705. U4STAbits : TUART4_U4STA;
  4706. U4STA : longWord;
  4707. U1BSTACLR : longWord;
  4708. U4STACLR : longWord;
  4709. U1BSTASET : longWord;
  4710. U4STASET : longWord;
  4711. U1BSTAINV : longWord;
  4712. U4STAINV : longWord;
  4713. U1BTXREG : longWord;
  4714. U4TXREG : longWord;
  4715. U1BRXREG : longWord;
  4716. U4RXREG : longWord;
  4717. U1BBRG : longWord;
  4718. U4BRG : longWord;
  4719. U1BBRGCLR : longWord;
  4720. U4BRGCLR : longWord;
  4721. U1BBRGSET : longWord;
  4722. U4BRGSET : longWord;
  4723. U1BBRGINV : longWord;
  4724. U4BRGINV : longWord;
  4725. end;
  4726. TUART3_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. TUART3_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. TUART3_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. TUART3_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. TUART3Registers = record
  5122. U2AMODEbits : TUART3_U2AMODE;
  5123. U2AMODE : longWord;
  5124. U3MODEbits : TUART3_U3MODE;
  5125. U3MODE : longWord;
  5126. U2AMODECLR : longWord;
  5127. U3MODECLR : longWord;
  5128. U2AMODESET : longWord;
  5129. U3MODESET : longWord;
  5130. U2AMODEINV : longWord;
  5131. U3MODEINV : longWord;
  5132. U2ASTAbits : TUART3_U2ASTA;
  5133. U2ASTA : longWord;
  5134. U3STAbits : TUART3_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. TUART5_U3BMODE = record
  5978. private
  5979. function getABAUD : TBits_1; inline;
  5980. function getBRGH : TBits_1; inline;
  5981. function getIREN : TBits_1; inline;
  5982. function getLPBACK : TBits_1; inline;
  5983. function getON : TBits_1; inline;
  5984. function getPDSEL : TBits_2; inline;
  5985. function getPDSEL0 : TBits_1; inline;
  5986. function getPDSEL1 : TBits_1; inline;
  5987. function getRXINV : TBits_1; inline;
  5988. function getSIDL : TBits_1; inline;
  5989. function getSTSEL : TBits_1; inline;
  5990. function getUARTEN : TBits_1; inline;
  5991. function getUSIDL : TBits_1; inline;
  5992. function getWAKE : TBits_1; inline;
  5993. function getw : TBits_32; inline;
  5994. procedure setABAUD(thebits : TBits_1); inline;
  5995. procedure setBRGH(thebits : TBits_1); inline;
  5996. procedure setIREN(thebits : TBits_1); inline;
  5997. procedure setLPBACK(thebits : TBits_1); inline;
  5998. procedure setON(thebits : TBits_1); inline;
  5999. procedure setPDSEL(thebits : TBits_2); inline;
  6000. procedure setPDSEL0(thebits : TBits_1); inline;
  6001. procedure setPDSEL1(thebits : TBits_1); inline;
  6002. procedure setRXINV(thebits : TBits_1); inline;
  6003. procedure setSIDL(thebits : TBits_1); inline;
  6004. procedure setSTSEL(thebits : TBits_1); inline;
  6005. procedure setUARTEN(thebits : TBits_1); inline;
  6006. procedure setUSIDL(thebits : TBits_1); inline;
  6007. procedure setWAKE(thebits : TBits_1); inline;
  6008. procedure setw(thebits : TBits_32); inline;
  6009. public
  6010. procedure clearABAUD; inline;
  6011. procedure clearBRGH; inline;
  6012. procedure clearIREN; inline;
  6013. procedure clearLPBACK; inline;
  6014. procedure clearON; inline;
  6015. procedure clearPDSEL0; inline;
  6016. procedure clearPDSEL1; inline;
  6017. procedure clearRXINV; inline;
  6018. procedure clearSIDL; inline;
  6019. procedure clearSTSEL; inline;
  6020. procedure clearUARTEN; inline;
  6021. procedure clearUSIDL; inline;
  6022. procedure clearWAKE; inline;
  6023. procedure setABAUD; inline;
  6024. procedure setBRGH; inline;
  6025. procedure setIREN; inline;
  6026. procedure setLPBACK; inline;
  6027. procedure setON; inline;
  6028. procedure setPDSEL0; inline;
  6029. procedure setPDSEL1; inline;
  6030. procedure setRXINV; inline;
  6031. procedure setSIDL; inline;
  6032. procedure setSTSEL; inline;
  6033. procedure setUARTEN; inline;
  6034. procedure setUSIDL; inline;
  6035. procedure setWAKE; inline;
  6036. property ABAUD : TBits_1 read getABAUD write setABAUD;
  6037. property BRGH : TBits_1 read getBRGH write setBRGH;
  6038. property IREN : TBits_1 read getIREN write setIREN;
  6039. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  6040. property ON : TBits_1 read getON write setON;
  6041. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  6042. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  6043. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  6044. property RXINV : TBits_1 read getRXINV write setRXINV;
  6045. property SIDL : TBits_1 read getSIDL write setSIDL;
  6046. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  6047. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  6048. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  6049. property WAKE : TBits_1 read getWAKE write setWAKE;
  6050. property w : TBits_32 read getw write setw;
  6051. end;
  6052. TUART5_U5MODE = record
  6053. private
  6054. function getABAUD : TBits_1; inline;
  6055. function getBRGH : TBits_1; inline;
  6056. function getIREN : TBits_1; inline;
  6057. function getLPBACK : TBits_1; inline;
  6058. function getON : TBits_1; inline;
  6059. function getPDSEL : TBits_2; inline;
  6060. function getPDSEL0 : TBits_1; inline;
  6061. function getPDSEL1 : TBits_1; inline;
  6062. function getRXINV : TBits_1; inline;
  6063. function getSIDL : TBits_1; inline;
  6064. function getSTSEL : TBits_1; inline;
  6065. function getUARTEN : TBits_1; inline;
  6066. function getUSIDL : TBits_1; inline;
  6067. function getWAKE : TBits_1; inline;
  6068. function getw : TBits_32; inline;
  6069. procedure setABAUD(thebits : TBits_1); inline;
  6070. procedure setBRGH(thebits : TBits_1); inline;
  6071. procedure setIREN(thebits : TBits_1); inline;
  6072. procedure setLPBACK(thebits : TBits_1); inline;
  6073. procedure setON(thebits : TBits_1); inline;
  6074. procedure setPDSEL(thebits : TBits_2); inline;
  6075. procedure setPDSEL0(thebits : TBits_1); inline;
  6076. procedure setPDSEL1(thebits : TBits_1); inline;
  6077. procedure setRXINV(thebits : TBits_1); inline;
  6078. procedure setSIDL(thebits : TBits_1); inline;
  6079. procedure setSTSEL(thebits : TBits_1); inline;
  6080. procedure setUARTEN(thebits : TBits_1); inline;
  6081. procedure setUSIDL(thebits : TBits_1); inline;
  6082. procedure setWAKE(thebits : TBits_1); inline;
  6083. procedure setw(thebits : TBits_32); inline;
  6084. public
  6085. procedure clearABAUD; inline;
  6086. procedure clearBRGH; inline;
  6087. procedure clearIREN; inline;
  6088. procedure clearLPBACK; inline;
  6089. procedure clearON; inline;
  6090. procedure clearPDSEL0; inline;
  6091. procedure clearPDSEL1; inline;
  6092. procedure clearRXINV; inline;
  6093. procedure clearSIDL; inline;
  6094. procedure clearSTSEL; inline;
  6095. procedure clearUARTEN; inline;
  6096. procedure clearUSIDL; inline;
  6097. procedure clearWAKE; inline;
  6098. procedure setABAUD; inline;
  6099. procedure setBRGH; inline;
  6100. procedure setIREN; inline;
  6101. procedure setLPBACK; inline;
  6102. procedure setON; inline;
  6103. procedure setPDSEL0; inline;
  6104. procedure setPDSEL1; inline;
  6105. procedure setRXINV; inline;
  6106. procedure setSIDL; inline;
  6107. procedure setSTSEL; inline;
  6108. procedure setUARTEN; inline;
  6109. procedure setUSIDL; inline;
  6110. procedure setWAKE; inline;
  6111. property ABAUD : TBits_1 read getABAUD write setABAUD;
  6112. property BRGH : TBits_1 read getBRGH write setBRGH;
  6113. property IREN : TBits_1 read getIREN write setIREN;
  6114. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  6115. property ON : TBits_1 read getON write setON;
  6116. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  6117. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  6118. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  6119. property RXINV : TBits_1 read getRXINV write setRXINV;
  6120. property SIDL : TBits_1 read getSIDL write setSIDL;
  6121. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  6122. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  6123. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  6124. property WAKE : TBits_1 read getWAKE write setWAKE;
  6125. property w : TBits_32 read getw write setw;
  6126. end;
  6127. TUART5_U3BSTA = record
  6128. private
  6129. function getADDEN : TBits_1; inline;
  6130. function getADDR : TBits_8; inline;
  6131. function getADM_EN : TBits_1; inline;
  6132. function getFERR : TBits_1; inline;
  6133. function getOERR : TBits_1; inline;
  6134. function getPERR : TBits_1; inline;
  6135. function getRIDLE : TBits_1; inline;
  6136. function getTRMT : TBits_1; inline;
  6137. function getURXDA : TBits_1; inline;
  6138. function getURXEN : TBits_1; inline;
  6139. function getURXISEL : TBits_2; inline;
  6140. function getURXISEL0 : TBits_1; inline;
  6141. function getURXISEL1 : TBits_1; inline;
  6142. function getUTXBF : TBits_1; inline;
  6143. function getUTXBRK : TBits_1; inline;
  6144. function getUTXEN : TBits_1; inline;
  6145. function getUTXINV : TBits_1; inline;
  6146. function getUTXISEL : TBits_2; inline;
  6147. function getUTXISEL0 : TBits_1; inline;
  6148. function getUTXISEL1 : TBits_1; inline;
  6149. function getUTXSEL : TBits_2; inline;
  6150. function getw : TBits_32; inline;
  6151. procedure setADDEN(thebits : TBits_1); inline;
  6152. procedure setADDR(thebits : TBits_8); inline;
  6153. procedure setADM_EN(thebits : TBits_1); inline;
  6154. procedure setFERR(thebits : TBits_1); inline;
  6155. procedure setOERR(thebits : TBits_1); inline;
  6156. procedure setPERR(thebits : TBits_1); inline;
  6157. procedure setRIDLE(thebits : TBits_1); inline;
  6158. procedure setTRMT(thebits : TBits_1); inline;
  6159. procedure setURXDA(thebits : TBits_1); inline;
  6160. procedure setURXEN(thebits : TBits_1); inline;
  6161. procedure setURXISEL(thebits : TBits_2); inline;
  6162. procedure setURXISEL0(thebits : TBits_1); inline;
  6163. procedure setURXISEL1(thebits : TBits_1); inline;
  6164. procedure setUTXBF(thebits : TBits_1); inline;
  6165. procedure setUTXBRK(thebits : TBits_1); inline;
  6166. procedure setUTXEN(thebits : TBits_1); inline;
  6167. procedure setUTXINV(thebits : TBits_1); inline;
  6168. procedure setUTXISEL(thebits : TBits_2); inline;
  6169. procedure setUTXISEL0(thebits : TBits_1); inline;
  6170. procedure setUTXISEL1(thebits : TBits_1); inline;
  6171. procedure setUTXSEL(thebits : TBits_2); inline;
  6172. procedure setw(thebits : TBits_32); inline;
  6173. public
  6174. procedure clearADDEN; inline;
  6175. procedure clearADM_EN; inline;
  6176. procedure clearFERR; inline;
  6177. procedure clearOERR; inline;
  6178. procedure clearPERR; inline;
  6179. procedure clearRIDLE; inline;
  6180. procedure clearTRMT; inline;
  6181. procedure clearURXDA; inline;
  6182. procedure clearURXEN; inline;
  6183. procedure clearURXISEL0; inline;
  6184. procedure clearURXISEL1; inline;
  6185. procedure clearUTXBF; inline;
  6186. procedure clearUTXBRK; inline;
  6187. procedure clearUTXEN; inline;
  6188. procedure clearUTXINV; inline;
  6189. procedure clearUTXISEL0; inline;
  6190. procedure clearUTXISEL1; inline;
  6191. procedure setADDEN; inline;
  6192. procedure setADM_EN; inline;
  6193. procedure setFERR; inline;
  6194. procedure setOERR; inline;
  6195. procedure setPERR; inline;
  6196. procedure setRIDLE; inline;
  6197. procedure setTRMT; inline;
  6198. procedure setURXDA; inline;
  6199. procedure setURXEN; inline;
  6200. procedure setURXISEL0; inline;
  6201. procedure setURXISEL1; inline;
  6202. procedure setUTXBF; inline;
  6203. procedure setUTXBRK; inline;
  6204. procedure setUTXEN; inline;
  6205. procedure setUTXINV; inline;
  6206. procedure setUTXISEL0; inline;
  6207. procedure setUTXISEL1; inline;
  6208. property ADDEN : TBits_1 read getADDEN write setADDEN;
  6209. property ADDR : TBits_8 read getADDR write setADDR;
  6210. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  6211. property FERR : TBits_1 read getFERR write setFERR;
  6212. property OERR : TBits_1 read getOERR write setOERR;
  6213. property PERR : TBits_1 read getPERR write setPERR;
  6214. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  6215. property TRMT : TBits_1 read getTRMT write setTRMT;
  6216. property URXDA : TBits_1 read getURXDA write setURXDA;
  6217. property URXEN : TBits_1 read getURXEN write setURXEN;
  6218. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  6219. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  6220. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  6221. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  6222. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  6223. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  6224. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  6225. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  6226. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  6227. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  6228. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  6229. property w : TBits_32 read getw write setw;
  6230. end;
  6231. TUART5_U5STA = record
  6232. private
  6233. function getADDEN : TBits_1; inline;
  6234. function getADDR : TBits_8; inline;
  6235. function getADM_EN : TBits_1; inline;
  6236. function getFERR : TBits_1; inline;
  6237. function getOERR : TBits_1; inline;
  6238. function getPERR : TBits_1; inline;
  6239. function getRIDLE : TBits_1; inline;
  6240. function getTRMT : TBits_1; inline;
  6241. function getURXDA : TBits_1; inline;
  6242. function getURXEN : TBits_1; inline;
  6243. function getURXISEL : TBits_2; inline;
  6244. function getURXISEL0 : TBits_1; inline;
  6245. function getURXISEL1 : TBits_1; inline;
  6246. function getUTXBF : TBits_1; inline;
  6247. function getUTXBRK : TBits_1; inline;
  6248. function getUTXEN : TBits_1; inline;
  6249. function getUTXINV : TBits_1; inline;
  6250. function getUTXISEL : TBits_2; inline;
  6251. function getUTXISEL0 : TBits_1; inline;
  6252. function getUTXISEL1 : TBits_1; inline;
  6253. function getUTXSEL : TBits_2; inline;
  6254. function getw : TBits_32; inline;
  6255. procedure setADDEN(thebits : TBits_1); inline;
  6256. procedure setADDR(thebits : TBits_8); inline;
  6257. procedure setADM_EN(thebits : TBits_1); inline;
  6258. procedure setFERR(thebits : TBits_1); inline;
  6259. procedure setOERR(thebits : TBits_1); inline;
  6260. procedure setPERR(thebits : TBits_1); inline;
  6261. procedure setRIDLE(thebits : TBits_1); inline;
  6262. procedure setTRMT(thebits : TBits_1); inline;
  6263. procedure setURXDA(thebits : TBits_1); inline;
  6264. procedure setURXEN(thebits : TBits_1); inline;
  6265. procedure setURXISEL(thebits : TBits_2); inline;
  6266. procedure setURXISEL0(thebits : TBits_1); inline;
  6267. procedure setURXISEL1(thebits : TBits_1); inline;
  6268. procedure setUTXBF(thebits : TBits_1); inline;
  6269. procedure setUTXBRK(thebits : TBits_1); inline;
  6270. procedure setUTXEN(thebits : TBits_1); inline;
  6271. procedure setUTXINV(thebits : TBits_1); inline;
  6272. procedure setUTXISEL(thebits : TBits_2); inline;
  6273. procedure setUTXISEL0(thebits : TBits_1); inline;
  6274. procedure setUTXISEL1(thebits : TBits_1); inline;
  6275. procedure setUTXSEL(thebits : TBits_2); inline;
  6276. procedure setw(thebits : TBits_32); inline;
  6277. public
  6278. procedure clearADDEN; inline;
  6279. procedure clearADM_EN; inline;
  6280. procedure clearFERR; inline;
  6281. procedure clearOERR; inline;
  6282. procedure clearPERR; inline;
  6283. procedure clearRIDLE; inline;
  6284. procedure clearTRMT; inline;
  6285. procedure clearURXDA; inline;
  6286. procedure clearURXEN; inline;
  6287. procedure clearURXISEL0; inline;
  6288. procedure clearURXISEL1; inline;
  6289. procedure clearUTXBF; inline;
  6290. procedure clearUTXBRK; inline;
  6291. procedure clearUTXEN; inline;
  6292. procedure clearUTXINV; inline;
  6293. procedure clearUTXISEL0; inline;
  6294. procedure clearUTXISEL1; inline;
  6295. procedure setADDEN; inline;
  6296. procedure setADM_EN; inline;
  6297. procedure setFERR; inline;
  6298. procedure setOERR; inline;
  6299. procedure setPERR; inline;
  6300. procedure setRIDLE; inline;
  6301. procedure setTRMT; inline;
  6302. procedure setURXDA; inline;
  6303. procedure setURXEN; inline;
  6304. procedure setURXISEL0; inline;
  6305. procedure setURXISEL1; inline;
  6306. procedure setUTXBF; inline;
  6307. procedure setUTXBRK; inline;
  6308. procedure setUTXEN; inline;
  6309. procedure setUTXINV; inline;
  6310. procedure setUTXISEL0; inline;
  6311. procedure setUTXISEL1; inline;
  6312. property ADDEN : TBits_1 read getADDEN write setADDEN;
  6313. property ADDR : TBits_8 read getADDR write setADDR;
  6314. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  6315. property FERR : TBits_1 read getFERR write setFERR;
  6316. property OERR : TBits_1 read getOERR write setOERR;
  6317. property PERR : TBits_1 read getPERR write setPERR;
  6318. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  6319. property TRMT : TBits_1 read getTRMT write setTRMT;
  6320. property URXDA : TBits_1 read getURXDA write setURXDA;
  6321. property URXEN : TBits_1 read getURXEN write setURXEN;
  6322. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  6323. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  6324. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  6325. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  6326. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  6327. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  6328. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  6329. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  6330. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  6331. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  6332. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  6333. property w : TBits_32 read getw write setw;
  6334. end;
  6335. type
  6336. TUART5Registers = record
  6337. U3BMODEbits : TUART5_U3BMODE;
  6338. U3BMODE : longWord;
  6339. U5MODEbits : TUART5_U5MODE;
  6340. U5MODE : longWord;
  6341. U3BMODECLR : longWord;
  6342. U5MODECLR : longWord;
  6343. U3BMODESET : longWord;
  6344. U5MODESET : longWord;
  6345. U3BMODEINV : longWord;
  6346. U5MODEINV : longWord;
  6347. U3BSTAbits : TUART5_U3BSTA;
  6348. U3BSTA : longWord;
  6349. U5STAbits : TUART5_U5STA;
  6350. U5STA : longWord;
  6351. U3BSTACLR : longWord;
  6352. U5STACLR : longWord;
  6353. U3BSTASET : longWord;
  6354. U5STASET : longWord;
  6355. U3BSTAINV : longWord;
  6356. U5STAINV : longWord;
  6357. U3BTXREG : longWord;
  6358. U5TXREG : longWord;
  6359. U3BRXREG : longWord;
  6360. U5RXREG : longWord;
  6361. U3BBRG : longWord;
  6362. U5BRG : longWord;
  6363. U3BBRGCLR : longWord;
  6364. U5BRGCLR : longWord;
  6365. U3BBRGSET : longWord;
  6366. U5BRGSET : longWord;
  6367. U3BBRGINV : longWord;
  6368. U5BRGINV : longWord;
  6369. end;
  6370. TPMP_PMCON = record
  6371. private
  6372. function getADRMUX : TBits_2; inline;
  6373. function getADRMUX0 : TBits_1; inline;
  6374. function getADRMUX1 : TBits_1; inline;
  6375. function getALP : TBits_1; inline;
  6376. function getCS1P : TBits_1; inline;
  6377. function getCS2P : TBits_1; inline;
  6378. function getCSF : TBits_2; inline;
  6379. function getCSF0 : TBits_1; inline;
  6380. function getCSF1 : TBits_1; inline;
  6381. function getON : TBits_1; inline;
  6382. function getPMPEN : TBits_1; inline;
  6383. function getPMPTTL : TBits_1; inline;
  6384. function getPSIDL : TBits_1; inline;
  6385. function getPTRDEN : TBits_1; inline;
  6386. function getPTWREN : TBits_1; inline;
  6387. function getRDSP : TBits_1; inline;
  6388. function getSIDL : TBits_1; inline;
  6389. function getWRSP : TBits_1; inline;
  6390. function getw : TBits_32; inline;
  6391. procedure setADRMUX(thebits : TBits_2); inline;
  6392. procedure setADRMUX0(thebits : TBits_1); inline;
  6393. procedure setADRMUX1(thebits : TBits_1); inline;
  6394. procedure setALP(thebits : TBits_1); inline;
  6395. procedure setCS1P(thebits : TBits_1); inline;
  6396. procedure setCS2P(thebits : TBits_1); inline;
  6397. procedure setCSF(thebits : TBits_2); inline;
  6398. procedure setCSF0(thebits : TBits_1); inline;
  6399. procedure setCSF1(thebits : TBits_1); inline;
  6400. procedure setON(thebits : TBits_1); inline;
  6401. procedure setPMPEN(thebits : TBits_1); inline;
  6402. procedure setPMPTTL(thebits : TBits_1); inline;
  6403. procedure setPSIDL(thebits : TBits_1); inline;
  6404. procedure setPTRDEN(thebits : TBits_1); inline;
  6405. procedure setPTWREN(thebits : TBits_1); inline;
  6406. procedure setRDSP(thebits : TBits_1); inline;
  6407. procedure setSIDL(thebits : TBits_1); inline;
  6408. procedure setWRSP(thebits : TBits_1); inline;
  6409. procedure setw(thebits : TBits_32); inline;
  6410. public
  6411. procedure clearADRMUX0; inline;
  6412. procedure clearADRMUX1; inline;
  6413. procedure clearALP; inline;
  6414. procedure clearCS1P; inline;
  6415. procedure clearCS2P; inline;
  6416. procedure clearCSF0; inline;
  6417. procedure clearCSF1; inline;
  6418. procedure clearON; inline;
  6419. procedure clearPMPEN; inline;
  6420. procedure clearPMPTTL; inline;
  6421. procedure clearPSIDL; inline;
  6422. procedure clearPTRDEN; inline;
  6423. procedure clearPTWREN; inline;
  6424. procedure clearRDSP; inline;
  6425. procedure clearSIDL; inline;
  6426. procedure clearWRSP; inline;
  6427. procedure setADRMUX0; inline;
  6428. procedure setADRMUX1; inline;
  6429. procedure setALP; inline;
  6430. procedure setCS1P; inline;
  6431. procedure setCS2P; inline;
  6432. procedure setCSF0; inline;
  6433. procedure setCSF1; inline;
  6434. procedure setON; inline;
  6435. procedure setPMPEN; inline;
  6436. procedure setPMPTTL; inline;
  6437. procedure setPSIDL; inline;
  6438. procedure setPTRDEN; inline;
  6439. procedure setPTWREN; inline;
  6440. procedure setRDSP; inline;
  6441. procedure setSIDL; inline;
  6442. procedure setWRSP; inline;
  6443. property ADRMUX : TBits_2 read getADRMUX write setADRMUX;
  6444. property ADRMUX0 : TBits_1 read getADRMUX0 write setADRMUX0;
  6445. property ADRMUX1 : TBits_1 read getADRMUX1 write setADRMUX1;
  6446. property ALP : TBits_1 read getALP write setALP;
  6447. property CS1P : TBits_1 read getCS1P write setCS1P;
  6448. property CS2P : TBits_1 read getCS2P write setCS2P;
  6449. property CSF : TBits_2 read getCSF write setCSF;
  6450. property CSF0 : TBits_1 read getCSF0 write setCSF0;
  6451. property CSF1 : TBits_1 read getCSF1 write setCSF1;
  6452. property ON : TBits_1 read getON write setON;
  6453. property PMPEN : TBits_1 read getPMPEN write setPMPEN;
  6454. property PMPTTL : TBits_1 read getPMPTTL write setPMPTTL;
  6455. property PSIDL : TBits_1 read getPSIDL write setPSIDL;
  6456. property PTRDEN : TBits_1 read getPTRDEN write setPTRDEN;
  6457. property PTWREN : TBits_1 read getPTWREN write setPTWREN;
  6458. property RDSP : TBits_1 read getRDSP write setRDSP;
  6459. property SIDL : TBits_1 read getSIDL write setSIDL;
  6460. property WRSP : TBits_1 read getWRSP write setWRSP;
  6461. property w : TBits_32 read getw write setw;
  6462. end;
  6463. TPMP_PMMODE = record
  6464. private
  6465. function getBUSY : TBits_1; inline;
  6466. function getINCM : TBits_2; inline;
  6467. function getINCM0 : TBits_1; inline;
  6468. function getINCM1 : TBits_1; inline;
  6469. function getIRQM : TBits_2; inline;
  6470. function getIRQM0 : TBits_1; inline;
  6471. function getIRQM1 : TBits_1; inline;
  6472. function getMODE : TBits_2; inline;
  6473. function getMODE0 : TBits_1; inline;
  6474. function getMODE1 : TBits_1; inline;
  6475. function getMODE16 : TBits_1; inline;
  6476. function getWAITB : TBits_2; inline;
  6477. function getWAITB0 : TBits_1; inline;
  6478. function getWAITB1 : TBits_1; inline;
  6479. function getWAITE : TBits_2; inline;
  6480. function getWAITE0 : TBits_1; inline;
  6481. function getWAITE1 : TBits_1; inline;
  6482. function getWAITM : TBits_4; inline;
  6483. function getWAITM0 : TBits_1; inline;
  6484. function getWAITM1 : TBits_1; inline;
  6485. function getWAITM2 : TBits_1; inline;
  6486. function getWAITM3 : TBits_1; inline;
  6487. function getw : TBits_32; inline;
  6488. procedure setBUSY(thebits : TBits_1); inline;
  6489. procedure setINCM(thebits : TBits_2); inline;
  6490. procedure setINCM0(thebits : TBits_1); inline;
  6491. procedure setINCM1(thebits : TBits_1); inline;
  6492. procedure setIRQM(thebits : TBits_2); inline;
  6493. procedure setIRQM0(thebits : TBits_1); inline;
  6494. procedure setIRQM1(thebits : TBits_1); inline;
  6495. procedure setMODE(thebits : TBits_2); inline;
  6496. procedure setMODE0(thebits : TBits_1); inline;
  6497. procedure setMODE1(thebits : TBits_1); inline;
  6498. procedure setMODE16(thebits : TBits_1); inline;
  6499. procedure setWAITB(thebits : TBits_2); inline;
  6500. procedure setWAITB0(thebits : TBits_1); inline;
  6501. procedure setWAITB1(thebits : TBits_1); inline;
  6502. procedure setWAITE(thebits : TBits_2); inline;
  6503. procedure setWAITE0(thebits : TBits_1); inline;
  6504. procedure setWAITE1(thebits : TBits_1); inline;
  6505. procedure setWAITM(thebits : TBits_4); inline;
  6506. procedure setWAITM0(thebits : TBits_1); inline;
  6507. procedure setWAITM1(thebits : TBits_1); inline;
  6508. procedure setWAITM2(thebits : TBits_1); inline;
  6509. procedure setWAITM3(thebits : TBits_1); inline;
  6510. procedure setw(thebits : TBits_32); inline;
  6511. public
  6512. procedure clearBUSY; inline;
  6513. procedure clearINCM0; inline;
  6514. procedure clearINCM1; inline;
  6515. procedure clearIRQM0; inline;
  6516. procedure clearIRQM1; inline;
  6517. procedure clearMODE0; inline;
  6518. procedure clearMODE16; inline;
  6519. procedure clearMODE1; inline;
  6520. procedure clearWAITB0; inline;
  6521. procedure clearWAITB1; inline;
  6522. procedure clearWAITE0; inline;
  6523. procedure clearWAITE1; inline;
  6524. procedure clearWAITM0; inline;
  6525. procedure clearWAITM1; inline;
  6526. procedure clearWAITM2; inline;
  6527. procedure clearWAITM3; inline;
  6528. procedure setBUSY; inline;
  6529. procedure setINCM0; inline;
  6530. procedure setINCM1; inline;
  6531. procedure setIRQM0; inline;
  6532. procedure setIRQM1; inline;
  6533. procedure setMODE0; inline;
  6534. procedure setMODE16; inline;
  6535. procedure setMODE1; inline;
  6536. procedure setWAITB0; inline;
  6537. procedure setWAITB1; inline;
  6538. procedure setWAITE0; inline;
  6539. procedure setWAITE1; inline;
  6540. procedure setWAITM0; inline;
  6541. procedure setWAITM1; inline;
  6542. procedure setWAITM2; inline;
  6543. procedure setWAITM3; inline;
  6544. property BUSY : TBits_1 read getBUSY write setBUSY;
  6545. property INCM : TBits_2 read getINCM write setINCM;
  6546. property INCM0 : TBits_1 read getINCM0 write setINCM0;
  6547. property INCM1 : TBits_1 read getINCM1 write setINCM1;
  6548. property IRQM : TBits_2 read getIRQM write setIRQM;
  6549. property IRQM0 : TBits_1 read getIRQM0 write setIRQM0;
  6550. property IRQM1 : TBits_1 read getIRQM1 write setIRQM1;
  6551. property MODE : TBits_2 read getMODE write setMODE;
  6552. property MODE0 : TBits_1 read getMODE0 write setMODE0;
  6553. property MODE1 : TBits_1 read getMODE1 write setMODE1;
  6554. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  6555. property WAITB : TBits_2 read getWAITB write setWAITB;
  6556. property WAITB0 : TBits_1 read getWAITB0 write setWAITB0;
  6557. property WAITB1 : TBits_1 read getWAITB1 write setWAITB1;
  6558. property WAITE : TBits_2 read getWAITE write setWAITE;
  6559. property WAITE0 : TBits_1 read getWAITE0 write setWAITE0;
  6560. property WAITE1 : TBits_1 read getWAITE1 write setWAITE1;
  6561. property WAITM : TBits_4 read getWAITM write setWAITM;
  6562. property WAITM0 : TBits_1 read getWAITM0 write setWAITM0;
  6563. property WAITM1 : TBits_1 read getWAITM1 write setWAITM1;
  6564. property WAITM2 : TBits_1 read getWAITM2 write setWAITM2;
  6565. property WAITM3 : TBits_1 read getWAITM3 write setWAITM3;
  6566. property w : TBits_32 read getw write setw;
  6567. end;
  6568. TPMP_PMADDR = record
  6569. private
  6570. function getADDR : TBits_14; inline;
  6571. function getCS : TBits_2; inline;
  6572. function getCS1 : TBits_1; inline;
  6573. function getCS2 : TBits_1; inline;
  6574. function getPADDR : TBits_14; inline;
  6575. function getw : TBits_32; inline;
  6576. procedure setADDR(thebits : TBits_14); inline;
  6577. procedure setCS(thebits : TBits_2); inline;
  6578. procedure setCS1(thebits : TBits_1); inline;
  6579. procedure setCS2(thebits : TBits_1); inline;
  6580. procedure setPADDR(thebits : TBits_14); inline;
  6581. procedure setw(thebits : TBits_32); inline;
  6582. public
  6583. procedure clearCS1; inline;
  6584. procedure clearCS2; inline;
  6585. procedure setCS1; inline;
  6586. procedure setCS2; inline;
  6587. property ADDR : TBits_14 read getADDR write setADDR;
  6588. property CS : TBits_2 read getCS write setCS;
  6589. property CS1 : TBits_1 read getCS1 write setCS1;
  6590. property CS2 : TBits_1 read getCS2 write setCS2;
  6591. property PADDR : TBits_14 read getPADDR write setPADDR;
  6592. property w : TBits_32 read getw write setw;
  6593. end;
  6594. TPMP_PMDOUT = record
  6595. private
  6596. function getDATAOUT : TBits_32; inline;
  6597. function getw : TBits_32; inline;
  6598. procedure setDATAOUT(thebits : TBits_32); inline;
  6599. procedure setw(thebits : TBits_32); inline;
  6600. public
  6601. property DATAOUT : TBits_32 read getDATAOUT write setDATAOUT;
  6602. property w : TBits_32 read getw write setw;
  6603. end;
  6604. TPMP_PMDIN = record
  6605. private
  6606. function getDATAIN : TBits_32; inline;
  6607. function getw : TBits_32; inline;
  6608. procedure setDATAIN(thebits : TBits_32); inline;
  6609. procedure setw(thebits : TBits_32); inline;
  6610. public
  6611. property DATAIN : TBits_32 read getDATAIN write setDATAIN;
  6612. property w : TBits_32 read getw write setw;
  6613. end;
  6614. TPMP_PMAEN = record
  6615. private
  6616. function getPTEN : TBits_16; inline;
  6617. function getPTEN0 : TBits_1; inline;
  6618. function getPTEN1 : TBits_1; inline;
  6619. function getPTEN10 : TBits_1; inline;
  6620. function getPTEN11 : TBits_1; inline;
  6621. function getPTEN12 : TBits_1; inline;
  6622. function getPTEN13 : TBits_1; inline;
  6623. function getPTEN14 : TBits_1; inline;
  6624. function getPTEN15 : TBits_1; inline;
  6625. function getPTEN2 : TBits_1; inline;
  6626. function getPTEN3 : TBits_1; inline;
  6627. function getPTEN4 : TBits_1; inline;
  6628. function getPTEN5 : TBits_1; inline;
  6629. function getPTEN6 : TBits_1; inline;
  6630. function getPTEN7 : TBits_1; inline;
  6631. function getPTEN8 : TBits_1; inline;
  6632. function getPTEN9 : TBits_1; inline;
  6633. function getw : TBits_32; inline;
  6634. procedure setPTEN(thebits : TBits_16); inline;
  6635. procedure setPTEN0(thebits : TBits_1); inline;
  6636. procedure setPTEN1(thebits : TBits_1); inline;
  6637. procedure setPTEN10(thebits : TBits_1); inline;
  6638. procedure setPTEN11(thebits : TBits_1); inline;
  6639. procedure setPTEN12(thebits : TBits_1); inline;
  6640. procedure setPTEN13(thebits : TBits_1); inline;
  6641. procedure setPTEN14(thebits : TBits_1); inline;
  6642. procedure setPTEN15(thebits : TBits_1); inline;
  6643. procedure setPTEN2(thebits : TBits_1); inline;
  6644. procedure setPTEN3(thebits : TBits_1); inline;
  6645. procedure setPTEN4(thebits : TBits_1); inline;
  6646. procedure setPTEN5(thebits : TBits_1); inline;
  6647. procedure setPTEN6(thebits : TBits_1); inline;
  6648. procedure setPTEN7(thebits : TBits_1); inline;
  6649. procedure setPTEN8(thebits : TBits_1); inline;
  6650. procedure setPTEN9(thebits : TBits_1); inline;
  6651. procedure setw(thebits : TBits_32); inline;
  6652. public
  6653. procedure clearPTEN0; inline;
  6654. procedure clearPTEN10; inline;
  6655. procedure clearPTEN11; inline;
  6656. procedure clearPTEN12; inline;
  6657. procedure clearPTEN13; inline;
  6658. procedure clearPTEN14; inline;
  6659. procedure clearPTEN15; inline;
  6660. procedure clearPTEN1; inline;
  6661. procedure clearPTEN2; inline;
  6662. procedure clearPTEN3; inline;
  6663. procedure clearPTEN4; inline;
  6664. procedure clearPTEN5; inline;
  6665. procedure clearPTEN6; inline;
  6666. procedure clearPTEN7; inline;
  6667. procedure clearPTEN8; inline;
  6668. procedure clearPTEN9; inline;
  6669. procedure setPTEN0; inline;
  6670. procedure setPTEN10; inline;
  6671. procedure setPTEN11; inline;
  6672. procedure setPTEN12; inline;
  6673. procedure setPTEN13; inline;
  6674. procedure setPTEN14; inline;
  6675. procedure setPTEN15; inline;
  6676. procedure setPTEN1; inline;
  6677. procedure setPTEN2; inline;
  6678. procedure setPTEN3; inline;
  6679. procedure setPTEN4; inline;
  6680. procedure setPTEN5; inline;
  6681. procedure setPTEN6; inline;
  6682. procedure setPTEN7; inline;
  6683. procedure setPTEN8; inline;
  6684. procedure setPTEN9; inline;
  6685. property PTEN : TBits_16 read getPTEN write setPTEN;
  6686. property PTEN0 : TBits_1 read getPTEN0 write setPTEN0;
  6687. property PTEN1 : TBits_1 read getPTEN1 write setPTEN1;
  6688. property PTEN10 : TBits_1 read getPTEN10 write setPTEN10;
  6689. property PTEN11 : TBits_1 read getPTEN11 write setPTEN11;
  6690. property PTEN12 : TBits_1 read getPTEN12 write setPTEN12;
  6691. property PTEN13 : TBits_1 read getPTEN13 write setPTEN13;
  6692. property PTEN14 : TBits_1 read getPTEN14 write setPTEN14;
  6693. property PTEN15 : TBits_1 read getPTEN15 write setPTEN15;
  6694. property PTEN2 : TBits_1 read getPTEN2 write setPTEN2;
  6695. property PTEN3 : TBits_1 read getPTEN3 write setPTEN3;
  6696. property PTEN4 : TBits_1 read getPTEN4 write setPTEN4;
  6697. property PTEN5 : TBits_1 read getPTEN5 write setPTEN5;
  6698. property PTEN6 : TBits_1 read getPTEN6 write setPTEN6;
  6699. property PTEN7 : TBits_1 read getPTEN7 write setPTEN7;
  6700. property PTEN8 : TBits_1 read getPTEN8 write setPTEN8;
  6701. property PTEN9 : TBits_1 read getPTEN9 write setPTEN9;
  6702. property w : TBits_32 read getw write setw;
  6703. end;
  6704. TPMP_PMSTAT = record
  6705. private
  6706. function getIB0F : TBits_1; inline;
  6707. function getIB1F : TBits_1; inline;
  6708. function getIB2F : TBits_1; inline;
  6709. function getIB3F : TBits_1; inline;
  6710. function getIBF : TBits_1; inline;
  6711. function getIBOV : TBits_1; inline;
  6712. function getOB0E : TBits_1; inline;
  6713. function getOB1E : TBits_1; inline;
  6714. function getOB2E : TBits_1; inline;
  6715. function getOB3E : TBits_1; inline;
  6716. function getOBE : TBits_1; inline;
  6717. function getOBUF : TBits_1; inline;
  6718. function getw : TBits_32; inline;
  6719. procedure setIB0F(thebits : TBits_1); inline;
  6720. procedure setIB1F(thebits : TBits_1); inline;
  6721. procedure setIB2F(thebits : TBits_1); inline;
  6722. procedure setIB3F(thebits : TBits_1); inline;
  6723. procedure setIBF(thebits : TBits_1); inline;
  6724. procedure setIBOV(thebits : TBits_1); inline;
  6725. procedure setOB0E(thebits : TBits_1); inline;
  6726. procedure setOB1E(thebits : TBits_1); inline;
  6727. procedure setOB2E(thebits : TBits_1); inline;
  6728. procedure setOB3E(thebits : TBits_1); inline;
  6729. procedure setOBE(thebits : TBits_1); inline;
  6730. procedure setOBUF(thebits : TBits_1); inline;
  6731. procedure setw(thebits : TBits_32); inline;
  6732. public
  6733. procedure clearIB0F; inline;
  6734. procedure clearIB1F; inline;
  6735. procedure clearIB2F; inline;
  6736. procedure clearIB3F; inline;
  6737. procedure clearIBF; inline;
  6738. procedure clearIBOV; inline;
  6739. procedure clearOB0E; inline;
  6740. procedure clearOB1E; inline;
  6741. procedure clearOB2E; inline;
  6742. procedure clearOB3E; inline;
  6743. procedure clearOBE; inline;
  6744. procedure clearOBUF; inline;
  6745. procedure setIB0F; inline;
  6746. procedure setIB1F; inline;
  6747. procedure setIB2F; inline;
  6748. procedure setIB3F; inline;
  6749. procedure setIBF; inline;
  6750. procedure setIBOV; inline;
  6751. procedure setOB0E; inline;
  6752. procedure setOB1E; inline;
  6753. procedure setOB2E; inline;
  6754. procedure setOB3E; inline;
  6755. procedure setOBE; inline;
  6756. procedure setOBUF; inline;
  6757. property IB0F : TBits_1 read getIB0F write setIB0F;
  6758. property IB1F : TBits_1 read getIB1F write setIB1F;
  6759. property IB2F : TBits_1 read getIB2F write setIB2F;
  6760. property IB3F : TBits_1 read getIB3F write setIB3F;
  6761. property IBF : TBits_1 read getIBF write setIBF;
  6762. property IBOV : TBits_1 read getIBOV write setIBOV;
  6763. property OB0E : TBits_1 read getOB0E write setOB0E;
  6764. property OB1E : TBits_1 read getOB1E write setOB1E;
  6765. property OB2E : TBits_1 read getOB2E write setOB2E;
  6766. property OB3E : TBits_1 read getOB3E write setOB3E;
  6767. property OBE : TBits_1 read getOBE write setOBE;
  6768. property OBUF : TBits_1 read getOBUF write setOBUF;
  6769. property w : TBits_32 read getw write setw;
  6770. end;
  6771. type
  6772. TPMPRegisters = record
  6773. PMCONbits : TPMP_PMCON;
  6774. PMCON : longWord;
  6775. PMCONCLR : longWord;
  6776. PMCONSET : longWord;
  6777. PMCONINV : longWord;
  6778. PMMODEbits : TPMP_PMMODE;
  6779. PMMODE : longWord;
  6780. PMMODECLR : longWord;
  6781. PMMODESET : longWord;
  6782. PMMODEINV : longWord;
  6783. PMADDRbits : TPMP_PMADDR;
  6784. PMADDR : longWord;
  6785. PMADDRCLR : longWord;
  6786. PMADDRSET : longWord;
  6787. PMADDRINV : longWord;
  6788. PMDOUTbits : TPMP_PMDOUT;
  6789. PMDOUT : longWord;
  6790. PMDOUTCLR : longWord;
  6791. PMDOUTSET : longWord;
  6792. PMDOUTINV : longWord;
  6793. PMDINbits : TPMP_PMDIN;
  6794. PMDIN : longWord;
  6795. PMDINCLR : longWord;
  6796. PMDINSET : longWord;
  6797. PMDININV : longWord;
  6798. PMAENbits : TPMP_PMAEN;
  6799. PMAEN : longWord;
  6800. PMAENCLR : longWord;
  6801. PMAENSET : longWord;
  6802. PMAENINV : longWord;
  6803. PMSTATbits : TPMP_PMSTAT;
  6804. PMSTAT : longWord;
  6805. PMSTATCLR : longWord;
  6806. PMSTATSET : longWord;
  6807. PMSTATINV : longWord;
  6808. end;
  6809. TADC10_AD1CON1 = record
  6810. private
  6811. function getADON : TBits_1; inline;
  6812. function getADSIDL : TBits_1; inline;
  6813. function getASAM : TBits_1; inline;
  6814. function getCLRASAM : TBits_1; inline;
  6815. function getDONE : TBits_1; inline;
  6816. function getFORM : TBits_3; inline;
  6817. function getFORM0 : TBits_1; inline;
  6818. function getFORM1 : TBits_1; inline;
  6819. function getFORM2 : TBits_1; inline;
  6820. function getON : TBits_1; inline;
  6821. function getSAMP : TBits_1; inline;
  6822. function getSIDL : TBits_1; inline;
  6823. function getSSRC : TBits_3; inline;
  6824. function getSSRC0 : TBits_1; inline;
  6825. function getSSRC1 : TBits_1; inline;
  6826. function getSSRC2 : TBits_1; inline;
  6827. function getw : TBits_32; inline;
  6828. procedure setADON(thebits : TBits_1); inline;
  6829. procedure setADSIDL(thebits : TBits_1); inline;
  6830. procedure setASAM(thebits : TBits_1); inline;
  6831. procedure setCLRASAM(thebits : TBits_1); inline;
  6832. procedure setDONE(thebits : TBits_1); inline;
  6833. procedure setFORM(thebits : TBits_3); inline;
  6834. procedure setFORM0(thebits : TBits_1); inline;
  6835. procedure setFORM1(thebits : TBits_1); inline;
  6836. procedure setFORM2(thebits : TBits_1); inline;
  6837. procedure setON(thebits : TBits_1); inline;
  6838. procedure setSAMP(thebits : TBits_1); inline;
  6839. procedure setSIDL(thebits : TBits_1); inline;
  6840. procedure setSSRC(thebits : TBits_3); inline;
  6841. procedure setSSRC0(thebits : TBits_1); inline;
  6842. procedure setSSRC1(thebits : TBits_1); inline;
  6843. procedure setSSRC2(thebits : TBits_1); inline;
  6844. procedure setw(thebits : TBits_32); inline;
  6845. public
  6846. procedure clearADON; inline;
  6847. procedure clearADSIDL; inline;
  6848. procedure clearASAM; inline;
  6849. procedure clearCLRASAM; inline;
  6850. procedure clearDONE; inline;
  6851. procedure clearFORM0; inline;
  6852. procedure clearFORM1; inline;
  6853. procedure clearFORM2; inline;
  6854. procedure clearON; inline;
  6855. procedure clearSAMP; inline;
  6856. procedure clearSIDL; inline;
  6857. procedure clearSSRC0; inline;
  6858. procedure clearSSRC1; inline;
  6859. procedure clearSSRC2; inline;
  6860. procedure setADON; inline;
  6861. procedure setADSIDL; inline;
  6862. procedure setASAM; inline;
  6863. procedure setCLRASAM; inline;
  6864. procedure setDONE; inline;
  6865. procedure setFORM0; inline;
  6866. procedure setFORM1; inline;
  6867. procedure setFORM2; inline;
  6868. procedure setON; inline;
  6869. procedure setSAMP; inline;
  6870. procedure setSIDL; inline;
  6871. procedure setSSRC0; inline;
  6872. procedure setSSRC1; inline;
  6873. procedure setSSRC2; inline;
  6874. property ADON : TBits_1 read getADON write setADON;
  6875. property ADSIDL : TBits_1 read getADSIDL write setADSIDL;
  6876. property ASAM : TBits_1 read getASAM write setASAM;
  6877. property CLRASAM : TBits_1 read getCLRASAM write setCLRASAM;
  6878. property DONE : TBits_1 read getDONE write setDONE;
  6879. property FORM : TBits_3 read getFORM write setFORM;
  6880. property FORM0 : TBits_1 read getFORM0 write setFORM0;
  6881. property FORM1 : TBits_1 read getFORM1 write setFORM1;
  6882. property FORM2 : TBits_1 read getFORM2 write setFORM2;
  6883. property ON : TBits_1 read getON write setON;
  6884. property SAMP : TBits_1 read getSAMP write setSAMP;
  6885. property SIDL : TBits_1 read getSIDL write setSIDL;
  6886. property SSRC : TBits_3 read getSSRC write setSSRC;
  6887. property SSRC0 : TBits_1 read getSSRC0 write setSSRC0;
  6888. property SSRC1 : TBits_1 read getSSRC1 write setSSRC1;
  6889. property SSRC2 : TBits_1 read getSSRC2 write setSSRC2;
  6890. property w : TBits_32 read getw write setw;
  6891. end;
  6892. TADC10_AD1CON2 = record
  6893. private
  6894. function getALTS : TBits_1; inline;
  6895. function getBUFM : TBits_1; inline;
  6896. function getBUFS : TBits_1; inline;
  6897. function getCSCNA : TBits_1; inline;
  6898. function getOFFCAL : TBits_1; inline;
  6899. function getSMPI : TBits_4; inline;
  6900. function getSMPI0 : TBits_1; inline;
  6901. function getSMPI1 : TBits_1; inline;
  6902. function getSMPI2 : TBits_1; inline;
  6903. function getSMPI3 : TBits_1; inline;
  6904. function getVCFG : TBits_3; inline;
  6905. function getVCFG0 : TBits_1; inline;
  6906. function getVCFG1 : TBits_1; inline;
  6907. function getVCFG2 : TBits_1; inline;
  6908. function getw : TBits_32; inline;
  6909. procedure setALTS(thebits : TBits_1); inline;
  6910. procedure setBUFM(thebits : TBits_1); inline;
  6911. procedure setBUFS(thebits : TBits_1); inline;
  6912. procedure setCSCNA(thebits : TBits_1); inline;
  6913. procedure setOFFCAL(thebits : TBits_1); inline;
  6914. procedure setSMPI(thebits : TBits_4); inline;
  6915. procedure setSMPI0(thebits : TBits_1); inline;
  6916. procedure setSMPI1(thebits : TBits_1); inline;
  6917. procedure setSMPI2(thebits : TBits_1); inline;
  6918. procedure setSMPI3(thebits : TBits_1); inline;
  6919. procedure setVCFG(thebits : TBits_3); inline;
  6920. procedure setVCFG0(thebits : TBits_1); inline;
  6921. procedure setVCFG1(thebits : TBits_1); inline;
  6922. procedure setVCFG2(thebits : TBits_1); inline;
  6923. procedure setw(thebits : TBits_32); inline;
  6924. public
  6925. procedure clearALTS; inline;
  6926. procedure clearBUFM; inline;
  6927. procedure clearBUFS; inline;
  6928. procedure clearCSCNA; inline;
  6929. procedure clearOFFCAL; inline;
  6930. procedure clearSMPI0; inline;
  6931. procedure clearSMPI1; inline;
  6932. procedure clearSMPI2; inline;
  6933. procedure clearSMPI3; inline;
  6934. procedure clearVCFG0; inline;
  6935. procedure clearVCFG1; inline;
  6936. procedure clearVCFG2; inline;
  6937. procedure setALTS; inline;
  6938. procedure setBUFM; inline;
  6939. procedure setBUFS; inline;
  6940. procedure setCSCNA; inline;
  6941. procedure setOFFCAL; inline;
  6942. procedure setSMPI0; inline;
  6943. procedure setSMPI1; inline;
  6944. procedure setSMPI2; inline;
  6945. procedure setSMPI3; inline;
  6946. procedure setVCFG0; inline;
  6947. procedure setVCFG1; inline;
  6948. procedure setVCFG2; inline;
  6949. property ALTS : TBits_1 read getALTS write setALTS;
  6950. property BUFM : TBits_1 read getBUFM write setBUFM;
  6951. property BUFS : TBits_1 read getBUFS write setBUFS;
  6952. property CSCNA : TBits_1 read getCSCNA write setCSCNA;
  6953. property OFFCAL : TBits_1 read getOFFCAL write setOFFCAL;
  6954. property SMPI : TBits_4 read getSMPI write setSMPI;
  6955. property SMPI0 : TBits_1 read getSMPI0 write setSMPI0;
  6956. property SMPI1 : TBits_1 read getSMPI1 write setSMPI1;
  6957. property SMPI2 : TBits_1 read getSMPI2 write setSMPI2;
  6958. property SMPI3 : TBits_1 read getSMPI3 write setSMPI3;
  6959. property VCFG : TBits_3 read getVCFG write setVCFG;
  6960. property VCFG0 : TBits_1 read getVCFG0 write setVCFG0;
  6961. property VCFG1 : TBits_1 read getVCFG1 write setVCFG1;
  6962. property VCFG2 : TBits_1 read getVCFG2 write setVCFG2;
  6963. property w : TBits_32 read getw write setw;
  6964. end;
  6965. TADC10_AD1CON3 = record
  6966. private
  6967. function getADCS : TBits_8; inline;
  6968. function getADCS0 : TBits_1; inline;
  6969. function getADCS1 : TBits_1; inline;
  6970. function getADCS2 : TBits_1; inline;
  6971. function getADCS3 : TBits_1; inline;
  6972. function getADCS4 : TBits_1; inline;
  6973. function getADCS5 : TBits_1; inline;
  6974. function getADCS6 : TBits_1; inline;
  6975. function getADCS7 : TBits_1; inline;
  6976. function getADRC : TBits_1; inline;
  6977. function getSAMC : TBits_5; inline;
  6978. function getSAMC0 : TBits_1; inline;
  6979. function getSAMC1 : TBits_1; inline;
  6980. function getSAMC2 : TBits_1; inline;
  6981. function getSAMC3 : TBits_1; inline;
  6982. function getSAMC4 : TBits_1; inline;
  6983. function getw : TBits_32; inline;
  6984. procedure setADCS(thebits : TBits_8); inline;
  6985. procedure setADCS0(thebits : TBits_1); inline;
  6986. procedure setADCS1(thebits : TBits_1); inline;
  6987. procedure setADCS2(thebits : TBits_1); inline;
  6988. procedure setADCS3(thebits : TBits_1); inline;
  6989. procedure setADCS4(thebits : TBits_1); inline;
  6990. procedure setADCS5(thebits : TBits_1); inline;
  6991. procedure setADCS6(thebits : TBits_1); inline;
  6992. procedure setADCS7(thebits : TBits_1); inline;
  6993. procedure setADRC(thebits : TBits_1); inline;
  6994. procedure setSAMC(thebits : TBits_5); inline;
  6995. procedure setSAMC0(thebits : TBits_1); inline;
  6996. procedure setSAMC1(thebits : TBits_1); inline;
  6997. procedure setSAMC2(thebits : TBits_1); inline;
  6998. procedure setSAMC3(thebits : TBits_1); inline;
  6999. procedure setSAMC4(thebits : TBits_1); inline;
  7000. procedure setw(thebits : TBits_32); inline;
  7001. public
  7002. procedure clearADCS0; inline;
  7003. procedure clearADCS1; inline;
  7004. procedure clearADCS2; inline;
  7005. procedure clearADCS3; inline;
  7006. procedure clearADCS4; inline;
  7007. procedure clearADCS5; inline;
  7008. procedure clearADCS6; inline;
  7009. procedure clearADCS7; inline;
  7010. procedure clearADRC; inline;
  7011. procedure clearSAMC0; inline;
  7012. procedure clearSAMC1; inline;
  7013. procedure clearSAMC2; inline;
  7014. procedure clearSAMC3; inline;
  7015. procedure clearSAMC4; inline;
  7016. procedure setADCS0; inline;
  7017. procedure setADCS1; inline;
  7018. procedure setADCS2; inline;
  7019. procedure setADCS3; inline;
  7020. procedure setADCS4; inline;
  7021. procedure setADCS5; inline;
  7022. procedure setADCS6; inline;
  7023. procedure setADCS7; inline;
  7024. procedure setADRC; inline;
  7025. procedure setSAMC0; inline;
  7026. procedure setSAMC1; inline;
  7027. procedure setSAMC2; inline;
  7028. procedure setSAMC3; inline;
  7029. procedure setSAMC4; inline;
  7030. property ADCS : TBits_8 read getADCS write setADCS;
  7031. property ADCS0 : TBits_1 read getADCS0 write setADCS0;
  7032. property ADCS1 : TBits_1 read getADCS1 write setADCS1;
  7033. property ADCS2 : TBits_1 read getADCS2 write setADCS2;
  7034. property ADCS3 : TBits_1 read getADCS3 write setADCS3;
  7035. property ADCS4 : TBits_1 read getADCS4 write setADCS4;
  7036. property ADCS5 : TBits_1 read getADCS5 write setADCS5;
  7037. property ADCS6 : TBits_1 read getADCS6 write setADCS6;
  7038. property ADCS7 : TBits_1 read getADCS7 write setADCS7;
  7039. property ADRC : TBits_1 read getADRC write setADRC;
  7040. property SAMC : TBits_5 read getSAMC write setSAMC;
  7041. property SAMC0 : TBits_1 read getSAMC0 write setSAMC0;
  7042. property SAMC1 : TBits_1 read getSAMC1 write setSAMC1;
  7043. property SAMC2 : TBits_1 read getSAMC2 write setSAMC2;
  7044. property SAMC3 : TBits_1 read getSAMC3 write setSAMC3;
  7045. property SAMC4 : TBits_1 read getSAMC4 write setSAMC4;
  7046. property w : TBits_32 read getw write setw;
  7047. end;
  7048. TADC10_AD1CHS = record
  7049. private
  7050. function getCH0NA : TBits_1; inline;
  7051. function getCH0NB : TBits_1; inline;
  7052. function getCH0SA : TBits_4; inline;
  7053. function getCH0SA0 : TBits_1; inline;
  7054. function getCH0SA1 : TBits_1; inline;
  7055. function getCH0SA2 : TBits_1; inline;
  7056. function getCH0SA3 : TBits_1; inline;
  7057. function getCH0SB : TBits_4; inline;
  7058. function getCH0SB0 : TBits_1; inline;
  7059. function getCH0SB1 : TBits_1; inline;
  7060. function getCH0SB2 : TBits_1; inline;
  7061. function getCH0SB3 : TBits_1; inline;
  7062. function getw : TBits_32; inline;
  7063. procedure setCH0NA(thebits : TBits_1); inline;
  7064. procedure setCH0NB(thebits : TBits_1); inline;
  7065. procedure setCH0SA(thebits : TBits_4); inline;
  7066. procedure setCH0SA0(thebits : TBits_1); inline;
  7067. procedure setCH0SA1(thebits : TBits_1); inline;
  7068. procedure setCH0SA2(thebits : TBits_1); inline;
  7069. procedure setCH0SA3(thebits : TBits_1); inline;
  7070. procedure setCH0SB(thebits : TBits_4); inline;
  7071. procedure setCH0SB0(thebits : TBits_1); inline;
  7072. procedure setCH0SB1(thebits : TBits_1); inline;
  7073. procedure setCH0SB2(thebits : TBits_1); inline;
  7074. procedure setCH0SB3(thebits : TBits_1); inline;
  7075. procedure setw(thebits : TBits_32); inline;
  7076. public
  7077. procedure clearCH0NA; inline;
  7078. procedure clearCH0NB; inline;
  7079. procedure clearCH0SA0; inline;
  7080. procedure clearCH0SA1; inline;
  7081. procedure clearCH0SA2; inline;
  7082. procedure clearCH0SA3; inline;
  7083. procedure clearCH0SB0; inline;
  7084. procedure clearCH0SB1; inline;
  7085. procedure clearCH0SB2; inline;
  7086. procedure clearCH0SB3; inline;
  7087. procedure setCH0NA; inline;
  7088. procedure setCH0NB; inline;
  7089. procedure setCH0SA0; inline;
  7090. procedure setCH0SA1; inline;
  7091. procedure setCH0SA2; inline;
  7092. procedure setCH0SA3; inline;
  7093. procedure setCH0SB0; inline;
  7094. procedure setCH0SB1; inline;
  7095. procedure setCH0SB2; inline;
  7096. procedure setCH0SB3; inline;
  7097. property CH0NA : TBits_1 read getCH0NA write setCH0NA;
  7098. property CH0NB : TBits_1 read getCH0NB write setCH0NB;
  7099. property CH0SA : TBits_4 read getCH0SA write setCH0SA;
  7100. property CH0SA0 : TBits_1 read getCH0SA0 write setCH0SA0;
  7101. property CH0SA1 : TBits_1 read getCH0SA1 write setCH0SA1;
  7102. property CH0SA2 : TBits_1 read getCH0SA2 write setCH0SA2;
  7103. property CH0SA3 : TBits_1 read getCH0SA3 write setCH0SA3;
  7104. property CH0SB : TBits_4 read getCH0SB write setCH0SB;
  7105. property CH0SB0 : TBits_1 read getCH0SB0 write setCH0SB0;
  7106. property CH0SB1 : TBits_1 read getCH0SB1 write setCH0SB1;
  7107. property CH0SB2 : TBits_1 read getCH0SB2 write setCH0SB2;
  7108. property CH0SB3 : TBits_1 read getCH0SB3 write setCH0SB3;
  7109. property w : TBits_32 read getw write setw;
  7110. end;
  7111. TADC10_AD1CSSL = record
  7112. private
  7113. function getCSSL : TBits_16; inline;
  7114. function getCSSL0 : TBits_1; inline;
  7115. function getCSSL1 : TBits_1; inline;
  7116. function getCSSL10 : TBits_1; inline;
  7117. function getCSSL11 : TBits_1; inline;
  7118. function getCSSL12 : TBits_1; inline;
  7119. function getCSSL13 : TBits_1; inline;
  7120. function getCSSL14 : TBits_1; inline;
  7121. function getCSSL15 : TBits_1; inline;
  7122. function getCSSL2 : TBits_1; inline;
  7123. function getCSSL3 : TBits_1; inline;
  7124. function getCSSL4 : TBits_1; inline;
  7125. function getCSSL5 : TBits_1; inline;
  7126. function getCSSL6 : TBits_1; inline;
  7127. function getCSSL7 : TBits_1; inline;
  7128. function getCSSL8 : TBits_1; inline;
  7129. function getCSSL9 : TBits_1; inline;
  7130. function getw : TBits_32; inline;
  7131. procedure setCSSL(thebits : TBits_16); inline;
  7132. procedure setCSSL0(thebits : TBits_1); inline;
  7133. procedure setCSSL1(thebits : TBits_1); inline;
  7134. procedure setCSSL10(thebits : TBits_1); inline;
  7135. procedure setCSSL11(thebits : TBits_1); inline;
  7136. procedure setCSSL12(thebits : TBits_1); inline;
  7137. procedure setCSSL13(thebits : TBits_1); inline;
  7138. procedure setCSSL14(thebits : TBits_1); inline;
  7139. procedure setCSSL15(thebits : TBits_1); inline;
  7140. procedure setCSSL2(thebits : TBits_1); inline;
  7141. procedure setCSSL3(thebits : TBits_1); inline;
  7142. procedure setCSSL4(thebits : TBits_1); inline;
  7143. procedure setCSSL5(thebits : TBits_1); inline;
  7144. procedure setCSSL6(thebits : TBits_1); inline;
  7145. procedure setCSSL7(thebits : TBits_1); inline;
  7146. procedure setCSSL8(thebits : TBits_1); inline;
  7147. procedure setCSSL9(thebits : TBits_1); inline;
  7148. procedure setw(thebits : TBits_32); inline;
  7149. public
  7150. procedure clearCSSL0; inline;
  7151. procedure clearCSSL10; inline;
  7152. procedure clearCSSL11; inline;
  7153. procedure clearCSSL12; inline;
  7154. procedure clearCSSL13; inline;
  7155. procedure clearCSSL14; inline;
  7156. procedure clearCSSL15; inline;
  7157. procedure clearCSSL1; inline;
  7158. procedure clearCSSL2; inline;
  7159. procedure clearCSSL3; inline;
  7160. procedure clearCSSL4; inline;
  7161. procedure clearCSSL5; inline;
  7162. procedure clearCSSL6; inline;
  7163. procedure clearCSSL7; inline;
  7164. procedure clearCSSL8; inline;
  7165. procedure clearCSSL9; inline;
  7166. procedure setCSSL0; inline;
  7167. procedure setCSSL10; inline;
  7168. procedure setCSSL11; inline;
  7169. procedure setCSSL12; inline;
  7170. procedure setCSSL13; inline;
  7171. procedure setCSSL14; inline;
  7172. procedure setCSSL15; inline;
  7173. procedure setCSSL1; inline;
  7174. procedure setCSSL2; inline;
  7175. procedure setCSSL3; inline;
  7176. procedure setCSSL4; inline;
  7177. procedure setCSSL5; inline;
  7178. procedure setCSSL6; inline;
  7179. procedure setCSSL7; inline;
  7180. procedure setCSSL8; inline;
  7181. procedure setCSSL9; inline;
  7182. property CSSL : TBits_16 read getCSSL write setCSSL;
  7183. property CSSL0 : TBits_1 read getCSSL0 write setCSSL0;
  7184. property CSSL1 : TBits_1 read getCSSL1 write setCSSL1;
  7185. property CSSL10 : TBits_1 read getCSSL10 write setCSSL10;
  7186. property CSSL11 : TBits_1 read getCSSL11 write setCSSL11;
  7187. property CSSL12 : TBits_1 read getCSSL12 write setCSSL12;
  7188. property CSSL13 : TBits_1 read getCSSL13 write setCSSL13;
  7189. property CSSL14 : TBits_1 read getCSSL14 write setCSSL14;
  7190. property CSSL15 : TBits_1 read getCSSL15 write setCSSL15;
  7191. property CSSL2 : TBits_1 read getCSSL2 write setCSSL2;
  7192. property CSSL3 : TBits_1 read getCSSL3 write setCSSL3;
  7193. property CSSL4 : TBits_1 read getCSSL4 write setCSSL4;
  7194. property CSSL5 : TBits_1 read getCSSL5 write setCSSL5;
  7195. property CSSL6 : TBits_1 read getCSSL6 write setCSSL6;
  7196. property CSSL7 : TBits_1 read getCSSL7 write setCSSL7;
  7197. property CSSL8 : TBits_1 read getCSSL8 write setCSSL8;
  7198. property CSSL9 : TBits_1 read getCSSL9 write setCSSL9;
  7199. property w : TBits_32 read getw write setw;
  7200. end;
  7201. TADC10_AD1PCFG = record
  7202. private
  7203. function getPCFG : TBits_16; inline;
  7204. function getPCFG0 : TBits_1; inline;
  7205. function getPCFG1 : TBits_1; inline;
  7206. function getPCFG10 : TBits_1; inline;
  7207. function getPCFG11 : TBits_1; inline;
  7208. function getPCFG12 : TBits_1; inline;
  7209. function getPCFG13 : TBits_1; inline;
  7210. function getPCFG14 : TBits_1; inline;
  7211. function getPCFG15 : TBits_1; inline;
  7212. function getPCFG2 : TBits_1; inline;
  7213. function getPCFG3 : TBits_1; inline;
  7214. function getPCFG4 : TBits_1; inline;
  7215. function getPCFG5 : TBits_1; inline;
  7216. function getPCFG6 : TBits_1; inline;
  7217. function getPCFG7 : TBits_1; inline;
  7218. function getPCFG8 : TBits_1; inline;
  7219. function getPCFG9 : TBits_1; inline;
  7220. function getw : TBits_32; inline;
  7221. procedure setPCFG(thebits : TBits_16); inline;
  7222. procedure setPCFG0(thebits : TBits_1); inline;
  7223. procedure setPCFG1(thebits : TBits_1); inline;
  7224. procedure setPCFG10(thebits : TBits_1); inline;
  7225. procedure setPCFG11(thebits : TBits_1); inline;
  7226. procedure setPCFG12(thebits : TBits_1); inline;
  7227. procedure setPCFG13(thebits : TBits_1); inline;
  7228. procedure setPCFG14(thebits : TBits_1); inline;
  7229. procedure setPCFG15(thebits : TBits_1); inline;
  7230. procedure setPCFG2(thebits : TBits_1); inline;
  7231. procedure setPCFG3(thebits : TBits_1); inline;
  7232. procedure setPCFG4(thebits : TBits_1); inline;
  7233. procedure setPCFG5(thebits : TBits_1); inline;
  7234. procedure setPCFG6(thebits : TBits_1); inline;
  7235. procedure setPCFG7(thebits : TBits_1); inline;
  7236. procedure setPCFG8(thebits : TBits_1); inline;
  7237. procedure setPCFG9(thebits : TBits_1); inline;
  7238. procedure setw(thebits : TBits_32); inline;
  7239. public
  7240. procedure clearPCFG0; inline;
  7241. procedure clearPCFG10; inline;
  7242. procedure clearPCFG11; inline;
  7243. procedure clearPCFG12; inline;
  7244. procedure clearPCFG13; inline;
  7245. procedure clearPCFG14; inline;
  7246. procedure clearPCFG15; inline;
  7247. procedure clearPCFG1; inline;
  7248. procedure clearPCFG2; inline;
  7249. procedure clearPCFG3; inline;
  7250. procedure clearPCFG4; inline;
  7251. procedure clearPCFG5; inline;
  7252. procedure clearPCFG6; inline;
  7253. procedure clearPCFG7; inline;
  7254. procedure clearPCFG8; inline;
  7255. procedure clearPCFG9; inline;
  7256. procedure setPCFG0; inline;
  7257. procedure setPCFG10; inline;
  7258. procedure setPCFG11; inline;
  7259. procedure setPCFG12; inline;
  7260. procedure setPCFG13; inline;
  7261. procedure setPCFG14; inline;
  7262. procedure setPCFG15; inline;
  7263. procedure setPCFG1; inline;
  7264. procedure setPCFG2; inline;
  7265. procedure setPCFG3; inline;
  7266. procedure setPCFG4; inline;
  7267. procedure setPCFG5; inline;
  7268. procedure setPCFG6; inline;
  7269. procedure setPCFG7; inline;
  7270. procedure setPCFG8; inline;
  7271. procedure setPCFG9; inline;
  7272. property PCFG : TBits_16 read getPCFG write setPCFG;
  7273. property PCFG0 : TBits_1 read getPCFG0 write setPCFG0;
  7274. property PCFG1 : TBits_1 read getPCFG1 write setPCFG1;
  7275. property PCFG10 : TBits_1 read getPCFG10 write setPCFG10;
  7276. property PCFG11 : TBits_1 read getPCFG11 write setPCFG11;
  7277. property PCFG12 : TBits_1 read getPCFG12 write setPCFG12;
  7278. property PCFG13 : TBits_1 read getPCFG13 write setPCFG13;
  7279. property PCFG14 : TBits_1 read getPCFG14 write setPCFG14;
  7280. property PCFG15 : TBits_1 read getPCFG15 write setPCFG15;
  7281. property PCFG2 : TBits_1 read getPCFG2 write setPCFG2;
  7282. property PCFG3 : TBits_1 read getPCFG3 write setPCFG3;
  7283. property PCFG4 : TBits_1 read getPCFG4 write setPCFG4;
  7284. property PCFG5 : TBits_1 read getPCFG5 write setPCFG5;
  7285. property PCFG6 : TBits_1 read getPCFG6 write setPCFG6;
  7286. property PCFG7 : TBits_1 read getPCFG7 write setPCFG7;
  7287. property PCFG8 : TBits_1 read getPCFG8 write setPCFG8;
  7288. property PCFG9 : TBits_1 read getPCFG9 write setPCFG9;
  7289. property w : TBits_32 read getw write setw;
  7290. end;
  7291. type
  7292. TADC10Registers = record
  7293. AD1CON1bits : TADC10_AD1CON1;
  7294. AD1CON1 : longWord;
  7295. AD1CON1CLR : longWord;
  7296. AD1CON1SET : longWord;
  7297. AD1CON1INV : longWord;
  7298. AD1CON2bits : TADC10_AD1CON2;
  7299. AD1CON2 : longWord;
  7300. AD1CON2CLR : longWord;
  7301. AD1CON2SET : longWord;
  7302. AD1CON2INV : longWord;
  7303. AD1CON3bits : TADC10_AD1CON3;
  7304. AD1CON3 : longWord;
  7305. AD1CON3CLR : longWord;
  7306. AD1CON3SET : longWord;
  7307. AD1CON3INV : longWord;
  7308. AD1CHSbits : TADC10_AD1CHS;
  7309. AD1CHS : longWord;
  7310. AD1CHSCLR : longWord;
  7311. AD1CHSSET : longWord;
  7312. AD1CHSINV : longWord;
  7313. AD1CSSLbits : TADC10_AD1CSSL;
  7314. AD1CSSL : longWord;
  7315. AD1CSSLCLR : longWord;
  7316. AD1CSSLSET : longWord;
  7317. AD1CSSLINV : longWord;
  7318. AD1PCFGbits : TADC10_AD1PCFG;
  7319. AD1PCFG : longWord;
  7320. AD1PCFGCLR : longWord;
  7321. AD1PCFGSET : longWord;
  7322. AD1PCFGINV : longWord;
  7323. ADC1BUF0 : longWord;
  7324. ADC1BUF1 : longWord;
  7325. ADC1BUF2 : longWord;
  7326. ADC1BUF3 : longWord;
  7327. ADC1BUF4 : longWord;
  7328. ADC1BUF5 : longWord;
  7329. ADC1BUF6 : longWord;
  7330. ADC1BUF7 : longWord;
  7331. ADC1BUF8 : longWord;
  7332. ADC1BUF9 : longWord;
  7333. ADC1BUFA : longWord;
  7334. ADC1BUFB : longWord;
  7335. ADC1BUFC : longWord;
  7336. ADC1BUFD : longWord;
  7337. ADC1BUFE : longWord;
  7338. ADC1BUFF : longWord;
  7339. end;
  7340. TCVR_CVRCON = record
  7341. private
  7342. function getCVR : TBits_4; inline;
  7343. function getCVR0 : TBits_1; inline;
  7344. function getCVR1 : TBits_1; inline;
  7345. function getCVR2 : TBits_1; inline;
  7346. function getCVR3 : TBits_1; inline;
  7347. function getCVROE : TBits_1; inline;
  7348. function getCVRR : TBits_1; inline;
  7349. function getCVRSS : TBits_1; inline;
  7350. function getON : TBits_1; inline;
  7351. function getw : TBits_32; inline;
  7352. procedure setCVR(thebits : TBits_4); inline;
  7353. procedure setCVR0(thebits : TBits_1); inline;
  7354. procedure setCVR1(thebits : TBits_1); inline;
  7355. procedure setCVR2(thebits : TBits_1); inline;
  7356. procedure setCVR3(thebits : TBits_1); inline;
  7357. procedure setCVROE(thebits : TBits_1); inline;
  7358. procedure setCVRR(thebits : TBits_1); inline;
  7359. procedure setCVRSS(thebits : TBits_1); inline;
  7360. procedure setON(thebits : TBits_1); inline;
  7361. procedure setw(thebits : TBits_32); inline;
  7362. public
  7363. procedure clearCVR0; inline;
  7364. procedure clearCVR1; inline;
  7365. procedure clearCVR2; inline;
  7366. procedure clearCVR3; inline;
  7367. procedure clearCVROE; inline;
  7368. procedure clearCVRR; inline;
  7369. procedure clearCVRSS; inline;
  7370. procedure clearON; inline;
  7371. procedure setCVR0; inline;
  7372. procedure setCVR1; inline;
  7373. procedure setCVR2; inline;
  7374. procedure setCVR3; inline;
  7375. procedure setCVROE; inline;
  7376. procedure setCVRR; inline;
  7377. procedure setCVRSS; inline;
  7378. procedure setON; inline;
  7379. property CVR : TBits_4 read getCVR write setCVR;
  7380. property CVR0 : TBits_1 read getCVR0 write setCVR0;
  7381. property CVR1 : TBits_1 read getCVR1 write setCVR1;
  7382. property CVR2 : TBits_1 read getCVR2 write setCVR2;
  7383. property CVR3 : TBits_1 read getCVR3 write setCVR3;
  7384. property CVROE : TBits_1 read getCVROE write setCVROE;
  7385. property CVRR : TBits_1 read getCVRR write setCVRR;
  7386. property CVRSS : TBits_1 read getCVRSS write setCVRSS;
  7387. property ON : TBits_1 read getON write setON;
  7388. property w : TBits_32 read getw write setw;
  7389. end;
  7390. type
  7391. TCVRRegisters = record
  7392. CVRCONbits : TCVR_CVRCON;
  7393. CVRCON : longWord;
  7394. CVRCONCLR : longWord;
  7395. CVRCONSET : longWord;
  7396. CVRCONINV : longWord;
  7397. end;
  7398. TCMP_CM1CON = record
  7399. private
  7400. function getCCH : TBits_2; inline;
  7401. function getCCH0 : TBits_1; inline;
  7402. function getCCH1 : TBits_1; inline;
  7403. function getCOE : TBits_1; inline;
  7404. function getCOUT : TBits_1; inline;
  7405. function getCPOL : TBits_1; inline;
  7406. function getCREF : TBits_1; inline;
  7407. function getEVPOL : TBits_2; inline;
  7408. function getEVPOL0 : TBits_1; inline;
  7409. function getEVPOL1 : TBits_1; inline;
  7410. function getON : TBits_1; inline;
  7411. function getw : TBits_32; inline;
  7412. procedure setCCH(thebits : TBits_2); inline;
  7413. procedure setCCH0(thebits : TBits_1); inline;
  7414. procedure setCCH1(thebits : TBits_1); inline;
  7415. procedure setCOE(thebits : TBits_1); inline;
  7416. procedure setCOUT(thebits : TBits_1); inline;
  7417. procedure setCPOL(thebits : TBits_1); inline;
  7418. procedure setCREF(thebits : TBits_1); inline;
  7419. procedure setEVPOL(thebits : TBits_2); inline;
  7420. procedure setEVPOL0(thebits : TBits_1); inline;
  7421. procedure setEVPOL1(thebits : TBits_1); inline;
  7422. procedure setON(thebits : TBits_1); inline;
  7423. procedure setw(thebits : TBits_32); inline;
  7424. public
  7425. procedure clearCCH0; inline;
  7426. procedure clearCCH1; inline;
  7427. procedure clearCOE; inline;
  7428. procedure clearCOUT; inline;
  7429. procedure clearCPOL; inline;
  7430. procedure clearCREF; inline;
  7431. procedure clearEVPOL0; inline;
  7432. procedure clearEVPOL1; inline;
  7433. procedure clearON; inline;
  7434. procedure setCCH0; inline;
  7435. procedure setCCH1; inline;
  7436. procedure setCOE; inline;
  7437. procedure setCOUT; inline;
  7438. procedure setCPOL; inline;
  7439. procedure setCREF; inline;
  7440. procedure setEVPOL0; inline;
  7441. procedure setEVPOL1; inline;
  7442. procedure setON; inline;
  7443. property CCH : TBits_2 read getCCH write setCCH;
  7444. property CCH0 : TBits_1 read getCCH0 write setCCH0;
  7445. property CCH1 : TBits_1 read getCCH1 write setCCH1;
  7446. property COE : TBits_1 read getCOE write setCOE;
  7447. property COUT : TBits_1 read getCOUT write setCOUT;
  7448. property CPOL : TBits_1 read getCPOL write setCPOL;
  7449. property CREF : TBits_1 read getCREF write setCREF;
  7450. property EVPOL : TBits_2 read getEVPOL write setEVPOL;
  7451. property EVPOL0 : TBits_1 read getEVPOL0 write setEVPOL0;
  7452. property EVPOL1 : TBits_1 read getEVPOL1 write setEVPOL1;
  7453. property ON : TBits_1 read getON write setON;
  7454. property w : TBits_32 read getw write setw;
  7455. end;
  7456. TCMP_CM2CON = record
  7457. private
  7458. function getCCH : TBits_2; inline;
  7459. function getCCH0 : TBits_1; inline;
  7460. function getCCH1 : TBits_1; inline;
  7461. function getCOE : TBits_1; inline;
  7462. function getCOUT : TBits_1; inline;
  7463. function getCPOL : TBits_1; inline;
  7464. function getCREF : TBits_1; inline;
  7465. function getEVPOL : TBits_2; inline;
  7466. function getEVPOL0 : TBits_1; inline;
  7467. function getEVPOL1 : TBits_1; inline;
  7468. function getON : TBits_1; inline;
  7469. function getw : TBits_32; inline;
  7470. procedure setCCH(thebits : TBits_2); inline;
  7471. procedure setCCH0(thebits : TBits_1); inline;
  7472. procedure setCCH1(thebits : TBits_1); inline;
  7473. procedure setCOE(thebits : TBits_1); inline;
  7474. procedure setCOUT(thebits : TBits_1); inline;
  7475. procedure setCPOL(thebits : TBits_1); inline;
  7476. procedure setCREF(thebits : TBits_1); inline;
  7477. procedure setEVPOL(thebits : TBits_2); inline;
  7478. procedure setEVPOL0(thebits : TBits_1); inline;
  7479. procedure setEVPOL1(thebits : TBits_1); inline;
  7480. procedure setON(thebits : TBits_1); inline;
  7481. procedure setw(thebits : TBits_32); inline;
  7482. public
  7483. procedure clearCCH0; inline;
  7484. procedure clearCCH1; inline;
  7485. procedure clearCOE; inline;
  7486. procedure clearCOUT; inline;
  7487. procedure clearCPOL; inline;
  7488. procedure clearCREF; inline;
  7489. procedure clearEVPOL0; inline;
  7490. procedure clearEVPOL1; inline;
  7491. procedure clearON; inline;
  7492. procedure setCCH0; inline;
  7493. procedure setCCH1; inline;
  7494. procedure setCOE; inline;
  7495. procedure setCOUT; inline;
  7496. procedure setCPOL; inline;
  7497. procedure setCREF; inline;
  7498. procedure setEVPOL0; inline;
  7499. procedure setEVPOL1; inline;
  7500. procedure setON; inline;
  7501. property CCH : TBits_2 read getCCH write setCCH;
  7502. property CCH0 : TBits_1 read getCCH0 write setCCH0;
  7503. property CCH1 : TBits_1 read getCCH1 write setCCH1;
  7504. property COE : TBits_1 read getCOE write setCOE;
  7505. property COUT : TBits_1 read getCOUT write setCOUT;
  7506. property CPOL : TBits_1 read getCPOL write setCPOL;
  7507. property CREF : TBits_1 read getCREF write setCREF;
  7508. property EVPOL : TBits_2 read getEVPOL write setEVPOL;
  7509. property EVPOL0 : TBits_1 read getEVPOL0 write setEVPOL0;
  7510. property EVPOL1 : TBits_1 read getEVPOL1 write setEVPOL1;
  7511. property ON : TBits_1 read getON write setON;
  7512. property w : TBits_32 read getw write setw;
  7513. end;
  7514. TCMP_CMSTAT = record
  7515. private
  7516. function getC1OUT : TBits_1; inline;
  7517. function getC2OUT : TBits_1; inline;
  7518. function getSIDL : TBits_1; inline;
  7519. function getw : TBits_32; inline;
  7520. procedure setC1OUT(thebits : TBits_1); inline;
  7521. procedure setC2OUT(thebits : TBits_1); inline;
  7522. procedure setSIDL(thebits : TBits_1); inline;
  7523. procedure setw(thebits : TBits_32); inline;
  7524. public
  7525. procedure clearC1OUT; inline;
  7526. procedure clearC2OUT; inline;
  7527. procedure clearSIDL; inline;
  7528. procedure setC1OUT; inline;
  7529. procedure setC2OUT; inline;
  7530. procedure setSIDL; inline;
  7531. property C1OUT : TBits_1 read getC1OUT write setC1OUT;
  7532. property C2OUT : TBits_1 read getC2OUT write setC2OUT;
  7533. property SIDL : TBits_1 read getSIDL write setSIDL;
  7534. property w : TBits_32 read getw write setw;
  7535. end;
  7536. type
  7537. TCMPRegisters = record
  7538. CM1CONbits : TCMP_CM1CON;
  7539. CM1CON : longWord;
  7540. CM1CONCLR : longWord;
  7541. CM1CONSET : longWord;
  7542. CM1CONINV : longWord;
  7543. CM2CONbits : TCMP_CM2CON;
  7544. CM2CON : longWord;
  7545. CM2CONCLR : longWord;
  7546. CM2CONSET : longWord;
  7547. CM2CONINV : longWord;
  7548. CMSTATbits : TCMP_CMSTAT;
  7549. CMSTAT : longWord;
  7550. CMSTATCLR : longWord;
  7551. CMSTATSET : longWord;
  7552. CMSTATINV : longWord;
  7553. end;
  7554. TOSC_OSCCON = record
  7555. private
  7556. function getCF : TBits_1; inline;
  7557. function getCLKLOCK : TBits_1; inline;
  7558. function getCOSC : TBits_3; inline;
  7559. function getCOSC0 : TBits_1; inline;
  7560. function getCOSC1 : TBits_1; inline;
  7561. function getCOSC2 : TBits_1; inline;
  7562. function getFRCDIV : TBits_3; inline;
  7563. function getFRCDIV0 : TBits_1; inline;
  7564. function getFRCDIV1 : TBits_1; inline;
  7565. function getFRCDIV2 : TBits_1; inline;
  7566. function getNOSC : TBits_3; inline;
  7567. function getNOSC0 : TBits_1; inline;
  7568. function getNOSC1 : TBits_1; inline;
  7569. function getNOSC2 : TBits_1; inline;
  7570. function getOSWEN : TBits_1; inline;
  7571. function getPBDIV : TBits_2; inline;
  7572. function getPBDIV0 : TBits_1; inline;
  7573. function getPBDIV1 : TBits_1; inline;
  7574. function getPLLMULT : TBits_3; inline;
  7575. function getPLLMULT0 : TBits_1; inline;
  7576. function getPLLMULT1 : TBits_1; inline;
  7577. function getPLLMULT2 : TBits_1; inline;
  7578. function getPLLODIV : TBits_3; inline;
  7579. function getPLLODIV0 : TBits_1; inline;
  7580. function getPLLODIV1 : TBits_1; inline;
  7581. function getPLLODIV2 : TBits_1; inline;
  7582. function getSLOCK : TBits_1; inline;
  7583. function getSLPEN : TBits_1; inline;
  7584. function getSOSCEN : TBits_1; inline;
  7585. function getSOSCRDY : TBits_1; inline;
  7586. function getUFRCEN : TBits_1; inline;
  7587. function getULOCK : TBits_1; inline;
  7588. function getw : TBits_32; inline;
  7589. procedure setCF(thebits : TBits_1); inline;
  7590. procedure setCLKLOCK(thebits : TBits_1); inline;
  7591. procedure setCOSC(thebits : TBits_3); inline;
  7592. procedure setCOSC0(thebits : TBits_1); inline;
  7593. procedure setCOSC1(thebits : TBits_1); inline;
  7594. procedure setCOSC2(thebits : TBits_1); inline;
  7595. procedure setFRCDIV(thebits : TBits_3); inline;
  7596. procedure setFRCDIV0(thebits : TBits_1); inline;
  7597. procedure setFRCDIV1(thebits : TBits_1); inline;
  7598. procedure setFRCDIV2(thebits : TBits_1); inline;
  7599. procedure setNOSC(thebits : TBits_3); inline;
  7600. procedure setNOSC0(thebits : TBits_1); inline;
  7601. procedure setNOSC1(thebits : TBits_1); inline;
  7602. procedure setNOSC2(thebits : TBits_1); inline;
  7603. procedure setOSWEN(thebits : TBits_1); inline;
  7604. procedure setPBDIV(thebits : TBits_2); inline;
  7605. procedure setPBDIV0(thebits : TBits_1); inline;
  7606. procedure setPBDIV1(thebits : TBits_1); inline;
  7607. procedure setPLLMULT(thebits : TBits_3); inline;
  7608. procedure setPLLMULT0(thebits : TBits_1); inline;
  7609. procedure setPLLMULT1(thebits : TBits_1); inline;
  7610. procedure setPLLMULT2(thebits : TBits_1); inline;
  7611. procedure setPLLODIV(thebits : TBits_3); inline;
  7612. procedure setPLLODIV0(thebits : TBits_1); inline;
  7613. procedure setPLLODIV1(thebits : TBits_1); inline;
  7614. procedure setPLLODIV2(thebits : TBits_1); inline;
  7615. procedure setSLOCK(thebits : TBits_1); inline;
  7616. procedure setSLPEN(thebits : TBits_1); inline;
  7617. procedure setSOSCEN(thebits : TBits_1); inline;
  7618. procedure setSOSCRDY(thebits : TBits_1); inline;
  7619. procedure setUFRCEN(thebits : TBits_1); inline;
  7620. procedure setULOCK(thebits : TBits_1); inline;
  7621. procedure setw(thebits : TBits_32); inline;
  7622. public
  7623. procedure clearCF; inline;
  7624. procedure clearCLKLOCK; inline;
  7625. procedure clearCOSC0; inline;
  7626. procedure clearCOSC1; inline;
  7627. procedure clearCOSC2; inline;
  7628. procedure clearFRCDIV0; inline;
  7629. procedure clearFRCDIV1; inline;
  7630. procedure clearFRCDIV2; inline;
  7631. procedure clearNOSC0; inline;
  7632. procedure clearNOSC1; inline;
  7633. procedure clearNOSC2; inline;
  7634. procedure clearOSWEN; inline;
  7635. procedure clearPBDIV0; inline;
  7636. procedure clearPBDIV1; inline;
  7637. procedure clearPLLMULT0; inline;
  7638. procedure clearPLLMULT1; inline;
  7639. procedure clearPLLMULT2; inline;
  7640. procedure clearPLLODIV0; inline;
  7641. procedure clearPLLODIV1; inline;
  7642. procedure clearPLLODIV2; inline;
  7643. procedure clearSLOCK; inline;
  7644. procedure clearSLPEN; inline;
  7645. procedure clearSOSCEN; inline;
  7646. procedure clearSOSCRDY; inline;
  7647. procedure clearUFRCEN; inline;
  7648. procedure clearULOCK; inline;
  7649. procedure setCF; inline;
  7650. procedure setCLKLOCK; inline;
  7651. procedure setCOSC0; inline;
  7652. procedure setCOSC1; inline;
  7653. procedure setCOSC2; inline;
  7654. procedure setFRCDIV0; inline;
  7655. procedure setFRCDIV1; inline;
  7656. procedure setFRCDIV2; inline;
  7657. procedure setNOSC0; inline;
  7658. procedure setNOSC1; inline;
  7659. procedure setNOSC2; inline;
  7660. procedure setOSWEN; inline;
  7661. procedure setPBDIV0; inline;
  7662. procedure setPBDIV1; inline;
  7663. procedure setPLLMULT0; inline;
  7664. procedure setPLLMULT1; inline;
  7665. procedure setPLLMULT2; inline;
  7666. procedure setPLLODIV0; inline;
  7667. procedure setPLLODIV1; inline;
  7668. procedure setPLLODIV2; inline;
  7669. procedure setSLOCK; inline;
  7670. procedure setSLPEN; inline;
  7671. procedure setSOSCEN; inline;
  7672. procedure setSOSCRDY; inline;
  7673. procedure setUFRCEN; inline;
  7674. procedure setULOCK; inline;
  7675. property CF : TBits_1 read getCF write setCF;
  7676. property CLKLOCK : TBits_1 read getCLKLOCK write setCLKLOCK;
  7677. property COSC : TBits_3 read getCOSC write setCOSC;
  7678. property COSC0 : TBits_1 read getCOSC0 write setCOSC0;
  7679. property COSC1 : TBits_1 read getCOSC1 write setCOSC1;
  7680. property COSC2 : TBits_1 read getCOSC2 write setCOSC2;
  7681. property FRCDIV : TBits_3 read getFRCDIV write setFRCDIV;
  7682. property FRCDIV0 : TBits_1 read getFRCDIV0 write setFRCDIV0;
  7683. property FRCDIV1 : TBits_1 read getFRCDIV1 write setFRCDIV1;
  7684. property FRCDIV2 : TBits_1 read getFRCDIV2 write setFRCDIV2;
  7685. property NOSC : TBits_3 read getNOSC write setNOSC;
  7686. property NOSC0 : TBits_1 read getNOSC0 write setNOSC0;
  7687. property NOSC1 : TBits_1 read getNOSC1 write setNOSC1;
  7688. property NOSC2 : TBits_1 read getNOSC2 write setNOSC2;
  7689. property OSWEN : TBits_1 read getOSWEN write setOSWEN;
  7690. property PBDIV : TBits_2 read getPBDIV write setPBDIV;
  7691. property PBDIV0 : TBits_1 read getPBDIV0 write setPBDIV0;
  7692. property PBDIV1 : TBits_1 read getPBDIV1 write setPBDIV1;
  7693. property PLLMULT : TBits_3 read getPLLMULT write setPLLMULT;
  7694. property PLLMULT0 : TBits_1 read getPLLMULT0 write setPLLMULT0;
  7695. property PLLMULT1 : TBits_1 read getPLLMULT1 write setPLLMULT1;
  7696. property PLLMULT2 : TBits_1 read getPLLMULT2 write setPLLMULT2;
  7697. property PLLODIV : TBits_3 read getPLLODIV write setPLLODIV;
  7698. property PLLODIV0 : TBits_1 read getPLLODIV0 write setPLLODIV0;
  7699. property PLLODIV1 : TBits_1 read getPLLODIV1 write setPLLODIV1;
  7700. property PLLODIV2 : TBits_1 read getPLLODIV2 write setPLLODIV2;
  7701. property SLOCK : TBits_1 read getSLOCK write setSLOCK;
  7702. property SLPEN : TBits_1 read getSLPEN write setSLPEN;
  7703. property SOSCEN : TBits_1 read getSOSCEN write setSOSCEN;
  7704. property SOSCRDY : TBits_1 read getSOSCRDY write setSOSCRDY;
  7705. property UFRCEN : TBits_1 read getUFRCEN write setUFRCEN;
  7706. property ULOCK : TBits_1 read getULOCK write setULOCK;
  7707. property w : TBits_32 read getw write setw;
  7708. end;
  7709. TOSC_OSCTUN = record
  7710. private
  7711. function getTUN : TBits_6; inline;
  7712. function getTUN0 : TBits_1; inline;
  7713. function getTUN1 : TBits_1; inline;
  7714. function getTUN2 : TBits_1; inline;
  7715. function getTUN3 : TBits_1; inline;
  7716. function getTUN4 : TBits_1; inline;
  7717. function getTUN5 : TBits_1; inline;
  7718. function getw : TBits_32; inline;
  7719. procedure setTUN(thebits : TBits_6); inline;
  7720. procedure setTUN0(thebits : TBits_1); inline;
  7721. procedure setTUN1(thebits : TBits_1); inline;
  7722. procedure setTUN2(thebits : TBits_1); inline;
  7723. procedure setTUN3(thebits : TBits_1); inline;
  7724. procedure setTUN4(thebits : TBits_1); inline;
  7725. procedure setTUN5(thebits : TBits_1); inline;
  7726. procedure setw(thebits : TBits_32); inline;
  7727. public
  7728. procedure clearTUN0; inline;
  7729. procedure clearTUN1; inline;
  7730. procedure clearTUN2; inline;
  7731. procedure clearTUN3; inline;
  7732. procedure clearTUN4; inline;
  7733. procedure clearTUN5; inline;
  7734. procedure setTUN0; inline;
  7735. procedure setTUN1; inline;
  7736. procedure setTUN2; inline;
  7737. procedure setTUN3; inline;
  7738. procedure setTUN4; inline;
  7739. procedure setTUN5; inline;
  7740. property TUN : TBits_6 read getTUN write setTUN;
  7741. property TUN0 : TBits_1 read getTUN0 write setTUN0;
  7742. property TUN1 : TBits_1 read getTUN1 write setTUN1;
  7743. property TUN2 : TBits_1 read getTUN2 write setTUN2;
  7744. property TUN3 : TBits_1 read getTUN3 write setTUN3;
  7745. property TUN4 : TBits_1 read getTUN4 write setTUN4;
  7746. property TUN5 : TBits_1 read getTUN5 write setTUN5;
  7747. property w : TBits_32 read getw write setw;
  7748. end;
  7749. type
  7750. TOSCRegisters = record
  7751. OSCCONbits : TOSC_OSCCON;
  7752. OSCCON : longWord;
  7753. OSCCONCLR : longWord;
  7754. OSCCONSET : longWord;
  7755. OSCCONINV : longWord;
  7756. OSCTUNbits : TOSC_OSCTUN;
  7757. OSCTUN : longWord;
  7758. OSCTUNCLR : longWord;
  7759. OSCTUNSET : longWord;
  7760. OSCTUNINV : longWord;
  7761. end;
  7762. type
  7763. TCFGRegisters = record
  7764. DDPCON : longWord;
  7765. DEVID : longWord;
  7766. SYSKEY : longWord;
  7767. SYSKEYCLR : longWord;
  7768. SYSKEYSET : longWord;
  7769. SYSKEYINV : longWord;
  7770. end;
  7771. TNVM_NVMCON = record
  7772. private
  7773. function getLVDERR : TBits_1; inline;
  7774. function getLVDSTAT : TBits_1; inline;
  7775. function getNVMOP : TBits_4; inline;
  7776. function getNVMOP0 : TBits_1; inline;
  7777. function getNVMOP1 : TBits_1; inline;
  7778. function getNVMOP2 : TBits_1; inline;
  7779. function getNVMOP3 : TBits_1; inline;
  7780. function getPROGOP : TBits_4; inline;
  7781. function getPROGOP0 : TBits_1; inline;
  7782. function getPROGOP1 : TBits_1; inline;
  7783. function getPROGOP2 : TBits_1; inline;
  7784. function getPROGOP3 : TBits_1; inline;
  7785. function getWR : TBits_1; inline;
  7786. function getWREN : TBits_1; inline;
  7787. function getWRERR : TBits_1; inline;
  7788. function getw : TBits_32; inline;
  7789. procedure setLVDERR(thebits : TBits_1); inline;
  7790. procedure setLVDSTAT(thebits : TBits_1); inline;
  7791. procedure setNVMOP(thebits : TBits_4); inline;
  7792. procedure setNVMOP0(thebits : TBits_1); inline;
  7793. procedure setNVMOP1(thebits : TBits_1); inline;
  7794. procedure setNVMOP2(thebits : TBits_1); inline;
  7795. procedure setNVMOP3(thebits : TBits_1); inline;
  7796. procedure setPROGOP(thebits : TBits_4); inline;
  7797. procedure setPROGOP0(thebits : TBits_1); inline;
  7798. procedure setPROGOP1(thebits : TBits_1); inline;
  7799. procedure setPROGOP2(thebits : TBits_1); inline;
  7800. procedure setPROGOP3(thebits : TBits_1); inline;
  7801. procedure setWR(thebits : TBits_1); inline;
  7802. procedure setWREN(thebits : TBits_1); inline;
  7803. procedure setWRERR(thebits : TBits_1); inline;
  7804. procedure setw(thebits : TBits_32); inline;
  7805. public
  7806. procedure clearLVDERR; inline;
  7807. procedure clearLVDSTAT; inline;
  7808. procedure clearNVMOP0; inline;
  7809. procedure clearNVMOP1; inline;
  7810. procedure clearNVMOP2; inline;
  7811. procedure clearNVMOP3; inline;
  7812. procedure clearPROGOP0; inline;
  7813. procedure clearPROGOP1; inline;
  7814. procedure clearPROGOP2; inline;
  7815. procedure clearPROGOP3; inline;
  7816. procedure clearWR; inline;
  7817. procedure clearWREN; inline;
  7818. procedure clearWRERR; inline;
  7819. procedure setLVDERR; inline;
  7820. procedure setLVDSTAT; inline;
  7821. procedure setNVMOP0; inline;
  7822. procedure setNVMOP1; inline;
  7823. procedure setNVMOP2; inline;
  7824. procedure setNVMOP3; inline;
  7825. procedure setPROGOP0; inline;
  7826. procedure setPROGOP1; inline;
  7827. procedure setPROGOP2; inline;
  7828. procedure setPROGOP3; inline;
  7829. procedure setWR; inline;
  7830. procedure setWREN; inline;
  7831. procedure setWRERR; inline;
  7832. property LVDERR : TBits_1 read getLVDERR write setLVDERR;
  7833. property LVDSTAT : TBits_1 read getLVDSTAT write setLVDSTAT;
  7834. property NVMOP : TBits_4 read getNVMOP write setNVMOP;
  7835. property NVMOP0 : TBits_1 read getNVMOP0 write setNVMOP0;
  7836. property NVMOP1 : TBits_1 read getNVMOP1 write setNVMOP1;
  7837. property NVMOP2 : TBits_1 read getNVMOP2 write setNVMOP2;
  7838. property NVMOP3 : TBits_1 read getNVMOP3 write setNVMOP3;
  7839. property PROGOP : TBits_4 read getPROGOP write setPROGOP;
  7840. property PROGOP0 : TBits_1 read getPROGOP0 write setPROGOP0;
  7841. property PROGOP1 : TBits_1 read getPROGOP1 write setPROGOP1;
  7842. property PROGOP2 : TBits_1 read getPROGOP2 write setPROGOP2;
  7843. property PROGOP3 : TBits_1 read getPROGOP3 write setPROGOP3;
  7844. property WR : TBits_1 read getWR write setWR;
  7845. property WREN : TBits_1 read getWREN write setWREN;
  7846. property WRERR : TBits_1 read getWRERR write setWRERR;
  7847. property w : TBits_32 read getw write setw;
  7848. end;
  7849. type
  7850. TNVMRegisters = record
  7851. NVMCONbits : TNVM_NVMCON;
  7852. NVMCON : longWord;
  7853. NVMCONCLR : longWord;
  7854. NVMCONSET : longWord;
  7855. NVMCONINV : longWord;
  7856. NVMKEY : longWord;
  7857. NVMADDR : longWord;
  7858. NVMADDRCLR : longWord;
  7859. NVMADDRSET : longWord;
  7860. NVMADDRINV : longWord;
  7861. NVMDATA : longWord;
  7862. NVMSRCADDR : longWord;
  7863. end;
  7864. TRCON_RCON = record
  7865. private
  7866. function getBOR : TBits_1; inline;
  7867. function getCMR : TBits_1; inline;
  7868. function getEXTR : TBits_1; inline;
  7869. function getIDLE : TBits_1; inline;
  7870. function getPOR : TBits_1; inline;
  7871. function getSLEEP : TBits_1; inline;
  7872. function getSWR : TBits_1; inline;
  7873. function getVREGS : TBits_1; inline;
  7874. function getWDTO : TBits_1; inline;
  7875. function getw : TBits_32; inline;
  7876. procedure setBOR(thebits : TBits_1); inline;
  7877. procedure setCMR(thebits : TBits_1); inline;
  7878. procedure setEXTR(thebits : TBits_1); inline;
  7879. procedure setIDLE(thebits : TBits_1); inline;
  7880. procedure setPOR(thebits : TBits_1); inline;
  7881. procedure setSLEEP(thebits : TBits_1); inline;
  7882. procedure setSWR(thebits : TBits_1); inline;
  7883. procedure setVREGS(thebits : TBits_1); inline;
  7884. procedure setWDTO(thebits : TBits_1); inline;
  7885. procedure setw(thebits : TBits_32); inline;
  7886. public
  7887. procedure clearBOR; inline;
  7888. procedure clearCMR; inline;
  7889. procedure clearEXTR; inline;
  7890. procedure clearIDLE; inline;
  7891. procedure clearPOR; inline;
  7892. procedure clearSLEEP; inline;
  7893. procedure clearSWR; inline;
  7894. procedure clearVREGS; inline;
  7895. procedure clearWDTO; inline;
  7896. procedure setBOR; inline;
  7897. procedure setCMR; inline;
  7898. procedure setEXTR; inline;
  7899. procedure setIDLE; inline;
  7900. procedure setPOR; inline;
  7901. procedure setSLEEP; inline;
  7902. procedure setSWR; inline;
  7903. procedure setVREGS; inline;
  7904. procedure setWDTO; inline;
  7905. property BOR : TBits_1 read getBOR write setBOR;
  7906. property CMR : TBits_1 read getCMR write setCMR;
  7907. property EXTR : TBits_1 read getEXTR write setEXTR;
  7908. property IDLE : TBits_1 read getIDLE write setIDLE;
  7909. property POR : TBits_1 read getPOR write setPOR;
  7910. property SLEEP : TBits_1 read getSLEEP write setSLEEP;
  7911. property SWR : TBits_1 read getSWR write setSWR;
  7912. property VREGS : TBits_1 read getVREGS write setVREGS;
  7913. property WDTO : TBits_1 read getWDTO write setWDTO;
  7914. property w : TBits_32 read getw write setw;
  7915. end;
  7916. TRCON_RSWRST = record
  7917. private
  7918. function getSWRST : TBits_1; inline;
  7919. function getw : TBits_32; inline;
  7920. procedure setSWRST(thebits : TBits_1); inline;
  7921. procedure setw(thebits : TBits_32); inline;
  7922. public
  7923. procedure clearSWRST; inline;
  7924. procedure setSWRST; inline;
  7925. property SWRST : TBits_1 read getSWRST write setSWRST;
  7926. property w : TBits_32 read getw write setw;
  7927. end;
  7928. type
  7929. TRCONRegisters = record
  7930. RCONbits : TRCON_RCON;
  7931. RCON : longWord;
  7932. RCONCLR : longWord;
  7933. RCONSET : longWord;
  7934. RCONINV : longWord;
  7935. RSWRSTbits : TRCON_RSWRST;
  7936. RSWRST : longWord;
  7937. RSWRSTCLR : longWord;
  7938. RSWRSTSET : longWord;
  7939. RSWRSTINV : longWord;
  7940. end;
  7941. type
  7942. T_DDPSTATRegisters = record
  7943. _DDPSTAT : longWord;
  7944. end;
  7945. type
  7946. T_STRORegisters = record
  7947. _STRO : longWord;
  7948. _STROCLR : longWord;
  7949. _STROSET : longWord;
  7950. _STROINV : longWord;
  7951. end;
  7952. type
  7953. T_APPORegisters = record
  7954. _APPO : longWord;
  7955. _APPOCLR : longWord;
  7956. _APPOSET : longWord;
  7957. _APPOINV : longWord;
  7958. end;
  7959. type
  7960. T_APPIRegisters = record
  7961. _APPI : longWord;
  7962. end;
  7963. TINT_INTCON = record
  7964. private
  7965. function getFRZ : TBits_1; inline;
  7966. function getINT0EP : TBits_1; inline;
  7967. function getINT1EP : TBits_1; inline;
  7968. function getINT2EP : TBits_1; inline;
  7969. function getINT3EP : TBits_1; inline;
  7970. function getINT4EP : TBits_1; inline;
  7971. function getMVEC : TBits_1; inline;
  7972. function getSS0 : TBits_1; inline;
  7973. function getTPC : TBits_3; inline;
  7974. function getw : TBits_32; inline;
  7975. procedure setFRZ(thebits : TBits_1); inline;
  7976. procedure setINT0EP(thebits : TBits_1); inline;
  7977. procedure setINT1EP(thebits : TBits_1); inline;
  7978. procedure setINT2EP(thebits : TBits_1); inline;
  7979. procedure setINT3EP(thebits : TBits_1); inline;
  7980. procedure setINT4EP(thebits : TBits_1); inline;
  7981. procedure setMVEC(thebits : TBits_1); inline;
  7982. procedure setSS0(thebits : TBits_1); inline;
  7983. procedure setTPC(thebits : TBits_3); inline;
  7984. procedure setw(thebits : TBits_32); inline;
  7985. public
  7986. procedure clearFRZ; inline;
  7987. procedure clearINT0EP; inline;
  7988. procedure clearINT1EP; inline;
  7989. procedure clearINT2EP; inline;
  7990. procedure clearINT3EP; inline;
  7991. procedure clearINT4EP; inline;
  7992. procedure clearMVEC; inline;
  7993. procedure clearSS0; inline;
  7994. procedure setFRZ; inline;
  7995. procedure setINT0EP; inline;
  7996. procedure setINT1EP; inline;
  7997. procedure setINT2EP; inline;
  7998. procedure setINT3EP; inline;
  7999. procedure setINT4EP; inline;
  8000. procedure setMVEC; inline;
  8001. procedure setSS0; inline;
  8002. property FRZ : TBits_1 read getFRZ write setFRZ;
  8003. property INT0EP : TBits_1 read getINT0EP write setINT0EP;
  8004. property INT1EP : TBits_1 read getINT1EP write setINT1EP;
  8005. property INT2EP : TBits_1 read getINT2EP write setINT2EP;
  8006. property INT3EP : TBits_1 read getINT3EP write setINT3EP;
  8007. property INT4EP : TBits_1 read getINT4EP write setINT4EP;
  8008. property MVEC : TBits_1 read getMVEC write setMVEC;
  8009. property SS0 : TBits_1 read getSS0 write setSS0;
  8010. property TPC : TBits_3 read getTPC write setTPC;
  8011. property w : TBits_32 read getw write setw;
  8012. end;
  8013. TINT_IFS0 = record
  8014. private
  8015. function getCS0IF : TBits_1; inline;
  8016. function getCS1IF : TBits_1; inline;
  8017. function getCTIF : TBits_1; inline;
  8018. function getI2C1ABIF : TBits_1; inline;
  8019. function getI2C1AMIF : TBits_1; inline;
  8020. function getI2C1ASIF : TBits_1; inline;
  8021. function getI2C1BIF : TBits_1; inline;
  8022. function getI2C1MIF : TBits_1; inline;
  8023. function getI2C1SIF : TBits_1; inline;
  8024. function getI2C3BIF : TBits_1; inline;
  8025. function getI2C3MIF : TBits_1; inline;
  8026. function getI2C3SIF : TBits_1; inline;
  8027. function getIC1IF : TBits_1; inline;
  8028. function getIC2IF : TBits_1; inline;
  8029. function getIC3IF : TBits_1; inline;
  8030. function getIC4IF : TBits_1; inline;
  8031. function getIC5IF : TBits_1; inline;
  8032. function getINT0IF : TBits_1; inline;
  8033. function getINT1IF : TBits_1; inline;
  8034. function getINT2IF : TBits_1; inline;
  8035. function getINT3IF : TBits_1; inline;
  8036. function getINT4IF : TBits_1; inline;
  8037. function getOC1IF : TBits_1; inline;
  8038. function getOC2IF : TBits_1; inline;
  8039. function getOC3IF : TBits_1; inline;
  8040. function getOC4IF : TBits_1; inline;
  8041. function getOC5IF : TBits_1; inline;
  8042. function getSPI1AEIF : TBits_1; inline;
  8043. function getSPI1ARXIF : TBits_1; inline;
  8044. function getSPI1ATXIF : TBits_1; inline;
  8045. function getSPI3EIF : TBits_1; inline;
  8046. function getSPI3RXIF : TBits_1; inline;
  8047. function getSPI3TXIF : TBits_1; inline;
  8048. function getT1IF : TBits_1; inline;
  8049. function getT2IF : TBits_1; inline;
  8050. function getT3IF : TBits_1; inline;
  8051. function getT4IF : TBits_1; inline;
  8052. function getT5IF : TBits_1; inline;
  8053. function getU1AEIF : TBits_1; inline;
  8054. function getU1ARXIF : TBits_1; inline;
  8055. function getU1ATXIF : TBits_1; inline;
  8056. function getU1EIF : TBits_1; inline;
  8057. function getU1RXIF : TBits_1; inline;
  8058. function getU1TXIF : TBits_1; inline;
  8059. function getw : TBits_32; inline;
  8060. procedure setCS0IF(thebits : TBits_1); inline;
  8061. procedure setCS1IF(thebits : TBits_1); inline;
  8062. procedure setCTIF(thebits : TBits_1); inline;
  8063. procedure setI2C1ABIF(thebits : TBits_1); inline;
  8064. procedure setI2C1AMIF(thebits : TBits_1); inline;
  8065. procedure setI2C1ASIF(thebits : TBits_1); inline;
  8066. procedure setI2C1BIF(thebits : TBits_1); inline;
  8067. procedure setI2C1MIF(thebits : TBits_1); inline;
  8068. procedure setI2C1SIF(thebits : TBits_1); inline;
  8069. procedure setI2C3BIF(thebits : TBits_1); inline;
  8070. procedure setI2C3MIF(thebits : TBits_1); inline;
  8071. procedure setI2C3SIF(thebits : TBits_1); inline;
  8072. procedure setIC1IF(thebits : TBits_1); inline;
  8073. procedure setIC2IF(thebits : TBits_1); inline;
  8074. procedure setIC3IF(thebits : TBits_1); inline;
  8075. procedure setIC4IF(thebits : TBits_1); inline;
  8076. procedure setIC5IF(thebits : TBits_1); inline;
  8077. procedure setINT0IF(thebits : TBits_1); inline;
  8078. procedure setINT1IF(thebits : TBits_1); inline;
  8079. procedure setINT2IF(thebits : TBits_1); inline;
  8080. procedure setINT3IF(thebits : TBits_1); inline;
  8081. procedure setINT4IF(thebits : TBits_1); inline;
  8082. procedure setOC1IF(thebits : TBits_1); inline;
  8083. procedure setOC2IF(thebits : TBits_1); inline;
  8084. procedure setOC3IF(thebits : TBits_1); inline;
  8085. procedure setOC4IF(thebits : TBits_1); inline;
  8086. procedure setOC5IF(thebits : TBits_1); inline;
  8087. procedure setSPI1AEIF(thebits : TBits_1); inline;
  8088. procedure setSPI1ARXIF(thebits : TBits_1); inline;
  8089. procedure setSPI1ATXIF(thebits : TBits_1); inline;
  8090. procedure setSPI3EIF(thebits : TBits_1); inline;
  8091. procedure setSPI3RXIF(thebits : TBits_1); inline;
  8092. procedure setSPI3TXIF(thebits : TBits_1); inline;
  8093. procedure setT1IF(thebits : TBits_1); inline;
  8094. procedure setT2IF(thebits : TBits_1); inline;
  8095. procedure setT3IF(thebits : TBits_1); inline;
  8096. procedure setT4IF(thebits : TBits_1); inline;
  8097. procedure setT5IF(thebits : TBits_1); inline;
  8098. procedure setU1AEIF(thebits : TBits_1); inline;
  8099. procedure setU1ARXIF(thebits : TBits_1); inline;
  8100. procedure setU1ATXIF(thebits : TBits_1); inline;
  8101. procedure setU1EIF(thebits : TBits_1); inline;
  8102. procedure setU1RXIF(thebits : TBits_1); inline;
  8103. procedure setU1TXIF(thebits : TBits_1); inline;
  8104. procedure setw(thebits : TBits_32); inline;
  8105. public
  8106. procedure clearCS0IF; inline;
  8107. procedure clearCS1IF; inline;
  8108. procedure clearCTIF; inline;
  8109. procedure clearI2C1ABIF; inline;
  8110. procedure clearI2C1AMIF; inline;
  8111. procedure clearI2C1ASIF; inline;
  8112. procedure clearI2C1BIF; inline;
  8113. procedure clearI2C1MIF; inline;
  8114. procedure clearI2C1SIF; inline;
  8115. procedure clearI2C3BIF; inline;
  8116. procedure clearI2C3MIF; inline;
  8117. procedure clearI2C3SIF; inline;
  8118. procedure clearIC1IF; inline;
  8119. procedure clearIC2IF; inline;
  8120. procedure clearIC3IF; inline;
  8121. procedure clearIC4IF; inline;
  8122. procedure clearIC5IF; inline;
  8123. procedure clearINT0IF; inline;
  8124. procedure clearINT1IF; inline;
  8125. procedure clearINT2IF; inline;
  8126. procedure clearINT3IF; inline;
  8127. procedure clearINT4IF; inline;
  8128. procedure clearOC1IF; inline;
  8129. procedure clearOC2IF; inline;
  8130. procedure clearOC3IF; inline;
  8131. procedure clearOC4IF; inline;
  8132. procedure clearOC5IF; inline;
  8133. procedure clearSPI1AEIF; inline;
  8134. procedure clearSPI1ARXIF; inline;
  8135. procedure clearSPI1ATXIF; inline;
  8136. procedure clearSPI3EIF; inline;
  8137. procedure clearSPI3RXIF; inline;
  8138. procedure clearSPI3TXIF; inline;
  8139. procedure clearT1IF; inline;
  8140. procedure clearT2IF; inline;
  8141. procedure clearT3IF; inline;
  8142. procedure clearT4IF; inline;
  8143. procedure clearT5IF; inline;
  8144. procedure clearU1AEIF; inline;
  8145. procedure clearU1ARXIF; inline;
  8146. procedure clearU1ATXIF; inline;
  8147. procedure clearU1EIF; inline;
  8148. procedure clearU1RXIF; inline;
  8149. procedure clearU1TXIF; inline;
  8150. procedure setCS0IF; inline;
  8151. procedure setCS1IF; inline;
  8152. procedure setCTIF; inline;
  8153. procedure setI2C1ABIF; inline;
  8154. procedure setI2C1AMIF; inline;
  8155. procedure setI2C1ASIF; inline;
  8156. procedure setI2C1BIF; inline;
  8157. procedure setI2C1MIF; inline;
  8158. procedure setI2C1SIF; inline;
  8159. procedure setI2C3BIF; inline;
  8160. procedure setI2C3MIF; inline;
  8161. procedure setI2C3SIF; inline;
  8162. procedure setIC1IF; inline;
  8163. procedure setIC2IF; inline;
  8164. procedure setIC3IF; inline;
  8165. procedure setIC4IF; inline;
  8166. procedure setIC5IF; inline;
  8167. procedure setINT0IF; inline;
  8168. procedure setINT1IF; inline;
  8169. procedure setINT2IF; inline;
  8170. procedure setINT3IF; inline;
  8171. procedure setINT4IF; inline;
  8172. procedure setOC1IF; inline;
  8173. procedure setOC2IF; inline;
  8174. procedure setOC3IF; inline;
  8175. procedure setOC4IF; inline;
  8176. procedure setOC5IF; inline;
  8177. procedure setSPI1AEIF; inline;
  8178. procedure setSPI1ARXIF; inline;
  8179. procedure setSPI1ATXIF; inline;
  8180. procedure setSPI3EIF; inline;
  8181. procedure setSPI3RXIF; inline;
  8182. procedure setSPI3TXIF; inline;
  8183. procedure setT1IF; inline;
  8184. procedure setT2IF; inline;
  8185. procedure setT3IF; inline;
  8186. procedure setT4IF; inline;
  8187. procedure setT5IF; inline;
  8188. procedure setU1AEIF; inline;
  8189. procedure setU1ARXIF; inline;
  8190. procedure setU1ATXIF; inline;
  8191. procedure setU1EIF; inline;
  8192. procedure setU1RXIF; inline;
  8193. procedure setU1TXIF; inline;
  8194. property CS0IF : TBits_1 read getCS0IF write setCS0IF;
  8195. property CS1IF : TBits_1 read getCS1IF write setCS1IF;
  8196. property CTIF : TBits_1 read getCTIF write setCTIF;
  8197. property I2C1ABIF : TBits_1 read getI2C1ABIF write setI2C1ABIF;
  8198. property I2C1AMIF : TBits_1 read getI2C1AMIF write setI2C1AMIF;
  8199. property I2C1ASIF : TBits_1 read getI2C1ASIF write setI2C1ASIF;
  8200. property I2C1BIF : TBits_1 read getI2C1BIF write setI2C1BIF;
  8201. property I2C1MIF : TBits_1 read getI2C1MIF write setI2C1MIF;
  8202. property I2C1SIF : TBits_1 read getI2C1SIF write setI2C1SIF;
  8203. property I2C3BIF : TBits_1 read getI2C3BIF write setI2C3BIF;
  8204. property I2C3MIF : TBits_1 read getI2C3MIF write setI2C3MIF;
  8205. property I2C3SIF : TBits_1 read getI2C3SIF write setI2C3SIF;
  8206. property IC1IF : TBits_1 read getIC1IF write setIC1IF;
  8207. property IC2IF : TBits_1 read getIC2IF write setIC2IF;
  8208. property IC3IF : TBits_1 read getIC3IF write setIC3IF;
  8209. property IC4IF : TBits_1 read getIC4IF write setIC4IF;
  8210. property IC5IF : TBits_1 read getIC5IF write setIC5IF;
  8211. property INT0IF : TBits_1 read getINT0IF write setINT0IF;
  8212. property INT1IF : TBits_1 read getINT1IF write setINT1IF;
  8213. property INT2IF : TBits_1 read getINT2IF write setINT2IF;
  8214. property INT3IF : TBits_1 read getINT3IF write setINT3IF;
  8215. property INT4IF : TBits_1 read getINT4IF write setINT4IF;
  8216. property OC1IF : TBits_1 read getOC1IF write setOC1IF;
  8217. property OC2IF : TBits_1 read getOC2IF write setOC2IF;
  8218. property OC3IF : TBits_1 read getOC3IF write setOC3IF;
  8219. property OC4IF : TBits_1 read getOC4IF write setOC4IF;
  8220. property OC5IF : TBits_1 read getOC5IF write setOC5IF;
  8221. property SPI1AEIF : TBits_1 read getSPI1AEIF write setSPI1AEIF;
  8222. property SPI1ARXIF : TBits_1 read getSPI1ARXIF write setSPI1ARXIF;
  8223. property SPI1ATXIF : TBits_1 read getSPI1ATXIF write setSPI1ATXIF;
  8224. property SPI3EIF : TBits_1 read getSPI3EIF write setSPI3EIF;
  8225. property SPI3RXIF : TBits_1 read getSPI3RXIF write setSPI3RXIF;
  8226. property SPI3TXIF : TBits_1 read getSPI3TXIF write setSPI3TXIF;
  8227. property T1IF : TBits_1 read getT1IF write setT1IF;
  8228. property T2IF : TBits_1 read getT2IF write setT2IF;
  8229. property T3IF : TBits_1 read getT3IF write setT3IF;
  8230. property T4IF : TBits_1 read getT4IF write setT4IF;
  8231. property T5IF : TBits_1 read getT5IF write setT5IF;
  8232. property U1AEIF : TBits_1 read getU1AEIF write setU1AEIF;
  8233. property U1ARXIF : TBits_1 read getU1ARXIF write setU1ARXIF;
  8234. property U1ATXIF : TBits_1 read getU1ATXIF write setU1ATXIF;
  8235. property U1EIF : TBits_1 read getU1EIF write setU1EIF;
  8236. property U1RXIF : TBits_1 read getU1RXIF write setU1RXIF;
  8237. property U1TXIF : TBits_1 read getU1TXIF write setU1TXIF;
  8238. property w : TBits_32 read getw write setw;
  8239. end;
  8240. TINT_IFS1 = record
  8241. private
  8242. function getAD1IF : TBits_1; inline;
  8243. function getCAN1IF : TBits_1; inline;
  8244. function getCMP1IF : TBits_1; inline;
  8245. function getCMP2IF : TBits_1; inline;
  8246. function getCNIF : TBits_1; inline;
  8247. function getDMA0IF : TBits_1; inline;
  8248. function getDMA1IF : TBits_1; inline;
  8249. function getDMA2IF : TBits_1; inline;
  8250. function getDMA3IF : TBits_1; inline;
  8251. function getDMA4IF : TBits_1; inline;
  8252. function getDMA5IF : TBits_1; inline;
  8253. function getDMA6IF : TBits_1; inline;
  8254. function getDMA7IF : TBits_1; inline;
  8255. function getFCEIF : TBits_1; inline;
  8256. function getFSCMIF : TBits_1; inline;
  8257. function getI2C2ABIF : TBits_1; inline;
  8258. function getI2C2AMIF : TBits_1; inline;
  8259. function getI2C2ASIF : TBits_1; inline;
  8260. function getI2C3ABIF : TBits_1; inline;
  8261. function getI2C3AMIF : TBits_1; inline;
  8262. function getI2C3ASIF : TBits_1; inline;
  8263. function getI2C4BIF : TBits_1; inline;
  8264. function getI2C4MIF : TBits_1; inline;
  8265. function getI2C4SIF : TBits_1; inline;
  8266. function getI2C5BIF : TBits_1; inline;
  8267. function getI2C5MIF : TBits_1; inline;
  8268. function getI2C5SIF : TBits_1; inline;
  8269. function getIC1EIF : TBits_1; inline;
  8270. function getIC2EIF : TBits_1; inline;
  8271. function getIC3EIF : TBits_1; inline;
  8272. function getPMPIF : TBits_1; inline;
  8273. function getRTCCIF : TBits_1; inline;
  8274. function getSPI2AEIF : TBits_1; inline;
  8275. function getSPI2ARXIF : TBits_1; inline;
  8276. function getSPI2ATXIF : TBits_1; inline;
  8277. function getSPI2EIF : TBits_1; inline;
  8278. function getSPI2RXIF : TBits_1; inline;
  8279. function getSPI2TXIF : TBits_1; inline;
  8280. function getSPI3AEIF : TBits_1; inline;
  8281. function getSPI3ARXIF : TBits_1; inline;
  8282. function getSPI3ATXIF : TBits_1; inline;
  8283. function getSPI4EIF : TBits_1; inline;
  8284. function getSPI4RXIF : TBits_1; inline;
  8285. function getSPI4TXIF : TBits_1; inline;
  8286. function getU2AEIF : TBits_1; inline;
  8287. function getU2ARXIF : TBits_1; inline;
  8288. function getU2ATXIF : TBits_1; inline;
  8289. function getU2EIF : TBits_1; inline;
  8290. function getU2RXIF : TBits_1; inline;
  8291. function getU2TXIF : TBits_1; inline;
  8292. function getU3AEIF : TBits_1; inline;
  8293. function getU3ARXIF : TBits_1; inline;
  8294. function getU3ATXIF : TBits_1; inline;
  8295. function getU3EIF : TBits_1; inline;
  8296. function getU3RXIF : TBits_1; inline;
  8297. function getU3TXIF : TBits_1; inline;
  8298. function getUSBIF : TBits_1; inline;
  8299. function getw : TBits_32; inline;
  8300. procedure setAD1IF(thebits : TBits_1); inline;
  8301. procedure setCAN1IF(thebits : TBits_1); inline;
  8302. procedure setCMP1IF(thebits : TBits_1); inline;
  8303. procedure setCMP2IF(thebits : TBits_1); inline;
  8304. procedure setCNIF(thebits : TBits_1); inline;
  8305. procedure setDMA0IF(thebits : TBits_1); inline;
  8306. procedure setDMA1IF(thebits : TBits_1); inline;
  8307. procedure setDMA2IF(thebits : TBits_1); inline;
  8308. procedure setDMA3IF(thebits : TBits_1); inline;
  8309. procedure setDMA4IF(thebits : TBits_1); inline;
  8310. procedure setDMA5IF(thebits : TBits_1); inline;
  8311. procedure setDMA6IF(thebits : TBits_1); inline;
  8312. procedure setDMA7IF(thebits : TBits_1); inline;
  8313. procedure setFCEIF(thebits : TBits_1); inline;
  8314. procedure setFSCMIF(thebits : TBits_1); inline;
  8315. procedure setI2C2ABIF(thebits : TBits_1); inline;
  8316. procedure setI2C2AMIF(thebits : TBits_1); inline;
  8317. procedure setI2C2ASIF(thebits : TBits_1); inline;
  8318. procedure setI2C3ABIF(thebits : TBits_1); inline;
  8319. procedure setI2C3AMIF(thebits : TBits_1); inline;
  8320. procedure setI2C3ASIF(thebits : TBits_1); inline;
  8321. procedure setI2C4BIF(thebits : TBits_1); inline;
  8322. procedure setI2C4MIF(thebits : TBits_1); inline;
  8323. procedure setI2C4SIF(thebits : TBits_1); inline;
  8324. procedure setI2C5BIF(thebits : TBits_1); inline;
  8325. procedure setI2C5MIF(thebits : TBits_1); inline;
  8326. procedure setI2C5SIF(thebits : TBits_1); inline;
  8327. procedure setIC1EIF(thebits : TBits_1); inline;
  8328. procedure setIC2EIF(thebits : TBits_1); inline;
  8329. procedure setIC3EIF(thebits : TBits_1); inline;
  8330. procedure setPMPIF(thebits : TBits_1); inline;
  8331. procedure setRTCCIF(thebits : TBits_1); inline;
  8332. procedure setSPI2AEIF(thebits : TBits_1); inline;
  8333. procedure setSPI2ARXIF(thebits : TBits_1); inline;
  8334. procedure setSPI2ATXIF(thebits : TBits_1); inline;
  8335. procedure setSPI2EIF(thebits : TBits_1); inline;
  8336. procedure setSPI2RXIF(thebits : TBits_1); inline;
  8337. procedure setSPI2TXIF(thebits : TBits_1); inline;
  8338. procedure setSPI3AEIF(thebits : TBits_1); inline;
  8339. procedure setSPI3ARXIF(thebits : TBits_1); inline;
  8340. procedure setSPI3ATXIF(thebits : TBits_1); inline;
  8341. procedure setSPI4EIF(thebits : TBits_1); inline;
  8342. procedure setSPI4RXIF(thebits : TBits_1); inline;
  8343. procedure setSPI4TXIF(thebits : TBits_1); inline;
  8344. procedure setU2AEIF(thebits : TBits_1); inline;
  8345. procedure setU2ARXIF(thebits : TBits_1); inline;
  8346. procedure setU2ATXIF(thebits : TBits_1); inline;
  8347. procedure setU2EIF(thebits : TBits_1); inline;
  8348. procedure setU2RXIF(thebits : TBits_1); inline;
  8349. procedure setU2TXIF(thebits : TBits_1); inline;
  8350. procedure setU3AEIF(thebits : TBits_1); inline;
  8351. procedure setU3ARXIF(thebits : TBits_1); inline;
  8352. procedure setU3ATXIF(thebits : TBits_1); inline;
  8353. procedure setU3EIF(thebits : TBits_1); inline;
  8354. procedure setU3RXIF(thebits : TBits_1); inline;
  8355. procedure setU3TXIF(thebits : TBits_1); inline;
  8356. procedure setUSBIF(thebits : TBits_1); inline;
  8357. procedure setw(thebits : TBits_32); inline;
  8358. public
  8359. procedure clearAD1IF; inline;
  8360. procedure clearCAN1IF; inline;
  8361. procedure clearCMP1IF; inline;
  8362. procedure clearCMP2IF; inline;
  8363. procedure clearCNIF; inline;
  8364. procedure clearDMA0IF; inline;
  8365. procedure clearDMA1IF; inline;
  8366. procedure clearDMA2IF; inline;
  8367. procedure clearDMA3IF; inline;
  8368. procedure clearDMA4IF; inline;
  8369. procedure clearDMA5IF; inline;
  8370. procedure clearDMA6IF; inline;
  8371. procedure clearDMA7IF; inline;
  8372. procedure clearFCEIF; inline;
  8373. procedure clearFSCMIF; inline;
  8374. procedure clearI2C2ABIF; inline;
  8375. procedure clearI2C2AMIF; inline;
  8376. procedure clearI2C2ASIF; inline;
  8377. procedure clearI2C3ABIF; inline;
  8378. procedure clearI2C3AMIF; inline;
  8379. procedure clearI2C3ASIF; inline;
  8380. procedure clearI2C4BIF; inline;
  8381. procedure clearI2C4MIF; inline;
  8382. procedure clearI2C4SIF; inline;
  8383. procedure clearI2C5BIF; inline;
  8384. procedure clearI2C5MIF; inline;
  8385. procedure clearI2C5SIF; inline;
  8386. procedure clearIC1EIF; inline;
  8387. procedure clearIC2EIF; inline;
  8388. procedure clearIC3EIF; inline;
  8389. procedure clearPMPIF; inline;
  8390. procedure clearRTCCIF; inline;
  8391. procedure clearSPI2AEIF; inline;
  8392. procedure clearSPI2ARXIF; inline;
  8393. procedure clearSPI2ATXIF; inline;
  8394. procedure clearSPI2EIF; inline;
  8395. procedure clearSPI2RXIF; inline;
  8396. procedure clearSPI2TXIF; inline;
  8397. procedure clearSPI3AEIF; inline;
  8398. procedure clearSPI3ARXIF; inline;
  8399. procedure clearSPI3ATXIF; inline;
  8400. procedure clearSPI4EIF; inline;
  8401. procedure clearSPI4RXIF; inline;
  8402. procedure clearSPI4TXIF; inline;
  8403. procedure clearU2AEIF; inline;
  8404. procedure clearU2ARXIF; inline;
  8405. procedure clearU2ATXIF; inline;
  8406. procedure clearU2EIF; inline;
  8407. procedure clearU2RXIF; inline;
  8408. procedure clearU2TXIF; inline;
  8409. procedure clearU3AEIF; inline;
  8410. procedure clearU3ARXIF; inline;
  8411. procedure clearU3ATXIF; inline;
  8412. procedure clearU3EIF; inline;
  8413. procedure clearU3RXIF; inline;
  8414. procedure clearU3TXIF; inline;
  8415. procedure clearUSBIF; inline;
  8416. procedure setAD1IF; inline;
  8417. procedure setCAN1IF; inline;
  8418. procedure setCMP1IF; inline;
  8419. procedure setCMP2IF; inline;
  8420. procedure setCNIF; inline;
  8421. procedure setDMA0IF; inline;
  8422. procedure setDMA1IF; inline;
  8423. procedure setDMA2IF; inline;
  8424. procedure setDMA3IF; inline;
  8425. procedure setDMA4IF; inline;
  8426. procedure setDMA5IF; inline;
  8427. procedure setDMA6IF; inline;
  8428. procedure setDMA7IF; inline;
  8429. procedure setFCEIF; inline;
  8430. procedure setFSCMIF; inline;
  8431. procedure setI2C2ABIF; inline;
  8432. procedure setI2C2AMIF; inline;
  8433. procedure setI2C2ASIF; inline;
  8434. procedure setI2C3ABIF; inline;
  8435. procedure setI2C3AMIF; inline;
  8436. procedure setI2C3ASIF; inline;
  8437. procedure setI2C4BIF; inline;
  8438. procedure setI2C4MIF; inline;
  8439. procedure setI2C4SIF; inline;
  8440. procedure setI2C5BIF; inline;
  8441. procedure setI2C5MIF; inline;
  8442. procedure setI2C5SIF; inline;
  8443. procedure setIC1EIF; inline;
  8444. procedure setIC2EIF; inline;
  8445. procedure setIC3EIF; inline;
  8446. procedure setPMPIF; inline;
  8447. procedure setRTCCIF; inline;
  8448. procedure setSPI2AEIF; inline;
  8449. procedure setSPI2ARXIF; inline;
  8450. procedure setSPI2ATXIF; inline;
  8451. procedure setSPI2EIF; inline;
  8452. procedure setSPI2RXIF; inline;
  8453. procedure setSPI2TXIF; inline;
  8454. procedure setSPI3AEIF; inline;
  8455. procedure setSPI3ARXIF; inline;
  8456. procedure setSPI3ATXIF; inline;
  8457. procedure setSPI4EIF; inline;
  8458. procedure setSPI4RXIF; inline;
  8459. procedure setSPI4TXIF; inline;
  8460. procedure setU2AEIF; inline;
  8461. procedure setU2ARXIF; inline;
  8462. procedure setU2ATXIF; inline;
  8463. procedure setU2EIF; inline;
  8464. procedure setU2RXIF; inline;
  8465. procedure setU2TXIF; inline;
  8466. procedure setU3AEIF; inline;
  8467. procedure setU3ARXIF; inline;
  8468. procedure setU3ATXIF; inline;
  8469. procedure setU3EIF; inline;
  8470. procedure setU3RXIF; inline;
  8471. procedure setU3TXIF; inline;
  8472. procedure setUSBIF; inline;
  8473. property AD1IF : TBits_1 read getAD1IF write setAD1IF;
  8474. property CAN1IF : TBits_1 read getCAN1IF write setCAN1IF;
  8475. property CMP1IF : TBits_1 read getCMP1IF write setCMP1IF;
  8476. property CMP2IF : TBits_1 read getCMP2IF write setCMP2IF;
  8477. property CNIF : TBits_1 read getCNIF write setCNIF;
  8478. property DMA0IF : TBits_1 read getDMA0IF write setDMA0IF;
  8479. property DMA1IF : TBits_1 read getDMA1IF write setDMA1IF;
  8480. property DMA2IF : TBits_1 read getDMA2IF write setDMA2IF;
  8481. property DMA3IF : TBits_1 read getDMA3IF write setDMA3IF;
  8482. property DMA4IF : TBits_1 read getDMA4IF write setDMA4IF;
  8483. property DMA5IF : TBits_1 read getDMA5IF write setDMA5IF;
  8484. property DMA6IF : TBits_1 read getDMA6IF write setDMA6IF;
  8485. property DMA7IF : TBits_1 read getDMA7IF write setDMA7IF;
  8486. property FCEIF : TBits_1 read getFCEIF write setFCEIF;
  8487. property FSCMIF : TBits_1 read getFSCMIF write setFSCMIF;
  8488. property I2C2ABIF : TBits_1 read getI2C2ABIF write setI2C2ABIF;
  8489. property I2C2AMIF : TBits_1 read getI2C2AMIF write setI2C2AMIF;
  8490. property I2C2ASIF : TBits_1 read getI2C2ASIF write setI2C2ASIF;
  8491. property I2C3ABIF : TBits_1 read getI2C3ABIF write setI2C3ABIF;
  8492. property I2C3AMIF : TBits_1 read getI2C3AMIF write setI2C3AMIF;
  8493. property I2C3ASIF : TBits_1 read getI2C3ASIF write setI2C3ASIF;
  8494. property I2C4BIF : TBits_1 read getI2C4BIF write setI2C4BIF;
  8495. property I2C4MIF : TBits_1 read getI2C4MIF write setI2C4MIF;
  8496. property I2C4SIF : TBits_1 read getI2C4SIF write setI2C4SIF;
  8497. property I2C5BIF : TBits_1 read getI2C5BIF write setI2C5BIF;
  8498. property I2C5MIF : TBits_1 read getI2C5MIF write setI2C5MIF;
  8499. property I2C5SIF : TBits_1 read getI2C5SIF write setI2C5SIF;
  8500. property IC1EIF : TBits_1 read getIC1EIF write setIC1EIF;
  8501. property IC2EIF : TBits_1 read getIC2EIF write setIC2EIF;
  8502. property IC3EIF : TBits_1 read getIC3EIF write setIC3EIF;
  8503. property PMPIF : TBits_1 read getPMPIF write setPMPIF;
  8504. property RTCCIF : TBits_1 read getRTCCIF write setRTCCIF;
  8505. property SPI2AEIF : TBits_1 read getSPI2AEIF write setSPI2AEIF;
  8506. property SPI2ARXIF : TBits_1 read getSPI2ARXIF write setSPI2ARXIF;
  8507. property SPI2ATXIF : TBits_1 read getSPI2ATXIF write setSPI2ATXIF;
  8508. property SPI2EIF : TBits_1 read getSPI2EIF write setSPI2EIF;
  8509. property SPI2RXIF : TBits_1 read getSPI2RXIF write setSPI2RXIF;
  8510. property SPI2TXIF : TBits_1 read getSPI2TXIF write setSPI2TXIF;
  8511. property SPI3AEIF : TBits_1 read getSPI3AEIF write setSPI3AEIF;
  8512. property SPI3ARXIF : TBits_1 read getSPI3ARXIF write setSPI3ARXIF;
  8513. property SPI3ATXIF : TBits_1 read getSPI3ATXIF write setSPI3ATXIF;
  8514. property SPI4EIF : TBits_1 read getSPI4EIF write setSPI4EIF;
  8515. property SPI4RXIF : TBits_1 read getSPI4RXIF write setSPI4RXIF;
  8516. property SPI4TXIF : TBits_1 read getSPI4TXIF write setSPI4TXIF;
  8517. property U2AEIF : TBits_1 read getU2AEIF write setU2AEIF;
  8518. property U2ARXIF : TBits_1 read getU2ARXIF write setU2ARXIF;
  8519. property U2ATXIF : TBits_1 read getU2ATXIF write setU2ATXIF;
  8520. property U2EIF : TBits_1 read getU2EIF write setU2EIF;
  8521. property U2RXIF : TBits_1 read getU2RXIF write setU2RXIF;
  8522. property U2TXIF : TBits_1 read getU2TXIF write setU2TXIF;
  8523. property U3AEIF : TBits_1 read getU3AEIF write setU3AEIF;
  8524. property U3ARXIF : TBits_1 read getU3ARXIF write setU3ARXIF;
  8525. property U3ATXIF : TBits_1 read getU3ATXIF write setU3ATXIF;
  8526. property U3EIF : TBits_1 read getU3EIF write setU3EIF;
  8527. property U3RXIF : TBits_1 read getU3RXIF write setU3RXIF;
  8528. property U3TXIF : TBits_1 read getU3TXIF write setU3TXIF;
  8529. property USBIF : TBits_1 read getUSBIF write setUSBIF;
  8530. property w : TBits_32 read getw write setw;
  8531. end;
  8532. TINT_IFS2 = record
  8533. private
  8534. function getIC4EIF : TBits_1; inline;
  8535. function getIC5EIF : TBits_1; inline;
  8536. function getPMPEIF : TBits_1; inline;
  8537. function getU1BEIF : TBits_1; inline;
  8538. function getU1BRXIF : TBits_1; inline;
  8539. function getU1BTXIF : TBits_1; inline;
  8540. function getU2BEIF : TBits_1; inline;
  8541. function getU2BRXIF : TBits_1; inline;
  8542. function getU2BTXIF : TBits_1; inline;
  8543. function getU3BEIF : TBits_1; inline;
  8544. function getU3BRXIF : TBits_1; inline;
  8545. function getU3BTXIF : TBits_1; inline;
  8546. function getU4EIF : TBits_1; inline;
  8547. function getU4RXIF : TBits_1; inline;
  8548. function getU4TXIF : TBits_1; inline;
  8549. function getU5EIF : TBits_1; inline;
  8550. function getU5RXIF : TBits_1; inline;
  8551. function getU5TXIF : TBits_1; inline;
  8552. function getU6EIF : TBits_1; inline;
  8553. function getU6RXIF : TBits_1; inline;
  8554. function getU6TXIF : TBits_1; inline;
  8555. function getw : TBits_32; inline;
  8556. procedure setIC4EIF(thebits : TBits_1); inline;
  8557. procedure setIC5EIF(thebits : TBits_1); inline;
  8558. procedure setPMPEIF(thebits : TBits_1); inline;
  8559. procedure setU1BEIF(thebits : TBits_1); inline;
  8560. procedure setU1BRXIF(thebits : TBits_1); inline;
  8561. procedure setU1BTXIF(thebits : TBits_1); inline;
  8562. procedure setU2BEIF(thebits : TBits_1); inline;
  8563. procedure setU2BRXIF(thebits : TBits_1); inline;
  8564. procedure setU2BTXIF(thebits : TBits_1); inline;
  8565. procedure setU3BEIF(thebits : TBits_1); inline;
  8566. procedure setU3BRXIF(thebits : TBits_1); inline;
  8567. procedure setU3BTXIF(thebits : TBits_1); inline;
  8568. procedure setU4EIF(thebits : TBits_1); inline;
  8569. procedure setU4RXIF(thebits : TBits_1); inline;
  8570. procedure setU4TXIF(thebits : TBits_1); inline;
  8571. procedure setU5EIF(thebits : TBits_1); inline;
  8572. procedure setU5RXIF(thebits : TBits_1); inline;
  8573. procedure setU5TXIF(thebits : TBits_1); inline;
  8574. procedure setU6EIF(thebits : TBits_1); inline;
  8575. procedure setU6RXIF(thebits : TBits_1); inline;
  8576. procedure setU6TXIF(thebits : TBits_1); inline;
  8577. procedure setw(thebits : TBits_32); inline;
  8578. public
  8579. procedure clearIC4EIF; inline;
  8580. procedure clearIC5EIF; inline;
  8581. procedure clearPMPEIF; inline;
  8582. procedure clearU1BEIF; inline;
  8583. procedure clearU1BRXIF; inline;
  8584. procedure clearU1BTXIF; inline;
  8585. procedure clearU2BEIF; inline;
  8586. procedure clearU2BRXIF; inline;
  8587. procedure clearU2BTXIF; inline;
  8588. procedure clearU3BEIF; inline;
  8589. procedure clearU3BRXIF; inline;
  8590. procedure clearU3BTXIF; inline;
  8591. procedure clearU4EIF; inline;
  8592. procedure clearU4RXIF; inline;
  8593. procedure clearU4TXIF; inline;
  8594. procedure clearU5EIF; inline;
  8595. procedure clearU5RXIF; inline;
  8596. procedure clearU5TXIF; inline;
  8597. procedure clearU6EIF; inline;
  8598. procedure clearU6RXIF; inline;
  8599. procedure clearU6TXIF; inline;
  8600. procedure setIC4EIF; inline;
  8601. procedure setIC5EIF; inline;
  8602. procedure setPMPEIF; inline;
  8603. procedure setU1BEIF; inline;
  8604. procedure setU1BRXIF; inline;
  8605. procedure setU1BTXIF; inline;
  8606. procedure setU2BEIF; inline;
  8607. procedure setU2BRXIF; inline;
  8608. procedure setU2BTXIF; inline;
  8609. procedure setU3BEIF; inline;
  8610. procedure setU3BRXIF; inline;
  8611. procedure setU3BTXIF; inline;
  8612. procedure setU4EIF; inline;
  8613. procedure setU4RXIF; inline;
  8614. procedure setU4TXIF; inline;
  8615. procedure setU5EIF; inline;
  8616. procedure setU5RXIF; inline;
  8617. procedure setU5TXIF; inline;
  8618. procedure setU6EIF; inline;
  8619. procedure setU6RXIF; inline;
  8620. procedure setU6TXIF; inline;
  8621. property IC4EIF : TBits_1 read getIC4EIF write setIC4EIF;
  8622. property IC5EIF : TBits_1 read getIC5EIF write setIC5EIF;
  8623. property PMPEIF : TBits_1 read getPMPEIF write setPMPEIF;
  8624. property U1BEIF : TBits_1 read getU1BEIF write setU1BEIF;
  8625. property U1BRXIF : TBits_1 read getU1BRXIF write setU1BRXIF;
  8626. property U1BTXIF : TBits_1 read getU1BTXIF write setU1BTXIF;
  8627. property U2BEIF : TBits_1 read getU2BEIF write setU2BEIF;
  8628. property U2BRXIF : TBits_1 read getU2BRXIF write setU2BRXIF;
  8629. property U2BTXIF : TBits_1 read getU2BTXIF write setU2BTXIF;
  8630. property U3BEIF : TBits_1 read getU3BEIF write setU3BEIF;
  8631. property U3BRXIF : TBits_1 read getU3BRXIF write setU3BRXIF;
  8632. property U3BTXIF : TBits_1 read getU3BTXIF write setU3BTXIF;
  8633. property U4EIF : TBits_1 read getU4EIF write setU4EIF;
  8634. property U4RXIF : TBits_1 read getU4RXIF write setU4RXIF;
  8635. property U4TXIF : TBits_1 read getU4TXIF write setU4TXIF;
  8636. property U5EIF : TBits_1 read getU5EIF write setU5EIF;
  8637. property U5RXIF : TBits_1 read getU5RXIF write setU5RXIF;
  8638. property U5TXIF : TBits_1 read getU5TXIF write setU5TXIF;
  8639. property U6EIF : TBits_1 read getU6EIF write setU6EIF;
  8640. property U6RXIF : TBits_1 read getU6RXIF write setU6RXIF;
  8641. property U6TXIF : TBits_1 read getU6TXIF write setU6TXIF;
  8642. property w : TBits_32 read getw write setw;
  8643. end;
  8644. TINT_IEC0 = record
  8645. private
  8646. function getCS0IE : TBits_1; inline;
  8647. function getCS1IE : TBits_1; inline;
  8648. function getCTIE : TBits_1; inline;
  8649. function getI2C1ABIE : TBits_1; inline;
  8650. function getI2C1AMIE : TBits_1; inline;
  8651. function getI2C1ASIE : TBits_1; inline;
  8652. function getI2C1BIE : TBits_1; inline;
  8653. function getI2C1MIE : TBits_1; inline;
  8654. function getI2C1SIE : TBits_1; inline;
  8655. function getI2C3BIE : TBits_1; inline;
  8656. function getI2C3MIE : TBits_1; inline;
  8657. function getI2C3SIE : TBits_1; inline;
  8658. function getIC1IE : TBits_1; inline;
  8659. function getIC2IE : TBits_1; inline;
  8660. function getIC3IE : TBits_1; inline;
  8661. function getIC4IE : TBits_1; inline;
  8662. function getIC5IE : TBits_1; inline;
  8663. function getINT0IE : TBits_1; inline;
  8664. function getINT1IE : TBits_1; inline;
  8665. function getINT2IE : TBits_1; inline;
  8666. function getINT3IE : TBits_1; inline;
  8667. function getINT4IE : TBits_1; inline;
  8668. function getOC1IE : TBits_1; inline;
  8669. function getOC2IE : TBits_1; inline;
  8670. function getOC3IE : TBits_1; inline;
  8671. function getOC4IE : TBits_1; inline;
  8672. function getOC5IE : TBits_1; inline;
  8673. function getSPI1AEIE : TBits_1; inline;
  8674. function getSPI1ARXIE : TBits_1; inline;
  8675. function getSPI1ATXIE : TBits_1; inline;
  8676. function getSPI3EIE : TBits_1; inline;
  8677. function getSPI3RXIE : TBits_1; inline;
  8678. function getSPI3TXIE : TBits_1; inline;
  8679. function getT1IE : TBits_1; inline;
  8680. function getT2IE : TBits_1; inline;
  8681. function getT3IE : TBits_1; inline;
  8682. function getT4IE : TBits_1; inline;
  8683. function getT5IE : TBits_1; inline;
  8684. function getU1AEIE : TBits_1; inline;
  8685. function getU1ARXIE : TBits_1; inline;
  8686. function getU1ATXIE : TBits_1; inline;
  8687. function getU1EIE : TBits_1; inline;
  8688. function getU1RXIE : TBits_1; inline;
  8689. function getU1TXIE : TBits_1; inline;
  8690. function getw : TBits_32; inline;
  8691. procedure setCS0IE(thebits : TBits_1); inline;
  8692. procedure setCS1IE(thebits : TBits_1); inline;
  8693. procedure setCTIE(thebits : TBits_1); inline;
  8694. procedure setI2C1ABIE(thebits : TBits_1); inline;
  8695. procedure setI2C1AMIE(thebits : TBits_1); inline;
  8696. procedure setI2C1ASIE(thebits : TBits_1); inline;
  8697. procedure setI2C1BIE(thebits : TBits_1); inline;
  8698. procedure setI2C1MIE(thebits : TBits_1); inline;
  8699. procedure setI2C1SIE(thebits : TBits_1); inline;
  8700. procedure setI2C3BIE(thebits : TBits_1); inline;
  8701. procedure setI2C3MIE(thebits : TBits_1); inline;
  8702. procedure setI2C3SIE(thebits : TBits_1); inline;
  8703. procedure setIC1IE(thebits : TBits_1); inline;
  8704. procedure setIC2IE(thebits : TBits_1); inline;
  8705. procedure setIC3IE(thebits : TBits_1); inline;
  8706. procedure setIC4IE(thebits : TBits_1); inline;
  8707. procedure setIC5IE(thebits : TBits_1); inline;
  8708. procedure setINT0IE(thebits : TBits_1); inline;
  8709. procedure setINT1IE(thebits : TBits_1); inline;
  8710. procedure setINT2IE(thebits : TBits_1); inline;
  8711. procedure setINT3IE(thebits : TBits_1); inline;
  8712. procedure setINT4IE(thebits : TBits_1); inline;
  8713. procedure setOC1IE(thebits : TBits_1); inline;
  8714. procedure setOC2IE(thebits : TBits_1); inline;
  8715. procedure setOC3IE(thebits : TBits_1); inline;
  8716. procedure setOC4IE(thebits : TBits_1); inline;
  8717. procedure setOC5IE(thebits : TBits_1); inline;
  8718. procedure setSPI1AEIE(thebits : TBits_1); inline;
  8719. procedure setSPI1ARXIE(thebits : TBits_1); inline;
  8720. procedure setSPI1ATXIE(thebits : TBits_1); inline;
  8721. procedure setSPI3EIE(thebits : TBits_1); inline;
  8722. procedure setSPI3RXIE(thebits : TBits_1); inline;
  8723. procedure setSPI3TXIE(thebits : TBits_1); inline;
  8724. procedure setT1IE(thebits : TBits_1); inline;
  8725. procedure setT2IE(thebits : TBits_1); inline;
  8726. procedure setT3IE(thebits : TBits_1); inline;
  8727. procedure setT4IE(thebits : TBits_1); inline;
  8728. procedure setT5IE(thebits : TBits_1); inline;
  8729. procedure setU1AEIE(thebits : TBits_1); inline;
  8730. procedure setU1ARXIE(thebits : TBits_1); inline;
  8731. procedure setU1ATXIE(thebits : TBits_1); inline;
  8732. procedure setU1EIE(thebits : TBits_1); inline;
  8733. procedure setU1RXIE(thebits : TBits_1); inline;
  8734. procedure setU1TXIE(thebits : TBits_1); inline;
  8735. procedure setw(thebits : TBits_32); inline;
  8736. public
  8737. procedure clearCS0IE; inline;
  8738. procedure clearCS1IE; inline;
  8739. procedure clearCTIE; inline;
  8740. procedure clearI2C1ABIE; inline;
  8741. procedure clearI2C1AMIE; inline;
  8742. procedure clearI2C1ASIE; inline;
  8743. procedure clearI2C1BIE; inline;
  8744. procedure clearI2C1MIE; inline;
  8745. procedure clearI2C1SIE; inline;
  8746. procedure clearI2C3BIE; inline;
  8747. procedure clearI2C3MIE; inline;
  8748. procedure clearI2C3SIE; inline;
  8749. procedure clearIC1IE; inline;
  8750. procedure clearIC2IE; inline;
  8751. procedure clearIC3IE; inline;
  8752. procedure clearIC4IE; inline;
  8753. procedure clearIC5IE; inline;
  8754. procedure clearINT0IE; inline;
  8755. procedure clearINT1IE; inline;
  8756. procedure clearINT2IE; inline;
  8757. procedure clearINT3IE; inline;
  8758. procedure clearINT4IE; inline;
  8759. procedure clearOC1IE; inline;
  8760. procedure clearOC2IE; inline;
  8761. procedure clearOC3IE; inline;
  8762. procedure clearOC4IE; inline;
  8763. procedure clearOC5IE; inline;
  8764. procedure clearSPI1AEIE; inline;
  8765. procedure clearSPI1ARXIE; inline;
  8766. procedure clearSPI1ATXIE; inline;
  8767. procedure clearSPI3EIE; inline;
  8768. procedure clearSPI3RXIE; inline;
  8769. procedure clearSPI3TXIE; inline;
  8770. procedure clearT1IE; inline;
  8771. procedure clearT2IE; inline;
  8772. procedure clearT3IE; inline;
  8773. procedure clearT4IE; inline;
  8774. procedure clearT5IE; inline;
  8775. procedure clearU1AEIE; inline;
  8776. procedure clearU1ARXIE; inline;
  8777. procedure clearU1ATXIE; inline;
  8778. procedure clearU1EIE; inline;
  8779. procedure clearU1RXIE; inline;
  8780. procedure clearU1TXIE; inline;
  8781. procedure setCS0IE; inline;
  8782. procedure setCS1IE; inline;
  8783. procedure setCTIE; inline;
  8784. procedure setI2C1ABIE; inline;
  8785. procedure setI2C1AMIE; inline;
  8786. procedure setI2C1ASIE; inline;
  8787. procedure setI2C1BIE; inline;
  8788. procedure setI2C1MIE; inline;
  8789. procedure setI2C1SIE; inline;
  8790. procedure setI2C3BIE; inline;
  8791. procedure setI2C3MIE; inline;
  8792. procedure setI2C3SIE; inline;
  8793. procedure setIC1IE; inline;
  8794. procedure setIC2IE; inline;
  8795. procedure setIC3IE; inline;
  8796. procedure setIC4IE; inline;
  8797. procedure setIC5IE; inline;
  8798. procedure setINT0IE; inline;
  8799. procedure setINT1IE; inline;
  8800. procedure setINT2IE; inline;
  8801. procedure setINT3IE; inline;
  8802. procedure setINT4IE; inline;
  8803. procedure setOC1IE; inline;
  8804. procedure setOC2IE; inline;
  8805. procedure setOC3IE; inline;
  8806. procedure setOC4IE; inline;
  8807. procedure setOC5IE; inline;
  8808. procedure setSPI1AEIE; inline;
  8809. procedure setSPI1ARXIE; inline;
  8810. procedure setSPI1ATXIE; inline;
  8811. procedure setSPI3EIE; inline;
  8812. procedure setSPI3RXIE; inline;
  8813. procedure setSPI3TXIE; inline;
  8814. procedure setT1IE; inline;
  8815. procedure setT2IE; inline;
  8816. procedure setT3IE; inline;
  8817. procedure setT4IE; inline;
  8818. procedure setT5IE; inline;
  8819. procedure setU1AEIE; inline;
  8820. procedure setU1ARXIE; inline;
  8821. procedure setU1ATXIE; inline;
  8822. procedure setU1EIE; inline;
  8823. procedure setU1RXIE; inline;
  8824. procedure setU1TXIE; inline;
  8825. property CS0IE : TBits_1 read getCS0IE write setCS0IE;
  8826. property CS1IE : TBits_1 read getCS1IE write setCS1IE;
  8827. property CTIE : TBits_1 read getCTIE write setCTIE;
  8828. property I2C1ABIE : TBits_1 read getI2C1ABIE write setI2C1ABIE;
  8829. property I2C1AMIE : TBits_1 read getI2C1AMIE write setI2C1AMIE;
  8830. property I2C1ASIE : TBits_1 read getI2C1ASIE write setI2C1ASIE;
  8831. property I2C1BIE : TBits_1 read getI2C1BIE write setI2C1BIE;
  8832. property I2C1MIE : TBits_1 read getI2C1MIE write setI2C1MIE;
  8833. property I2C1SIE : TBits_1 read getI2C1SIE write setI2C1SIE;
  8834. property I2C3BIE : TBits_1 read getI2C3BIE write setI2C3BIE;
  8835. property I2C3MIE : TBits_1 read getI2C3MIE write setI2C3MIE;
  8836. property I2C3SIE : TBits_1 read getI2C3SIE write setI2C3SIE;
  8837. property IC1IE : TBits_1 read getIC1IE write setIC1IE;
  8838. property IC2IE : TBits_1 read getIC2IE write setIC2IE;
  8839. property IC3IE : TBits_1 read getIC3IE write setIC3IE;
  8840. property IC4IE : TBits_1 read getIC4IE write setIC4IE;
  8841. property IC5IE : TBits_1 read getIC5IE write setIC5IE;
  8842. property INT0IE : TBits_1 read getINT0IE write setINT0IE;
  8843. property INT1IE : TBits_1 read getINT1IE write setINT1IE;
  8844. property INT2IE : TBits_1 read getINT2IE write setINT2IE;
  8845. property INT3IE : TBits_1 read getINT3IE write setINT3IE;
  8846. property INT4IE : TBits_1 read getINT4IE write setINT4IE;
  8847. property OC1IE : TBits_1 read getOC1IE write setOC1IE;
  8848. property OC2IE : TBits_1 read getOC2IE write setOC2IE;
  8849. property OC3IE : TBits_1 read getOC3IE write setOC3IE;
  8850. property OC4IE : TBits_1 read getOC4IE write setOC4IE;
  8851. property OC5IE : TBits_1 read getOC5IE write setOC5IE;
  8852. property SPI1AEIE : TBits_1 read getSPI1AEIE write setSPI1AEIE;
  8853. property SPI1ARXIE : TBits_1 read getSPI1ARXIE write setSPI1ARXIE;
  8854. property SPI1ATXIE : TBits_1 read getSPI1ATXIE write setSPI1ATXIE;
  8855. property SPI3EIE : TBits_1 read getSPI3EIE write setSPI3EIE;
  8856. property SPI3RXIE : TBits_1 read getSPI3RXIE write setSPI3RXIE;
  8857. property SPI3TXIE : TBits_1 read getSPI3TXIE write setSPI3TXIE;
  8858. property T1IE : TBits_1 read getT1IE write setT1IE;
  8859. property T2IE : TBits_1 read getT2IE write setT2IE;
  8860. property T3IE : TBits_1 read getT3IE write setT3IE;
  8861. property T4IE : TBits_1 read getT4IE write setT4IE;
  8862. property T5IE : TBits_1 read getT5IE write setT5IE;
  8863. property U1AEIE : TBits_1 read getU1AEIE write setU1AEIE;
  8864. property U1ARXIE : TBits_1 read getU1ARXIE write setU1ARXIE;
  8865. property U1ATXIE : TBits_1 read getU1ATXIE write setU1ATXIE;
  8866. property U1EIE : TBits_1 read getU1EIE write setU1EIE;
  8867. property U1RXIE : TBits_1 read getU1RXIE write setU1RXIE;
  8868. property U1TXIE : TBits_1 read getU1TXIE write setU1TXIE;
  8869. property w : TBits_32 read getw write setw;
  8870. end;
  8871. TINT_IEC1 = record
  8872. private
  8873. function getAD1IE : TBits_1; inline;
  8874. function getCAN1IE : TBits_1; inline;
  8875. function getCMP1IE : TBits_1; inline;
  8876. function getCMP2IE : TBits_1; inline;
  8877. function getCNIE : TBits_1; inline;
  8878. function getDMA0IE : TBits_1; inline;
  8879. function getDMA1IE : TBits_1; inline;
  8880. function getDMA2IE : TBits_1; inline;
  8881. function getDMA3IE : TBits_1; inline;
  8882. function getDMA4IE : TBits_1; inline;
  8883. function getDMA5IE : TBits_1; inline;
  8884. function getDMA6IE : TBits_1; inline;
  8885. function getDMA7IE : 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 setDMA4IE(thebits : TBits_1); inline;
  8941. procedure setDMA5IE(thebits : TBits_1); inline;
  8942. procedure setDMA6IE(thebits : TBits_1); inline;
  8943. procedure setDMA7IE(thebits : TBits_1); inline;
  8944. procedure setFCEIE(thebits : TBits_1); inline;
  8945. procedure setFSCMIE(thebits : TBits_1); inline;
  8946. procedure setI2C2ABIE(thebits : TBits_1); inline;
  8947. procedure setI2C2AMIE(thebits : TBits_1); inline;
  8948. procedure setI2C2ASIE(thebits : TBits_1); inline;
  8949. procedure setI2C3ABIE(thebits : TBits_1); inline;
  8950. procedure setI2C3AMIE(thebits : TBits_1); inline;
  8951. procedure setI2C3ASIE(thebits : TBits_1); inline;
  8952. procedure setI2C4BIE(thebits : TBits_1); inline;
  8953. procedure setI2C4MIE(thebits : TBits_1); inline;
  8954. procedure setI2C4SIE(thebits : TBits_1); inline;
  8955. procedure setI2C5BIE(thebits : TBits_1); inline;
  8956. procedure setI2C5MIE(thebits : TBits_1); inline;
  8957. procedure setI2C5SIE(thebits : TBits_1); inline;
  8958. procedure setIC1EIE(thebits : TBits_1); inline;
  8959. procedure setIC2EIE(thebits : TBits_1); inline;
  8960. procedure setIC3EIE(thebits : TBits_1); inline;
  8961. procedure setPMPIE(thebits : TBits_1); inline;
  8962. procedure setRTCCIE(thebits : TBits_1); inline;
  8963. procedure setSPI2AEIE(thebits : TBits_1); inline;
  8964. procedure setSPI2ARXIE(thebits : TBits_1); inline;
  8965. procedure setSPI2ATXIE(thebits : TBits_1); inline;
  8966. procedure setSPI2EIE(thebits : TBits_1); inline;
  8967. procedure setSPI2RXIE(thebits : TBits_1); inline;
  8968. procedure setSPI2TXIE(thebits : TBits_1); inline;
  8969. procedure setSPI3AEIE(thebits : TBits_1); inline;
  8970. procedure setSPI3ARXIE(thebits : TBits_1); inline;
  8971. procedure setSPI3ATXIE(thebits : TBits_1); inline;
  8972. procedure setSPI4EIE(thebits : TBits_1); inline;
  8973. procedure setSPI4RXIE(thebits : TBits_1); inline;
  8974. procedure setSPI4TXIE(thebits : TBits_1); inline;
  8975. procedure setU2AEIE(thebits : TBits_1); inline;
  8976. procedure setU2ARXIE(thebits : TBits_1); inline;
  8977. procedure setU2ATXIE(thebits : TBits_1); inline;
  8978. procedure setU2EIE(thebits : TBits_1); inline;
  8979. procedure setU2RXIE(thebits : TBits_1); inline;
  8980. procedure setU2TXIE(thebits : TBits_1); inline;
  8981. procedure setU3AEIE(thebits : TBits_1); inline;
  8982. procedure setU3ARXIE(thebits : TBits_1); inline;
  8983. procedure setU3ATXIE(thebits : TBits_1); inline;
  8984. procedure setU3EIE(thebits : TBits_1); inline;
  8985. procedure setU3RXIE(thebits : TBits_1); inline;
  8986. procedure setU3TXIE(thebits : TBits_1); inline;
  8987. procedure setUSBIE(thebits : TBits_1); inline;
  8988. procedure setw(thebits : TBits_32); inline;
  8989. public
  8990. procedure clearAD1IE; inline;
  8991. procedure clearCAN1IE; inline;
  8992. procedure clearCMP1IE; inline;
  8993. procedure clearCMP2IE; inline;
  8994. procedure clearCNIE; inline;
  8995. procedure clearDMA0IE; inline;
  8996. procedure clearDMA1IE; inline;
  8997. procedure clearDMA2IE; inline;
  8998. procedure clearDMA3IE; inline;
  8999. procedure clearDMA4IE; inline;
  9000. procedure clearDMA5IE; inline;
  9001. procedure clearDMA6IE; inline;
  9002. procedure clearDMA7IE; inline;
  9003. procedure clearFCEIE; inline;
  9004. procedure clearFSCMIE; inline;
  9005. procedure clearI2C2ABIE; inline;
  9006. procedure clearI2C2AMIE; inline;
  9007. procedure clearI2C2ASIE; inline;
  9008. procedure clearI2C3ABIE; inline;
  9009. procedure clearI2C3AMIE; inline;
  9010. procedure clearI2C3ASIE; inline;
  9011. procedure clearI2C4BIE; inline;
  9012. procedure clearI2C4MIE; inline;
  9013. procedure clearI2C4SIE; inline;
  9014. procedure clearI2C5BIE; inline;
  9015. procedure clearI2C5MIE; inline;
  9016. procedure clearI2C5SIE; inline;
  9017. procedure clearIC1EIE; inline;
  9018. procedure clearIC2EIE; inline;
  9019. procedure clearIC3EIE; inline;
  9020. procedure clearPMPIE; inline;
  9021. procedure clearRTCCIE; inline;
  9022. procedure clearSPI2AEIE; inline;
  9023. procedure clearSPI2ARXIE; inline;
  9024. procedure clearSPI2ATXIE; inline;
  9025. procedure clearSPI2EIE; inline;
  9026. procedure clearSPI2RXIE; inline;
  9027. procedure clearSPI2TXIE; inline;
  9028. procedure clearSPI3AEIE; inline;
  9029. procedure clearSPI3ARXIE; inline;
  9030. procedure clearSPI3ATXIE; inline;
  9031. procedure clearSPI4EIE; inline;
  9032. procedure clearSPI4RXIE; inline;
  9033. procedure clearSPI4TXIE; inline;
  9034. procedure clearU2AEIE; inline;
  9035. procedure clearU2ARXIE; inline;
  9036. procedure clearU2ATXIE; inline;
  9037. procedure clearU2EIE; inline;
  9038. procedure clearU2RXIE; inline;
  9039. procedure clearU2TXIE; inline;
  9040. procedure clearU3AEIE; inline;
  9041. procedure clearU3ARXIE; inline;
  9042. procedure clearU3ATXIE; inline;
  9043. procedure clearU3EIE; inline;
  9044. procedure clearU3RXIE; inline;
  9045. procedure clearU3TXIE; inline;
  9046. procedure clearUSBIE; inline;
  9047. procedure setAD1IE; inline;
  9048. procedure setCAN1IE; inline;
  9049. procedure setCMP1IE; inline;
  9050. procedure setCMP2IE; inline;
  9051. procedure setCNIE; inline;
  9052. procedure setDMA0IE; inline;
  9053. procedure setDMA1IE; inline;
  9054. procedure setDMA2IE; inline;
  9055. procedure setDMA3IE; inline;
  9056. procedure setDMA4IE; inline;
  9057. procedure setDMA5IE; inline;
  9058. procedure setDMA6IE; inline;
  9059. procedure setDMA7IE; inline;
  9060. procedure setFCEIE; inline;
  9061. procedure setFSCMIE; inline;
  9062. procedure setI2C2ABIE; inline;
  9063. procedure setI2C2AMIE; inline;
  9064. procedure setI2C2ASIE; inline;
  9065. procedure setI2C3ABIE; inline;
  9066. procedure setI2C3AMIE; inline;
  9067. procedure setI2C3ASIE; inline;
  9068. procedure setI2C4BIE; inline;
  9069. procedure setI2C4MIE; inline;
  9070. procedure setI2C4SIE; inline;
  9071. procedure setI2C5BIE; inline;
  9072. procedure setI2C5MIE; inline;
  9073. procedure setI2C5SIE; inline;
  9074. procedure setIC1EIE; inline;
  9075. procedure setIC2EIE; inline;
  9076. procedure setIC3EIE; inline;
  9077. procedure setPMPIE; inline;
  9078. procedure setRTCCIE; inline;
  9079. procedure setSPI2AEIE; inline;
  9080. procedure setSPI2ARXIE; inline;
  9081. procedure setSPI2ATXIE; inline;
  9082. procedure setSPI2EIE; inline;
  9083. procedure setSPI2RXIE; inline;
  9084. procedure setSPI2TXIE; inline;
  9085. procedure setSPI3AEIE; inline;
  9086. procedure setSPI3ARXIE; inline;
  9087. procedure setSPI3ATXIE; inline;
  9088. procedure setSPI4EIE; inline;
  9089. procedure setSPI4RXIE; inline;
  9090. procedure setSPI4TXIE; inline;
  9091. procedure setU2AEIE; inline;
  9092. procedure setU2ARXIE; inline;
  9093. procedure setU2ATXIE; inline;
  9094. procedure setU2EIE; inline;
  9095. procedure setU2RXIE; inline;
  9096. procedure setU2TXIE; inline;
  9097. procedure setU3AEIE; inline;
  9098. procedure setU3ARXIE; inline;
  9099. procedure setU3ATXIE; inline;
  9100. procedure setU3EIE; inline;
  9101. procedure setU3RXIE; inline;
  9102. procedure setU3TXIE; inline;
  9103. procedure setUSBIE; inline;
  9104. property AD1IE : TBits_1 read getAD1IE write setAD1IE;
  9105. property CAN1IE : TBits_1 read getCAN1IE write setCAN1IE;
  9106. property CMP1IE : TBits_1 read getCMP1IE write setCMP1IE;
  9107. property CMP2IE : TBits_1 read getCMP2IE write setCMP2IE;
  9108. property CNIE : TBits_1 read getCNIE write setCNIE;
  9109. property DMA0IE : TBits_1 read getDMA0IE write setDMA0IE;
  9110. property DMA1IE : TBits_1 read getDMA1IE write setDMA1IE;
  9111. property DMA2IE : TBits_1 read getDMA2IE write setDMA2IE;
  9112. property DMA3IE : TBits_1 read getDMA3IE write setDMA3IE;
  9113. property DMA4IE : TBits_1 read getDMA4IE write setDMA4IE;
  9114. property DMA5IE : TBits_1 read getDMA5IE write setDMA5IE;
  9115. property DMA6IE : TBits_1 read getDMA6IE write setDMA6IE;
  9116. property DMA7IE : TBits_1 read getDMA7IE write setDMA7IE;
  9117. property FCEIE : TBits_1 read getFCEIE write setFCEIE;
  9118. property FSCMIE : TBits_1 read getFSCMIE write setFSCMIE;
  9119. property I2C2ABIE : TBits_1 read getI2C2ABIE write setI2C2ABIE;
  9120. property I2C2AMIE : TBits_1 read getI2C2AMIE write setI2C2AMIE;
  9121. property I2C2ASIE : TBits_1 read getI2C2ASIE write setI2C2ASIE;
  9122. property I2C3ABIE : TBits_1 read getI2C3ABIE write setI2C3ABIE;
  9123. property I2C3AMIE : TBits_1 read getI2C3AMIE write setI2C3AMIE;
  9124. property I2C3ASIE : TBits_1 read getI2C3ASIE write setI2C3ASIE;
  9125. property I2C4BIE : TBits_1 read getI2C4BIE write setI2C4BIE;
  9126. property I2C4MIE : TBits_1 read getI2C4MIE write setI2C4MIE;
  9127. property I2C4SIE : TBits_1 read getI2C4SIE write setI2C4SIE;
  9128. property I2C5BIE : TBits_1 read getI2C5BIE write setI2C5BIE;
  9129. property I2C5MIE : TBits_1 read getI2C5MIE write setI2C5MIE;
  9130. property I2C5SIE : TBits_1 read getI2C5SIE write setI2C5SIE;
  9131. property IC1EIE : TBits_1 read getIC1EIE write setIC1EIE;
  9132. property IC2EIE : TBits_1 read getIC2EIE write setIC2EIE;
  9133. property IC3EIE : TBits_1 read getIC3EIE write setIC3EIE;
  9134. property PMPIE : TBits_1 read getPMPIE write setPMPIE;
  9135. property RTCCIE : TBits_1 read getRTCCIE write setRTCCIE;
  9136. property SPI2AEIE : TBits_1 read getSPI2AEIE write setSPI2AEIE;
  9137. property SPI2ARXIE : TBits_1 read getSPI2ARXIE write setSPI2ARXIE;
  9138. property SPI2ATXIE : TBits_1 read getSPI2ATXIE write setSPI2ATXIE;
  9139. property SPI2EIE : TBits_1 read getSPI2EIE write setSPI2EIE;
  9140. property SPI2RXIE : TBits_1 read getSPI2RXIE write setSPI2RXIE;
  9141. property SPI2TXIE : TBits_1 read getSPI2TXIE write setSPI2TXIE;
  9142. property SPI3AEIE : TBits_1 read getSPI3AEIE write setSPI3AEIE;
  9143. property SPI3ARXIE : TBits_1 read getSPI3ARXIE write setSPI3ARXIE;
  9144. property SPI3ATXIE : TBits_1 read getSPI3ATXIE write setSPI3ATXIE;
  9145. property SPI4EIE : TBits_1 read getSPI4EIE write setSPI4EIE;
  9146. property SPI4RXIE : TBits_1 read getSPI4RXIE write setSPI4RXIE;
  9147. property SPI4TXIE : TBits_1 read getSPI4TXIE write setSPI4TXIE;
  9148. property U2AEIE : TBits_1 read getU2AEIE write setU2AEIE;
  9149. property U2ARXIE : TBits_1 read getU2ARXIE write setU2ARXIE;
  9150. property U2ATXIE : TBits_1 read getU2ATXIE write setU2ATXIE;
  9151. property U2EIE : TBits_1 read getU2EIE write setU2EIE;
  9152. property U2RXIE : TBits_1 read getU2RXIE write setU2RXIE;
  9153. property U2TXIE : TBits_1 read getU2TXIE write setU2TXIE;
  9154. property U3AEIE : TBits_1 read getU3AEIE write setU3AEIE;
  9155. property U3ARXIE : TBits_1 read getU3ARXIE write setU3ARXIE;
  9156. property U3ATXIE : TBits_1 read getU3ATXIE write setU3ATXIE;
  9157. property U3EIE : TBits_1 read getU3EIE write setU3EIE;
  9158. property U3RXIE : TBits_1 read getU3RXIE write setU3RXIE;
  9159. property U3TXIE : TBits_1 read getU3TXIE write setU3TXIE;
  9160. property USBIE : TBits_1 read getUSBIE write setUSBIE;
  9161. property w : TBits_32 read getw write setw;
  9162. end;
  9163. TINT_IEC2 = record
  9164. private
  9165. function getIC4EIE : TBits_1; inline;
  9166. function getIC5EIE : TBits_1; inline;
  9167. function getPMPEIE : TBits_1; inline;
  9168. function getU1BEIE : TBits_1; inline;
  9169. function getU1BRXIE : TBits_1; inline;
  9170. function getU1BTXIE : TBits_1; inline;
  9171. function getU2BEIE : TBits_1; inline;
  9172. function getU2BRXIE : TBits_1; inline;
  9173. function getU2BTXIE : TBits_1; inline;
  9174. function getU3BEIE : TBits_1; inline;
  9175. function getU3BRXIE : TBits_1; inline;
  9176. function getU3BTXIE : TBits_1; inline;
  9177. function getU4EIE : TBits_1; inline;
  9178. function getU4RXIE : TBits_1; inline;
  9179. function getU4TXIE : TBits_1; inline;
  9180. function getU5EIE : TBits_1; inline;
  9181. function getU5RXIE : TBits_1; inline;
  9182. function getU5TXIE : TBits_1; inline;
  9183. function getU6EIE : TBits_1; inline;
  9184. function getU6RXIE : TBits_1; inline;
  9185. function getU6TXIE : TBits_1; inline;
  9186. function getw : TBits_32; inline;
  9187. procedure setIC4EIE(thebits : TBits_1); inline;
  9188. procedure setIC5EIE(thebits : TBits_1); inline;
  9189. procedure setPMPEIE(thebits : TBits_1); inline;
  9190. procedure setU1BEIE(thebits : TBits_1); inline;
  9191. procedure setU1BRXIE(thebits : TBits_1); inline;
  9192. procedure setU1BTXIE(thebits : TBits_1); inline;
  9193. procedure setU2BEIE(thebits : TBits_1); inline;
  9194. procedure setU2BRXIE(thebits : TBits_1); inline;
  9195. procedure setU2BTXIE(thebits : TBits_1); inline;
  9196. procedure setU3BEIE(thebits : TBits_1); inline;
  9197. procedure setU3BRXIE(thebits : TBits_1); inline;
  9198. procedure setU3BTXIE(thebits : TBits_1); inline;
  9199. procedure setU4EIE(thebits : TBits_1); inline;
  9200. procedure setU4RXIE(thebits : TBits_1); inline;
  9201. procedure setU4TXIE(thebits : TBits_1); inline;
  9202. procedure setU5EIE(thebits : TBits_1); inline;
  9203. procedure setU5RXIE(thebits : TBits_1); inline;
  9204. procedure setU5TXIE(thebits : TBits_1); inline;
  9205. procedure setU6EIE(thebits : TBits_1); inline;
  9206. procedure setU6RXIE(thebits : TBits_1); inline;
  9207. procedure setU6TXIE(thebits : TBits_1); inline;
  9208. procedure setw(thebits : TBits_32); inline;
  9209. public
  9210. procedure clearIC4EIE; inline;
  9211. procedure clearIC5EIE; inline;
  9212. procedure clearPMPEIE; inline;
  9213. procedure clearU1BEIE; inline;
  9214. procedure clearU1BRXIE; inline;
  9215. procedure clearU1BTXIE; inline;
  9216. procedure clearU2BEIE; inline;
  9217. procedure clearU2BRXIE; inline;
  9218. procedure clearU2BTXIE; inline;
  9219. procedure clearU3BEIE; inline;
  9220. procedure clearU3BRXIE; inline;
  9221. procedure clearU3BTXIE; inline;
  9222. procedure clearU4EIE; inline;
  9223. procedure clearU4RXIE; inline;
  9224. procedure clearU4TXIE; inline;
  9225. procedure clearU5EIE; inline;
  9226. procedure clearU5RXIE; inline;
  9227. procedure clearU5TXIE; inline;
  9228. procedure clearU6EIE; inline;
  9229. procedure clearU6RXIE; inline;
  9230. procedure clearU6TXIE; inline;
  9231. procedure setIC4EIE; inline;
  9232. procedure setIC5EIE; inline;
  9233. procedure setPMPEIE; inline;
  9234. procedure setU1BEIE; inline;
  9235. procedure setU1BRXIE; inline;
  9236. procedure setU1BTXIE; inline;
  9237. procedure setU2BEIE; inline;
  9238. procedure setU2BRXIE; inline;
  9239. procedure setU2BTXIE; inline;
  9240. procedure setU3BEIE; inline;
  9241. procedure setU3BRXIE; inline;
  9242. procedure setU3BTXIE; inline;
  9243. procedure setU4EIE; inline;
  9244. procedure setU4RXIE; inline;
  9245. procedure setU4TXIE; inline;
  9246. procedure setU5EIE; inline;
  9247. procedure setU5RXIE; inline;
  9248. procedure setU5TXIE; inline;
  9249. procedure setU6EIE; inline;
  9250. procedure setU6RXIE; inline;
  9251. procedure setU6TXIE; inline;
  9252. property IC4EIE : TBits_1 read getIC4EIE write setIC4EIE;
  9253. property IC5EIE : TBits_1 read getIC5EIE write setIC5EIE;
  9254. property PMPEIE : TBits_1 read getPMPEIE write setPMPEIE;
  9255. property U1BEIE : TBits_1 read getU1BEIE write setU1BEIE;
  9256. property U1BRXIE : TBits_1 read getU1BRXIE write setU1BRXIE;
  9257. property U1BTXIE : TBits_1 read getU1BTXIE write setU1BTXIE;
  9258. property U2BEIE : TBits_1 read getU2BEIE write setU2BEIE;
  9259. property U2BRXIE : TBits_1 read getU2BRXIE write setU2BRXIE;
  9260. property U2BTXIE : TBits_1 read getU2BTXIE write setU2BTXIE;
  9261. property U3BEIE : TBits_1 read getU3BEIE write setU3BEIE;
  9262. property U3BRXIE : TBits_1 read getU3BRXIE write setU3BRXIE;
  9263. property U3BTXIE : TBits_1 read getU3BTXIE write setU3BTXIE;
  9264. property U4EIE : TBits_1 read getU4EIE write setU4EIE;
  9265. property U4RXIE : TBits_1 read getU4RXIE write setU4RXIE;
  9266. property U4TXIE : TBits_1 read getU4TXIE write setU4TXIE;
  9267. property U5EIE : TBits_1 read getU5EIE write setU5EIE;
  9268. property U5RXIE : TBits_1 read getU5RXIE write setU5RXIE;
  9269. property U5TXIE : TBits_1 read getU5TXIE write setU5TXIE;
  9270. property U6EIE : TBits_1 read getU6EIE write setU6EIE;
  9271. property U6RXIE : TBits_1 read getU6RXIE write setU6RXIE;
  9272. property U6TXIE : TBits_1 read getU6TXIE write setU6TXIE;
  9273. property w : TBits_32 read getw write setw;
  9274. end;
  9275. TINT_IPC0 = record
  9276. private
  9277. function getCS0IP : TBits_3; inline;
  9278. function getCS0IS : TBits_2; inline;
  9279. function getCS1IP : TBits_3; inline;
  9280. function getCS1IS : TBits_2; inline;
  9281. function getCTIP : TBits_3; inline;
  9282. function getCTIS : TBits_2; inline;
  9283. function getINT0IP : TBits_3; inline;
  9284. function getINT0IS : TBits_2; inline;
  9285. function getw : TBits_32; inline;
  9286. procedure setCS0IP(thebits : TBits_3); inline;
  9287. procedure setCS0IS(thebits : TBits_2); inline;
  9288. procedure setCS1IP(thebits : TBits_3); inline;
  9289. procedure setCS1IS(thebits : TBits_2); inline;
  9290. procedure setCTIP(thebits : TBits_3); inline;
  9291. procedure setCTIS(thebits : TBits_2); inline;
  9292. procedure setINT0IP(thebits : TBits_3); inline;
  9293. procedure setINT0IS(thebits : TBits_2); inline;
  9294. procedure setw(thebits : TBits_32); inline;
  9295. public
  9296. property CS0IP : TBits_3 read getCS0IP write setCS0IP;
  9297. property CS0IS : TBits_2 read getCS0IS write setCS0IS;
  9298. property CS1IP : TBits_3 read getCS1IP write setCS1IP;
  9299. property CS1IS : TBits_2 read getCS1IS write setCS1IS;
  9300. property CTIP : TBits_3 read getCTIP write setCTIP;
  9301. property CTIS : TBits_2 read getCTIS write setCTIS;
  9302. property INT0IP : TBits_3 read getINT0IP write setINT0IP;
  9303. property INT0IS : TBits_2 read getINT0IS write setINT0IS;
  9304. property w : TBits_32 read getw write setw;
  9305. end;
  9306. TINT_IPC1 = record
  9307. private
  9308. function getIC1IP : TBits_3; inline;
  9309. function getIC1IS : TBits_2; inline;
  9310. function getINT1IP : TBits_3; inline;
  9311. function getINT1IS : TBits_2; inline;
  9312. function getOC1IP : TBits_3; inline;
  9313. function getOC1IS : TBits_2; inline;
  9314. function getT1IP : TBits_3; inline;
  9315. function getT1IS : TBits_2; inline;
  9316. function getw : TBits_32; inline;
  9317. procedure setIC1IP(thebits : TBits_3); inline;
  9318. procedure setIC1IS(thebits : TBits_2); inline;
  9319. procedure setINT1IP(thebits : TBits_3); inline;
  9320. procedure setINT1IS(thebits : TBits_2); inline;
  9321. procedure setOC1IP(thebits : TBits_3); inline;
  9322. procedure setOC1IS(thebits : TBits_2); inline;
  9323. procedure setT1IP(thebits : TBits_3); inline;
  9324. procedure setT1IS(thebits : TBits_2); inline;
  9325. procedure setw(thebits : TBits_32); inline;
  9326. public
  9327. property IC1IP : TBits_3 read getIC1IP write setIC1IP;
  9328. property IC1IS : TBits_2 read getIC1IS write setIC1IS;
  9329. property INT1IP : TBits_3 read getINT1IP write setINT1IP;
  9330. property INT1IS : TBits_2 read getINT1IS write setINT1IS;
  9331. property OC1IP : TBits_3 read getOC1IP write setOC1IP;
  9332. property OC1IS : TBits_2 read getOC1IS write setOC1IS;
  9333. property T1IP : TBits_3 read getT1IP write setT1IP;
  9334. property T1IS : TBits_2 read getT1IS write setT1IS;
  9335. property w : TBits_32 read getw write setw;
  9336. end;
  9337. TINT_IPC2 = record
  9338. private
  9339. function getIC2IP : TBits_3; inline;
  9340. function getIC2IS : TBits_2; inline;
  9341. function getINT2IP : TBits_3; inline;
  9342. function getINT2IS : TBits_2; inline;
  9343. function getOC2IP : TBits_3; inline;
  9344. function getOC2IS : TBits_2; inline;
  9345. function getT2IP : TBits_3; inline;
  9346. function getT2IS : TBits_2; inline;
  9347. function getw : TBits_32; inline;
  9348. procedure setIC2IP(thebits : TBits_3); inline;
  9349. procedure setIC2IS(thebits : TBits_2); inline;
  9350. procedure setINT2IP(thebits : TBits_3); inline;
  9351. procedure setINT2IS(thebits : TBits_2); inline;
  9352. procedure setOC2IP(thebits : TBits_3); inline;
  9353. procedure setOC2IS(thebits : TBits_2); inline;
  9354. procedure setT2IP(thebits : TBits_3); inline;
  9355. procedure setT2IS(thebits : TBits_2); inline;
  9356. procedure setw(thebits : TBits_32); inline;
  9357. public
  9358. property IC2IP : TBits_3 read getIC2IP write setIC2IP;
  9359. property IC2IS : TBits_2 read getIC2IS write setIC2IS;
  9360. property INT2IP : TBits_3 read getINT2IP write setINT2IP;
  9361. property INT2IS : TBits_2 read getINT2IS write setINT2IS;
  9362. property OC2IP : TBits_3 read getOC2IP write setOC2IP;
  9363. property OC2IS : TBits_2 read getOC2IS write setOC2IS;
  9364. property T2IP : TBits_3 read getT2IP write setT2IP;
  9365. property T2IS : TBits_2 read getT2IS write setT2IS;
  9366. property w : TBits_32 read getw write setw;
  9367. end;
  9368. TINT_IPC3 = record
  9369. private
  9370. function getIC3IP : TBits_3; inline;
  9371. function getIC3IS : TBits_2; inline;
  9372. function getINT3IP : TBits_3; inline;
  9373. function getINT3IS : TBits_2; inline;
  9374. function getOC3IP : TBits_3; inline;
  9375. function getOC3IS : TBits_2; inline;
  9376. function getT3IP : TBits_3; inline;
  9377. function getT3IS : TBits_2; inline;
  9378. function getw : TBits_32; inline;
  9379. procedure setIC3IP(thebits : TBits_3); inline;
  9380. procedure setIC3IS(thebits : TBits_2); inline;
  9381. procedure setINT3IP(thebits : TBits_3); inline;
  9382. procedure setINT3IS(thebits : TBits_2); inline;
  9383. procedure setOC3IP(thebits : TBits_3); inline;
  9384. procedure setOC3IS(thebits : TBits_2); inline;
  9385. procedure setT3IP(thebits : TBits_3); inline;
  9386. procedure setT3IS(thebits : TBits_2); inline;
  9387. procedure setw(thebits : TBits_32); inline;
  9388. public
  9389. property IC3IP : TBits_3 read getIC3IP write setIC3IP;
  9390. property IC3IS : TBits_2 read getIC3IS write setIC3IS;
  9391. property INT3IP : TBits_3 read getINT3IP write setINT3IP;
  9392. property INT3IS : TBits_2 read getINT3IS write setINT3IS;
  9393. property OC3IP : TBits_3 read getOC3IP write setOC3IP;
  9394. property OC3IS : TBits_2 read getOC3IS write setOC3IS;
  9395. property T3IP : TBits_3 read getT3IP write setT3IP;
  9396. property T3IS : TBits_2 read getT3IS write setT3IS;
  9397. property w : TBits_32 read getw write setw;
  9398. end;
  9399. TINT_IPC4 = record
  9400. private
  9401. function getIC4IP : TBits_3; inline;
  9402. function getIC4IS : TBits_2; inline;
  9403. function getINT4IP : TBits_3; inline;
  9404. function getINT4IS : TBits_2; inline;
  9405. function getOC4IP : TBits_3; inline;
  9406. function getOC4IS : TBits_2; inline;
  9407. function getT4IP : TBits_3; inline;
  9408. function getT4IS : TBits_2; inline;
  9409. function getw : TBits_32; inline;
  9410. procedure setIC4IP(thebits : TBits_3); inline;
  9411. procedure setIC4IS(thebits : TBits_2); inline;
  9412. procedure setINT4IP(thebits : TBits_3); inline;
  9413. procedure setINT4IS(thebits : TBits_2); inline;
  9414. procedure setOC4IP(thebits : TBits_3); inline;
  9415. procedure setOC4IS(thebits : TBits_2); inline;
  9416. procedure setT4IP(thebits : TBits_3); inline;
  9417. procedure setT4IS(thebits : TBits_2); inline;
  9418. procedure setw(thebits : TBits_32); inline;
  9419. public
  9420. property IC4IP : TBits_3 read getIC4IP write setIC4IP;
  9421. property IC4IS : TBits_2 read getIC4IS write setIC4IS;
  9422. property INT4IP : TBits_3 read getINT4IP write setINT4IP;
  9423. property INT4IS : TBits_2 read getINT4IS write setINT4IS;
  9424. property OC4IP : TBits_3 read getOC4IP write setOC4IP;
  9425. property OC4IS : TBits_2 read getOC4IS write setOC4IS;
  9426. property T4IP : TBits_3 read getT4IP write setT4IP;
  9427. property T4IS : TBits_2 read getT4IS write setT4IS;
  9428. property w : TBits_32 read getw write setw;
  9429. end;
  9430. TINT_IPC5 = record
  9431. private
  9432. function getIC5IP : TBits_3; inline;
  9433. function getIC5IS : TBits_2; inline;
  9434. function getOC5IP : TBits_3; inline;
  9435. function getOC5IS : TBits_2; inline;
  9436. function getT5IP : TBits_3; inline;
  9437. function getT5IS : TBits_2; inline;
  9438. function getw : TBits_32; inline;
  9439. procedure setIC5IP(thebits : TBits_3); inline;
  9440. procedure setIC5IS(thebits : TBits_2); inline;
  9441. procedure setOC5IP(thebits : TBits_3); inline;
  9442. procedure setOC5IS(thebits : TBits_2); inline;
  9443. procedure setT5IP(thebits : TBits_3); inline;
  9444. procedure setT5IS(thebits : TBits_2); inline;
  9445. procedure setw(thebits : TBits_32); inline;
  9446. public
  9447. property IC5IP : TBits_3 read getIC5IP write setIC5IP;
  9448. property IC5IS : TBits_2 read getIC5IS write setIC5IS;
  9449. property OC5IP : TBits_3 read getOC5IP write setOC5IP;
  9450. property OC5IS : TBits_2 read getOC5IS write setOC5IS;
  9451. property T5IP : TBits_3 read getT5IP write setT5IP;
  9452. property T5IS : TBits_2 read getT5IS write setT5IS;
  9453. property w : TBits_32 read getw write setw;
  9454. end;
  9455. TINT_IPC6 = record
  9456. private
  9457. function getAD1IP : TBits_3; inline;
  9458. function getAD1IS : TBits_2; inline;
  9459. function getCNIP : TBits_3; inline;
  9460. function getCNIS : TBits_2; inline;
  9461. function getI2C1AIP : TBits_3; inline;
  9462. function getI2C1AIS : TBits_2; inline;
  9463. function getI2C1IP : TBits_3; inline;
  9464. function getI2C1IS : TBits_2; inline;
  9465. function getI2C3IP : TBits_3; inline;
  9466. function getI2C3IS : TBits_2; inline;
  9467. function getSPI1AIP : TBits_3; inline;
  9468. function getSPI1AIS : TBits_2; inline;
  9469. function getSPI3IP : TBits_3; inline;
  9470. function getSPI3IS : TBits_2; inline;
  9471. function getU1AIP : TBits_3; inline;
  9472. function getU1AIS : TBits_2; inline;
  9473. function getU1IP : TBits_3; inline;
  9474. function getU1IS : TBits_2; inline;
  9475. function getw : TBits_32; inline;
  9476. procedure setAD1IP(thebits : TBits_3); inline;
  9477. procedure setAD1IS(thebits : TBits_2); inline;
  9478. procedure setCNIP(thebits : TBits_3); inline;
  9479. procedure setCNIS(thebits : TBits_2); inline;
  9480. procedure setI2C1AIP(thebits : TBits_3); inline;
  9481. procedure setI2C1AIS(thebits : TBits_2); inline;
  9482. procedure setI2C1IP(thebits : TBits_3); inline;
  9483. procedure setI2C1IS(thebits : TBits_2); inline;
  9484. procedure setI2C3IP(thebits : TBits_3); inline;
  9485. procedure setI2C3IS(thebits : TBits_2); inline;
  9486. procedure setSPI1AIP(thebits : TBits_3); inline;
  9487. procedure setSPI1AIS(thebits : TBits_2); inline;
  9488. procedure setSPI3IP(thebits : TBits_3); inline;
  9489. procedure setSPI3IS(thebits : TBits_2); inline;
  9490. procedure setU1AIP(thebits : TBits_3); inline;
  9491. procedure setU1AIS(thebits : TBits_2); inline;
  9492. procedure setU1IP(thebits : TBits_3); inline;
  9493. procedure setU1IS(thebits : TBits_2); inline;
  9494. procedure setw(thebits : TBits_32); inline;
  9495. public
  9496. property AD1IP : TBits_3 read getAD1IP write setAD1IP;
  9497. property AD1IS : TBits_2 read getAD1IS write setAD1IS;
  9498. property CNIP : TBits_3 read getCNIP write setCNIP;
  9499. property CNIS : TBits_2 read getCNIS write setCNIS;
  9500. property I2C1AIP : TBits_3 read getI2C1AIP write setI2C1AIP;
  9501. property I2C1AIS : TBits_2 read getI2C1AIS write setI2C1AIS;
  9502. property I2C1IP : TBits_3 read getI2C1IP write setI2C1IP;
  9503. property I2C1IS : TBits_2 read getI2C1IS write setI2C1IS;
  9504. property I2C3IP : TBits_3 read getI2C3IP write setI2C3IP;
  9505. property I2C3IS : TBits_2 read getI2C3IS write setI2C3IS;
  9506. property SPI1AIP : TBits_3 read getSPI1AIP write setSPI1AIP;
  9507. property SPI1AIS : TBits_2 read getSPI1AIS write setSPI1AIS;
  9508. property SPI3IP : TBits_3 read getSPI3IP write setSPI3IP;
  9509. property SPI3IS : TBits_2 read getSPI3IS write setSPI3IS;
  9510. property U1AIP : TBits_3 read getU1AIP write setU1AIP;
  9511. property U1AIS : TBits_2 read getU1AIS write setU1AIS;
  9512. property U1IP : TBits_3 read getU1IP write setU1IP;
  9513. property U1IS : TBits_2 read getU1IS write setU1IS;
  9514. property w : TBits_32 read getw write setw;
  9515. end;
  9516. TINT_IPC7 = record
  9517. private
  9518. function getCMP1IP : TBits_3; inline;
  9519. function getCMP1IS : TBits_2; inline;
  9520. function getCMP2IP : TBits_3; inline;
  9521. function getCMP2IS : TBits_2; inline;
  9522. function getI2C2AIP : TBits_3; inline;
  9523. function getI2C2AIS : TBits_2; inline;
  9524. function getI2C4IP : TBits_3; inline;
  9525. function getI2C4IS : TBits_2; inline;
  9526. function getPMPIP : TBits_3; inline;
  9527. function getPMPIS : TBits_2; inline;
  9528. function getSPI2AIP : TBits_3; inline;
  9529. function getSPI2AIS : TBits_2; inline;
  9530. function getSPI2IP : TBits_3; inline;
  9531. function getSPI2IS : TBits_2; inline;
  9532. function getU2AIP : TBits_3; inline;
  9533. function getU2AIS : TBits_2; inline;
  9534. function getU3IP : TBits_3; inline;
  9535. function getU3IS : TBits_2; inline;
  9536. function getw : TBits_32; inline;
  9537. procedure setCMP1IP(thebits : TBits_3); inline;
  9538. procedure setCMP1IS(thebits : TBits_2); inline;
  9539. procedure setCMP2IP(thebits : TBits_3); inline;
  9540. procedure setCMP2IS(thebits : TBits_2); inline;
  9541. procedure setI2C2AIP(thebits : TBits_3); inline;
  9542. procedure setI2C2AIS(thebits : TBits_2); inline;
  9543. procedure setI2C4IP(thebits : TBits_3); inline;
  9544. procedure setI2C4IS(thebits : TBits_2); inline;
  9545. procedure setPMPIP(thebits : TBits_3); inline;
  9546. procedure setPMPIS(thebits : TBits_2); inline;
  9547. procedure setSPI2AIP(thebits : TBits_3); inline;
  9548. procedure setSPI2AIS(thebits : TBits_2); inline;
  9549. procedure setSPI2IP(thebits : TBits_3); inline;
  9550. procedure setSPI2IS(thebits : TBits_2); inline;
  9551. procedure setU2AIP(thebits : TBits_3); inline;
  9552. procedure setU2AIS(thebits : TBits_2); inline;
  9553. procedure setU3IP(thebits : TBits_3); inline;
  9554. procedure setU3IS(thebits : TBits_2); inline;
  9555. procedure setw(thebits : TBits_32); inline;
  9556. public
  9557. property CMP1IP : TBits_3 read getCMP1IP write setCMP1IP;
  9558. property CMP1IS : TBits_2 read getCMP1IS write setCMP1IS;
  9559. property CMP2IP : TBits_3 read getCMP2IP write setCMP2IP;
  9560. property CMP2IS : TBits_2 read getCMP2IS write setCMP2IS;
  9561. property I2C2AIP : TBits_3 read getI2C2AIP write setI2C2AIP;
  9562. property I2C2AIS : TBits_2 read getI2C2AIS write setI2C2AIS;
  9563. property I2C4IP : TBits_3 read getI2C4IP write setI2C4IP;
  9564. property I2C4IS : TBits_2 read getI2C4IS write setI2C4IS;
  9565. property PMPIP : TBits_3 read getPMPIP write setPMPIP;
  9566. property PMPIS : TBits_2 read getPMPIS write setPMPIS;
  9567. property SPI2AIP : TBits_3 read getSPI2AIP write setSPI2AIP;
  9568. property SPI2AIS : TBits_2 read getSPI2AIS write setSPI2AIS;
  9569. property SPI2IP : TBits_3 read getSPI2IP write setSPI2IP;
  9570. property SPI2IS : TBits_2 read getSPI2IS write setSPI2IS;
  9571. property U2AIP : TBits_3 read getU2AIP write setU2AIP;
  9572. property U2AIS : TBits_2 read getU2AIS write setU2AIS;
  9573. property U3IP : TBits_3 read getU3IP write setU3IP;
  9574. property U3IS : TBits_2 read getU3IS write setU3IS;
  9575. property w : TBits_32 read getw write setw;
  9576. end;
  9577. TINT_IPC8 = record
  9578. private
  9579. function getFSCMIP : TBits_3; inline;
  9580. function getFSCMIS : TBits_2; inline;
  9581. function getI2C3AIP : TBits_3; inline;
  9582. function getI2C3AIS : TBits_2; inline;
  9583. function getI2C5IP : TBits_3; inline;
  9584. function getI2C5IS : TBits_2; inline;
  9585. function getRTCCIP : TBits_3; inline;
  9586. function getRTCCIS : TBits_2; inline;
  9587. function getSPI3AIP : TBits_3; inline;
  9588. function getSPI3AIS : TBits_2; inline;
  9589. function getSPI4IP : TBits_3; inline;
  9590. function getSPI4IS : TBits_2; inline;
  9591. function getU2IP : TBits_3; inline;
  9592. function getU2IS : TBits_2; inline;
  9593. function getU3AIP : TBits_3; inline;
  9594. function getU3AIS : TBits_2; inline;
  9595. function getw : TBits_32; inline;
  9596. procedure setFSCMIP(thebits : TBits_3); inline;
  9597. procedure setFSCMIS(thebits : TBits_2); inline;
  9598. procedure setI2C3AIP(thebits : TBits_3); inline;
  9599. procedure setI2C3AIS(thebits : TBits_2); inline;
  9600. procedure setI2C5IP(thebits : TBits_3); inline;
  9601. procedure setI2C5IS(thebits : TBits_2); inline;
  9602. procedure setRTCCIP(thebits : TBits_3); inline;
  9603. procedure setRTCCIS(thebits : TBits_2); inline;
  9604. procedure setSPI3AIP(thebits : TBits_3); inline;
  9605. procedure setSPI3AIS(thebits : TBits_2); inline;
  9606. procedure setSPI4IP(thebits : TBits_3); inline;
  9607. procedure setSPI4IS(thebits : TBits_2); inline;
  9608. procedure setU2IP(thebits : TBits_3); inline;
  9609. procedure setU2IS(thebits : TBits_2); inline;
  9610. procedure setU3AIP(thebits : TBits_3); inline;
  9611. procedure setU3AIS(thebits : TBits_2); inline;
  9612. procedure setw(thebits : TBits_32); inline;
  9613. public
  9614. property FSCMIP : TBits_3 read getFSCMIP write setFSCMIP;
  9615. property FSCMIS : TBits_2 read getFSCMIS write setFSCMIS;
  9616. property I2C3AIP : TBits_3 read getI2C3AIP write setI2C3AIP;
  9617. property I2C3AIS : TBits_2 read getI2C3AIS write setI2C3AIS;
  9618. property I2C5IP : TBits_3 read getI2C5IP write setI2C5IP;
  9619. property I2C5IS : TBits_2 read getI2C5IS write setI2C5IS;
  9620. property RTCCIP : TBits_3 read getRTCCIP write setRTCCIP;
  9621. property RTCCIS : TBits_2 read getRTCCIS write setRTCCIS;
  9622. property SPI3AIP : TBits_3 read getSPI3AIP write setSPI3AIP;
  9623. property SPI3AIS : TBits_2 read getSPI3AIS write setSPI3AIS;
  9624. property SPI4IP : TBits_3 read getSPI4IP write setSPI4IP;
  9625. property SPI4IS : TBits_2 read getSPI4IS write setSPI4IS;
  9626. property U2IP : TBits_3 read getU2IP write setU2IP;
  9627. property U2IS : TBits_2 read getU2IS write setU2IS;
  9628. property U3AIP : TBits_3 read getU3AIP write setU3AIP;
  9629. property U3AIS : TBits_2 read getU3AIS write setU3AIS;
  9630. property w : TBits_32 read getw write setw;
  9631. end;
  9632. TINT_IPC9 = record
  9633. private
  9634. function getDMA0IP : TBits_3; inline;
  9635. function getDMA0IS : TBits_2; inline;
  9636. function getDMA1IP : TBits_3; inline;
  9637. function getDMA1IS : TBits_2; inline;
  9638. function getDMA2IP : TBits_3; inline;
  9639. function getDMA2IS : TBits_2; inline;
  9640. function getDMA3IP : TBits_3; inline;
  9641. function getDMA3IS : TBits_2; inline;
  9642. function getw : TBits_32; inline;
  9643. procedure setDMA0IP(thebits : TBits_3); inline;
  9644. procedure setDMA0IS(thebits : TBits_2); inline;
  9645. procedure setDMA1IP(thebits : TBits_3); inline;
  9646. procedure setDMA1IS(thebits : TBits_2); inline;
  9647. procedure setDMA2IP(thebits : TBits_3); inline;
  9648. procedure setDMA2IS(thebits : TBits_2); inline;
  9649. procedure setDMA3IP(thebits : TBits_3); inline;
  9650. procedure setDMA3IS(thebits : TBits_2); inline;
  9651. procedure setw(thebits : TBits_32); inline;
  9652. public
  9653. property DMA0IP : TBits_3 read getDMA0IP write setDMA0IP;
  9654. property DMA0IS : TBits_2 read getDMA0IS write setDMA0IS;
  9655. property DMA1IP : TBits_3 read getDMA1IP write setDMA1IP;
  9656. property DMA1IS : TBits_2 read getDMA1IS write setDMA1IS;
  9657. property DMA2IP : TBits_3 read getDMA2IP write setDMA2IP;
  9658. property DMA2IS : TBits_2 read getDMA2IS write setDMA2IS;
  9659. property DMA3IP : TBits_3 read getDMA3IP write setDMA3IP;
  9660. property DMA3IS : TBits_2 read getDMA3IS write setDMA3IS;
  9661. property w : TBits_32 read getw write setw;
  9662. end;
  9663. TINT_IPC10 = record
  9664. private
  9665. function getDMA4IP : TBits_3; inline;
  9666. function getDMA4IS : TBits_2; inline;
  9667. function getDMA5IP : TBits_3; inline;
  9668. function getDMA5IS : TBits_2; inline;
  9669. function getDMA6IP : TBits_3; inline;
  9670. function getDMA6IS : TBits_2; inline;
  9671. function getDMA7IP : TBits_3; inline;
  9672. function getDMA7IS : TBits_2; inline;
  9673. function getw : TBits_32; inline;
  9674. procedure setDMA4IP(thebits : TBits_3); inline;
  9675. procedure setDMA4IS(thebits : TBits_2); inline;
  9676. procedure setDMA5IP(thebits : TBits_3); inline;
  9677. procedure setDMA5IS(thebits : TBits_2); inline;
  9678. procedure setDMA6IP(thebits : TBits_3); inline;
  9679. procedure setDMA6IS(thebits : TBits_2); inline;
  9680. procedure setDMA7IP(thebits : TBits_3); inline;
  9681. procedure setDMA7IS(thebits : TBits_2); inline;
  9682. procedure setw(thebits : TBits_32); inline;
  9683. public
  9684. property DMA4IP : TBits_3 read getDMA4IP write setDMA4IP;
  9685. property DMA4IS : TBits_2 read getDMA4IS write setDMA4IS;
  9686. property DMA5IP : TBits_3 read getDMA5IP write setDMA5IP;
  9687. property DMA5IS : TBits_2 read getDMA5IS write setDMA5IS;
  9688. property DMA6IP : TBits_3 read getDMA6IP write setDMA6IP;
  9689. property DMA6IS : TBits_2 read getDMA6IS write setDMA6IS;
  9690. property DMA7IP : TBits_3 read getDMA7IP write setDMA7IP;
  9691. property DMA7IS : TBits_2 read getDMA7IS write setDMA7IS;
  9692. property w : TBits_32 read getw write setw;
  9693. end;
  9694. TINT_IPC11 = record
  9695. private
  9696. function getCAN1IP : TBits_3; inline;
  9697. function getCAN1IS : TBits_2; inline;
  9698. function getFCEIP : TBits_3; inline;
  9699. function getFCEIS : TBits_2; inline;
  9700. function getUSBIP : TBits_3; inline;
  9701. function getUSBIS : TBits_2; inline;
  9702. function getw : TBits_32; inline;
  9703. procedure setCAN1IP(thebits : TBits_3); inline;
  9704. procedure setCAN1IS(thebits : TBits_2); inline;
  9705. procedure setFCEIP(thebits : TBits_3); inline;
  9706. procedure setFCEIS(thebits : TBits_2); inline;
  9707. procedure setUSBIP(thebits : TBits_3); inline;
  9708. procedure setUSBIS(thebits : TBits_2); inline;
  9709. procedure setw(thebits : TBits_32); inline;
  9710. public
  9711. property CAN1IP : TBits_3 read getCAN1IP write setCAN1IP;
  9712. property CAN1IS : TBits_2 read getCAN1IS write setCAN1IS;
  9713. property FCEIP : TBits_3 read getFCEIP write setFCEIP;
  9714. property FCEIS : TBits_2 read getFCEIS write setFCEIS;
  9715. property USBIP : TBits_3 read getUSBIP write setUSBIP;
  9716. property USBIS : TBits_2 read getUSBIS write setUSBIS;
  9717. property w : TBits_32 read getw write setw;
  9718. end;
  9719. TINT_IPC12 = record
  9720. private
  9721. function getU1BIP : TBits_3; inline;
  9722. function getU1BIS : TBits_2; inline;
  9723. function getU2BIP : TBits_3; inline;
  9724. function getU2BIS : TBits_2; inline;
  9725. function getU3BIP : TBits_3; inline;
  9726. function getU3BIS : TBits_2; inline;
  9727. function getU4IP : TBits_3; inline;
  9728. function getU4IS : TBits_2; inline;
  9729. function getU5IP : TBits_3; inline;
  9730. function getU5IS : TBits_2; inline;
  9731. function getU6IP : TBits_3; inline;
  9732. function getU6IS : TBits_2; inline;
  9733. function getw : TBits_32; inline;
  9734. procedure setU1BIP(thebits : TBits_3); inline;
  9735. procedure setU1BIS(thebits : TBits_2); inline;
  9736. procedure setU2BIP(thebits : TBits_3); inline;
  9737. procedure setU2BIS(thebits : TBits_2); inline;
  9738. procedure setU3BIP(thebits : TBits_3); inline;
  9739. procedure setU3BIS(thebits : TBits_2); inline;
  9740. procedure setU4IP(thebits : TBits_3); inline;
  9741. procedure setU4IS(thebits : TBits_2); inline;
  9742. procedure setU5IP(thebits : TBits_3); inline;
  9743. procedure setU5IS(thebits : TBits_2); inline;
  9744. procedure setU6IP(thebits : TBits_3); inline;
  9745. procedure setU6IS(thebits : TBits_2); inline;
  9746. procedure setw(thebits : TBits_32); inline;
  9747. public
  9748. property U1BIP : TBits_3 read getU1BIP write setU1BIP;
  9749. property U1BIS : TBits_2 read getU1BIS write setU1BIS;
  9750. property U2BIP : TBits_3 read getU2BIP write setU2BIP;
  9751. property U2BIS : TBits_2 read getU2BIS write setU2BIS;
  9752. property U3BIP : TBits_3 read getU3BIP write setU3BIP;
  9753. property U3BIS : TBits_2 read getU3BIS write setU3BIS;
  9754. property U4IP : TBits_3 read getU4IP write setU4IP;
  9755. property U4IS : TBits_2 read getU4IS write setU4IS;
  9756. property U5IP : TBits_3 read getU5IP write setU5IP;
  9757. property U5IS : TBits_2 read getU5IS write setU5IS;
  9758. property U6IP : TBits_3 read getU6IP write setU6IP;
  9759. property U6IS : TBits_2 read getU6IS write setU6IS;
  9760. property w : TBits_32 read getw write setw;
  9761. end;
  9762. type
  9763. TINTRegisters = record
  9764. INTCONbits : TINT_INTCON;
  9765. INTCON : longWord;
  9766. INTCONCLR : longWord;
  9767. INTCONSET : longWord;
  9768. INTCONINV : longWord;
  9769. INTSTAT : longWord;
  9770. IPTMR : longWord;
  9771. IPTMRCLR : longWord;
  9772. IPTMRSET : longWord;
  9773. IPTMRINV : longWord;
  9774. IFS0bits : TINT_IFS0;
  9775. IFS0 : longWord;
  9776. IFS0CLR : longWord;
  9777. IFS0SET : longWord;
  9778. IFS0INV : longWord;
  9779. IFS1bits : TINT_IFS1;
  9780. IFS1 : longWord;
  9781. IFS1CLR : longWord;
  9782. IFS1SET : longWord;
  9783. IFS1INV : longWord;
  9784. IFS2bits : TINT_IFS2;
  9785. IFS2 : longWord;
  9786. IFS2CLR : longWord;
  9787. IFS2SET : longWord;
  9788. IFS2INV : longWord;
  9789. IEC0bits : TINT_IEC0;
  9790. IEC0 : longWord;
  9791. IEC0CLR : longWord;
  9792. IEC0SET : longWord;
  9793. IEC0INV : longWord;
  9794. IEC1bits : TINT_IEC1;
  9795. IEC1 : longWord;
  9796. IEC1CLR : longWord;
  9797. IEC1SET : longWord;
  9798. IEC1INV : longWord;
  9799. IEC2bits : TINT_IEC2;
  9800. IEC2 : longWord;
  9801. IEC2CLR : longWord;
  9802. IEC2SET : longWord;
  9803. IEC2INV : longWord;
  9804. IPC0bits : TINT_IPC0;
  9805. IPC0 : longWord;
  9806. IPC0CLR : longWord;
  9807. IPC0SET : longWord;
  9808. IPC0INV : longWord;
  9809. IPC1bits : TINT_IPC1;
  9810. IPC1 : longWord;
  9811. IPC1CLR : longWord;
  9812. IPC1SET : longWord;
  9813. IPC1INV : longWord;
  9814. IPC2bits : TINT_IPC2;
  9815. IPC2 : longWord;
  9816. IPC2CLR : longWord;
  9817. IPC2SET : longWord;
  9818. IPC2INV : longWord;
  9819. IPC3bits : TINT_IPC3;
  9820. IPC3 : longWord;
  9821. IPC3CLR : longWord;
  9822. IPC3SET : longWord;
  9823. IPC3INV : longWord;
  9824. IPC4bits : TINT_IPC4;
  9825. IPC4 : longWord;
  9826. IPC4CLR : longWord;
  9827. IPC4SET : longWord;
  9828. IPC4INV : longWord;
  9829. IPC5bits : TINT_IPC5;
  9830. IPC5 : longWord;
  9831. IPC5CLR : longWord;
  9832. IPC5SET : longWord;
  9833. IPC5INV : longWord;
  9834. IPC6bits : TINT_IPC6;
  9835. IPC6 : longWord;
  9836. IPC6CLR : longWord;
  9837. IPC6SET : longWord;
  9838. IPC6INV : longWord;
  9839. IPC7bits : TINT_IPC7;
  9840. IPC7 : longWord;
  9841. IPC7CLR : longWord;
  9842. IPC7SET : longWord;
  9843. IPC7INV : longWord;
  9844. IPC8bits : TINT_IPC8;
  9845. IPC8 : longWord;
  9846. IPC8CLR : longWord;
  9847. IPC8SET : longWord;
  9848. IPC8INV : longWord;
  9849. IPC9bits : TINT_IPC9;
  9850. IPC9 : longWord;
  9851. IPC9CLR : longWord;
  9852. IPC9SET : longWord;
  9853. IPC9INV : longWord;
  9854. IPC10bits : TINT_IPC10;
  9855. IPC10 : longWord;
  9856. IPC10CLR : longWord;
  9857. IPC10SET : longWord;
  9858. IPC10INV : longWord;
  9859. IPC11bits : TINT_IPC11;
  9860. IPC11 : longWord;
  9861. IPC11CLR : longWord;
  9862. IPC11SET : longWord;
  9863. IPC11INV : longWord;
  9864. IPC12bits : TINT_IPC12;
  9865. IPC12 : longWord;
  9866. IPC12CLR : longWord;
  9867. IPC12SET : longWord;
  9868. IPC12INV : longWord;
  9869. end;
  9870. TBMX_BMXCON = record
  9871. private
  9872. function getBMXARB : TBits_3; inline;
  9873. function getBMXCHEDMA : TBits_1; inline;
  9874. function getBMXERRDMA : TBits_1; inline;
  9875. function getBMXERRDS : TBits_1; inline;
  9876. function getBMXERRICD : TBits_1; inline;
  9877. function getBMXERRIS : TBits_1; inline;
  9878. function getBMXERRIXI : TBits_1; inline;
  9879. function getBMXWSDRM : TBits_1; inline;
  9880. function getw : TBits_32; inline;
  9881. procedure setBMXARB(thebits : TBits_3); inline;
  9882. procedure setBMXCHEDMA(thebits : TBits_1); inline;
  9883. procedure setBMXERRDMA(thebits : TBits_1); inline;
  9884. procedure setBMXERRDS(thebits : TBits_1); inline;
  9885. procedure setBMXERRICD(thebits : TBits_1); inline;
  9886. procedure setBMXERRIS(thebits : TBits_1); inline;
  9887. procedure setBMXERRIXI(thebits : TBits_1); inline;
  9888. procedure setBMXWSDRM(thebits : TBits_1); inline;
  9889. procedure setw(thebits : TBits_32); inline;
  9890. public
  9891. procedure clearBMXCHEDMA; inline;
  9892. procedure clearBMXERRDMA; inline;
  9893. procedure clearBMXERRDS; inline;
  9894. procedure clearBMXERRICD; inline;
  9895. procedure clearBMXERRIS; inline;
  9896. procedure clearBMXERRIXI; inline;
  9897. procedure clearBMXWSDRM; inline;
  9898. procedure setBMXCHEDMA; inline;
  9899. procedure setBMXERRDMA; inline;
  9900. procedure setBMXERRDS; inline;
  9901. procedure setBMXERRICD; inline;
  9902. procedure setBMXERRIS; inline;
  9903. procedure setBMXERRIXI; inline;
  9904. procedure setBMXWSDRM; inline;
  9905. property BMXARB : TBits_3 read getBMXARB write setBMXARB;
  9906. property BMXCHEDMA : TBits_1 read getBMXCHEDMA write setBMXCHEDMA;
  9907. property BMXERRDMA : TBits_1 read getBMXERRDMA write setBMXERRDMA;
  9908. property BMXERRDS : TBits_1 read getBMXERRDS write setBMXERRDS;
  9909. property BMXERRICD : TBits_1 read getBMXERRICD write setBMXERRICD;
  9910. property BMXERRIS : TBits_1 read getBMXERRIS write setBMXERRIS;
  9911. property BMXERRIXI : TBits_1 read getBMXERRIXI write setBMXERRIXI;
  9912. property BMXWSDRM : TBits_1 read getBMXWSDRM write setBMXWSDRM;
  9913. property w : TBits_32 read getw write setw;
  9914. end;
  9915. type
  9916. TBMXRegisters = record
  9917. BMXCONbits : TBMX_BMXCON;
  9918. BMXCON : longWord;
  9919. BMXCONCLR : longWord;
  9920. BMXCONSET : longWord;
  9921. BMXCONINV : longWord;
  9922. BMXDKPBA : longWord;
  9923. BMXDKPBACLR : longWord;
  9924. BMXDKPBASET : longWord;
  9925. BMXDKPBAINV : longWord;
  9926. BMXDUDBA : longWord;
  9927. BMXDUDBACLR : longWord;
  9928. BMXDUDBASET : longWord;
  9929. BMXDUDBAINV : longWord;
  9930. BMXDUPBA : longWord;
  9931. BMXDUPBACLR : longWord;
  9932. BMXDUPBASET : longWord;
  9933. BMXDUPBAINV : longWord;
  9934. BMXDRMSZ : longWord;
  9935. BMXPUPBA : longWord;
  9936. BMXPUPBACLR : longWord;
  9937. BMXPUPBASET : longWord;
  9938. BMXPUPBAINV : longWord;
  9939. BMXPFMSZ : longWord;
  9940. BMXBOOTSZ : longWord;
  9941. end;
  9942. TDMAC_DMACON = record
  9943. private
  9944. function getDMABUSY : TBits_1; inline;
  9945. function getON : TBits_1; inline;
  9946. function getSUSPEND : TBits_1; inline;
  9947. function getw : TBits_32; inline;
  9948. procedure setDMABUSY(thebits : TBits_1); inline;
  9949. procedure setON(thebits : TBits_1); inline;
  9950. procedure setSUSPEND(thebits : TBits_1); inline;
  9951. procedure setw(thebits : TBits_32); inline;
  9952. public
  9953. procedure clearDMABUSY; inline;
  9954. procedure clearON; inline;
  9955. procedure clearSUSPEND; inline;
  9956. procedure setDMABUSY; inline;
  9957. procedure setON; inline;
  9958. procedure setSUSPEND; inline;
  9959. property DMABUSY : TBits_1 read getDMABUSY write setDMABUSY;
  9960. property ON : TBits_1 read getON write setON;
  9961. property SUSPEND : TBits_1 read getSUSPEND write setSUSPEND;
  9962. property w : TBits_32 read getw write setw;
  9963. end;
  9964. TDMAC_DMASTAT = record
  9965. private
  9966. function getDMACH : TBits_3; inline;
  9967. function getRDWR : TBits_1; inline;
  9968. function getw : TBits_32; inline;
  9969. procedure setDMACH(thebits : TBits_3); inline;
  9970. procedure setRDWR(thebits : TBits_1); inline;
  9971. procedure setw(thebits : TBits_32); inline;
  9972. public
  9973. procedure clearRDWR; inline;
  9974. procedure setRDWR; inline;
  9975. property DMACH : TBits_3 read getDMACH write setDMACH;
  9976. property RDWR : TBits_1 read getRDWR write setRDWR;
  9977. property w : TBits_32 read getw write setw;
  9978. end;
  9979. TDMAC_DCRCCON = record
  9980. private
  9981. function getBITO : TBits_1; inline;
  9982. function getBYTO : TBits_2; inline;
  9983. function getCRCAPP : TBits_1; inline;
  9984. function getCRCCH : TBits_3; inline;
  9985. function getCRCEN : TBits_1; inline;
  9986. function getCRCTYP : TBits_1; inline;
  9987. function getPLEN : TBits_5; inline;
  9988. function getWBO : TBits_1; inline;
  9989. function getw : TBits_32; inline;
  9990. procedure setBITO(thebits : TBits_1); inline;
  9991. procedure setBYTO(thebits : TBits_2); inline;
  9992. procedure setCRCAPP(thebits : TBits_1); inline;
  9993. procedure setCRCCH(thebits : TBits_3); inline;
  9994. procedure setCRCEN(thebits : TBits_1); inline;
  9995. procedure setCRCTYP(thebits : TBits_1); inline;
  9996. procedure setPLEN(thebits : TBits_5); inline;
  9997. procedure setWBO(thebits : TBits_1); inline;
  9998. procedure setw(thebits : TBits_32); inline;
  9999. public
  10000. procedure clearBITO; inline;
  10001. procedure clearCRCAPP; inline;
  10002. procedure clearCRCEN; inline;
  10003. procedure clearCRCTYP; inline;
  10004. procedure clearWBO; inline;
  10005. procedure setBITO; inline;
  10006. procedure setCRCAPP; inline;
  10007. procedure setCRCEN; inline;
  10008. procedure setCRCTYP; inline;
  10009. procedure setWBO; inline;
  10010. property BITO : TBits_1 read getBITO write setBITO;
  10011. property BYTO : TBits_2 read getBYTO write setBYTO;
  10012. property CRCAPP : TBits_1 read getCRCAPP write setCRCAPP;
  10013. property CRCCH : TBits_3 read getCRCCH write setCRCCH;
  10014. property CRCEN : TBits_1 read getCRCEN write setCRCEN;
  10015. property CRCTYP : TBits_1 read getCRCTYP write setCRCTYP;
  10016. property PLEN : TBits_5 read getPLEN write setPLEN;
  10017. property WBO : TBits_1 read getWBO write setWBO;
  10018. property w : TBits_32 read getw write setw;
  10019. end;
  10020. type
  10021. TDMACRegisters = record
  10022. DMACONbits : TDMAC_DMACON;
  10023. DMACON : longWord;
  10024. DMACONCLR : longWord;
  10025. DMACONSET : longWord;
  10026. DMACONINV : longWord;
  10027. DMASTATbits : TDMAC_DMASTAT;
  10028. DMASTAT : longWord;
  10029. DMASTATCLR : longWord;
  10030. DMASTATSET : longWord;
  10031. DMASTATINV : longWord;
  10032. DMAADDR : longWord;
  10033. DMAADDRCLR : longWord;
  10034. DMAADDRSET : longWord;
  10035. DMAADDRINV : longWord;
  10036. DCRCCONbits : TDMAC_DCRCCON;
  10037. DCRCCON : longWord;
  10038. DCRCCONCLR : longWord;
  10039. DCRCCONSET : longWord;
  10040. DCRCCONINV : longWord;
  10041. DCRCDATA : longWord;
  10042. DCRCDATACLR : longWord;
  10043. DCRCDATASET : longWord;
  10044. DCRCDATAINV : longWord;
  10045. DCRCXOR : longWord;
  10046. DCRCXORCLR : longWord;
  10047. DCRCXORSET : longWord;
  10048. DCRCXORINV : longWord;
  10049. end;
  10050. TDMAC0_DCH0CON = record
  10051. private
  10052. function getCHAED : TBits_1; inline;
  10053. function getCHAEN : TBits_1; inline;
  10054. function getCHBUSY : TBits_1; inline;
  10055. function getCHCHN : TBits_1; inline;
  10056. function getCHCHNS : TBits_1; inline;
  10057. function getCHEDET : TBits_1; inline;
  10058. function getCHEN : TBits_1; inline;
  10059. function getCHPRI : TBits_2; inline;
  10060. function getw : TBits_32; inline;
  10061. procedure setCHAED(thebits : TBits_1); inline;
  10062. procedure setCHAEN(thebits : TBits_1); inline;
  10063. procedure setCHBUSY(thebits : TBits_1); inline;
  10064. procedure setCHCHN(thebits : TBits_1); inline;
  10065. procedure setCHCHNS(thebits : TBits_1); inline;
  10066. procedure setCHEDET(thebits : TBits_1); inline;
  10067. procedure setCHEN(thebits : TBits_1); inline;
  10068. procedure setCHPRI(thebits : TBits_2); inline;
  10069. procedure setw(thebits : TBits_32); inline;
  10070. public
  10071. procedure clearCHAED; inline;
  10072. procedure clearCHAEN; inline;
  10073. procedure clearCHBUSY; inline;
  10074. procedure clearCHCHN; inline;
  10075. procedure clearCHCHNS; inline;
  10076. procedure clearCHEDET; inline;
  10077. procedure clearCHEN; inline;
  10078. procedure setCHAED; inline;
  10079. procedure setCHAEN; inline;
  10080. procedure setCHBUSY; inline;
  10081. procedure setCHCHN; inline;
  10082. procedure setCHCHNS; inline;
  10083. procedure setCHEDET; inline;
  10084. procedure setCHEN; inline;
  10085. property CHAED : TBits_1 read getCHAED write setCHAED;
  10086. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10087. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10088. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10089. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10090. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10091. property CHEN : TBits_1 read getCHEN write setCHEN;
  10092. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10093. property w : TBits_32 read getw write setw;
  10094. end;
  10095. TDMAC0_DCH0ECON = record
  10096. private
  10097. function getAIRQEN : TBits_1; inline;
  10098. function getCABORT : TBits_1; inline;
  10099. function getCFORCE : TBits_1; inline;
  10100. function getCHAIRQ : TBits_8; inline;
  10101. function getCHSIRQ : TBits_8; inline;
  10102. function getPATEN : TBits_1; inline;
  10103. function getSIRQEN : TBits_1; inline;
  10104. function getw : TBits_32; inline;
  10105. procedure setAIRQEN(thebits : TBits_1); inline;
  10106. procedure setCABORT(thebits : TBits_1); inline;
  10107. procedure setCFORCE(thebits : TBits_1); inline;
  10108. procedure setCHAIRQ(thebits : TBits_8); inline;
  10109. procedure setCHSIRQ(thebits : TBits_8); inline;
  10110. procedure setPATEN(thebits : TBits_1); inline;
  10111. procedure setSIRQEN(thebits : TBits_1); inline;
  10112. procedure setw(thebits : TBits_32); inline;
  10113. public
  10114. procedure clearAIRQEN; inline;
  10115. procedure clearCABORT; inline;
  10116. procedure clearCFORCE; inline;
  10117. procedure clearPATEN; inline;
  10118. procedure clearSIRQEN; inline;
  10119. procedure setAIRQEN; inline;
  10120. procedure setCABORT; inline;
  10121. procedure setCFORCE; inline;
  10122. procedure setPATEN; inline;
  10123. procedure setSIRQEN; inline;
  10124. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10125. property CABORT : TBits_1 read getCABORT write setCABORT;
  10126. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10127. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10128. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10129. property PATEN : TBits_1 read getPATEN write setPATEN;
  10130. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10131. property w : TBits_32 read getw write setw;
  10132. end;
  10133. TDMAC0_DCH0INT = record
  10134. private
  10135. function getCHBCIE : TBits_1; inline;
  10136. function getCHBCIF : TBits_1; inline;
  10137. function getCHCCIE : TBits_1; inline;
  10138. function getCHCCIF : TBits_1; inline;
  10139. function getCHDDIE : TBits_1; inline;
  10140. function getCHDDIF : TBits_1; inline;
  10141. function getCHDHIE : TBits_1; inline;
  10142. function getCHDHIF : TBits_1; inline;
  10143. function getCHERIE : TBits_1; inline;
  10144. function getCHERIF : TBits_1; inline;
  10145. function getCHSDIE : TBits_1; inline;
  10146. function getCHSDIF : TBits_1; inline;
  10147. function getCHSHIE : TBits_1; inline;
  10148. function getCHSHIF : TBits_1; inline;
  10149. function getCHTAIE : TBits_1; inline;
  10150. function getCHTAIF : TBits_1; inline;
  10151. function getw : TBits_32; inline;
  10152. procedure setCHBCIE(thebits : TBits_1); inline;
  10153. procedure setCHBCIF(thebits : TBits_1); inline;
  10154. procedure setCHCCIE(thebits : TBits_1); inline;
  10155. procedure setCHCCIF(thebits : TBits_1); inline;
  10156. procedure setCHDDIE(thebits : TBits_1); inline;
  10157. procedure setCHDDIF(thebits : TBits_1); inline;
  10158. procedure setCHDHIE(thebits : TBits_1); inline;
  10159. procedure setCHDHIF(thebits : TBits_1); inline;
  10160. procedure setCHERIE(thebits : TBits_1); inline;
  10161. procedure setCHERIF(thebits : TBits_1); inline;
  10162. procedure setCHSDIE(thebits : TBits_1); inline;
  10163. procedure setCHSDIF(thebits : TBits_1); inline;
  10164. procedure setCHSHIE(thebits : TBits_1); inline;
  10165. procedure setCHSHIF(thebits : TBits_1); inline;
  10166. procedure setCHTAIE(thebits : TBits_1); inline;
  10167. procedure setCHTAIF(thebits : TBits_1); inline;
  10168. procedure setw(thebits : TBits_32); inline;
  10169. public
  10170. procedure clearCHBCIE; inline;
  10171. procedure clearCHBCIF; inline;
  10172. procedure clearCHCCIE; inline;
  10173. procedure clearCHCCIF; inline;
  10174. procedure clearCHDDIE; inline;
  10175. procedure clearCHDDIF; inline;
  10176. procedure clearCHDHIE; inline;
  10177. procedure clearCHDHIF; inline;
  10178. procedure clearCHERIE; inline;
  10179. procedure clearCHERIF; inline;
  10180. procedure clearCHSDIE; inline;
  10181. procedure clearCHSDIF; inline;
  10182. procedure clearCHSHIE; inline;
  10183. procedure clearCHSHIF; inline;
  10184. procedure clearCHTAIE; inline;
  10185. procedure clearCHTAIF; inline;
  10186. procedure setCHBCIE; inline;
  10187. procedure setCHBCIF; inline;
  10188. procedure setCHCCIE; inline;
  10189. procedure setCHCCIF; inline;
  10190. procedure setCHDDIE; inline;
  10191. procedure setCHDDIF; inline;
  10192. procedure setCHDHIE; inline;
  10193. procedure setCHDHIF; inline;
  10194. procedure setCHERIE; inline;
  10195. procedure setCHERIF; inline;
  10196. procedure setCHSDIE; inline;
  10197. procedure setCHSDIF; inline;
  10198. procedure setCHSHIE; inline;
  10199. procedure setCHSHIF; inline;
  10200. procedure setCHTAIE; inline;
  10201. procedure setCHTAIF; inline;
  10202. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10203. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10204. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10205. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10206. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10207. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10208. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10209. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10210. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10211. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10212. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10213. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10214. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10215. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10216. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10217. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10218. property w : TBits_32 read getw write setw;
  10219. end;
  10220. type
  10221. TDMAC0Registers = record
  10222. DCH0CONbits : TDMAC0_DCH0CON;
  10223. DCH0CON : longWord;
  10224. DCH0CONCLR : longWord;
  10225. DCH0CONSET : longWord;
  10226. DCH0CONINV : longWord;
  10227. DCH0ECONbits : TDMAC0_DCH0ECON;
  10228. DCH0ECON : longWord;
  10229. DCH0ECONCLR : longWord;
  10230. DCH0ECONSET : longWord;
  10231. DCH0ECONINV : longWord;
  10232. DCH0INTbits : TDMAC0_DCH0INT;
  10233. DCH0INT : longWord;
  10234. DCH0INTCLR : longWord;
  10235. DCH0INTSET : longWord;
  10236. DCH0INTINV : longWord;
  10237. DCH0SSA : longWord;
  10238. DCH0SSACLR : longWord;
  10239. DCH0SSASET : longWord;
  10240. DCH0SSAINV : longWord;
  10241. DCH0DSA : longWord;
  10242. DCH0DSACLR : longWord;
  10243. DCH0DSASET : longWord;
  10244. DCH0DSAINV : longWord;
  10245. DCH0SSIZ : longWord;
  10246. DCH0SSIZCLR : longWord;
  10247. DCH0SSIZSET : longWord;
  10248. DCH0SSIZINV : longWord;
  10249. DCH0DSIZ : longWord;
  10250. DCH0DSIZCLR : longWord;
  10251. DCH0DSIZSET : longWord;
  10252. DCH0DSIZINV : longWord;
  10253. DCH0SPTR : longWord;
  10254. DCH0SPTRCLR : longWord;
  10255. DCH0SPTRSET : longWord;
  10256. DCH0SPTRINV : longWord;
  10257. DCH0DPTR : longWord;
  10258. DCH0DPTRCLR : longWord;
  10259. DCH0DPTRSET : longWord;
  10260. DCH0DPTRINV : longWord;
  10261. DCH0CSIZ : longWord;
  10262. DCH0CSIZCLR : longWord;
  10263. DCH0CSIZSET : longWord;
  10264. DCH0CSIZINV : longWord;
  10265. DCH0CPTR : longWord;
  10266. DCH0CPTRCLR : longWord;
  10267. DCH0CPTRSET : longWord;
  10268. DCH0CPTRINV : longWord;
  10269. DCH0DAT : longWord;
  10270. DCH0DATCLR : longWord;
  10271. DCH0DATSET : longWord;
  10272. DCH0DATINV : longWord;
  10273. end;
  10274. TDMAC1_DCH1CON = record
  10275. private
  10276. function getCHAED : TBits_1; inline;
  10277. function getCHAEN : TBits_1; inline;
  10278. function getCHBUSY : TBits_1; inline;
  10279. function getCHCHN : TBits_1; inline;
  10280. function getCHCHNS : TBits_1; inline;
  10281. function getCHEDET : TBits_1; inline;
  10282. function getCHEN : TBits_1; inline;
  10283. function getCHPRI : TBits_2; inline;
  10284. function getw : TBits_32; inline;
  10285. procedure setCHAED(thebits : TBits_1); inline;
  10286. procedure setCHAEN(thebits : TBits_1); inline;
  10287. procedure setCHBUSY(thebits : TBits_1); inline;
  10288. procedure setCHCHN(thebits : TBits_1); inline;
  10289. procedure setCHCHNS(thebits : TBits_1); inline;
  10290. procedure setCHEDET(thebits : TBits_1); inline;
  10291. procedure setCHEN(thebits : TBits_1); inline;
  10292. procedure setCHPRI(thebits : TBits_2); inline;
  10293. procedure setw(thebits : TBits_32); inline;
  10294. public
  10295. procedure clearCHAED; inline;
  10296. procedure clearCHAEN; inline;
  10297. procedure clearCHBUSY; inline;
  10298. procedure clearCHCHN; inline;
  10299. procedure clearCHCHNS; inline;
  10300. procedure clearCHEDET; inline;
  10301. procedure clearCHEN; inline;
  10302. procedure setCHAED; inline;
  10303. procedure setCHAEN; inline;
  10304. procedure setCHBUSY; inline;
  10305. procedure setCHCHN; inline;
  10306. procedure setCHCHNS; inline;
  10307. procedure setCHEDET; inline;
  10308. procedure setCHEN; inline;
  10309. property CHAED : TBits_1 read getCHAED write setCHAED;
  10310. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10311. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10312. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10313. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10314. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10315. property CHEN : TBits_1 read getCHEN write setCHEN;
  10316. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10317. property w : TBits_32 read getw write setw;
  10318. end;
  10319. TDMAC1_DCH1ECON = record
  10320. private
  10321. function getAIRQEN : TBits_1; inline;
  10322. function getCABORT : TBits_1; inline;
  10323. function getCFORCE : TBits_1; inline;
  10324. function getCHAIRQ : TBits_8; inline;
  10325. function getCHSIRQ : TBits_8; inline;
  10326. function getPATEN : TBits_1; inline;
  10327. function getSIRQEN : TBits_1; inline;
  10328. function getw : TBits_32; inline;
  10329. procedure setAIRQEN(thebits : TBits_1); inline;
  10330. procedure setCABORT(thebits : TBits_1); inline;
  10331. procedure setCFORCE(thebits : TBits_1); inline;
  10332. procedure setCHAIRQ(thebits : TBits_8); inline;
  10333. procedure setCHSIRQ(thebits : TBits_8); inline;
  10334. procedure setPATEN(thebits : TBits_1); inline;
  10335. procedure setSIRQEN(thebits : TBits_1); inline;
  10336. procedure setw(thebits : TBits_32); inline;
  10337. public
  10338. procedure clearAIRQEN; inline;
  10339. procedure clearCABORT; inline;
  10340. procedure clearCFORCE; inline;
  10341. procedure clearPATEN; inline;
  10342. procedure clearSIRQEN; inline;
  10343. procedure setAIRQEN; inline;
  10344. procedure setCABORT; inline;
  10345. procedure setCFORCE; inline;
  10346. procedure setPATEN; inline;
  10347. procedure setSIRQEN; inline;
  10348. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10349. property CABORT : TBits_1 read getCABORT write setCABORT;
  10350. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10351. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10352. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10353. property PATEN : TBits_1 read getPATEN write setPATEN;
  10354. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10355. property w : TBits_32 read getw write setw;
  10356. end;
  10357. TDMAC1_DCH1INT = record
  10358. private
  10359. function getCHBCIE : TBits_1; inline;
  10360. function getCHBCIF : TBits_1; inline;
  10361. function getCHCCIE : TBits_1; inline;
  10362. function getCHCCIF : TBits_1; inline;
  10363. function getCHDDIE : TBits_1; inline;
  10364. function getCHDDIF : TBits_1; inline;
  10365. function getCHDHIE : TBits_1; inline;
  10366. function getCHDHIF : TBits_1; inline;
  10367. function getCHERIE : TBits_1; inline;
  10368. function getCHERIF : TBits_1; inline;
  10369. function getCHSDIE : TBits_1; inline;
  10370. function getCHSDIF : TBits_1; inline;
  10371. function getCHSHIE : TBits_1; inline;
  10372. function getCHSHIF : TBits_1; inline;
  10373. function getCHTAIE : TBits_1; inline;
  10374. function getCHTAIF : TBits_1; inline;
  10375. function getw : TBits_32; inline;
  10376. procedure setCHBCIE(thebits : TBits_1); inline;
  10377. procedure setCHBCIF(thebits : TBits_1); inline;
  10378. procedure setCHCCIE(thebits : TBits_1); inline;
  10379. procedure setCHCCIF(thebits : TBits_1); inline;
  10380. procedure setCHDDIE(thebits : TBits_1); inline;
  10381. procedure setCHDDIF(thebits : TBits_1); inline;
  10382. procedure setCHDHIE(thebits : TBits_1); inline;
  10383. procedure setCHDHIF(thebits : TBits_1); inline;
  10384. procedure setCHERIE(thebits : TBits_1); inline;
  10385. procedure setCHERIF(thebits : TBits_1); inline;
  10386. procedure setCHSDIE(thebits : TBits_1); inline;
  10387. procedure setCHSDIF(thebits : TBits_1); inline;
  10388. procedure setCHSHIE(thebits : TBits_1); inline;
  10389. procedure setCHSHIF(thebits : TBits_1); inline;
  10390. procedure setCHTAIE(thebits : TBits_1); inline;
  10391. procedure setCHTAIF(thebits : TBits_1); inline;
  10392. procedure setw(thebits : TBits_32); inline;
  10393. public
  10394. procedure clearCHBCIE; inline;
  10395. procedure clearCHBCIF; inline;
  10396. procedure clearCHCCIE; inline;
  10397. procedure clearCHCCIF; inline;
  10398. procedure clearCHDDIE; inline;
  10399. procedure clearCHDDIF; inline;
  10400. procedure clearCHDHIE; inline;
  10401. procedure clearCHDHIF; inline;
  10402. procedure clearCHERIE; inline;
  10403. procedure clearCHERIF; inline;
  10404. procedure clearCHSDIE; inline;
  10405. procedure clearCHSDIF; inline;
  10406. procedure clearCHSHIE; inline;
  10407. procedure clearCHSHIF; inline;
  10408. procedure clearCHTAIE; inline;
  10409. procedure clearCHTAIF; inline;
  10410. procedure setCHBCIE; inline;
  10411. procedure setCHBCIF; inline;
  10412. procedure setCHCCIE; inline;
  10413. procedure setCHCCIF; inline;
  10414. procedure setCHDDIE; inline;
  10415. procedure setCHDDIF; inline;
  10416. procedure setCHDHIE; inline;
  10417. procedure setCHDHIF; inline;
  10418. procedure setCHERIE; inline;
  10419. procedure setCHERIF; inline;
  10420. procedure setCHSDIE; inline;
  10421. procedure setCHSDIF; inline;
  10422. procedure setCHSHIE; inline;
  10423. procedure setCHSHIF; inline;
  10424. procedure setCHTAIE; inline;
  10425. procedure setCHTAIF; inline;
  10426. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10427. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10428. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10429. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10430. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10431. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10432. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10433. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10434. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10435. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10436. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10437. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10438. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10439. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10440. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10441. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10442. property w : TBits_32 read getw write setw;
  10443. end;
  10444. type
  10445. TDMAC1Registers = record
  10446. DCH1CONbits : TDMAC1_DCH1CON;
  10447. DCH1CON : longWord;
  10448. DCH1CONCLR : longWord;
  10449. DCH1CONSET : longWord;
  10450. DCH1CONINV : longWord;
  10451. DCH1ECONbits : TDMAC1_DCH1ECON;
  10452. DCH1ECON : longWord;
  10453. DCH1ECONCLR : longWord;
  10454. DCH1ECONSET : longWord;
  10455. DCH1ECONINV : longWord;
  10456. DCH1INTbits : TDMAC1_DCH1INT;
  10457. DCH1INT : longWord;
  10458. DCH1INTCLR : longWord;
  10459. DCH1INTSET : longWord;
  10460. DCH1INTINV : longWord;
  10461. DCH1SSA : longWord;
  10462. DCH1SSACLR : longWord;
  10463. DCH1SSASET : longWord;
  10464. DCH1SSAINV : longWord;
  10465. DCH1DSA : longWord;
  10466. DCH1DSACLR : longWord;
  10467. DCH1DSASET : longWord;
  10468. DCH1DSAINV : longWord;
  10469. DCH1SSIZ : longWord;
  10470. DCH1SSIZCLR : longWord;
  10471. DCH1SSIZSET : longWord;
  10472. DCH1SSIZINV : longWord;
  10473. DCH1DSIZ : longWord;
  10474. DCH1DSIZCLR : longWord;
  10475. DCH1DSIZSET : longWord;
  10476. DCH1DSIZINV : longWord;
  10477. DCH1SPTR : longWord;
  10478. DCH1SPTRCLR : longWord;
  10479. DCH1SPTRSET : longWord;
  10480. DCH1SPTRINV : longWord;
  10481. DCH1DPTR : longWord;
  10482. DCH1DPTRCLR : longWord;
  10483. DCH1DPTRSET : longWord;
  10484. DCH1DPTRINV : longWord;
  10485. DCH1CSIZ : longWord;
  10486. DCH1CSIZCLR : longWord;
  10487. DCH1CSIZSET : longWord;
  10488. DCH1CSIZINV : longWord;
  10489. DCH1CPTR : longWord;
  10490. DCH1CPTRCLR : longWord;
  10491. DCH1CPTRSET : longWord;
  10492. DCH1CPTRINV : longWord;
  10493. DCH1DAT : longWord;
  10494. DCH1DATCLR : longWord;
  10495. DCH1DATSET : longWord;
  10496. DCH1DATINV : longWord;
  10497. end;
  10498. TDMAC2_DCH2CON = record
  10499. private
  10500. function getCHAED : TBits_1; inline;
  10501. function getCHAEN : TBits_1; inline;
  10502. function getCHBUSY : TBits_1; inline;
  10503. function getCHCHN : TBits_1; inline;
  10504. function getCHCHNS : TBits_1; inline;
  10505. function getCHEDET : TBits_1; inline;
  10506. function getCHEN : TBits_1; inline;
  10507. function getCHPRI : TBits_2; inline;
  10508. function getw : TBits_32; inline;
  10509. procedure setCHAED(thebits : TBits_1); inline;
  10510. procedure setCHAEN(thebits : TBits_1); inline;
  10511. procedure setCHBUSY(thebits : TBits_1); inline;
  10512. procedure setCHCHN(thebits : TBits_1); inline;
  10513. procedure setCHCHNS(thebits : TBits_1); inline;
  10514. procedure setCHEDET(thebits : TBits_1); inline;
  10515. procedure setCHEN(thebits : TBits_1); inline;
  10516. procedure setCHPRI(thebits : TBits_2); inline;
  10517. procedure setw(thebits : TBits_32); inline;
  10518. public
  10519. procedure clearCHAED; inline;
  10520. procedure clearCHAEN; inline;
  10521. procedure clearCHBUSY; inline;
  10522. procedure clearCHCHN; inline;
  10523. procedure clearCHCHNS; inline;
  10524. procedure clearCHEDET; inline;
  10525. procedure clearCHEN; inline;
  10526. procedure setCHAED; inline;
  10527. procedure setCHAEN; inline;
  10528. procedure setCHBUSY; inline;
  10529. procedure setCHCHN; inline;
  10530. procedure setCHCHNS; inline;
  10531. procedure setCHEDET; inline;
  10532. procedure setCHEN; inline;
  10533. property CHAED : TBits_1 read getCHAED write setCHAED;
  10534. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10535. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10536. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10537. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10538. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10539. property CHEN : TBits_1 read getCHEN write setCHEN;
  10540. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10541. property w : TBits_32 read getw write setw;
  10542. end;
  10543. TDMAC2_DCH2ECON = record
  10544. private
  10545. function getAIRQEN : TBits_1; inline;
  10546. function getCABORT : TBits_1; inline;
  10547. function getCFORCE : TBits_1; inline;
  10548. function getCHAIRQ : TBits_8; inline;
  10549. function getCHSIRQ : TBits_8; inline;
  10550. function getPATEN : TBits_1; inline;
  10551. function getSIRQEN : TBits_1; inline;
  10552. function getw : TBits_32; inline;
  10553. procedure setAIRQEN(thebits : TBits_1); inline;
  10554. procedure setCABORT(thebits : TBits_1); inline;
  10555. procedure setCFORCE(thebits : TBits_1); inline;
  10556. procedure setCHAIRQ(thebits : TBits_8); inline;
  10557. procedure setCHSIRQ(thebits : TBits_8); inline;
  10558. procedure setPATEN(thebits : TBits_1); inline;
  10559. procedure setSIRQEN(thebits : TBits_1); inline;
  10560. procedure setw(thebits : TBits_32); inline;
  10561. public
  10562. procedure clearAIRQEN; inline;
  10563. procedure clearCABORT; inline;
  10564. procedure clearCFORCE; inline;
  10565. procedure clearPATEN; inline;
  10566. procedure clearSIRQEN; inline;
  10567. procedure setAIRQEN; inline;
  10568. procedure setCABORT; inline;
  10569. procedure setCFORCE; inline;
  10570. procedure setPATEN; inline;
  10571. procedure setSIRQEN; inline;
  10572. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10573. property CABORT : TBits_1 read getCABORT write setCABORT;
  10574. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10575. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10576. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10577. property PATEN : TBits_1 read getPATEN write setPATEN;
  10578. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10579. property w : TBits_32 read getw write setw;
  10580. end;
  10581. TDMAC2_DCH2INT = record
  10582. private
  10583. function getCHBCIE : TBits_1; inline;
  10584. function getCHBCIF : TBits_1; inline;
  10585. function getCHCCIE : TBits_1; inline;
  10586. function getCHCCIF : TBits_1; inline;
  10587. function getCHDDIE : TBits_1; inline;
  10588. function getCHDDIF : TBits_1; inline;
  10589. function getCHDHIE : TBits_1; inline;
  10590. function getCHDHIF : TBits_1; inline;
  10591. function getCHERIE : TBits_1; inline;
  10592. function getCHERIF : TBits_1; inline;
  10593. function getCHSDIE : TBits_1; inline;
  10594. function getCHSDIF : TBits_1; inline;
  10595. function getCHSHIE : TBits_1; inline;
  10596. function getCHSHIF : TBits_1; inline;
  10597. function getCHTAIE : TBits_1; inline;
  10598. function getCHTAIF : TBits_1; inline;
  10599. function getw : TBits_32; inline;
  10600. procedure setCHBCIE(thebits : TBits_1); inline;
  10601. procedure setCHBCIF(thebits : TBits_1); inline;
  10602. procedure setCHCCIE(thebits : TBits_1); inline;
  10603. procedure setCHCCIF(thebits : TBits_1); inline;
  10604. procedure setCHDDIE(thebits : TBits_1); inline;
  10605. procedure setCHDDIF(thebits : TBits_1); inline;
  10606. procedure setCHDHIE(thebits : TBits_1); inline;
  10607. procedure setCHDHIF(thebits : TBits_1); inline;
  10608. procedure setCHERIE(thebits : TBits_1); inline;
  10609. procedure setCHERIF(thebits : TBits_1); inline;
  10610. procedure setCHSDIE(thebits : TBits_1); inline;
  10611. procedure setCHSDIF(thebits : TBits_1); inline;
  10612. procedure setCHSHIE(thebits : TBits_1); inline;
  10613. procedure setCHSHIF(thebits : TBits_1); inline;
  10614. procedure setCHTAIE(thebits : TBits_1); inline;
  10615. procedure setCHTAIF(thebits : TBits_1); inline;
  10616. procedure setw(thebits : TBits_32); inline;
  10617. public
  10618. procedure clearCHBCIE; inline;
  10619. procedure clearCHBCIF; inline;
  10620. procedure clearCHCCIE; inline;
  10621. procedure clearCHCCIF; inline;
  10622. procedure clearCHDDIE; inline;
  10623. procedure clearCHDDIF; inline;
  10624. procedure clearCHDHIE; inline;
  10625. procedure clearCHDHIF; inline;
  10626. procedure clearCHERIE; inline;
  10627. procedure clearCHERIF; inline;
  10628. procedure clearCHSDIE; inline;
  10629. procedure clearCHSDIF; inline;
  10630. procedure clearCHSHIE; inline;
  10631. procedure clearCHSHIF; inline;
  10632. procedure clearCHTAIE; inline;
  10633. procedure clearCHTAIF; inline;
  10634. procedure setCHBCIE; inline;
  10635. procedure setCHBCIF; inline;
  10636. procedure setCHCCIE; inline;
  10637. procedure setCHCCIF; inline;
  10638. procedure setCHDDIE; inline;
  10639. procedure setCHDDIF; inline;
  10640. procedure setCHDHIE; inline;
  10641. procedure setCHDHIF; inline;
  10642. procedure setCHERIE; inline;
  10643. procedure setCHERIF; inline;
  10644. procedure setCHSDIE; inline;
  10645. procedure setCHSDIF; inline;
  10646. procedure setCHSHIE; inline;
  10647. procedure setCHSHIF; inline;
  10648. procedure setCHTAIE; inline;
  10649. procedure setCHTAIF; inline;
  10650. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10651. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10652. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10653. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10654. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10655. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10656. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10657. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10658. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10659. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10660. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10661. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10662. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10663. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10664. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10665. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10666. property w : TBits_32 read getw write setw;
  10667. end;
  10668. type
  10669. TDMAC2Registers = record
  10670. DCH2CONbits : TDMAC2_DCH2CON;
  10671. DCH2CON : longWord;
  10672. DCH2CONCLR : longWord;
  10673. DCH2CONSET : longWord;
  10674. DCH2CONINV : longWord;
  10675. DCH2ECONbits : TDMAC2_DCH2ECON;
  10676. DCH2ECON : longWord;
  10677. DCH2ECONCLR : longWord;
  10678. DCH2ECONSET : longWord;
  10679. DCH2ECONINV : longWord;
  10680. DCH2INTbits : TDMAC2_DCH2INT;
  10681. DCH2INT : longWord;
  10682. DCH2INTCLR : longWord;
  10683. DCH2INTSET : longWord;
  10684. DCH2INTINV : longWord;
  10685. DCH2SSA : longWord;
  10686. DCH2SSACLR : longWord;
  10687. DCH2SSASET : longWord;
  10688. DCH2SSAINV : longWord;
  10689. DCH2DSA : longWord;
  10690. DCH2DSACLR : longWord;
  10691. DCH2DSASET : longWord;
  10692. DCH2DSAINV : longWord;
  10693. DCH2SSIZ : longWord;
  10694. DCH2SSIZCLR : longWord;
  10695. DCH2SSIZSET : longWord;
  10696. DCH2SSIZINV : longWord;
  10697. DCH2DSIZ : longWord;
  10698. DCH2DSIZCLR : longWord;
  10699. DCH2DSIZSET : longWord;
  10700. DCH2DSIZINV : longWord;
  10701. DCH2SPTR : longWord;
  10702. DCH2SPTRCLR : longWord;
  10703. DCH2SPTRSET : longWord;
  10704. DCH2SPTRINV : longWord;
  10705. DCH2DPTR : longWord;
  10706. DCH2DPTRCLR : longWord;
  10707. DCH2DPTRSET : longWord;
  10708. DCH2DPTRINV : longWord;
  10709. DCH2CSIZ : longWord;
  10710. DCH2CSIZCLR : longWord;
  10711. DCH2CSIZSET : longWord;
  10712. DCH2CSIZINV : longWord;
  10713. DCH2CPTR : longWord;
  10714. DCH2CPTRCLR : longWord;
  10715. DCH2CPTRSET : longWord;
  10716. DCH2CPTRINV : longWord;
  10717. DCH2DAT : longWord;
  10718. DCH2DATCLR : longWord;
  10719. DCH2DATSET : longWord;
  10720. DCH2DATINV : longWord;
  10721. end;
  10722. TDMAC3_DCH3CON = record
  10723. private
  10724. function getCHAED : TBits_1; inline;
  10725. function getCHAEN : TBits_1; inline;
  10726. function getCHBUSY : TBits_1; inline;
  10727. function getCHCHN : TBits_1; inline;
  10728. function getCHCHNS : TBits_1; inline;
  10729. function getCHEDET : TBits_1; inline;
  10730. function getCHEN : TBits_1; inline;
  10731. function getCHPRI : TBits_2; inline;
  10732. function getw : TBits_32; inline;
  10733. procedure setCHAED(thebits : TBits_1); inline;
  10734. procedure setCHAEN(thebits : TBits_1); inline;
  10735. procedure setCHBUSY(thebits : TBits_1); inline;
  10736. procedure setCHCHN(thebits : TBits_1); inline;
  10737. procedure setCHCHNS(thebits : TBits_1); inline;
  10738. procedure setCHEDET(thebits : TBits_1); inline;
  10739. procedure setCHEN(thebits : TBits_1); inline;
  10740. procedure setCHPRI(thebits : TBits_2); inline;
  10741. procedure setw(thebits : TBits_32); inline;
  10742. public
  10743. procedure clearCHAED; inline;
  10744. procedure clearCHAEN; inline;
  10745. procedure clearCHBUSY; inline;
  10746. procedure clearCHCHN; inline;
  10747. procedure clearCHCHNS; inline;
  10748. procedure clearCHEDET; inline;
  10749. procedure clearCHEN; inline;
  10750. procedure setCHAED; inline;
  10751. procedure setCHAEN; inline;
  10752. procedure setCHBUSY; inline;
  10753. procedure setCHCHN; inline;
  10754. procedure setCHCHNS; inline;
  10755. procedure setCHEDET; inline;
  10756. procedure setCHEN; inline;
  10757. property CHAED : TBits_1 read getCHAED write setCHAED;
  10758. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10759. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10760. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10761. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10762. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10763. property CHEN : TBits_1 read getCHEN write setCHEN;
  10764. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10765. property w : TBits_32 read getw write setw;
  10766. end;
  10767. TDMAC3_DCH3ECON = record
  10768. private
  10769. function getAIRQEN : TBits_1; inline;
  10770. function getCABORT : TBits_1; inline;
  10771. function getCFORCE : TBits_1; inline;
  10772. function getCHAIRQ : TBits_8; inline;
  10773. function getCHSIRQ : TBits_8; inline;
  10774. function getPATEN : TBits_1; inline;
  10775. function getSIRQEN : TBits_1; inline;
  10776. function getw : TBits_32; inline;
  10777. procedure setAIRQEN(thebits : TBits_1); inline;
  10778. procedure setCABORT(thebits : TBits_1); inline;
  10779. procedure setCFORCE(thebits : TBits_1); inline;
  10780. procedure setCHAIRQ(thebits : TBits_8); inline;
  10781. procedure setCHSIRQ(thebits : TBits_8); inline;
  10782. procedure setPATEN(thebits : TBits_1); inline;
  10783. procedure setSIRQEN(thebits : TBits_1); inline;
  10784. procedure setw(thebits : TBits_32); inline;
  10785. public
  10786. procedure clearAIRQEN; inline;
  10787. procedure clearCABORT; inline;
  10788. procedure clearCFORCE; inline;
  10789. procedure clearPATEN; inline;
  10790. procedure clearSIRQEN; inline;
  10791. procedure setAIRQEN; inline;
  10792. procedure setCABORT; inline;
  10793. procedure setCFORCE; inline;
  10794. procedure setPATEN; inline;
  10795. procedure setSIRQEN; inline;
  10796. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10797. property CABORT : TBits_1 read getCABORT write setCABORT;
  10798. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10799. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10800. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10801. property PATEN : TBits_1 read getPATEN write setPATEN;
  10802. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10803. property w : TBits_32 read getw write setw;
  10804. end;
  10805. TDMAC3_DCH3INT = record
  10806. private
  10807. function getCHBCIE : TBits_1; inline;
  10808. function getCHBCIF : TBits_1; inline;
  10809. function getCHCCIE : TBits_1; inline;
  10810. function getCHCCIF : TBits_1; inline;
  10811. function getCHDDIE : TBits_1; inline;
  10812. function getCHDDIF : TBits_1; inline;
  10813. function getCHDHIE : TBits_1; inline;
  10814. function getCHDHIF : TBits_1; inline;
  10815. function getCHERIE : TBits_1; inline;
  10816. function getCHERIF : TBits_1; inline;
  10817. function getCHSDIE : TBits_1; inline;
  10818. function getCHSDIF : TBits_1; inline;
  10819. function getCHSHIE : TBits_1; inline;
  10820. function getCHSHIF : TBits_1; inline;
  10821. function getCHTAIE : TBits_1; inline;
  10822. function getCHTAIF : TBits_1; inline;
  10823. function getw : TBits_32; inline;
  10824. procedure setCHBCIE(thebits : TBits_1); inline;
  10825. procedure setCHBCIF(thebits : TBits_1); inline;
  10826. procedure setCHCCIE(thebits : TBits_1); inline;
  10827. procedure setCHCCIF(thebits : TBits_1); inline;
  10828. procedure setCHDDIE(thebits : TBits_1); inline;
  10829. procedure setCHDDIF(thebits : TBits_1); inline;
  10830. procedure setCHDHIE(thebits : TBits_1); inline;
  10831. procedure setCHDHIF(thebits : TBits_1); inline;
  10832. procedure setCHERIE(thebits : TBits_1); inline;
  10833. procedure setCHERIF(thebits : TBits_1); inline;
  10834. procedure setCHSDIE(thebits : TBits_1); inline;
  10835. procedure setCHSDIF(thebits : TBits_1); inline;
  10836. procedure setCHSHIE(thebits : TBits_1); inline;
  10837. procedure setCHSHIF(thebits : TBits_1); inline;
  10838. procedure setCHTAIE(thebits : TBits_1); inline;
  10839. procedure setCHTAIF(thebits : TBits_1); inline;
  10840. procedure setw(thebits : TBits_32); inline;
  10841. public
  10842. procedure clearCHBCIE; inline;
  10843. procedure clearCHBCIF; inline;
  10844. procedure clearCHCCIE; inline;
  10845. procedure clearCHCCIF; inline;
  10846. procedure clearCHDDIE; inline;
  10847. procedure clearCHDDIF; inline;
  10848. procedure clearCHDHIE; inline;
  10849. procedure clearCHDHIF; inline;
  10850. procedure clearCHERIE; inline;
  10851. procedure clearCHERIF; inline;
  10852. procedure clearCHSDIE; inline;
  10853. procedure clearCHSDIF; inline;
  10854. procedure clearCHSHIE; inline;
  10855. procedure clearCHSHIF; inline;
  10856. procedure clearCHTAIE; inline;
  10857. procedure clearCHTAIF; inline;
  10858. procedure setCHBCIE; inline;
  10859. procedure setCHBCIF; inline;
  10860. procedure setCHCCIE; inline;
  10861. procedure setCHCCIF; inline;
  10862. procedure setCHDDIE; inline;
  10863. procedure setCHDDIF; inline;
  10864. procedure setCHDHIE; inline;
  10865. procedure setCHDHIF; inline;
  10866. procedure setCHERIE; inline;
  10867. procedure setCHERIF; inline;
  10868. procedure setCHSDIE; inline;
  10869. procedure setCHSDIF; inline;
  10870. procedure setCHSHIE; inline;
  10871. procedure setCHSHIF; inline;
  10872. procedure setCHTAIE; inline;
  10873. procedure setCHTAIF; inline;
  10874. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10875. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10876. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10877. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10878. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10879. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10880. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10881. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10882. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10883. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10884. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10885. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10886. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10887. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10888. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10889. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10890. property w : TBits_32 read getw write setw;
  10891. end;
  10892. type
  10893. TDMAC3Registers = record
  10894. DCH3CONbits : TDMAC3_DCH3CON;
  10895. DCH3CON : longWord;
  10896. DCH3CONCLR : longWord;
  10897. DCH3CONSET : longWord;
  10898. DCH3CONINV : longWord;
  10899. DCH3ECONbits : TDMAC3_DCH3ECON;
  10900. DCH3ECON : longWord;
  10901. DCH3ECONCLR : longWord;
  10902. DCH3ECONSET : longWord;
  10903. DCH3ECONINV : longWord;
  10904. DCH3INTbits : TDMAC3_DCH3INT;
  10905. DCH3INT : longWord;
  10906. DCH3INTCLR : longWord;
  10907. DCH3INTSET : longWord;
  10908. DCH3INTINV : longWord;
  10909. DCH3SSA : longWord;
  10910. DCH3SSACLR : longWord;
  10911. DCH3SSASET : longWord;
  10912. DCH3SSAINV : longWord;
  10913. DCH3DSA : longWord;
  10914. DCH3DSACLR : longWord;
  10915. DCH3DSASET : longWord;
  10916. DCH3DSAINV : longWord;
  10917. DCH3SSIZ : longWord;
  10918. DCH3SSIZCLR : longWord;
  10919. DCH3SSIZSET : longWord;
  10920. DCH3SSIZINV : longWord;
  10921. DCH3DSIZ : longWord;
  10922. DCH3DSIZCLR : longWord;
  10923. DCH3DSIZSET : longWord;
  10924. DCH3DSIZINV : longWord;
  10925. DCH3SPTR : longWord;
  10926. DCH3SPTRCLR : longWord;
  10927. DCH3SPTRSET : longWord;
  10928. DCH3SPTRINV : longWord;
  10929. DCH3DPTR : longWord;
  10930. DCH3DPTRCLR : longWord;
  10931. DCH3DPTRSET : longWord;
  10932. DCH3DPTRINV : longWord;
  10933. DCH3CSIZ : longWord;
  10934. DCH3CSIZCLR : longWord;
  10935. DCH3CSIZSET : longWord;
  10936. DCH3CSIZINV : longWord;
  10937. DCH3CPTR : longWord;
  10938. DCH3CPTRCLR : longWord;
  10939. DCH3CPTRSET : longWord;
  10940. DCH3CPTRINV : longWord;
  10941. DCH3DAT : longWord;
  10942. DCH3DATCLR : longWord;
  10943. DCH3DATSET : longWord;
  10944. DCH3DATINV : longWord;
  10945. end;
  10946. TDMAC4_DCH4CON = record
  10947. private
  10948. function getCHAED : TBits_1; inline;
  10949. function getCHAEN : TBits_1; inline;
  10950. function getCHBUSY : TBits_1; inline;
  10951. function getCHCHN : TBits_1; inline;
  10952. function getCHCHNS : TBits_1; inline;
  10953. function getCHEDET : TBits_1; inline;
  10954. function getCHEN : TBits_1; inline;
  10955. function getCHPRI : TBits_2; inline;
  10956. function getw : TBits_32; inline;
  10957. procedure setCHAED(thebits : TBits_1); inline;
  10958. procedure setCHAEN(thebits : TBits_1); inline;
  10959. procedure setCHBUSY(thebits : TBits_1); inline;
  10960. procedure setCHCHN(thebits : TBits_1); inline;
  10961. procedure setCHCHNS(thebits : TBits_1); inline;
  10962. procedure setCHEDET(thebits : TBits_1); inline;
  10963. procedure setCHEN(thebits : TBits_1); inline;
  10964. procedure setCHPRI(thebits : TBits_2); inline;
  10965. procedure setw(thebits : TBits_32); inline;
  10966. public
  10967. procedure clearCHAED; inline;
  10968. procedure clearCHAEN; inline;
  10969. procedure clearCHBUSY; inline;
  10970. procedure clearCHCHN; inline;
  10971. procedure clearCHCHNS; inline;
  10972. procedure clearCHEDET; inline;
  10973. procedure clearCHEN; inline;
  10974. procedure setCHAED; inline;
  10975. procedure setCHAEN; inline;
  10976. procedure setCHBUSY; inline;
  10977. procedure setCHCHN; inline;
  10978. procedure setCHCHNS; inline;
  10979. procedure setCHEDET; inline;
  10980. procedure setCHEN; inline;
  10981. property CHAED : TBits_1 read getCHAED write setCHAED;
  10982. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10983. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10984. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10985. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10986. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10987. property CHEN : TBits_1 read getCHEN write setCHEN;
  10988. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10989. property w : TBits_32 read getw write setw;
  10990. end;
  10991. TDMAC4_DCH4ECON = record
  10992. private
  10993. function getAIRQEN : TBits_1; inline;
  10994. function getCABORT : TBits_1; inline;
  10995. function getCFORCE : TBits_1; inline;
  10996. function getCHAIRQ : TBits_8; inline;
  10997. function getCHSIRQ : TBits_8; inline;
  10998. function getPATEN : TBits_1; inline;
  10999. function getSIRQEN : TBits_1; inline;
  11000. function getw : TBits_32; inline;
  11001. procedure setAIRQEN(thebits : TBits_1); inline;
  11002. procedure setCABORT(thebits : TBits_1); inline;
  11003. procedure setCFORCE(thebits : TBits_1); inline;
  11004. procedure setCHAIRQ(thebits : TBits_8); inline;
  11005. procedure setCHSIRQ(thebits : TBits_8); inline;
  11006. procedure setPATEN(thebits : TBits_1); inline;
  11007. procedure setSIRQEN(thebits : TBits_1); inline;
  11008. procedure setw(thebits : TBits_32); inline;
  11009. public
  11010. procedure clearAIRQEN; inline;
  11011. procedure clearCABORT; inline;
  11012. procedure clearCFORCE; inline;
  11013. procedure clearPATEN; inline;
  11014. procedure clearSIRQEN; inline;
  11015. procedure setAIRQEN; inline;
  11016. procedure setCABORT; inline;
  11017. procedure setCFORCE; inline;
  11018. procedure setPATEN; inline;
  11019. procedure setSIRQEN; inline;
  11020. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11021. property CABORT : TBits_1 read getCABORT write setCABORT;
  11022. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11023. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11024. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11025. property PATEN : TBits_1 read getPATEN write setPATEN;
  11026. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11027. property w : TBits_32 read getw write setw;
  11028. end;
  11029. TDMAC4_DCH4INT = record
  11030. private
  11031. function getCHBCIE : TBits_1; inline;
  11032. function getCHBCIF : TBits_1; inline;
  11033. function getCHCCIE : TBits_1; inline;
  11034. function getCHCCIF : TBits_1; inline;
  11035. function getCHDDIE : TBits_1; inline;
  11036. function getCHDDIF : TBits_1; inline;
  11037. function getCHDHIE : TBits_1; inline;
  11038. function getCHDHIF : TBits_1; inline;
  11039. function getCHERIE : TBits_1; inline;
  11040. function getCHERIF : TBits_1; inline;
  11041. function getCHSDIE : TBits_1; inline;
  11042. function getCHSDIF : TBits_1; inline;
  11043. function getCHSHIE : TBits_1; inline;
  11044. function getCHSHIF : TBits_1; inline;
  11045. function getCHTAIE : TBits_1; inline;
  11046. function getCHTAIF : TBits_1; inline;
  11047. function getw : TBits_32; inline;
  11048. procedure setCHBCIE(thebits : TBits_1); inline;
  11049. procedure setCHBCIF(thebits : TBits_1); inline;
  11050. procedure setCHCCIE(thebits : TBits_1); inline;
  11051. procedure setCHCCIF(thebits : TBits_1); inline;
  11052. procedure setCHDDIE(thebits : TBits_1); inline;
  11053. procedure setCHDDIF(thebits : TBits_1); inline;
  11054. procedure setCHDHIE(thebits : TBits_1); inline;
  11055. procedure setCHDHIF(thebits : TBits_1); inline;
  11056. procedure setCHERIE(thebits : TBits_1); inline;
  11057. procedure setCHERIF(thebits : TBits_1); inline;
  11058. procedure setCHSDIE(thebits : TBits_1); inline;
  11059. procedure setCHSDIF(thebits : TBits_1); inline;
  11060. procedure setCHSHIE(thebits : TBits_1); inline;
  11061. procedure setCHSHIF(thebits : TBits_1); inline;
  11062. procedure setCHTAIE(thebits : TBits_1); inline;
  11063. procedure setCHTAIF(thebits : TBits_1); inline;
  11064. procedure setw(thebits : TBits_32); inline;
  11065. public
  11066. procedure clearCHBCIE; inline;
  11067. procedure clearCHBCIF; inline;
  11068. procedure clearCHCCIE; inline;
  11069. procedure clearCHCCIF; inline;
  11070. procedure clearCHDDIE; inline;
  11071. procedure clearCHDDIF; inline;
  11072. procedure clearCHDHIE; inline;
  11073. procedure clearCHDHIF; inline;
  11074. procedure clearCHERIE; inline;
  11075. procedure clearCHERIF; inline;
  11076. procedure clearCHSDIE; inline;
  11077. procedure clearCHSDIF; inline;
  11078. procedure clearCHSHIE; inline;
  11079. procedure clearCHSHIF; inline;
  11080. procedure clearCHTAIE; inline;
  11081. procedure clearCHTAIF; inline;
  11082. procedure setCHBCIE; inline;
  11083. procedure setCHBCIF; inline;
  11084. procedure setCHCCIE; inline;
  11085. procedure setCHCCIF; inline;
  11086. procedure setCHDDIE; inline;
  11087. procedure setCHDDIF; inline;
  11088. procedure setCHDHIE; inline;
  11089. procedure setCHDHIF; inline;
  11090. procedure setCHERIE; inline;
  11091. procedure setCHERIF; inline;
  11092. procedure setCHSDIE; inline;
  11093. procedure setCHSDIF; inline;
  11094. procedure setCHSHIE; inline;
  11095. procedure setCHSHIF; inline;
  11096. procedure setCHTAIE; inline;
  11097. procedure setCHTAIF; inline;
  11098. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  11099. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  11100. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  11101. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  11102. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  11103. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  11104. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  11105. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  11106. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  11107. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  11108. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  11109. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  11110. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  11111. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  11112. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  11113. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  11114. property w : TBits_32 read getw write setw;
  11115. end;
  11116. type
  11117. TDMAC4Registers = record
  11118. DCH4CONbits : TDMAC4_DCH4CON;
  11119. DCH4CON : longWord;
  11120. DCH4CONCLR : longWord;
  11121. DCH4CONSET : longWord;
  11122. DCH4CONINV : longWord;
  11123. DCH4ECONbits : TDMAC4_DCH4ECON;
  11124. DCH4ECON : longWord;
  11125. DCH4ECONCLR : longWord;
  11126. DCH4ECONSET : longWord;
  11127. DCH4ECONINV : longWord;
  11128. DCH4INTbits : TDMAC4_DCH4INT;
  11129. DCH4INT : longWord;
  11130. DCH4INTCLR : longWord;
  11131. DCH4INTSET : longWord;
  11132. DCH4INTINV : longWord;
  11133. DCH4SSA : longWord;
  11134. DCH4SSACLR : longWord;
  11135. DCH4SSASET : longWord;
  11136. DCH4SSAINV : longWord;
  11137. DCH4DSA : longWord;
  11138. DCH4DSACLR : longWord;
  11139. DCH4DSASET : longWord;
  11140. DCH4DSAINV : longWord;
  11141. DCH4SSIZ : longWord;
  11142. DCH4SSIZCLR : longWord;
  11143. DCH4SSIZSET : longWord;
  11144. DCH4SSIZINV : longWord;
  11145. DCH4DSIZ : longWord;
  11146. DCH4DSIZCLR : longWord;
  11147. DCH4DSIZSET : longWord;
  11148. DCH4DSIZINV : longWord;
  11149. DCH4SPTR : longWord;
  11150. DCH4SPTRCLR : longWord;
  11151. DCH4SPTRSET : longWord;
  11152. DCH4SPTRINV : longWord;
  11153. DCH4DPTR : longWord;
  11154. DCH4DPTRCLR : longWord;
  11155. DCH4DPTRSET : longWord;
  11156. DCH4DPTRINV : longWord;
  11157. DCH4CSIZ : longWord;
  11158. DCH4CSIZCLR : longWord;
  11159. DCH4CSIZSET : longWord;
  11160. DCH4CSIZINV : longWord;
  11161. DCH4CPTR : longWord;
  11162. DCH4CPTRCLR : longWord;
  11163. DCH4CPTRSET : longWord;
  11164. DCH4CPTRINV : longWord;
  11165. DCH4DAT : longWord;
  11166. DCH4DATCLR : longWord;
  11167. DCH4DATSET : longWord;
  11168. DCH4DATINV : longWord;
  11169. end;
  11170. TDMAC5_DCH5CON = record
  11171. private
  11172. function getCHAED : TBits_1; inline;
  11173. function getCHAEN : TBits_1; inline;
  11174. function getCHBUSY : TBits_1; inline;
  11175. function getCHCHN : TBits_1; inline;
  11176. function getCHCHNS : TBits_1; inline;
  11177. function getCHEDET : TBits_1; inline;
  11178. function getCHEN : TBits_1; inline;
  11179. function getCHPRI : TBits_2; inline;
  11180. function getw : TBits_32; inline;
  11181. procedure setCHAED(thebits : TBits_1); inline;
  11182. procedure setCHAEN(thebits : TBits_1); inline;
  11183. procedure setCHBUSY(thebits : TBits_1); inline;
  11184. procedure setCHCHN(thebits : TBits_1); inline;
  11185. procedure setCHCHNS(thebits : TBits_1); inline;
  11186. procedure setCHEDET(thebits : TBits_1); inline;
  11187. procedure setCHEN(thebits : TBits_1); inline;
  11188. procedure setCHPRI(thebits : TBits_2); inline;
  11189. procedure setw(thebits : TBits_32); inline;
  11190. public
  11191. procedure clearCHAED; inline;
  11192. procedure clearCHAEN; inline;
  11193. procedure clearCHBUSY; inline;
  11194. procedure clearCHCHN; inline;
  11195. procedure clearCHCHNS; inline;
  11196. procedure clearCHEDET; inline;
  11197. procedure clearCHEN; inline;
  11198. procedure setCHAED; inline;
  11199. procedure setCHAEN; inline;
  11200. procedure setCHBUSY; inline;
  11201. procedure setCHCHN; inline;
  11202. procedure setCHCHNS; inline;
  11203. procedure setCHEDET; inline;
  11204. procedure setCHEN; inline;
  11205. property CHAED : TBits_1 read getCHAED write setCHAED;
  11206. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  11207. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  11208. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  11209. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  11210. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  11211. property CHEN : TBits_1 read getCHEN write setCHEN;
  11212. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  11213. property w : TBits_32 read getw write setw;
  11214. end;
  11215. TDMAC5_DCH5ECON = record
  11216. private
  11217. function getAIRQEN : TBits_1; inline;
  11218. function getCABORT : TBits_1; inline;
  11219. function getCFORCE : TBits_1; inline;
  11220. function getCHAIRQ : TBits_8; inline;
  11221. function getCHSIRQ : TBits_8; inline;
  11222. function getPATEN : TBits_1; inline;
  11223. function getSIRQEN : TBits_1; inline;
  11224. function getw : TBits_32; inline;
  11225. procedure setAIRQEN(thebits : TBits_1); inline;
  11226. procedure setCABORT(thebits : TBits_1); inline;
  11227. procedure setCFORCE(thebits : TBits_1); inline;
  11228. procedure setCHAIRQ(thebits : TBits_8); inline;
  11229. procedure setCHSIRQ(thebits : TBits_8); inline;
  11230. procedure setPATEN(thebits : TBits_1); inline;
  11231. procedure setSIRQEN(thebits : TBits_1); inline;
  11232. procedure setw(thebits : TBits_32); inline;
  11233. public
  11234. procedure clearAIRQEN; inline;
  11235. procedure clearCABORT; inline;
  11236. procedure clearCFORCE; inline;
  11237. procedure clearPATEN; inline;
  11238. procedure clearSIRQEN; inline;
  11239. procedure setAIRQEN; inline;
  11240. procedure setCABORT; inline;
  11241. procedure setCFORCE; inline;
  11242. procedure setPATEN; inline;
  11243. procedure setSIRQEN; inline;
  11244. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11245. property CABORT : TBits_1 read getCABORT write setCABORT;
  11246. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11247. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11248. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11249. property PATEN : TBits_1 read getPATEN write setPATEN;
  11250. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11251. property w : TBits_32 read getw write setw;
  11252. end;
  11253. TDMAC5_DCH5INT = record
  11254. private
  11255. function getCHBCIE : TBits_1; inline;
  11256. function getCHBCIF : TBits_1; inline;
  11257. function getCHCCIE : TBits_1; inline;
  11258. function getCHCCIF : TBits_1; inline;
  11259. function getCHDDIE : TBits_1; inline;
  11260. function getCHDDIF : TBits_1; inline;
  11261. function getCHDHIE : TBits_1; inline;
  11262. function getCHDHIF : TBits_1; inline;
  11263. function getCHERIE : TBits_1; inline;
  11264. function getCHERIF : TBits_1; inline;
  11265. function getCHSDIE : TBits_1; inline;
  11266. function getCHSDIF : TBits_1; inline;
  11267. function getCHSHIE : TBits_1; inline;
  11268. function getCHSHIF : TBits_1; inline;
  11269. function getCHTAIE : TBits_1; inline;
  11270. function getCHTAIF : TBits_1; inline;
  11271. function getw : TBits_32; inline;
  11272. procedure setCHBCIE(thebits : TBits_1); inline;
  11273. procedure setCHBCIF(thebits : TBits_1); inline;
  11274. procedure setCHCCIE(thebits : TBits_1); inline;
  11275. procedure setCHCCIF(thebits : TBits_1); inline;
  11276. procedure setCHDDIE(thebits : TBits_1); inline;
  11277. procedure setCHDDIF(thebits : TBits_1); inline;
  11278. procedure setCHDHIE(thebits : TBits_1); inline;
  11279. procedure setCHDHIF(thebits : TBits_1); inline;
  11280. procedure setCHERIE(thebits : TBits_1); inline;
  11281. procedure setCHERIF(thebits : TBits_1); inline;
  11282. procedure setCHSDIE(thebits : TBits_1); inline;
  11283. procedure setCHSDIF(thebits : TBits_1); inline;
  11284. procedure setCHSHIE(thebits : TBits_1); inline;
  11285. procedure setCHSHIF(thebits : TBits_1); inline;
  11286. procedure setCHTAIE(thebits : TBits_1); inline;
  11287. procedure setCHTAIF(thebits : TBits_1); inline;
  11288. procedure setw(thebits : TBits_32); inline;
  11289. public
  11290. procedure clearCHBCIE; inline;
  11291. procedure clearCHBCIF; inline;
  11292. procedure clearCHCCIE; inline;
  11293. procedure clearCHCCIF; inline;
  11294. procedure clearCHDDIE; inline;
  11295. procedure clearCHDDIF; inline;
  11296. procedure clearCHDHIE; inline;
  11297. procedure clearCHDHIF; inline;
  11298. procedure clearCHERIE; inline;
  11299. procedure clearCHERIF; inline;
  11300. procedure clearCHSDIE; inline;
  11301. procedure clearCHSDIF; inline;
  11302. procedure clearCHSHIE; inline;
  11303. procedure clearCHSHIF; inline;
  11304. procedure clearCHTAIE; inline;
  11305. procedure clearCHTAIF; inline;
  11306. procedure setCHBCIE; inline;
  11307. procedure setCHBCIF; inline;
  11308. procedure setCHCCIE; inline;
  11309. procedure setCHCCIF; inline;
  11310. procedure setCHDDIE; inline;
  11311. procedure setCHDDIF; inline;
  11312. procedure setCHDHIE; inline;
  11313. procedure setCHDHIF; inline;
  11314. procedure setCHERIE; inline;
  11315. procedure setCHERIF; inline;
  11316. procedure setCHSDIE; inline;
  11317. procedure setCHSDIF; inline;
  11318. procedure setCHSHIE; inline;
  11319. procedure setCHSHIF; inline;
  11320. procedure setCHTAIE; inline;
  11321. procedure setCHTAIF; inline;
  11322. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  11323. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  11324. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  11325. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  11326. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  11327. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  11328. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  11329. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  11330. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  11331. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  11332. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  11333. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  11334. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  11335. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  11336. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  11337. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  11338. property w : TBits_32 read getw write setw;
  11339. end;
  11340. type
  11341. TDMAC5Registers = record
  11342. DCH5CONbits : TDMAC5_DCH5CON;
  11343. DCH5CON : longWord;
  11344. DCH5CONCLR : longWord;
  11345. DCH5CONSET : longWord;
  11346. DCH5CONINV : longWord;
  11347. DCH5ECONbits : TDMAC5_DCH5ECON;
  11348. DCH5ECON : longWord;
  11349. DCH5ECONCLR : longWord;
  11350. DCH5ECONSET : longWord;
  11351. DCH5ECONINV : longWord;
  11352. DCH5INTbits : TDMAC5_DCH5INT;
  11353. DCH5INT : longWord;
  11354. DCH5INTCLR : longWord;
  11355. DCH5INTSET : longWord;
  11356. DCH5INTINV : longWord;
  11357. DCH5SSA : longWord;
  11358. DCH5SSACLR : longWord;
  11359. DCH5SSASET : longWord;
  11360. DCH5SSAINV : longWord;
  11361. DCH5DSA : longWord;
  11362. DCH5DSACLR : longWord;
  11363. DCH5DSASET : longWord;
  11364. DCH5DSAINV : longWord;
  11365. DCH5SSIZ : longWord;
  11366. DCH5SSIZCLR : longWord;
  11367. DCH5SSIZSET : longWord;
  11368. DCH5SSIZINV : longWord;
  11369. DCH5DSIZ : longWord;
  11370. DCH5DSIZCLR : longWord;
  11371. DCH5DSIZSET : longWord;
  11372. DCH5DSIZINV : longWord;
  11373. DCH5SPTR : longWord;
  11374. DCH5SPTRCLR : longWord;
  11375. DCH5SPTRSET : longWord;
  11376. DCH5SPTRINV : longWord;
  11377. DCH5DPTR : longWord;
  11378. DCH5DPTRCLR : longWord;
  11379. DCH5DPTRSET : longWord;
  11380. DCH5DPTRINV : longWord;
  11381. DCH5CSIZ : longWord;
  11382. DCH5CSIZCLR : longWord;
  11383. DCH5CSIZSET : longWord;
  11384. DCH5CSIZINV : longWord;
  11385. DCH5CPTR : longWord;
  11386. DCH5CPTRCLR : longWord;
  11387. DCH5CPTRSET : longWord;
  11388. DCH5CPTRINV : longWord;
  11389. DCH5DAT : longWord;
  11390. DCH5DATCLR : longWord;
  11391. DCH5DATSET : longWord;
  11392. DCH5DATINV : longWord;
  11393. end;
  11394. TDMAC6_DCH6CON = record
  11395. private
  11396. function getCHAED : TBits_1; inline;
  11397. function getCHAEN : TBits_1; inline;
  11398. function getCHBUSY : TBits_1; inline;
  11399. function getCHCHN : TBits_1; inline;
  11400. function getCHCHNS : TBits_1; inline;
  11401. function getCHEDET : TBits_1; inline;
  11402. function getCHEN : TBits_1; inline;
  11403. function getCHPRI : TBits_2; inline;
  11404. function getw : TBits_32; inline;
  11405. procedure setCHAED(thebits : TBits_1); inline;
  11406. procedure setCHAEN(thebits : TBits_1); inline;
  11407. procedure setCHBUSY(thebits : TBits_1); inline;
  11408. procedure setCHCHN(thebits : TBits_1); inline;
  11409. procedure setCHCHNS(thebits : TBits_1); inline;
  11410. procedure setCHEDET(thebits : TBits_1); inline;
  11411. procedure setCHEN(thebits : TBits_1); inline;
  11412. procedure setCHPRI(thebits : TBits_2); inline;
  11413. procedure setw(thebits : TBits_32); inline;
  11414. public
  11415. procedure clearCHAED; inline;
  11416. procedure clearCHAEN; inline;
  11417. procedure clearCHBUSY; inline;
  11418. procedure clearCHCHN; inline;
  11419. procedure clearCHCHNS; inline;
  11420. procedure clearCHEDET; inline;
  11421. procedure clearCHEN; inline;
  11422. procedure setCHAED; inline;
  11423. procedure setCHAEN; inline;
  11424. procedure setCHBUSY; inline;
  11425. procedure setCHCHN; inline;
  11426. procedure setCHCHNS; inline;
  11427. procedure setCHEDET; inline;
  11428. procedure setCHEN; inline;
  11429. property CHAED : TBits_1 read getCHAED write setCHAED;
  11430. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  11431. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  11432. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  11433. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  11434. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  11435. property CHEN : TBits_1 read getCHEN write setCHEN;
  11436. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  11437. property w : TBits_32 read getw write setw;
  11438. end;
  11439. TDMAC6_DCH6ECON = record
  11440. private
  11441. function getAIRQEN : TBits_1; inline;
  11442. function getCABORT : TBits_1; inline;
  11443. function getCFORCE : TBits_1; inline;
  11444. function getCHAIRQ : TBits_8; inline;
  11445. function getCHSIRQ : TBits_8; inline;
  11446. function getPATEN : TBits_1; inline;
  11447. function getSIRQEN : TBits_1; inline;
  11448. function getw : TBits_32; inline;
  11449. procedure setAIRQEN(thebits : TBits_1); inline;
  11450. procedure setCABORT(thebits : TBits_1); inline;
  11451. procedure setCFORCE(thebits : TBits_1); inline;
  11452. procedure setCHAIRQ(thebits : TBits_8); inline;
  11453. procedure setCHSIRQ(thebits : TBits_8); inline;
  11454. procedure setPATEN(thebits : TBits_1); inline;
  11455. procedure setSIRQEN(thebits : TBits_1); inline;
  11456. procedure setw(thebits : TBits_32); inline;
  11457. public
  11458. procedure clearAIRQEN; inline;
  11459. procedure clearCABORT; inline;
  11460. procedure clearCFORCE; inline;
  11461. procedure clearPATEN; inline;
  11462. procedure clearSIRQEN; inline;
  11463. procedure setAIRQEN; inline;
  11464. procedure setCABORT; inline;
  11465. procedure setCFORCE; inline;
  11466. procedure setPATEN; inline;
  11467. procedure setSIRQEN; inline;
  11468. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11469. property CABORT : TBits_1 read getCABORT write setCABORT;
  11470. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11471. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11472. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11473. property PATEN : TBits_1 read getPATEN write setPATEN;
  11474. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11475. property w : TBits_32 read getw write setw;
  11476. end;
  11477. TDMAC6_DCH6INT = record
  11478. private
  11479. function getCHBCIE : TBits_1; inline;
  11480. function getCHBCIF : TBits_1; inline;
  11481. function getCHCCIE : TBits_1; inline;
  11482. function getCHCCIF : TBits_1; inline;
  11483. function getCHDDIE : TBits_1; inline;
  11484. function getCHDDIF : TBits_1; inline;
  11485. function getCHDHIE : TBits_1; inline;
  11486. function getCHDHIF : TBits_1; inline;
  11487. function getCHERIE : TBits_1; inline;
  11488. function getCHERIF : TBits_1; inline;
  11489. function getCHSDIE : TBits_1; inline;
  11490. function getCHSDIF : TBits_1; inline;
  11491. function getCHSHIE : TBits_1; inline;
  11492. function getCHSHIF : TBits_1; inline;
  11493. function getCHTAIE : TBits_1; inline;
  11494. function getCHTAIF : TBits_1; inline;
  11495. function getw : TBits_32; inline;
  11496. procedure setCHBCIE(thebits : TBits_1); inline;
  11497. procedure setCHBCIF(thebits : TBits_1); inline;
  11498. procedure setCHCCIE(thebits : TBits_1); inline;
  11499. procedure setCHCCIF(thebits : TBits_1); inline;
  11500. procedure setCHDDIE(thebits : TBits_1); inline;
  11501. procedure setCHDDIF(thebits : TBits_1); inline;
  11502. procedure setCHDHIE(thebits : TBits_1); inline;
  11503. procedure setCHDHIF(thebits : TBits_1); inline;
  11504. procedure setCHERIE(thebits : TBits_1); inline;
  11505. procedure setCHERIF(thebits : TBits_1); inline;
  11506. procedure setCHSDIE(thebits : TBits_1); inline;
  11507. procedure setCHSDIF(thebits : TBits_1); inline;
  11508. procedure setCHSHIE(thebits : TBits_1); inline;
  11509. procedure setCHSHIF(thebits : TBits_1); inline;
  11510. procedure setCHTAIE(thebits : TBits_1); inline;
  11511. procedure setCHTAIF(thebits : TBits_1); inline;
  11512. procedure setw(thebits : TBits_32); inline;
  11513. public
  11514. procedure clearCHBCIE; inline;
  11515. procedure clearCHBCIF; inline;
  11516. procedure clearCHCCIE; inline;
  11517. procedure clearCHCCIF; inline;
  11518. procedure clearCHDDIE; inline;
  11519. procedure clearCHDDIF; inline;
  11520. procedure clearCHDHIE; inline;
  11521. procedure clearCHDHIF; inline;
  11522. procedure clearCHERIE; inline;
  11523. procedure clearCHERIF; inline;
  11524. procedure clearCHSDIE; inline;
  11525. procedure clearCHSDIF; inline;
  11526. procedure clearCHSHIE; inline;
  11527. procedure clearCHSHIF; inline;
  11528. procedure clearCHTAIE; inline;
  11529. procedure clearCHTAIF; inline;
  11530. procedure setCHBCIE; inline;
  11531. procedure setCHBCIF; inline;
  11532. procedure setCHCCIE; inline;
  11533. procedure setCHCCIF; inline;
  11534. procedure setCHDDIE; inline;
  11535. procedure setCHDDIF; inline;
  11536. procedure setCHDHIE; inline;
  11537. procedure setCHDHIF; inline;
  11538. procedure setCHERIE; inline;
  11539. procedure setCHERIF; inline;
  11540. procedure setCHSDIE; inline;
  11541. procedure setCHSDIF; inline;
  11542. procedure setCHSHIE; inline;
  11543. procedure setCHSHIF; inline;
  11544. procedure setCHTAIE; inline;
  11545. procedure setCHTAIF; inline;
  11546. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  11547. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  11548. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  11549. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  11550. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  11551. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  11552. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  11553. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  11554. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  11555. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  11556. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  11557. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  11558. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  11559. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  11560. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  11561. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  11562. property w : TBits_32 read getw write setw;
  11563. end;
  11564. type
  11565. TDMAC6Registers = record
  11566. DCH6CONbits : TDMAC6_DCH6CON;
  11567. DCH6CON : longWord;
  11568. DCH6CONCLR : longWord;
  11569. DCH6CONSET : longWord;
  11570. DCH6CONINV : longWord;
  11571. DCH6ECONbits : TDMAC6_DCH6ECON;
  11572. DCH6ECON : longWord;
  11573. DCH6ECONCLR : longWord;
  11574. DCH6ECONSET : longWord;
  11575. DCH6ECONINV : longWord;
  11576. DCH6INTbits : TDMAC6_DCH6INT;
  11577. DCH6INT : longWord;
  11578. DCH6INTCLR : longWord;
  11579. DCH6INTSET : longWord;
  11580. DCH6INTINV : longWord;
  11581. DCH6SSA : longWord;
  11582. DCH6SSACLR : longWord;
  11583. DCH6SSASET : longWord;
  11584. DCH6SSAINV : longWord;
  11585. DCH6DSA : longWord;
  11586. DCH6DSACLR : longWord;
  11587. DCH6DSASET : longWord;
  11588. DCH6DSAINV : longWord;
  11589. DCH6SSIZ : longWord;
  11590. DCH6SSIZCLR : longWord;
  11591. DCH6SSIZSET : longWord;
  11592. DCH6SSIZINV : longWord;
  11593. DCH6DSIZ : longWord;
  11594. DCH6DSIZCLR : longWord;
  11595. DCH6DSIZSET : longWord;
  11596. DCH6DSIZINV : longWord;
  11597. DCH6SPTR : longWord;
  11598. DCH6SPTRCLR : longWord;
  11599. DCH6SPTRSET : longWord;
  11600. DCH6SPTRINV : longWord;
  11601. DCH6DPTR : longWord;
  11602. DCH6DPTRCLR : longWord;
  11603. DCH6DPTRSET : longWord;
  11604. DCH6DPTRINV : longWord;
  11605. DCH6CSIZ : longWord;
  11606. DCH6CSIZCLR : longWord;
  11607. DCH6CSIZSET : longWord;
  11608. DCH6CSIZINV : longWord;
  11609. DCH6CPTR : longWord;
  11610. DCH6CPTRCLR : longWord;
  11611. DCH6CPTRSET : longWord;
  11612. DCH6CPTRINV : longWord;
  11613. DCH6DAT : longWord;
  11614. DCH6DATCLR : longWord;
  11615. DCH6DATSET : longWord;
  11616. DCH6DATINV : longWord;
  11617. end;
  11618. TDMAC7_DCH7CON = record
  11619. private
  11620. function getCHAED : TBits_1; inline;
  11621. function getCHAEN : TBits_1; inline;
  11622. function getCHBUSY : TBits_1; inline;
  11623. function getCHCHN : TBits_1; inline;
  11624. function getCHCHNS : TBits_1; inline;
  11625. function getCHEDET : TBits_1; inline;
  11626. function getCHEN : TBits_1; inline;
  11627. function getCHPRI : TBits_2; inline;
  11628. function getw : TBits_32; inline;
  11629. procedure setCHAED(thebits : TBits_1); inline;
  11630. procedure setCHAEN(thebits : TBits_1); inline;
  11631. procedure setCHBUSY(thebits : TBits_1); inline;
  11632. procedure setCHCHN(thebits : TBits_1); inline;
  11633. procedure setCHCHNS(thebits : TBits_1); inline;
  11634. procedure setCHEDET(thebits : TBits_1); inline;
  11635. procedure setCHEN(thebits : TBits_1); inline;
  11636. procedure setCHPRI(thebits : TBits_2); inline;
  11637. procedure setw(thebits : TBits_32); inline;
  11638. public
  11639. procedure clearCHAED; inline;
  11640. procedure clearCHAEN; inline;
  11641. procedure clearCHBUSY; inline;
  11642. procedure clearCHCHN; inline;
  11643. procedure clearCHCHNS; inline;
  11644. procedure clearCHEDET; inline;
  11645. procedure clearCHEN; inline;
  11646. procedure setCHAED; inline;
  11647. procedure setCHAEN; inline;
  11648. procedure setCHBUSY; inline;
  11649. procedure setCHCHN; inline;
  11650. procedure setCHCHNS; inline;
  11651. procedure setCHEDET; inline;
  11652. procedure setCHEN; inline;
  11653. property CHAED : TBits_1 read getCHAED write setCHAED;
  11654. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  11655. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  11656. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  11657. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  11658. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  11659. property CHEN : TBits_1 read getCHEN write setCHEN;
  11660. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  11661. property w : TBits_32 read getw write setw;
  11662. end;
  11663. TDMAC7_DCH7ECON = record
  11664. private
  11665. function getAIRQEN : TBits_1; inline;
  11666. function getCABORT : TBits_1; inline;
  11667. function getCFORCE : TBits_1; inline;
  11668. function getCHAIRQ : TBits_8; inline;
  11669. function getCHSIRQ : TBits_8; inline;
  11670. function getPATEN : TBits_1; inline;
  11671. function getSIRQEN : TBits_1; inline;
  11672. function getw : TBits_32; inline;
  11673. procedure setAIRQEN(thebits : TBits_1); inline;
  11674. procedure setCABORT(thebits : TBits_1); inline;
  11675. procedure setCFORCE(thebits : TBits_1); inline;
  11676. procedure setCHAIRQ(thebits : TBits_8); inline;
  11677. procedure setCHSIRQ(thebits : TBits_8); inline;
  11678. procedure setPATEN(thebits : TBits_1); inline;
  11679. procedure setSIRQEN(thebits : TBits_1); inline;
  11680. procedure setw(thebits : TBits_32); inline;
  11681. public
  11682. procedure clearAIRQEN; inline;
  11683. procedure clearCABORT; inline;
  11684. procedure clearCFORCE; inline;
  11685. procedure clearPATEN; inline;
  11686. procedure clearSIRQEN; inline;
  11687. procedure setAIRQEN; inline;
  11688. procedure setCABORT; inline;
  11689. procedure setCFORCE; inline;
  11690. procedure setPATEN; inline;
  11691. procedure setSIRQEN; inline;
  11692. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11693. property CABORT : TBits_1 read getCABORT write setCABORT;
  11694. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11695. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11696. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11697. property PATEN : TBits_1 read getPATEN write setPATEN;
  11698. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11699. property w : TBits_32 read getw write setw;
  11700. end;
  11701. TDMAC7_DCH7INT = record
  11702. private
  11703. function getCHBCIE : TBits_1; inline;
  11704. function getCHBCIF : TBits_1; inline;
  11705. function getCHCCIE : TBits_1; inline;
  11706. function getCHCCIF : TBits_1; inline;
  11707. function getCHDDIE : TBits_1; inline;
  11708. function getCHDDIF : TBits_1; inline;
  11709. function getCHDHIE : TBits_1; inline;
  11710. function getCHDHIF : TBits_1; inline;
  11711. function getCHERIE : TBits_1; inline;
  11712. function getCHERIF : TBits_1; inline;
  11713. function getCHSDIE : TBits_1; inline;
  11714. function getCHSDIF : TBits_1; inline;
  11715. function getCHSHIE : TBits_1; inline;
  11716. function getCHSHIF : TBits_1; inline;
  11717. function getCHTAIE : TBits_1; inline;
  11718. function getCHTAIF : TBits_1; inline;
  11719. function getw : TBits_32; inline;
  11720. procedure setCHBCIE(thebits : TBits_1); inline;
  11721. procedure setCHBCIF(thebits : TBits_1); inline;
  11722. procedure setCHCCIE(thebits : TBits_1); inline;
  11723. procedure setCHCCIF(thebits : TBits_1); inline;
  11724. procedure setCHDDIE(thebits : TBits_1); inline;
  11725. procedure setCHDDIF(thebits : TBits_1); inline;
  11726. procedure setCHDHIE(thebits : TBits_1); inline;
  11727. procedure setCHDHIF(thebits : TBits_1); inline;
  11728. procedure setCHERIE(thebits : TBits_1); inline;
  11729. procedure setCHERIF(thebits : TBits_1); inline;
  11730. procedure setCHSDIE(thebits : TBits_1); inline;
  11731. procedure setCHSDIF(thebits : TBits_1); inline;
  11732. procedure setCHSHIE(thebits : TBits_1); inline;
  11733. procedure setCHSHIF(thebits : TBits_1); inline;
  11734. procedure setCHTAIE(thebits : TBits_1); inline;
  11735. procedure setCHTAIF(thebits : TBits_1); inline;
  11736. procedure setw(thebits : TBits_32); inline;
  11737. public
  11738. procedure clearCHBCIE; inline;
  11739. procedure clearCHBCIF; inline;
  11740. procedure clearCHCCIE; inline;
  11741. procedure clearCHCCIF; inline;
  11742. procedure clearCHDDIE; inline;
  11743. procedure clearCHDDIF; inline;
  11744. procedure clearCHDHIE; inline;
  11745. procedure clearCHDHIF; inline;
  11746. procedure clearCHERIE; inline;
  11747. procedure clearCHERIF; inline;
  11748. procedure clearCHSDIE; inline;
  11749. procedure clearCHSDIF; inline;
  11750. procedure clearCHSHIE; inline;
  11751. procedure clearCHSHIF; inline;
  11752. procedure clearCHTAIE; inline;
  11753. procedure clearCHTAIF; inline;
  11754. procedure setCHBCIE; inline;
  11755. procedure setCHBCIF; inline;
  11756. procedure setCHCCIE; inline;
  11757. procedure setCHCCIF; inline;
  11758. procedure setCHDDIE; inline;
  11759. procedure setCHDDIF; inline;
  11760. procedure setCHDHIE; inline;
  11761. procedure setCHDHIF; inline;
  11762. procedure setCHERIE; inline;
  11763. procedure setCHERIF; inline;
  11764. procedure setCHSDIE; inline;
  11765. procedure setCHSDIF; inline;
  11766. procedure setCHSHIE; inline;
  11767. procedure setCHSHIF; inline;
  11768. procedure setCHTAIE; inline;
  11769. procedure setCHTAIF; inline;
  11770. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  11771. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  11772. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  11773. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  11774. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  11775. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  11776. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  11777. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  11778. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  11779. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  11780. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  11781. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  11782. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  11783. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  11784. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  11785. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  11786. property w : TBits_32 read getw write setw;
  11787. end;
  11788. type
  11789. TDMAC7Registers = record
  11790. DCH7CONbits : TDMAC7_DCH7CON;
  11791. DCH7CON : longWord;
  11792. DCH7CONCLR : longWord;
  11793. DCH7CONSET : longWord;
  11794. DCH7CONINV : longWord;
  11795. DCH7ECONbits : TDMAC7_DCH7ECON;
  11796. DCH7ECON : longWord;
  11797. DCH7ECONCLR : longWord;
  11798. DCH7ECONSET : longWord;
  11799. DCH7ECONINV : longWord;
  11800. DCH7INTbits : TDMAC7_DCH7INT;
  11801. DCH7INT : longWord;
  11802. DCH7INTCLR : longWord;
  11803. DCH7INTSET : longWord;
  11804. DCH7INTINV : longWord;
  11805. DCH7SSA : longWord;
  11806. DCH7SSACLR : longWord;
  11807. DCH7SSASET : longWord;
  11808. DCH7SSAINV : longWord;
  11809. DCH7DSA : longWord;
  11810. DCH7DSACLR : longWord;
  11811. DCH7DSASET : longWord;
  11812. DCH7DSAINV : longWord;
  11813. DCH7SSIZ : longWord;
  11814. DCH7SSIZCLR : longWord;
  11815. DCH7SSIZSET : longWord;
  11816. DCH7SSIZINV : longWord;
  11817. DCH7DSIZ : longWord;
  11818. DCH7DSIZCLR : longWord;
  11819. DCH7DSIZSET : longWord;
  11820. DCH7DSIZINV : longWord;
  11821. DCH7SPTR : longWord;
  11822. DCH7SPTRCLR : longWord;
  11823. DCH7SPTRSET : longWord;
  11824. DCH7SPTRINV : longWord;
  11825. DCH7DPTR : longWord;
  11826. DCH7DPTRCLR : longWord;
  11827. DCH7DPTRSET : longWord;
  11828. DCH7DPTRINV : longWord;
  11829. DCH7CSIZ : longWord;
  11830. DCH7CSIZCLR : longWord;
  11831. DCH7CSIZSET : longWord;
  11832. DCH7CSIZINV : longWord;
  11833. DCH7CPTR : longWord;
  11834. DCH7CPTRCLR : longWord;
  11835. DCH7CPTRSET : longWord;
  11836. DCH7CPTRINV : longWord;
  11837. DCH7DAT : longWord;
  11838. DCH7DATCLR : longWord;
  11839. DCH7DATSET : longWord;
  11840. DCH7DATINV : longWord;
  11841. end;
  11842. TPCACHE_CHECON = record
  11843. private
  11844. function getCHECOH : TBits_1; inline;
  11845. function getDCSZ : TBits_2; inline;
  11846. function getPFMWS : TBits_3; inline;
  11847. function getPREFEN : TBits_2; inline;
  11848. function getw : TBits_32; inline;
  11849. procedure setCHECOH(thebits : TBits_1); inline;
  11850. procedure setDCSZ(thebits : TBits_2); inline;
  11851. procedure setPFMWS(thebits : TBits_3); inline;
  11852. procedure setPREFEN(thebits : TBits_2); inline;
  11853. procedure setw(thebits : TBits_32); inline;
  11854. public
  11855. procedure clearCHECOH; inline;
  11856. procedure setCHECOH; inline;
  11857. property CHECOH : TBits_1 read getCHECOH write setCHECOH;
  11858. property DCSZ : TBits_2 read getDCSZ write setDCSZ;
  11859. property PFMWS : TBits_3 read getPFMWS write setPFMWS;
  11860. property PREFEN : TBits_2 read getPREFEN write setPREFEN;
  11861. property w : TBits_32 read getw write setw;
  11862. end;
  11863. TPCACHE_CHETAG = record
  11864. private
  11865. function getLLOCK : TBits_1; inline;
  11866. function getLTAG : TBits_20; inline;
  11867. function getLTAGBOOT : TBits_1; inline;
  11868. function getLTYPE : TBits_1; inline;
  11869. function getLVALID : TBits_1; inline;
  11870. function getw : TBits_32; inline;
  11871. procedure setLLOCK(thebits : TBits_1); inline;
  11872. procedure setLTAG(thebits : TBits_20); inline;
  11873. procedure setLTAGBOOT(thebits : TBits_1); inline;
  11874. procedure setLTYPE(thebits : TBits_1); inline;
  11875. procedure setLVALID(thebits : TBits_1); inline;
  11876. procedure setw(thebits : TBits_32); inline;
  11877. public
  11878. procedure clearLLOCK; inline;
  11879. procedure clearLTAGBOOT; inline;
  11880. procedure clearLTYPE; inline;
  11881. procedure clearLVALID; inline;
  11882. procedure setLLOCK; inline;
  11883. procedure setLTAGBOOT; inline;
  11884. procedure setLTYPE; inline;
  11885. procedure setLVALID; inline;
  11886. property LLOCK : TBits_1 read getLLOCK write setLLOCK;
  11887. property LTAG : TBits_20 read getLTAG write setLTAG;
  11888. property LTAGBOOT : TBits_1 read getLTAGBOOT write setLTAGBOOT;
  11889. property LTYPE : TBits_1 read getLTYPE write setLTYPE;
  11890. property LVALID : TBits_1 read getLVALID write setLVALID;
  11891. property w : TBits_32 read getw write setw;
  11892. end;
  11893. type
  11894. TPCACHERegisters = record
  11895. CHECONbits : TPCACHE_CHECON;
  11896. CHECON : longWord;
  11897. CHECONCLR : longWord;
  11898. CHECONSET : longWord;
  11899. CHECONINV : longWord;
  11900. CHEACC : longWord;
  11901. CHEACCCLR : longWord;
  11902. CHEACCSET : longWord;
  11903. CHEACCINV : longWord;
  11904. CHETAGbits : TPCACHE_CHETAG;
  11905. CHETAG : longWord;
  11906. CHETAGCLR : longWord;
  11907. CHETAGSET : longWord;
  11908. CHETAGINV : longWord;
  11909. CHEMSK : longWord;
  11910. CHEMSKCLR : longWord;
  11911. CHEMSKSET : longWord;
  11912. CHEMSKINV : longWord;
  11913. CHEW0 : longWord;
  11914. CHEW1 : longWord;
  11915. CHEW2 : longWord;
  11916. CHEW3 : longWord;
  11917. CHELRU : longWord;
  11918. CHEHIT : longWord;
  11919. CHEMIS : longWord;
  11920. CHEPFABT : longWord;
  11921. end;
  11922. TUSB_U1IR = record
  11923. private
  11924. function getATTACHIF : TBits_1; inline;
  11925. function getDETACHIF : TBits_1; inline;
  11926. function getIDLEIF : TBits_1; inline;
  11927. function getRESUMEIF : TBits_1; inline;
  11928. function getSOFIF : TBits_1; inline;
  11929. function getSTALLIF : TBits_1; inline;
  11930. function getTRNIF : TBits_1; inline;
  11931. function getUERRIF : TBits_1; inline;
  11932. function getURSTIF : TBits_1; inline;
  11933. function getURSTIF_DETACHIF : TBits_1; inline;
  11934. procedure setATTACHIF(thebits : TBits_1); inline;
  11935. procedure setDETACHIF(thebits : TBits_1); inline;
  11936. procedure setIDLEIF(thebits : TBits_1); inline;
  11937. procedure setRESUMEIF(thebits : TBits_1); inline;
  11938. procedure setSOFIF(thebits : TBits_1); inline;
  11939. procedure setSTALLIF(thebits : TBits_1); inline;
  11940. procedure setTRNIF(thebits : TBits_1); inline;
  11941. procedure setUERRIF(thebits : TBits_1); inline;
  11942. procedure setURSTIF(thebits : TBits_1); inline;
  11943. procedure setURSTIF_DETACHIF(thebits : TBits_1); inline;
  11944. public
  11945. procedure clearATTACHIF; inline;
  11946. procedure clearDETACHIF; inline;
  11947. procedure clearIDLEIF; inline;
  11948. procedure clearRESUMEIF; inline;
  11949. procedure clearSOFIF; inline;
  11950. procedure clearSTALLIF; inline;
  11951. procedure clearTRNIF; inline;
  11952. procedure clearUERRIF; inline;
  11953. procedure clearURSTIF; inline;
  11954. procedure clearURSTIF_DETACHIF; inline;
  11955. procedure setATTACHIF; inline;
  11956. procedure setDETACHIF; inline;
  11957. procedure setIDLEIF; inline;
  11958. procedure setRESUMEIF; inline;
  11959. procedure setSOFIF; inline;
  11960. procedure setSTALLIF; inline;
  11961. procedure setTRNIF; inline;
  11962. procedure setUERRIF; inline;
  11963. procedure setURSTIF; inline;
  11964. procedure setURSTIF_DETACHIF; inline;
  11965. property ATTACHIF : TBits_1 read getATTACHIF write setATTACHIF;
  11966. property DETACHIF : TBits_1 read getDETACHIF write setDETACHIF;
  11967. property IDLEIF : TBits_1 read getIDLEIF write setIDLEIF;
  11968. property RESUMEIF : TBits_1 read getRESUMEIF write setRESUMEIF;
  11969. property SOFIF : TBits_1 read getSOFIF write setSOFIF;
  11970. property STALLIF : TBits_1 read getSTALLIF write setSTALLIF;
  11971. property TRNIF : TBits_1 read getTRNIF write setTRNIF;
  11972. property UERRIF : TBits_1 read getUERRIF write setUERRIF;
  11973. property URSTIF : TBits_1 read getURSTIF write setURSTIF;
  11974. property URSTIF_DETACHIF : TBits_1 read getURSTIF_DETACHIF write setURSTIF_DETACHIF;
  11975. end;
  11976. TUSB_U1IE = record
  11977. private
  11978. function getATTACHIE : TBits_1; inline;
  11979. function getDETACHIE : TBits_1; inline;
  11980. function getIDLEIE : TBits_1; inline;
  11981. function getRESUMEIE : TBits_1; inline;
  11982. function getSOFIE : TBits_1; inline;
  11983. function getSTALLIE : TBits_1; inline;
  11984. function getTRNIE : TBits_1; inline;
  11985. function getUERRIE : TBits_1; inline;
  11986. function getURSTIE : TBits_1; inline;
  11987. function getURSTIE_DETACHIE : TBits_1; inline;
  11988. procedure setATTACHIE(thebits : TBits_1); inline;
  11989. procedure setDETACHIE(thebits : TBits_1); inline;
  11990. procedure setIDLEIE(thebits : TBits_1); inline;
  11991. procedure setRESUMEIE(thebits : TBits_1); inline;
  11992. procedure setSOFIE(thebits : TBits_1); inline;
  11993. procedure setSTALLIE(thebits : TBits_1); inline;
  11994. procedure setTRNIE(thebits : TBits_1); inline;
  11995. procedure setUERRIE(thebits : TBits_1); inline;
  11996. procedure setURSTIE(thebits : TBits_1); inline;
  11997. procedure setURSTIE_DETACHIE(thebits : TBits_1); inline;
  11998. public
  11999. procedure clearATTACHIE; inline;
  12000. procedure clearDETACHIE; inline;
  12001. procedure clearIDLEIE; inline;
  12002. procedure clearRESUMEIE; inline;
  12003. procedure clearSOFIE; inline;
  12004. procedure clearSTALLIE; inline;
  12005. procedure clearTRNIE; inline;
  12006. procedure clearUERRIE; inline;
  12007. procedure clearURSTIE; inline;
  12008. procedure clearURSTIE_DETACHIE; inline;
  12009. procedure setATTACHIE; inline;
  12010. procedure setDETACHIE; inline;
  12011. procedure setIDLEIE; inline;
  12012. procedure setRESUMEIE; inline;
  12013. procedure setSOFIE; inline;
  12014. procedure setSTALLIE; inline;
  12015. procedure setTRNIE; inline;
  12016. procedure setUERRIE; inline;
  12017. procedure setURSTIE; inline;
  12018. procedure setURSTIE_DETACHIE; inline;
  12019. property ATTACHIE : TBits_1 read getATTACHIE write setATTACHIE;
  12020. property DETACHIE : TBits_1 read getDETACHIE write setDETACHIE;
  12021. property IDLEIE : TBits_1 read getIDLEIE write setIDLEIE;
  12022. property RESUMEIE : TBits_1 read getRESUMEIE write setRESUMEIE;
  12023. property SOFIE : TBits_1 read getSOFIE write setSOFIE;
  12024. property STALLIE : TBits_1 read getSTALLIE write setSTALLIE;
  12025. property TRNIE : TBits_1 read getTRNIE write setTRNIE;
  12026. property UERRIE : TBits_1 read getUERRIE write setUERRIE;
  12027. property URSTIE : TBits_1 read getURSTIE write setURSTIE;
  12028. property URSTIE_DETACHIE : TBits_1 read getURSTIE_DETACHIE write setURSTIE_DETACHIE;
  12029. end;
  12030. TUSB_U1EIR = record
  12031. private
  12032. function getBMXEF : TBits_1; inline;
  12033. function getBTOEF : TBits_1; inline;
  12034. function getBTSEF : TBits_1; inline;
  12035. function getCRC16EF : TBits_1; inline;
  12036. function getCRC5EF : TBits_1; inline;
  12037. function getCRC5EF_EOFEF : TBits_1; inline;
  12038. function getDFN8EF : TBits_1; inline;
  12039. function getDMAEF : TBits_1; inline;
  12040. function getEOFEF : TBits_1; inline;
  12041. function getPIDEF : TBits_1; inline;
  12042. procedure setBMXEF(thebits : TBits_1); inline;
  12043. procedure setBTOEF(thebits : TBits_1); inline;
  12044. procedure setBTSEF(thebits : TBits_1); inline;
  12045. procedure setCRC16EF(thebits : TBits_1); inline;
  12046. procedure setCRC5EF(thebits : TBits_1); inline;
  12047. procedure setCRC5EF_EOFEF(thebits : TBits_1); inline;
  12048. procedure setDFN8EF(thebits : TBits_1); inline;
  12049. procedure setDMAEF(thebits : TBits_1); inline;
  12050. procedure setEOFEF(thebits : TBits_1); inline;
  12051. procedure setPIDEF(thebits : TBits_1); inline;
  12052. public
  12053. procedure clearBMXEF; inline;
  12054. procedure clearBTOEF; inline;
  12055. procedure clearBTSEF; inline;
  12056. procedure clearCRC16EF; inline;
  12057. procedure clearCRC5EF; inline;
  12058. procedure clearCRC5EF_EOFEF; inline;
  12059. procedure clearDFN8EF; inline;
  12060. procedure clearDMAEF; inline;
  12061. procedure clearEOFEF; inline;
  12062. procedure clearPIDEF; inline;
  12063. procedure setBMXEF; inline;
  12064. procedure setBTOEF; inline;
  12065. procedure setBTSEF; inline;
  12066. procedure setCRC16EF; inline;
  12067. procedure setCRC5EF; inline;
  12068. procedure setCRC5EF_EOFEF; inline;
  12069. procedure setDFN8EF; inline;
  12070. procedure setDMAEF; inline;
  12071. procedure setEOFEF; inline;
  12072. procedure setPIDEF; inline;
  12073. property BMXEF : TBits_1 read getBMXEF write setBMXEF;
  12074. property BTOEF : TBits_1 read getBTOEF write setBTOEF;
  12075. property BTSEF : TBits_1 read getBTSEF write setBTSEF;
  12076. property CRC16EF : TBits_1 read getCRC16EF write setCRC16EF;
  12077. property CRC5EF : TBits_1 read getCRC5EF write setCRC5EF;
  12078. property CRC5EF_EOFEF : TBits_1 read getCRC5EF_EOFEF write setCRC5EF_EOFEF;
  12079. property DFN8EF : TBits_1 read getDFN8EF write setDFN8EF;
  12080. property DMAEF : TBits_1 read getDMAEF write setDMAEF;
  12081. property EOFEF : TBits_1 read getEOFEF write setEOFEF;
  12082. property PIDEF : TBits_1 read getPIDEF write setPIDEF;
  12083. end;
  12084. TUSB_U1EIE = record
  12085. private
  12086. function getBMXEE : TBits_1; inline;
  12087. function getBTOEE : TBits_1; inline;
  12088. function getBTSEE : TBits_1; inline;
  12089. function getCRC16EE : TBits_1; inline;
  12090. function getCRC5EE : TBits_1; inline;
  12091. function getCRC5EE_EOFEE : TBits_1; inline;
  12092. function getDFN8EE : TBits_1; inline;
  12093. function getDMAEE : TBits_1; inline;
  12094. function getEOFEE : TBits_1; inline;
  12095. function getPIDEE : TBits_1; inline;
  12096. procedure setBMXEE(thebits : TBits_1); inline;
  12097. procedure setBTOEE(thebits : TBits_1); inline;
  12098. procedure setBTSEE(thebits : TBits_1); inline;
  12099. procedure setCRC16EE(thebits : TBits_1); inline;
  12100. procedure setCRC5EE(thebits : TBits_1); inline;
  12101. procedure setCRC5EE_EOFEE(thebits : TBits_1); inline;
  12102. procedure setDFN8EE(thebits : TBits_1); inline;
  12103. procedure setDMAEE(thebits : TBits_1); inline;
  12104. procedure setEOFEE(thebits : TBits_1); inline;
  12105. procedure setPIDEE(thebits : TBits_1); inline;
  12106. public
  12107. procedure clearBMXEE; inline;
  12108. procedure clearBTOEE; inline;
  12109. procedure clearBTSEE; inline;
  12110. procedure clearCRC16EE; inline;
  12111. procedure clearCRC5EE; inline;
  12112. procedure clearCRC5EE_EOFEE; inline;
  12113. procedure clearDFN8EE; inline;
  12114. procedure clearDMAEE; inline;
  12115. procedure clearEOFEE; inline;
  12116. procedure clearPIDEE; inline;
  12117. procedure setBMXEE; inline;
  12118. procedure setBTOEE; inline;
  12119. procedure setBTSEE; inline;
  12120. procedure setCRC16EE; inline;
  12121. procedure setCRC5EE; inline;
  12122. procedure setCRC5EE_EOFEE; inline;
  12123. procedure setDFN8EE; inline;
  12124. procedure setDMAEE; inline;
  12125. procedure setEOFEE; inline;
  12126. procedure setPIDEE; inline;
  12127. property BMXEE : TBits_1 read getBMXEE write setBMXEE;
  12128. property BTOEE : TBits_1 read getBTOEE write setBTOEE;
  12129. property BTSEE : TBits_1 read getBTSEE write setBTSEE;
  12130. property CRC16EE : TBits_1 read getCRC16EE write setCRC16EE;
  12131. property CRC5EE : TBits_1 read getCRC5EE write setCRC5EE;
  12132. property CRC5EE_EOFEE : TBits_1 read getCRC5EE_EOFEE write setCRC5EE_EOFEE;
  12133. property DFN8EE : TBits_1 read getDFN8EE write setDFN8EE;
  12134. property DMAEE : TBits_1 read getDMAEE write setDMAEE;
  12135. property EOFEE : TBits_1 read getEOFEE write setEOFEE;
  12136. property PIDEE : TBits_1 read getPIDEE write setPIDEE;
  12137. end;
  12138. TUSB_U1STAT = record
  12139. private
  12140. function getDIR : TBits_1; inline;
  12141. function getENDPT : TBits_4; inline;
  12142. function getENDPT0 : TBits_1; inline;
  12143. function getENDPT1 : TBits_1; inline;
  12144. function getENDPT2 : TBits_1; inline;
  12145. function getENDPT3 : TBits_1; inline;
  12146. function getPPBI : TBits_1; inline;
  12147. procedure setDIR(thebits : TBits_1); inline;
  12148. procedure setENDPT(thebits : TBits_4); inline;
  12149. procedure setENDPT0(thebits : TBits_1); inline;
  12150. procedure setENDPT1(thebits : TBits_1); inline;
  12151. procedure setENDPT2(thebits : TBits_1); inline;
  12152. procedure setENDPT3(thebits : TBits_1); inline;
  12153. procedure setPPBI(thebits : TBits_1); inline;
  12154. public
  12155. procedure clearDIR; inline;
  12156. procedure clearENDPT0; inline;
  12157. procedure clearENDPT1; inline;
  12158. procedure clearENDPT2; inline;
  12159. procedure clearENDPT3; inline;
  12160. procedure clearPPBI; inline;
  12161. procedure setDIR; inline;
  12162. procedure setENDPT0; inline;
  12163. procedure setENDPT1; inline;
  12164. procedure setENDPT2; inline;
  12165. procedure setENDPT3; inline;
  12166. procedure setPPBI; inline;
  12167. property DIR : TBits_1 read getDIR write setDIR;
  12168. property ENDPT : TBits_4 read getENDPT write setENDPT;
  12169. property ENDPT0 : TBits_1 read getENDPT0 write setENDPT0;
  12170. property ENDPT1 : TBits_1 read getENDPT1 write setENDPT1;
  12171. property ENDPT2 : TBits_1 read getENDPT2 write setENDPT2;
  12172. property ENDPT3 : TBits_1 read getENDPT3 write setENDPT3;
  12173. property PPBI : TBits_1 read getPPBI write setPPBI;
  12174. end;
  12175. TUSB_U1CON = record
  12176. private
  12177. function getHOSTEN : TBits_1; inline;
  12178. function getJSTATE : TBits_1; inline;
  12179. function getPKTDIS : TBits_1; inline;
  12180. function getPKTDIS_TOKBUSY : TBits_1; inline;
  12181. function getPPBRST : TBits_1; inline;
  12182. function getRESUME : TBits_1; inline;
  12183. function getSE0 : TBits_1; inline;
  12184. function getSOFEN : TBits_1; inline;
  12185. function getTOKBUSY : TBits_1; inline;
  12186. function getUSBEN : TBits_1; inline;
  12187. function getUSBEN_SOFEN : TBits_1; inline;
  12188. function getUSBRST : TBits_1; inline;
  12189. procedure setHOSTEN(thebits : TBits_1); inline;
  12190. procedure setJSTATE(thebits : TBits_1); inline;
  12191. procedure setPKTDIS(thebits : TBits_1); inline;
  12192. procedure setPKTDIS_TOKBUSY(thebits : TBits_1); inline;
  12193. procedure setPPBRST(thebits : TBits_1); inline;
  12194. procedure setRESUME(thebits : TBits_1); inline;
  12195. procedure setSE0(thebits : TBits_1); inline;
  12196. procedure setSOFEN(thebits : TBits_1); inline;
  12197. procedure setTOKBUSY(thebits : TBits_1); inline;
  12198. procedure setUSBEN(thebits : TBits_1); inline;
  12199. procedure setUSBEN_SOFEN(thebits : TBits_1); inline;
  12200. procedure setUSBRST(thebits : TBits_1); inline;
  12201. public
  12202. procedure clearHOSTEN; inline;
  12203. procedure clearJSTATE; inline;
  12204. procedure clearPKTDIS; inline;
  12205. procedure clearPKTDIS_TOKBUSY; inline;
  12206. procedure clearPPBRST; inline;
  12207. procedure clearRESUME; inline;
  12208. procedure clearSE0; inline;
  12209. procedure clearSOFEN; inline;
  12210. procedure clearTOKBUSY; inline;
  12211. procedure clearUSBEN; inline;
  12212. procedure clearUSBEN_SOFEN; inline;
  12213. procedure clearUSBRST; inline;
  12214. procedure setHOSTEN; inline;
  12215. procedure setJSTATE; inline;
  12216. procedure setPKTDIS; inline;
  12217. procedure setPKTDIS_TOKBUSY; inline;
  12218. procedure setPPBRST; inline;
  12219. procedure setRESUME; inline;
  12220. procedure setSE0; inline;
  12221. procedure setSOFEN; inline;
  12222. procedure setTOKBUSY; inline;
  12223. procedure setUSBEN; inline;
  12224. procedure setUSBEN_SOFEN; inline;
  12225. procedure setUSBRST; inline;
  12226. property HOSTEN : TBits_1 read getHOSTEN write setHOSTEN;
  12227. property JSTATE : TBits_1 read getJSTATE write setJSTATE;
  12228. property PKTDIS : TBits_1 read getPKTDIS write setPKTDIS;
  12229. property PKTDIS_TOKBUSY : TBits_1 read getPKTDIS_TOKBUSY write setPKTDIS_TOKBUSY;
  12230. property PPBRST : TBits_1 read getPPBRST write setPPBRST;
  12231. property RESUME : TBits_1 read getRESUME write setRESUME;
  12232. property SE0 : TBits_1 read getSE0 write setSE0;
  12233. property SOFEN : TBits_1 read getSOFEN write setSOFEN;
  12234. property TOKBUSY : TBits_1 read getTOKBUSY write setTOKBUSY;
  12235. property USBEN : TBits_1 read getUSBEN write setUSBEN;
  12236. property USBEN_SOFEN : TBits_1 read getUSBEN_SOFEN write setUSBEN_SOFEN;
  12237. property USBRST : TBits_1 read getUSBRST write setUSBRST;
  12238. end;
  12239. TUSB_U1ADDR = record
  12240. private
  12241. function getDEVADDR : TBits_7; inline;
  12242. function getDEVADDR0 : TBits_1; inline;
  12243. function getDEVADDR1 : TBits_1; inline;
  12244. function getDEVADDR2 : TBits_1; inline;
  12245. function getDEVADDR3 : TBits_1; inline;
  12246. function getDEVADDR4 : TBits_1; inline;
  12247. function getDEVADDR5 : TBits_1; inline;
  12248. function getDEVADDR6 : TBits_1; inline;
  12249. function getLSPDEN : TBits_1; inline;
  12250. procedure setDEVADDR(thebits : TBits_7); inline;
  12251. procedure setDEVADDR0(thebits : TBits_1); inline;
  12252. procedure setDEVADDR1(thebits : TBits_1); inline;
  12253. procedure setDEVADDR2(thebits : TBits_1); inline;
  12254. procedure setDEVADDR3(thebits : TBits_1); inline;
  12255. procedure setDEVADDR4(thebits : TBits_1); inline;
  12256. procedure setDEVADDR5(thebits : TBits_1); inline;
  12257. procedure setDEVADDR6(thebits : TBits_1); inline;
  12258. procedure setLSPDEN(thebits : TBits_1); inline;
  12259. public
  12260. procedure clearDEVADDR0; inline;
  12261. procedure clearDEVADDR1; inline;
  12262. procedure clearDEVADDR2; inline;
  12263. procedure clearDEVADDR3; inline;
  12264. procedure clearDEVADDR4; inline;
  12265. procedure clearDEVADDR5; inline;
  12266. procedure clearDEVADDR6; inline;
  12267. procedure clearLSPDEN; inline;
  12268. procedure setDEVADDR0; inline;
  12269. procedure setDEVADDR1; inline;
  12270. procedure setDEVADDR2; inline;
  12271. procedure setDEVADDR3; inline;
  12272. procedure setDEVADDR4; inline;
  12273. procedure setDEVADDR5; inline;
  12274. procedure setDEVADDR6; inline;
  12275. procedure setLSPDEN; inline;
  12276. property DEVADDR : TBits_7 read getDEVADDR write setDEVADDR;
  12277. property DEVADDR0 : TBits_1 read getDEVADDR0 write setDEVADDR0;
  12278. property DEVADDR1 : TBits_1 read getDEVADDR1 write setDEVADDR1;
  12279. property DEVADDR2 : TBits_1 read getDEVADDR2 write setDEVADDR2;
  12280. property DEVADDR3 : TBits_1 read getDEVADDR3 write setDEVADDR3;
  12281. property DEVADDR4 : TBits_1 read getDEVADDR4 write setDEVADDR4;
  12282. property DEVADDR5 : TBits_1 read getDEVADDR5 write setDEVADDR5;
  12283. property DEVADDR6 : TBits_1 read getDEVADDR6 write setDEVADDR6;
  12284. property LSPDEN : TBits_1 read getLSPDEN write setLSPDEN;
  12285. end;
  12286. TUSB_U1FRML = record
  12287. private
  12288. function getFRM0 : TBits_1; inline;
  12289. function getFRM1 : TBits_1; inline;
  12290. function getFRM2 : TBits_1; inline;
  12291. function getFRM3 : TBits_1; inline;
  12292. function getFRM4 : TBits_1; inline;
  12293. function getFRM5 : TBits_1; inline;
  12294. function getFRM6 : TBits_1; inline;
  12295. function getFRM7 : TBits_1; inline;
  12296. function getFRML : TBits_8; inline;
  12297. procedure setFRM0(thebits : TBits_1); inline;
  12298. procedure setFRM1(thebits : TBits_1); inline;
  12299. procedure setFRM2(thebits : TBits_1); inline;
  12300. procedure setFRM3(thebits : TBits_1); inline;
  12301. procedure setFRM4(thebits : TBits_1); inline;
  12302. procedure setFRM5(thebits : TBits_1); inline;
  12303. procedure setFRM6(thebits : TBits_1); inline;
  12304. procedure setFRM7(thebits : TBits_1); inline;
  12305. procedure setFRML(thebits : TBits_8); inline;
  12306. public
  12307. procedure clearFRM0; inline;
  12308. procedure clearFRM1; inline;
  12309. procedure clearFRM2; inline;
  12310. procedure clearFRM3; inline;
  12311. procedure clearFRM4; inline;
  12312. procedure clearFRM5; inline;
  12313. procedure clearFRM6; inline;
  12314. procedure clearFRM7; inline;
  12315. procedure setFRM0; inline;
  12316. procedure setFRM1; inline;
  12317. procedure setFRM2; inline;
  12318. procedure setFRM3; inline;
  12319. procedure setFRM4; inline;
  12320. procedure setFRM5; inline;
  12321. procedure setFRM6; inline;
  12322. procedure setFRM7; inline;
  12323. property FRM0 : TBits_1 read getFRM0 write setFRM0;
  12324. property FRM1 : TBits_1 read getFRM1 write setFRM1;
  12325. property FRM2 : TBits_1 read getFRM2 write setFRM2;
  12326. property FRM3 : TBits_1 read getFRM3 write setFRM3;
  12327. property FRM4 : TBits_1 read getFRM4 write setFRM4;
  12328. property FRM5 : TBits_1 read getFRM5 write setFRM5;
  12329. property FRM6 : TBits_1 read getFRM6 write setFRM6;
  12330. property FRM7 : TBits_1 read getFRM7 write setFRM7;
  12331. property FRML : TBits_8 read getFRML write setFRML;
  12332. end;
  12333. TUSB_U1FRMH = record
  12334. private
  12335. function getFRM10 : TBits_1; inline;
  12336. function getFRM8 : TBits_1; inline;
  12337. function getFRM9 : TBits_1; inline;
  12338. function getFRMH : TBits_3; inline;
  12339. procedure setFRM10(thebits : TBits_1); inline;
  12340. procedure setFRM8(thebits : TBits_1); inline;
  12341. procedure setFRM9(thebits : TBits_1); inline;
  12342. procedure setFRMH(thebits : TBits_3); inline;
  12343. public
  12344. procedure clearFRM10; inline;
  12345. procedure clearFRM8; inline;
  12346. procedure clearFRM9; inline;
  12347. procedure setFRM10; inline;
  12348. procedure setFRM8; inline;
  12349. procedure setFRM9; inline;
  12350. property FRM10 : TBits_1 read getFRM10 write setFRM10;
  12351. property FRM8 : TBits_1 read getFRM8 write setFRM8;
  12352. property FRM9 : TBits_1 read getFRM9 write setFRM9;
  12353. property FRMH : TBits_3 read getFRMH write setFRMH;
  12354. end;
  12355. TUSB_U1TOK = record
  12356. private
  12357. function getEP : TBits_4; inline;
  12358. function getEP0 : TBits_1; inline;
  12359. function getEP1 : TBits_1; inline;
  12360. function getEP2 : TBits_1; inline;
  12361. function getEP3 : TBits_1; inline;
  12362. function getPID : TBits_4; inline;
  12363. function getPID0 : TBits_1; inline;
  12364. function getPID1 : TBits_1; inline;
  12365. function getPID2 : TBits_1; inline;
  12366. function getPID3 : TBits_1; inline;
  12367. procedure setEP(thebits : TBits_4); inline;
  12368. procedure setEP0(thebits : TBits_1); inline;
  12369. procedure setEP1(thebits : TBits_1); inline;
  12370. procedure setEP2(thebits : TBits_1); inline;
  12371. procedure setEP3(thebits : TBits_1); inline;
  12372. procedure setPID(thebits : TBits_4); inline;
  12373. procedure setPID0(thebits : TBits_1); inline;
  12374. procedure setPID1(thebits : TBits_1); inline;
  12375. procedure setPID2(thebits : TBits_1); inline;
  12376. procedure setPID3(thebits : TBits_1); inline;
  12377. public
  12378. procedure clearEP0; inline;
  12379. procedure clearEP1; inline;
  12380. procedure clearEP2; inline;
  12381. procedure clearEP3; inline;
  12382. procedure clearPID0; inline;
  12383. procedure clearPID1; inline;
  12384. procedure clearPID2; inline;
  12385. procedure clearPID3; inline;
  12386. procedure setEP0; inline;
  12387. procedure setEP1; inline;
  12388. procedure setEP2; inline;
  12389. procedure setEP3; inline;
  12390. procedure setPID0; inline;
  12391. procedure setPID1; inline;
  12392. procedure setPID2; inline;
  12393. procedure setPID3; inline;
  12394. property EP : TBits_4 read getEP write setEP;
  12395. property EP0 : TBits_1 read getEP0 write setEP0;
  12396. property EP1 : TBits_1 read getEP1 write setEP1;
  12397. property EP2 : TBits_1 read getEP2 write setEP2;
  12398. property EP3 : TBits_1 read getEP3 write setEP3;
  12399. property PID : TBits_4 read getPID write setPID;
  12400. property PID0 : TBits_1 read getPID0 write setPID0;
  12401. property PID1 : TBits_1 read getPID1 write setPID1;
  12402. property PID2 : TBits_1 read getPID2 write setPID2;
  12403. property PID3 : TBits_1 read getPID3 write setPID3;
  12404. end;
  12405. type
  12406. TUSBRegisters = record
  12407. U1OTGIR : longWord;
  12408. U1OTGIRCLR : longWord;
  12409. U1OTGIE : longWord;
  12410. U1OTGIECLR : longWord;
  12411. U1OTGIESET : longWord;
  12412. U1OTGIEINV : longWord;
  12413. U1OTGSTAT : longWord;
  12414. U1OTGCON : longWord;
  12415. U1OTGCONCLR : longWord;
  12416. U1OTGCONSET : longWord;
  12417. U1OTGCONINV : longWord;
  12418. U1PWRC : longWord;
  12419. U1PWRCCLR : longWord;
  12420. U1PWRCSET : longWord;
  12421. U1PWRCINV : longWord;
  12422. U1IRbits : TUSB_U1IR;
  12423. U1IR : longWord;
  12424. U1IRCLR : longWord;
  12425. U1IEbits : TUSB_U1IE;
  12426. U1IE : longWord;
  12427. U1IECLR : longWord;
  12428. U1IESET : longWord;
  12429. U1IEINV : longWord;
  12430. U1EIRbits : TUSB_U1EIR;
  12431. U1EIR : longWord;
  12432. U1EIRCLR : longWord;
  12433. U1EIEbits : TUSB_U1EIE;
  12434. U1EIE : longWord;
  12435. U1EIECLR : longWord;
  12436. U1EIESET : longWord;
  12437. U1EIEINV : longWord;
  12438. U1STATbits : TUSB_U1STAT;
  12439. U1STAT : longWord;
  12440. U1CONbits : TUSB_U1CON;
  12441. U1CON : longWord;
  12442. U1CONCLR : longWord;
  12443. U1CONSET : longWord;
  12444. U1CONINV : longWord;
  12445. U1ADDRbits : TUSB_U1ADDR;
  12446. U1ADDR : longWord;
  12447. U1ADDRCLR : longWord;
  12448. U1ADDRSET : longWord;
  12449. U1ADDRINV : longWord;
  12450. U1BDTP1 : longWord;
  12451. U1BDTP1CLR : longWord;
  12452. U1BDTP1SET : longWord;
  12453. U1BDTP1INV : longWord;
  12454. U1FRMLbits : TUSB_U1FRML;
  12455. U1FRML : longWord;
  12456. U1FRMHbits : TUSB_U1FRMH;
  12457. U1FRMH : longWord;
  12458. U1TOKbits : TUSB_U1TOK;
  12459. U1TOK : longWord;
  12460. U1TOKCLR : longWord;
  12461. U1TOKSET : longWord;
  12462. U1TOKINV : longWord;
  12463. U1SOF : longWord;
  12464. U1SOFCLR : longWord;
  12465. U1SOFSET : longWord;
  12466. U1SOFINV : longWord;
  12467. U1BDTP2 : longWord;
  12468. U1BDTP2CLR : longWord;
  12469. U1BDTP2SET : longWord;
  12470. U1BDTP2INV : longWord;
  12471. U1BDTP3 : longWord;
  12472. U1BDTP3CLR : longWord;
  12473. U1BDTP3SET : longWord;
  12474. U1BDTP3INV : longWord;
  12475. U1CNFG1 : longWord;
  12476. U1CNFG1CLR : longWord;
  12477. U1CNFG1SET : longWord;
  12478. U1CNFG1INV : longWord;
  12479. U1EP0 : longWord;
  12480. U1EP0CLR : longWord;
  12481. U1EP0SET : longWord;
  12482. U1EP0INV : longWord;
  12483. U1EP1 : longWord;
  12484. U1EP1CLR : longWord;
  12485. U1EP1SET : longWord;
  12486. U1EP1INV : longWord;
  12487. U1EP2 : longWord;
  12488. U1EP2CLR : longWord;
  12489. U1EP2SET : longWord;
  12490. U1EP2INV : longWord;
  12491. U1EP3 : longWord;
  12492. U1EP3CLR : longWord;
  12493. U1EP3SET : longWord;
  12494. U1EP3INV : longWord;
  12495. U1EP4 : longWord;
  12496. U1EP4CLR : longWord;
  12497. U1EP4SET : longWord;
  12498. U1EP4INV : longWord;
  12499. U1EP5 : longWord;
  12500. U1EP5CLR : longWord;
  12501. U1EP5SET : longWord;
  12502. U1EP5INV : longWord;
  12503. U1EP6 : longWord;
  12504. U1EP6CLR : longWord;
  12505. U1EP6SET : longWord;
  12506. U1EP6INV : longWord;
  12507. U1EP7 : longWord;
  12508. U1EP7CLR : longWord;
  12509. U1EP7SET : longWord;
  12510. U1EP7INV : longWord;
  12511. U1EP8 : longWord;
  12512. U1EP8CLR : longWord;
  12513. U1EP8SET : longWord;
  12514. U1EP8INV : longWord;
  12515. U1EP9 : longWord;
  12516. U1EP9CLR : longWord;
  12517. U1EP9SET : longWord;
  12518. U1EP9INV : longWord;
  12519. U1EP10 : longWord;
  12520. U1EP10CLR : longWord;
  12521. U1EP10SET : longWord;
  12522. U1EP10INV : longWord;
  12523. U1EP11 : longWord;
  12524. U1EP11CLR : longWord;
  12525. U1EP11SET : longWord;
  12526. U1EP11INV : longWord;
  12527. U1EP12 : longWord;
  12528. U1EP12CLR : longWord;
  12529. U1EP12SET : longWord;
  12530. U1EP12INV : longWord;
  12531. U1EP13 : longWord;
  12532. U1EP13CLR : longWord;
  12533. U1EP13SET : longWord;
  12534. U1EP13INV : longWord;
  12535. U1EP14 : longWord;
  12536. U1EP14CLR : longWord;
  12537. U1EP14SET : longWord;
  12538. U1EP14INV : longWord;
  12539. U1EP15 : longWord;
  12540. U1EP15CLR : longWord;
  12541. U1EP15SET : longWord;
  12542. U1EP15INV : longWord;
  12543. end;
  12544. TPORTB_TRISB = record
  12545. private
  12546. function getTRISB0 : TBits_1; inline;
  12547. function getTRISB1 : TBits_1; inline;
  12548. function getTRISB10 : TBits_1; inline;
  12549. function getTRISB11 : TBits_1; inline;
  12550. function getTRISB12 : TBits_1; inline;
  12551. function getTRISB13 : TBits_1; inline;
  12552. function getTRISB14 : TBits_1; inline;
  12553. function getTRISB15 : TBits_1; inline;
  12554. function getTRISB2 : TBits_1; inline;
  12555. function getTRISB3 : TBits_1; inline;
  12556. function getTRISB4 : TBits_1; inline;
  12557. function getTRISB5 : TBits_1; inline;
  12558. function getTRISB6 : TBits_1; inline;
  12559. function getTRISB7 : TBits_1; inline;
  12560. function getTRISB8 : TBits_1; inline;
  12561. function getTRISB9 : TBits_1; inline;
  12562. function getw : TBits_32; inline;
  12563. procedure setTRISB0(thebits : TBits_1); inline;
  12564. procedure setTRISB1(thebits : TBits_1); inline;
  12565. procedure setTRISB10(thebits : TBits_1); inline;
  12566. procedure setTRISB11(thebits : TBits_1); inline;
  12567. procedure setTRISB12(thebits : TBits_1); inline;
  12568. procedure setTRISB13(thebits : TBits_1); inline;
  12569. procedure setTRISB14(thebits : TBits_1); inline;
  12570. procedure setTRISB15(thebits : TBits_1); inline;
  12571. procedure setTRISB2(thebits : TBits_1); inline;
  12572. procedure setTRISB3(thebits : TBits_1); inline;
  12573. procedure setTRISB4(thebits : TBits_1); inline;
  12574. procedure setTRISB5(thebits : TBits_1); inline;
  12575. procedure setTRISB6(thebits : TBits_1); inline;
  12576. procedure setTRISB7(thebits : TBits_1); inline;
  12577. procedure setTRISB8(thebits : TBits_1); inline;
  12578. procedure setTRISB9(thebits : TBits_1); inline;
  12579. procedure setw(thebits : TBits_32); inline;
  12580. public
  12581. procedure clearTRISB0; inline;
  12582. procedure clearTRISB10; inline;
  12583. procedure clearTRISB11; inline;
  12584. procedure clearTRISB12; inline;
  12585. procedure clearTRISB13; inline;
  12586. procedure clearTRISB14; inline;
  12587. procedure clearTRISB15; inline;
  12588. procedure clearTRISB1; inline;
  12589. procedure clearTRISB2; inline;
  12590. procedure clearTRISB3; inline;
  12591. procedure clearTRISB4; inline;
  12592. procedure clearTRISB5; inline;
  12593. procedure clearTRISB6; inline;
  12594. procedure clearTRISB7; inline;
  12595. procedure clearTRISB8; inline;
  12596. procedure clearTRISB9; inline;
  12597. procedure setTRISB0; inline;
  12598. procedure setTRISB10; inline;
  12599. procedure setTRISB11; inline;
  12600. procedure setTRISB12; inline;
  12601. procedure setTRISB13; inline;
  12602. procedure setTRISB14; inline;
  12603. procedure setTRISB15; inline;
  12604. procedure setTRISB1; inline;
  12605. procedure setTRISB2; inline;
  12606. procedure setTRISB3; inline;
  12607. procedure setTRISB4; inline;
  12608. procedure setTRISB5; inline;
  12609. procedure setTRISB6; inline;
  12610. procedure setTRISB7; inline;
  12611. procedure setTRISB8; inline;
  12612. procedure setTRISB9; inline;
  12613. property TRISB0 : TBits_1 read getTRISB0 write setTRISB0;
  12614. property TRISB1 : TBits_1 read getTRISB1 write setTRISB1;
  12615. property TRISB10 : TBits_1 read getTRISB10 write setTRISB10;
  12616. property TRISB11 : TBits_1 read getTRISB11 write setTRISB11;
  12617. property TRISB12 : TBits_1 read getTRISB12 write setTRISB12;
  12618. property TRISB13 : TBits_1 read getTRISB13 write setTRISB13;
  12619. property TRISB14 : TBits_1 read getTRISB14 write setTRISB14;
  12620. property TRISB15 : TBits_1 read getTRISB15 write setTRISB15;
  12621. property TRISB2 : TBits_1 read getTRISB2 write setTRISB2;
  12622. property TRISB3 : TBits_1 read getTRISB3 write setTRISB3;
  12623. property TRISB4 : TBits_1 read getTRISB4 write setTRISB4;
  12624. property TRISB5 : TBits_1 read getTRISB5 write setTRISB5;
  12625. property TRISB6 : TBits_1 read getTRISB6 write setTRISB6;
  12626. property TRISB7 : TBits_1 read getTRISB7 write setTRISB7;
  12627. property TRISB8 : TBits_1 read getTRISB8 write setTRISB8;
  12628. property TRISB9 : TBits_1 read getTRISB9 write setTRISB9;
  12629. property w : TBits_32 read getw write setw;
  12630. end;
  12631. TPORTB_PORTB = record
  12632. private
  12633. function getRB0 : TBits_1; inline;
  12634. function getRB1 : TBits_1; inline;
  12635. function getRB10 : TBits_1; inline;
  12636. function getRB11 : TBits_1; inline;
  12637. function getRB12 : TBits_1; inline;
  12638. function getRB13 : TBits_1; inline;
  12639. function getRB14 : TBits_1; inline;
  12640. function getRB15 : TBits_1; inline;
  12641. function getRB2 : TBits_1; inline;
  12642. function getRB3 : TBits_1; inline;
  12643. function getRB4 : TBits_1; inline;
  12644. function getRB5 : TBits_1; inline;
  12645. function getRB6 : TBits_1; inline;
  12646. function getRB7 : TBits_1; inline;
  12647. function getRB8 : TBits_1; inline;
  12648. function getRB9 : TBits_1; inline;
  12649. function getw : TBits_32; inline;
  12650. procedure setRB0(thebits : TBits_1); inline;
  12651. procedure setRB1(thebits : TBits_1); inline;
  12652. procedure setRB10(thebits : TBits_1); inline;
  12653. procedure setRB11(thebits : TBits_1); inline;
  12654. procedure setRB12(thebits : TBits_1); inline;
  12655. procedure setRB13(thebits : TBits_1); inline;
  12656. procedure setRB14(thebits : TBits_1); inline;
  12657. procedure setRB15(thebits : TBits_1); inline;
  12658. procedure setRB2(thebits : TBits_1); inline;
  12659. procedure setRB3(thebits : TBits_1); inline;
  12660. procedure setRB4(thebits : TBits_1); inline;
  12661. procedure setRB5(thebits : TBits_1); inline;
  12662. procedure setRB6(thebits : TBits_1); inline;
  12663. procedure setRB7(thebits : TBits_1); inline;
  12664. procedure setRB8(thebits : TBits_1); inline;
  12665. procedure setRB9(thebits : TBits_1); inline;
  12666. procedure setw(thebits : TBits_32); inline;
  12667. public
  12668. procedure clearRB0; inline;
  12669. procedure clearRB10; inline;
  12670. procedure clearRB11; inline;
  12671. procedure clearRB12; inline;
  12672. procedure clearRB13; inline;
  12673. procedure clearRB14; inline;
  12674. procedure clearRB15; inline;
  12675. procedure clearRB1; inline;
  12676. procedure clearRB2; inline;
  12677. procedure clearRB3; inline;
  12678. procedure clearRB4; inline;
  12679. procedure clearRB5; inline;
  12680. procedure clearRB6; inline;
  12681. procedure clearRB7; inline;
  12682. procedure clearRB8; inline;
  12683. procedure clearRB9; inline;
  12684. procedure setRB0; inline;
  12685. procedure setRB10; inline;
  12686. procedure setRB11; inline;
  12687. procedure setRB12; inline;
  12688. procedure setRB13; inline;
  12689. procedure setRB14; inline;
  12690. procedure setRB15; inline;
  12691. procedure setRB1; inline;
  12692. procedure setRB2; inline;
  12693. procedure setRB3; inline;
  12694. procedure setRB4; inline;
  12695. procedure setRB5; inline;
  12696. procedure setRB6; inline;
  12697. procedure setRB7; inline;
  12698. procedure setRB8; inline;
  12699. procedure setRB9; inline;
  12700. property RB0 : TBits_1 read getRB0 write setRB0;
  12701. property RB1 : TBits_1 read getRB1 write setRB1;
  12702. property RB10 : TBits_1 read getRB10 write setRB10;
  12703. property RB11 : TBits_1 read getRB11 write setRB11;
  12704. property RB12 : TBits_1 read getRB12 write setRB12;
  12705. property RB13 : TBits_1 read getRB13 write setRB13;
  12706. property RB14 : TBits_1 read getRB14 write setRB14;
  12707. property RB15 : TBits_1 read getRB15 write setRB15;
  12708. property RB2 : TBits_1 read getRB2 write setRB2;
  12709. property RB3 : TBits_1 read getRB3 write setRB3;
  12710. property RB4 : TBits_1 read getRB4 write setRB4;
  12711. property RB5 : TBits_1 read getRB5 write setRB5;
  12712. property RB6 : TBits_1 read getRB6 write setRB6;
  12713. property RB7 : TBits_1 read getRB7 write setRB7;
  12714. property RB8 : TBits_1 read getRB8 write setRB8;
  12715. property RB9 : TBits_1 read getRB9 write setRB9;
  12716. property w : TBits_32 read getw write setw;
  12717. end;
  12718. 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);
  12719. TPortB_bitset = set of TPortB_bits;
  12720. TPORTB_LATB = record
  12721. private
  12722. function getLATB0 : TBits_1; inline;
  12723. function getLATB1 : TBits_1; inline;
  12724. function getLATB10 : TBits_1; inline;
  12725. function getLATB11 : TBits_1; inline;
  12726. function getLATB12 : TBits_1; inline;
  12727. function getLATB13 : TBits_1; inline;
  12728. function getLATB14 : TBits_1; inline;
  12729. function getLATB15 : TBits_1; inline;
  12730. function getLATB2 : TBits_1; inline;
  12731. function getLATB3 : TBits_1; inline;
  12732. function getLATB4 : TBits_1; inline;
  12733. function getLATB5 : TBits_1; inline;
  12734. function getLATB6 : TBits_1; inline;
  12735. function getLATB7 : TBits_1; inline;
  12736. function getLATB8 : TBits_1; inline;
  12737. function getLATB9 : TBits_1; inline;
  12738. function getw : TBits_32; inline;
  12739. procedure setLATB0(thebits : TBits_1); inline;
  12740. procedure setLATB1(thebits : TBits_1); inline;
  12741. procedure setLATB10(thebits : TBits_1); inline;
  12742. procedure setLATB11(thebits : TBits_1); inline;
  12743. procedure setLATB12(thebits : TBits_1); inline;
  12744. procedure setLATB13(thebits : TBits_1); inline;
  12745. procedure setLATB14(thebits : TBits_1); inline;
  12746. procedure setLATB15(thebits : TBits_1); inline;
  12747. procedure setLATB2(thebits : TBits_1); inline;
  12748. procedure setLATB3(thebits : TBits_1); inline;
  12749. procedure setLATB4(thebits : TBits_1); inline;
  12750. procedure setLATB5(thebits : TBits_1); inline;
  12751. procedure setLATB6(thebits : TBits_1); inline;
  12752. procedure setLATB7(thebits : TBits_1); inline;
  12753. procedure setLATB8(thebits : TBits_1); inline;
  12754. procedure setLATB9(thebits : TBits_1); inline;
  12755. procedure setw(thebits : TBits_32); inline;
  12756. public
  12757. procedure clearLATB0; inline;
  12758. procedure clearLATB10; inline;
  12759. procedure clearLATB11; inline;
  12760. procedure clearLATB12; inline;
  12761. procedure clearLATB13; inline;
  12762. procedure clearLATB14; inline;
  12763. procedure clearLATB15; inline;
  12764. procedure clearLATB1; inline;
  12765. procedure clearLATB2; inline;
  12766. procedure clearLATB3; inline;
  12767. procedure clearLATB4; inline;
  12768. procedure clearLATB5; inline;
  12769. procedure clearLATB6; inline;
  12770. procedure clearLATB7; inline;
  12771. procedure clearLATB8; inline;
  12772. procedure clearLATB9; inline;
  12773. procedure setLATB0; inline;
  12774. procedure setLATB10; inline;
  12775. procedure setLATB11; inline;
  12776. procedure setLATB12; inline;
  12777. procedure setLATB13; inline;
  12778. procedure setLATB14; inline;
  12779. procedure setLATB15; inline;
  12780. procedure setLATB1; inline;
  12781. procedure setLATB2; inline;
  12782. procedure setLATB3; inline;
  12783. procedure setLATB4; inline;
  12784. procedure setLATB5; inline;
  12785. procedure setLATB6; inline;
  12786. procedure setLATB7; inline;
  12787. procedure setLATB8; inline;
  12788. procedure setLATB9; inline;
  12789. property LATB0 : TBits_1 read getLATB0 write setLATB0;
  12790. property LATB1 : TBits_1 read getLATB1 write setLATB1;
  12791. property LATB10 : TBits_1 read getLATB10 write setLATB10;
  12792. property LATB11 : TBits_1 read getLATB11 write setLATB11;
  12793. property LATB12 : TBits_1 read getLATB12 write setLATB12;
  12794. property LATB13 : TBits_1 read getLATB13 write setLATB13;
  12795. property LATB14 : TBits_1 read getLATB14 write setLATB14;
  12796. property LATB15 : TBits_1 read getLATB15 write setLATB15;
  12797. property LATB2 : TBits_1 read getLATB2 write setLATB2;
  12798. property LATB3 : TBits_1 read getLATB3 write setLATB3;
  12799. property LATB4 : TBits_1 read getLATB4 write setLATB4;
  12800. property LATB5 : TBits_1 read getLATB5 write setLATB5;
  12801. property LATB6 : TBits_1 read getLATB6 write setLATB6;
  12802. property LATB7 : TBits_1 read getLATB7 write setLATB7;
  12803. property LATB8 : TBits_1 read getLATB8 write setLATB8;
  12804. property LATB9 : TBits_1 read getLATB9 write setLATB9;
  12805. property w : TBits_32 read getw write setw;
  12806. end;
  12807. TPORTB_ODCB = record
  12808. private
  12809. function getODCB0 : TBits_1; inline;
  12810. function getODCB1 : TBits_1; inline;
  12811. function getODCB10 : TBits_1; inline;
  12812. function getODCB11 : TBits_1; inline;
  12813. function getODCB12 : TBits_1; inline;
  12814. function getODCB13 : TBits_1; inline;
  12815. function getODCB14 : TBits_1; inline;
  12816. function getODCB15 : TBits_1; inline;
  12817. function getODCB2 : TBits_1; inline;
  12818. function getODCB3 : TBits_1; inline;
  12819. function getODCB4 : TBits_1; inline;
  12820. function getODCB5 : TBits_1; inline;
  12821. function getODCB6 : TBits_1; inline;
  12822. function getODCB7 : TBits_1; inline;
  12823. function getODCB8 : TBits_1; inline;
  12824. function getODCB9 : TBits_1; inline;
  12825. function getw : TBits_32; inline;
  12826. procedure setODCB0(thebits : TBits_1); inline;
  12827. procedure setODCB1(thebits : TBits_1); inline;
  12828. procedure setODCB10(thebits : TBits_1); inline;
  12829. procedure setODCB11(thebits : TBits_1); inline;
  12830. procedure setODCB12(thebits : TBits_1); inline;
  12831. procedure setODCB13(thebits : TBits_1); inline;
  12832. procedure setODCB14(thebits : TBits_1); inline;
  12833. procedure setODCB15(thebits : TBits_1); inline;
  12834. procedure setODCB2(thebits : TBits_1); inline;
  12835. procedure setODCB3(thebits : TBits_1); inline;
  12836. procedure setODCB4(thebits : TBits_1); inline;
  12837. procedure setODCB5(thebits : TBits_1); inline;
  12838. procedure setODCB6(thebits : TBits_1); inline;
  12839. procedure setODCB7(thebits : TBits_1); inline;
  12840. procedure setODCB8(thebits : TBits_1); inline;
  12841. procedure setODCB9(thebits : TBits_1); inline;
  12842. procedure setw(thebits : TBits_32); inline;
  12843. public
  12844. procedure clearODCB0; inline;
  12845. procedure clearODCB10; inline;
  12846. procedure clearODCB11; inline;
  12847. procedure clearODCB12; inline;
  12848. procedure clearODCB13; inline;
  12849. procedure clearODCB14; inline;
  12850. procedure clearODCB15; inline;
  12851. procedure clearODCB1; inline;
  12852. procedure clearODCB2; inline;
  12853. procedure clearODCB3; inline;
  12854. procedure clearODCB4; inline;
  12855. procedure clearODCB5; inline;
  12856. procedure clearODCB6; inline;
  12857. procedure clearODCB7; inline;
  12858. procedure clearODCB8; inline;
  12859. procedure clearODCB9; inline;
  12860. procedure setODCB0; inline;
  12861. procedure setODCB10; inline;
  12862. procedure setODCB11; inline;
  12863. procedure setODCB12; inline;
  12864. procedure setODCB13; inline;
  12865. procedure setODCB14; inline;
  12866. procedure setODCB15; inline;
  12867. procedure setODCB1; inline;
  12868. procedure setODCB2; inline;
  12869. procedure setODCB3; inline;
  12870. procedure setODCB4; inline;
  12871. procedure setODCB5; inline;
  12872. procedure setODCB6; inline;
  12873. procedure setODCB7; inline;
  12874. procedure setODCB8; inline;
  12875. procedure setODCB9; inline;
  12876. property ODCB0 : TBits_1 read getODCB0 write setODCB0;
  12877. property ODCB1 : TBits_1 read getODCB1 write setODCB1;
  12878. property ODCB10 : TBits_1 read getODCB10 write setODCB10;
  12879. property ODCB11 : TBits_1 read getODCB11 write setODCB11;
  12880. property ODCB12 : TBits_1 read getODCB12 write setODCB12;
  12881. property ODCB13 : TBits_1 read getODCB13 write setODCB13;
  12882. property ODCB14 : TBits_1 read getODCB14 write setODCB14;
  12883. property ODCB15 : TBits_1 read getODCB15 write setODCB15;
  12884. property ODCB2 : TBits_1 read getODCB2 write setODCB2;
  12885. property ODCB3 : TBits_1 read getODCB3 write setODCB3;
  12886. property ODCB4 : TBits_1 read getODCB4 write setODCB4;
  12887. property ODCB5 : TBits_1 read getODCB5 write setODCB5;
  12888. property ODCB6 : TBits_1 read getODCB6 write setODCB6;
  12889. property ODCB7 : TBits_1 read getODCB7 write setODCB7;
  12890. property ODCB8 : TBits_1 read getODCB8 write setODCB8;
  12891. property ODCB9 : TBits_1 read getODCB9 write setODCB9;
  12892. property w : TBits_32 read getw write setw;
  12893. end;
  12894. type
  12895. TPORTBRegisters = record
  12896. TRISBbits : TPORTB_TRISB;
  12897. TRISB : longWord;
  12898. TRISBCLR : longWord;
  12899. TRISBSET : longWord;
  12900. TRISBINV : longWord;
  12901. PORTBbits : TPORTB_PORTB;
  12902. PORTB : longWord;
  12903. PORTBCLR : longWord;
  12904. PORTBSET : longWord;
  12905. PORTBINV : longWord;
  12906. LATBbits : TPORTB_LATB;
  12907. LATB : longWord;
  12908. LATBCLR : longWord;
  12909. LATBSET : longWord;
  12910. LATBINV : longWord;
  12911. ODCBbits : TPORTB_ODCB;
  12912. ODCB : longWord;
  12913. ODCBCLR : longWord;
  12914. ODCBSET : longWord;
  12915. ODCBINV : longWord;
  12916. end;
  12917. TPORTC_TRISC = record
  12918. private
  12919. function getTRISC12 : TBits_1; inline;
  12920. function getTRISC13 : TBits_1; inline;
  12921. function getTRISC14 : TBits_1; inline;
  12922. function getTRISC15 : TBits_1; inline;
  12923. function getw : TBits_32; inline;
  12924. procedure setTRISC12(thebits : TBits_1); inline;
  12925. procedure setTRISC13(thebits : TBits_1); inline;
  12926. procedure setTRISC14(thebits : TBits_1); inline;
  12927. procedure setTRISC15(thebits : TBits_1); inline;
  12928. procedure setw(thebits : TBits_32); inline;
  12929. public
  12930. procedure clearTRISC12; inline;
  12931. procedure clearTRISC13; inline;
  12932. procedure clearTRISC14; inline;
  12933. procedure clearTRISC15; inline;
  12934. procedure setTRISC12; inline;
  12935. procedure setTRISC13; inline;
  12936. procedure setTRISC14; inline;
  12937. procedure setTRISC15; inline;
  12938. property TRISC12 : TBits_1 read getTRISC12 write setTRISC12;
  12939. property TRISC13 : TBits_1 read getTRISC13 write setTRISC13;
  12940. property TRISC14 : TBits_1 read getTRISC14 write setTRISC14;
  12941. property TRISC15 : TBits_1 read getTRISC15 write setTRISC15;
  12942. property w : TBits_32 read getw write setw;
  12943. end;
  12944. TPORTC_PORTC = record
  12945. private
  12946. function getRC12 : TBits_1; inline;
  12947. function getRC13 : TBits_1; inline;
  12948. function getRC14 : TBits_1; inline;
  12949. function getRC15 : TBits_1; inline;
  12950. function getw : TBits_32; inline;
  12951. procedure setRC12(thebits : TBits_1); inline;
  12952. procedure setRC13(thebits : TBits_1); inline;
  12953. procedure setRC14(thebits : TBits_1); inline;
  12954. procedure setRC15(thebits : TBits_1); inline;
  12955. procedure setw(thebits : TBits_32); inline;
  12956. public
  12957. procedure clearRC12; inline;
  12958. procedure clearRC13; inline;
  12959. procedure clearRC14; inline;
  12960. procedure clearRC15; inline;
  12961. procedure setRC12; inline;
  12962. procedure setRC13; inline;
  12963. procedure setRC14; inline;
  12964. procedure setRC15; inline;
  12965. property RC12 : TBits_1 read getRC12 write setRC12;
  12966. property RC13 : TBits_1 read getRC13 write setRC13;
  12967. property RC14 : TBits_1 read getRC14 write setRC14;
  12968. property RC15 : TBits_1 read getRC15 write setRC15;
  12969. property w : TBits_32 read getw write setw;
  12970. end;
  12971. TPortC_bits=(RC12=12,RC13=13,RC14=14,RC15=15);
  12972. TPortC_bitset = set of TPortC_bits;
  12973. TPORTC_LATC = record
  12974. private
  12975. function getLATC12 : TBits_1; inline;
  12976. function getLATC13 : TBits_1; inline;
  12977. function getLATC14 : TBits_1; inline;
  12978. function getLATC15 : TBits_1; inline;
  12979. function getw : TBits_32; inline;
  12980. procedure setLATC12(thebits : TBits_1); inline;
  12981. procedure setLATC13(thebits : TBits_1); inline;
  12982. procedure setLATC14(thebits : TBits_1); inline;
  12983. procedure setLATC15(thebits : TBits_1); inline;
  12984. procedure setw(thebits : TBits_32); inline;
  12985. public
  12986. procedure clearLATC12; inline;
  12987. procedure clearLATC13; inline;
  12988. procedure clearLATC14; inline;
  12989. procedure clearLATC15; inline;
  12990. procedure setLATC12; inline;
  12991. procedure setLATC13; inline;
  12992. procedure setLATC14; inline;
  12993. procedure setLATC15; inline;
  12994. property LATC12 : TBits_1 read getLATC12 write setLATC12;
  12995. property LATC13 : TBits_1 read getLATC13 write setLATC13;
  12996. property LATC14 : TBits_1 read getLATC14 write setLATC14;
  12997. property LATC15 : TBits_1 read getLATC15 write setLATC15;
  12998. property w : TBits_32 read getw write setw;
  12999. end;
  13000. TPORTC_ODCC = record
  13001. private
  13002. function getODCC12 : TBits_1; inline;
  13003. function getODCC13 : TBits_1; inline;
  13004. function getODCC14 : TBits_1; inline;
  13005. function getODCC15 : TBits_1; inline;
  13006. function getw : TBits_32; inline;
  13007. procedure setODCC12(thebits : TBits_1); inline;
  13008. procedure setODCC13(thebits : TBits_1); inline;
  13009. procedure setODCC14(thebits : TBits_1); inline;
  13010. procedure setODCC15(thebits : TBits_1); inline;
  13011. procedure setw(thebits : TBits_32); inline;
  13012. public
  13013. procedure clearODCC12; inline;
  13014. procedure clearODCC13; inline;
  13015. procedure clearODCC14; inline;
  13016. procedure clearODCC15; inline;
  13017. procedure setODCC12; inline;
  13018. procedure setODCC13; inline;
  13019. procedure setODCC14; inline;
  13020. procedure setODCC15; inline;
  13021. property ODCC12 : TBits_1 read getODCC12 write setODCC12;
  13022. property ODCC13 : TBits_1 read getODCC13 write setODCC13;
  13023. property ODCC14 : TBits_1 read getODCC14 write setODCC14;
  13024. property ODCC15 : TBits_1 read getODCC15 write setODCC15;
  13025. property w : TBits_32 read getw write setw;
  13026. end;
  13027. type
  13028. TPORTCRegisters = record
  13029. TRISCbits : TPORTC_TRISC;
  13030. TRISC : longWord;
  13031. TRISCCLR : longWord;
  13032. TRISCSET : longWord;
  13033. TRISCINV : longWord;
  13034. PORTCbits : TPORTC_PORTC;
  13035. PORTC : longWord;
  13036. PORTCCLR : longWord;
  13037. PORTCSET : longWord;
  13038. PORTCINV : longWord;
  13039. LATCbits : TPORTC_LATC;
  13040. LATC : longWord;
  13041. LATCCLR : longWord;
  13042. LATCSET : longWord;
  13043. LATCINV : longWord;
  13044. ODCCbits : TPORTC_ODCC;
  13045. ODCC : longWord;
  13046. ODCCCLR : longWord;
  13047. ODCCSET : longWord;
  13048. ODCCINV : longWord;
  13049. end;
  13050. TPORTD_TRISD = record
  13051. private
  13052. function getTRISD0 : TBits_1; inline;
  13053. function getTRISD1 : TBits_1; inline;
  13054. function getTRISD10 : TBits_1; inline;
  13055. function getTRISD11 : TBits_1; inline;
  13056. function getTRISD2 : TBits_1; inline;
  13057. function getTRISD3 : TBits_1; inline;
  13058. function getTRISD4 : TBits_1; inline;
  13059. function getTRISD5 : TBits_1; inline;
  13060. function getTRISD6 : TBits_1; inline;
  13061. function getTRISD7 : TBits_1; inline;
  13062. function getTRISD8 : TBits_1; inline;
  13063. function getTRISD9 : TBits_1; inline;
  13064. function getw : TBits_32; inline;
  13065. procedure setTRISD0(thebits : TBits_1); inline;
  13066. procedure setTRISD1(thebits : TBits_1); inline;
  13067. procedure setTRISD10(thebits : TBits_1); inline;
  13068. procedure setTRISD11(thebits : TBits_1); inline;
  13069. procedure setTRISD2(thebits : TBits_1); inline;
  13070. procedure setTRISD3(thebits : TBits_1); inline;
  13071. procedure setTRISD4(thebits : TBits_1); inline;
  13072. procedure setTRISD5(thebits : TBits_1); inline;
  13073. procedure setTRISD6(thebits : TBits_1); inline;
  13074. procedure setTRISD7(thebits : TBits_1); inline;
  13075. procedure setTRISD8(thebits : TBits_1); inline;
  13076. procedure setTRISD9(thebits : TBits_1); inline;
  13077. procedure setw(thebits : TBits_32); inline;
  13078. public
  13079. procedure clearTRISD0; inline;
  13080. procedure clearTRISD10; inline;
  13081. procedure clearTRISD11; inline;
  13082. procedure clearTRISD1; inline;
  13083. procedure clearTRISD2; inline;
  13084. procedure clearTRISD3; inline;
  13085. procedure clearTRISD4; inline;
  13086. procedure clearTRISD5; inline;
  13087. procedure clearTRISD6; inline;
  13088. procedure clearTRISD7; inline;
  13089. procedure clearTRISD8; inline;
  13090. procedure clearTRISD9; inline;
  13091. procedure setTRISD0; inline;
  13092. procedure setTRISD10; inline;
  13093. procedure setTRISD11; inline;
  13094. procedure setTRISD1; inline;
  13095. procedure setTRISD2; inline;
  13096. procedure setTRISD3; inline;
  13097. procedure setTRISD4; inline;
  13098. procedure setTRISD5; inline;
  13099. procedure setTRISD6; inline;
  13100. procedure setTRISD7; inline;
  13101. procedure setTRISD8; inline;
  13102. procedure setTRISD9; inline;
  13103. property TRISD0 : TBits_1 read getTRISD0 write setTRISD0;
  13104. property TRISD1 : TBits_1 read getTRISD1 write setTRISD1;
  13105. property TRISD10 : TBits_1 read getTRISD10 write setTRISD10;
  13106. property TRISD11 : TBits_1 read getTRISD11 write setTRISD11;
  13107. property TRISD2 : TBits_1 read getTRISD2 write setTRISD2;
  13108. property TRISD3 : TBits_1 read getTRISD3 write setTRISD3;
  13109. property TRISD4 : TBits_1 read getTRISD4 write setTRISD4;
  13110. property TRISD5 : TBits_1 read getTRISD5 write setTRISD5;
  13111. property TRISD6 : TBits_1 read getTRISD6 write setTRISD6;
  13112. property TRISD7 : TBits_1 read getTRISD7 write setTRISD7;
  13113. property TRISD8 : TBits_1 read getTRISD8 write setTRISD8;
  13114. property TRISD9 : TBits_1 read getTRISD9 write setTRISD9;
  13115. property w : TBits_32 read getw write setw;
  13116. end;
  13117. TPORTD_PORTD = record
  13118. private
  13119. function getRD0 : TBits_1; inline;
  13120. function getRD1 : TBits_1; inline;
  13121. function getRD10 : TBits_1; inline;
  13122. function getRD11 : TBits_1; inline;
  13123. function getRD2 : TBits_1; inline;
  13124. function getRD3 : TBits_1; inline;
  13125. function getRD4 : TBits_1; inline;
  13126. function getRD5 : TBits_1; inline;
  13127. function getRD6 : TBits_1; inline;
  13128. function getRD7 : TBits_1; inline;
  13129. function getRD8 : TBits_1; inline;
  13130. function getRD9 : TBits_1; inline;
  13131. function getw : TBits_32; inline;
  13132. procedure setRD0(thebits : TBits_1); inline;
  13133. procedure setRD1(thebits : TBits_1); inline;
  13134. procedure setRD10(thebits : TBits_1); inline;
  13135. procedure setRD11(thebits : TBits_1); inline;
  13136. procedure setRD2(thebits : TBits_1); inline;
  13137. procedure setRD3(thebits : TBits_1); inline;
  13138. procedure setRD4(thebits : TBits_1); inline;
  13139. procedure setRD5(thebits : TBits_1); inline;
  13140. procedure setRD6(thebits : TBits_1); inline;
  13141. procedure setRD7(thebits : TBits_1); inline;
  13142. procedure setRD8(thebits : TBits_1); inline;
  13143. procedure setRD9(thebits : TBits_1); inline;
  13144. procedure setw(thebits : TBits_32); inline;
  13145. public
  13146. procedure clearRD0; inline;
  13147. procedure clearRD10; inline;
  13148. procedure clearRD11; inline;
  13149. procedure clearRD1; inline;
  13150. procedure clearRD2; inline;
  13151. procedure clearRD3; inline;
  13152. procedure clearRD4; inline;
  13153. procedure clearRD5; inline;
  13154. procedure clearRD6; inline;
  13155. procedure clearRD7; inline;
  13156. procedure clearRD8; inline;
  13157. procedure clearRD9; inline;
  13158. procedure setRD0; inline;
  13159. procedure setRD10; inline;
  13160. procedure setRD11; inline;
  13161. procedure setRD1; inline;
  13162. procedure setRD2; inline;
  13163. procedure setRD3; inline;
  13164. procedure setRD4; inline;
  13165. procedure setRD5; inline;
  13166. procedure setRD6; inline;
  13167. procedure setRD7; inline;
  13168. procedure setRD8; inline;
  13169. procedure setRD9; inline;
  13170. property RD0 : TBits_1 read getRD0 write setRD0;
  13171. property RD1 : TBits_1 read getRD1 write setRD1;
  13172. property RD10 : TBits_1 read getRD10 write setRD10;
  13173. property RD11 : TBits_1 read getRD11 write setRD11;
  13174. property RD2 : TBits_1 read getRD2 write setRD2;
  13175. property RD3 : TBits_1 read getRD3 write setRD3;
  13176. property RD4 : TBits_1 read getRD4 write setRD4;
  13177. property RD5 : TBits_1 read getRD5 write setRD5;
  13178. property RD6 : TBits_1 read getRD6 write setRD6;
  13179. property RD7 : TBits_1 read getRD7 write setRD7;
  13180. property RD8 : TBits_1 read getRD8 write setRD8;
  13181. property RD9 : TBits_1 read getRD9 write setRD9;
  13182. property w : TBits_32 read getw write setw;
  13183. end;
  13184. 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);
  13185. TPortD_bitset = set of TPortD_bits;
  13186. TPORTD_LATD = record
  13187. private
  13188. function getLATD0 : TBits_1; inline;
  13189. function getLATD1 : TBits_1; inline;
  13190. function getLATD10 : TBits_1; inline;
  13191. function getLATD11 : TBits_1; inline;
  13192. function getLATD2 : TBits_1; inline;
  13193. function getLATD3 : TBits_1; inline;
  13194. function getLATD4 : TBits_1; inline;
  13195. function getLATD5 : TBits_1; inline;
  13196. function getLATD6 : TBits_1; inline;
  13197. function getLATD7 : TBits_1; inline;
  13198. function getLATD8 : TBits_1; inline;
  13199. function getLATD9 : TBits_1; inline;
  13200. function getw : TBits_32; inline;
  13201. procedure setLATD0(thebits : TBits_1); inline;
  13202. procedure setLATD1(thebits : TBits_1); inline;
  13203. procedure setLATD10(thebits : TBits_1); inline;
  13204. procedure setLATD11(thebits : TBits_1); inline;
  13205. procedure setLATD2(thebits : TBits_1); inline;
  13206. procedure setLATD3(thebits : TBits_1); inline;
  13207. procedure setLATD4(thebits : TBits_1); inline;
  13208. procedure setLATD5(thebits : TBits_1); inline;
  13209. procedure setLATD6(thebits : TBits_1); inline;
  13210. procedure setLATD7(thebits : TBits_1); inline;
  13211. procedure setLATD8(thebits : TBits_1); inline;
  13212. procedure setLATD9(thebits : TBits_1); inline;
  13213. procedure setw(thebits : TBits_32); inline;
  13214. public
  13215. procedure clearLATD0; inline;
  13216. procedure clearLATD10; inline;
  13217. procedure clearLATD11; inline;
  13218. procedure clearLATD1; inline;
  13219. procedure clearLATD2; inline;
  13220. procedure clearLATD3; inline;
  13221. procedure clearLATD4; inline;
  13222. procedure clearLATD5; inline;
  13223. procedure clearLATD6; inline;
  13224. procedure clearLATD7; inline;
  13225. procedure clearLATD8; inline;
  13226. procedure clearLATD9; inline;
  13227. procedure setLATD0; inline;
  13228. procedure setLATD10; inline;
  13229. procedure setLATD11; inline;
  13230. procedure setLATD1; inline;
  13231. procedure setLATD2; inline;
  13232. procedure setLATD3; inline;
  13233. procedure setLATD4; inline;
  13234. procedure setLATD5; inline;
  13235. procedure setLATD6; inline;
  13236. procedure setLATD7; inline;
  13237. procedure setLATD8; inline;
  13238. procedure setLATD9; inline;
  13239. property LATD0 : TBits_1 read getLATD0 write setLATD0;
  13240. property LATD1 : TBits_1 read getLATD1 write setLATD1;
  13241. property LATD10 : TBits_1 read getLATD10 write setLATD10;
  13242. property LATD11 : TBits_1 read getLATD11 write setLATD11;
  13243. property LATD2 : TBits_1 read getLATD2 write setLATD2;
  13244. property LATD3 : TBits_1 read getLATD3 write setLATD3;
  13245. property LATD4 : TBits_1 read getLATD4 write setLATD4;
  13246. property LATD5 : TBits_1 read getLATD5 write setLATD5;
  13247. property LATD6 : TBits_1 read getLATD6 write setLATD6;
  13248. property LATD7 : TBits_1 read getLATD7 write setLATD7;
  13249. property LATD8 : TBits_1 read getLATD8 write setLATD8;
  13250. property LATD9 : TBits_1 read getLATD9 write setLATD9;
  13251. property w : TBits_32 read getw write setw;
  13252. end;
  13253. TPORTD_ODCD = record
  13254. private
  13255. function getODCD0 : TBits_1; inline;
  13256. function getODCD1 : TBits_1; inline;
  13257. function getODCD10 : TBits_1; inline;
  13258. function getODCD11 : TBits_1; inline;
  13259. function getODCD2 : TBits_1; inline;
  13260. function getODCD3 : TBits_1; inline;
  13261. function getODCD4 : TBits_1; inline;
  13262. function getODCD5 : TBits_1; inline;
  13263. function getODCD6 : TBits_1; inline;
  13264. function getODCD7 : TBits_1; inline;
  13265. function getODCD8 : TBits_1; inline;
  13266. function getODCD9 : TBits_1; inline;
  13267. function getw : TBits_32; inline;
  13268. procedure setODCD0(thebits : TBits_1); inline;
  13269. procedure setODCD1(thebits : TBits_1); inline;
  13270. procedure setODCD10(thebits : TBits_1); inline;
  13271. procedure setODCD11(thebits : TBits_1); inline;
  13272. procedure setODCD2(thebits : TBits_1); inline;
  13273. procedure setODCD3(thebits : TBits_1); inline;
  13274. procedure setODCD4(thebits : TBits_1); inline;
  13275. procedure setODCD5(thebits : TBits_1); inline;
  13276. procedure setODCD6(thebits : TBits_1); inline;
  13277. procedure setODCD7(thebits : TBits_1); inline;
  13278. procedure setODCD8(thebits : TBits_1); inline;
  13279. procedure setODCD9(thebits : TBits_1); inline;
  13280. procedure setw(thebits : TBits_32); inline;
  13281. public
  13282. procedure clearODCD0; inline;
  13283. procedure clearODCD10; inline;
  13284. procedure clearODCD11; inline;
  13285. procedure clearODCD1; inline;
  13286. procedure clearODCD2; inline;
  13287. procedure clearODCD3; inline;
  13288. procedure clearODCD4; inline;
  13289. procedure clearODCD5; inline;
  13290. procedure clearODCD6; inline;
  13291. procedure clearODCD7; inline;
  13292. procedure clearODCD8; inline;
  13293. procedure clearODCD9; inline;
  13294. procedure setODCD0; inline;
  13295. procedure setODCD10; inline;
  13296. procedure setODCD11; inline;
  13297. procedure setODCD1; inline;
  13298. procedure setODCD2; inline;
  13299. procedure setODCD3; inline;
  13300. procedure setODCD4; inline;
  13301. procedure setODCD5; inline;
  13302. procedure setODCD6; inline;
  13303. procedure setODCD7; inline;
  13304. procedure setODCD8; inline;
  13305. procedure setODCD9; inline;
  13306. property ODCD0 : TBits_1 read getODCD0 write setODCD0;
  13307. property ODCD1 : TBits_1 read getODCD1 write setODCD1;
  13308. property ODCD10 : TBits_1 read getODCD10 write setODCD10;
  13309. property ODCD11 : TBits_1 read getODCD11 write setODCD11;
  13310. property ODCD2 : TBits_1 read getODCD2 write setODCD2;
  13311. property ODCD3 : TBits_1 read getODCD3 write setODCD3;
  13312. property ODCD4 : TBits_1 read getODCD4 write setODCD4;
  13313. property ODCD5 : TBits_1 read getODCD5 write setODCD5;
  13314. property ODCD6 : TBits_1 read getODCD6 write setODCD6;
  13315. property ODCD7 : TBits_1 read getODCD7 write setODCD7;
  13316. property ODCD8 : TBits_1 read getODCD8 write setODCD8;
  13317. property ODCD9 : TBits_1 read getODCD9 write setODCD9;
  13318. property w : TBits_32 read getw write setw;
  13319. end;
  13320. type
  13321. TPORTDRegisters = record
  13322. TRISDbits : TPORTD_TRISD;
  13323. TRISD : longWord;
  13324. TRISDCLR : longWord;
  13325. TRISDSET : longWord;
  13326. TRISDINV : longWord;
  13327. PORTDbits : TPORTD_PORTD;
  13328. PORTD : longWord;
  13329. PORTDCLR : longWord;
  13330. PORTDSET : longWord;
  13331. PORTDINV : longWord;
  13332. LATDbits : TPORTD_LATD;
  13333. LATD : longWord;
  13334. LATDCLR : longWord;
  13335. LATDSET : longWord;
  13336. LATDINV : longWord;
  13337. ODCDbits : TPORTD_ODCD;
  13338. ODCD : longWord;
  13339. ODCDCLR : longWord;
  13340. ODCDSET : longWord;
  13341. ODCDINV : longWord;
  13342. end;
  13343. TPORTE_TRISE = record
  13344. private
  13345. function getTRISE0 : TBits_1; inline;
  13346. function getTRISE1 : TBits_1; inline;
  13347. function getTRISE2 : TBits_1; inline;
  13348. function getTRISE3 : TBits_1; inline;
  13349. function getTRISE4 : TBits_1; inline;
  13350. function getTRISE5 : TBits_1; inline;
  13351. function getTRISE6 : TBits_1; inline;
  13352. function getTRISE7 : TBits_1; inline;
  13353. function getw : TBits_32; inline;
  13354. procedure setTRISE0(thebits : TBits_1); inline;
  13355. procedure setTRISE1(thebits : TBits_1); inline;
  13356. procedure setTRISE2(thebits : TBits_1); inline;
  13357. procedure setTRISE3(thebits : TBits_1); inline;
  13358. procedure setTRISE4(thebits : TBits_1); inline;
  13359. procedure setTRISE5(thebits : TBits_1); inline;
  13360. procedure setTRISE6(thebits : TBits_1); inline;
  13361. procedure setTRISE7(thebits : TBits_1); inline;
  13362. procedure setw(thebits : TBits_32); inline;
  13363. public
  13364. procedure clearTRISE0; inline;
  13365. procedure clearTRISE1; inline;
  13366. procedure clearTRISE2; inline;
  13367. procedure clearTRISE3; inline;
  13368. procedure clearTRISE4; inline;
  13369. procedure clearTRISE5; inline;
  13370. procedure clearTRISE6; inline;
  13371. procedure clearTRISE7; inline;
  13372. procedure setTRISE0; inline;
  13373. procedure setTRISE1; inline;
  13374. procedure setTRISE2; inline;
  13375. procedure setTRISE3; inline;
  13376. procedure setTRISE4; inline;
  13377. procedure setTRISE5; inline;
  13378. procedure setTRISE6; inline;
  13379. procedure setTRISE7; inline;
  13380. property TRISE0 : TBits_1 read getTRISE0 write setTRISE0;
  13381. property TRISE1 : TBits_1 read getTRISE1 write setTRISE1;
  13382. property TRISE2 : TBits_1 read getTRISE2 write setTRISE2;
  13383. property TRISE3 : TBits_1 read getTRISE3 write setTRISE3;
  13384. property TRISE4 : TBits_1 read getTRISE4 write setTRISE4;
  13385. property TRISE5 : TBits_1 read getTRISE5 write setTRISE5;
  13386. property TRISE6 : TBits_1 read getTRISE6 write setTRISE6;
  13387. property TRISE7 : TBits_1 read getTRISE7 write setTRISE7;
  13388. property w : TBits_32 read getw write setw;
  13389. end;
  13390. TPORTE_PORTE = record
  13391. private
  13392. function getRE0 : TBits_1; inline;
  13393. function getRE1 : TBits_1; inline;
  13394. function getRE2 : TBits_1; inline;
  13395. function getRE3 : TBits_1; inline;
  13396. function getRE4 : TBits_1; inline;
  13397. function getRE5 : TBits_1; inline;
  13398. function getRE6 : TBits_1; inline;
  13399. function getRE7 : TBits_1; inline;
  13400. function getw : TBits_32; inline;
  13401. procedure setRE0(thebits : TBits_1); inline;
  13402. procedure setRE1(thebits : TBits_1); inline;
  13403. procedure setRE2(thebits : TBits_1); inline;
  13404. procedure setRE3(thebits : TBits_1); inline;
  13405. procedure setRE4(thebits : TBits_1); inline;
  13406. procedure setRE5(thebits : TBits_1); inline;
  13407. procedure setRE6(thebits : TBits_1); inline;
  13408. procedure setRE7(thebits : TBits_1); inline;
  13409. procedure setw(thebits : TBits_32); inline;
  13410. public
  13411. procedure clearRE0; inline;
  13412. procedure clearRE1; inline;
  13413. procedure clearRE2; inline;
  13414. procedure clearRE3; inline;
  13415. procedure clearRE4; inline;
  13416. procedure clearRE5; inline;
  13417. procedure clearRE6; inline;
  13418. procedure clearRE7; inline;
  13419. procedure setRE0; inline;
  13420. procedure setRE1; inline;
  13421. procedure setRE2; inline;
  13422. procedure setRE3; inline;
  13423. procedure setRE4; inline;
  13424. procedure setRE5; inline;
  13425. procedure setRE6; inline;
  13426. procedure setRE7; inline;
  13427. property RE0 : TBits_1 read getRE0 write setRE0;
  13428. property RE1 : TBits_1 read getRE1 write setRE1;
  13429. property RE2 : TBits_1 read getRE2 write setRE2;
  13430. property RE3 : TBits_1 read getRE3 write setRE3;
  13431. property RE4 : TBits_1 read getRE4 write setRE4;
  13432. property RE5 : TBits_1 read getRE5 write setRE5;
  13433. property RE6 : TBits_1 read getRE6 write setRE6;
  13434. property RE7 : TBits_1 read getRE7 write setRE7;
  13435. property w : TBits_32 read getw write setw;
  13436. end;
  13437. TPortE_bits=(RE0=0,RE1=1,RE2=2,RE3=3,RE4=4,RE5=5,RE6=6,RE7=7);
  13438. TPortE_bitset = set of TPortE_bits;
  13439. TPORTE_LATE = record
  13440. private
  13441. function getLATE0 : TBits_1; inline;
  13442. function getLATE1 : TBits_1; inline;
  13443. function getLATE2 : TBits_1; inline;
  13444. function getLATE3 : TBits_1; inline;
  13445. function getLATE4 : TBits_1; inline;
  13446. function getLATE5 : TBits_1; inline;
  13447. function getLATE6 : TBits_1; inline;
  13448. function getLATE7 : TBits_1; inline;
  13449. function getw : TBits_32; inline;
  13450. procedure setLATE0(thebits : TBits_1); inline;
  13451. procedure setLATE1(thebits : TBits_1); inline;
  13452. procedure setLATE2(thebits : TBits_1); inline;
  13453. procedure setLATE3(thebits : TBits_1); inline;
  13454. procedure setLATE4(thebits : TBits_1); inline;
  13455. procedure setLATE5(thebits : TBits_1); inline;
  13456. procedure setLATE6(thebits : TBits_1); inline;
  13457. procedure setLATE7(thebits : TBits_1); inline;
  13458. procedure setw(thebits : TBits_32); inline;
  13459. public
  13460. procedure clearLATE0; inline;
  13461. procedure clearLATE1; inline;
  13462. procedure clearLATE2; inline;
  13463. procedure clearLATE3; inline;
  13464. procedure clearLATE4; inline;
  13465. procedure clearLATE5; inline;
  13466. procedure clearLATE6; inline;
  13467. procedure clearLATE7; inline;
  13468. procedure setLATE0; inline;
  13469. procedure setLATE1; inline;
  13470. procedure setLATE2; inline;
  13471. procedure setLATE3; inline;
  13472. procedure setLATE4; inline;
  13473. procedure setLATE5; inline;
  13474. procedure setLATE6; inline;
  13475. procedure setLATE7; inline;
  13476. property LATE0 : TBits_1 read getLATE0 write setLATE0;
  13477. property LATE1 : TBits_1 read getLATE1 write setLATE1;
  13478. property LATE2 : TBits_1 read getLATE2 write setLATE2;
  13479. property LATE3 : TBits_1 read getLATE3 write setLATE3;
  13480. property LATE4 : TBits_1 read getLATE4 write setLATE4;
  13481. property LATE5 : TBits_1 read getLATE5 write setLATE5;
  13482. property LATE6 : TBits_1 read getLATE6 write setLATE6;
  13483. property LATE7 : TBits_1 read getLATE7 write setLATE7;
  13484. property w : TBits_32 read getw write setw;
  13485. end;
  13486. TPORTE_ODCE = record
  13487. private
  13488. function getODCE0 : TBits_1; inline;
  13489. function getODCE1 : TBits_1; inline;
  13490. function getODCE2 : TBits_1; inline;
  13491. function getODCE3 : TBits_1; inline;
  13492. function getODCE4 : TBits_1; inline;
  13493. function getODCE5 : TBits_1; inline;
  13494. function getODCE6 : TBits_1; inline;
  13495. function getODCE7 : TBits_1; inline;
  13496. function getw : TBits_32; inline;
  13497. procedure setODCE0(thebits : TBits_1); inline;
  13498. procedure setODCE1(thebits : TBits_1); inline;
  13499. procedure setODCE2(thebits : TBits_1); inline;
  13500. procedure setODCE3(thebits : TBits_1); inline;
  13501. procedure setODCE4(thebits : TBits_1); inline;
  13502. procedure setODCE5(thebits : TBits_1); inline;
  13503. procedure setODCE6(thebits : TBits_1); inline;
  13504. procedure setODCE7(thebits : TBits_1); inline;
  13505. procedure setw(thebits : TBits_32); inline;
  13506. public
  13507. procedure clearODCE0; inline;
  13508. procedure clearODCE1; inline;
  13509. procedure clearODCE2; inline;
  13510. procedure clearODCE3; inline;
  13511. procedure clearODCE4; inline;
  13512. procedure clearODCE5; inline;
  13513. procedure clearODCE6; inline;
  13514. procedure clearODCE7; inline;
  13515. procedure setODCE0; inline;
  13516. procedure setODCE1; inline;
  13517. procedure setODCE2; inline;
  13518. procedure setODCE3; inline;
  13519. procedure setODCE4; inline;
  13520. procedure setODCE5; inline;
  13521. procedure setODCE6; inline;
  13522. procedure setODCE7; inline;
  13523. property ODCE0 : TBits_1 read getODCE0 write setODCE0;
  13524. property ODCE1 : TBits_1 read getODCE1 write setODCE1;
  13525. property ODCE2 : TBits_1 read getODCE2 write setODCE2;
  13526. property ODCE3 : TBits_1 read getODCE3 write setODCE3;
  13527. property ODCE4 : TBits_1 read getODCE4 write setODCE4;
  13528. property ODCE5 : TBits_1 read getODCE5 write setODCE5;
  13529. property ODCE6 : TBits_1 read getODCE6 write setODCE6;
  13530. property ODCE7 : TBits_1 read getODCE7 write setODCE7;
  13531. property w : TBits_32 read getw write setw;
  13532. end;
  13533. type
  13534. TPORTERegisters = record
  13535. TRISEbits : TPORTE_TRISE;
  13536. TRISE : longWord;
  13537. TRISECLR : longWord;
  13538. TRISESET : longWord;
  13539. TRISEINV : longWord;
  13540. PORTEbits : TPORTE_PORTE;
  13541. PORTE : longWord;
  13542. PORTECLR : longWord;
  13543. PORTESET : longWord;
  13544. PORTEINV : longWord;
  13545. LATEbits : TPORTE_LATE;
  13546. LATE : longWord;
  13547. LATECLR : longWord;
  13548. LATESET : longWord;
  13549. LATEINV : longWord;
  13550. ODCEbits : TPORTE_ODCE;
  13551. ODCE : longWord;
  13552. ODCECLR : longWord;
  13553. ODCESET : longWord;
  13554. ODCEINV : longWord;
  13555. end;
  13556. TPORTF_TRISF = record
  13557. private
  13558. function getTRISF0 : TBits_1; inline;
  13559. function getTRISF1 : TBits_1; inline;
  13560. function getTRISF2 : TBits_1; inline;
  13561. function getTRISF3 : TBits_1; inline;
  13562. function getTRISF4 : TBits_1; inline;
  13563. function getTRISF5 : TBits_1; inline;
  13564. function getw : TBits_32; inline;
  13565. procedure setTRISF0(thebits : TBits_1); inline;
  13566. procedure setTRISF1(thebits : TBits_1); inline;
  13567. procedure setTRISF2(thebits : TBits_1); inline;
  13568. procedure setTRISF3(thebits : TBits_1); inline;
  13569. procedure setTRISF4(thebits : TBits_1); inline;
  13570. procedure setTRISF5(thebits : TBits_1); inline;
  13571. procedure setw(thebits : TBits_32); inline;
  13572. public
  13573. procedure clearTRISF0; inline;
  13574. procedure clearTRISF1; inline;
  13575. procedure clearTRISF2; inline;
  13576. procedure clearTRISF3; inline;
  13577. procedure clearTRISF4; inline;
  13578. procedure clearTRISF5; inline;
  13579. procedure setTRISF0; inline;
  13580. procedure setTRISF1; inline;
  13581. procedure setTRISF2; inline;
  13582. procedure setTRISF3; inline;
  13583. procedure setTRISF4; inline;
  13584. procedure setTRISF5; inline;
  13585. property TRISF0 : TBits_1 read getTRISF0 write setTRISF0;
  13586. property TRISF1 : TBits_1 read getTRISF1 write setTRISF1;
  13587. property TRISF2 : TBits_1 read getTRISF2 write setTRISF2;
  13588. property TRISF3 : TBits_1 read getTRISF3 write setTRISF3;
  13589. property TRISF4 : TBits_1 read getTRISF4 write setTRISF4;
  13590. property TRISF5 : TBits_1 read getTRISF5 write setTRISF5;
  13591. property w : TBits_32 read getw write setw;
  13592. end;
  13593. TPORTF_PORTF = record
  13594. private
  13595. function getRF0 : TBits_1; inline;
  13596. function getRF1 : TBits_1; inline;
  13597. function getRF2 : TBits_1; inline;
  13598. function getRF3 : TBits_1; inline;
  13599. function getRF4 : TBits_1; inline;
  13600. function getRF5 : TBits_1; inline;
  13601. function getw : TBits_32; inline;
  13602. procedure setRF0(thebits : TBits_1); inline;
  13603. procedure setRF1(thebits : TBits_1); inline;
  13604. procedure setRF2(thebits : TBits_1); inline;
  13605. procedure setRF3(thebits : TBits_1); inline;
  13606. procedure setRF4(thebits : TBits_1); inline;
  13607. procedure setRF5(thebits : TBits_1); inline;
  13608. procedure setw(thebits : TBits_32); inline;
  13609. public
  13610. procedure clearRF0; inline;
  13611. procedure clearRF1; inline;
  13612. procedure clearRF2; inline;
  13613. procedure clearRF3; inline;
  13614. procedure clearRF4; inline;
  13615. procedure clearRF5; inline;
  13616. procedure setRF0; inline;
  13617. procedure setRF1; inline;
  13618. procedure setRF2; inline;
  13619. procedure setRF3; inline;
  13620. procedure setRF4; inline;
  13621. procedure setRF5; inline;
  13622. property RF0 : TBits_1 read getRF0 write setRF0;
  13623. property RF1 : TBits_1 read getRF1 write setRF1;
  13624. property RF2 : TBits_1 read getRF2 write setRF2;
  13625. property RF3 : TBits_1 read getRF3 write setRF3;
  13626. property RF4 : TBits_1 read getRF4 write setRF4;
  13627. property RF5 : TBits_1 read getRF5 write setRF5;
  13628. property w : TBits_32 read getw write setw;
  13629. end;
  13630. TPortF_bits=(RF0=0,RF1=1,RF2=2,RF3=3,RF4=4,RF5=5);
  13631. TPortF_bitset = set of TPortF_bits;
  13632. TPORTF_LATF = record
  13633. private
  13634. function getLATF0 : TBits_1; inline;
  13635. function getLATF1 : TBits_1; inline;
  13636. function getLATF2 : TBits_1; inline;
  13637. function getLATF3 : TBits_1; inline;
  13638. function getLATF4 : TBits_1; inline;
  13639. function getLATF5 : TBits_1; inline;
  13640. function getw : TBits_32; inline;
  13641. procedure setLATF0(thebits : TBits_1); inline;
  13642. procedure setLATF1(thebits : TBits_1); inline;
  13643. procedure setLATF2(thebits : TBits_1); inline;
  13644. procedure setLATF3(thebits : TBits_1); inline;
  13645. procedure setLATF4(thebits : TBits_1); inline;
  13646. procedure setLATF5(thebits : TBits_1); inline;
  13647. procedure setw(thebits : TBits_32); inline;
  13648. public
  13649. procedure clearLATF0; inline;
  13650. procedure clearLATF1; inline;
  13651. procedure clearLATF2; inline;
  13652. procedure clearLATF3; inline;
  13653. procedure clearLATF4; inline;
  13654. procedure clearLATF5; inline;
  13655. procedure setLATF0; inline;
  13656. procedure setLATF1; inline;
  13657. procedure setLATF2; inline;
  13658. procedure setLATF3; inline;
  13659. procedure setLATF4; inline;
  13660. procedure setLATF5; inline;
  13661. property LATF0 : TBits_1 read getLATF0 write setLATF0;
  13662. property LATF1 : TBits_1 read getLATF1 write setLATF1;
  13663. property LATF2 : TBits_1 read getLATF2 write setLATF2;
  13664. property LATF3 : TBits_1 read getLATF3 write setLATF3;
  13665. property LATF4 : TBits_1 read getLATF4 write setLATF4;
  13666. property LATF5 : TBits_1 read getLATF5 write setLATF5;
  13667. property w : TBits_32 read getw write setw;
  13668. end;
  13669. TPORTF_ODCF = record
  13670. private
  13671. function getODCF0 : TBits_1; inline;
  13672. function getODCF1 : TBits_1; inline;
  13673. function getODCF2 : TBits_1; inline;
  13674. function getODCF3 : TBits_1; inline;
  13675. function getODCF4 : TBits_1; inline;
  13676. function getODCF5 : TBits_1; inline;
  13677. function getw : TBits_32; inline;
  13678. procedure setODCF0(thebits : TBits_1); inline;
  13679. procedure setODCF1(thebits : TBits_1); inline;
  13680. procedure setODCF2(thebits : TBits_1); inline;
  13681. procedure setODCF3(thebits : TBits_1); inline;
  13682. procedure setODCF4(thebits : TBits_1); inline;
  13683. procedure setODCF5(thebits : TBits_1); inline;
  13684. procedure setw(thebits : TBits_32); inline;
  13685. public
  13686. procedure clearODCF0; inline;
  13687. procedure clearODCF1; inline;
  13688. procedure clearODCF2; inline;
  13689. procedure clearODCF3; inline;
  13690. procedure clearODCF4; inline;
  13691. procedure clearODCF5; inline;
  13692. procedure setODCF0; inline;
  13693. procedure setODCF1; inline;
  13694. procedure setODCF2; inline;
  13695. procedure setODCF3; inline;
  13696. procedure setODCF4; inline;
  13697. procedure setODCF5; inline;
  13698. property ODCF0 : TBits_1 read getODCF0 write setODCF0;
  13699. property ODCF1 : TBits_1 read getODCF1 write setODCF1;
  13700. property ODCF2 : TBits_1 read getODCF2 write setODCF2;
  13701. property ODCF3 : TBits_1 read getODCF3 write setODCF3;
  13702. property ODCF4 : TBits_1 read getODCF4 write setODCF4;
  13703. property ODCF5 : TBits_1 read getODCF5 write setODCF5;
  13704. property w : TBits_32 read getw write setw;
  13705. end;
  13706. type
  13707. TPORTFRegisters = record
  13708. TRISFbits : TPORTF_TRISF;
  13709. TRISF : longWord;
  13710. TRISFCLR : longWord;
  13711. TRISFSET : longWord;
  13712. TRISFINV : longWord;
  13713. PORTFbits : TPORTF_PORTF;
  13714. PORTF : longWord;
  13715. PORTFCLR : longWord;
  13716. PORTFSET : longWord;
  13717. PORTFINV : longWord;
  13718. LATFbits : TPORTF_LATF;
  13719. LATF : longWord;
  13720. LATFCLR : longWord;
  13721. LATFSET : longWord;
  13722. LATFINV : longWord;
  13723. ODCFbits : TPORTF_ODCF;
  13724. ODCF : longWord;
  13725. ODCFCLR : longWord;
  13726. ODCFSET : longWord;
  13727. ODCFINV : longWord;
  13728. end;
  13729. TPORTG_TRISG = record
  13730. private
  13731. function getTRISG2 : TBits_1; inline;
  13732. function getTRISG3 : TBits_1; inline;
  13733. function getTRISG6 : TBits_1; inline;
  13734. function getTRISG7 : TBits_1; inline;
  13735. function getTRISG8 : TBits_1; inline;
  13736. function getTRISG9 : TBits_1; inline;
  13737. function getw : TBits_32; inline;
  13738. procedure setTRISG2(thebits : TBits_1); inline;
  13739. procedure setTRISG3(thebits : TBits_1); inline;
  13740. procedure setTRISG6(thebits : TBits_1); inline;
  13741. procedure setTRISG7(thebits : TBits_1); inline;
  13742. procedure setTRISG8(thebits : TBits_1); inline;
  13743. procedure setTRISG9(thebits : TBits_1); inline;
  13744. procedure setw(thebits : TBits_32); inline;
  13745. public
  13746. procedure clearTRISG2; inline;
  13747. procedure clearTRISG3; inline;
  13748. procedure clearTRISG6; inline;
  13749. procedure clearTRISG7; inline;
  13750. procedure clearTRISG8; inline;
  13751. procedure clearTRISG9; inline;
  13752. procedure setTRISG2; inline;
  13753. procedure setTRISG3; inline;
  13754. procedure setTRISG6; inline;
  13755. procedure setTRISG7; inline;
  13756. procedure setTRISG8; inline;
  13757. procedure setTRISG9; inline;
  13758. property TRISG2 : TBits_1 read getTRISG2 write setTRISG2;
  13759. property TRISG3 : TBits_1 read getTRISG3 write setTRISG3;
  13760. property TRISG6 : TBits_1 read getTRISG6 write setTRISG6;
  13761. property TRISG7 : TBits_1 read getTRISG7 write setTRISG7;
  13762. property TRISG8 : TBits_1 read getTRISG8 write setTRISG8;
  13763. property TRISG9 : TBits_1 read getTRISG9 write setTRISG9;
  13764. property w : TBits_32 read getw write setw;
  13765. end;
  13766. TPORTG_PORTG = record
  13767. private
  13768. function getRG2 : TBits_1; inline;
  13769. function getRG3 : TBits_1; inline;
  13770. function getRG6 : TBits_1; inline;
  13771. function getRG7 : TBits_1; inline;
  13772. function getRG8 : TBits_1; inline;
  13773. function getRG9 : TBits_1; inline;
  13774. function getw : TBits_32; inline;
  13775. procedure setRG2(thebits : TBits_1); inline;
  13776. procedure setRG3(thebits : TBits_1); inline;
  13777. procedure setRG6(thebits : TBits_1); inline;
  13778. procedure setRG7(thebits : TBits_1); inline;
  13779. procedure setRG8(thebits : TBits_1); inline;
  13780. procedure setRG9(thebits : TBits_1); inline;
  13781. procedure setw(thebits : TBits_32); inline;
  13782. public
  13783. procedure clearRG2; inline;
  13784. procedure clearRG3; inline;
  13785. procedure clearRG6; inline;
  13786. procedure clearRG7; inline;
  13787. procedure clearRG8; inline;
  13788. procedure clearRG9; inline;
  13789. procedure setRG2; inline;
  13790. procedure setRG3; inline;
  13791. procedure setRG6; inline;
  13792. procedure setRG7; inline;
  13793. procedure setRG8; inline;
  13794. procedure setRG9; inline;
  13795. property RG2 : TBits_1 read getRG2 write setRG2;
  13796. property RG3 : TBits_1 read getRG3 write setRG3;
  13797. property RG6 : TBits_1 read getRG6 write setRG6;
  13798. property RG7 : TBits_1 read getRG7 write setRG7;
  13799. property RG8 : TBits_1 read getRG8 write setRG8;
  13800. property RG9 : TBits_1 read getRG9 write setRG9;
  13801. property w : TBits_32 read getw write setw;
  13802. end;
  13803. TPortG_bits=(RG2=2,RG3=3,RG6=6,RG7=7,RG8=8,RG9=9);
  13804. TPortG_bitset = set of TPortG_bits;
  13805. TPORTG_LATG = record
  13806. private
  13807. function getLATG2 : TBits_1; inline;
  13808. function getLATG3 : TBits_1; inline;
  13809. function getLATG6 : TBits_1; inline;
  13810. function getLATG7 : TBits_1; inline;
  13811. function getLATG8 : TBits_1; inline;
  13812. function getLATG9 : TBits_1; inline;
  13813. function getw : TBits_32; inline;
  13814. procedure setLATG2(thebits : TBits_1); inline;
  13815. procedure setLATG3(thebits : TBits_1); inline;
  13816. procedure setLATG6(thebits : TBits_1); inline;
  13817. procedure setLATG7(thebits : TBits_1); inline;
  13818. procedure setLATG8(thebits : TBits_1); inline;
  13819. procedure setLATG9(thebits : TBits_1); inline;
  13820. procedure setw(thebits : TBits_32); inline;
  13821. public
  13822. procedure clearLATG2; inline;
  13823. procedure clearLATG3; inline;
  13824. procedure clearLATG6; inline;
  13825. procedure clearLATG7; inline;
  13826. procedure clearLATG8; inline;
  13827. procedure clearLATG9; inline;
  13828. procedure setLATG2; inline;
  13829. procedure setLATG3; inline;
  13830. procedure setLATG6; inline;
  13831. procedure setLATG7; inline;
  13832. procedure setLATG8; inline;
  13833. procedure setLATG9; inline;
  13834. property LATG2 : TBits_1 read getLATG2 write setLATG2;
  13835. property LATG3 : TBits_1 read getLATG3 write setLATG3;
  13836. property LATG6 : TBits_1 read getLATG6 write setLATG6;
  13837. property LATG7 : TBits_1 read getLATG7 write setLATG7;
  13838. property LATG8 : TBits_1 read getLATG8 write setLATG8;
  13839. property LATG9 : TBits_1 read getLATG9 write setLATG9;
  13840. property w : TBits_32 read getw write setw;
  13841. end;
  13842. TPORTG_ODCG = record
  13843. private
  13844. function getODCG2 : TBits_1; inline;
  13845. function getODCG3 : TBits_1; inline;
  13846. function getODCG6 : TBits_1; inline;
  13847. function getODCG7 : TBits_1; inline;
  13848. function getODCG8 : TBits_1; inline;
  13849. function getODCG9 : TBits_1; inline;
  13850. function getw : TBits_32; inline;
  13851. procedure setODCG2(thebits : TBits_1); inline;
  13852. procedure setODCG3(thebits : TBits_1); inline;
  13853. procedure setODCG6(thebits : TBits_1); inline;
  13854. procedure setODCG7(thebits : TBits_1); inline;
  13855. procedure setODCG8(thebits : TBits_1); inline;
  13856. procedure setODCG9(thebits : TBits_1); inline;
  13857. procedure setw(thebits : TBits_32); inline;
  13858. public
  13859. procedure clearODCG2; inline;
  13860. procedure clearODCG3; inline;
  13861. procedure clearODCG6; inline;
  13862. procedure clearODCG7; inline;
  13863. procedure clearODCG8; inline;
  13864. procedure clearODCG9; inline;
  13865. procedure setODCG2; inline;
  13866. procedure setODCG3; inline;
  13867. procedure setODCG6; inline;
  13868. procedure setODCG7; inline;
  13869. procedure setODCG8; inline;
  13870. procedure setODCG9; inline;
  13871. property ODCG2 : TBits_1 read getODCG2 write setODCG2;
  13872. property ODCG3 : TBits_1 read getODCG3 write setODCG3;
  13873. property ODCG6 : TBits_1 read getODCG6 write setODCG6;
  13874. property ODCG7 : TBits_1 read getODCG7 write setODCG7;
  13875. property ODCG8 : TBits_1 read getODCG8 write setODCG8;
  13876. property ODCG9 : TBits_1 read getODCG9 write setODCG9;
  13877. property w : TBits_32 read getw write setw;
  13878. end;
  13879. TPORTG_CNCON = record
  13880. private
  13881. function getON : TBits_1; inline;
  13882. function getSIDL : TBits_1; inline;
  13883. function getw : TBits_32; inline;
  13884. procedure setON(thebits : TBits_1); inline;
  13885. procedure setSIDL(thebits : TBits_1); inline;
  13886. procedure setw(thebits : TBits_32); inline;
  13887. public
  13888. procedure clearON; inline;
  13889. procedure clearSIDL; inline;
  13890. procedure setON; inline;
  13891. procedure setSIDL; inline;
  13892. property ON : TBits_1 read getON write setON;
  13893. property SIDL : TBits_1 read getSIDL write setSIDL;
  13894. property w : TBits_32 read getw write setw;
  13895. end;
  13896. TPORTG_CNEN = record
  13897. private
  13898. function getCNEN0 : TBits_1; inline;
  13899. function getCNEN1 : TBits_1; inline;
  13900. function getCNEN10 : TBits_1; inline;
  13901. function getCNEN11 : TBits_1; inline;
  13902. function getCNEN12 : TBits_1; inline;
  13903. function getCNEN13 : TBits_1; inline;
  13904. function getCNEN14 : TBits_1; inline;
  13905. function getCNEN15 : TBits_1; inline;
  13906. function getCNEN16 : TBits_1; inline;
  13907. function getCNEN17 : TBits_1; inline;
  13908. function getCNEN18 : TBits_1; inline;
  13909. function getCNEN2 : TBits_1; inline;
  13910. function getCNEN3 : TBits_1; inline;
  13911. function getCNEN4 : TBits_1; inline;
  13912. function getCNEN5 : TBits_1; inline;
  13913. function getCNEN6 : TBits_1; inline;
  13914. function getCNEN7 : TBits_1; inline;
  13915. function getCNEN8 : TBits_1; inline;
  13916. function getCNEN9 : TBits_1; inline;
  13917. function getw : TBits_32; inline;
  13918. procedure setCNEN0(thebits : TBits_1); inline;
  13919. procedure setCNEN1(thebits : TBits_1); inline;
  13920. procedure setCNEN10(thebits : TBits_1); inline;
  13921. procedure setCNEN11(thebits : TBits_1); inline;
  13922. procedure setCNEN12(thebits : TBits_1); inline;
  13923. procedure setCNEN13(thebits : TBits_1); inline;
  13924. procedure setCNEN14(thebits : TBits_1); inline;
  13925. procedure setCNEN15(thebits : TBits_1); inline;
  13926. procedure setCNEN16(thebits : TBits_1); inline;
  13927. procedure setCNEN17(thebits : TBits_1); inline;
  13928. procedure setCNEN18(thebits : TBits_1); inline;
  13929. procedure setCNEN2(thebits : TBits_1); inline;
  13930. procedure setCNEN3(thebits : TBits_1); inline;
  13931. procedure setCNEN4(thebits : TBits_1); inline;
  13932. procedure setCNEN5(thebits : TBits_1); inline;
  13933. procedure setCNEN6(thebits : TBits_1); inline;
  13934. procedure setCNEN7(thebits : TBits_1); inline;
  13935. procedure setCNEN8(thebits : TBits_1); inline;
  13936. procedure setCNEN9(thebits : TBits_1); inline;
  13937. procedure setw(thebits : TBits_32); inline;
  13938. public
  13939. procedure clearCNEN0; inline;
  13940. procedure clearCNEN10; inline;
  13941. procedure clearCNEN11; inline;
  13942. procedure clearCNEN12; inline;
  13943. procedure clearCNEN13; inline;
  13944. procedure clearCNEN14; inline;
  13945. procedure clearCNEN15; inline;
  13946. procedure clearCNEN16; inline;
  13947. procedure clearCNEN17; inline;
  13948. procedure clearCNEN18; inline;
  13949. procedure clearCNEN1; inline;
  13950. procedure clearCNEN2; inline;
  13951. procedure clearCNEN3; inline;
  13952. procedure clearCNEN4; inline;
  13953. procedure clearCNEN5; inline;
  13954. procedure clearCNEN6; inline;
  13955. procedure clearCNEN7; inline;
  13956. procedure clearCNEN8; inline;
  13957. procedure clearCNEN9; inline;
  13958. procedure setCNEN0; inline;
  13959. procedure setCNEN10; inline;
  13960. procedure setCNEN11; inline;
  13961. procedure setCNEN12; inline;
  13962. procedure setCNEN13; inline;
  13963. procedure setCNEN14; inline;
  13964. procedure setCNEN15; inline;
  13965. procedure setCNEN16; inline;
  13966. procedure setCNEN17; inline;
  13967. procedure setCNEN18; inline;
  13968. procedure setCNEN1; inline;
  13969. procedure setCNEN2; inline;
  13970. procedure setCNEN3; inline;
  13971. procedure setCNEN4; inline;
  13972. procedure setCNEN5; inline;
  13973. procedure setCNEN6; inline;
  13974. procedure setCNEN7; inline;
  13975. procedure setCNEN8; inline;
  13976. procedure setCNEN9; inline;
  13977. property CNEN0 : TBits_1 read getCNEN0 write setCNEN0;
  13978. property CNEN1 : TBits_1 read getCNEN1 write setCNEN1;
  13979. property CNEN10 : TBits_1 read getCNEN10 write setCNEN10;
  13980. property CNEN11 : TBits_1 read getCNEN11 write setCNEN11;
  13981. property CNEN12 : TBits_1 read getCNEN12 write setCNEN12;
  13982. property CNEN13 : TBits_1 read getCNEN13 write setCNEN13;
  13983. property CNEN14 : TBits_1 read getCNEN14 write setCNEN14;
  13984. property CNEN15 : TBits_1 read getCNEN15 write setCNEN15;
  13985. property CNEN16 : TBits_1 read getCNEN16 write setCNEN16;
  13986. property CNEN17 : TBits_1 read getCNEN17 write setCNEN17;
  13987. property CNEN18 : TBits_1 read getCNEN18 write setCNEN18;
  13988. property CNEN2 : TBits_1 read getCNEN2 write setCNEN2;
  13989. property CNEN3 : TBits_1 read getCNEN3 write setCNEN3;
  13990. property CNEN4 : TBits_1 read getCNEN4 write setCNEN4;
  13991. property CNEN5 : TBits_1 read getCNEN5 write setCNEN5;
  13992. property CNEN6 : TBits_1 read getCNEN6 write setCNEN6;
  13993. property CNEN7 : TBits_1 read getCNEN7 write setCNEN7;
  13994. property CNEN8 : TBits_1 read getCNEN8 write setCNEN8;
  13995. property CNEN9 : TBits_1 read getCNEN9 write setCNEN9;
  13996. property w : TBits_32 read getw write setw;
  13997. end;
  13998. TPORTG_CNPUE = record
  13999. private
  14000. function getCNPUE0 : TBits_1; inline;
  14001. function getCNPUE1 : TBits_1; inline;
  14002. function getCNPUE10 : TBits_1; inline;
  14003. function getCNPUE11 : TBits_1; inline;
  14004. function getCNPUE12 : TBits_1; inline;
  14005. function getCNPUE13 : TBits_1; inline;
  14006. function getCNPUE14 : TBits_1; inline;
  14007. function getCNPUE15 : TBits_1; inline;
  14008. function getCNPUE16 : TBits_1; inline;
  14009. function getCNPUE17 : TBits_1; inline;
  14010. function getCNPUE18 : TBits_1; inline;
  14011. function getCNPUE2 : TBits_1; inline;
  14012. function getCNPUE3 : TBits_1; inline;
  14013. function getCNPUE4 : TBits_1; inline;
  14014. function getCNPUE5 : TBits_1; inline;
  14015. function getCNPUE6 : TBits_1; inline;
  14016. function getCNPUE7 : TBits_1; inline;
  14017. function getCNPUE8 : TBits_1; inline;
  14018. function getCNPUE9 : TBits_1; inline;
  14019. function getw : TBits_32; inline;
  14020. procedure setCNPUE0(thebits : TBits_1); inline;
  14021. procedure setCNPUE1(thebits : TBits_1); inline;
  14022. procedure setCNPUE10(thebits : TBits_1); inline;
  14023. procedure setCNPUE11(thebits : TBits_1); inline;
  14024. procedure setCNPUE12(thebits : TBits_1); inline;
  14025. procedure setCNPUE13(thebits : TBits_1); inline;
  14026. procedure setCNPUE14(thebits : TBits_1); inline;
  14027. procedure setCNPUE15(thebits : TBits_1); inline;
  14028. procedure setCNPUE16(thebits : TBits_1); inline;
  14029. procedure setCNPUE17(thebits : TBits_1); inline;
  14030. procedure setCNPUE18(thebits : TBits_1); inline;
  14031. procedure setCNPUE2(thebits : TBits_1); inline;
  14032. procedure setCNPUE3(thebits : TBits_1); inline;
  14033. procedure setCNPUE4(thebits : TBits_1); inline;
  14034. procedure setCNPUE5(thebits : TBits_1); inline;
  14035. procedure setCNPUE6(thebits : TBits_1); inline;
  14036. procedure setCNPUE7(thebits : TBits_1); inline;
  14037. procedure setCNPUE8(thebits : TBits_1); inline;
  14038. procedure setCNPUE9(thebits : TBits_1); inline;
  14039. procedure setw(thebits : TBits_32); inline;
  14040. public
  14041. procedure clearCNPUE0; inline;
  14042. procedure clearCNPUE10; inline;
  14043. procedure clearCNPUE11; inline;
  14044. procedure clearCNPUE12; inline;
  14045. procedure clearCNPUE13; inline;
  14046. procedure clearCNPUE14; inline;
  14047. procedure clearCNPUE15; inline;
  14048. procedure clearCNPUE16; inline;
  14049. procedure clearCNPUE17; inline;
  14050. procedure clearCNPUE18; inline;
  14051. procedure clearCNPUE1; inline;
  14052. procedure clearCNPUE2; inline;
  14053. procedure clearCNPUE3; inline;
  14054. procedure clearCNPUE4; inline;
  14055. procedure clearCNPUE5; inline;
  14056. procedure clearCNPUE6; inline;
  14057. procedure clearCNPUE7; inline;
  14058. procedure clearCNPUE8; inline;
  14059. procedure clearCNPUE9; inline;
  14060. procedure setCNPUE0; inline;
  14061. procedure setCNPUE10; inline;
  14062. procedure setCNPUE11; inline;
  14063. procedure setCNPUE12; inline;
  14064. procedure setCNPUE13; inline;
  14065. procedure setCNPUE14; inline;
  14066. procedure setCNPUE15; inline;
  14067. procedure setCNPUE16; inline;
  14068. procedure setCNPUE17; inline;
  14069. procedure setCNPUE18; inline;
  14070. procedure setCNPUE1; inline;
  14071. procedure setCNPUE2; inline;
  14072. procedure setCNPUE3; inline;
  14073. procedure setCNPUE4; inline;
  14074. procedure setCNPUE5; inline;
  14075. procedure setCNPUE6; inline;
  14076. procedure setCNPUE7; inline;
  14077. procedure setCNPUE8; inline;
  14078. procedure setCNPUE9; inline;
  14079. property CNPUE0 : TBits_1 read getCNPUE0 write setCNPUE0;
  14080. property CNPUE1 : TBits_1 read getCNPUE1 write setCNPUE1;
  14081. property CNPUE10 : TBits_1 read getCNPUE10 write setCNPUE10;
  14082. property CNPUE11 : TBits_1 read getCNPUE11 write setCNPUE11;
  14083. property CNPUE12 : TBits_1 read getCNPUE12 write setCNPUE12;
  14084. property CNPUE13 : TBits_1 read getCNPUE13 write setCNPUE13;
  14085. property CNPUE14 : TBits_1 read getCNPUE14 write setCNPUE14;
  14086. property CNPUE15 : TBits_1 read getCNPUE15 write setCNPUE15;
  14087. property CNPUE16 : TBits_1 read getCNPUE16 write setCNPUE16;
  14088. property CNPUE17 : TBits_1 read getCNPUE17 write setCNPUE17;
  14089. property CNPUE18 : TBits_1 read getCNPUE18 write setCNPUE18;
  14090. property CNPUE2 : TBits_1 read getCNPUE2 write setCNPUE2;
  14091. property CNPUE3 : TBits_1 read getCNPUE3 write setCNPUE3;
  14092. property CNPUE4 : TBits_1 read getCNPUE4 write setCNPUE4;
  14093. property CNPUE5 : TBits_1 read getCNPUE5 write setCNPUE5;
  14094. property CNPUE6 : TBits_1 read getCNPUE6 write setCNPUE6;
  14095. property CNPUE7 : TBits_1 read getCNPUE7 write setCNPUE7;
  14096. property CNPUE8 : TBits_1 read getCNPUE8 write setCNPUE8;
  14097. property CNPUE9 : TBits_1 read getCNPUE9 write setCNPUE9;
  14098. property w : TBits_32 read getw write setw;
  14099. end;
  14100. type
  14101. TPORTGRegisters = record
  14102. TRISGbits : TPORTG_TRISG;
  14103. TRISG : longWord;
  14104. TRISGCLR : longWord;
  14105. TRISGSET : longWord;
  14106. TRISGINV : longWord;
  14107. PORTGbits : TPORTG_PORTG;
  14108. PORTG : longWord;
  14109. PORTGCLR : longWord;
  14110. PORTGSET : longWord;
  14111. PORTGINV : longWord;
  14112. LATGbits : TPORTG_LATG;
  14113. LATG : longWord;
  14114. LATGCLR : longWord;
  14115. LATGSET : longWord;
  14116. LATGINV : longWord;
  14117. ODCGbits : TPORTG_ODCG;
  14118. ODCG : longWord;
  14119. ODCGCLR : longWord;
  14120. ODCGSET : longWord;
  14121. ODCGINV : longWord;
  14122. CNCONbits : TPORTG_CNCON;
  14123. CNCON : longWord;
  14124. CNCONCLR : longWord;
  14125. CNCONSET : longWord;
  14126. CNCONINV : longWord;
  14127. CNENbits : TPORTG_CNEN;
  14128. CNEN : longWord;
  14129. CNENCLR : longWord;
  14130. CNENSET : longWord;
  14131. CNENINV : longWord;
  14132. CNPUEbits : TPORTG_CNPUE;
  14133. CNPUE : longWord;
  14134. CNPUECLR : longWord;
  14135. CNPUESET : longWord;
  14136. CNPUEINV : longWord;
  14137. end;
  14138. TCAN1_C1CON = record
  14139. private
  14140. function getABAT : TBits_1; inline;
  14141. function getCANBUSY : TBits_1; inline;
  14142. function getCANCAP : TBits_1; inline;
  14143. function getDNCNT : TBits_5; inline;
  14144. function getON : TBits_1; inline;
  14145. function getOPMOD : TBits_3; inline;
  14146. function getREQOP : TBits_3; inline;
  14147. function getSIDL : TBits_1; inline;
  14148. function getw : TBits_32; inline;
  14149. procedure setABAT(thebits : TBits_1); inline;
  14150. procedure setCANBUSY(thebits : TBits_1); inline;
  14151. procedure setCANCAP(thebits : TBits_1); inline;
  14152. procedure setDNCNT(thebits : TBits_5); inline;
  14153. procedure setON(thebits : TBits_1); inline;
  14154. procedure setOPMOD(thebits : TBits_3); inline;
  14155. procedure setREQOP(thebits : TBits_3); inline;
  14156. procedure setSIDL(thebits : TBits_1); inline;
  14157. procedure setw(thebits : TBits_32); inline;
  14158. public
  14159. procedure clearABAT; inline;
  14160. procedure clearCANBUSY; inline;
  14161. procedure clearCANCAP; inline;
  14162. procedure clearON; inline;
  14163. procedure clearSIDL; inline;
  14164. procedure setABAT; inline;
  14165. procedure setCANBUSY; inline;
  14166. procedure setCANCAP; inline;
  14167. procedure setON; inline;
  14168. procedure setSIDL; inline;
  14169. property ABAT : TBits_1 read getABAT write setABAT;
  14170. property CANBUSY : TBits_1 read getCANBUSY write setCANBUSY;
  14171. property CANCAP : TBits_1 read getCANCAP write setCANCAP;
  14172. property DNCNT : TBits_5 read getDNCNT write setDNCNT;
  14173. property ON : TBits_1 read getON write setON;
  14174. property OPMOD : TBits_3 read getOPMOD write setOPMOD;
  14175. property REQOP : TBits_3 read getREQOP write setREQOP;
  14176. property SIDL : TBits_1 read getSIDL write setSIDL;
  14177. property w : TBits_32 read getw write setw;
  14178. end;
  14179. TCAN1_C1CFG = record
  14180. private
  14181. function getBRP : TBits_6; inline;
  14182. function getPRSEG : TBits_3; inline;
  14183. function getSAM : TBits_1; inline;
  14184. function getSEG1PH : TBits_3; inline;
  14185. function getSEG2PH : TBits_3; inline;
  14186. function getSEG2PHTS : TBits_1; inline;
  14187. function getSJW : TBits_2; inline;
  14188. function getWAKFIL : TBits_1; inline;
  14189. function getw : TBits_32; inline;
  14190. procedure setBRP(thebits : TBits_6); inline;
  14191. procedure setPRSEG(thebits : TBits_3); inline;
  14192. procedure setSAM(thebits : TBits_1); inline;
  14193. procedure setSEG1PH(thebits : TBits_3); inline;
  14194. procedure setSEG2PH(thebits : TBits_3); inline;
  14195. procedure setSEG2PHTS(thebits : TBits_1); inline;
  14196. procedure setSJW(thebits : TBits_2); inline;
  14197. procedure setWAKFIL(thebits : TBits_1); inline;
  14198. procedure setw(thebits : TBits_32); inline;
  14199. public
  14200. procedure clearSAM; inline;
  14201. procedure clearSEG2PHTS; inline;
  14202. procedure clearWAKFIL; inline;
  14203. procedure setSAM; inline;
  14204. procedure setSEG2PHTS; inline;
  14205. procedure setWAKFIL; inline;
  14206. property BRP : TBits_6 read getBRP write setBRP;
  14207. property PRSEG : TBits_3 read getPRSEG write setPRSEG;
  14208. property SAM : TBits_1 read getSAM write setSAM;
  14209. property SEG1PH : TBits_3 read getSEG1PH write setSEG1PH;
  14210. property SEG2PH : TBits_3 read getSEG2PH write setSEG2PH;
  14211. property SEG2PHTS : TBits_1 read getSEG2PHTS write setSEG2PHTS;
  14212. property SJW : TBits_2 read getSJW write setSJW;
  14213. property WAKFIL : TBits_1 read getWAKFIL write setWAKFIL;
  14214. property w : TBits_32 read getw write setw;
  14215. end;
  14216. TCAN1_C1INT = record
  14217. private
  14218. function getCERRIE : TBits_1; inline;
  14219. function getCERRIF : TBits_1; inline;
  14220. function getCTMRIE : TBits_1; inline;
  14221. function getCTMRIF : TBits_1; inline;
  14222. function getIVRIE : TBits_1; inline;
  14223. function getIVRIF : TBits_1; inline;
  14224. function getMODIE : TBits_1; inline;
  14225. function getMODIF : TBits_1; inline;
  14226. function getRBIE : TBits_1; inline;
  14227. function getRBIF : TBits_1; inline;
  14228. function getRBOVIE : TBits_1; inline;
  14229. function getRBOVIF : TBits_1; inline;
  14230. function getSERRIE : TBits_1; inline;
  14231. function getSERRIF : TBits_1; inline;
  14232. function getTBIE : TBits_1; inline;
  14233. function getTBIF : TBits_1; inline;
  14234. function getWAKIE : TBits_1; inline;
  14235. function getWAKIF : TBits_1; inline;
  14236. function getw : TBits_32; inline;
  14237. procedure setCERRIE(thebits : TBits_1); inline;
  14238. procedure setCERRIF(thebits : TBits_1); inline;
  14239. procedure setCTMRIE(thebits : TBits_1); inline;
  14240. procedure setCTMRIF(thebits : TBits_1); inline;
  14241. procedure setIVRIE(thebits : TBits_1); inline;
  14242. procedure setIVRIF(thebits : TBits_1); inline;
  14243. procedure setMODIE(thebits : TBits_1); inline;
  14244. procedure setMODIF(thebits : TBits_1); inline;
  14245. procedure setRBIE(thebits : TBits_1); inline;
  14246. procedure setRBIF(thebits : TBits_1); inline;
  14247. procedure setRBOVIE(thebits : TBits_1); inline;
  14248. procedure setRBOVIF(thebits : TBits_1); inline;
  14249. procedure setSERRIE(thebits : TBits_1); inline;
  14250. procedure setSERRIF(thebits : TBits_1); inline;
  14251. procedure setTBIE(thebits : TBits_1); inline;
  14252. procedure setTBIF(thebits : TBits_1); inline;
  14253. procedure setWAKIE(thebits : TBits_1); inline;
  14254. procedure setWAKIF(thebits : TBits_1); inline;
  14255. procedure setw(thebits : TBits_32); inline;
  14256. public
  14257. procedure clearCERRIE; inline;
  14258. procedure clearCERRIF; inline;
  14259. procedure clearCTMRIE; inline;
  14260. procedure clearCTMRIF; inline;
  14261. procedure clearIVRIE; inline;
  14262. procedure clearIVRIF; inline;
  14263. procedure clearMODIE; inline;
  14264. procedure clearMODIF; inline;
  14265. procedure clearRBIE; inline;
  14266. procedure clearRBIF; inline;
  14267. procedure clearRBOVIE; inline;
  14268. procedure clearRBOVIF; inline;
  14269. procedure clearSERRIE; inline;
  14270. procedure clearSERRIF; inline;
  14271. procedure clearTBIE; inline;
  14272. procedure clearTBIF; inline;
  14273. procedure clearWAKIE; inline;
  14274. procedure clearWAKIF; inline;
  14275. procedure setCERRIE; inline;
  14276. procedure setCERRIF; inline;
  14277. procedure setCTMRIE; inline;
  14278. procedure setCTMRIF; inline;
  14279. procedure setIVRIE; inline;
  14280. procedure setIVRIF; inline;
  14281. procedure setMODIE; inline;
  14282. procedure setMODIF; inline;
  14283. procedure setRBIE; inline;
  14284. procedure setRBIF; inline;
  14285. procedure setRBOVIE; inline;
  14286. procedure setRBOVIF; inline;
  14287. procedure setSERRIE; inline;
  14288. procedure setSERRIF; inline;
  14289. procedure setTBIE; inline;
  14290. procedure setTBIF; inline;
  14291. procedure setWAKIE; inline;
  14292. procedure setWAKIF; inline;
  14293. property CERRIE : TBits_1 read getCERRIE write setCERRIE;
  14294. property CERRIF : TBits_1 read getCERRIF write setCERRIF;
  14295. property CTMRIE : TBits_1 read getCTMRIE write setCTMRIE;
  14296. property CTMRIF : TBits_1 read getCTMRIF write setCTMRIF;
  14297. property IVRIE : TBits_1 read getIVRIE write setIVRIE;
  14298. property IVRIF : TBits_1 read getIVRIF write setIVRIF;
  14299. property MODIE : TBits_1 read getMODIE write setMODIE;
  14300. property MODIF : TBits_1 read getMODIF write setMODIF;
  14301. property RBIE : TBits_1 read getRBIE write setRBIE;
  14302. property RBIF : TBits_1 read getRBIF write setRBIF;
  14303. property RBOVIE : TBits_1 read getRBOVIE write setRBOVIE;
  14304. property RBOVIF : TBits_1 read getRBOVIF write setRBOVIF;
  14305. property SERRIE : TBits_1 read getSERRIE write setSERRIE;
  14306. property SERRIF : TBits_1 read getSERRIF write setSERRIF;
  14307. property TBIE : TBits_1 read getTBIE write setTBIE;
  14308. property TBIF : TBits_1 read getTBIF write setTBIF;
  14309. property WAKIE : TBits_1 read getWAKIE write setWAKIE;
  14310. property WAKIF : TBits_1 read getWAKIF write setWAKIF;
  14311. property w : TBits_32 read getw write setw;
  14312. end;
  14313. TCAN1_C1VEC = record
  14314. private
  14315. function getFILHIT : TBits_5; inline;
  14316. function getICODE : TBits_7; inline;
  14317. function getw : TBits_32; inline;
  14318. procedure setFILHIT(thebits : TBits_5); inline;
  14319. procedure setICODE(thebits : TBits_7); inline;
  14320. procedure setw(thebits : TBits_32); inline;
  14321. public
  14322. property FILHIT : TBits_5 read getFILHIT write setFILHIT;
  14323. property ICODE : TBits_7 read getICODE write setICODE;
  14324. property w : TBits_32 read getw write setw;
  14325. end;
  14326. TCAN1_C1TREC = record
  14327. private
  14328. function getEWARN : TBits_1; inline;
  14329. function getRERRCNT : TBits_8; inline;
  14330. function getRXBP : TBits_1; inline;
  14331. function getRXWARN : TBits_1; inline;
  14332. function getTERRCNT : TBits_8; inline;
  14333. function getTXBO : TBits_1; inline;
  14334. function getTXBP : TBits_1; inline;
  14335. function getTXWARN : TBits_1; inline;
  14336. function getw : TBits_32; inline;
  14337. procedure setEWARN(thebits : TBits_1); inline;
  14338. procedure setRERRCNT(thebits : TBits_8); inline;
  14339. procedure setRXBP(thebits : TBits_1); inline;
  14340. procedure setRXWARN(thebits : TBits_1); inline;
  14341. procedure setTERRCNT(thebits : TBits_8); inline;
  14342. procedure setTXBO(thebits : TBits_1); inline;
  14343. procedure setTXBP(thebits : TBits_1); inline;
  14344. procedure setTXWARN(thebits : TBits_1); inline;
  14345. procedure setw(thebits : TBits_32); inline;
  14346. public
  14347. procedure clearEWARN; inline;
  14348. procedure clearRXBP; inline;
  14349. procedure clearRXWARN; inline;
  14350. procedure clearTXBO; inline;
  14351. procedure clearTXBP; inline;
  14352. procedure clearTXWARN; inline;
  14353. procedure setEWARN; inline;
  14354. procedure setRXBP; inline;
  14355. procedure setRXWARN; inline;
  14356. procedure setTXBO; inline;
  14357. procedure setTXBP; inline;
  14358. procedure setTXWARN; inline;
  14359. property EWARN : TBits_1 read getEWARN write setEWARN;
  14360. property RERRCNT : TBits_8 read getRERRCNT write setRERRCNT;
  14361. property RXBP : TBits_1 read getRXBP write setRXBP;
  14362. property RXWARN : TBits_1 read getRXWARN write setRXWARN;
  14363. property TERRCNT : TBits_8 read getTERRCNT write setTERRCNT;
  14364. property TXBO : TBits_1 read getTXBO write setTXBO;
  14365. property TXBP : TBits_1 read getTXBP write setTXBP;
  14366. property TXWARN : TBits_1 read getTXWARN write setTXWARN;
  14367. property w : TBits_32 read getw write setw;
  14368. end;
  14369. TCAN1_C1FSTAT = record
  14370. private
  14371. function getFIFOIP : TBits_32; inline;
  14372. function getFIFOIP0 : TBits_1; inline;
  14373. function getFIFOIP1 : TBits_1; inline;
  14374. function getFIFOIP10 : TBits_1; inline;
  14375. function getFIFOIP11 : TBits_1; inline;
  14376. function getFIFOIP12 : TBits_1; inline;
  14377. function getFIFOIP13 : TBits_1; inline;
  14378. function getFIFOIP14 : TBits_1; inline;
  14379. function getFIFOIP15 : TBits_1; inline;
  14380. function getFIFOIP16 : TBits_1; inline;
  14381. function getFIFOIP17 : TBits_1; inline;
  14382. function getFIFOIP18 : TBits_1; inline;
  14383. function getFIFOIP19 : TBits_1; inline;
  14384. function getFIFOIP2 : TBits_1; inline;
  14385. function getFIFOIP20 : TBits_1; inline;
  14386. function getFIFOIP21 : TBits_1; inline;
  14387. function getFIFOIP22 : TBits_1; inline;
  14388. function getFIFOIP23 : TBits_1; inline;
  14389. function getFIFOIP24 : TBits_1; inline;
  14390. function getFIFOIP25 : TBits_1; inline;
  14391. function getFIFOIP26 : TBits_1; inline;
  14392. function getFIFOIP27 : TBits_1; inline;
  14393. function getFIFOIP28 : TBits_1; inline;
  14394. function getFIFOIP29 : TBits_1; inline;
  14395. function getFIFOIP3 : TBits_1; inline;
  14396. function getFIFOIP30 : TBits_1; inline;
  14397. function getFIFOIP31 : TBits_1; inline;
  14398. function getFIFOIP4 : TBits_1; inline;
  14399. function getFIFOIP5 : TBits_1; inline;
  14400. function getFIFOIP6 : TBits_1; inline;
  14401. function getFIFOIP7 : TBits_1; inline;
  14402. function getFIFOIP8 : TBits_1; inline;
  14403. function getFIFOIP9 : TBits_1; inline;
  14404. function getw : TBits_32; inline;
  14405. procedure setFIFOIP(thebits : TBits_32); inline;
  14406. procedure setFIFOIP0(thebits : TBits_1); inline;
  14407. procedure setFIFOIP1(thebits : TBits_1); inline;
  14408. procedure setFIFOIP10(thebits : TBits_1); inline;
  14409. procedure setFIFOIP11(thebits : TBits_1); inline;
  14410. procedure setFIFOIP12(thebits : TBits_1); inline;
  14411. procedure setFIFOIP13(thebits : TBits_1); inline;
  14412. procedure setFIFOIP14(thebits : TBits_1); inline;
  14413. procedure setFIFOIP15(thebits : TBits_1); inline;
  14414. procedure setFIFOIP16(thebits : TBits_1); inline;
  14415. procedure setFIFOIP17(thebits : TBits_1); inline;
  14416. procedure setFIFOIP18(thebits : TBits_1); inline;
  14417. procedure setFIFOIP19(thebits : TBits_1); inline;
  14418. procedure setFIFOIP2(thebits : TBits_1); inline;
  14419. procedure setFIFOIP20(thebits : TBits_1); inline;
  14420. procedure setFIFOIP21(thebits : TBits_1); inline;
  14421. procedure setFIFOIP22(thebits : TBits_1); inline;
  14422. procedure setFIFOIP23(thebits : TBits_1); inline;
  14423. procedure setFIFOIP24(thebits : TBits_1); inline;
  14424. procedure setFIFOIP25(thebits : TBits_1); inline;
  14425. procedure setFIFOIP26(thebits : TBits_1); inline;
  14426. procedure setFIFOIP27(thebits : TBits_1); inline;
  14427. procedure setFIFOIP28(thebits : TBits_1); inline;
  14428. procedure setFIFOIP29(thebits : TBits_1); inline;
  14429. procedure setFIFOIP3(thebits : TBits_1); inline;
  14430. procedure setFIFOIP30(thebits : TBits_1); inline;
  14431. procedure setFIFOIP31(thebits : TBits_1); inline;
  14432. procedure setFIFOIP4(thebits : TBits_1); inline;
  14433. procedure setFIFOIP5(thebits : TBits_1); inline;
  14434. procedure setFIFOIP6(thebits : TBits_1); inline;
  14435. procedure setFIFOIP7(thebits : TBits_1); inline;
  14436. procedure setFIFOIP8(thebits : TBits_1); inline;
  14437. procedure setFIFOIP9(thebits : TBits_1); inline;
  14438. procedure setw(thebits : TBits_32); inline;
  14439. public
  14440. procedure clearFIFOIP0; inline;
  14441. procedure clearFIFOIP10; inline;
  14442. procedure clearFIFOIP11; inline;
  14443. procedure clearFIFOIP12; inline;
  14444. procedure clearFIFOIP13; inline;
  14445. procedure clearFIFOIP14; inline;
  14446. procedure clearFIFOIP15; inline;
  14447. procedure clearFIFOIP16; inline;
  14448. procedure clearFIFOIP17; inline;
  14449. procedure clearFIFOIP18; inline;
  14450. procedure clearFIFOIP19; inline;
  14451. procedure clearFIFOIP1; inline;
  14452. procedure clearFIFOIP20; inline;
  14453. procedure clearFIFOIP21; inline;
  14454. procedure clearFIFOIP22; inline;
  14455. procedure clearFIFOIP23; inline;
  14456. procedure clearFIFOIP24; inline;
  14457. procedure clearFIFOIP25; inline;
  14458. procedure clearFIFOIP26; inline;
  14459. procedure clearFIFOIP27; inline;
  14460. procedure clearFIFOIP28; inline;
  14461. procedure clearFIFOIP29; inline;
  14462. procedure clearFIFOIP2; inline;
  14463. procedure clearFIFOIP30; inline;
  14464. procedure clearFIFOIP31; inline;
  14465. procedure clearFIFOIP3; inline;
  14466. procedure clearFIFOIP4; inline;
  14467. procedure clearFIFOIP5; inline;
  14468. procedure clearFIFOIP6; inline;
  14469. procedure clearFIFOIP7; inline;
  14470. procedure clearFIFOIP8; inline;
  14471. procedure clearFIFOIP9; inline;
  14472. procedure setFIFOIP0; inline;
  14473. procedure setFIFOIP10; inline;
  14474. procedure setFIFOIP11; inline;
  14475. procedure setFIFOIP12; inline;
  14476. procedure setFIFOIP13; inline;
  14477. procedure setFIFOIP14; inline;
  14478. procedure setFIFOIP15; inline;
  14479. procedure setFIFOIP16; inline;
  14480. procedure setFIFOIP17; inline;
  14481. procedure setFIFOIP18; inline;
  14482. procedure setFIFOIP19; inline;
  14483. procedure setFIFOIP1; inline;
  14484. procedure setFIFOIP20; inline;
  14485. procedure setFIFOIP21; inline;
  14486. procedure setFIFOIP22; inline;
  14487. procedure setFIFOIP23; inline;
  14488. procedure setFIFOIP24; inline;
  14489. procedure setFIFOIP25; inline;
  14490. procedure setFIFOIP26; inline;
  14491. procedure setFIFOIP27; inline;
  14492. procedure setFIFOIP28; inline;
  14493. procedure setFIFOIP29; inline;
  14494. procedure setFIFOIP2; inline;
  14495. procedure setFIFOIP30; inline;
  14496. procedure setFIFOIP31; inline;
  14497. procedure setFIFOIP3; inline;
  14498. procedure setFIFOIP4; inline;
  14499. procedure setFIFOIP5; inline;
  14500. procedure setFIFOIP6; inline;
  14501. procedure setFIFOIP7; inline;
  14502. procedure setFIFOIP8; inline;
  14503. procedure setFIFOIP9; inline;
  14504. property FIFOIP : TBits_32 read getFIFOIP write setFIFOIP;
  14505. property FIFOIP0 : TBits_1 read getFIFOIP0 write setFIFOIP0;
  14506. property FIFOIP1 : TBits_1 read getFIFOIP1 write setFIFOIP1;
  14507. property FIFOIP10 : TBits_1 read getFIFOIP10 write setFIFOIP10;
  14508. property FIFOIP11 : TBits_1 read getFIFOIP11 write setFIFOIP11;
  14509. property FIFOIP12 : TBits_1 read getFIFOIP12 write setFIFOIP12;
  14510. property FIFOIP13 : TBits_1 read getFIFOIP13 write setFIFOIP13;
  14511. property FIFOIP14 : TBits_1 read getFIFOIP14 write setFIFOIP14;
  14512. property FIFOIP15 : TBits_1 read getFIFOIP15 write setFIFOIP15;
  14513. property FIFOIP16 : TBits_1 read getFIFOIP16 write setFIFOIP16;
  14514. property FIFOIP17 : TBits_1 read getFIFOIP17 write setFIFOIP17;
  14515. property FIFOIP18 : TBits_1 read getFIFOIP18 write setFIFOIP18;
  14516. property FIFOIP19 : TBits_1 read getFIFOIP19 write setFIFOIP19;
  14517. property FIFOIP2 : TBits_1 read getFIFOIP2 write setFIFOIP2;
  14518. property FIFOIP20 : TBits_1 read getFIFOIP20 write setFIFOIP20;
  14519. property FIFOIP21 : TBits_1 read getFIFOIP21 write setFIFOIP21;
  14520. property FIFOIP22 : TBits_1 read getFIFOIP22 write setFIFOIP22;
  14521. property FIFOIP23 : TBits_1 read getFIFOIP23 write setFIFOIP23;
  14522. property FIFOIP24 : TBits_1 read getFIFOIP24 write setFIFOIP24;
  14523. property FIFOIP25 : TBits_1 read getFIFOIP25 write setFIFOIP25;
  14524. property FIFOIP26 : TBits_1 read getFIFOIP26 write setFIFOIP26;
  14525. property FIFOIP27 : TBits_1 read getFIFOIP27 write setFIFOIP27;
  14526. property FIFOIP28 : TBits_1 read getFIFOIP28 write setFIFOIP28;
  14527. property FIFOIP29 : TBits_1 read getFIFOIP29 write setFIFOIP29;
  14528. property FIFOIP3 : TBits_1 read getFIFOIP3 write setFIFOIP3;
  14529. property FIFOIP30 : TBits_1 read getFIFOIP30 write setFIFOIP30;
  14530. property FIFOIP31 : TBits_1 read getFIFOIP31 write setFIFOIP31;
  14531. property FIFOIP4 : TBits_1 read getFIFOIP4 write setFIFOIP4;
  14532. property FIFOIP5 : TBits_1 read getFIFOIP5 write setFIFOIP5;
  14533. property FIFOIP6 : TBits_1 read getFIFOIP6 write setFIFOIP6;
  14534. property FIFOIP7 : TBits_1 read getFIFOIP7 write setFIFOIP7;
  14535. property FIFOIP8 : TBits_1 read getFIFOIP8 write setFIFOIP8;
  14536. property FIFOIP9 : TBits_1 read getFIFOIP9 write setFIFOIP9;
  14537. property w : TBits_32 read getw write setw;
  14538. end;
  14539. TCAN1_C1RXOVF = record
  14540. private
  14541. function getRXOVF : TBits_32; inline;
  14542. function getRXOVF0 : TBits_1; inline;
  14543. function getRXOVF1 : TBits_1; inline;
  14544. function getRXOVF10 : TBits_1; inline;
  14545. function getRXOVF11 : TBits_1; inline;
  14546. function getRXOVF12 : TBits_1; inline;
  14547. function getRXOVF13 : TBits_1; inline;
  14548. function getRXOVF14 : TBits_1; inline;
  14549. function getRXOVF15 : TBits_1; inline;
  14550. function getRXOVF16 : TBits_1; inline;
  14551. function getRXOVF17 : TBits_1; inline;
  14552. function getRXOVF18 : TBits_1; inline;
  14553. function getRXOVF19 : TBits_1; inline;
  14554. function getRXOVF2 : TBits_1; inline;
  14555. function getRXOVF20 : TBits_1; inline;
  14556. function getRXOVF21 : TBits_1; inline;
  14557. function getRXOVF22 : TBits_1; inline;
  14558. function getRXOVF23 : TBits_1; inline;
  14559. function getRXOVF24 : TBits_1; inline;
  14560. function getRXOVF25 : TBits_1; inline;
  14561. function getRXOVF26 : TBits_1; inline;
  14562. function getRXOVF27 : TBits_1; inline;
  14563. function getRXOVF28 : TBits_1; inline;
  14564. function getRXOVF29 : TBits_1; inline;
  14565. function getRXOVF3 : TBits_1; inline;
  14566. function getRXOVF30 : TBits_1; inline;
  14567. function getRXOVF31 : TBits_1; inline;
  14568. function getRXOVF4 : TBits_1; inline;
  14569. function getRXOVF5 : TBits_1; inline;
  14570. function getRXOVF6 : TBits_1; inline;
  14571. function getRXOVF7 : TBits_1; inline;
  14572. function getRXOVF8 : TBits_1; inline;
  14573. function getRXOVF9 : TBits_1; inline;
  14574. function getw : TBits_32; inline;
  14575. procedure setRXOVF(thebits : TBits_32); inline;
  14576. procedure setRXOVF0(thebits : TBits_1); inline;
  14577. procedure setRXOVF1(thebits : TBits_1); inline;
  14578. procedure setRXOVF10(thebits : TBits_1); inline;
  14579. procedure setRXOVF11(thebits : TBits_1); inline;
  14580. procedure setRXOVF12(thebits : TBits_1); inline;
  14581. procedure setRXOVF13(thebits : TBits_1); inline;
  14582. procedure setRXOVF14(thebits : TBits_1); inline;
  14583. procedure setRXOVF15(thebits : TBits_1); inline;
  14584. procedure setRXOVF16(thebits : TBits_1); inline;
  14585. procedure setRXOVF17(thebits : TBits_1); inline;
  14586. procedure setRXOVF18(thebits : TBits_1); inline;
  14587. procedure setRXOVF19(thebits : TBits_1); inline;
  14588. procedure setRXOVF2(thebits : TBits_1); inline;
  14589. procedure setRXOVF20(thebits : TBits_1); inline;
  14590. procedure setRXOVF21(thebits : TBits_1); inline;
  14591. procedure setRXOVF22(thebits : TBits_1); inline;
  14592. procedure setRXOVF23(thebits : TBits_1); inline;
  14593. procedure setRXOVF24(thebits : TBits_1); inline;
  14594. procedure setRXOVF25(thebits : TBits_1); inline;
  14595. procedure setRXOVF26(thebits : TBits_1); inline;
  14596. procedure setRXOVF27(thebits : TBits_1); inline;
  14597. procedure setRXOVF28(thebits : TBits_1); inline;
  14598. procedure setRXOVF29(thebits : TBits_1); inline;
  14599. procedure setRXOVF3(thebits : TBits_1); inline;
  14600. procedure setRXOVF30(thebits : TBits_1); inline;
  14601. procedure setRXOVF31(thebits : TBits_1); inline;
  14602. procedure setRXOVF4(thebits : TBits_1); inline;
  14603. procedure setRXOVF5(thebits : TBits_1); inline;
  14604. procedure setRXOVF6(thebits : TBits_1); inline;
  14605. procedure setRXOVF7(thebits : TBits_1); inline;
  14606. procedure setRXOVF8(thebits : TBits_1); inline;
  14607. procedure setRXOVF9(thebits : TBits_1); inline;
  14608. procedure setw(thebits : TBits_32); inline;
  14609. public
  14610. procedure clearRXOVF0; inline;
  14611. procedure clearRXOVF10; inline;
  14612. procedure clearRXOVF11; inline;
  14613. procedure clearRXOVF12; inline;
  14614. procedure clearRXOVF13; inline;
  14615. procedure clearRXOVF14; inline;
  14616. procedure clearRXOVF15; inline;
  14617. procedure clearRXOVF16; inline;
  14618. procedure clearRXOVF17; inline;
  14619. procedure clearRXOVF18; inline;
  14620. procedure clearRXOVF19; inline;
  14621. procedure clearRXOVF1; inline;
  14622. procedure clearRXOVF20; inline;
  14623. procedure clearRXOVF21; inline;
  14624. procedure clearRXOVF22; inline;
  14625. procedure clearRXOVF23; inline;
  14626. procedure clearRXOVF24; inline;
  14627. procedure clearRXOVF25; inline;
  14628. procedure clearRXOVF26; inline;
  14629. procedure clearRXOVF27; inline;
  14630. procedure clearRXOVF28; inline;
  14631. procedure clearRXOVF29; inline;
  14632. procedure clearRXOVF2; inline;
  14633. procedure clearRXOVF30; inline;
  14634. procedure clearRXOVF31; inline;
  14635. procedure clearRXOVF3; inline;
  14636. procedure clearRXOVF4; inline;
  14637. procedure clearRXOVF5; inline;
  14638. procedure clearRXOVF6; inline;
  14639. procedure clearRXOVF7; inline;
  14640. procedure clearRXOVF8; inline;
  14641. procedure clearRXOVF9; inline;
  14642. procedure setRXOVF0; inline;
  14643. procedure setRXOVF10; inline;
  14644. procedure setRXOVF11; inline;
  14645. procedure setRXOVF12; inline;
  14646. procedure setRXOVF13; inline;
  14647. procedure setRXOVF14; inline;
  14648. procedure setRXOVF15; inline;
  14649. procedure setRXOVF16; inline;
  14650. procedure setRXOVF17; inline;
  14651. procedure setRXOVF18; inline;
  14652. procedure setRXOVF19; inline;
  14653. procedure setRXOVF1; inline;
  14654. procedure setRXOVF20; inline;
  14655. procedure setRXOVF21; inline;
  14656. procedure setRXOVF22; inline;
  14657. procedure setRXOVF23; inline;
  14658. procedure setRXOVF24; inline;
  14659. procedure setRXOVF25; inline;
  14660. procedure setRXOVF26; inline;
  14661. procedure setRXOVF27; inline;
  14662. procedure setRXOVF28; inline;
  14663. procedure setRXOVF29; inline;
  14664. procedure setRXOVF2; inline;
  14665. procedure setRXOVF30; inline;
  14666. procedure setRXOVF31; inline;
  14667. procedure setRXOVF3; inline;
  14668. procedure setRXOVF4; inline;
  14669. procedure setRXOVF5; inline;
  14670. procedure setRXOVF6; inline;
  14671. procedure setRXOVF7; inline;
  14672. procedure setRXOVF8; inline;
  14673. procedure setRXOVF9; inline;
  14674. property RXOVF : TBits_32 read getRXOVF write setRXOVF;
  14675. property RXOVF0 : TBits_1 read getRXOVF0 write setRXOVF0;
  14676. property RXOVF1 : TBits_1 read getRXOVF1 write setRXOVF1;
  14677. property RXOVF10 : TBits_1 read getRXOVF10 write setRXOVF10;
  14678. property RXOVF11 : TBits_1 read getRXOVF11 write setRXOVF11;
  14679. property RXOVF12 : TBits_1 read getRXOVF12 write setRXOVF12;
  14680. property RXOVF13 : TBits_1 read getRXOVF13 write setRXOVF13;
  14681. property RXOVF14 : TBits_1 read getRXOVF14 write setRXOVF14;
  14682. property RXOVF15 : TBits_1 read getRXOVF15 write setRXOVF15;
  14683. property RXOVF16 : TBits_1 read getRXOVF16 write setRXOVF16;
  14684. property RXOVF17 : TBits_1 read getRXOVF17 write setRXOVF17;
  14685. property RXOVF18 : TBits_1 read getRXOVF18 write setRXOVF18;
  14686. property RXOVF19 : TBits_1 read getRXOVF19 write setRXOVF19;
  14687. property RXOVF2 : TBits_1 read getRXOVF2 write setRXOVF2;
  14688. property RXOVF20 : TBits_1 read getRXOVF20 write setRXOVF20;
  14689. property RXOVF21 : TBits_1 read getRXOVF21 write setRXOVF21;
  14690. property RXOVF22 : TBits_1 read getRXOVF22 write setRXOVF22;
  14691. property RXOVF23 : TBits_1 read getRXOVF23 write setRXOVF23;
  14692. property RXOVF24 : TBits_1 read getRXOVF24 write setRXOVF24;
  14693. property RXOVF25 : TBits_1 read getRXOVF25 write setRXOVF25;
  14694. property RXOVF26 : TBits_1 read getRXOVF26 write setRXOVF26;
  14695. property RXOVF27 : TBits_1 read getRXOVF27 write setRXOVF27;
  14696. property RXOVF28 : TBits_1 read getRXOVF28 write setRXOVF28;
  14697. property RXOVF29 : TBits_1 read getRXOVF29 write setRXOVF29;
  14698. property RXOVF3 : TBits_1 read getRXOVF3 write setRXOVF3;
  14699. property RXOVF30 : TBits_1 read getRXOVF30 write setRXOVF30;
  14700. property RXOVF31 : TBits_1 read getRXOVF31 write setRXOVF31;
  14701. property RXOVF4 : TBits_1 read getRXOVF4 write setRXOVF4;
  14702. property RXOVF5 : TBits_1 read getRXOVF5 write setRXOVF5;
  14703. property RXOVF6 : TBits_1 read getRXOVF6 write setRXOVF6;
  14704. property RXOVF7 : TBits_1 read getRXOVF7 write setRXOVF7;
  14705. property RXOVF8 : TBits_1 read getRXOVF8 write setRXOVF8;
  14706. property RXOVF9 : TBits_1 read getRXOVF9 write setRXOVF9;
  14707. property w : TBits_32 read getw write setw;
  14708. end;
  14709. TCAN1_C1TMR = record
  14710. private
  14711. function getCANTS : TBits_16; inline;
  14712. function getCANTSPRE : TBits_16; inline;
  14713. function getw : TBits_32; inline;
  14714. procedure setCANTS(thebits : TBits_16); inline;
  14715. procedure setCANTSPRE(thebits : TBits_16); inline;
  14716. procedure setw(thebits : TBits_32); inline;
  14717. public
  14718. property CANTS : TBits_16 read getCANTS write setCANTS;
  14719. property CANTSPRE : TBits_16 read getCANTSPRE write setCANTSPRE;
  14720. property w : TBits_32 read getw write setw;
  14721. end;
  14722. TCAN1_C1RXM0 = record
  14723. private
  14724. function getEID : TBits_18; inline;
  14725. function getMIDE : TBits_1; inline;
  14726. function getSID : TBits_11; inline;
  14727. function getw : TBits_32; inline;
  14728. procedure setEID(thebits : TBits_18); inline;
  14729. procedure setMIDE(thebits : TBits_1); inline;
  14730. procedure setSID(thebits : TBits_11); inline;
  14731. procedure setw(thebits : TBits_32); inline;
  14732. public
  14733. procedure clearMIDE; inline;
  14734. procedure setMIDE; inline;
  14735. property EID : TBits_18 read getEID write setEID;
  14736. property MIDE : TBits_1 read getMIDE write setMIDE;
  14737. property SID : TBits_11 read getSID write setSID;
  14738. property w : TBits_32 read getw write setw;
  14739. end;
  14740. TCAN1_C1RXM1 = record
  14741. private
  14742. function getEID : TBits_18; inline;
  14743. function getMIDE : TBits_1; inline;
  14744. function getSID : TBits_11; inline;
  14745. function getw : TBits_32; inline;
  14746. procedure setEID(thebits : TBits_18); inline;
  14747. procedure setMIDE(thebits : TBits_1); inline;
  14748. procedure setSID(thebits : TBits_11); inline;
  14749. procedure setw(thebits : TBits_32); inline;
  14750. public
  14751. procedure clearMIDE; inline;
  14752. procedure setMIDE; inline;
  14753. property EID : TBits_18 read getEID write setEID;
  14754. property MIDE : TBits_1 read getMIDE write setMIDE;
  14755. property SID : TBits_11 read getSID write setSID;
  14756. property w : TBits_32 read getw write setw;
  14757. end;
  14758. TCAN1_C1RXM2 = record
  14759. private
  14760. function getEID : TBits_18; inline;
  14761. function getMIDE : TBits_1; inline;
  14762. function getSID : TBits_11; inline;
  14763. function getw : TBits_32; inline;
  14764. procedure setEID(thebits : TBits_18); inline;
  14765. procedure setMIDE(thebits : TBits_1); inline;
  14766. procedure setSID(thebits : TBits_11); inline;
  14767. procedure setw(thebits : TBits_32); inline;
  14768. public
  14769. procedure clearMIDE; inline;
  14770. procedure setMIDE; inline;
  14771. property EID : TBits_18 read getEID write setEID;
  14772. property MIDE : TBits_1 read getMIDE write setMIDE;
  14773. property SID : TBits_11 read getSID write setSID;
  14774. property w : TBits_32 read getw write setw;
  14775. end;
  14776. TCAN1_C1RXM3 = record
  14777. private
  14778. function getEID : TBits_18; inline;
  14779. function getMIDE : TBits_1; inline;
  14780. function getSID : TBits_11; inline;
  14781. function getw : TBits_32; inline;
  14782. procedure setEID(thebits : TBits_18); inline;
  14783. procedure setMIDE(thebits : TBits_1); inline;
  14784. procedure setSID(thebits : TBits_11); inline;
  14785. procedure setw(thebits : TBits_32); inline;
  14786. public
  14787. procedure clearMIDE; inline;
  14788. procedure setMIDE; inline;
  14789. property EID : TBits_18 read getEID write setEID;
  14790. property MIDE : TBits_1 read getMIDE write setMIDE;
  14791. property SID : TBits_11 read getSID write setSID;
  14792. property w : TBits_32 read getw write setw;
  14793. end;
  14794. TCAN1_C1FLTCON0 = record
  14795. private
  14796. function getFLTEN0 : TBits_1; inline;
  14797. function getFLTEN1 : TBits_1; inline;
  14798. function getFLTEN2 : TBits_1; inline;
  14799. function getFLTEN3 : TBits_1; inline;
  14800. function getFSEL0 : TBits_5; inline;
  14801. function getFSEL1 : TBits_5; inline;
  14802. function getFSEL2 : TBits_5; inline;
  14803. function getFSEL3 : TBits_5; inline;
  14804. function getMSEL0 : TBits_2; inline;
  14805. function getMSEL1 : TBits_2; inline;
  14806. function getMSEL2 : TBits_2; inline;
  14807. function getMSEL3 : TBits_2; inline;
  14808. function getw : TBits_32; inline;
  14809. procedure setFLTEN0(thebits : TBits_1); inline;
  14810. procedure setFLTEN1(thebits : TBits_1); inline;
  14811. procedure setFLTEN2(thebits : TBits_1); inline;
  14812. procedure setFLTEN3(thebits : TBits_1); inline;
  14813. procedure setFSEL0(thebits : TBits_5); inline;
  14814. procedure setFSEL1(thebits : TBits_5); inline;
  14815. procedure setFSEL2(thebits : TBits_5); inline;
  14816. procedure setFSEL3(thebits : TBits_5); inline;
  14817. procedure setMSEL0(thebits : TBits_2); inline;
  14818. procedure setMSEL1(thebits : TBits_2); inline;
  14819. procedure setMSEL2(thebits : TBits_2); inline;
  14820. procedure setMSEL3(thebits : TBits_2); inline;
  14821. procedure setw(thebits : TBits_32); inline;
  14822. public
  14823. procedure clearFLTEN0; inline;
  14824. procedure clearFLTEN1; inline;
  14825. procedure clearFLTEN2; inline;
  14826. procedure clearFLTEN3; inline;
  14827. procedure setFLTEN0; inline;
  14828. procedure setFLTEN1; inline;
  14829. procedure setFLTEN2; inline;
  14830. procedure setFLTEN3; inline;
  14831. property FLTEN0 : TBits_1 read getFLTEN0 write setFLTEN0;
  14832. property FLTEN1 : TBits_1 read getFLTEN1 write setFLTEN1;
  14833. property FLTEN2 : TBits_1 read getFLTEN2 write setFLTEN2;
  14834. property FLTEN3 : TBits_1 read getFLTEN3 write setFLTEN3;
  14835. property FSEL0 : TBits_5 read getFSEL0 write setFSEL0;
  14836. property FSEL1 : TBits_5 read getFSEL1 write setFSEL1;
  14837. property FSEL2 : TBits_5 read getFSEL2 write setFSEL2;
  14838. property FSEL3 : TBits_5 read getFSEL3 write setFSEL3;
  14839. property MSEL0 : TBits_2 read getMSEL0 write setMSEL0;
  14840. property MSEL1 : TBits_2 read getMSEL1 write setMSEL1;
  14841. property MSEL2 : TBits_2 read getMSEL2 write setMSEL2;
  14842. property MSEL3 : TBits_2 read getMSEL3 write setMSEL3;
  14843. property w : TBits_32 read getw write setw;
  14844. end;
  14845. TCAN1_C1FLTCON1 = record
  14846. private
  14847. function getFLTEN4 : TBits_1; inline;
  14848. function getFLTEN5 : TBits_1; inline;
  14849. function getFLTEN6 : TBits_1; inline;
  14850. function getFLTEN7 : TBits_1; inline;
  14851. function getFSEL4 : TBits_5; inline;
  14852. function getFSEL5 : TBits_5; inline;
  14853. function getFSEL6 : TBits_5; inline;
  14854. function getFSEL7 : TBits_5; inline;
  14855. function getMSEL4 : TBits_2; inline;
  14856. function getMSEL5 : TBits_2; inline;
  14857. function getMSEL6 : TBits_2; inline;
  14858. function getMSEL7 : TBits_2; inline;
  14859. function getw : TBits_32; inline;
  14860. procedure setFLTEN4(thebits : TBits_1); inline;
  14861. procedure setFLTEN5(thebits : TBits_1); inline;
  14862. procedure setFLTEN6(thebits : TBits_1); inline;
  14863. procedure setFLTEN7(thebits : TBits_1); inline;
  14864. procedure setFSEL4(thebits : TBits_5); inline;
  14865. procedure setFSEL5(thebits : TBits_5); inline;
  14866. procedure setFSEL6(thebits : TBits_5); inline;
  14867. procedure setFSEL7(thebits : TBits_5); inline;
  14868. procedure setMSEL4(thebits : TBits_2); inline;
  14869. procedure setMSEL5(thebits : TBits_2); inline;
  14870. procedure setMSEL6(thebits : TBits_2); inline;
  14871. procedure setMSEL7(thebits : TBits_2); inline;
  14872. procedure setw(thebits : TBits_32); inline;
  14873. public
  14874. procedure clearFLTEN4; inline;
  14875. procedure clearFLTEN5; inline;
  14876. procedure clearFLTEN6; inline;
  14877. procedure clearFLTEN7; inline;
  14878. procedure setFLTEN4; inline;
  14879. procedure setFLTEN5; inline;
  14880. procedure setFLTEN6; inline;
  14881. procedure setFLTEN7; inline;
  14882. property FLTEN4 : TBits_1 read getFLTEN4 write setFLTEN4;
  14883. property FLTEN5 : TBits_1 read getFLTEN5 write setFLTEN5;
  14884. property FLTEN6 : TBits_1 read getFLTEN6 write setFLTEN6;
  14885. property FLTEN7 : TBits_1 read getFLTEN7 write setFLTEN7;
  14886. property FSEL4 : TBits_5 read getFSEL4 write setFSEL4;
  14887. property FSEL5 : TBits_5 read getFSEL5 write setFSEL5;
  14888. property FSEL6 : TBits_5 read getFSEL6 write setFSEL6;
  14889. property FSEL7 : TBits_5 read getFSEL7 write setFSEL7;
  14890. property MSEL4 : TBits_2 read getMSEL4 write setMSEL4;
  14891. property MSEL5 : TBits_2 read getMSEL5 write setMSEL5;
  14892. property MSEL6 : TBits_2 read getMSEL6 write setMSEL6;
  14893. property MSEL7 : TBits_2 read getMSEL7 write setMSEL7;
  14894. property w : TBits_32 read getw write setw;
  14895. end;
  14896. TCAN1_C1FLTCON2 = record
  14897. private
  14898. function getFLTEN10 : TBits_1; inline;
  14899. function getFLTEN11 : TBits_1; inline;
  14900. function getFLTEN8 : TBits_1; inline;
  14901. function getFLTEN9 : TBits_1; inline;
  14902. function getFSEL10 : TBits_5; inline;
  14903. function getFSEL11 : TBits_5; inline;
  14904. function getFSEL8 : TBits_5; inline;
  14905. function getFSEL9 : TBits_5; inline;
  14906. function getMSEL10 : TBits_2; inline;
  14907. function getMSEL11 : TBits_2; inline;
  14908. function getMSEL8 : TBits_2; inline;
  14909. function getMSEL9 : TBits_2; inline;
  14910. function getw : TBits_32; inline;
  14911. procedure setFLTEN10(thebits : TBits_1); inline;
  14912. procedure setFLTEN11(thebits : TBits_1); inline;
  14913. procedure setFLTEN8(thebits : TBits_1); inline;
  14914. procedure setFLTEN9(thebits : TBits_1); inline;
  14915. procedure setFSEL10(thebits : TBits_5); inline;
  14916. procedure setFSEL11(thebits : TBits_5); inline;
  14917. procedure setFSEL8(thebits : TBits_5); inline;
  14918. procedure setFSEL9(thebits : TBits_5); inline;
  14919. procedure setMSEL10(thebits : TBits_2); inline;
  14920. procedure setMSEL11(thebits : TBits_2); inline;
  14921. procedure setMSEL8(thebits : TBits_2); inline;
  14922. procedure setMSEL9(thebits : TBits_2); inline;
  14923. procedure setw(thebits : TBits_32); inline;
  14924. public
  14925. procedure clearFLTEN10; inline;
  14926. procedure clearFLTEN11; inline;
  14927. procedure clearFLTEN8; inline;
  14928. procedure clearFLTEN9; inline;
  14929. procedure setFLTEN10; inline;
  14930. procedure setFLTEN11; inline;
  14931. procedure setFLTEN8; inline;
  14932. procedure setFLTEN9; inline;
  14933. property FLTEN10 : TBits_1 read getFLTEN10 write setFLTEN10;
  14934. property FLTEN11 : TBits_1 read getFLTEN11 write setFLTEN11;
  14935. property FLTEN8 : TBits_1 read getFLTEN8 write setFLTEN8;
  14936. property FLTEN9 : TBits_1 read getFLTEN9 write setFLTEN9;
  14937. property FSEL10 : TBits_5 read getFSEL10 write setFSEL10;
  14938. property FSEL11 : TBits_5 read getFSEL11 write setFSEL11;
  14939. property FSEL8 : TBits_5 read getFSEL8 write setFSEL8;
  14940. property FSEL9 : TBits_5 read getFSEL9 write setFSEL9;
  14941. property MSEL10 : TBits_2 read getMSEL10 write setMSEL10;
  14942. property MSEL11 : TBits_2 read getMSEL11 write setMSEL11;
  14943. property MSEL8 : TBits_2 read getMSEL8 write setMSEL8;
  14944. property MSEL9 : TBits_2 read getMSEL9 write setMSEL9;
  14945. property w : TBits_32 read getw write setw;
  14946. end;
  14947. TCAN1_C1FLTCON3 = record
  14948. private
  14949. function getFLTEN12 : TBits_1; inline;
  14950. function getFLTEN13 : TBits_1; inline;
  14951. function getFLTEN14 : TBits_1; inline;
  14952. function getFLTEN15 : TBits_1; inline;
  14953. function getFSEL12 : TBits_5; inline;
  14954. function getFSEL13 : TBits_5; inline;
  14955. function getFSEL14 : TBits_5; inline;
  14956. function getFSEL15 : TBits_5; inline;
  14957. function getMSEL12 : TBits_2; inline;
  14958. function getMSEL13 : TBits_2; inline;
  14959. function getMSEL14 : TBits_2; inline;
  14960. function getMSEL15 : TBits_2; inline;
  14961. function getw : TBits_32; inline;
  14962. procedure setFLTEN12(thebits : TBits_1); inline;
  14963. procedure setFLTEN13(thebits : TBits_1); inline;
  14964. procedure setFLTEN14(thebits : TBits_1); inline;
  14965. procedure setFLTEN15(thebits : TBits_1); inline;
  14966. procedure setFSEL12(thebits : TBits_5); inline;
  14967. procedure setFSEL13(thebits : TBits_5); inline;
  14968. procedure setFSEL14(thebits : TBits_5); inline;
  14969. procedure setFSEL15(thebits : TBits_5); inline;
  14970. procedure setMSEL12(thebits : TBits_2); inline;
  14971. procedure setMSEL13(thebits : TBits_2); inline;
  14972. procedure setMSEL14(thebits : TBits_2); inline;
  14973. procedure setMSEL15(thebits : TBits_2); inline;
  14974. procedure setw(thebits : TBits_32); inline;
  14975. public
  14976. procedure clearFLTEN12; inline;
  14977. procedure clearFLTEN13; inline;
  14978. procedure clearFLTEN14; inline;
  14979. procedure clearFLTEN15; inline;
  14980. procedure setFLTEN12; inline;
  14981. procedure setFLTEN13; inline;
  14982. procedure setFLTEN14; inline;
  14983. procedure setFLTEN15; inline;
  14984. property FLTEN12 : TBits_1 read getFLTEN12 write setFLTEN12;
  14985. property FLTEN13 : TBits_1 read getFLTEN13 write setFLTEN13;
  14986. property FLTEN14 : TBits_1 read getFLTEN14 write setFLTEN14;
  14987. property FLTEN15 : TBits_1 read getFLTEN15 write setFLTEN15;
  14988. property FSEL12 : TBits_5 read getFSEL12 write setFSEL12;
  14989. property FSEL13 : TBits_5 read getFSEL13 write setFSEL13;
  14990. property FSEL14 : TBits_5 read getFSEL14 write setFSEL14;
  14991. property FSEL15 : TBits_5 read getFSEL15 write setFSEL15;
  14992. property MSEL12 : TBits_2 read getMSEL12 write setMSEL12;
  14993. property MSEL13 : TBits_2 read getMSEL13 write setMSEL13;
  14994. property MSEL14 : TBits_2 read getMSEL14 write setMSEL14;
  14995. property MSEL15 : TBits_2 read getMSEL15 write setMSEL15;
  14996. property w : TBits_32 read getw write setw;
  14997. end;
  14998. TCAN1_C1FLTCON4 = record
  14999. private
  15000. function getFLTEN16 : TBits_1; inline;
  15001. function getFLTEN17 : TBits_1; inline;
  15002. function getFLTEN18 : TBits_1; inline;
  15003. function getFLTEN19 : TBits_1; inline;
  15004. function getFSEL16 : TBits_5; inline;
  15005. function getFSEL17 : TBits_5; inline;
  15006. function getFSEL18 : TBits_5; inline;
  15007. function getFSEL19 : TBits_5; inline;
  15008. function getMSEL16 : TBits_2; inline;
  15009. function getMSEL17 : TBits_2; inline;
  15010. function getMSEL18 : TBits_2; inline;
  15011. function getMSEL19 : TBits_2; inline;
  15012. function getw : TBits_32; inline;
  15013. procedure setFLTEN16(thebits : TBits_1); inline;
  15014. procedure setFLTEN17(thebits : TBits_1); inline;
  15015. procedure setFLTEN18(thebits : TBits_1); inline;
  15016. procedure setFLTEN19(thebits : TBits_1); inline;
  15017. procedure setFSEL16(thebits : TBits_5); inline;
  15018. procedure setFSEL17(thebits : TBits_5); inline;
  15019. procedure setFSEL18(thebits : TBits_5); inline;
  15020. procedure setFSEL19(thebits : TBits_5); inline;
  15021. procedure setMSEL16(thebits : TBits_2); inline;
  15022. procedure setMSEL17(thebits : TBits_2); inline;
  15023. procedure setMSEL18(thebits : TBits_2); inline;
  15024. procedure setMSEL19(thebits : TBits_2); inline;
  15025. procedure setw(thebits : TBits_32); inline;
  15026. public
  15027. procedure clearFLTEN16; inline;
  15028. procedure clearFLTEN17; inline;
  15029. procedure clearFLTEN18; inline;
  15030. procedure clearFLTEN19; inline;
  15031. procedure setFLTEN16; inline;
  15032. procedure setFLTEN17; inline;
  15033. procedure setFLTEN18; inline;
  15034. procedure setFLTEN19; inline;
  15035. property FLTEN16 : TBits_1 read getFLTEN16 write setFLTEN16;
  15036. property FLTEN17 : TBits_1 read getFLTEN17 write setFLTEN17;
  15037. property FLTEN18 : TBits_1 read getFLTEN18 write setFLTEN18;
  15038. property FLTEN19 : TBits_1 read getFLTEN19 write setFLTEN19;
  15039. property FSEL16 : TBits_5 read getFSEL16 write setFSEL16;
  15040. property FSEL17 : TBits_5 read getFSEL17 write setFSEL17;
  15041. property FSEL18 : TBits_5 read getFSEL18 write setFSEL18;
  15042. property FSEL19 : TBits_5 read getFSEL19 write setFSEL19;
  15043. property MSEL16 : TBits_2 read getMSEL16 write setMSEL16;
  15044. property MSEL17 : TBits_2 read getMSEL17 write setMSEL17;
  15045. property MSEL18 : TBits_2 read getMSEL18 write setMSEL18;
  15046. property MSEL19 : TBits_2 read getMSEL19 write setMSEL19;
  15047. property w : TBits_32 read getw write setw;
  15048. end;
  15049. TCAN1_C1FLTCON5 = record
  15050. private
  15051. function getFLTEN20 : TBits_1; inline;
  15052. function getFLTEN21 : TBits_1; inline;
  15053. function getFLTEN22 : TBits_1; inline;
  15054. function getFLTEN23 : TBits_1; inline;
  15055. function getFSEL20 : TBits_5; inline;
  15056. function getFSEL21 : TBits_5; inline;
  15057. function getFSEL22 : TBits_5; inline;
  15058. function getFSEL23 : TBits_5; inline;
  15059. function getMSEL20 : TBits_2; inline;
  15060. function getMSEL21 : TBits_2; inline;
  15061. function getMSEL22 : TBits_2; inline;
  15062. function getMSEL23 : TBits_2; inline;
  15063. function getw : TBits_32; inline;
  15064. procedure setFLTEN20(thebits : TBits_1); inline;
  15065. procedure setFLTEN21(thebits : TBits_1); inline;
  15066. procedure setFLTEN22(thebits : TBits_1); inline;
  15067. procedure setFLTEN23(thebits : TBits_1); inline;
  15068. procedure setFSEL20(thebits : TBits_5); inline;
  15069. procedure setFSEL21(thebits : TBits_5); inline;
  15070. procedure setFSEL22(thebits : TBits_5); inline;
  15071. procedure setFSEL23(thebits : TBits_5); inline;
  15072. procedure setMSEL20(thebits : TBits_2); inline;
  15073. procedure setMSEL21(thebits : TBits_2); inline;
  15074. procedure setMSEL22(thebits : TBits_2); inline;
  15075. procedure setMSEL23(thebits : TBits_2); inline;
  15076. procedure setw(thebits : TBits_32); inline;
  15077. public
  15078. procedure clearFLTEN20; inline;
  15079. procedure clearFLTEN21; inline;
  15080. procedure clearFLTEN22; inline;
  15081. procedure clearFLTEN23; inline;
  15082. procedure setFLTEN20; inline;
  15083. procedure setFLTEN21; inline;
  15084. procedure setFLTEN22; inline;
  15085. procedure setFLTEN23; inline;
  15086. property FLTEN20 : TBits_1 read getFLTEN20 write setFLTEN20;
  15087. property FLTEN21 : TBits_1 read getFLTEN21 write setFLTEN21;
  15088. property FLTEN22 : TBits_1 read getFLTEN22 write setFLTEN22;
  15089. property FLTEN23 : TBits_1 read getFLTEN23 write setFLTEN23;
  15090. property FSEL20 : TBits_5 read getFSEL20 write setFSEL20;
  15091. property FSEL21 : TBits_5 read getFSEL21 write setFSEL21;
  15092. property FSEL22 : TBits_5 read getFSEL22 write setFSEL22;
  15093. property FSEL23 : TBits_5 read getFSEL23 write setFSEL23;
  15094. property MSEL20 : TBits_2 read getMSEL20 write setMSEL20;
  15095. property MSEL21 : TBits_2 read getMSEL21 write setMSEL21;
  15096. property MSEL22 : TBits_2 read getMSEL22 write setMSEL22;
  15097. property MSEL23 : TBits_2 read getMSEL23 write setMSEL23;
  15098. property w : TBits_32 read getw write setw;
  15099. end;
  15100. TCAN1_C1FLTCON6 = record
  15101. private
  15102. function getFLTEN24 : TBits_1; inline;
  15103. function getFLTEN25 : TBits_1; inline;
  15104. function getFLTEN26 : TBits_1; inline;
  15105. function getFLTEN27 : TBits_1; inline;
  15106. function getFSEL24 : TBits_5; inline;
  15107. function getFSEL25 : TBits_5; inline;
  15108. function getFSEL26 : TBits_5; inline;
  15109. function getFSEL27 : TBits_5; inline;
  15110. function getMSEL24 : TBits_2; inline;
  15111. function getMSEL25 : TBits_2; inline;
  15112. function getMSEL26 : TBits_2; inline;
  15113. function getMSEL27 : TBits_2; inline;
  15114. function getw : TBits_32; inline;
  15115. procedure setFLTEN24(thebits : TBits_1); inline;
  15116. procedure setFLTEN25(thebits : TBits_1); inline;
  15117. procedure setFLTEN26(thebits : TBits_1); inline;
  15118. procedure setFLTEN27(thebits : TBits_1); inline;
  15119. procedure setFSEL24(thebits : TBits_5); inline;
  15120. procedure setFSEL25(thebits : TBits_5); inline;
  15121. procedure setFSEL26(thebits : TBits_5); inline;
  15122. procedure setFSEL27(thebits : TBits_5); inline;
  15123. procedure setMSEL24(thebits : TBits_2); inline;
  15124. procedure setMSEL25(thebits : TBits_2); inline;
  15125. procedure setMSEL26(thebits : TBits_2); inline;
  15126. procedure setMSEL27(thebits : TBits_2); inline;
  15127. procedure setw(thebits : TBits_32); inline;
  15128. public
  15129. procedure clearFLTEN24; inline;
  15130. procedure clearFLTEN25; inline;
  15131. procedure clearFLTEN26; inline;
  15132. procedure clearFLTEN27; inline;
  15133. procedure setFLTEN24; inline;
  15134. procedure setFLTEN25; inline;
  15135. procedure setFLTEN26; inline;
  15136. procedure setFLTEN27; inline;
  15137. property FLTEN24 : TBits_1 read getFLTEN24 write setFLTEN24;
  15138. property FLTEN25 : TBits_1 read getFLTEN25 write setFLTEN25;
  15139. property FLTEN26 : TBits_1 read getFLTEN26 write setFLTEN26;
  15140. property FLTEN27 : TBits_1 read getFLTEN27 write setFLTEN27;
  15141. property FSEL24 : TBits_5 read getFSEL24 write setFSEL24;
  15142. property FSEL25 : TBits_5 read getFSEL25 write setFSEL25;
  15143. property FSEL26 : TBits_5 read getFSEL26 write setFSEL26;
  15144. property FSEL27 : TBits_5 read getFSEL27 write setFSEL27;
  15145. property MSEL24 : TBits_2 read getMSEL24 write setMSEL24;
  15146. property MSEL25 : TBits_2 read getMSEL25 write setMSEL25;
  15147. property MSEL26 : TBits_2 read getMSEL26 write setMSEL26;
  15148. property MSEL27 : TBits_2 read getMSEL27 write setMSEL27;
  15149. property w : TBits_32 read getw write setw;
  15150. end;
  15151. TCAN1_C1FLTCON7 = record
  15152. private
  15153. function getFLTEN28 : TBits_1; inline;
  15154. function getFLTEN29 : TBits_1; inline;
  15155. function getFLTEN30 : TBits_1; inline;
  15156. function getFLTEN31 : TBits_1; inline;
  15157. function getFSEL28 : TBits_5; inline;
  15158. function getFSEL29 : TBits_5; inline;
  15159. function getFSEL30 : TBits_5; inline;
  15160. function getFSEL31 : TBits_5; inline;
  15161. function getMSEL28 : TBits_2; inline;
  15162. function getMSEL29 : TBits_2; inline;
  15163. function getMSEL30 : TBits_2; inline;
  15164. function getMSEL31 : TBits_2; inline;
  15165. function getw : TBits_32; inline;
  15166. procedure setFLTEN28(thebits : TBits_1); inline;
  15167. procedure setFLTEN29(thebits : TBits_1); inline;
  15168. procedure setFLTEN30(thebits : TBits_1); inline;
  15169. procedure setFLTEN31(thebits : TBits_1); inline;
  15170. procedure setFSEL28(thebits : TBits_5); inline;
  15171. procedure setFSEL29(thebits : TBits_5); inline;
  15172. procedure setFSEL30(thebits : TBits_5); inline;
  15173. procedure setFSEL31(thebits : TBits_5); inline;
  15174. procedure setMSEL28(thebits : TBits_2); inline;
  15175. procedure setMSEL29(thebits : TBits_2); inline;
  15176. procedure setMSEL30(thebits : TBits_2); inline;
  15177. procedure setMSEL31(thebits : TBits_2); inline;
  15178. procedure setw(thebits : TBits_32); inline;
  15179. public
  15180. procedure clearFLTEN28; inline;
  15181. procedure clearFLTEN29; inline;
  15182. procedure clearFLTEN30; inline;
  15183. procedure clearFLTEN31; inline;
  15184. procedure setFLTEN28; inline;
  15185. procedure setFLTEN29; inline;
  15186. procedure setFLTEN30; inline;
  15187. procedure setFLTEN31; inline;
  15188. property FLTEN28 : TBits_1 read getFLTEN28 write setFLTEN28;
  15189. property FLTEN29 : TBits_1 read getFLTEN29 write setFLTEN29;
  15190. property FLTEN30 : TBits_1 read getFLTEN30 write setFLTEN30;
  15191. property FLTEN31 : TBits_1 read getFLTEN31 write setFLTEN31;
  15192. property FSEL28 : TBits_5 read getFSEL28 write setFSEL28;
  15193. property FSEL29 : TBits_5 read getFSEL29 write setFSEL29;
  15194. property FSEL30 : TBits_5 read getFSEL30 write setFSEL30;
  15195. property FSEL31 : TBits_5 read getFSEL31 write setFSEL31;
  15196. property MSEL28 : TBits_2 read getMSEL28 write setMSEL28;
  15197. property MSEL29 : TBits_2 read getMSEL29 write setMSEL29;
  15198. property MSEL30 : TBits_2 read getMSEL30 write setMSEL30;
  15199. property MSEL31 : TBits_2 read getMSEL31 write setMSEL31;
  15200. property w : TBits_32 read getw write setw;
  15201. end;
  15202. TCAN1_C1RXF0 = record
  15203. private
  15204. function getEID : TBits_18; inline;
  15205. function getEXID : TBits_1; inline;
  15206. function getSID : TBits_11; inline;
  15207. function getw : TBits_32; inline;
  15208. procedure setEID(thebits : TBits_18); inline;
  15209. procedure setEXID(thebits : TBits_1); inline;
  15210. procedure setSID(thebits : TBits_11); inline;
  15211. procedure setw(thebits : TBits_32); inline;
  15212. public
  15213. procedure clearEXID; inline;
  15214. procedure setEXID; inline;
  15215. property EID : TBits_18 read getEID write setEID;
  15216. property EXID : TBits_1 read getEXID write setEXID;
  15217. property SID : TBits_11 read getSID write setSID;
  15218. property w : TBits_32 read getw write setw;
  15219. end;
  15220. TCAN1_C1RXF1 = record
  15221. private
  15222. function getEID : TBits_18; inline;
  15223. function getEXID : TBits_1; inline;
  15224. function getSID : TBits_11; inline;
  15225. function getw : TBits_32; inline;
  15226. procedure setEID(thebits : TBits_18); inline;
  15227. procedure setEXID(thebits : TBits_1); inline;
  15228. procedure setSID(thebits : TBits_11); inline;
  15229. procedure setw(thebits : TBits_32); inline;
  15230. public
  15231. procedure clearEXID; inline;
  15232. procedure setEXID; inline;
  15233. property EID : TBits_18 read getEID write setEID;
  15234. property EXID : TBits_1 read getEXID write setEXID;
  15235. property SID : TBits_11 read getSID write setSID;
  15236. property w : TBits_32 read getw write setw;
  15237. end;
  15238. TCAN1_C1RXF2 = record
  15239. private
  15240. function getEID : TBits_18; inline;
  15241. function getEXID : TBits_1; inline;
  15242. function getSID : TBits_11; inline;
  15243. function getw : TBits_32; inline;
  15244. procedure setEID(thebits : TBits_18); inline;
  15245. procedure setEXID(thebits : TBits_1); inline;
  15246. procedure setSID(thebits : TBits_11); inline;
  15247. procedure setw(thebits : TBits_32); inline;
  15248. public
  15249. procedure clearEXID; inline;
  15250. procedure setEXID; inline;
  15251. property EID : TBits_18 read getEID write setEID;
  15252. property EXID : TBits_1 read getEXID write setEXID;
  15253. property SID : TBits_11 read getSID write setSID;
  15254. property w : TBits_32 read getw write setw;
  15255. end;
  15256. TCAN1_C1RXF3 = record
  15257. private
  15258. function getEID : TBits_18; inline;
  15259. function getEXID : TBits_1; inline;
  15260. function getSID : TBits_11; inline;
  15261. function getw : TBits_32; inline;
  15262. procedure setEID(thebits : TBits_18); inline;
  15263. procedure setEXID(thebits : TBits_1); inline;
  15264. procedure setSID(thebits : TBits_11); inline;
  15265. procedure setw(thebits : TBits_32); inline;
  15266. public
  15267. procedure clearEXID; inline;
  15268. procedure setEXID; inline;
  15269. property EID : TBits_18 read getEID write setEID;
  15270. property EXID : TBits_1 read getEXID write setEXID;
  15271. property SID : TBits_11 read getSID write setSID;
  15272. property w : TBits_32 read getw write setw;
  15273. end;
  15274. TCAN1_C1RXF4 = record
  15275. private
  15276. function getEID : TBits_18; inline;
  15277. function getEXID : TBits_1; inline;
  15278. function getSID : TBits_11; inline;
  15279. function getw : TBits_32; inline;
  15280. procedure setEID(thebits : TBits_18); inline;
  15281. procedure setEXID(thebits : TBits_1); inline;
  15282. procedure setSID(thebits : TBits_11); inline;
  15283. procedure setw(thebits : TBits_32); inline;
  15284. public
  15285. procedure clearEXID; inline;
  15286. procedure setEXID; inline;
  15287. property EID : TBits_18 read getEID write setEID;
  15288. property EXID : TBits_1 read getEXID write setEXID;
  15289. property SID : TBits_11 read getSID write setSID;
  15290. property w : TBits_32 read getw write setw;
  15291. end;
  15292. TCAN1_C1RXF5 = record
  15293. private
  15294. function getEID : TBits_18; inline;
  15295. function getEXID : TBits_1; inline;
  15296. function getSID : TBits_11; inline;
  15297. function getw : TBits_32; inline;
  15298. procedure setEID(thebits : TBits_18); inline;
  15299. procedure setEXID(thebits : TBits_1); inline;
  15300. procedure setSID(thebits : TBits_11); inline;
  15301. procedure setw(thebits : TBits_32); inline;
  15302. public
  15303. procedure clearEXID; inline;
  15304. procedure setEXID; inline;
  15305. property EID : TBits_18 read getEID write setEID;
  15306. property EXID : TBits_1 read getEXID write setEXID;
  15307. property SID : TBits_11 read getSID write setSID;
  15308. property w : TBits_32 read getw write setw;
  15309. end;
  15310. TCAN1_C1RXF6 = record
  15311. private
  15312. function getEID : TBits_18; inline;
  15313. function getEXID : TBits_1; inline;
  15314. function getSID : TBits_11; inline;
  15315. function getw : TBits_32; inline;
  15316. procedure setEID(thebits : TBits_18); inline;
  15317. procedure setEXID(thebits : TBits_1); inline;
  15318. procedure setSID(thebits : TBits_11); inline;
  15319. procedure setw(thebits : TBits_32); inline;
  15320. public
  15321. procedure clearEXID; inline;
  15322. procedure setEXID; inline;
  15323. property EID : TBits_18 read getEID write setEID;
  15324. property EXID : TBits_1 read getEXID write setEXID;
  15325. property SID : TBits_11 read getSID write setSID;
  15326. property w : TBits_32 read getw write setw;
  15327. end;
  15328. TCAN1_C1RXF7 = record
  15329. private
  15330. function getEID : TBits_18; inline;
  15331. function getEXID : TBits_1; inline;
  15332. function getSID : TBits_11; inline;
  15333. function getw : TBits_32; inline;
  15334. procedure setEID(thebits : TBits_18); inline;
  15335. procedure setEXID(thebits : TBits_1); inline;
  15336. procedure setSID(thebits : TBits_11); inline;
  15337. procedure setw(thebits : TBits_32); inline;
  15338. public
  15339. procedure clearEXID; inline;
  15340. procedure setEXID; inline;
  15341. property EID : TBits_18 read getEID write setEID;
  15342. property EXID : TBits_1 read getEXID write setEXID;
  15343. property SID : TBits_11 read getSID write setSID;
  15344. property w : TBits_32 read getw write setw;
  15345. end;
  15346. TCAN1_C1RXF8 = record
  15347. private
  15348. function getEID : TBits_18; inline;
  15349. function getEXID : TBits_1; inline;
  15350. function getSID : TBits_11; inline;
  15351. function getw : TBits_32; inline;
  15352. procedure setEID(thebits : TBits_18); inline;
  15353. procedure setEXID(thebits : TBits_1); inline;
  15354. procedure setSID(thebits : TBits_11); inline;
  15355. procedure setw(thebits : TBits_32); inline;
  15356. public
  15357. procedure clearEXID; inline;
  15358. procedure setEXID; inline;
  15359. property EID : TBits_18 read getEID write setEID;
  15360. property EXID : TBits_1 read getEXID write setEXID;
  15361. property SID : TBits_11 read getSID write setSID;
  15362. property w : TBits_32 read getw write setw;
  15363. end;
  15364. TCAN1_C1RXF9 = record
  15365. private
  15366. function getEID : TBits_18; inline;
  15367. function getEXID : TBits_1; inline;
  15368. function getSID : TBits_11; inline;
  15369. function getw : TBits_32; inline;
  15370. procedure setEID(thebits : TBits_18); inline;
  15371. procedure setEXID(thebits : TBits_1); inline;
  15372. procedure setSID(thebits : TBits_11); inline;
  15373. procedure setw(thebits : TBits_32); inline;
  15374. public
  15375. procedure clearEXID; inline;
  15376. procedure setEXID; inline;
  15377. property EID : TBits_18 read getEID write setEID;
  15378. property EXID : TBits_1 read getEXID write setEXID;
  15379. property SID : TBits_11 read getSID write setSID;
  15380. property w : TBits_32 read getw write setw;
  15381. end;
  15382. TCAN1_C1RXF10 = record
  15383. private
  15384. function getEID : TBits_18; inline;
  15385. function getEXID : TBits_1; inline;
  15386. function getSID : TBits_11; inline;
  15387. function getw : TBits_32; inline;
  15388. procedure setEID(thebits : TBits_18); inline;
  15389. procedure setEXID(thebits : TBits_1); inline;
  15390. procedure setSID(thebits : TBits_11); inline;
  15391. procedure setw(thebits : TBits_32); inline;
  15392. public
  15393. procedure clearEXID; inline;
  15394. procedure setEXID; inline;
  15395. property EID : TBits_18 read getEID write setEID;
  15396. property EXID : TBits_1 read getEXID write setEXID;
  15397. property SID : TBits_11 read getSID write setSID;
  15398. property w : TBits_32 read getw write setw;
  15399. end;
  15400. TCAN1_C1RXF11 = record
  15401. private
  15402. function getEID : TBits_18; inline;
  15403. function getEXID : TBits_1; inline;
  15404. function getSID : TBits_11; inline;
  15405. function getw : TBits_32; inline;
  15406. procedure setEID(thebits : TBits_18); inline;
  15407. procedure setEXID(thebits : TBits_1); inline;
  15408. procedure setSID(thebits : TBits_11); inline;
  15409. procedure setw(thebits : TBits_32); inline;
  15410. public
  15411. procedure clearEXID; inline;
  15412. procedure setEXID; inline;
  15413. property EID : TBits_18 read getEID write setEID;
  15414. property EXID : TBits_1 read getEXID write setEXID;
  15415. property SID : TBits_11 read getSID write setSID;
  15416. property w : TBits_32 read getw write setw;
  15417. end;
  15418. TCAN1_C1RXF12 = record
  15419. private
  15420. function getEID : TBits_18; inline;
  15421. function getEXID : TBits_1; inline;
  15422. function getSID : TBits_11; inline;
  15423. function getw : TBits_32; inline;
  15424. procedure setEID(thebits : TBits_18); inline;
  15425. procedure setEXID(thebits : TBits_1); inline;
  15426. procedure setSID(thebits : TBits_11); inline;
  15427. procedure setw(thebits : TBits_32); inline;
  15428. public
  15429. procedure clearEXID; inline;
  15430. procedure setEXID; inline;
  15431. property EID : TBits_18 read getEID write setEID;
  15432. property EXID : TBits_1 read getEXID write setEXID;
  15433. property SID : TBits_11 read getSID write setSID;
  15434. property w : TBits_32 read getw write setw;
  15435. end;
  15436. TCAN1_C1RXF13 = record
  15437. private
  15438. function getEID : TBits_18; inline;
  15439. function getEXID : TBits_1; inline;
  15440. function getSID : TBits_11; inline;
  15441. function getw : TBits_32; inline;
  15442. procedure setEID(thebits : TBits_18); inline;
  15443. procedure setEXID(thebits : TBits_1); inline;
  15444. procedure setSID(thebits : TBits_11); inline;
  15445. procedure setw(thebits : TBits_32); inline;
  15446. public
  15447. procedure clearEXID; inline;
  15448. procedure setEXID; inline;
  15449. property EID : TBits_18 read getEID write setEID;
  15450. property EXID : TBits_1 read getEXID write setEXID;
  15451. property SID : TBits_11 read getSID write setSID;
  15452. property w : TBits_32 read getw write setw;
  15453. end;
  15454. TCAN1_C1RXF14 = record
  15455. private
  15456. function getEID : TBits_18; inline;
  15457. function getEXID : TBits_1; inline;
  15458. function getSID : TBits_11; inline;
  15459. function getw : TBits_32; inline;
  15460. procedure setEID(thebits : TBits_18); inline;
  15461. procedure setEXID(thebits : TBits_1); inline;
  15462. procedure setSID(thebits : TBits_11); inline;
  15463. procedure setw(thebits : TBits_32); inline;
  15464. public
  15465. procedure clearEXID; inline;
  15466. procedure setEXID; inline;
  15467. property EID : TBits_18 read getEID write setEID;
  15468. property EXID : TBits_1 read getEXID write setEXID;
  15469. property SID : TBits_11 read getSID write setSID;
  15470. property w : TBits_32 read getw write setw;
  15471. end;
  15472. TCAN1_C1RXF15 = record
  15473. private
  15474. function getEID : TBits_18; inline;
  15475. function getEXID : TBits_1; inline;
  15476. function getSID : TBits_11; inline;
  15477. function getw : TBits_32; inline;
  15478. procedure setEID(thebits : TBits_18); inline;
  15479. procedure setEXID(thebits : TBits_1); inline;
  15480. procedure setSID(thebits : TBits_11); inline;
  15481. procedure setw(thebits : TBits_32); inline;
  15482. public
  15483. procedure clearEXID; inline;
  15484. procedure setEXID; inline;
  15485. property EID : TBits_18 read getEID write setEID;
  15486. property EXID : TBits_1 read getEXID write setEXID;
  15487. property SID : TBits_11 read getSID write setSID;
  15488. property w : TBits_32 read getw write setw;
  15489. end;
  15490. TCAN1_C1RXF16 = record
  15491. private
  15492. function getEID : TBits_18; inline;
  15493. function getEXID : TBits_1; inline;
  15494. function getSID : TBits_11; inline;
  15495. function getw : TBits_32; inline;
  15496. procedure setEID(thebits : TBits_18); inline;
  15497. procedure setEXID(thebits : TBits_1); inline;
  15498. procedure setSID(thebits : TBits_11); inline;
  15499. procedure setw(thebits : TBits_32); inline;
  15500. public
  15501. procedure clearEXID; inline;
  15502. procedure setEXID; inline;
  15503. property EID : TBits_18 read getEID write setEID;
  15504. property EXID : TBits_1 read getEXID write setEXID;
  15505. property SID : TBits_11 read getSID write setSID;
  15506. property w : TBits_32 read getw write setw;
  15507. end;
  15508. TCAN1_C1RXF17 = record
  15509. private
  15510. function getEID : TBits_18; inline;
  15511. function getEXID : TBits_1; inline;
  15512. function getSID : TBits_11; inline;
  15513. function getw : TBits_32; inline;
  15514. procedure setEID(thebits : TBits_18); inline;
  15515. procedure setEXID(thebits : TBits_1); inline;
  15516. procedure setSID(thebits : TBits_11); inline;
  15517. procedure setw(thebits : TBits_32); inline;
  15518. public
  15519. procedure clearEXID; inline;
  15520. procedure setEXID; inline;
  15521. property EID : TBits_18 read getEID write setEID;
  15522. property EXID : TBits_1 read getEXID write setEXID;
  15523. property SID : TBits_11 read getSID write setSID;
  15524. property w : TBits_32 read getw write setw;
  15525. end;
  15526. TCAN1_C1RXF18 = record
  15527. private
  15528. function getEID : TBits_18; inline;
  15529. function getEXID : TBits_1; inline;
  15530. function getSID : TBits_11; inline;
  15531. function getw : TBits_32; inline;
  15532. procedure setEID(thebits : TBits_18); inline;
  15533. procedure setEXID(thebits : TBits_1); inline;
  15534. procedure setSID(thebits : TBits_11); inline;
  15535. procedure setw(thebits : TBits_32); inline;
  15536. public
  15537. procedure clearEXID; inline;
  15538. procedure setEXID; inline;
  15539. property EID : TBits_18 read getEID write setEID;
  15540. property EXID : TBits_1 read getEXID write setEXID;
  15541. property SID : TBits_11 read getSID write setSID;
  15542. property w : TBits_32 read getw write setw;
  15543. end;
  15544. TCAN1_C1RXF19 = record
  15545. private
  15546. function getEID : TBits_18; inline;
  15547. function getEXID : TBits_1; inline;
  15548. function getSID : TBits_11; inline;
  15549. function getw : TBits_32; inline;
  15550. procedure setEID(thebits : TBits_18); inline;
  15551. procedure setEXID(thebits : TBits_1); inline;
  15552. procedure setSID(thebits : TBits_11); inline;
  15553. procedure setw(thebits : TBits_32); inline;
  15554. public
  15555. procedure clearEXID; inline;
  15556. procedure setEXID; inline;
  15557. property EID : TBits_18 read getEID write setEID;
  15558. property EXID : TBits_1 read getEXID write setEXID;
  15559. property SID : TBits_11 read getSID write setSID;
  15560. property w : TBits_32 read getw write setw;
  15561. end;
  15562. TCAN1_C1RXF20 = record
  15563. private
  15564. function getEID : TBits_18; inline;
  15565. function getEXID : TBits_1; inline;
  15566. function getSID : TBits_11; inline;
  15567. function getw : TBits_32; inline;
  15568. procedure setEID(thebits : TBits_18); inline;
  15569. procedure setEXID(thebits : TBits_1); inline;
  15570. procedure setSID(thebits : TBits_11); inline;
  15571. procedure setw(thebits : TBits_32); inline;
  15572. public
  15573. procedure clearEXID; inline;
  15574. procedure setEXID; inline;
  15575. property EID : TBits_18 read getEID write setEID;
  15576. property EXID : TBits_1 read getEXID write setEXID;
  15577. property SID : TBits_11 read getSID write setSID;
  15578. property w : TBits_32 read getw write setw;
  15579. end;
  15580. TCAN1_C1RXF21 = record
  15581. private
  15582. function getEID : TBits_18; inline;
  15583. function getEXID : TBits_1; inline;
  15584. function getSID : TBits_11; inline;
  15585. function getw : TBits_32; inline;
  15586. procedure setEID(thebits : TBits_18); inline;
  15587. procedure setEXID(thebits : TBits_1); inline;
  15588. procedure setSID(thebits : TBits_11); inline;
  15589. procedure setw(thebits : TBits_32); inline;
  15590. public
  15591. procedure clearEXID; inline;
  15592. procedure setEXID; inline;
  15593. property EID : TBits_18 read getEID write setEID;
  15594. property EXID : TBits_1 read getEXID write setEXID;
  15595. property SID : TBits_11 read getSID write setSID;
  15596. property w : TBits_32 read getw write setw;
  15597. end;
  15598. TCAN1_C1RXF22 = record
  15599. private
  15600. function getEID : TBits_18; inline;
  15601. function getEXID : TBits_1; inline;
  15602. function getSID : TBits_11; inline;
  15603. function getw : TBits_32; inline;
  15604. procedure setEID(thebits : TBits_18); inline;
  15605. procedure setEXID(thebits : TBits_1); inline;
  15606. procedure setSID(thebits : TBits_11); inline;
  15607. procedure setw(thebits : TBits_32); inline;
  15608. public
  15609. procedure clearEXID; inline;
  15610. procedure setEXID; inline;
  15611. property EID : TBits_18 read getEID write setEID;
  15612. property EXID : TBits_1 read getEXID write setEXID;
  15613. property SID : TBits_11 read getSID write setSID;
  15614. property w : TBits_32 read getw write setw;
  15615. end;
  15616. TCAN1_C1RXF23 = record
  15617. private
  15618. function getEID : TBits_18; inline;
  15619. function getEXID : TBits_1; inline;
  15620. function getSID : TBits_11; inline;
  15621. function getw : TBits_32; inline;
  15622. procedure setEID(thebits : TBits_18); inline;
  15623. procedure setEXID(thebits : TBits_1); inline;
  15624. procedure setSID(thebits : TBits_11); inline;
  15625. procedure setw(thebits : TBits_32); inline;
  15626. public
  15627. procedure clearEXID; inline;
  15628. procedure setEXID; inline;
  15629. property EID : TBits_18 read getEID write setEID;
  15630. property EXID : TBits_1 read getEXID write setEXID;
  15631. property SID : TBits_11 read getSID write setSID;
  15632. property w : TBits_32 read getw write setw;
  15633. end;
  15634. TCAN1_C1RXF24 = record
  15635. private
  15636. function getEID : TBits_18; inline;
  15637. function getEXID : TBits_1; inline;
  15638. function getSID : TBits_11; inline;
  15639. function getw : TBits_32; inline;
  15640. procedure setEID(thebits : TBits_18); inline;
  15641. procedure setEXID(thebits : TBits_1); inline;
  15642. procedure setSID(thebits : TBits_11); inline;
  15643. procedure setw(thebits : TBits_32); inline;
  15644. public
  15645. procedure clearEXID; inline;
  15646. procedure setEXID; inline;
  15647. property EID : TBits_18 read getEID write setEID;
  15648. property EXID : TBits_1 read getEXID write setEXID;
  15649. property SID : TBits_11 read getSID write setSID;
  15650. property w : TBits_32 read getw write setw;
  15651. end;
  15652. TCAN1_C1RXF25 = record
  15653. private
  15654. function getEID : TBits_18; inline;
  15655. function getEXID : TBits_1; inline;
  15656. function getSID : TBits_11; inline;
  15657. function getw : TBits_32; inline;
  15658. procedure setEID(thebits : TBits_18); inline;
  15659. procedure setEXID(thebits : TBits_1); inline;
  15660. procedure setSID(thebits : TBits_11); inline;
  15661. procedure setw(thebits : TBits_32); inline;
  15662. public
  15663. procedure clearEXID; inline;
  15664. procedure setEXID; inline;
  15665. property EID : TBits_18 read getEID write setEID;
  15666. property EXID : TBits_1 read getEXID write setEXID;
  15667. property SID : TBits_11 read getSID write setSID;
  15668. property w : TBits_32 read getw write setw;
  15669. end;
  15670. TCAN1_C1RXF26 = record
  15671. private
  15672. function getEID : TBits_18; inline;
  15673. function getEXID : TBits_1; inline;
  15674. function getSID : TBits_11; inline;
  15675. function getw : TBits_32; inline;
  15676. procedure setEID(thebits : TBits_18); inline;
  15677. procedure setEXID(thebits : TBits_1); inline;
  15678. procedure setSID(thebits : TBits_11); inline;
  15679. procedure setw(thebits : TBits_32); inline;
  15680. public
  15681. procedure clearEXID; inline;
  15682. procedure setEXID; inline;
  15683. property EID : TBits_18 read getEID write setEID;
  15684. property EXID : TBits_1 read getEXID write setEXID;
  15685. property SID : TBits_11 read getSID write setSID;
  15686. property w : TBits_32 read getw write setw;
  15687. end;
  15688. TCAN1_C1RXF27 = record
  15689. private
  15690. function getEID : TBits_18; inline;
  15691. function getEXID : TBits_1; inline;
  15692. function getSID : TBits_11; inline;
  15693. function getw : TBits_32; inline;
  15694. procedure setEID(thebits : TBits_18); inline;
  15695. procedure setEXID(thebits : TBits_1); inline;
  15696. procedure setSID(thebits : TBits_11); inline;
  15697. procedure setw(thebits : TBits_32); inline;
  15698. public
  15699. procedure clearEXID; inline;
  15700. procedure setEXID; inline;
  15701. property EID : TBits_18 read getEID write setEID;
  15702. property EXID : TBits_1 read getEXID write setEXID;
  15703. property SID : TBits_11 read getSID write setSID;
  15704. property w : TBits_32 read getw write setw;
  15705. end;
  15706. TCAN1_C1RXF28 = record
  15707. private
  15708. function getEID : TBits_18; inline;
  15709. function getEXID : TBits_1; inline;
  15710. function getSID : TBits_11; inline;
  15711. function getw : TBits_32; inline;
  15712. procedure setEID(thebits : TBits_18); inline;
  15713. procedure setEXID(thebits : TBits_1); inline;
  15714. procedure setSID(thebits : TBits_11); inline;
  15715. procedure setw(thebits : TBits_32); inline;
  15716. public
  15717. procedure clearEXID; inline;
  15718. procedure setEXID; inline;
  15719. property EID : TBits_18 read getEID write setEID;
  15720. property EXID : TBits_1 read getEXID write setEXID;
  15721. property SID : TBits_11 read getSID write setSID;
  15722. property w : TBits_32 read getw write setw;
  15723. end;
  15724. TCAN1_C1RXF29 = record
  15725. private
  15726. function getEID : TBits_18; inline;
  15727. function getEXID : TBits_1; inline;
  15728. function getSID : TBits_11; inline;
  15729. function getw : TBits_32; inline;
  15730. procedure setEID(thebits : TBits_18); inline;
  15731. procedure setEXID(thebits : TBits_1); inline;
  15732. procedure setSID(thebits : TBits_11); inline;
  15733. procedure setw(thebits : TBits_32); inline;
  15734. public
  15735. procedure clearEXID; inline;
  15736. procedure setEXID; inline;
  15737. property EID : TBits_18 read getEID write setEID;
  15738. property EXID : TBits_1 read getEXID write setEXID;
  15739. property SID : TBits_11 read getSID write setSID;
  15740. property w : TBits_32 read getw write setw;
  15741. end;
  15742. TCAN1_C1RXF30 = record
  15743. private
  15744. function getEID : TBits_18; inline;
  15745. function getEXID : TBits_1; inline;
  15746. function getSID : TBits_11; inline;
  15747. function getw : TBits_32; inline;
  15748. procedure setEID(thebits : TBits_18); inline;
  15749. procedure setEXID(thebits : TBits_1); inline;
  15750. procedure setSID(thebits : TBits_11); inline;
  15751. procedure setw(thebits : TBits_32); inline;
  15752. public
  15753. procedure clearEXID; inline;
  15754. procedure setEXID; inline;
  15755. property EID : TBits_18 read getEID write setEID;
  15756. property EXID : TBits_1 read getEXID write setEXID;
  15757. property SID : TBits_11 read getSID write setSID;
  15758. property w : TBits_32 read getw write setw;
  15759. end;
  15760. TCAN1_C1RXF31 = record
  15761. private
  15762. function getEID : TBits_18; inline;
  15763. function getEXID : TBits_1; inline;
  15764. function getSID : TBits_11; inline;
  15765. function getw : TBits_32; inline;
  15766. procedure setEID(thebits : TBits_18); inline;
  15767. procedure setEXID(thebits : TBits_1); inline;
  15768. procedure setSID(thebits : TBits_11); inline;
  15769. procedure setw(thebits : TBits_32); inline;
  15770. public
  15771. procedure clearEXID; inline;
  15772. procedure setEXID; inline;
  15773. property EID : TBits_18 read getEID write setEID;
  15774. property EXID : TBits_1 read getEXID write setEXID;
  15775. property SID : TBits_11 read getSID write setSID;
  15776. property w : TBits_32 read getw write setw;
  15777. end;
  15778. TCAN1_C1FIFOCON0 = record
  15779. private
  15780. function getDONLY : TBits_1; inline;
  15781. function getFRESET : TBits_1; inline;
  15782. function getFSIZE : TBits_5; inline;
  15783. function getRTREN : TBits_1; inline;
  15784. function getTXABAT : TBits_1; inline;
  15785. function getTXEN : TBits_1; inline;
  15786. function getTXERR : TBits_1; inline;
  15787. function getTXLARB : TBits_1; inline;
  15788. function getTXPRI : TBits_2; inline;
  15789. function getTXREQ : TBits_1; inline;
  15790. function getUINC : TBits_1; inline;
  15791. function getw : TBits_32; inline;
  15792. procedure setDONLY(thebits : TBits_1); inline;
  15793. procedure setFRESET(thebits : TBits_1); inline;
  15794. procedure setFSIZE(thebits : TBits_5); inline;
  15795. procedure setRTREN(thebits : TBits_1); inline;
  15796. procedure setTXABAT(thebits : TBits_1); inline;
  15797. procedure setTXEN(thebits : TBits_1); inline;
  15798. procedure setTXERR(thebits : TBits_1); inline;
  15799. procedure setTXLARB(thebits : TBits_1); inline;
  15800. procedure setTXPRI(thebits : TBits_2); inline;
  15801. procedure setTXREQ(thebits : TBits_1); inline;
  15802. procedure setUINC(thebits : TBits_1); inline;
  15803. procedure setw(thebits : TBits_32); inline;
  15804. public
  15805. procedure clearDONLY; inline;
  15806. procedure clearFRESET; inline;
  15807. procedure clearRTREN; inline;
  15808. procedure clearTXABAT; inline;
  15809. procedure clearTXEN; inline;
  15810. procedure clearTXERR; inline;
  15811. procedure clearTXLARB; inline;
  15812. procedure clearTXREQ; inline;
  15813. procedure clearUINC; inline;
  15814. procedure setDONLY; inline;
  15815. procedure setFRESET; inline;
  15816. procedure setRTREN; inline;
  15817. procedure setTXABAT; inline;
  15818. procedure setTXEN; inline;
  15819. procedure setTXERR; inline;
  15820. procedure setTXLARB; inline;
  15821. procedure setTXREQ; inline;
  15822. procedure setUINC; inline;
  15823. property DONLY : TBits_1 read getDONLY write setDONLY;
  15824. property FRESET : TBits_1 read getFRESET write setFRESET;
  15825. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  15826. property RTREN : TBits_1 read getRTREN write setRTREN;
  15827. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  15828. property TXEN : TBits_1 read getTXEN write setTXEN;
  15829. property TXERR : TBits_1 read getTXERR write setTXERR;
  15830. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  15831. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  15832. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  15833. property UINC : TBits_1 read getUINC write setUINC;
  15834. property w : TBits_32 read getw write setw;
  15835. end;
  15836. TCAN1_C1FIFOINT0 = record
  15837. private
  15838. function getRXFULLIE : TBits_1; inline;
  15839. function getRXFULLIF : TBits_1; inline;
  15840. function getRXHALFIE : TBits_1; inline;
  15841. function getRXHALFIF : TBits_1; inline;
  15842. function getRXNEMPTYIE : TBits_1; inline;
  15843. function getRXNEMPTYIF : TBits_1; inline;
  15844. function getRXOVFLIE : TBits_1; inline;
  15845. function getRXOVFLIF : TBits_1; inline;
  15846. function getTXEMPTYIE : TBits_1; inline;
  15847. function getTXEMPTYIF : TBits_1; inline;
  15848. function getTXHALFIE : TBits_1; inline;
  15849. function getTXHALFIF : TBits_1; inline;
  15850. function getTXNFULLIE : TBits_1; inline;
  15851. function getTXNFULLIF : TBits_1; inline;
  15852. function getw : TBits_32; inline;
  15853. procedure setRXFULLIE(thebits : TBits_1); inline;
  15854. procedure setRXFULLIF(thebits : TBits_1); inline;
  15855. procedure setRXHALFIE(thebits : TBits_1); inline;
  15856. procedure setRXHALFIF(thebits : TBits_1); inline;
  15857. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  15858. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  15859. procedure setRXOVFLIE(thebits : TBits_1); inline;
  15860. procedure setRXOVFLIF(thebits : TBits_1); inline;
  15861. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  15862. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  15863. procedure setTXHALFIE(thebits : TBits_1); inline;
  15864. procedure setTXHALFIF(thebits : TBits_1); inline;
  15865. procedure setTXNFULLIE(thebits : TBits_1); inline;
  15866. procedure setTXNFULLIF(thebits : TBits_1); inline;
  15867. procedure setw(thebits : TBits_32); inline;
  15868. public
  15869. procedure clearRXFULLIE; inline;
  15870. procedure clearRXFULLIF; inline;
  15871. procedure clearRXHALFIE; inline;
  15872. procedure clearRXHALFIF; inline;
  15873. procedure clearRXNEMPTYIE; inline;
  15874. procedure clearRXNEMPTYIF; inline;
  15875. procedure clearRXOVFLIE; inline;
  15876. procedure clearRXOVFLIF; inline;
  15877. procedure clearTXEMPTYIE; inline;
  15878. procedure clearTXEMPTYIF; inline;
  15879. procedure clearTXHALFIE; inline;
  15880. procedure clearTXHALFIF; inline;
  15881. procedure clearTXNFULLIE; inline;
  15882. procedure clearTXNFULLIF; inline;
  15883. procedure setRXFULLIE; inline;
  15884. procedure setRXFULLIF; inline;
  15885. procedure setRXHALFIE; inline;
  15886. procedure setRXHALFIF; inline;
  15887. procedure setRXNEMPTYIE; inline;
  15888. procedure setRXNEMPTYIF; inline;
  15889. procedure setRXOVFLIE; inline;
  15890. procedure setRXOVFLIF; inline;
  15891. procedure setTXEMPTYIE; inline;
  15892. procedure setTXEMPTYIF; inline;
  15893. procedure setTXHALFIE; inline;
  15894. procedure setTXHALFIF; inline;
  15895. procedure setTXNFULLIE; inline;
  15896. procedure setTXNFULLIF; inline;
  15897. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  15898. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  15899. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  15900. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  15901. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  15902. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  15903. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  15904. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  15905. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  15906. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  15907. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  15908. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  15909. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  15910. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  15911. property w : TBits_32 read getw write setw;
  15912. end;
  15913. TCAN1_C1FIFOCI0 = record
  15914. private
  15915. function getCFIFOCI : TBits_5; inline;
  15916. function getw : TBits_32; inline;
  15917. procedure setCFIFOCI(thebits : TBits_5); inline;
  15918. procedure setw(thebits : TBits_32); inline;
  15919. public
  15920. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  15921. property w : TBits_32 read getw write setw;
  15922. end;
  15923. TCAN1_C1FIFOCON1 = record
  15924. private
  15925. function getDONLY : TBits_1; inline;
  15926. function getFRESET : TBits_1; inline;
  15927. function getFSIZE : TBits_5; inline;
  15928. function getRTREN : TBits_1; inline;
  15929. function getTXABAT : TBits_1; inline;
  15930. function getTXEN : TBits_1; inline;
  15931. function getTXERR : TBits_1; inline;
  15932. function getTXLARB : TBits_1; inline;
  15933. function getTXPRI : TBits_2; inline;
  15934. function getTXREQ : TBits_1; inline;
  15935. function getUINC : TBits_1; inline;
  15936. function getw : TBits_32; inline;
  15937. procedure setDONLY(thebits : TBits_1); inline;
  15938. procedure setFRESET(thebits : TBits_1); inline;
  15939. procedure setFSIZE(thebits : TBits_5); inline;
  15940. procedure setRTREN(thebits : TBits_1); inline;
  15941. procedure setTXABAT(thebits : TBits_1); inline;
  15942. procedure setTXEN(thebits : TBits_1); inline;
  15943. procedure setTXERR(thebits : TBits_1); inline;
  15944. procedure setTXLARB(thebits : TBits_1); inline;
  15945. procedure setTXPRI(thebits : TBits_2); inline;
  15946. procedure setTXREQ(thebits : TBits_1); inline;
  15947. procedure setUINC(thebits : TBits_1); inline;
  15948. procedure setw(thebits : TBits_32); inline;
  15949. public
  15950. procedure clearDONLY; inline;
  15951. procedure clearFRESET; inline;
  15952. procedure clearRTREN; inline;
  15953. procedure clearTXABAT; inline;
  15954. procedure clearTXEN; inline;
  15955. procedure clearTXERR; inline;
  15956. procedure clearTXLARB; inline;
  15957. procedure clearTXREQ; inline;
  15958. procedure clearUINC; inline;
  15959. procedure setDONLY; inline;
  15960. procedure setFRESET; inline;
  15961. procedure setRTREN; inline;
  15962. procedure setTXABAT; inline;
  15963. procedure setTXEN; inline;
  15964. procedure setTXERR; inline;
  15965. procedure setTXLARB; inline;
  15966. procedure setTXREQ; inline;
  15967. procedure setUINC; inline;
  15968. property DONLY : TBits_1 read getDONLY write setDONLY;
  15969. property FRESET : TBits_1 read getFRESET write setFRESET;
  15970. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  15971. property RTREN : TBits_1 read getRTREN write setRTREN;
  15972. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  15973. property TXEN : TBits_1 read getTXEN write setTXEN;
  15974. property TXERR : TBits_1 read getTXERR write setTXERR;
  15975. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  15976. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  15977. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  15978. property UINC : TBits_1 read getUINC write setUINC;
  15979. property w : TBits_32 read getw write setw;
  15980. end;
  15981. TCAN1_C1FIFOINT1 = record
  15982. private
  15983. function getRXFULLIE : TBits_1; inline;
  15984. function getRXFULLIF : TBits_1; inline;
  15985. function getRXHALFIE : TBits_1; inline;
  15986. function getRXHALFIF : TBits_1; inline;
  15987. function getRXNEMPTYIE : TBits_1; inline;
  15988. function getRXNEMPTYIF : TBits_1; inline;
  15989. function getRXOVFLIE : TBits_1; inline;
  15990. function getRXOVFLIF : TBits_1; inline;
  15991. function getTXEMPTYIE : TBits_1; inline;
  15992. function getTXEMPTYIF : TBits_1; inline;
  15993. function getTXHALFIE : TBits_1; inline;
  15994. function getTXHALFIF : TBits_1; inline;
  15995. function getTXNFULLIE : TBits_1; inline;
  15996. function getTXNFULLIF : TBits_1; inline;
  15997. function getw : TBits_32; inline;
  15998. procedure setRXFULLIE(thebits : TBits_1); inline;
  15999. procedure setRXFULLIF(thebits : TBits_1); inline;
  16000. procedure setRXHALFIE(thebits : TBits_1); inline;
  16001. procedure setRXHALFIF(thebits : TBits_1); inline;
  16002. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16003. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16004. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16005. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16006. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16007. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16008. procedure setTXHALFIE(thebits : TBits_1); inline;
  16009. procedure setTXHALFIF(thebits : TBits_1); inline;
  16010. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16011. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16012. procedure setw(thebits : TBits_32); inline;
  16013. public
  16014. procedure clearRXFULLIE; inline;
  16015. procedure clearRXFULLIF; inline;
  16016. procedure clearRXHALFIE; inline;
  16017. procedure clearRXHALFIF; inline;
  16018. procedure clearRXNEMPTYIE; inline;
  16019. procedure clearRXNEMPTYIF; inline;
  16020. procedure clearRXOVFLIE; inline;
  16021. procedure clearRXOVFLIF; inline;
  16022. procedure clearTXEMPTYIE; inline;
  16023. procedure clearTXEMPTYIF; inline;
  16024. procedure clearTXHALFIE; inline;
  16025. procedure clearTXHALFIF; inline;
  16026. procedure clearTXNFULLIE; inline;
  16027. procedure clearTXNFULLIF; inline;
  16028. procedure setRXFULLIE; inline;
  16029. procedure setRXFULLIF; inline;
  16030. procedure setRXHALFIE; inline;
  16031. procedure setRXHALFIF; inline;
  16032. procedure setRXNEMPTYIE; inline;
  16033. procedure setRXNEMPTYIF; inline;
  16034. procedure setRXOVFLIE; inline;
  16035. procedure setRXOVFLIF; inline;
  16036. procedure setTXEMPTYIE; inline;
  16037. procedure setTXEMPTYIF; inline;
  16038. procedure setTXHALFIE; inline;
  16039. procedure setTXHALFIF; inline;
  16040. procedure setTXNFULLIE; inline;
  16041. procedure setTXNFULLIF; inline;
  16042. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16043. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16044. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16045. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16046. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16047. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16048. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16049. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16050. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16051. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16052. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16053. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16054. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16055. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16056. property w : TBits_32 read getw write setw;
  16057. end;
  16058. TCAN1_C1FIFOCI1 = record
  16059. private
  16060. function getCFIFOCI : TBits_5; inline;
  16061. function getw : TBits_32; inline;
  16062. procedure setCFIFOCI(thebits : TBits_5); inline;
  16063. procedure setw(thebits : TBits_32); inline;
  16064. public
  16065. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16066. property w : TBits_32 read getw write setw;
  16067. end;
  16068. TCAN1_C1FIFOCON2 = record
  16069. private
  16070. function getDONLY : TBits_1; inline;
  16071. function getFRESET : TBits_1; inline;
  16072. function getFSIZE : TBits_5; inline;
  16073. function getRTREN : TBits_1; inline;
  16074. function getTXABAT : TBits_1; inline;
  16075. function getTXEN : TBits_1; inline;
  16076. function getTXERR : TBits_1; inline;
  16077. function getTXLARB : TBits_1; inline;
  16078. function getTXPRI : TBits_2; inline;
  16079. function getTXREQ : TBits_1; inline;
  16080. function getUINC : TBits_1; inline;
  16081. function getw : TBits_32; inline;
  16082. procedure setDONLY(thebits : TBits_1); inline;
  16083. procedure setFRESET(thebits : TBits_1); inline;
  16084. procedure setFSIZE(thebits : TBits_5); inline;
  16085. procedure setRTREN(thebits : TBits_1); inline;
  16086. procedure setTXABAT(thebits : TBits_1); inline;
  16087. procedure setTXEN(thebits : TBits_1); inline;
  16088. procedure setTXERR(thebits : TBits_1); inline;
  16089. procedure setTXLARB(thebits : TBits_1); inline;
  16090. procedure setTXPRI(thebits : TBits_2); inline;
  16091. procedure setTXREQ(thebits : TBits_1); inline;
  16092. procedure setUINC(thebits : TBits_1); inline;
  16093. procedure setw(thebits : TBits_32); inline;
  16094. public
  16095. procedure clearDONLY; inline;
  16096. procedure clearFRESET; inline;
  16097. procedure clearRTREN; inline;
  16098. procedure clearTXABAT; inline;
  16099. procedure clearTXEN; inline;
  16100. procedure clearTXERR; inline;
  16101. procedure clearTXLARB; inline;
  16102. procedure clearTXREQ; inline;
  16103. procedure clearUINC; inline;
  16104. procedure setDONLY; inline;
  16105. procedure setFRESET; inline;
  16106. procedure setRTREN; inline;
  16107. procedure setTXABAT; inline;
  16108. procedure setTXEN; inline;
  16109. procedure setTXERR; inline;
  16110. procedure setTXLARB; inline;
  16111. procedure setTXREQ; inline;
  16112. procedure setUINC; inline;
  16113. property DONLY : TBits_1 read getDONLY write setDONLY;
  16114. property FRESET : TBits_1 read getFRESET write setFRESET;
  16115. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16116. property RTREN : TBits_1 read getRTREN write setRTREN;
  16117. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16118. property TXEN : TBits_1 read getTXEN write setTXEN;
  16119. property TXERR : TBits_1 read getTXERR write setTXERR;
  16120. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16121. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16122. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16123. property UINC : TBits_1 read getUINC write setUINC;
  16124. property w : TBits_32 read getw write setw;
  16125. end;
  16126. TCAN1_C1FIFOINT2 = record
  16127. private
  16128. function getRXFULLIE : TBits_1; inline;
  16129. function getRXFULLIF : TBits_1; inline;
  16130. function getRXHALFIE : TBits_1; inline;
  16131. function getRXHALFIF : TBits_1; inline;
  16132. function getRXNEMPTYIE : TBits_1; inline;
  16133. function getRXNEMPTYIF : TBits_1; inline;
  16134. function getRXOVFLIE : TBits_1; inline;
  16135. function getRXOVFLIF : TBits_1; inline;
  16136. function getTXEMPTYIE : TBits_1; inline;
  16137. function getTXEMPTYIF : TBits_1; inline;
  16138. function getTXHALFIE : TBits_1; inline;
  16139. function getTXHALFIF : TBits_1; inline;
  16140. function getTXNFULLIE : TBits_1; inline;
  16141. function getTXNFULLIF : TBits_1; inline;
  16142. function getw : TBits_32; inline;
  16143. procedure setRXFULLIE(thebits : TBits_1); inline;
  16144. procedure setRXFULLIF(thebits : TBits_1); inline;
  16145. procedure setRXHALFIE(thebits : TBits_1); inline;
  16146. procedure setRXHALFIF(thebits : TBits_1); inline;
  16147. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16148. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16149. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16150. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16151. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16152. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16153. procedure setTXHALFIE(thebits : TBits_1); inline;
  16154. procedure setTXHALFIF(thebits : TBits_1); inline;
  16155. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16156. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16157. procedure setw(thebits : TBits_32); inline;
  16158. public
  16159. procedure clearRXFULLIE; inline;
  16160. procedure clearRXFULLIF; inline;
  16161. procedure clearRXHALFIE; inline;
  16162. procedure clearRXHALFIF; inline;
  16163. procedure clearRXNEMPTYIE; inline;
  16164. procedure clearRXNEMPTYIF; inline;
  16165. procedure clearRXOVFLIE; inline;
  16166. procedure clearRXOVFLIF; inline;
  16167. procedure clearTXEMPTYIE; inline;
  16168. procedure clearTXEMPTYIF; inline;
  16169. procedure clearTXHALFIE; inline;
  16170. procedure clearTXHALFIF; inline;
  16171. procedure clearTXNFULLIE; inline;
  16172. procedure clearTXNFULLIF; inline;
  16173. procedure setRXFULLIE; inline;
  16174. procedure setRXFULLIF; inline;
  16175. procedure setRXHALFIE; inline;
  16176. procedure setRXHALFIF; inline;
  16177. procedure setRXNEMPTYIE; inline;
  16178. procedure setRXNEMPTYIF; inline;
  16179. procedure setRXOVFLIE; inline;
  16180. procedure setRXOVFLIF; inline;
  16181. procedure setTXEMPTYIE; inline;
  16182. procedure setTXEMPTYIF; inline;
  16183. procedure setTXHALFIE; inline;
  16184. procedure setTXHALFIF; inline;
  16185. procedure setTXNFULLIE; inline;
  16186. procedure setTXNFULLIF; inline;
  16187. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16188. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16189. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16190. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16191. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16192. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16193. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16194. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16195. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16196. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16197. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16198. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16199. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16200. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16201. property w : TBits_32 read getw write setw;
  16202. end;
  16203. TCAN1_C1FIFOCI2 = record
  16204. private
  16205. function getCFIFOCI : TBits_5; inline;
  16206. function getw : TBits_32; inline;
  16207. procedure setCFIFOCI(thebits : TBits_5); inline;
  16208. procedure setw(thebits : TBits_32); inline;
  16209. public
  16210. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16211. property w : TBits_32 read getw write setw;
  16212. end;
  16213. TCAN1_C1FIFOCON3 = record
  16214. private
  16215. function getDONLY : TBits_1; inline;
  16216. function getFRESET : TBits_1; inline;
  16217. function getFSIZE : TBits_5; inline;
  16218. function getRTREN : TBits_1; inline;
  16219. function getTXABAT : TBits_1; inline;
  16220. function getTXEN : TBits_1; inline;
  16221. function getTXERR : TBits_1; inline;
  16222. function getTXLARB : TBits_1; inline;
  16223. function getTXPRI : TBits_2; inline;
  16224. function getTXREQ : TBits_1; inline;
  16225. function getUINC : TBits_1; inline;
  16226. function getw : TBits_32; inline;
  16227. procedure setDONLY(thebits : TBits_1); inline;
  16228. procedure setFRESET(thebits : TBits_1); inline;
  16229. procedure setFSIZE(thebits : TBits_5); inline;
  16230. procedure setRTREN(thebits : TBits_1); inline;
  16231. procedure setTXABAT(thebits : TBits_1); inline;
  16232. procedure setTXEN(thebits : TBits_1); inline;
  16233. procedure setTXERR(thebits : TBits_1); inline;
  16234. procedure setTXLARB(thebits : TBits_1); inline;
  16235. procedure setTXPRI(thebits : TBits_2); inline;
  16236. procedure setTXREQ(thebits : TBits_1); inline;
  16237. procedure setUINC(thebits : TBits_1); inline;
  16238. procedure setw(thebits : TBits_32); inline;
  16239. public
  16240. procedure clearDONLY; inline;
  16241. procedure clearFRESET; inline;
  16242. procedure clearRTREN; inline;
  16243. procedure clearTXABAT; inline;
  16244. procedure clearTXEN; inline;
  16245. procedure clearTXERR; inline;
  16246. procedure clearTXLARB; inline;
  16247. procedure clearTXREQ; inline;
  16248. procedure clearUINC; inline;
  16249. procedure setDONLY; inline;
  16250. procedure setFRESET; inline;
  16251. procedure setRTREN; inline;
  16252. procedure setTXABAT; inline;
  16253. procedure setTXEN; inline;
  16254. procedure setTXERR; inline;
  16255. procedure setTXLARB; inline;
  16256. procedure setTXREQ; inline;
  16257. procedure setUINC; inline;
  16258. property DONLY : TBits_1 read getDONLY write setDONLY;
  16259. property FRESET : TBits_1 read getFRESET write setFRESET;
  16260. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16261. property RTREN : TBits_1 read getRTREN write setRTREN;
  16262. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16263. property TXEN : TBits_1 read getTXEN write setTXEN;
  16264. property TXERR : TBits_1 read getTXERR write setTXERR;
  16265. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16266. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16267. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16268. property UINC : TBits_1 read getUINC write setUINC;
  16269. property w : TBits_32 read getw write setw;
  16270. end;
  16271. TCAN1_C1FIFOINT3 = record
  16272. private
  16273. function getRXFULLIE : TBits_1; inline;
  16274. function getRXFULLIF : TBits_1; inline;
  16275. function getRXHALFIE : TBits_1; inline;
  16276. function getRXHALFIF : TBits_1; inline;
  16277. function getRXNEMPTYIE : TBits_1; inline;
  16278. function getRXNEMPTYIF : TBits_1; inline;
  16279. function getRXOVFLIE : TBits_1; inline;
  16280. function getRXOVFLIF : TBits_1; inline;
  16281. function getTXEMPTYIE : TBits_1; inline;
  16282. function getTXEMPTYIF : TBits_1; inline;
  16283. function getTXHALFIE : TBits_1; inline;
  16284. function getTXHALFIF : TBits_1; inline;
  16285. function getTXNFULLIE : TBits_1; inline;
  16286. function getTXNFULLIF : TBits_1; inline;
  16287. function getw : TBits_32; inline;
  16288. procedure setRXFULLIE(thebits : TBits_1); inline;
  16289. procedure setRXFULLIF(thebits : TBits_1); inline;
  16290. procedure setRXHALFIE(thebits : TBits_1); inline;
  16291. procedure setRXHALFIF(thebits : TBits_1); inline;
  16292. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16293. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16294. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16295. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16296. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16297. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16298. procedure setTXHALFIE(thebits : TBits_1); inline;
  16299. procedure setTXHALFIF(thebits : TBits_1); inline;
  16300. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16301. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16302. procedure setw(thebits : TBits_32); inline;
  16303. public
  16304. procedure clearRXFULLIE; inline;
  16305. procedure clearRXFULLIF; inline;
  16306. procedure clearRXHALFIE; inline;
  16307. procedure clearRXHALFIF; inline;
  16308. procedure clearRXNEMPTYIE; inline;
  16309. procedure clearRXNEMPTYIF; inline;
  16310. procedure clearRXOVFLIE; inline;
  16311. procedure clearRXOVFLIF; inline;
  16312. procedure clearTXEMPTYIE; inline;
  16313. procedure clearTXEMPTYIF; inline;
  16314. procedure clearTXHALFIE; inline;
  16315. procedure clearTXHALFIF; inline;
  16316. procedure clearTXNFULLIE; inline;
  16317. procedure clearTXNFULLIF; inline;
  16318. procedure setRXFULLIE; inline;
  16319. procedure setRXFULLIF; inline;
  16320. procedure setRXHALFIE; inline;
  16321. procedure setRXHALFIF; inline;
  16322. procedure setRXNEMPTYIE; inline;
  16323. procedure setRXNEMPTYIF; inline;
  16324. procedure setRXOVFLIE; inline;
  16325. procedure setRXOVFLIF; inline;
  16326. procedure setTXEMPTYIE; inline;
  16327. procedure setTXEMPTYIF; inline;
  16328. procedure setTXHALFIE; inline;
  16329. procedure setTXHALFIF; inline;
  16330. procedure setTXNFULLIE; inline;
  16331. procedure setTXNFULLIF; inline;
  16332. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16333. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16334. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16335. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16336. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16337. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16338. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16339. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16340. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16341. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16342. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16343. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16344. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16345. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16346. property w : TBits_32 read getw write setw;
  16347. end;
  16348. TCAN1_C1FIFOCI3 = record
  16349. private
  16350. function getCFIFOCI : TBits_5; inline;
  16351. function getw : TBits_32; inline;
  16352. procedure setCFIFOCI(thebits : TBits_5); inline;
  16353. procedure setw(thebits : TBits_32); inline;
  16354. public
  16355. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16356. property w : TBits_32 read getw write setw;
  16357. end;
  16358. TCAN1_C1FIFOCON4 = record
  16359. private
  16360. function getDONLY : TBits_1; inline;
  16361. function getFRESET : TBits_1; inline;
  16362. function getFSIZE : TBits_5; inline;
  16363. function getRTREN : TBits_1; inline;
  16364. function getTXABAT : TBits_1; inline;
  16365. function getTXEN : TBits_1; inline;
  16366. function getTXERR : TBits_1; inline;
  16367. function getTXLARB : TBits_1; inline;
  16368. function getTXPRI : TBits_2; inline;
  16369. function getTXREQ : TBits_1; inline;
  16370. function getUINC : TBits_1; inline;
  16371. function getw : TBits_32; inline;
  16372. procedure setDONLY(thebits : TBits_1); inline;
  16373. procedure setFRESET(thebits : TBits_1); inline;
  16374. procedure setFSIZE(thebits : TBits_5); inline;
  16375. procedure setRTREN(thebits : TBits_1); inline;
  16376. procedure setTXABAT(thebits : TBits_1); inline;
  16377. procedure setTXEN(thebits : TBits_1); inline;
  16378. procedure setTXERR(thebits : TBits_1); inline;
  16379. procedure setTXLARB(thebits : TBits_1); inline;
  16380. procedure setTXPRI(thebits : TBits_2); inline;
  16381. procedure setTXREQ(thebits : TBits_1); inline;
  16382. procedure setUINC(thebits : TBits_1); inline;
  16383. procedure setw(thebits : TBits_32); inline;
  16384. public
  16385. procedure clearDONLY; inline;
  16386. procedure clearFRESET; inline;
  16387. procedure clearRTREN; inline;
  16388. procedure clearTXABAT; inline;
  16389. procedure clearTXEN; inline;
  16390. procedure clearTXERR; inline;
  16391. procedure clearTXLARB; inline;
  16392. procedure clearTXREQ; inline;
  16393. procedure clearUINC; inline;
  16394. procedure setDONLY; inline;
  16395. procedure setFRESET; inline;
  16396. procedure setRTREN; inline;
  16397. procedure setTXABAT; inline;
  16398. procedure setTXEN; inline;
  16399. procedure setTXERR; inline;
  16400. procedure setTXLARB; inline;
  16401. procedure setTXREQ; inline;
  16402. procedure setUINC; inline;
  16403. property DONLY : TBits_1 read getDONLY write setDONLY;
  16404. property FRESET : TBits_1 read getFRESET write setFRESET;
  16405. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16406. property RTREN : TBits_1 read getRTREN write setRTREN;
  16407. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16408. property TXEN : TBits_1 read getTXEN write setTXEN;
  16409. property TXERR : TBits_1 read getTXERR write setTXERR;
  16410. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16411. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16412. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16413. property UINC : TBits_1 read getUINC write setUINC;
  16414. property w : TBits_32 read getw write setw;
  16415. end;
  16416. TCAN1_C1FIFOINT4 = record
  16417. private
  16418. function getRXFULLIE : TBits_1; inline;
  16419. function getRXFULLIF : TBits_1; inline;
  16420. function getRXHALFIE : TBits_1; inline;
  16421. function getRXHALFIF : TBits_1; inline;
  16422. function getRXNEMPTYIE : TBits_1; inline;
  16423. function getRXNEMPTYIF : TBits_1; inline;
  16424. function getRXOVFLIE : TBits_1; inline;
  16425. function getRXOVFLIF : TBits_1; inline;
  16426. function getTXEMPTYIE : TBits_1; inline;
  16427. function getTXEMPTYIF : TBits_1; inline;
  16428. function getTXHALFIE : TBits_1; inline;
  16429. function getTXHALFIF : TBits_1; inline;
  16430. function getTXNFULLIE : TBits_1; inline;
  16431. function getTXNFULLIF : TBits_1; inline;
  16432. function getw : TBits_32; inline;
  16433. procedure setRXFULLIE(thebits : TBits_1); inline;
  16434. procedure setRXFULLIF(thebits : TBits_1); inline;
  16435. procedure setRXHALFIE(thebits : TBits_1); inline;
  16436. procedure setRXHALFIF(thebits : TBits_1); inline;
  16437. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16438. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16439. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16440. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16441. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16442. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16443. procedure setTXHALFIE(thebits : TBits_1); inline;
  16444. procedure setTXHALFIF(thebits : TBits_1); inline;
  16445. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16446. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16447. procedure setw(thebits : TBits_32); inline;
  16448. public
  16449. procedure clearRXFULLIE; inline;
  16450. procedure clearRXFULLIF; inline;
  16451. procedure clearRXHALFIE; inline;
  16452. procedure clearRXHALFIF; inline;
  16453. procedure clearRXNEMPTYIE; inline;
  16454. procedure clearRXNEMPTYIF; inline;
  16455. procedure clearRXOVFLIE; inline;
  16456. procedure clearRXOVFLIF; inline;
  16457. procedure clearTXEMPTYIE; inline;
  16458. procedure clearTXEMPTYIF; inline;
  16459. procedure clearTXHALFIE; inline;
  16460. procedure clearTXHALFIF; inline;
  16461. procedure clearTXNFULLIE; inline;
  16462. procedure clearTXNFULLIF; inline;
  16463. procedure setRXFULLIE; inline;
  16464. procedure setRXFULLIF; inline;
  16465. procedure setRXHALFIE; inline;
  16466. procedure setRXHALFIF; inline;
  16467. procedure setRXNEMPTYIE; inline;
  16468. procedure setRXNEMPTYIF; inline;
  16469. procedure setRXOVFLIE; inline;
  16470. procedure setRXOVFLIF; inline;
  16471. procedure setTXEMPTYIE; inline;
  16472. procedure setTXEMPTYIF; inline;
  16473. procedure setTXHALFIE; inline;
  16474. procedure setTXHALFIF; inline;
  16475. procedure setTXNFULLIE; inline;
  16476. procedure setTXNFULLIF; inline;
  16477. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16478. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16479. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16480. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16481. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16482. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16483. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16484. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16485. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16486. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16487. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16488. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16489. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16490. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16491. property w : TBits_32 read getw write setw;
  16492. end;
  16493. TCAN1_C1FIFOCI4 = record
  16494. private
  16495. function getCFIFOCI : TBits_5; inline;
  16496. function getw : TBits_32; inline;
  16497. procedure setCFIFOCI(thebits : TBits_5); inline;
  16498. procedure setw(thebits : TBits_32); inline;
  16499. public
  16500. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16501. property w : TBits_32 read getw write setw;
  16502. end;
  16503. TCAN1_C1FIFOCON5 = record
  16504. private
  16505. function getDONLY : TBits_1; inline;
  16506. function getFRESET : TBits_1; inline;
  16507. function getFSIZE : TBits_5; inline;
  16508. function getRTREN : TBits_1; inline;
  16509. function getTXABAT : TBits_1; inline;
  16510. function getTXEN : TBits_1; inline;
  16511. function getTXERR : TBits_1; inline;
  16512. function getTXLARB : TBits_1; inline;
  16513. function getTXPRI : TBits_2; inline;
  16514. function getTXREQ : TBits_1; inline;
  16515. function getUINC : TBits_1; inline;
  16516. function getw : TBits_32; inline;
  16517. procedure setDONLY(thebits : TBits_1); inline;
  16518. procedure setFRESET(thebits : TBits_1); inline;
  16519. procedure setFSIZE(thebits : TBits_5); inline;
  16520. procedure setRTREN(thebits : TBits_1); inline;
  16521. procedure setTXABAT(thebits : TBits_1); inline;
  16522. procedure setTXEN(thebits : TBits_1); inline;
  16523. procedure setTXERR(thebits : TBits_1); inline;
  16524. procedure setTXLARB(thebits : TBits_1); inline;
  16525. procedure setTXPRI(thebits : TBits_2); inline;
  16526. procedure setTXREQ(thebits : TBits_1); inline;
  16527. procedure setUINC(thebits : TBits_1); inline;
  16528. procedure setw(thebits : TBits_32); inline;
  16529. public
  16530. procedure clearDONLY; inline;
  16531. procedure clearFRESET; inline;
  16532. procedure clearRTREN; inline;
  16533. procedure clearTXABAT; inline;
  16534. procedure clearTXEN; inline;
  16535. procedure clearTXERR; inline;
  16536. procedure clearTXLARB; inline;
  16537. procedure clearTXREQ; inline;
  16538. procedure clearUINC; inline;
  16539. procedure setDONLY; inline;
  16540. procedure setFRESET; inline;
  16541. procedure setRTREN; inline;
  16542. procedure setTXABAT; inline;
  16543. procedure setTXEN; inline;
  16544. procedure setTXERR; inline;
  16545. procedure setTXLARB; inline;
  16546. procedure setTXREQ; inline;
  16547. procedure setUINC; inline;
  16548. property DONLY : TBits_1 read getDONLY write setDONLY;
  16549. property FRESET : TBits_1 read getFRESET write setFRESET;
  16550. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16551. property RTREN : TBits_1 read getRTREN write setRTREN;
  16552. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16553. property TXEN : TBits_1 read getTXEN write setTXEN;
  16554. property TXERR : TBits_1 read getTXERR write setTXERR;
  16555. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16556. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16557. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16558. property UINC : TBits_1 read getUINC write setUINC;
  16559. property w : TBits_32 read getw write setw;
  16560. end;
  16561. TCAN1_C1FIFOINT5 = record
  16562. private
  16563. function getRXFULLIE : TBits_1; inline;
  16564. function getRXFULLIF : TBits_1; inline;
  16565. function getRXHALFIE : TBits_1; inline;
  16566. function getRXHALFIF : TBits_1; inline;
  16567. function getRXNEMPTYIE : TBits_1; inline;
  16568. function getRXNEMPTYIF : TBits_1; inline;
  16569. function getRXOVFLIE : TBits_1; inline;
  16570. function getRXOVFLIF : TBits_1; inline;
  16571. function getTXEMPTYIE : TBits_1; inline;
  16572. function getTXEMPTYIF : TBits_1; inline;
  16573. function getTXHALFIE : TBits_1; inline;
  16574. function getTXHALFIF : TBits_1; inline;
  16575. function getTXNFULLIE : TBits_1; inline;
  16576. function getTXNFULLIF : TBits_1; inline;
  16577. function getw : TBits_32; inline;
  16578. procedure setRXFULLIE(thebits : TBits_1); inline;
  16579. procedure setRXFULLIF(thebits : TBits_1); inline;
  16580. procedure setRXHALFIE(thebits : TBits_1); inline;
  16581. procedure setRXHALFIF(thebits : TBits_1); inline;
  16582. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16583. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16584. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16585. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16586. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16587. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16588. procedure setTXHALFIE(thebits : TBits_1); inline;
  16589. procedure setTXHALFIF(thebits : TBits_1); inline;
  16590. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16591. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16592. procedure setw(thebits : TBits_32); inline;
  16593. public
  16594. procedure clearRXFULLIE; inline;
  16595. procedure clearRXFULLIF; inline;
  16596. procedure clearRXHALFIE; inline;
  16597. procedure clearRXHALFIF; inline;
  16598. procedure clearRXNEMPTYIE; inline;
  16599. procedure clearRXNEMPTYIF; inline;
  16600. procedure clearRXOVFLIE; inline;
  16601. procedure clearRXOVFLIF; inline;
  16602. procedure clearTXEMPTYIE; inline;
  16603. procedure clearTXEMPTYIF; inline;
  16604. procedure clearTXHALFIE; inline;
  16605. procedure clearTXHALFIF; inline;
  16606. procedure clearTXNFULLIE; inline;
  16607. procedure clearTXNFULLIF; inline;
  16608. procedure setRXFULLIE; inline;
  16609. procedure setRXFULLIF; inline;
  16610. procedure setRXHALFIE; inline;
  16611. procedure setRXHALFIF; inline;
  16612. procedure setRXNEMPTYIE; inline;
  16613. procedure setRXNEMPTYIF; inline;
  16614. procedure setRXOVFLIE; inline;
  16615. procedure setRXOVFLIF; inline;
  16616. procedure setTXEMPTYIE; inline;
  16617. procedure setTXEMPTYIF; inline;
  16618. procedure setTXHALFIE; inline;
  16619. procedure setTXHALFIF; inline;
  16620. procedure setTXNFULLIE; inline;
  16621. procedure setTXNFULLIF; inline;
  16622. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16623. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16624. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16625. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16626. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16627. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16628. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16629. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16630. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16631. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16632. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16633. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16634. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16635. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16636. property w : TBits_32 read getw write setw;
  16637. end;
  16638. TCAN1_C1FIFOCI5 = record
  16639. private
  16640. function getCFIFOCI : TBits_5; inline;
  16641. function getw : TBits_32; inline;
  16642. procedure setCFIFOCI(thebits : TBits_5); inline;
  16643. procedure setw(thebits : TBits_32); inline;
  16644. public
  16645. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16646. property w : TBits_32 read getw write setw;
  16647. end;
  16648. TCAN1_C1FIFOCON6 = record
  16649. private
  16650. function getDONLY : TBits_1; inline;
  16651. function getFRESET : TBits_1; inline;
  16652. function getFSIZE : TBits_5; inline;
  16653. function getRTREN : TBits_1; inline;
  16654. function getTXABAT : TBits_1; inline;
  16655. function getTXEN : TBits_1; inline;
  16656. function getTXERR : TBits_1; inline;
  16657. function getTXLARB : TBits_1; inline;
  16658. function getTXPRI : TBits_2; inline;
  16659. function getTXREQ : TBits_1; inline;
  16660. function getUINC : TBits_1; inline;
  16661. function getw : TBits_32; inline;
  16662. procedure setDONLY(thebits : TBits_1); inline;
  16663. procedure setFRESET(thebits : TBits_1); inline;
  16664. procedure setFSIZE(thebits : TBits_5); inline;
  16665. procedure setRTREN(thebits : TBits_1); inline;
  16666. procedure setTXABAT(thebits : TBits_1); inline;
  16667. procedure setTXEN(thebits : TBits_1); inline;
  16668. procedure setTXERR(thebits : TBits_1); inline;
  16669. procedure setTXLARB(thebits : TBits_1); inline;
  16670. procedure setTXPRI(thebits : TBits_2); inline;
  16671. procedure setTXREQ(thebits : TBits_1); inline;
  16672. procedure setUINC(thebits : TBits_1); inline;
  16673. procedure setw(thebits : TBits_32); inline;
  16674. public
  16675. procedure clearDONLY; inline;
  16676. procedure clearFRESET; inline;
  16677. procedure clearRTREN; inline;
  16678. procedure clearTXABAT; inline;
  16679. procedure clearTXEN; inline;
  16680. procedure clearTXERR; inline;
  16681. procedure clearTXLARB; inline;
  16682. procedure clearTXREQ; inline;
  16683. procedure clearUINC; inline;
  16684. procedure setDONLY; inline;
  16685. procedure setFRESET; inline;
  16686. procedure setRTREN; inline;
  16687. procedure setTXABAT; inline;
  16688. procedure setTXEN; inline;
  16689. procedure setTXERR; inline;
  16690. procedure setTXLARB; inline;
  16691. procedure setTXREQ; inline;
  16692. procedure setUINC; inline;
  16693. property DONLY : TBits_1 read getDONLY write setDONLY;
  16694. property FRESET : TBits_1 read getFRESET write setFRESET;
  16695. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16696. property RTREN : TBits_1 read getRTREN write setRTREN;
  16697. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16698. property TXEN : TBits_1 read getTXEN write setTXEN;
  16699. property TXERR : TBits_1 read getTXERR write setTXERR;
  16700. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16701. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16702. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16703. property UINC : TBits_1 read getUINC write setUINC;
  16704. property w : TBits_32 read getw write setw;
  16705. end;
  16706. TCAN1_C1FIFOINT6 = record
  16707. private
  16708. function getRXFULLIE : TBits_1; inline;
  16709. function getRXFULLIF : TBits_1; inline;
  16710. function getRXHALFIE : TBits_1; inline;
  16711. function getRXHALFIF : TBits_1; inline;
  16712. function getRXNEMPTYIE : TBits_1; inline;
  16713. function getRXNEMPTYIF : TBits_1; inline;
  16714. function getRXOVFLIE : TBits_1; inline;
  16715. function getRXOVFLIF : TBits_1; inline;
  16716. function getTXEMPTYIE : TBits_1; inline;
  16717. function getTXEMPTYIF : TBits_1; inline;
  16718. function getTXHALFIE : TBits_1; inline;
  16719. function getTXHALFIF : TBits_1; inline;
  16720. function getTXNFULLIE : TBits_1; inline;
  16721. function getTXNFULLIF : TBits_1; inline;
  16722. function getw : TBits_32; inline;
  16723. procedure setRXFULLIE(thebits : TBits_1); inline;
  16724. procedure setRXFULLIF(thebits : TBits_1); inline;
  16725. procedure setRXHALFIE(thebits : TBits_1); inline;
  16726. procedure setRXHALFIF(thebits : TBits_1); inline;
  16727. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16728. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16729. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16730. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16731. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16732. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16733. procedure setTXHALFIE(thebits : TBits_1); inline;
  16734. procedure setTXHALFIF(thebits : TBits_1); inline;
  16735. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16736. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16737. procedure setw(thebits : TBits_32); inline;
  16738. public
  16739. procedure clearRXFULLIE; inline;
  16740. procedure clearRXFULLIF; inline;
  16741. procedure clearRXHALFIE; inline;
  16742. procedure clearRXHALFIF; inline;
  16743. procedure clearRXNEMPTYIE; inline;
  16744. procedure clearRXNEMPTYIF; inline;
  16745. procedure clearRXOVFLIE; inline;
  16746. procedure clearRXOVFLIF; inline;
  16747. procedure clearTXEMPTYIE; inline;
  16748. procedure clearTXEMPTYIF; inline;
  16749. procedure clearTXHALFIE; inline;
  16750. procedure clearTXHALFIF; inline;
  16751. procedure clearTXNFULLIE; inline;
  16752. procedure clearTXNFULLIF; inline;
  16753. procedure setRXFULLIE; inline;
  16754. procedure setRXFULLIF; inline;
  16755. procedure setRXHALFIE; inline;
  16756. procedure setRXHALFIF; inline;
  16757. procedure setRXNEMPTYIE; inline;
  16758. procedure setRXNEMPTYIF; inline;
  16759. procedure setRXOVFLIE; inline;
  16760. procedure setRXOVFLIF; inline;
  16761. procedure setTXEMPTYIE; inline;
  16762. procedure setTXEMPTYIF; inline;
  16763. procedure setTXHALFIE; inline;
  16764. procedure setTXHALFIF; inline;
  16765. procedure setTXNFULLIE; inline;
  16766. procedure setTXNFULLIF; inline;
  16767. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16768. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16769. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16770. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16771. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16772. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16773. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16774. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16775. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16776. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16777. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16778. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16779. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16780. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16781. property w : TBits_32 read getw write setw;
  16782. end;
  16783. TCAN1_C1FIFOCI6 = record
  16784. private
  16785. function getCFIFOCI : TBits_5; inline;
  16786. function getw : TBits_32; inline;
  16787. procedure setCFIFOCI(thebits : TBits_5); inline;
  16788. procedure setw(thebits : TBits_32); inline;
  16789. public
  16790. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16791. property w : TBits_32 read getw write setw;
  16792. end;
  16793. TCAN1_C1FIFOCON7 = record
  16794. private
  16795. function getDONLY : TBits_1; inline;
  16796. function getFRESET : TBits_1; inline;
  16797. function getFSIZE : TBits_5; inline;
  16798. function getRTREN : TBits_1; inline;
  16799. function getTXABAT : TBits_1; inline;
  16800. function getTXEN : TBits_1; inline;
  16801. function getTXERR : TBits_1; inline;
  16802. function getTXLARB : TBits_1; inline;
  16803. function getTXPRI : TBits_2; inline;
  16804. function getTXREQ : TBits_1; inline;
  16805. function getUINC : TBits_1; inline;
  16806. function getw : TBits_32; inline;
  16807. procedure setDONLY(thebits : TBits_1); inline;
  16808. procedure setFRESET(thebits : TBits_1); inline;
  16809. procedure setFSIZE(thebits : TBits_5); inline;
  16810. procedure setRTREN(thebits : TBits_1); inline;
  16811. procedure setTXABAT(thebits : TBits_1); inline;
  16812. procedure setTXEN(thebits : TBits_1); inline;
  16813. procedure setTXERR(thebits : TBits_1); inline;
  16814. procedure setTXLARB(thebits : TBits_1); inline;
  16815. procedure setTXPRI(thebits : TBits_2); inline;
  16816. procedure setTXREQ(thebits : TBits_1); inline;
  16817. procedure setUINC(thebits : TBits_1); inline;
  16818. procedure setw(thebits : TBits_32); inline;
  16819. public
  16820. procedure clearDONLY; inline;
  16821. procedure clearFRESET; inline;
  16822. procedure clearRTREN; inline;
  16823. procedure clearTXABAT; inline;
  16824. procedure clearTXEN; inline;
  16825. procedure clearTXERR; inline;
  16826. procedure clearTXLARB; inline;
  16827. procedure clearTXREQ; inline;
  16828. procedure clearUINC; inline;
  16829. procedure setDONLY; inline;
  16830. procedure setFRESET; inline;
  16831. procedure setRTREN; inline;
  16832. procedure setTXABAT; inline;
  16833. procedure setTXEN; inline;
  16834. procedure setTXERR; inline;
  16835. procedure setTXLARB; inline;
  16836. procedure setTXREQ; inline;
  16837. procedure setUINC; inline;
  16838. property DONLY : TBits_1 read getDONLY write setDONLY;
  16839. property FRESET : TBits_1 read getFRESET write setFRESET;
  16840. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16841. property RTREN : TBits_1 read getRTREN write setRTREN;
  16842. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16843. property TXEN : TBits_1 read getTXEN write setTXEN;
  16844. property TXERR : TBits_1 read getTXERR write setTXERR;
  16845. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16846. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16847. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16848. property UINC : TBits_1 read getUINC write setUINC;
  16849. property w : TBits_32 read getw write setw;
  16850. end;
  16851. TCAN1_C1FIFOINT7 = record
  16852. private
  16853. function getRXFULLIE : TBits_1; inline;
  16854. function getRXFULLIF : TBits_1; inline;
  16855. function getRXHALFIE : TBits_1; inline;
  16856. function getRXHALFIF : TBits_1; inline;
  16857. function getRXNEMPTYIE : TBits_1; inline;
  16858. function getRXNEMPTYIF : TBits_1; inline;
  16859. function getRXOVFLIE : TBits_1; inline;
  16860. function getRXOVFLIF : TBits_1; inline;
  16861. function getTXEMPTYIE : TBits_1; inline;
  16862. function getTXEMPTYIF : TBits_1; inline;
  16863. function getTXHALFIE : TBits_1; inline;
  16864. function getTXHALFIF : TBits_1; inline;
  16865. function getTXNFULLIE : TBits_1; inline;
  16866. function getTXNFULLIF : TBits_1; inline;
  16867. function getw : TBits_32; inline;
  16868. procedure setRXFULLIE(thebits : TBits_1); inline;
  16869. procedure setRXFULLIF(thebits : TBits_1); inline;
  16870. procedure setRXHALFIE(thebits : TBits_1); inline;
  16871. procedure setRXHALFIF(thebits : TBits_1); inline;
  16872. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16873. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16874. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16875. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16876. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16877. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16878. procedure setTXHALFIE(thebits : TBits_1); inline;
  16879. procedure setTXHALFIF(thebits : TBits_1); inline;
  16880. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16881. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16882. procedure setw(thebits : TBits_32); inline;
  16883. public
  16884. procedure clearRXFULLIE; inline;
  16885. procedure clearRXFULLIF; inline;
  16886. procedure clearRXHALFIE; inline;
  16887. procedure clearRXHALFIF; inline;
  16888. procedure clearRXNEMPTYIE; inline;
  16889. procedure clearRXNEMPTYIF; inline;
  16890. procedure clearRXOVFLIE; inline;
  16891. procedure clearRXOVFLIF; inline;
  16892. procedure clearTXEMPTYIE; inline;
  16893. procedure clearTXEMPTYIF; inline;
  16894. procedure clearTXHALFIE; inline;
  16895. procedure clearTXHALFIF; inline;
  16896. procedure clearTXNFULLIE; inline;
  16897. procedure clearTXNFULLIF; inline;
  16898. procedure setRXFULLIE; inline;
  16899. procedure setRXFULLIF; inline;
  16900. procedure setRXHALFIE; inline;
  16901. procedure setRXHALFIF; inline;
  16902. procedure setRXNEMPTYIE; inline;
  16903. procedure setRXNEMPTYIF; inline;
  16904. procedure setRXOVFLIE; inline;
  16905. procedure setRXOVFLIF; inline;
  16906. procedure setTXEMPTYIE; inline;
  16907. procedure setTXEMPTYIF; inline;
  16908. procedure setTXHALFIE; inline;
  16909. procedure setTXHALFIF; inline;
  16910. procedure setTXNFULLIE; inline;
  16911. procedure setTXNFULLIF; inline;
  16912. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16913. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16914. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16915. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16916. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16917. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16918. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16919. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16920. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16921. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16922. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16923. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16924. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16925. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16926. property w : TBits_32 read getw write setw;
  16927. end;
  16928. TCAN1_C1FIFOCI7 = record
  16929. private
  16930. function getCFIFOCI : TBits_5; inline;
  16931. function getw : TBits_32; inline;
  16932. procedure setCFIFOCI(thebits : TBits_5); inline;
  16933. procedure setw(thebits : TBits_32); inline;
  16934. public
  16935. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16936. property w : TBits_32 read getw write setw;
  16937. end;
  16938. TCAN1_C1FIFOCON8 = record
  16939. private
  16940. function getDONLY : TBits_1; inline;
  16941. function getFRESET : TBits_1; inline;
  16942. function getFSIZE : TBits_5; inline;
  16943. function getRTREN : TBits_1; inline;
  16944. function getTXABAT : TBits_1; inline;
  16945. function getTXEN : TBits_1; inline;
  16946. function getTXERR : TBits_1; inline;
  16947. function getTXLARB : TBits_1; inline;
  16948. function getTXPRI : TBits_2; inline;
  16949. function getTXREQ : TBits_1; inline;
  16950. function getUINC : TBits_1; inline;
  16951. function getw : TBits_32; inline;
  16952. procedure setDONLY(thebits : TBits_1); inline;
  16953. procedure setFRESET(thebits : TBits_1); inline;
  16954. procedure setFSIZE(thebits : TBits_5); inline;
  16955. procedure setRTREN(thebits : TBits_1); inline;
  16956. procedure setTXABAT(thebits : TBits_1); inline;
  16957. procedure setTXEN(thebits : TBits_1); inline;
  16958. procedure setTXERR(thebits : TBits_1); inline;
  16959. procedure setTXLARB(thebits : TBits_1); inline;
  16960. procedure setTXPRI(thebits : TBits_2); inline;
  16961. procedure setTXREQ(thebits : TBits_1); inline;
  16962. procedure setUINC(thebits : TBits_1); inline;
  16963. procedure setw(thebits : TBits_32); inline;
  16964. public
  16965. procedure clearDONLY; inline;
  16966. procedure clearFRESET; inline;
  16967. procedure clearRTREN; inline;
  16968. procedure clearTXABAT; inline;
  16969. procedure clearTXEN; inline;
  16970. procedure clearTXERR; inline;
  16971. procedure clearTXLARB; inline;
  16972. procedure clearTXREQ; inline;
  16973. procedure clearUINC; inline;
  16974. procedure setDONLY; inline;
  16975. procedure setFRESET; inline;
  16976. procedure setRTREN; inline;
  16977. procedure setTXABAT; inline;
  16978. procedure setTXEN; inline;
  16979. procedure setTXERR; inline;
  16980. procedure setTXLARB; inline;
  16981. procedure setTXREQ; inline;
  16982. procedure setUINC; inline;
  16983. property DONLY : TBits_1 read getDONLY write setDONLY;
  16984. property FRESET : TBits_1 read getFRESET write setFRESET;
  16985. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16986. property RTREN : TBits_1 read getRTREN write setRTREN;
  16987. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16988. property TXEN : TBits_1 read getTXEN write setTXEN;
  16989. property TXERR : TBits_1 read getTXERR write setTXERR;
  16990. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16991. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16992. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16993. property UINC : TBits_1 read getUINC write setUINC;
  16994. property w : TBits_32 read getw write setw;
  16995. end;
  16996. TCAN1_C1FIFOINT8 = record
  16997. private
  16998. function getRXFULLIE : TBits_1; inline;
  16999. function getRXFULLIF : TBits_1; inline;
  17000. function getRXHALFIE : TBits_1; inline;
  17001. function getRXHALFIF : TBits_1; inline;
  17002. function getRXNEMPTYIE : TBits_1; inline;
  17003. function getRXNEMPTYIF : TBits_1; inline;
  17004. function getRXOVFLIE : TBits_1; inline;
  17005. function getRXOVFLIF : TBits_1; inline;
  17006. function getTXEMPTYIE : TBits_1; inline;
  17007. function getTXEMPTYIF : TBits_1; inline;
  17008. function getTXHALFIE : TBits_1; inline;
  17009. function getTXHALFIF : TBits_1; inline;
  17010. function getTXNFULLIE : TBits_1; inline;
  17011. function getTXNFULLIF : TBits_1; inline;
  17012. function getw : TBits_32; inline;
  17013. procedure setRXFULLIE(thebits : TBits_1); inline;
  17014. procedure setRXFULLIF(thebits : TBits_1); inline;
  17015. procedure setRXHALFIE(thebits : TBits_1); inline;
  17016. procedure setRXHALFIF(thebits : TBits_1); inline;
  17017. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17018. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17019. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17020. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17021. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17022. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17023. procedure setTXHALFIE(thebits : TBits_1); inline;
  17024. procedure setTXHALFIF(thebits : TBits_1); inline;
  17025. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17026. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17027. procedure setw(thebits : TBits_32); inline;
  17028. public
  17029. procedure clearRXFULLIE; inline;
  17030. procedure clearRXFULLIF; inline;
  17031. procedure clearRXHALFIE; inline;
  17032. procedure clearRXHALFIF; inline;
  17033. procedure clearRXNEMPTYIE; inline;
  17034. procedure clearRXNEMPTYIF; inline;
  17035. procedure clearRXOVFLIE; inline;
  17036. procedure clearRXOVFLIF; inline;
  17037. procedure clearTXEMPTYIE; inline;
  17038. procedure clearTXEMPTYIF; inline;
  17039. procedure clearTXHALFIE; inline;
  17040. procedure clearTXHALFIF; inline;
  17041. procedure clearTXNFULLIE; inline;
  17042. procedure clearTXNFULLIF; inline;
  17043. procedure setRXFULLIE; inline;
  17044. procedure setRXFULLIF; inline;
  17045. procedure setRXHALFIE; inline;
  17046. procedure setRXHALFIF; inline;
  17047. procedure setRXNEMPTYIE; inline;
  17048. procedure setRXNEMPTYIF; inline;
  17049. procedure setRXOVFLIE; inline;
  17050. procedure setRXOVFLIF; inline;
  17051. procedure setTXEMPTYIE; inline;
  17052. procedure setTXEMPTYIF; inline;
  17053. procedure setTXHALFIE; inline;
  17054. procedure setTXHALFIF; inline;
  17055. procedure setTXNFULLIE; inline;
  17056. procedure setTXNFULLIF; inline;
  17057. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17058. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17059. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17060. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17061. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17062. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17063. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17064. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17065. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17066. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17067. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17068. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17069. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17070. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17071. property w : TBits_32 read getw write setw;
  17072. end;
  17073. TCAN1_C1FIFOCI8 = record
  17074. private
  17075. function getCFIFOCI : TBits_5; inline;
  17076. function getw : TBits_32; inline;
  17077. procedure setCFIFOCI(thebits : TBits_5); inline;
  17078. procedure setw(thebits : TBits_32); inline;
  17079. public
  17080. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17081. property w : TBits_32 read getw write setw;
  17082. end;
  17083. TCAN1_C1FIFOCON9 = record
  17084. private
  17085. function getDONLY : TBits_1; inline;
  17086. function getFRESET : TBits_1; inline;
  17087. function getFSIZE : TBits_5; inline;
  17088. function getRTREN : TBits_1; inline;
  17089. function getTXABAT : TBits_1; inline;
  17090. function getTXEN : TBits_1; inline;
  17091. function getTXERR : TBits_1; inline;
  17092. function getTXLARB : TBits_1; inline;
  17093. function getTXPRI : TBits_2; inline;
  17094. function getTXREQ : TBits_1; inline;
  17095. function getUINC : TBits_1; inline;
  17096. function getw : TBits_32; inline;
  17097. procedure setDONLY(thebits : TBits_1); inline;
  17098. procedure setFRESET(thebits : TBits_1); inline;
  17099. procedure setFSIZE(thebits : TBits_5); inline;
  17100. procedure setRTREN(thebits : TBits_1); inline;
  17101. procedure setTXABAT(thebits : TBits_1); inline;
  17102. procedure setTXEN(thebits : TBits_1); inline;
  17103. procedure setTXERR(thebits : TBits_1); inline;
  17104. procedure setTXLARB(thebits : TBits_1); inline;
  17105. procedure setTXPRI(thebits : TBits_2); inline;
  17106. procedure setTXREQ(thebits : TBits_1); inline;
  17107. procedure setUINC(thebits : TBits_1); inline;
  17108. procedure setw(thebits : TBits_32); inline;
  17109. public
  17110. procedure clearDONLY; inline;
  17111. procedure clearFRESET; inline;
  17112. procedure clearRTREN; inline;
  17113. procedure clearTXABAT; inline;
  17114. procedure clearTXEN; inline;
  17115. procedure clearTXERR; inline;
  17116. procedure clearTXLARB; inline;
  17117. procedure clearTXREQ; inline;
  17118. procedure clearUINC; inline;
  17119. procedure setDONLY; inline;
  17120. procedure setFRESET; inline;
  17121. procedure setRTREN; inline;
  17122. procedure setTXABAT; inline;
  17123. procedure setTXEN; inline;
  17124. procedure setTXERR; inline;
  17125. procedure setTXLARB; inline;
  17126. procedure setTXREQ; inline;
  17127. procedure setUINC; inline;
  17128. property DONLY : TBits_1 read getDONLY write setDONLY;
  17129. property FRESET : TBits_1 read getFRESET write setFRESET;
  17130. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17131. property RTREN : TBits_1 read getRTREN write setRTREN;
  17132. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17133. property TXEN : TBits_1 read getTXEN write setTXEN;
  17134. property TXERR : TBits_1 read getTXERR write setTXERR;
  17135. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17136. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17137. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17138. property UINC : TBits_1 read getUINC write setUINC;
  17139. property w : TBits_32 read getw write setw;
  17140. end;
  17141. TCAN1_C1FIFOINT9 = record
  17142. private
  17143. function getRXFULLIE : TBits_1; inline;
  17144. function getRXFULLIF : TBits_1; inline;
  17145. function getRXHALFIE : TBits_1; inline;
  17146. function getRXHALFIF : TBits_1; inline;
  17147. function getRXNEMPTYIE : TBits_1; inline;
  17148. function getRXNEMPTYIF : TBits_1; inline;
  17149. function getRXOVFLIE : TBits_1; inline;
  17150. function getRXOVFLIF : TBits_1; inline;
  17151. function getTXEMPTYIE : TBits_1; inline;
  17152. function getTXEMPTYIF : TBits_1; inline;
  17153. function getTXHALFIE : TBits_1; inline;
  17154. function getTXHALFIF : TBits_1; inline;
  17155. function getTXNFULLIE : TBits_1; inline;
  17156. function getTXNFULLIF : TBits_1; inline;
  17157. function getw : TBits_32; inline;
  17158. procedure setRXFULLIE(thebits : TBits_1); inline;
  17159. procedure setRXFULLIF(thebits : TBits_1); inline;
  17160. procedure setRXHALFIE(thebits : TBits_1); inline;
  17161. procedure setRXHALFIF(thebits : TBits_1); inline;
  17162. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17163. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17164. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17165. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17166. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17167. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17168. procedure setTXHALFIE(thebits : TBits_1); inline;
  17169. procedure setTXHALFIF(thebits : TBits_1); inline;
  17170. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17171. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17172. procedure setw(thebits : TBits_32); inline;
  17173. public
  17174. procedure clearRXFULLIE; inline;
  17175. procedure clearRXFULLIF; inline;
  17176. procedure clearRXHALFIE; inline;
  17177. procedure clearRXHALFIF; inline;
  17178. procedure clearRXNEMPTYIE; inline;
  17179. procedure clearRXNEMPTYIF; inline;
  17180. procedure clearRXOVFLIE; inline;
  17181. procedure clearRXOVFLIF; inline;
  17182. procedure clearTXEMPTYIE; inline;
  17183. procedure clearTXEMPTYIF; inline;
  17184. procedure clearTXHALFIE; inline;
  17185. procedure clearTXHALFIF; inline;
  17186. procedure clearTXNFULLIE; inline;
  17187. procedure clearTXNFULLIF; inline;
  17188. procedure setRXFULLIE; inline;
  17189. procedure setRXFULLIF; inline;
  17190. procedure setRXHALFIE; inline;
  17191. procedure setRXHALFIF; inline;
  17192. procedure setRXNEMPTYIE; inline;
  17193. procedure setRXNEMPTYIF; inline;
  17194. procedure setRXOVFLIE; inline;
  17195. procedure setRXOVFLIF; inline;
  17196. procedure setTXEMPTYIE; inline;
  17197. procedure setTXEMPTYIF; inline;
  17198. procedure setTXHALFIE; inline;
  17199. procedure setTXHALFIF; inline;
  17200. procedure setTXNFULLIE; inline;
  17201. procedure setTXNFULLIF; inline;
  17202. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17203. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17204. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17205. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17206. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17207. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17208. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17209. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17210. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17211. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17212. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17213. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17214. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17215. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17216. property w : TBits_32 read getw write setw;
  17217. end;
  17218. TCAN1_C1FIFOCI9 = record
  17219. private
  17220. function getCFIFOCI : TBits_5; inline;
  17221. function getw : TBits_32; inline;
  17222. procedure setCFIFOCI(thebits : TBits_5); inline;
  17223. procedure setw(thebits : TBits_32); inline;
  17224. public
  17225. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17226. property w : TBits_32 read getw write setw;
  17227. end;
  17228. TCAN1_C1FIFOCON10 = record
  17229. private
  17230. function getDONLY : TBits_1; inline;
  17231. function getFRESET : TBits_1; inline;
  17232. function getFSIZE : TBits_5; inline;
  17233. function getRTREN : TBits_1; inline;
  17234. function getTXABAT : TBits_1; inline;
  17235. function getTXEN : TBits_1; inline;
  17236. function getTXERR : TBits_1; inline;
  17237. function getTXLARB : TBits_1; inline;
  17238. function getTXPRI : TBits_2; inline;
  17239. function getTXREQ : TBits_1; inline;
  17240. function getUINC : TBits_1; inline;
  17241. function getw : TBits_32; inline;
  17242. procedure setDONLY(thebits : TBits_1); inline;
  17243. procedure setFRESET(thebits : TBits_1); inline;
  17244. procedure setFSIZE(thebits : TBits_5); inline;
  17245. procedure setRTREN(thebits : TBits_1); inline;
  17246. procedure setTXABAT(thebits : TBits_1); inline;
  17247. procedure setTXEN(thebits : TBits_1); inline;
  17248. procedure setTXERR(thebits : TBits_1); inline;
  17249. procedure setTXLARB(thebits : TBits_1); inline;
  17250. procedure setTXPRI(thebits : TBits_2); inline;
  17251. procedure setTXREQ(thebits : TBits_1); inline;
  17252. procedure setUINC(thebits : TBits_1); inline;
  17253. procedure setw(thebits : TBits_32); inline;
  17254. public
  17255. procedure clearDONLY; inline;
  17256. procedure clearFRESET; inline;
  17257. procedure clearRTREN; inline;
  17258. procedure clearTXABAT; inline;
  17259. procedure clearTXEN; inline;
  17260. procedure clearTXERR; inline;
  17261. procedure clearTXLARB; inline;
  17262. procedure clearTXREQ; inline;
  17263. procedure clearUINC; inline;
  17264. procedure setDONLY; inline;
  17265. procedure setFRESET; inline;
  17266. procedure setRTREN; inline;
  17267. procedure setTXABAT; inline;
  17268. procedure setTXEN; inline;
  17269. procedure setTXERR; inline;
  17270. procedure setTXLARB; inline;
  17271. procedure setTXREQ; inline;
  17272. procedure setUINC; inline;
  17273. property DONLY : TBits_1 read getDONLY write setDONLY;
  17274. property FRESET : TBits_1 read getFRESET write setFRESET;
  17275. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17276. property RTREN : TBits_1 read getRTREN write setRTREN;
  17277. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17278. property TXEN : TBits_1 read getTXEN write setTXEN;
  17279. property TXERR : TBits_1 read getTXERR write setTXERR;
  17280. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17281. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17282. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17283. property UINC : TBits_1 read getUINC write setUINC;
  17284. property w : TBits_32 read getw write setw;
  17285. end;
  17286. TCAN1_C1FIFOINT10 = record
  17287. private
  17288. function getRXFULLIE : TBits_1; inline;
  17289. function getRXFULLIF : TBits_1; inline;
  17290. function getRXHALFIE : TBits_1; inline;
  17291. function getRXHALFIF : TBits_1; inline;
  17292. function getRXNEMPTYIE : TBits_1; inline;
  17293. function getRXNEMPTYIF : TBits_1; inline;
  17294. function getRXOVFLIE : TBits_1; inline;
  17295. function getRXOVFLIF : TBits_1; inline;
  17296. function getTXEMPTYIE : TBits_1; inline;
  17297. function getTXEMPTYIF : TBits_1; inline;
  17298. function getTXHALFIE : TBits_1; inline;
  17299. function getTXHALFIF : TBits_1; inline;
  17300. function getTXNFULLIE : TBits_1; inline;
  17301. function getTXNFULLIF : TBits_1; inline;
  17302. function getw : TBits_32; inline;
  17303. procedure setRXFULLIE(thebits : TBits_1); inline;
  17304. procedure setRXFULLIF(thebits : TBits_1); inline;
  17305. procedure setRXHALFIE(thebits : TBits_1); inline;
  17306. procedure setRXHALFIF(thebits : TBits_1); inline;
  17307. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17308. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17309. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17310. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17311. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17312. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17313. procedure setTXHALFIE(thebits : TBits_1); inline;
  17314. procedure setTXHALFIF(thebits : TBits_1); inline;
  17315. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17316. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17317. procedure setw(thebits : TBits_32); inline;
  17318. public
  17319. procedure clearRXFULLIE; inline;
  17320. procedure clearRXFULLIF; inline;
  17321. procedure clearRXHALFIE; inline;
  17322. procedure clearRXHALFIF; inline;
  17323. procedure clearRXNEMPTYIE; inline;
  17324. procedure clearRXNEMPTYIF; inline;
  17325. procedure clearRXOVFLIE; inline;
  17326. procedure clearRXOVFLIF; inline;
  17327. procedure clearTXEMPTYIE; inline;
  17328. procedure clearTXEMPTYIF; inline;
  17329. procedure clearTXHALFIE; inline;
  17330. procedure clearTXHALFIF; inline;
  17331. procedure clearTXNFULLIE; inline;
  17332. procedure clearTXNFULLIF; inline;
  17333. procedure setRXFULLIE; inline;
  17334. procedure setRXFULLIF; inline;
  17335. procedure setRXHALFIE; inline;
  17336. procedure setRXHALFIF; inline;
  17337. procedure setRXNEMPTYIE; inline;
  17338. procedure setRXNEMPTYIF; inline;
  17339. procedure setRXOVFLIE; inline;
  17340. procedure setRXOVFLIF; inline;
  17341. procedure setTXEMPTYIE; inline;
  17342. procedure setTXEMPTYIF; inline;
  17343. procedure setTXHALFIE; inline;
  17344. procedure setTXHALFIF; inline;
  17345. procedure setTXNFULLIE; inline;
  17346. procedure setTXNFULLIF; inline;
  17347. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17348. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17349. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17350. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17351. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17352. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17353. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17354. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17355. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17356. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17357. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17358. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17359. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17360. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17361. property w : TBits_32 read getw write setw;
  17362. end;
  17363. TCAN1_C1FIFOCI10 = record
  17364. private
  17365. function getCFIFOCI : TBits_5; inline;
  17366. function getw : TBits_32; inline;
  17367. procedure setCFIFOCI(thebits : TBits_5); inline;
  17368. procedure setw(thebits : TBits_32); inline;
  17369. public
  17370. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17371. property w : TBits_32 read getw write setw;
  17372. end;
  17373. TCAN1_C1FIFOCON11 = record
  17374. private
  17375. function getDONLY : TBits_1; inline;
  17376. function getFRESET : TBits_1; inline;
  17377. function getFSIZE : TBits_5; inline;
  17378. function getRTREN : TBits_1; inline;
  17379. function getTXABAT : TBits_1; inline;
  17380. function getTXEN : TBits_1; inline;
  17381. function getTXERR : TBits_1; inline;
  17382. function getTXLARB : TBits_1; inline;
  17383. function getTXPRI : TBits_2; inline;
  17384. function getTXREQ : TBits_1; inline;
  17385. function getUINC : TBits_1; inline;
  17386. function getw : TBits_32; inline;
  17387. procedure setDONLY(thebits : TBits_1); inline;
  17388. procedure setFRESET(thebits : TBits_1); inline;
  17389. procedure setFSIZE(thebits : TBits_5); inline;
  17390. procedure setRTREN(thebits : TBits_1); inline;
  17391. procedure setTXABAT(thebits : TBits_1); inline;
  17392. procedure setTXEN(thebits : TBits_1); inline;
  17393. procedure setTXERR(thebits : TBits_1); inline;
  17394. procedure setTXLARB(thebits : TBits_1); inline;
  17395. procedure setTXPRI(thebits : TBits_2); inline;
  17396. procedure setTXREQ(thebits : TBits_1); inline;
  17397. procedure setUINC(thebits : TBits_1); inline;
  17398. procedure setw(thebits : TBits_32); inline;
  17399. public
  17400. procedure clearDONLY; inline;
  17401. procedure clearFRESET; inline;
  17402. procedure clearRTREN; inline;
  17403. procedure clearTXABAT; inline;
  17404. procedure clearTXEN; inline;
  17405. procedure clearTXERR; inline;
  17406. procedure clearTXLARB; inline;
  17407. procedure clearTXREQ; inline;
  17408. procedure clearUINC; inline;
  17409. procedure setDONLY; inline;
  17410. procedure setFRESET; inline;
  17411. procedure setRTREN; inline;
  17412. procedure setTXABAT; inline;
  17413. procedure setTXEN; inline;
  17414. procedure setTXERR; inline;
  17415. procedure setTXLARB; inline;
  17416. procedure setTXREQ; inline;
  17417. procedure setUINC; inline;
  17418. property DONLY : TBits_1 read getDONLY write setDONLY;
  17419. property FRESET : TBits_1 read getFRESET write setFRESET;
  17420. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17421. property RTREN : TBits_1 read getRTREN write setRTREN;
  17422. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17423. property TXEN : TBits_1 read getTXEN write setTXEN;
  17424. property TXERR : TBits_1 read getTXERR write setTXERR;
  17425. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17426. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17427. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17428. property UINC : TBits_1 read getUINC write setUINC;
  17429. property w : TBits_32 read getw write setw;
  17430. end;
  17431. TCAN1_C1FIFOINT11 = record
  17432. private
  17433. function getRXFULLIE : TBits_1; inline;
  17434. function getRXFULLIF : TBits_1; inline;
  17435. function getRXHALFIE : TBits_1; inline;
  17436. function getRXHALFIF : TBits_1; inline;
  17437. function getRXNEMPTYIE : TBits_1; inline;
  17438. function getRXNEMPTYIF : TBits_1; inline;
  17439. function getRXOVFLIE : TBits_1; inline;
  17440. function getRXOVFLIF : TBits_1; inline;
  17441. function getTXEMPTYIE : TBits_1; inline;
  17442. function getTXEMPTYIF : TBits_1; inline;
  17443. function getTXHALFIE : TBits_1; inline;
  17444. function getTXHALFIF : TBits_1; inline;
  17445. function getTXNFULLIE : TBits_1; inline;
  17446. function getTXNFULLIF : TBits_1; inline;
  17447. function getw : TBits_32; inline;
  17448. procedure setRXFULLIE(thebits : TBits_1); inline;
  17449. procedure setRXFULLIF(thebits : TBits_1); inline;
  17450. procedure setRXHALFIE(thebits : TBits_1); inline;
  17451. procedure setRXHALFIF(thebits : TBits_1); inline;
  17452. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17453. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17454. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17455. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17456. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17457. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17458. procedure setTXHALFIE(thebits : TBits_1); inline;
  17459. procedure setTXHALFIF(thebits : TBits_1); inline;
  17460. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17461. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17462. procedure setw(thebits : TBits_32); inline;
  17463. public
  17464. procedure clearRXFULLIE; inline;
  17465. procedure clearRXFULLIF; inline;
  17466. procedure clearRXHALFIE; inline;
  17467. procedure clearRXHALFIF; inline;
  17468. procedure clearRXNEMPTYIE; inline;
  17469. procedure clearRXNEMPTYIF; inline;
  17470. procedure clearRXOVFLIE; inline;
  17471. procedure clearRXOVFLIF; inline;
  17472. procedure clearTXEMPTYIE; inline;
  17473. procedure clearTXEMPTYIF; inline;
  17474. procedure clearTXHALFIE; inline;
  17475. procedure clearTXHALFIF; inline;
  17476. procedure clearTXNFULLIE; inline;
  17477. procedure clearTXNFULLIF; inline;
  17478. procedure setRXFULLIE; inline;
  17479. procedure setRXFULLIF; inline;
  17480. procedure setRXHALFIE; inline;
  17481. procedure setRXHALFIF; inline;
  17482. procedure setRXNEMPTYIE; inline;
  17483. procedure setRXNEMPTYIF; inline;
  17484. procedure setRXOVFLIE; inline;
  17485. procedure setRXOVFLIF; inline;
  17486. procedure setTXEMPTYIE; inline;
  17487. procedure setTXEMPTYIF; inline;
  17488. procedure setTXHALFIE; inline;
  17489. procedure setTXHALFIF; inline;
  17490. procedure setTXNFULLIE; inline;
  17491. procedure setTXNFULLIF; inline;
  17492. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17493. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17494. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17495. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17496. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17497. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17498. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17499. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17500. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17501. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17502. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17503. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17504. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17505. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17506. property w : TBits_32 read getw write setw;
  17507. end;
  17508. TCAN1_C1FIFOCI11 = record
  17509. private
  17510. function getCFIFOCI : TBits_5; inline;
  17511. function getw : TBits_32; inline;
  17512. procedure setCFIFOCI(thebits : TBits_5); inline;
  17513. procedure setw(thebits : TBits_32); inline;
  17514. public
  17515. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17516. property w : TBits_32 read getw write setw;
  17517. end;
  17518. TCAN1_C1FIFOCON12 = record
  17519. private
  17520. function getDONLY : TBits_1; inline;
  17521. function getFRESET : TBits_1; inline;
  17522. function getFSIZE : TBits_5; inline;
  17523. function getRTREN : TBits_1; inline;
  17524. function getTXABAT : TBits_1; inline;
  17525. function getTXEN : TBits_1; inline;
  17526. function getTXERR : TBits_1; inline;
  17527. function getTXLARB : TBits_1; inline;
  17528. function getTXPRI : TBits_2; inline;
  17529. function getTXREQ : TBits_1; inline;
  17530. function getUINC : TBits_1; inline;
  17531. function getw : TBits_32; inline;
  17532. procedure setDONLY(thebits : TBits_1); inline;
  17533. procedure setFRESET(thebits : TBits_1); inline;
  17534. procedure setFSIZE(thebits : TBits_5); inline;
  17535. procedure setRTREN(thebits : TBits_1); inline;
  17536. procedure setTXABAT(thebits : TBits_1); inline;
  17537. procedure setTXEN(thebits : TBits_1); inline;
  17538. procedure setTXERR(thebits : TBits_1); inline;
  17539. procedure setTXLARB(thebits : TBits_1); inline;
  17540. procedure setTXPRI(thebits : TBits_2); inline;
  17541. procedure setTXREQ(thebits : TBits_1); inline;
  17542. procedure setUINC(thebits : TBits_1); inline;
  17543. procedure setw(thebits : TBits_32); inline;
  17544. public
  17545. procedure clearDONLY; inline;
  17546. procedure clearFRESET; inline;
  17547. procedure clearRTREN; inline;
  17548. procedure clearTXABAT; inline;
  17549. procedure clearTXEN; inline;
  17550. procedure clearTXERR; inline;
  17551. procedure clearTXLARB; inline;
  17552. procedure clearTXREQ; inline;
  17553. procedure clearUINC; inline;
  17554. procedure setDONLY; inline;
  17555. procedure setFRESET; inline;
  17556. procedure setRTREN; inline;
  17557. procedure setTXABAT; inline;
  17558. procedure setTXEN; inline;
  17559. procedure setTXERR; inline;
  17560. procedure setTXLARB; inline;
  17561. procedure setTXREQ; inline;
  17562. procedure setUINC; inline;
  17563. property DONLY : TBits_1 read getDONLY write setDONLY;
  17564. property FRESET : TBits_1 read getFRESET write setFRESET;
  17565. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17566. property RTREN : TBits_1 read getRTREN write setRTREN;
  17567. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17568. property TXEN : TBits_1 read getTXEN write setTXEN;
  17569. property TXERR : TBits_1 read getTXERR write setTXERR;
  17570. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17571. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17572. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17573. property UINC : TBits_1 read getUINC write setUINC;
  17574. property w : TBits_32 read getw write setw;
  17575. end;
  17576. TCAN1_C1FIFOINT12 = record
  17577. private
  17578. function getRXFULLIE : TBits_1; inline;
  17579. function getRXFULLIF : TBits_1; inline;
  17580. function getRXHALFIE : TBits_1; inline;
  17581. function getRXHALFIF : TBits_1; inline;
  17582. function getRXNEMPTYIE : TBits_1; inline;
  17583. function getRXNEMPTYIF : TBits_1; inline;
  17584. function getRXOVFLIE : TBits_1; inline;
  17585. function getRXOVFLIF : TBits_1; inline;
  17586. function getTXEMPTYIE : TBits_1; inline;
  17587. function getTXEMPTYIF : TBits_1; inline;
  17588. function getTXHALFIE : TBits_1; inline;
  17589. function getTXHALFIF : TBits_1; inline;
  17590. function getTXNFULLIE : TBits_1; inline;
  17591. function getTXNFULLIF : TBits_1; inline;
  17592. function getw : TBits_32; inline;
  17593. procedure setRXFULLIE(thebits : TBits_1); inline;
  17594. procedure setRXFULLIF(thebits : TBits_1); inline;
  17595. procedure setRXHALFIE(thebits : TBits_1); inline;
  17596. procedure setRXHALFIF(thebits : TBits_1); inline;
  17597. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17598. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17599. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17600. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17601. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17602. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17603. procedure setTXHALFIE(thebits : TBits_1); inline;
  17604. procedure setTXHALFIF(thebits : TBits_1); inline;
  17605. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17606. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17607. procedure setw(thebits : TBits_32); inline;
  17608. public
  17609. procedure clearRXFULLIE; inline;
  17610. procedure clearRXFULLIF; inline;
  17611. procedure clearRXHALFIE; inline;
  17612. procedure clearRXHALFIF; inline;
  17613. procedure clearRXNEMPTYIE; inline;
  17614. procedure clearRXNEMPTYIF; inline;
  17615. procedure clearRXOVFLIE; inline;
  17616. procedure clearRXOVFLIF; inline;
  17617. procedure clearTXEMPTYIE; inline;
  17618. procedure clearTXEMPTYIF; inline;
  17619. procedure clearTXHALFIE; inline;
  17620. procedure clearTXHALFIF; inline;
  17621. procedure clearTXNFULLIE; inline;
  17622. procedure clearTXNFULLIF; inline;
  17623. procedure setRXFULLIE; inline;
  17624. procedure setRXFULLIF; inline;
  17625. procedure setRXHALFIE; inline;
  17626. procedure setRXHALFIF; inline;
  17627. procedure setRXNEMPTYIE; inline;
  17628. procedure setRXNEMPTYIF; inline;
  17629. procedure setRXOVFLIE; inline;
  17630. procedure setRXOVFLIF; inline;
  17631. procedure setTXEMPTYIE; inline;
  17632. procedure setTXEMPTYIF; inline;
  17633. procedure setTXHALFIE; inline;
  17634. procedure setTXHALFIF; inline;
  17635. procedure setTXNFULLIE; inline;
  17636. procedure setTXNFULLIF; inline;
  17637. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17638. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17639. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17640. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17641. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17642. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17643. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17644. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17645. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17646. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17647. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17648. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17649. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17650. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17651. property w : TBits_32 read getw write setw;
  17652. end;
  17653. TCAN1_C1FIFOCI12 = record
  17654. private
  17655. function getCFIFOCI : TBits_5; inline;
  17656. function getw : TBits_32; inline;
  17657. procedure setCFIFOCI(thebits : TBits_5); inline;
  17658. procedure setw(thebits : TBits_32); inline;
  17659. public
  17660. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17661. property w : TBits_32 read getw write setw;
  17662. end;
  17663. TCAN1_C1FIFOCON13 = record
  17664. private
  17665. function getDONLY : TBits_1; inline;
  17666. function getFRESET : TBits_1; inline;
  17667. function getFSIZE : TBits_5; inline;
  17668. function getRTREN : TBits_1; inline;
  17669. function getTXABAT : TBits_1; inline;
  17670. function getTXEN : TBits_1; inline;
  17671. function getTXERR : TBits_1; inline;
  17672. function getTXLARB : TBits_1; inline;
  17673. function getTXPRI : TBits_2; inline;
  17674. function getTXREQ : TBits_1; inline;
  17675. function getUINC : TBits_1; inline;
  17676. function getw : TBits_32; inline;
  17677. procedure setDONLY(thebits : TBits_1); inline;
  17678. procedure setFRESET(thebits : TBits_1); inline;
  17679. procedure setFSIZE(thebits : TBits_5); inline;
  17680. procedure setRTREN(thebits : TBits_1); inline;
  17681. procedure setTXABAT(thebits : TBits_1); inline;
  17682. procedure setTXEN(thebits : TBits_1); inline;
  17683. procedure setTXERR(thebits : TBits_1); inline;
  17684. procedure setTXLARB(thebits : TBits_1); inline;
  17685. procedure setTXPRI(thebits : TBits_2); inline;
  17686. procedure setTXREQ(thebits : TBits_1); inline;
  17687. procedure setUINC(thebits : TBits_1); inline;
  17688. procedure setw(thebits : TBits_32); inline;
  17689. public
  17690. procedure clearDONLY; inline;
  17691. procedure clearFRESET; inline;
  17692. procedure clearRTREN; inline;
  17693. procedure clearTXABAT; inline;
  17694. procedure clearTXEN; inline;
  17695. procedure clearTXERR; inline;
  17696. procedure clearTXLARB; inline;
  17697. procedure clearTXREQ; inline;
  17698. procedure clearUINC; inline;
  17699. procedure setDONLY; inline;
  17700. procedure setFRESET; inline;
  17701. procedure setRTREN; inline;
  17702. procedure setTXABAT; inline;
  17703. procedure setTXEN; inline;
  17704. procedure setTXERR; inline;
  17705. procedure setTXLARB; inline;
  17706. procedure setTXREQ; inline;
  17707. procedure setUINC; inline;
  17708. property DONLY : TBits_1 read getDONLY write setDONLY;
  17709. property FRESET : TBits_1 read getFRESET write setFRESET;
  17710. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17711. property RTREN : TBits_1 read getRTREN write setRTREN;
  17712. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17713. property TXEN : TBits_1 read getTXEN write setTXEN;
  17714. property TXERR : TBits_1 read getTXERR write setTXERR;
  17715. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17716. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17717. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17718. property UINC : TBits_1 read getUINC write setUINC;
  17719. property w : TBits_32 read getw write setw;
  17720. end;
  17721. TCAN1_C1FIFOINT13 = record
  17722. private
  17723. function getRXFULLIE : TBits_1; inline;
  17724. function getRXFULLIF : TBits_1; inline;
  17725. function getRXHALFIE : TBits_1; inline;
  17726. function getRXHALFIF : TBits_1; inline;
  17727. function getRXNEMPTYIE : TBits_1; inline;
  17728. function getRXNEMPTYIF : TBits_1; inline;
  17729. function getRXOVFLIE : TBits_1; inline;
  17730. function getRXOVFLIF : TBits_1; inline;
  17731. function getTXEMPTYIE : TBits_1; inline;
  17732. function getTXEMPTYIF : TBits_1; inline;
  17733. function getTXHALFIE : TBits_1; inline;
  17734. function getTXHALFIF : TBits_1; inline;
  17735. function getTXNFULLIE : TBits_1; inline;
  17736. function getTXNFULLIF : TBits_1; inline;
  17737. function getw : TBits_32; inline;
  17738. procedure setRXFULLIE(thebits : TBits_1); inline;
  17739. procedure setRXFULLIF(thebits : TBits_1); inline;
  17740. procedure setRXHALFIE(thebits : TBits_1); inline;
  17741. procedure setRXHALFIF(thebits : TBits_1); inline;
  17742. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17743. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17744. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17745. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17746. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17747. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17748. procedure setTXHALFIE(thebits : TBits_1); inline;
  17749. procedure setTXHALFIF(thebits : TBits_1); inline;
  17750. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17751. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17752. procedure setw(thebits : TBits_32); inline;
  17753. public
  17754. procedure clearRXFULLIE; inline;
  17755. procedure clearRXFULLIF; inline;
  17756. procedure clearRXHALFIE; inline;
  17757. procedure clearRXHALFIF; inline;
  17758. procedure clearRXNEMPTYIE; inline;
  17759. procedure clearRXNEMPTYIF; inline;
  17760. procedure clearRXOVFLIE; inline;
  17761. procedure clearRXOVFLIF; inline;
  17762. procedure clearTXEMPTYIE; inline;
  17763. procedure clearTXEMPTYIF; inline;
  17764. procedure clearTXHALFIE; inline;
  17765. procedure clearTXHALFIF; inline;
  17766. procedure clearTXNFULLIE; inline;
  17767. procedure clearTXNFULLIF; inline;
  17768. procedure setRXFULLIE; inline;
  17769. procedure setRXFULLIF; inline;
  17770. procedure setRXHALFIE; inline;
  17771. procedure setRXHALFIF; inline;
  17772. procedure setRXNEMPTYIE; inline;
  17773. procedure setRXNEMPTYIF; inline;
  17774. procedure setRXOVFLIE; inline;
  17775. procedure setRXOVFLIF; inline;
  17776. procedure setTXEMPTYIE; inline;
  17777. procedure setTXEMPTYIF; inline;
  17778. procedure setTXHALFIE; inline;
  17779. procedure setTXHALFIF; inline;
  17780. procedure setTXNFULLIE; inline;
  17781. procedure setTXNFULLIF; inline;
  17782. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17783. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17784. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17785. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17786. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17787. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17788. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17789. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17790. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17791. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17792. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17793. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17794. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17795. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17796. property w : TBits_32 read getw write setw;
  17797. end;
  17798. TCAN1_C1FIFOCI13 = record
  17799. private
  17800. function getCFIFOCI : TBits_5; inline;
  17801. function getw : TBits_32; inline;
  17802. procedure setCFIFOCI(thebits : TBits_5); inline;
  17803. procedure setw(thebits : TBits_32); inline;
  17804. public
  17805. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17806. property w : TBits_32 read getw write setw;
  17807. end;
  17808. TCAN1_C1FIFOCON14 = record
  17809. private
  17810. function getDONLY : TBits_1; inline;
  17811. function getFRESET : TBits_1; inline;
  17812. function getFSIZE : TBits_5; inline;
  17813. function getRTREN : TBits_1; inline;
  17814. function getTXABAT : TBits_1; inline;
  17815. function getTXEN : TBits_1; inline;
  17816. function getTXERR : TBits_1; inline;
  17817. function getTXLARB : TBits_1; inline;
  17818. function getTXPRI : TBits_2; inline;
  17819. function getTXREQ : TBits_1; inline;
  17820. function getUINC : TBits_1; inline;
  17821. function getw : TBits_32; inline;
  17822. procedure setDONLY(thebits : TBits_1); inline;
  17823. procedure setFRESET(thebits : TBits_1); inline;
  17824. procedure setFSIZE(thebits : TBits_5); inline;
  17825. procedure setRTREN(thebits : TBits_1); inline;
  17826. procedure setTXABAT(thebits : TBits_1); inline;
  17827. procedure setTXEN(thebits : TBits_1); inline;
  17828. procedure setTXERR(thebits : TBits_1); inline;
  17829. procedure setTXLARB(thebits : TBits_1); inline;
  17830. procedure setTXPRI(thebits : TBits_2); inline;
  17831. procedure setTXREQ(thebits : TBits_1); inline;
  17832. procedure setUINC(thebits : TBits_1); inline;
  17833. procedure setw(thebits : TBits_32); inline;
  17834. public
  17835. procedure clearDONLY; inline;
  17836. procedure clearFRESET; inline;
  17837. procedure clearRTREN; inline;
  17838. procedure clearTXABAT; inline;
  17839. procedure clearTXEN; inline;
  17840. procedure clearTXERR; inline;
  17841. procedure clearTXLARB; inline;
  17842. procedure clearTXREQ; inline;
  17843. procedure clearUINC; inline;
  17844. procedure setDONLY; inline;
  17845. procedure setFRESET; inline;
  17846. procedure setRTREN; inline;
  17847. procedure setTXABAT; inline;
  17848. procedure setTXEN; inline;
  17849. procedure setTXERR; inline;
  17850. procedure setTXLARB; inline;
  17851. procedure setTXREQ; inline;
  17852. procedure setUINC; inline;
  17853. property DONLY : TBits_1 read getDONLY write setDONLY;
  17854. property FRESET : TBits_1 read getFRESET write setFRESET;
  17855. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17856. property RTREN : TBits_1 read getRTREN write setRTREN;
  17857. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17858. property TXEN : TBits_1 read getTXEN write setTXEN;
  17859. property TXERR : TBits_1 read getTXERR write setTXERR;
  17860. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17861. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17862. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17863. property UINC : TBits_1 read getUINC write setUINC;
  17864. property w : TBits_32 read getw write setw;
  17865. end;
  17866. TCAN1_C1FIFOINT14 = record
  17867. private
  17868. function getRXFULLIE : TBits_1; inline;
  17869. function getRXFULLIF : TBits_1; inline;
  17870. function getRXHALFIE : TBits_1; inline;
  17871. function getRXHALFIF : TBits_1; inline;
  17872. function getRXNEMPTYIE : TBits_1; inline;
  17873. function getRXNEMPTYIF : TBits_1; inline;
  17874. function getRXOVFLIE : TBits_1; inline;
  17875. function getRXOVFLIF : TBits_1; inline;
  17876. function getTXEMPTYIE : TBits_1; inline;
  17877. function getTXEMPTYIF : TBits_1; inline;
  17878. function getTXHALFIE : TBits_1; inline;
  17879. function getTXHALFIF : TBits_1; inline;
  17880. function getTXNFULLIE : TBits_1; inline;
  17881. function getTXNFULLIF : TBits_1; inline;
  17882. function getw : TBits_32; inline;
  17883. procedure setRXFULLIE(thebits : TBits_1); inline;
  17884. procedure setRXFULLIF(thebits : TBits_1); inline;
  17885. procedure setRXHALFIE(thebits : TBits_1); inline;
  17886. procedure setRXHALFIF(thebits : TBits_1); inline;
  17887. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17888. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17889. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17890. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17891. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17892. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17893. procedure setTXHALFIE(thebits : TBits_1); inline;
  17894. procedure setTXHALFIF(thebits : TBits_1); inline;
  17895. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17896. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17897. procedure setw(thebits : TBits_32); inline;
  17898. public
  17899. procedure clearRXFULLIE; inline;
  17900. procedure clearRXFULLIF; inline;
  17901. procedure clearRXHALFIE; inline;
  17902. procedure clearRXHALFIF; inline;
  17903. procedure clearRXNEMPTYIE; inline;
  17904. procedure clearRXNEMPTYIF; inline;
  17905. procedure clearRXOVFLIE; inline;
  17906. procedure clearRXOVFLIF; inline;
  17907. procedure clearTXEMPTYIE; inline;
  17908. procedure clearTXEMPTYIF; inline;
  17909. procedure clearTXHALFIE; inline;
  17910. procedure clearTXHALFIF; inline;
  17911. procedure clearTXNFULLIE; inline;
  17912. procedure clearTXNFULLIF; inline;
  17913. procedure setRXFULLIE; inline;
  17914. procedure setRXFULLIF; inline;
  17915. procedure setRXHALFIE; inline;
  17916. procedure setRXHALFIF; inline;
  17917. procedure setRXNEMPTYIE; inline;
  17918. procedure setRXNEMPTYIF; inline;
  17919. procedure setRXOVFLIE; inline;
  17920. procedure setRXOVFLIF; inline;
  17921. procedure setTXEMPTYIE; inline;
  17922. procedure setTXEMPTYIF; inline;
  17923. procedure setTXHALFIE; inline;
  17924. procedure setTXHALFIF; inline;
  17925. procedure setTXNFULLIE; inline;
  17926. procedure setTXNFULLIF; inline;
  17927. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17928. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17929. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17930. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17931. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17932. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17933. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17934. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17935. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17936. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17937. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17938. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17939. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17940. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17941. property w : TBits_32 read getw write setw;
  17942. end;
  17943. TCAN1_C1FIFOCI14 = record
  17944. private
  17945. function getCFIFOCI : TBits_5; inline;
  17946. function getw : TBits_32; inline;
  17947. procedure setCFIFOCI(thebits : TBits_5); inline;
  17948. procedure setw(thebits : TBits_32); inline;
  17949. public
  17950. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17951. property w : TBits_32 read getw write setw;
  17952. end;
  17953. TCAN1_C1FIFOCON15 = record
  17954. private
  17955. function getDONLY : TBits_1; inline;
  17956. function getFRESET : TBits_1; inline;
  17957. function getFSIZE : TBits_5; inline;
  17958. function getRTREN : TBits_1; inline;
  17959. function getTXABAT : TBits_1; inline;
  17960. function getTXEN : TBits_1; inline;
  17961. function getTXERR : TBits_1; inline;
  17962. function getTXLARB : TBits_1; inline;
  17963. function getTXPRI : TBits_2; inline;
  17964. function getTXREQ : TBits_1; inline;
  17965. function getUINC : TBits_1; inline;
  17966. function getw : TBits_32; inline;
  17967. procedure setDONLY(thebits : TBits_1); inline;
  17968. procedure setFRESET(thebits : TBits_1); inline;
  17969. procedure setFSIZE(thebits : TBits_5); inline;
  17970. procedure setRTREN(thebits : TBits_1); inline;
  17971. procedure setTXABAT(thebits : TBits_1); inline;
  17972. procedure setTXEN(thebits : TBits_1); inline;
  17973. procedure setTXERR(thebits : TBits_1); inline;
  17974. procedure setTXLARB(thebits : TBits_1); inline;
  17975. procedure setTXPRI(thebits : TBits_2); inline;
  17976. procedure setTXREQ(thebits : TBits_1); inline;
  17977. procedure setUINC(thebits : TBits_1); inline;
  17978. procedure setw(thebits : TBits_32); inline;
  17979. public
  17980. procedure clearDONLY; inline;
  17981. procedure clearFRESET; inline;
  17982. procedure clearRTREN; inline;
  17983. procedure clearTXABAT; inline;
  17984. procedure clearTXEN; inline;
  17985. procedure clearTXERR; inline;
  17986. procedure clearTXLARB; inline;
  17987. procedure clearTXREQ; inline;
  17988. procedure clearUINC; inline;
  17989. procedure setDONLY; inline;
  17990. procedure setFRESET; inline;
  17991. procedure setRTREN; inline;
  17992. procedure setTXABAT; inline;
  17993. procedure setTXEN; inline;
  17994. procedure setTXERR; inline;
  17995. procedure setTXLARB; inline;
  17996. procedure setTXREQ; inline;
  17997. procedure setUINC; inline;
  17998. property DONLY : TBits_1 read getDONLY write setDONLY;
  17999. property FRESET : TBits_1 read getFRESET write setFRESET;
  18000. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18001. property RTREN : TBits_1 read getRTREN write setRTREN;
  18002. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18003. property TXEN : TBits_1 read getTXEN write setTXEN;
  18004. property TXERR : TBits_1 read getTXERR write setTXERR;
  18005. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18006. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18007. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18008. property UINC : TBits_1 read getUINC write setUINC;
  18009. property w : TBits_32 read getw write setw;
  18010. end;
  18011. TCAN1_C1FIFOINT15 = record
  18012. private
  18013. function getRXFULLIE : TBits_1; inline;
  18014. function getRXFULLIF : TBits_1; inline;
  18015. function getRXHALFIE : TBits_1; inline;
  18016. function getRXHALFIF : TBits_1; inline;
  18017. function getRXNEMPTYIE : TBits_1; inline;
  18018. function getRXNEMPTYIF : TBits_1; inline;
  18019. function getRXOVFLIE : TBits_1; inline;
  18020. function getRXOVFLIF : TBits_1; inline;
  18021. function getTXEMPTYIE : TBits_1; inline;
  18022. function getTXEMPTYIF : TBits_1; inline;
  18023. function getTXHALFIE : TBits_1; inline;
  18024. function getTXHALFIF : TBits_1; inline;
  18025. function getTXNFULLIE : TBits_1; inline;
  18026. function getTXNFULLIF : TBits_1; inline;
  18027. function getw : TBits_32; inline;
  18028. procedure setRXFULLIE(thebits : TBits_1); inline;
  18029. procedure setRXFULLIF(thebits : TBits_1); inline;
  18030. procedure setRXHALFIE(thebits : TBits_1); inline;
  18031. procedure setRXHALFIF(thebits : TBits_1); inline;
  18032. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18033. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18034. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18035. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18036. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18037. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18038. procedure setTXHALFIE(thebits : TBits_1); inline;
  18039. procedure setTXHALFIF(thebits : TBits_1); inline;
  18040. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18041. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18042. procedure setw(thebits : TBits_32); inline;
  18043. public
  18044. procedure clearRXFULLIE; inline;
  18045. procedure clearRXFULLIF; inline;
  18046. procedure clearRXHALFIE; inline;
  18047. procedure clearRXHALFIF; inline;
  18048. procedure clearRXNEMPTYIE; inline;
  18049. procedure clearRXNEMPTYIF; inline;
  18050. procedure clearRXOVFLIE; inline;
  18051. procedure clearRXOVFLIF; inline;
  18052. procedure clearTXEMPTYIE; inline;
  18053. procedure clearTXEMPTYIF; inline;
  18054. procedure clearTXHALFIE; inline;
  18055. procedure clearTXHALFIF; inline;
  18056. procedure clearTXNFULLIE; inline;
  18057. procedure clearTXNFULLIF; inline;
  18058. procedure setRXFULLIE; inline;
  18059. procedure setRXFULLIF; inline;
  18060. procedure setRXHALFIE; inline;
  18061. procedure setRXHALFIF; inline;
  18062. procedure setRXNEMPTYIE; inline;
  18063. procedure setRXNEMPTYIF; inline;
  18064. procedure setRXOVFLIE; inline;
  18065. procedure setRXOVFLIF; inline;
  18066. procedure setTXEMPTYIE; inline;
  18067. procedure setTXEMPTYIF; inline;
  18068. procedure setTXHALFIE; inline;
  18069. procedure setTXHALFIF; inline;
  18070. procedure setTXNFULLIE; inline;
  18071. procedure setTXNFULLIF; inline;
  18072. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18073. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18074. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18075. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18076. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18077. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18078. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18079. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18080. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18081. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18082. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18083. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18084. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18085. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18086. property w : TBits_32 read getw write setw;
  18087. end;
  18088. TCAN1_C1FIFOCI15 = record
  18089. private
  18090. function getCFIFOCI : TBits_5; inline;
  18091. function getw : TBits_32; inline;
  18092. procedure setCFIFOCI(thebits : TBits_5); inline;
  18093. procedure setw(thebits : TBits_32); inline;
  18094. public
  18095. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18096. property w : TBits_32 read getw write setw;
  18097. end;
  18098. TCAN1_C1FIFOCON16 = record
  18099. private
  18100. function getDONLY : TBits_1; inline;
  18101. function getFRESET : TBits_1; inline;
  18102. function getFSIZE : TBits_5; inline;
  18103. function getRTREN : TBits_1; inline;
  18104. function getTXABAT : TBits_1; inline;
  18105. function getTXEN : TBits_1; inline;
  18106. function getTXERR : TBits_1; inline;
  18107. function getTXLARB : TBits_1; inline;
  18108. function getTXPRI : TBits_2; inline;
  18109. function getTXREQ : TBits_1; inline;
  18110. function getUINC : TBits_1; inline;
  18111. function getw : TBits_32; inline;
  18112. procedure setDONLY(thebits : TBits_1); inline;
  18113. procedure setFRESET(thebits : TBits_1); inline;
  18114. procedure setFSIZE(thebits : TBits_5); inline;
  18115. procedure setRTREN(thebits : TBits_1); inline;
  18116. procedure setTXABAT(thebits : TBits_1); inline;
  18117. procedure setTXEN(thebits : TBits_1); inline;
  18118. procedure setTXERR(thebits : TBits_1); inline;
  18119. procedure setTXLARB(thebits : TBits_1); inline;
  18120. procedure setTXPRI(thebits : TBits_2); inline;
  18121. procedure setTXREQ(thebits : TBits_1); inline;
  18122. procedure setUINC(thebits : TBits_1); inline;
  18123. procedure setw(thebits : TBits_32); inline;
  18124. public
  18125. procedure clearDONLY; inline;
  18126. procedure clearFRESET; inline;
  18127. procedure clearRTREN; inline;
  18128. procedure clearTXABAT; inline;
  18129. procedure clearTXEN; inline;
  18130. procedure clearTXERR; inline;
  18131. procedure clearTXLARB; inline;
  18132. procedure clearTXREQ; inline;
  18133. procedure clearUINC; inline;
  18134. procedure setDONLY; inline;
  18135. procedure setFRESET; inline;
  18136. procedure setRTREN; inline;
  18137. procedure setTXABAT; inline;
  18138. procedure setTXEN; inline;
  18139. procedure setTXERR; inline;
  18140. procedure setTXLARB; inline;
  18141. procedure setTXREQ; inline;
  18142. procedure setUINC; inline;
  18143. property DONLY : TBits_1 read getDONLY write setDONLY;
  18144. property FRESET : TBits_1 read getFRESET write setFRESET;
  18145. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18146. property RTREN : TBits_1 read getRTREN write setRTREN;
  18147. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18148. property TXEN : TBits_1 read getTXEN write setTXEN;
  18149. property TXERR : TBits_1 read getTXERR write setTXERR;
  18150. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18151. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18152. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18153. property UINC : TBits_1 read getUINC write setUINC;
  18154. property w : TBits_32 read getw write setw;
  18155. end;
  18156. TCAN1_C1FIFOINT16 = record
  18157. private
  18158. function getRXFULLIE : TBits_1; inline;
  18159. function getRXFULLIF : TBits_1; inline;
  18160. function getRXHALFIE : TBits_1; inline;
  18161. function getRXHALFIF : TBits_1; inline;
  18162. function getRXNEMPTYIE : TBits_1; inline;
  18163. function getRXNEMPTYIF : TBits_1; inline;
  18164. function getRXOVFLIE : TBits_1; inline;
  18165. function getRXOVFLIF : TBits_1; inline;
  18166. function getTXEMPTYIE : TBits_1; inline;
  18167. function getTXEMPTYIF : TBits_1; inline;
  18168. function getTXHALFIE : TBits_1; inline;
  18169. function getTXHALFIF : TBits_1; inline;
  18170. function getTXNFULLIE : TBits_1; inline;
  18171. function getTXNFULLIF : TBits_1; inline;
  18172. function getw : TBits_32; inline;
  18173. procedure setRXFULLIE(thebits : TBits_1); inline;
  18174. procedure setRXFULLIF(thebits : TBits_1); inline;
  18175. procedure setRXHALFIE(thebits : TBits_1); inline;
  18176. procedure setRXHALFIF(thebits : TBits_1); inline;
  18177. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18178. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18179. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18180. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18181. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18182. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18183. procedure setTXHALFIE(thebits : TBits_1); inline;
  18184. procedure setTXHALFIF(thebits : TBits_1); inline;
  18185. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18186. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18187. procedure setw(thebits : TBits_32); inline;
  18188. public
  18189. procedure clearRXFULLIE; inline;
  18190. procedure clearRXFULLIF; inline;
  18191. procedure clearRXHALFIE; inline;
  18192. procedure clearRXHALFIF; inline;
  18193. procedure clearRXNEMPTYIE; inline;
  18194. procedure clearRXNEMPTYIF; inline;
  18195. procedure clearRXOVFLIE; inline;
  18196. procedure clearRXOVFLIF; inline;
  18197. procedure clearTXEMPTYIE; inline;
  18198. procedure clearTXEMPTYIF; inline;
  18199. procedure clearTXHALFIE; inline;
  18200. procedure clearTXHALFIF; inline;
  18201. procedure clearTXNFULLIE; inline;
  18202. procedure clearTXNFULLIF; inline;
  18203. procedure setRXFULLIE; inline;
  18204. procedure setRXFULLIF; inline;
  18205. procedure setRXHALFIE; inline;
  18206. procedure setRXHALFIF; inline;
  18207. procedure setRXNEMPTYIE; inline;
  18208. procedure setRXNEMPTYIF; inline;
  18209. procedure setRXOVFLIE; inline;
  18210. procedure setRXOVFLIF; inline;
  18211. procedure setTXEMPTYIE; inline;
  18212. procedure setTXEMPTYIF; inline;
  18213. procedure setTXHALFIE; inline;
  18214. procedure setTXHALFIF; inline;
  18215. procedure setTXNFULLIE; inline;
  18216. procedure setTXNFULLIF; inline;
  18217. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18218. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18219. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18220. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18221. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18222. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18223. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18224. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18225. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18226. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18227. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18228. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18229. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18230. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18231. property w : TBits_32 read getw write setw;
  18232. end;
  18233. TCAN1_C1FIFOCI16 = record
  18234. private
  18235. function getCFIFOCI : TBits_5; inline;
  18236. function getw : TBits_32; inline;
  18237. procedure setCFIFOCI(thebits : TBits_5); inline;
  18238. procedure setw(thebits : TBits_32); inline;
  18239. public
  18240. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18241. property w : TBits_32 read getw write setw;
  18242. end;
  18243. TCAN1_C1FIFOCON17 = record
  18244. private
  18245. function getDONLY : TBits_1; inline;
  18246. function getFRESET : TBits_1; inline;
  18247. function getFSIZE : TBits_5; inline;
  18248. function getRTREN : TBits_1; inline;
  18249. function getTXABAT : TBits_1; inline;
  18250. function getTXEN : TBits_1; inline;
  18251. function getTXERR : TBits_1; inline;
  18252. function getTXLARB : TBits_1; inline;
  18253. function getTXPRI : TBits_2; inline;
  18254. function getTXREQ : TBits_1; inline;
  18255. function getUINC : TBits_1; inline;
  18256. function getw : TBits_32; inline;
  18257. procedure setDONLY(thebits : TBits_1); inline;
  18258. procedure setFRESET(thebits : TBits_1); inline;
  18259. procedure setFSIZE(thebits : TBits_5); inline;
  18260. procedure setRTREN(thebits : TBits_1); inline;
  18261. procedure setTXABAT(thebits : TBits_1); inline;
  18262. procedure setTXEN(thebits : TBits_1); inline;
  18263. procedure setTXERR(thebits : TBits_1); inline;
  18264. procedure setTXLARB(thebits : TBits_1); inline;
  18265. procedure setTXPRI(thebits : TBits_2); inline;
  18266. procedure setTXREQ(thebits : TBits_1); inline;
  18267. procedure setUINC(thebits : TBits_1); inline;
  18268. procedure setw(thebits : TBits_32); inline;
  18269. public
  18270. procedure clearDONLY; inline;
  18271. procedure clearFRESET; inline;
  18272. procedure clearRTREN; inline;
  18273. procedure clearTXABAT; inline;
  18274. procedure clearTXEN; inline;
  18275. procedure clearTXERR; inline;
  18276. procedure clearTXLARB; inline;
  18277. procedure clearTXREQ; inline;
  18278. procedure clearUINC; inline;
  18279. procedure setDONLY; inline;
  18280. procedure setFRESET; inline;
  18281. procedure setRTREN; inline;
  18282. procedure setTXABAT; inline;
  18283. procedure setTXEN; inline;
  18284. procedure setTXERR; inline;
  18285. procedure setTXLARB; inline;
  18286. procedure setTXREQ; inline;
  18287. procedure setUINC; inline;
  18288. property DONLY : TBits_1 read getDONLY write setDONLY;
  18289. property FRESET : TBits_1 read getFRESET write setFRESET;
  18290. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18291. property RTREN : TBits_1 read getRTREN write setRTREN;
  18292. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18293. property TXEN : TBits_1 read getTXEN write setTXEN;
  18294. property TXERR : TBits_1 read getTXERR write setTXERR;
  18295. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18296. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18297. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18298. property UINC : TBits_1 read getUINC write setUINC;
  18299. property w : TBits_32 read getw write setw;
  18300. end;
  18301. TCAN1_C1FIFOINT17 = record
  18302. private
  18303. function getRXFULLIE : TBits_1; inline;
  18304. function getRXFULLIF : TBits_1; inline;
  18305. function getRXHALFIE : TBits_1; inline;
  18306. function getRXHALFIF : TBits_1; inline;
  18307. function getRXNEMPTYIE : TBits_1; inline;
  18308. function getRXNEMPTYIF : TBits_1; inline;
  18309. function getRXOVFLIE : TBits_1; inline;
  18310. function getRXOVFLIF : TBits_1; inline;
  18311. function getTXEMPTYIE : TBits_1; inline;
  18312. function getTXEMPTYIF : TBits_1; inline;
  18313. function getTXHALFIE : TBits_1; inline;
  18314. function getTXHALFIF : TBits_1; inline;
  18315. function getTXNFULLIE : TBits_1; inline;
  18316. function getTXNFULLIF : TBits_1; inline;
  18317. function getw : TBits_32; inline;
  18318. procedure setRXFULLIE(thebits : TBits_1); inline;
  18319. procedure setRXFULLIF(thebits : TBits_1); inline;
  18320. procedure setRXHALFIE(thebits : TBits_1); inline;
  18321. procedure setRXHALFIF(thebits : TBits_1); inline;
  18322. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18323. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18324. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18325. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18326. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18327. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18328. procedure setTXHALFIE(thebits : TBits_1); inline;
  18329. procedure setTXHALFIF(thebits : TBits_1); inline;
  18330. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18331. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18332. procedure setw(thebits : TBits_32); inline;
  18333. public
  18334. procedure clearRXFULLIE; inline;
  18335. procedure clearRXFULLIF; inline;
  18336. procedure clearRXHALFIE; inline;
  18337. procedure clearRXHALFIF; inline;
  18338. procedure clearRXNEMPTYIE; inline;
  18339. procedure clearRXNEMPTYIF; inline;
  18340. procedure clearRXOVFLIE; inline;
  18341. procedure clearRXOVFLIF; inline;
  18342. procedure clearTXEMPTYIE; inline;
  18343. procedure clearTXEMPTYIF; inline;
  18344. procedure clearTXHALFIE; inline;
  18345. procedure clearTXHALFIF; inline;
  18346. procedure clearTXNFULLIE; inline;
  18347. procedure clearTXNFULLIF; inline;
  18348. procedure setRXFULLIE; inline;
  18349. procedure setRXFULLIF; inline;
  18350. procedure setRXHALFIE; inline;
  18351. procedure setRXHALFIF; inline;
  18352. procedure setRXNEMPTYIE; inline;
  18353. procedure setRXNEMPTYIF; inline;
  18354. procedure setRXOVFLIE; inline;
  18355. procedure setRXOVFLIF; inline;
  18356. procedure setTXEMPTYIE; inline;
  18357. procedure setTXEMPTYIF; inline;
  18358. procedure setTXHALFIE; inline;
  18359. procedure setTXHALFIF; inline;
  18360. procedure setTXNFULLIE; inline;
  18361. procedure setTXNFULLIF; inline;
  18362. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18363. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18364. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18365. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18366. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18367. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18368. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18369. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18370. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18371. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18372. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18373. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18374. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18375. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18376. property w : TBits_32 read getw write setw;
  18377. end;
  18378. TCAN1_C1FIFOCI17 = record
  18379. private
  18380. function getCFIFOCI : TBits_5; inline;
  18381. function getw : TBits_32; inline;
  18382. procedure setCFIFOCI(thebits : TBits_5); inline;
  18383. procedure setw(thebits : TBits_32); inline;
  18384. public
  18385. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18386. property w : TBits_32 read getw write setw;
  18387. end;
  18388. TCAN1_C1FIFOCON18 = record
  18389. private
  18390. function getDONLY : TBits_1; inline;
  18391. function getFRESET : TBits_1; inline;
  18392. function getFSIZE : TBits_5; inline;
  18393. function getRTREN : TBits_1; inline;
  18394. function getTXABAT : TBits_1; inline;
  18395. function getTXEN : TBits_1; inline;
  18396. function getTXERR : TBits_1; inline;
  18397. function getTXLARB : TBits_1; inline;
  18398. function getTXPRI : TBits_2; inline;
  18399. function getTXREQ : TBits_1; inline;
  18400. function getUINC : TBits_1; inline;
  18401. function getw : TBits_32; inline;
  18402. procedure setDONLY(thebits : TBits_1); inline;
  18403. procedure setFRESET(thebits : TBits_1); inline;
  18404. procedure setFSIZE(thebits : TBits_5); inline;
  18405. procedure setRTREN(thebits : TBits_1); inline;
  18406. procedure setTXABAT(thebits : TBits_1); inline;
  18407. procedure setTXEN(thebits : TBits_1); inline;
  18408. procedure setTXERR(thebits : TBits_1); inline;
  18409. procedure setTXLARB(thebits : TBits_1); inline;
  18410. procedure setTXPRI(thebits : TBits_2); inline;
  18411. procedure setTXREQ(thebits : TBits_1); inline;
  18412. procedure setUINC(thebits : TBits_1); inline;
  18413. procedure setw(thebits : TBits_32); inline;
  18414. public
  18415. procedure clearDONLY; inline;
  18416. procedure clearFRESET; inline;
  18417. procedure clearRTREN; inline;
  18418. procedure clearTXABAT; inline;
  18419. procedure clearTXEN; inline;
  18420. procedure clearTXERR; inline;
  18421. procedure clearTXLARB; inline;
  18422. procedure clearTXREQ; inline;
  18423. procedure clearUINC; inline;
  18424. procedure setDONLY; inline;
  18425. procedure setFRESET; inline;
  18426. procedure setRTREN; inline;
  18427. procedure setTXABAT; inline;
  18428. procedure setTXEN; inline;
  18429. procedure setTXERR; inline;
  18430. procedure setTXLARB; inline;
  18431. procedure setTXREQ; inline;
  18432. procedure setUINC; inline;
  18433. property DONLY : TBits_1 read getDONLY write setDONLY;
  18434. property FRESET : TBits_1 read getFRESET write setFRESET;
  18435. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18436. property RTREN : TBits_1 read getRTREN write setRTREN;
  18437. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18438. property TXEN : TBits_1 read getTXEN write setTXEN;
  18439. property TXERR : TBits_1 read getTXERR write setTXERR;
  18440. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18441. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18442. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18443. property UINC : TBits_1 read getUINC write setUINC;
  18444. property w : TBits_32 read getw write setw;
  18445. end;
  18446. TCAN1_C1FIFOINT18 = record
  18447. private
  18448. function getRXFULLIE : TBits_1; inline;
  18449. function getRXFULLIF : TBits_1; inline;
  18450. function getRXHALFIE : TBits_1; inline;
  18451. function getRXHALFIF : TBits_1; inline;
  18452. function getRXNEMPTYIE : TBits_1; inline;
  18453. function getRXNEMPTYIF : TBits_1; inline;
  18454. function getRXOVFLIE : TBits_1; inline;
  18455. function getRXOVFLIF : TBits_1; inline;
  18456. function getTXEMPTYIE : TBits_1; inline;
  18457. function getTXEMPTYIF : TBits_1; inline;
  18458. function getTXHALFIE : TBits_1; inline;
  18459. function getTXHALFIF : TBits_1; inline;
  18460. function getTXNFULLIE : TBits_1; inline;
  18461. function getTXNFULLIF : TBits_1; inline;
  18462. function getw : TBits_32; inline;
  18463. procedure setRXFULLIE(thebits : TBits_1); inline;
  18464. procedure setRXFULLIF(thebits : TBits_1); inline;
  18465. procedure setRXHALFIE(thebits : TBits_1); inline;
  18466. procedure setRXHALFIF(thebits : TBits_1); inline;
  18467. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18468. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18469. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18470. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18471. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18472. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18473. procedure setTXHALFIE(thebits : TBits_1); inline;
  18474. procedure setTXHALFIF(thebits : TBits_1); inline;
  18475. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18476. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18477. procedure setw(thebits : TBits_32); inline;
  18478. public
  18479. procedure clearRXFULLIE; inline;
  18480. procedure clearRXFULLIF; inline;
  18481. procedure clearRXHALFIE; inline;
  18482. procedure clearRXHALFIF; inline;
  18483. procedure clearRXNEMPTYIE; inline;
  18484. procedure clearRXNEMPTYIF; inline;
  18485. procedure clearRXOVFLIE; inline;
  18486. procedure clearRXOVFLIF; inline;
  18487. procedure clearTXEMPTYIE; inline;
  18488. procedure clearTXEMPTYIF; inline;
  18489. procedure clearTXHALFIE; inline;
  18490. procedure clearTXHALFIF; inline;
  18491. procedure clearTXNFULLIE; inline;
  18492. procedure clearTXNFULLIF; inline;
  18493. procedure setRXFULLIE; inline;
  18494. procedure setRXFULLIF; inline;
  18495. procedure setRXHALFIE; inline;
  18496. procedure setRXHALFIF; inline;
  18497. procedure setRXNEMPTYIE; inline;
  18498. procedure setRXNEMPTYIF; inline;
  18499. procedure setRXOVFLIE; inline;
  18500. procedure setRXOVFLIF; inline;
  18501. procedure setTXEMPTYIE; inline;
  18502. procedure setTXEMPTYIF; inline;
  18503. procedure setTXHALFIE; inline;
  18504. procedure setTXHALFIF; inline;
  18505. procedure setTXNFULLIE; inline;
  18506. procedure setTXNFULLIF; inline;
  18507. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18508. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18509. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18510. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18511. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18512. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18513. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18514. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18515. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18516. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18517. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18518. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18519. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18520. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18521. property w : TBits_32 read getw write setw;
  18522. end;
  18523. TCAN1_C1FIFOCI18 = record
  18524. private
  18525. function getCFIFOCI : TBits_5; inline;
  18526. function getw : TBits_32; inline;
  18527. procedure setCFIFOCI(thebits : TBits_5); inline;
  18528. procedure setw(thebits : TBits_32); inline;
  18529. public
  18530. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18531. property w : TBits_32 read getw write setw;
  18532. end;
  18533. TCAN1_C1FIFOCON19 = record
  18534. private
  18535. function getDONLY : TBits_1; inline;
  18536. function getFRESET : TBits_1; inline;
  18537. function getFSIZE : TBits_5; inline;
  18538. function getRTREN : TBits_1; inline;
  18539. function getTXABAT : TBits_1; inline;
  18540. function getTXEN : TBits_1; inline;
  18541. function getTXERR : TBits_1; inline;
  18542. function getTXLARB : TBits_1; inline;
  18543. function getTXPRI : TBits_2; inline;
  18544. function getTXREQ : TBits_1; inline;
  18545. function getUINC : TBits_1; inline;
  18546. function getw : TBits_32; inline;
  18547. procedure setDONLY(thebits : TBits_1); inline;
  18548. procedure setFRESET(thebits : TBits_1); inline;
  18549. procedure setFSIZE(thebits : TBits_5); inline;
  18550. procedure setRTREN(thebits : TBits_1); inline;
  18551. procedure setTXABAT(thebits : TBits_1); inline;
  18552. procedure setTXEN(thebits : TBits_1); inline;
  18553. procedure setTXERR(thebits : TBits_1); inline;
  18554. procedure setTXLARB(thebits : TBits_1); inline;
  18555. procedure setTXPRI(thebits : TBits_2); inline;
  18556. procedure setTXREQ(thebits : TBits_1); inline;
  18557. procedure setUINC(thebits : TBits_1); inline;
  18558. procedure setw(thebits : TBits_32); inline;
  18559. public
  18560. procedure clearDONLY; inline;
  18561. procedure clearFRESET; inline;
  18562. procedure clearRTREN; inline;
  18563. procedure clearTXABAT; inline;
  18564. procedure clearTXEN; inline;
  18565. procedure clearTXERR; inline;
  18566. procedure clearTXLARB; inline;
  18567. procedure clearTXREQ; inline;
  18568. procedure clearUINC; inline;
  18569. procedure setDONLY; inline;
  18570. procedure setFRESET; inline;
  18571. procedure setRTREN; inline;
  18572. procedure setTXABAT; inline;
  18573. procedure setTXEN; inline;
  18574. procedure setTXERR; inline;
  18575. procedure setTXLARB; inline;
  18576. procedure setTXREQ; inline;
  18577. procedure setUINC; inline;
  18578. property DONLY : TBits_1 read getDONLY write setDONLY;
  18579. property FRESET : TBits_1 read getFRESET write setFRESET;
  18580. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18581. property RTREN : TBits_1 read getRTREN write setRTREN;
  18582. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18583. property TXEN : TBits_1 read getTXEN write setTXEN;
  18584. property TXERR : TBits_1 read getTXERR write setTXERR;
  18585. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18586. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18587. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18588. property UINC : TBits_1 read getUINC write setUINC;
  18589. property w : TBits_32 read getw write setw;
  18590. end;
  18591. TCAN1_C1FIFOINT19 = record
  18592. private
  18593. function getRXFULLIE : TBits_1; inline;
  18594. function getRXFULLIF : TBits_1; inline;
  18595. function getRXHALFIE : TBits_1; inline;
  18596. function getRXHALFIF : TBits_1; inline;
  18597. function getRXNEMPTYIE : TBits_1; inline;
  18598. function getRXNEMPTYIF : TBits_1; inline;
  18599. function getRXOVFLIE : TBits_1; inline;
  18600. function getRXOVFLIF : TBits_1; inline;
  18601. function getTXEMPTYIE : TBits_1; inline;
  18602. function getTXEMPTYIF : TBits_1; inline;
  18603. function getTXHALFIE : TBits_1; inline;
  18604. function getTXHALFIF : TBits_1; inline;
  18605. function getTXNFULLIE : TBits_1; inline;
  18606. function getTXNFULLIF : TBits_1; inline;
  18607. function getw : TBits_32; inline;
  18608. procedure setRXFULLIE(thebits : TBits_1); inline;
  18609. procedure setRXFULLIF(thebits : TBits_1); inline;
  18610. procedure setRXHALFIE(thebits : TBits_1); inline;
  18611. procedure setRXHALFIF(thebits : TBits_1); inline;
  18612. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18613. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18614. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18615. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18616. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18617. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18618. procedure setTXHALFIE(thebits : TBits_1); inline;
  18619. procedure setTXHALFIF(thebits : TBits_1); inline;
  18620. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18621. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18622. procedure setw(thebits : TBits_32); inline;
  18623. public
  18624. procedure clearRXFULLIE; inline;
  18625. procedure clearRXFULLIF; inline;
  18626. procedure clearRXHALFIE; inline;
  18627. procedure clearRXHALFIF; inline;
  18628. procedure clearRXNEMPTYIE; inline;
  18629. procedure clearRXNEMPTYIF; inline;
  18630. procedure clearRXOVFLIE; inline;
  18631. procedure clearRXOVFLIF; inline;
  18632. procedure clearTXEMPTYIE; inline;
  18633. procedure clearTXEMPTYIF; inline;
  18634. procedure clearTXHALFIE; inline;
  18635. procedure clearTXHALFIF; inline;
  18636. procedure clearTXNFULLIE; inline;
  18637. procedure clearTXNFULLIF; inline;
  18638. procedure setRXFULLIE; inline;
  18639. procedure setRXFULLIF; inline;
  18640. procedure setRXHALFIE; inline;
  18641. procedure setRXHALFIF; inline;
  18642. procedure setRXNEMPTYIE; inline;
  18643. procedure setRXNEMPTYIF; inline;
  18644. procedure setRXOVFLIE; inline;
  18645. procedure setRXOVFLIF; inline;
  18646. procedure setTXEMPTYIE; inline;
  18647. procedure setTXEMPTYIF; inline;
  18648. procedure setTXHALFIE; inline;
  18649. procedure setTXHALFIF; inline;
  18650. procedure setTXNFULLIE; inline;
  18651. procedure setTXNFULLIF; inline;
  18652. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18653. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18654. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18655. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18656. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18657. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18658. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18659. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18660. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18661. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18662. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18663. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18664. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18665. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18666. property w : TBits_32 read getw write setw;
  18667. end;
  18668. TCAN1_C1FIFOCI19 = record
  18669. private
  18670. function getCFIFOCI : TBits_5; inline;
  18671. function getw : TBits_32; inline;
  18672. procedure setCFIFOCI(thebits : TBits_5); inline;
  18673. procedure setw(thebits : TBits_32); inline;
  18674. public
  18675. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18676. property w : TBits_32 read getw write setw;
  18677. end;
  18678. TCAN1_C1FIFOCON20 = record
  18679. private
  18680. function getDONLY : TBits_1; inline;
  18681. function getFRESET : TBits_1; inline;
  18682. function getFSIZE : TBits_5; inline;
  18683. function getRTREN : TBits_1; inline;
  18684. function getTXABAT : TBits_1; inline;
  18685. function getTXEN : TBits_1; inline;
  18686. function getTXERR : TBits_1; inline;
  18687. function getTXLARB : TBits_1; inline;
  18688. function getTXPRI : TBits_2; inline;
  18689. function getTXREQ : TBits_1; inline;
  18690. function getUINC : TBits_1; inline;
  18691. function getw : TBits_32; inline;
  18692. procedure setDONLY(thebits : TBits_1); inline;
  18693. procedure setFRESET(thebits : TBits_1); inline;
  18694. procedure setFSIZE(thebits : TBits_5); inline;
  18695. procedure setRTREN(thebits : TBits_1); inline;
  18696. procedure setTXABAT(thebits : TBits_1); inline;
  18697. procedure setTXEN(thebits : TBits_1); inline;
  18698. procedure setTXERR(thebits : TBits_1); inline;
  18699. procedure setTXLARB(thebits : TBits_1); inline;
  18700. procedure setTXPRI(thebits : TBits_2); inline;
  18701. procedure setTXREQ(thebits : TBits_1); inline;
  18702. procedure setUINC(thebits : TBits_1); inline;
  18703. procedure setw(thebits : TBits_32); inline;
  18704. public
  18705. procedure clearDONLY; inline;
  18706. procedure clearFRESET; inline;
  18707. procedure clearRTREN; inline;
  18708. procedure clearTXABAT; inline;
  18709. procedure clearTXEN; inline;
  18710. procedure clearTXERR; inline;
  18711. procedure clearTXLARB; inline;
  18712. procedure clearTXREQ; inline;
  18713. procedure clearUINC; inline;
  18714. procedure setDONLY; inline;
  18715. procedure setFRESET; inline;
  18716. procedure setRTREN; inline;
  18717. procedure setTXABAT; inline;
  18718. procedure setTXEN; inline;
  18719. procedure setTXERR; inline;
  18720. procedure setTXLARB; inline;
  18721. procedure setTXREQ; inline;
  18722. procedure setUINC; inline;
  18723. property DONLY : TBits_1 read getDONLY write setDONLY;
  18724. property FRESET : TBits_1 read getFRESET write setFRESET;
  18725. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18726. property RTREN : TBits_1 read getRTREN write setRTREN;
  18727. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18728. property TXEN : TBits_1 read getTXEN write setTXEN;
  18729. property TXERR : TBits_1 read getTXERR write setTXERR;
  18730. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18731. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18732. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18733. property UINC : TBits_1 read getUINC write setUINC;
  18734. property w : TBits_32 read getw write setw;
  18735. end;
  18736. TCAN1_C1FIFOINT20 = record
  18737. private
  18738. function getRXFULLIE : TBits_1; inline;
  18739. function getRXFULLIF : TBits_1; inline;
  18740. function getRXHALFIE : TBits_1; inline;
  18741. function getRXHALFIF : TBits_1; inline;
  18742. function getRXNEMPTYIE : TBits_1; inline;
  18743. function getRXNEMPTYIF : TBits_1; inline;
  18744. function getRXOVFLIE : TBits_1; inline;
  18745. function getRXOVFLIF : TBits_1; inline;
  18746. function getTXEMPTYIE : TBits_1; inline;
  18747. function getTXEMPTYIF : TBits_1; inline;
  18748. function getTXHALFIE : TBits_1; inline;
  18749. function getTXHALFIF : TBits_1; inline;
  18750. function getTXNFULLIE : TBits_1; inline;
  18751. function getTXNFULLIF : TBits_1; inline;
  18752. function getw : TBits_32; inline;
  18753. procedure setRXFULLIE(thebits : TBits_1); inline;
  18754. procedure setRXFULLIF(thebits : TBits_1); inline;
  18755. procedure setRXHALFIE(thebits : TBits_1); inline;
  18756. procedure setRXHALFIF(thebits : TBits_1); inline;
  18757. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18758. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18759. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18760. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18761. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18762. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18763. procedure setTXHALFIE(thebits : TBits_1); inline;
  18764. procedure setTXHALFIF(thebits : TBits_1); inline;
  18765. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18766. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18767. procedure setw(thebits : TBits_32); inline;
  18768. public
  18769. procedure clearRXFULLIE; inline;
  18770. procedure clearRXFULLIF; inline;
  18771. procedure clearRXHALFIE; inline;
  18772. procedure clearRXHALFIF; inline;
  18773. procedure clearRXNEMPTYIE; inline;
  18774. procedure clearRXNEMPTYIF; inline;
  18775. procedure clearRXOVFLIE; inline;
  18776. procedure clearRXOVFLIF; inline;
  18777. procedure clearTXEMPTYIE; inline;
  18778. procedure clearTXEMPTYIF; inline;
  18779. procedure clearTXHALFIE; inline;
  18780. procedure clearTXHALFIF; inline;
  18781. procedure clearTXNFULLIE; inline;
  18782. procedure clearTXNFULLIF; inline;
  18783. procedure setRXFULLIE; inline;
  18784. procedure setRXFULLIF; inline;
  18785. procedure setRXHALFIE; inline;
  18786. procedure setRXHALFIF; inline;
  18787. procedure setRXNEMPTYIE; inline;
  18788. procedure setRXNEMPTYIF; inline;
  18789. procedure setRXOVFLIE; inline;
  18790. procedure setRXOVFLIF; inline;
  18791. procedure setTXEMPTYIE; inline;
  18792. procedure setTXEMPTYIF; inline;
  18793. procedure setTXHALFIE; inline;
  18794. procedure setTXHALFIF; inline;
  18795. procedure setTXNFULLIE; inline;
  18796. procedure setTXNFULLIF; inline;
  18797. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18798. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18799. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18800. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18801. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18802. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18803. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18804. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18805. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18806. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18807. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18808. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18809. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18810. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18811. property w : TBits_32 read getw write setw;
  18812. end;
  18813. TCAN1_C1FIFOCI20 = record
  18814. private
  18815. function getCFIFOCI : TBits_5; inline;
  18816. function getw : TBits_32; inline;
  18817. procedure setCFIFOCI(thebits : TBits_5); inline;
  18818. procedure setw(thebits : TBits_32); inline;
  18819. public
  18820. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18821. property w : TBits_32 read getw write setw;
  18822. end;
  18823. TCAN1_C1FIFOCON21 = record
  18824. private
  18825. function getDONLY : TBits_1; inline;
  18826. function getFRESET : TBits_1; inline;
  18827. function getFSIZE : TBits_5; inline;
  18828. function getRTREN : TBits_1; inline;
  18829. function getTXABAT : TBits_1; inline;
  18830. function getTXEN : TBits_1; inline;
  18831. function getTXERR : TBits_1; inline;
  18832. function getTXLARB : TBits_1; inline;
  18833. function getTXPRI : TBits_2; inline;
  18834. function getTXREQ : TBits_1; inline;
  18835. function getUINC : TBits_1; inline;
  18836. function getw : TBits_32; inline;
  18837. procedure setDONLY(thebits : TBits_1); inline;
  18838. procedure setFRESET(thebits : TBits_1); inline;
  18839. procedure setFSIZE(thebits : TBits_5); inline;
  18840. procedure setRTREN(thebits : TBits_1); inline;
  18841. procedure setTXABAT(thebits : TBits_1); inline;
  18842. procedure setTXEN(thebits : TBits_1); inline;
  18843. procedure setTXERR(thebits : TBits_1); inline;
  18844. procedure setTXLARB(thebits : TBits_1); inline;
  18845. procedure setTXPRI(thebits : TBits_2); inline;
  18846. procedure setTXREQ(thebits : TBits_1); inline;
  18847. procedure setUINC(thebits : TBits_1); inline;
  18848. procedure setw(thebits : TBits_32); inline;
  18849. public
  18850. procedure clearDONLY; inline;
  18851. procedure clearFRESET; inline;
  18852. procedure clearRTREN; inline;
  18853. procedure clearTXABAT; inline;
  18854. procedure clearTXEN; inline;
  18855. procedure clearTXERR; inline;
  18856. procedure clearTXLARB; inline;
  18857. procedure clearTXREQ; inline;
  18858. procedure clearUINC; inline;
  18859. procedure setDONLY; inline;
  18860. procedure setFRESET; inline;
  18861. procedure setRTREN; inline;
  18862. procedure setTXABAT; inline;
  18863. procedure setTXEN; inline;
  18864. procedure setTXERR; inline;
  18865. procedure setTXLARB; inline;
  18866. procedure setTXREQ; inline;
  18867. procedure setUINC; inline;
  18868. property DONLY : TBits_1 read getDONLY write setDONLY;
  18869. property FRESET : TBits_1 read getFRESET write setFRESET;
  18870. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18871. property RTREN : TBits_1 read getRTREN write setRTREN;
  18872. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18873. property TXEN : TBits_1 read getTXEN write setTXEN;
  18874. property TXERR : TBits_1 read getTXERR write setTXERR;
  18875. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18876. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18877. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18878. property UINC : TBits_1 read getUINC write setUINC;
  18879. property w : TBits_32 read getw write setw;
  18880. end;
  18881. TCAN1_C1FIFOINT21 = record
  18882. private
  18883. function getRXFULLIE : TBits_1; inline;
  18884. function getRXFULLIF : TBits_1; inline;
  18885. function getRXHALFIE : TBits_1; inline;
  18886. function getRXHALFIF : TBits_1; inline;
  18887. function getRXNEMPTYIE : TBits_1; inline;
  18888. function getRXNEMPTYIF : TBits_1; inline;
  18889. function getRXOVFLIE : TBits_1; inline;
  18890. function getRXOVFLIF : TBits_1; inline;
  18891. function getTXEMPTYIE : TBits_1; inline;
  18892. function getTXEMPTYIF : TBits_1; inline;
  18893. function getTXHALFIE : TBits_1; inline;
  18894. function getTXHALFIF : TBits_1; inline;
  18895. function getTXNFULLIE : TBits_1; inline;
  18896. function getTXNFULLIF : TBits_1; inline;
  18897. function getw : TBits_32; inline;
  18898. procedure setRXFULLIE(thebits : TBits_1); inline;
  18899. procedure setRXFULLIF(thebits : TBits_1); inline;
  18900. procedure setRXHALFIE(thebits : TBits_1); inline;
  18901. procedure setRXHALFIF(thebits : TBits_1); inline;
  18902. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18903. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18904. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18905. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18906. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18907. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18908. procedure setTXHALFIE(thebits : TBits_1); inline;
  18909. procedure setTXHALFIF(thebits : TBits_1); inline;
  18910. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18911. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18912. procedure setw(thebits : TBits_32); inline;
  18913. public
  18914. procedure clearRXFULLIE; inline;
  18915. procedure clearRXFULLIF; inline;
  18916. procedure clearRXHALFIE; inline;
  18917. procedure clearRXHALFIF; inline;
  18918. procedure clearRXNEMPTYIE; inline;
  18919. procedure clearRXNEMPTYIF; inline;
  18920. procedure clearRXOVFLIE; inline;
  18921. procedure clearRXOVFLIF; inline;
  18922. procedure clearTXEMPTYIE; inline;
  18923. procedure clearTXEMPTYIF; inline;
  18924. procedure clearTXHALFIE; inline;
  18925. procedure clearTXHALFIF; inline;
  18926. procedure clearTXNFULLIE; inline;
  18927. procedure clearTXNFULLIF; inline;
  18928. procedure setRXFULLIE; inline;
  18929. procedure setRXFULLIF; inline;
  18930. procedure setRXHALFIE; inline;
  18931. procedure setRXHALFIF; inline;
  18932. procedure setRXNEMPTYIE; inline;
  18933. procedure setRXNEMPTYIF; inline;
  18934. procedure setRXOVFLIE; inline;
  18935. procedure setRXOVFLIF; inline;
  18936. procedure setTXEMPTYIE; inline;
  18937. procedure setTXEMPTYIF; inline;
  18938. procedure setTXHALFIE; inline;
  18939. procedure setTXHALFIF; inline;
  18940. procedure setTXNFULLIE; inline;
  18941. procedure setTXNFULLIF; inline;
  18942. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18943. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18944. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18945. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18946. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18947. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18948. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18949. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18950. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18951. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18952. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18953. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18954. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18955. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18956. property w : TBits_32 read getw write setw;
  18957. end;
  18958. TCAN1_C1FIFOCI21 = record
  18959. private
  18960. function getCFIFOCI : TBits_5; inline;
  18961. function getw : TBits_32; inline;
  18962. procedure setCFIFOCI(thebits : TBits_5); inline;
  18963. procedure setw(thebits : TBits_32); inline;
  18964. public
  18965. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18966. property w : TBits_32 read getw write setw;
  18967. end;
  18968. TCAN1_C1FIFOCON22 = record
  18969. private
  18970. function getDONLY : TBits_1; inline;
  18971. function getFRESET : TBits_1; inline;
  18972. function getFSIZE : TBits_5; inline;
  18973. function getRTREN : TBits_1; inline;
  18974. function getTXABAT : TBits_1; inline;
  18975. function getTXEN : TBits_1; inline;
  18976. function getTXERR : TBits_1; inline;
  18977. function getTXLARB : TBits_1; inline;
  18978. function getTXPRI : TBits_2; inline;
  18979. function getTXREQ : TBits_1; inline;
  18980. function getUINC : TBits_1; inline;
  18981. function getw : TBits_32; inline;
  18982. procedure setDONLY(thebits : TBits_1); inline;
  18983. procedure setFRESET(thebits : TBits_1); inline;
  18984. procedure setFSIZE(thebits : TBits_5); inline;
  18985. procedure setRTREN(thebits : TBits_1); inline;
  18986. procedure setTXABAT(thebits : TBits_1); inline;
  18987. procedure setTXEN(thebits : TBits_1); inline;
  18988. procedure setTXERR(thebits : TBits_1); inline;
  18989. procedure setTXLARB(thebits : TBits_1); inline;
  18990. procedure setTXPRI(thebits : TBits_2); inline;
  18991. procedure setTXREQ(thebits : TBits_1); inline;
  18992. procedure setUINC(thebits : TBits_1); inline;
  18993. procedure setw(thebits : TBits_32); inline;
  18994. public
  18995. procedure clearDONLY; inline;
  18996. procedure clearFRESET; inline;
  18997. procedure clearRTREN; inline;
  18998. procedure clearTXABAT; inline;
  18999. procedure clearTXEN; inline;
  19000. procedure clearTXERR; inline;
  19001. procedure clearTXLARB; inline;
  19002. procedure clearTXREQ; inline;
  19003. procedure clearUINC; inline;
  19004. procedure setDONLY; inline;
  19005. procedure setFRESET; inline;
  19006. procedure setRTREN; inline;
  19007. procedure setTXABAT; inline;
  19008. procedure setTXEN; inline;
  19009. procedure setTXERR; inline;
  19010. procedure setTXLARB; inline;
  19011. procedure setTXREQ; inline;
  19012. procedure setUINC; inline;
  19013. property DONLY : TBits_1 read getDONLY write setDONLY;
  19014. property FRESET : TBits_1 read getFRESET write setFRESET;
  19015. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19016. property RTREN : TBits_1 read getRTREN write setRTREN;
  19017. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19018. property TXEN : TBits_1 read getTXEN write setTXEN;
  19019. property TXERR : TBits_1 read getTXERR write setTXERR;
  19020. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19021. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19022. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19023. property UINC : TBits_1 read getUINC write setUINC;
  19024. property w : TBits_32 read getw write setw;
  19025. end;
  19026. TCAN1_C1FIFOINT22 = record
  19027. private
  19028. function getRXFULLIE : TBits_1; inline;
  19029. function getRXFULLIF : TBits_1; inline;
  19030. function getRXHALFIE : TBits_1; inline;
  19031. function getRXHALFIF : TBits_1; inline;
  19032. function getRXNEMPTYIE : TBits_1; inline;
  19033. function getRXNEMPTYIF : TBits_1; inline;
  19034. function getRXOVFLIE : TBits_1; inline;
  19035. function getRXOVFLIF : TBits_1; inline;
  19036. function getTXEMPTYIE : TBits_1; inline;
  19037. function getTXEMPTYIF : TBits_1; inline;
  19038. function getTXHALFIE : TBits_1; inline;
  19039. function getTXHALFIF : TBits_1; inline;
  19040. function getTXNFULLIE : TBits_1; inline;
  19041. function getTXNFULLIF : TBits_1; inline;
  19042. function getw : TBits_32; inline;
  19043. procedure setRXFULLIE(thebits : TBits_1); inline;
  19044. procedure setRXFULLIF(thebits : TBits_1); inline;
  19045. procedure setRXHALFIE(thebits : TBits_1); inline;
  19046. procedure setRXHALFIF(thebits : TBits_1); inline;
  19047. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19048. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19049. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19050. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19051. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19052. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19053. procedure setTXHALFIE(thebits : TBits_1); inline;
  19054. procedure setTXHALFIF(thebits : TBits_1); inline;
  19055. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19056. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19057. procedure setw(thebits : TBits_32); inline;
  19058. public
  19059. procedure clearRXFULLIE; inline;
  19060. procedure clearRXFULLIF; inline;
  19061. procedure clearRXHALFIE; inline;
  19062. procedure clearRXHALFIF; inline;
  19063. procedure clearRXNEMPTYIE; inline;
  19064. procedure clearRXNEMPTYIF; inline;
  19065. procedure clearRXOVFLIE; inline;
  19066. procedure clearRXOVFLIF; inline;
  19067. procedure clearTXEMPTYIE; inline;
  19068. procedure clearTXEMPTYIF; inline;
  19069. procedure clearTXHALFIE; inline;
  19070. procedure clearTXHALFIF; inline;
  19071. procedure clearTXNFULLIE; inline;
  19072. procedure clearTXNFULLIF; inline;
  19073. procedure setRXFULLIE; inline;
  19074. procedure setRXFULLIF; inline;
  19075. procedure setRXHALFIE; inline;
  19076. procedure setRXHALFIF; inline;
  19077. procedure setRXNEMPTYIE; inline;
  19078. procedure setRXNEMPTYIF; inline;
  19079. procedure setRXOVFLIE; inline;
  19080. procedure setRXOVFLIF; inline;
  19081. procedure setTXEMPTYIE; inline;
  19082. procedure setTXEMPTYIF; inline;
  19083. procedure setTXHALFIE; inline;
  19084. procedure setTXHALFIF; inline;
  19085. procedure setTXNFULLIE; inline;
  19086. procedure setTXNFULLIF; inline;
  19087. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19088. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19089. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19090. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19091. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19092. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19093. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19094. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19095. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19096. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19097. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19098. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19099. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19100. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19101. property w : TBits_32 read getw write setw;
  19102. end;
  19103. TCAN1_C1FIFOCI22 = record
  19104. private
  19105. function getCFIFOCI : TBits_5; inline;
  19106. function getw : TBits_32; inline;
  19107. procedure setCFIFOCI(thebits : TBits_5); inline;
  19108. procedure setw(thebits : TBits_32); inline;
  19109. public
  19110. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19111. property w : TBits_32 read getw write setw;
  19112. end;
  19113. TCAN1_C1FIFOCON23 = record
  19114. private
  19115. function getDONLY : TBits_1; inline;
  19116. function getFRESET : TBits_1; inline;
  19117. function getFSIZE : TBits_5; inline;
  19118. function getRTREN : TBits_1; inline;
  19119. function getTXABAT : TBits_1; inline;
  19120. function getTXEN : TBits_1; inline;
  19121. function getTXERR : TBits_1; inline;
  19122. function getTXLARB : TBits_1; inline;
  19123. function getTXPRI : TBits_2; inline;
  19124. function getTXREQ : TBits_1; inline;
  19125. function getUINC : TBits_1; inline;
  19126. function getw : TBits_32; inline;
  19127. procedure setDONLY(thebits : TBits_1); inline;
  19128. procedure setFRESET(thebits : TBits_1); inline;
  19129. procedure setFSIZE(thebits : TBits_5); inline;
  19130. procedure setRTREN(thebits : TBits_1); inline;
  19131. procedure setTXABAT(thebits : TBits_1); inline;
  19132. procedure setTXEN(thebits : TBits_1); inline;
  19133. procedure setTXERR(thebits : TBits_1); inline;
  19134. procedure setTXLARB(thebits : TBits_1); inline;
  19135. procedure setTXPRI(thebits : TBits_2); inline;
  19136. procedure setTXREQ(thebits : TBits_1); inline;
  19137. procedure setUINC(thebits : TBits_1); inline;
  19138. procedure setw(thebits : TBits_32); inline;
  19139. public
  19140. procedure clearDONLY; inline;
  19141. procedure clearFRESET; inline;
  19142. procedure clearRTREN; inline;
  19143. procedure clearTXABAT; inline;
  19144. procedure clearTXEN; inline;
  19145. procedure clearTXERR; inline;
  19146. procedure clearTXLARB; inline;
  19147. procedure clearTXREQ; inline;
  19148. procedure clearUINC; inline;
  19149. procedure setDONLY; inline;
  19150. procedure setFRESET; inline;
  19151. procedure setRTREN; inline;
  19152. procedure setTXABAT; inline;
  19153. procedure setTXEN; inline;
  19154. procedure setTXERR; inline;
  19155. procedure setTXLARB; inline;
  19156. procedure setTXREQ; inline;
  19157. procedure setUINC; inline;
  19158. property DONLY : TBits_1 read getDONLY write setDONLY;
  19159. property FRESET : TBits_1 read getFRESET write setFRESET;
  19160. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19161. property RTREN : TBits_1 read getRTREN write setRTREN;
  19162. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19163. property TXEN : TBits_1 read getTXEN write setTXEN;
  19164. property TXERR : TBits_1 read getTXERR write setTXERR;
  19165. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19166. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19167. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19168. property UINC : TBits_1 read getUINC write setUINC;
  19169. property w : TBits_32 read getw write setw;
  19170. end;
  19171. TCAN1_C1FIFOINT23 = record
  19172. private
  19173. function getRXFULLIE : TBits_1; inline;
  19174. function getRXFULLIF : TBits_1; inline;
  19175. function getRXHALFIE : TBits_1; inline;
  19176. function getRXHALFIF : TBits_1; inline;
  19177. function getRXNEMPTYIE : TBits_1; inline;
  19178. function getRXNEMPTYIF : TBits_1; inline;
  19179. function getRXOVFLIE : TBits_1; inline;
  19180. function getRXOVFLIF : TBits_1; inline;
  19181. function getTXEMPTYIE : TBits_1; inline;
  19182. function getTXEMPTYIF : TBits_1; inline;
  19183. function getTXHALFIE : TBits_1; inline;
  19184. function getTXHALFIF : TBits_1; inline;
  19185. function getTXNFULLIE : TBits_1; inline;
  19186. function getTXNFULLIF : TBits_1; inline;
  19187. function getw : TBits_32; inline;
  19188. procedure setRXFULLIE(thebits : TBits_1); inline;
  19189. procedure setRXFULLIF(thebits : TBits_1); inline;
  19190. procedure setRXHALFIE(thebits : TBits_1); inline;
  19191. procedure setRXHALFIF(thebits : TBits_1); inline;
  19192. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19193. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19194. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19195. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19196. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19197. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19198. procedure setTXHALFIE(thebits : TBits_1); inline;
  19199. procedure setTXHALFIF(thebits : TBits_1); inline;
  19200. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19201. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19202. procedure setw(thebits : TBits_32); inline;
  19203. public
  19204. procedure clearRXFULLIE; inline;
  19205. procedure clearRXFULLIF; inline;
  19206. procedure clearRXHALFIE; inline;
  19207. procedure clearRXHALFIF; inline;
  19208. procedure clearRXNEMPTYIE; inline;
  19209. procedure clearRXNEMPTYIF; inline;
  19210. procedure clearRXOVFLIE; inline;
  19211. procedure clearRXOVFLIF; inline;
  19212. procedure clearTXEMPTYIE; inline;
  19213. procedure clearTXEMPTYIF; inline;
  19214. procedure clearTXHALFIE; inline;
  19215. procedure clearTXHALFIF; inline;
  19216. procedure clearTXNFULLIE; inline;
  19217. procedure clearTXNFULLIF; inline;
  19218. procedure setRXFULLIE; inline;
  19219. procedure setRXFULLIF; inline;
  19220. procedure setRXHALFIE; inline;
  19221. procedure setRXHALFIF; inline;
  19222. procedure setRXNEMPTYIE; inline;
  19223. procedure setRXNEMPTYIF; inline;
  19224. procedure setRXOVFLIE; inline;
  19225. procedure setRXOVFLIF; inline;
  19226. procedure setTXEMPTYIE; inline;
  19227. procedure setTXEMPTYIF; inline;
  19228. procedure setTXHALFIE; inline;
  19229. procedure setTXHALFIF; inline;
  19230. procedure setTXNFULLIE; inline;
  19231. procedure setTXNFULLIF; inline;
  19232. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19233. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19234. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19235. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19236. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19237. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19238. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19239. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19240. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19241. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19242. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19243. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19244. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19245. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19246. property w : TBits_32 read getw write setw;
  19247. end;
  19248. TCAN1_C1FIFOCI23 = record
  19249. private
  19250. function getCFIFOCI : TBits_5; inline;
  19251. function getw : TBits_32; inline;
  19252. procedure setCFIFOCI(thebits : TBits_5); inline;
  19253. procedure setw(thebits : TBits_32); inline;
  19254. public
  19255. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19256. property w : TBits_32 read getw write setw;
  19257. end;
  19258. TCAN1_C1FIFOCON24 = record
  19259. private
  19260. function getDONLY : TBits_1; inline;
  19261. function getFRESET : TBits_1; inline;
  19262. function getFSIZE : TBits_5; inline;
  19263. function getRTREN : TBits_1; inline;
  19264. function getTXABAT : TBits_1; inline;
  19265. function getTXEN : TBits_1; inline;
  19266. function getTXERR : TBits_1; inline;
  19267. function getTXLARB : TBits_1; inline;
  19268. function getTXPRI : TBits_2; inline;
  19269. function getTXREQ : TBits_1; inline;
  19270. function getUINC : TBits_1; inline;
  19271. function getw : TBits_32; inline;
  19272. procedure setDONLY(thebits : TBits_1); inline;
  19273. procedure setFRESET(thebits : TBits_1); inline;
  19274. procedure setFSIZE(thebits : TBits_5); inline;
  19275. procedure setRTREN(thebits : TBits_1); inline;
  19276. procedure setTXABAT(thebits : TBits_1); inline;
  19277. procedure setTXEN(thebits : TBits_1); inline;
  19278. procedure setTXERR(thebits : TBits_1); inline;
  19279. procedure setTXLARB(thebits : TBits_1); inline;
  19280. procedure setTXPRI(thebits : TBits_2); inline;
  19281. procedure setTXREQ(thebits : TBits_1); inline;
  19282. procedure setUINC(thebits : TBits_1); inline;
  19283. procedure setw(thebits : TBits_32); inline;
  19284. public
  19285. procedure clearDONLY; inline;
  19286. procedure clearFRESET; inline;
  19287. procedure clearRTREN; inline;
  19288. procedure clearTXABAT; inline;
  19289. procedure clearTXEN; inline;
  19290. procedure clearTXERR; inline;
  19291. procedure clearTXLARB; inline;
  19292. procedure clearTXREQ; inline;
  19293. procedure clearUINC; inline;
  19294. procedure setDONLY; inline;
  19295. procedure setFRESET; inline;
  19296. procedure setRTREN; inline;
  19297. procedure setTXABAT; inline;
  19298. procedure setTXEN; inline;
  19299. procedure setTXERR; inline;
  19300. procedure setTXLARB; inline;
  19301. procedure setTXREQ; inline;
  19302. procedure setUINC; inline;
  19303. property DONLY : TBits_1 read getDONLY write setDONLY;
  19304. property FRESET : TBits_1 read getFRESET write setFRESET;
  19305. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19306. property RTREN : TBits_1 read getRTREN write setRTREN;
  19307. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19308. property TXEN : TBits_1 read getTXEN write setTXEN;
  19309. property TXERR : TBits_1 read getTXERR write setTXERR;
  19310. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19311. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19312. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19313. property UINC : TBits_1 read getUINC write setUINC;
  19314. property w : TBits_32 read getw write setw;
  19315. end;
  19316. TCAN1_C1FIFOINT24 = record
  19317. private
  19318. function getRXFULLIE : TBits_1; inline;
  19319. function getRXFULLIF : TBits_1; inline;
  19320. function getRXHALFIE : TBits_1; inline;
  19321. function getRXHALFIF : TBits_1; inline;
  19322. function getRXNEMPTYIE : TBits_1; inline;
  19323. function getRXNEMPTYIF : TBits_1; inline;
  19324. function getRXOVFLIE : TBits_1; inline;
  19325. function getRXOVFLIF : TBits_1; inline;
  19326. function getTXEMPTYIE : TBits_1; inline;
  19327. function getTXEMPTYIF : TBits_1; inline;
  19328. function getTXHALFIE : TBits_1; inline;
  19329. function getTXHALFIF : TBits_1; inline;
  19330. function getTXNFULLIE : TBits_1; inline;
  19331. function getTXNFULLIF : TBits_1; inline;
  19332. function getw : TBits_32; inline;
  19333. procedure setRXFULLIE(thebits : TBits_1); inline;
  19334. procedure setRXFULLIF(thebits : TBits_1); inline;
  19335. procedure setRXHALFIE(thebits : TBits_1); inline;
  19336. procedure setRXHALFIF(thebits : TBits_1); inline;
  19337. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19338. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19339. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19340. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19341. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19342. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19343. procedure setTXHALFIE(thebits : TBits_1); inline;
  19344. procedure setTXHALFIF(thebits : TBits_1); inline;
  19345. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19346. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19347. procedure setw(thebits : TBits_32); inline;
  19348. public
  19349. procedure clearRXFULLIE; inline;
  19350. procedure clearRXFULLIF; inline;
  19351. procedure clearRXHALFIE; inline;
  19352. procedure clearRXHALFIF; inline;
  19353. procedure clearRXNEMPTYIE; inline;
  19354. procedure clearRXNEMPTYIF; inline;
  19355. procedure clearRXOVFLIE; inline;
  19356. procedure clearRXOVFLIF; inline;
  19357. procedure clearTXEMPTYIE; inline;
  19358. procedure clearTXEMPTYIF; inline;
  19359. procedure clearTXHALFIE; inline;
  19360. procedure clearTXHALFIF; inline;
  19361. procedure clearTXNFULLIE; inline;
  19362. procedure clearTXNFULLIF; inline;
  19363. procedure setRXFULLIE; inline;
  19364. procedure setRXFULLIF; inline;
  19365. procedure setRXHALFIE; inline;
  19366. procedure setRXHALFIF; inline;
  19367. procedure setRXNEMPTYIE; inline;
  19368. procedure setRXNEMPTYIF; inline;
  19369. procedure setRXOVFLIE; inline;
  19370. procedure setRXOVFLIF; inline;
  19371. procedure setTXEMPTYIE; inline;
  19372. procedure setTXEMPTYIF; inline;
  19373. procedure setTXHALFIE; inline;
  19374. procedure setTXHALFIF; inline;
  19375. procedure setTXNFULLIE; inline;
  19376. procedure setTXNFULLIF; inline;
  19377. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19378. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19379. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19380. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19381. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19382. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19383. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19384. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19385. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19386. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19387. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19388. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19389. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19390. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19391. property w : TBits_32 read getw write setw;
  19392. end;
  19393. TCAN1_C1FIFOCI24 = record
  19394. private
  19395. function getCFIFOCI : TBits_5; inline;
  19396. function getw : TBits_32; inline;
  19397. procedure setCFIFOCI(thebits : TBits_5); inline;
  19398. procedure setw(thebits : TBits_32); inline;
  19399. public
  19400. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19401. property w : TBits_32 read getw write setw;
  19402. end;
  19403. TCAN1_C1FIFOCON25 = record
  19404. private
  19405. function getDONLY : TBits_1; inline;
  19406. function getFRESET : TBits_1; inline;
  19407. function getFSIZE : TBits_5; inline;
  19408. function getRTREN : TBits_1; inline;
  19409. function getTXABAT : TBits_1; inline;
  19410. function getTXEN : TBits_1; inline;
  19411. function getTXERR : TBits_1; inline;
  19412. function getTXLARB : TBits_1; inline;
  19413. function getTXPRI : TBits_2; inline;
  19414. function getTXREQ : TBits_1; inline;
  19415. function getUINC : TBits_1; inline;
  19416. function getw : TBits_32; inline;
  19417. procedure setDONLY(thebits : TBits_1); inline;
  19418. procedure setFRESET(thebits : TBits_1); inline;
  19419. procedure setFSIZE(thebits : TBits_5); inline;
  19420. procedure setRTREN(thebits : TBits_1); inline;
  19421. procedure setTXABAT(thebits : TBits_1); inline;
  19422. procedure setTXEN(thebits : TBits_1); inline;
  19423. procedure setTXERR(thebits : TBits_1); inline;
  19424. procedure setTXLARB(thebits : TBits_1); inline;
  19425. procedure setTXPRI(thebits : TBits_2); inline;
  19426. procedure setTXREQ(thebits : TBits_1); inline;
  19427. procedure setUINC(thebits : TBits_1); inline;
  19428. procedure setw(thebits : TBits_32); inline;
  19429. public
  19430. procedure clearDONLY; inline;
  19431. procedure clearFRESET; inline;
  19432. procedure clearRTREN; inline;
  19433. procedure clearTXABAT; inline;
  19434. procedure clearTXEN; inline;
  19435. procedure clearTXERR; inline;
  19436. procedure clearTXLARB; inline;
  19437. procedure clearTXREQ; inline;
  19438. procedure clearUINC; inline;
  19439. procedure setDONLY; inline;
  19440. procedure setFRESET; inline;
  19441. procedure setRTREN; inline;
  19442. procedure setTXABAT; inline;
  19443. procedure setTXEN; inline;
  19444. procedure setTXERR; inline;
  19445. procedure setTXLARB; inline;
  19446. procedure setTXREQ; inline;
  19447. procedure setUINC; inline;
  19448. property DONLY : TBits_1 read getDONLY write setDONLY;
  19449. property FRESET : TBits_1 read getFRESET write setFRESET;
  19450. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19451. property RTREN : TBits_1 read getRTREN write setRTREN;
  19452. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19453. property TXEN : TBits_1 read getTXEN write setTXEN;
  19454. property TXERR : TBits_1 read getTXERR write setTXERR;
  19455. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19456. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19457. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19458. property UINC : TBits_1 read getUINC write setUINC;
  19459. property w : TBits_32 read getw write setw;
  19460. end;
  19461. TCAN1_C1FIFOINT25 = record
  19462. private
  19463. function getRXFULLIE : TBits_1; inline;
  19464. function getRXFULLIF : TBits_1; inline;
  19465. function getRXHALFIE : TBits_1; inline;
  19466. function getRXHALFIF : TBits_1; inline;
  19467. function getRXNEMPTYIE : TBits_1; inline;
  19468. function getRXNEMPTYIF : TBits_1; inline;
  19469. function getRXOVFLIE : TBits_1; inline;
  19470. function getRXOVFLIF : TBits_1; inline;
  19471. function getTXEMPTYIE : TBits_1; inline;
  19472. function getTXEMPTYIF : TBits_1; inline;
  19473. function getTXHALFIE : TBits_1; inline;
  19474. function getTXHALFIF : TBits_1; inline;
  19475. function getTXNFULLIE : TBits_1; inline;
  19476. function getTXNFULLIF : TBits_1; inline;
  19477. function getw : TBits_32; inline;
  19478. procedure setRXFULLIE(thebits : TBits_1); inline;
  19479. procedure setRXFULLIF(thebits : TBits_1); inline;
  19480. procedure setRXHALFIE(thebits : TBits_1); inline;
  19481. procedure setRXHALFIF(thebits : TBits_1); inline;
  19482. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19483. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19484. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19485. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19486. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19487. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19488. procedure setTXHALFIE(thebits : TBits_1); inline;
  19489. procedure setTXHALFIF(thebits : TBits_1); inline;
  19490. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19491. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19492. procedure setw(thebits : TBits_32); inline;
  19493. public
  19494. procedure clearRXFULLIE; inline;
  19495. procedure clearRXFULLIF; inline;
  19496. procedure clearRXHALFIE; inline;
  19497. procedure clearRXHALFIF; inline;
  19498. procedure clearRXNEMPTYIE; inline;
  19499. procedure clearRXNEMPTYIF; inline;
  19500. procedure clearRXOVFLIE; inline;
  19501. procedure clearRXOVFLIF; inline;
  19502. procedure clearTXEMPTYIE; inline;
  19503. procedure clearTXEMPTYIF; inline;
  19504. procedure clearTXHALFIE; inline;
  19505. procedure clearTXHALFIF; inline;
  19506. procedure clearTXNFULLIE; inline;
  19507. procedure clearTXNFULLIF; inline;
  19508. procedure setRXFULLIE; inline;
  19509. procedure setRXFULLIF; inline;
  19510. procedure setRXHALFIE; inline;
  19511. procedure setRXHALFIF; inline;
  19512. procedure setRXNEMPTYIE; inline;
  19513. procedure setRXNEMPTYIF; inline;
  19514. procedure setRXOVFLIE; inline;
  19515. procedure setRXOVFLIF; inline;
  19516. procedure setTXEMPTYIE; inline;
  19517. procedure setTXEMPTYIF; inline;
  19518. procedure setTXHALFIE; inline;
  19519. procedure setTXHALFIF; inline;
  19520. procedure setTXNFULLIE; inline;
  19521. procedure setTXNFULLIF; inline;
  19522. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19523. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19524. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19525. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19526. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19527. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19528. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19529. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19530. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19531. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19532. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19533. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19534. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19535. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19536. property w : TBits_32 read getw write setw;
  19537. end;
  19538. TCAN1_C1FIFOCI25 = record
  19539. private
  19540. function getCFIFOCI : TBits_5; inline;
  19541. function getw : TBits_32; inline;
  19542. procedure setCFIFOCI(thebits : TBits_5); inline;
  19543. procedure setw(thebits : TBits_32); inline;
  19544. public
  19545. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19546. property w : TBits_32 read getw write setw;
  19547. end;
  19548. TCAN1_C1FIFOCON26 = record
  19549. private
  19550. function getDONLY : TBits_1; inline;
  19551. function getFRESET : TBits_1; inline;
  19552. function getFSIZE : TBits_5; inline;
  19553. function getRTREN : TBits_1; inline;
  19554. function getTXABAT : TBits_1; inline;
  19555. function getTXEN : TBits_1; inline;
  19556. function getTXERR : TBits_1; inline;
  19557. function getTXLARB : TBits_1; inline;
  19558. function getTXPRI : TBits_2; inline;
  19559. function getTXREQ : TBits_1; inline;
  19560. function getUINC : TBits_1; inline;
  19561. function getw : TBits_32; inline;
  19562. procedure setDONLY(thebits : TBits_1); inline;
  19563. procedure setFRESET(thebits : TBits_1); inline;
  19564. procedure setFSIZE(thebits : TBits_5); inline;
  19565. procedure setRTREN(thebits : TBits_1); inline;
  19566. procedure setTXABAT(thebits : TBits_1); inline;
  19567. procedure setTXEN(thebits : TBits_1); inline;
  19568. procedure setTXERR(thebits : TBits_1); inline;
  19569. procedure setTXLARB(thebits : TBits_1); inline;
  19570. procedure setTXPRI(thebits : TBits_2); inline;
  19571. procedure setTXREQ(thebits : TBits_1); inline;
  19572. procedure setUINC(thebits : TBits_1); inline;
  19573. procedure setw(thebits : TBits_32); inline;
  19574. public
  19575. procedure clearDONLY; inline;
  19576. procedure clearFRESET; inline;
  19577. procedure clearRTREN; inline;
  19578. procedure clearTXABAT; inline;
  19579. procedure clearTXEN; inline;
  19580. procedure clearTXERR; inline;
  19581. procedure clearTXLARB; inline;
  19582. procedure clearTXREQ; inline;
  19583. procedure clearUINC; inline;
  19584. procedure setDONLY; inline;
  19585. procedure setFRESET; inline;
  19586. procedure setRTREN; inline;
  19587. procedure setTXABAT; inline;
  19588. procedure setTXEN; inline;
  19589. procedure setTXERR; inline;
  19590. procedure setTXLARB; inline;
  19591. procedure setTXREQ; inline;
  19592. procedure setUINC; inline;
  19593. property DONLY : TBits_1 read getDONLY write setDONLY;
  19594. property FRESET : TBits_1 read getFRESET write setFRESET;
  19595. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19596. property RTREN : TBits_1 read getRTREN write setRTREN;
  19597. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19598. property TXEN : TBits_1 read getTXEN write setTXEN;
  19599. property TXERR : TBits_1 read getTXERR write setTXERR;
  19600. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19601. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19602. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19603. property UINC : TBits_1 read getUINC write setUINC;
  19604. property w : TBits_32 read getw write setw;
  19605. end;
  19606. TCAN1_C1FIFOINT26 = record
  19607. private
  19608. function getRXFULLIE : TBits_1; inline;
  19609. function getRXFULLIF : TBits_1; inline;
  19610. function getRXHALFIE : TBits_1; inline;
  19611. function getRXHALFIF : TBits_1; inline;
  19612. function getRXNEMPTYIE : TBits_1; inline;
  19613. function getRXNEMPTYIF : TBits_1; inline;
  19614. function getRXOVFLIE : TBits_1; inline;
  19615. function getRXOVFLIF : TBits_1; inline;
  19616. function getTXEMPTYIE : TBits_1; inline;
  19617. function getTXEMPTYIF : TBits_1; inline;
  19618. function getTXHALFIE : TBits_1; inline;
  19619. function getTXHALFIF : TBits_1; inline;
  19620. function getTXNFULLIE : TBits_1; inline;
  19621. function getTXNFULLIF : TBits_1; inline;
  19622. function getw : TBits_32; inline;
  19623. procedure setRXFULLIE(thebits : TBits_1); inline;
  19624. procedure setRXFULLIF(thebits : TBits_1); inline;
  19625. procedure setRXHALFIE(thebits : TBits_1); inline;
  19626. procedure setRXHALFIF(thebits : TBits_1); inline;
  19627. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19628. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19629. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19630. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19631. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19632. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19633. procedure setTXHALFIE(thebits : TBits_1); inline;
  19634. procedure setTXHALFIF(thebits : TBits_1); inline;
  19635. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19636. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19637. procedure setw(thebits : TBits_32); inline;
  19638. public
  19639. procedure clearRXFULLIE; inline;
  19640. procedure clearRXFULLIF; inline;
  19641. procedure clearRXHALFIE; inline;
  19642. procedure clearRXHALFIF; inline;
  19643. procedure clearRXNEMPTYIE; inline;
  19644. procedure clearRXNEMPTYIF; inline;
  19645. procedure clearRXOVFLIE; inline;
  19646. procedure clearRXOVFLIF; inline;
  19647. procedure clearTXEMPTYIE; inline;
  19648. procedure clearTXEMPTYIF; inline;
  19649. procedure clearTXHALFIE; inline;
  19650. procedure clearTXHALFIF; inline;
  19651. procedure clearTXNFULLIE; inline;
  19652. procedure clearTXNFULLIF; inline;
  19653. procedure setRXFULLIE; inline;
  19654. procedure setRXFULLIF; inline;
  19655. procedure setRXHALFIE; inline;
  19656. procedure setRXHALFIF; inline;
  19657. procedure setRXNEMPTYIE; inline;
  19658. procedure setRXNEMPTYIF; inline;
  19659. procedure setRXOVFLIE; inline;
  19660. procedure setRXOVFLIF; inline;
  19661. procedure setTXEMPTYIE; inline;
  19662. procedure setTXEMPTYIF; inline;
  19663. procedure setTXHALFIE; inline;
  19664. procedure setTXHALFIF; inline;
  19665. procedure setTXNFULLIE; inline;
  19666. procedure setTXNFULLIF; inline;
  19667. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19668. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19669. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19670. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19671. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19672. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19673. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19674. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19675. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19676. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19677. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19678. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19679. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19680. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19681. property w : TBits_32 read getw write setw;
  19682. end;
  19683. TCAN1_C1FIFOCI26 = record
  19684. private
  19685. function getCFIFOCI : TBits_5; inline;
  19686. function getw : TBits_32; inline;
  19687. procedure setCFIFOCI(thebits : TBits_5); inline;
  19688. procedure setw(thebits : TBits_32); inline;
  19689. public
  19690. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19691. property w : TBits_32 read getw write setw;
  19692. end;
  19693. TCAN1_C1FIFOCON27 = record
  19694. private
  19695. function getDONLY : TBits_1; inline;
  19696. function getFRESET : TBits_1; inline;
  19697. function getFSIZE : TBits_5; inline;
  19698. function getRTREN : TBits_1; inline;
  19699. function getTXABAT : TBits_1; inline;
  19700. function getTXEN : TBits_1; inline;
  19701. function getTXERR : TBits_1; inline;
  19702. function getTXLARB : TBits_1; inline;
  19703. function getTXPRI : TBits_2; inline;
  19704. function getTXREQ : TBits_1; inline;
  19705. function getUINC : TBits_1; inline;
  19706. function getw : TBits_32; inline;
  19707. procedure setDONLY(thebits : TBits_1); inline;
  19708. procedure setFRESET(thebits : TBits_1); inline;
  19709. procedure setFSIZE(thebits : TBits_5); inline;
  19710. procedure setRTREN(thebits : TBits_1); inline;
  19711. procedure setTXABAT(thebits : TBits_1); inline;
  19712. procedure setTXEN(thebits : TBits_1); inline;
  19713. procedure setTXERR(thebits : TBits_1); inline;
  19714. procedure setTXLARB(thebits : TBits_1); inline;
  19715. procedure setTXPRI(thebits : TBits_2); inline;
  19716. procedure setTXREQ(thebits : TBits_1); inline;
  19717. procedure setUINC(thebits : TBits_1); inline;
  19718. procedure setw(thebits : TBits_32); inline;
  19719. public
  19720. procedure clearDONLY; inline;
  19721. procedure clearFRESET; inline;
  19722. procedure clearRTREN; inline;
  19723. procedure clearTXABAT; inline;
  19724. procedure clearTXEN; inline;
  19725. procedure clearTXERR; inline;
  19726. procedure clearTXLARB; inline;
  19727. procedure clearTXREQ; inline;
  19728. procedure clearUINC; inline;
  19729. procedure setDONLY; inline;
  19730. procedure setFRESET; inline;
  19731. procedure setRTREN; inline;
  19732. procedure setTXABAT; inline;
  19733. procedure setTXEN; inline;
  19734. procedure setTXERR; inline;
  19735. procedure setTXLARB; inline;
  19736. procedure setTXREQ; inline;
  19737. procedure setUINC; inline;
  19738. property DONLY : TBits_1 read getDONLY write setDONLY;
  19739. property FRESET : TBits_1 read getFRESET write setFRESET;
  19740. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19741. property RTREN : TBits_1 read getRTREN write setRTREN;
  19742. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19743. property TXEN : TBits_1 read getTXEN write setTXEN;
  19744. property TXERR : TBits_1 read getTXERR write setTXERR;
  19745. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19746. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19747. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19748. property UINC : TBits_1 read getUINC write setUINC;
  19749. property w : TBits_32 read getw write setw;
  19750. end;
  19751. TCAN1_C1FIFOINT27 = record
  19752. private
  19753. function getRXFULLIE : TBits_1; inline;
  19754. function getRXFULLIF : TBits_1; inline;
  19755. function getRXHALFIE : TBits_1; inline;
  19756. function getRXHALFIF : TBits_1; inline;
  19757. function getRXNEMPTYIE : TBits_1; inline;
  19758. function getRXNEMPTYIF : TBits_1; inline;
  19759. function getRXOVFLIE : TBits_1; inline;
  19760. function getRXOVFLIF : TBits_1; inline;
  19761. function getTXEMPTYIE : TBits_1; inline;
  19762. function getTXEMPTYIF : TBits_1; inline;
  19763. function getTXHALFIE : TBits_1; inline;
  19764. function getTXHALFIF : TBits_1; inline;
  19765. function getTXNFULLIE : TBits_1; inline;
  19766. function getTXNFULLIF : TBits_1; inline;
  19767. function getw : TBits_32; inline;
  19768. procedure setRXFULLIE(thebits : TBits_1); inline;
  19769. procedure setRXFULLIF(thebits : TBits_1); inline;
  19770. procedure setRXHALFIE(thebits : TBits_1); inline;
  19771. procedure setRXHALFIF(thebits : TBits_1); inline;
  19772. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19773. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19774. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19775. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19776. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19777. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19778. procedure setTXHALFIE(thebits : TBits_1); inline;
  19779. procedure setTXHALFIF(thebits : TBits_1); inline;
  19780. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19781. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19782. procedure setw(thebits : TBits_32); inline;
  19783. public
  19784. procedure clearRXFULLIE; inline;
  19785. procedure clearRXFULLIF; inline;
  19786. procedure clearRXHALFIE; inline;
  19787. procedure clearRXHALFIF; inline;
  19788. procedure clearRXNEMPTYIE; inline;
  19789. procedure clearRXNEMPTYIF; inline;
  19790. procedure clearRXOVFLIE; inline;
  19791. procedure clearRXOVFLIF; inline;
  19792. procedure clearTXEMPTYIE; inline;
  19793. procedure clearTXEMPTYIF; inline;
  19794. procedure clearTXHALFIE; inline;
  19795. procedure clearTXHALFIF; inline;
  19796. procedure clearTXNFULLIE; inline;
  19797. procedure clearTXNFULLIF; inline;
  19798. procedure setRXFULLIE; inline;
  19799. procedure setRXFULLIF; inline;
  19800. procedure setRXHALFIE; inline;
  19801. procedure setRXHALFIF; inline;
  19802. procedure setRXNEMPTYIE; inline;
  19803. procedure setRXNEMPTYIF; inline;
  19804. procedure setRXOVFLIE; inline;
  19805. procedure setRXOVFLIF; inline;
  19806. procedure setTXEMPTYIE; inline;
  19807. procedure setTXEMPTYIF; inline;
  19808. procedure setTXHALFIE; inline;
  19809. procedure setTXHALFIF; inline;
  19810. procedure setTXNFULLIE; inline;
  19811. procedure setTXNFULLIF; inline;
  19812. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19813. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19814. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19815. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19816. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19817. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19818. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19819. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19820. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19821. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19822. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19823. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19824. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19825. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19826. property w : TBits_32 read getw write setw;
  19827. end;
  19828. TCAN1_C1FIFOCI27 = record
  19829. private
  19830. function getCFIFOCI : TBits_5; inline;
  19831. function getw : TBits_32; inline;
  19832. procedure setCFIFOCI(thebits : TBits_5); inline;
  19833. procedure setw(thebits : TBits_32); inline;
  19834. public
  19835. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19836. property w : TBits_32 read getw write setw;
  19837. end;
  19838. TCAN1_C1FIFOCON28 = record
  19839. private
  19840. function getDONLY : TBits_1; inline;
  19841. function getFRESET : TBits_1; inline;
  19842. function getFSIZE : TBits_5; inline;
  19843. function getRTREN : TBits_1; inline;
  19844. function getTXABAT : TBits_1; inline;
  19845. function getTXEN : TBits_1; inline;
  19846. function getTXERR : TBits_1; inline;
  19847. function getTXLARB : TBits_1; inline;
  19848. function getTXPRI : TBits_2; inline;
  19849. function getTXREQ : TBits_1; inline;
  19850. function getUINC : TBits_1; inline;
  19851. function getw : TBits_32; inline;
  19852. procedure setDONLY(thebits : TBits_1); inline;
  19853. procedure setFRESET(thebits : TBits_1); inline;
  19854. procedure setFSIZE(thebits : TBits_5); inline;
  19855. procedure setRTREN(thebits : TBits_1); inline;
  19856. procedure setTXABAT(thebits : TBits_1); inline;
  19857. procedure setTXEN(thebits : TBits_1); inline;
  19858. procedure setTXERR(thebits : TBits_1); inline;
  19859. procedure setTXLARB(thebits : TBits_1); inline;
  19860. procedure setTXPRI(thebits : TBits_2); inline;
  19861. procedure setTXREQ(thebits : TBits_1); inline;
  19862. procedure setUINC(thebits : TBits_1); inline;
  19863. procedure setw(thebits : TBits_32); inline;
  19864. public
  19865. procedure clearDONLY; inline;
  19866. procedure clearFRESET; inline;
  19867. procedure clearRTREN; inline;
  19868. procedure clearTXABAT; inline;
  19869. procedure clearTXEN; inline;
  19870. procedure clearTXERR; inline;
  19871. procedure clearTXLARB; inline;
  19872. procedure clearTXREQ; inline;
  19873. procedure clearUINC; inline;
  19874. procedure setDONLY; inline;
  19875. procedure setFRESET; inline;
  19876. procedure setRTREN; inline;
  19877. procedure setTXABAT; inline;
  19878. procedure setTXEN; inline;
  19879. procedure setTXERR; inline;
  19880. procedure setTXLARB; inline;
  19881. procedure setTXREQ; inline;
  19882. procedure setUINC; inline;
  19883. property DONLY : TBits_1 read getDONLY write setDONLY;
  19884. property FRESET : TBits_1 read getFRESET write setFRESET;
  19885. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19886. property RTREN : TBits_1 read getRTREN write setRTREN;
  19887. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19888. property TXEN : TBits_1 read getTXEN write setTXEN;
  19889. property TXERR : TBits_1 read getTXERR write setTXERR;
  19890. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19891. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19892. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19893. property UINC : TBits_1 read getUINC write setUINC;
  19894. property w : TBits_32 read getw write setw;
  19895. end;
  19896. TCAN1_C1FIFOINT28 = record
  19897. private
  19898. function getRXFULLIE : TBits_1; inline;
  19899. function getRXFULLIF : TBits_1; inline;
  19900. function getRXHALFIE : TBits_1; inline;
  19901. function getRXHALFIF : TBits_1; inline;
  19902. function getRXNEMPTYIE : TBits_1; inline;
  19903. function getRXNEMPTYIF : TBits_1; inline;
  19904. function getRXOVFLIE : TBits_1; inline;
  19905. function getRXOVFLIF : TBits_1; inline;
  19906. function getTXEMPTYIE : TBits_1; inline;
  19907. function getTXEMPTYIF : TBits_1; inline;
  19908. function getTXHALFIE : TBits_1; inline;
  19909. function getTXHALFIF : TBits_1; inline;
  19910. function getTXNFULLIE : TBits_1; inline;
  19911. function getTXNFULLIF : TBits_1; inline;
  19912. function getw : TBits_32; inline;
  19913. procedure setRXFULLIE(thebits : TBits_1); inline;
  19914. procedure setRXFULLIF(thebits : TBits_1); inline;
  19915. procedure setRXHALFIE(thebits : TBits_1); inline;
  19916. procedure setRXHALFIF(thebits : TBits_1); inline;
  19917. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19918. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19919. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19920. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19921. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19922. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19923. procedure setTXHALFIE(thebits : TBits_1); inline;
  19924. procedure setTXHALFIF(thebits : TBits_1); inline;
  19925. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19926. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19927. procedure setw(thebits : TBits_32); inline;
  19928. public
  19929. procedure clearRXFULLIE; inline;
  19930. procedure clearRXFULLIF; inline;
  19931. procedure clearRXHALFIE; inline;
  19932. procedure clearRXHALFIF; inline;
  19933. procedure clearRXNEMPTYIE; inline;
  19934. procedure clearRXNEMPTYIF; inline;
  19935. procedure clearRXOVFLIE; inline;
  19936. procedure clearRXOVFLIF; inline;
  19937. procedure clearTXEMPTYIE; inline;
  19938. procedure clearTXEMPTYIF; inline;
  19939. procedure clearTXHALFIE; inline;
  19940. procedure clearTXHALFIF; inline;
  19941. procedure clearTXNFULLIE; inline;
  19942. procedure clearTXNFULLIF; inline;
  19943. procedure setRXFULLIE; inline;
  19944. procedure setRXFULLIF; inline;
  19945. procedure setRXHALFIE; inline;
  19946. procedure setRXHALFIF; inline;
  19947. procedure setRXNEMPTYIE; inline;
  19948. procedure setRXNEMPTYIF; inline;
  19949. procedure setRXOVFLIE; inline;
  19950. procedure setRXOVFLIF; inline;
  19951. procedure setTXEMPTYIE; inline;
  19952. procedure setTXEMPTYIF; inline;
  19953. procedure setTXHALFIE; inline;
  19954. procedure setTXHALFIF; inline;
  19955. procedure setTXNFULLIE; inline;
  19956. procedure setTXNFULLIF; inline;
  19957. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19958. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19959. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19960. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19961. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19962. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19963. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19964. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19965. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19966. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19967. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19968. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19969. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19970. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19971. property w : TBits_32 read getw write setw;
  19972. end;
  19973. TCAN1_C1FIFOCI28 = record
  19974. private
  19975. function getCFIFOCI : TBits_5; inline;
  19976. function getw : TBits_32; inline;
  19977. procedure setCFIFOCI(thebits : TBits_5); inline;
  19978. procedure setw(thebits : TBits_32); inline;
  19979. public
  19980. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19981. property w : TBits_32 read getw write setw;
  19982. end;
  19983. TCAN1_C1FIFOCON29 = record
  19984. private
  19985. function getDONLY : TBits_1; inline;
  19986. function getFRESET : TBits_1; inline;
  19987. function getFSIZE : TBits_5; inline;
  19988. function getRTREN : TBits_1; inline;
  19989. function getTXABAT : TBits_1; inline;
  19990. function getTXEN : TBits_1; inline;
  19991. function getTXERR : TBits_1; inline;
  19992. function getTXLARB : TBits_1; inline;
  19993. function getTXPRI : TBits_2; inline;
  19994. function getTXREQ : TBits_1; inline;
  19995. function getUINC : TBits_1; inline;
  19996. function getw : TBits_32; inline;
  19997. procedure setDONLY(thebits : TBits_1); inline;
  19998. procedure setFRESET(thebits : TBits_1); inline;
  19999. procedure setFSIZE(thebits : TBits_5); inline;
  20000. procedure setRTREN(thebits : TBits_1); inline;
  20001. procedure setTXABAT(thebits : TBits_1); inline;
  20002. procedure setTXEN(thebits : TBits_1); inline;
  20003. procedure setTXERR(thebits : TBits_1); inline;
  20004. procedure setTXLARB(thebits : TBits_1); inline;
  20005. procedure setTXPRI(thebits : TBits_2); inline;
  20006. procedure setTXREQ(thebits : TBits_1); inline;
  20007. procedure setUINC(thebits : TBits_1); inline;
  20008. procedure setw(thebits : TBits_32); inline;
  20009. public
  20010. procedure clearDONLY; inline;
  20011. procedure clearFRESET; inline;
  20012. procedure clearRTREN; inline;
  20013. procedure clearTXABAT; inline;
  20014. procedure clearTXEN; inline;
  20015. procedure clearTXERR; inline;
  20016. procedure clearTXLARB; inline;
  20017. procedure clearTXREQ; inline;
  20018. procedure clearUINC; inline;
  20019. procedure setDONLY; inline;
  20020. procedure setFRESET; inline;
  20021. procedure setRTREN; inline;
  20022. procedure setTXABAT; inline;
  20023. procedure setTXEN; inline;
  20024. procedure setTXERR; inline;
  20025. procedure setTXLARB; inline;
  20026. procedure setTXREQ; inline;
  20027. procedure setUINC; inline;
  20028. property DONLY : TBits_1 read getDONLY write setDONLY;
  20029. property FRESET : TBits_1 read getFRESET write setFRESET;
  20030. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20031. property RTREN : TBits_1 read getRTREN write setRTREN;
  20032. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20033. property TXEN : TBits_1 read getTXEN write setTXEN;
  20034. property TXERR : TBits_1 read getTXERR write setTXERR;
  20035. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20036. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20037. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20038. property UINC : TBits_1 read getUINC write setUINC;
  20039. property w : TBits_32 read getw write setw;
  20040. end;
  20041. TCAN1_C1FIFOINT29 = record
  20042. private
  20043. function getRXFULLIE : TBits_1; inline;
  20044. function getRXFULLIF : TBits_1; inline;
  20045. function getRXHALFIE : TBits_1; inline;
  20046. function getRXHALFIF : TBits_1; inline;
  20047. function getRXNEMPTYIE : TBits_1; inline;
  20048. function getRXNEMPTYIF : TBits_1; inline;
  20049. function getRXOVFLIE : TBits_1; inline;
  20050. function getRXOVFLIF : TBits_1; inline;
  20051. function getTXEMPTYIE : TBits_1; inline;
  20052. function getTXEMPTYIF : TBits_1; inline;
  20053. function getTXHALFIE : TBits_1; inline;
  20054. function getTXHALFIF : TBits_1; inline;
  20055. function getTXNFULLIE : TBits_1; inline;
  20056. function getTXNFULLIF : TBits_1; inline;
  20057. function getw : TBits_32; inline;
  20058. procedure setRXFULLIE(thebits : TBits_1); inline;
  20059. procedure setRXFULLIF(thebits : TBits_1); inline;
  20060. procedure setRXHALFIE(thebits : TBits_1); inline;
  20061. procedure setRXHALFIF(thebits : TBits_1); inline;
  20062. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20063. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20064. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20065. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20066. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20067. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20068. procedure setTXHALFIE(thebits : TBits_1); inline;
  20069. procedure setTXHALFIF(thebits : TBits_1); inline;
  20070. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20071. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20072. procedure setw(thebits : TBits_32); inline;
  20073. public
  20074. procedure clearRXFULLIE; inline;
  20075. procedure clearRXFULLIF; inline;
  20076. procedure clearRXHALFIE; inline;
  20077. procedure clearRXHALFIF; inline;
  20078. procedure clearRXNEMPTYIE; inline;
  20079. procedure clearRXNEMPTYIF; inline;
  20080. procedure clearRXOVFLIE; inline;
  20081. procedure clearRXOVFLIF; inline;
  20082. procedure clearTXEMPTYIE; inline;
  20083. procedure clearTXEMPTYIF; inline;
  20084. procedure clearTXHALFIE; inline;
  20085. procedure clearTXHALFIF; inline;
  20086. procedure clearTXNFULLIE; inline;
  20087. procedure clearTXNFULLIF; inline;
  20088. procedure setRXFULLIE; inline;
  20089. procedure setRXFULLIF; inline;
  20090. procedure setRXHALFIE; inline;
  20091. procedure setRXHALFIF; inline;
  20092. procedure setRXNEMPTYIE; inline;
  20093. procedure setRXNEMPTYIF; inline;
  20094. procedure setRXOVFLIE; inline;
  20095. procedure setRXOVFLIF; inline;
  20096. procedure setTXEMPTYIE; inline;
  20097. procedure setTXEMPTYIF; inline;
  20098. procedure setTXHALFIE; inline;
  20099. procedure setTXHALFIF; inline;
  20100. procedure setTXNFULLIE; inline;
  20101. procedure setTXNFULLIF; inline;
  20102. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20103. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20104. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20105. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20106. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20107. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20108. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20109. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20110. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20111. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20112. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20113. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20114. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20115. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20116. property w : TBits_32 read getw write setw;
  20117. end;
  20118. TCAN1_C1FIFOCI29 = record
  20119. private
  20120. function getCFIFOCI : TBits_5; inline;
  20121. function getw : TBits_32; inline;
  20122. procedure setCFIFOCI(thebits : TBits_5); inline;
  20123. procedure setw(thebits : TBits_32); inline;
  20124. public
  20125. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20126. property w : TBits_32 read getw write setw;
  20127. end;
  20128. TCAN1_C1FIFOCON30 = record
  20129. private
  20130. function getDONLY : TBits_1; inline;
  20131. function getFRESET : TBits_1; inline;
  20132. function getFSIZE : TBits_5; inline;
  20133. function getRTREN : TBits_1; inline;
  20134. function getTXABAT : TBits_1; inline;
  20135. function getTXEN : TBits_1; inline;
  20136. function getTXERR : TBits_1; inline;
  20137. function getTXLARB : TBits_1; inline;
  20138. function getTXPRI : TBits_2; inline;
  20139. function getTXREQ : TBits_1; inline;
  20140. function getUINC : TBits_1; inline;
  20141. function getw : TBits_32; inline;
  20142. procedure setDONLY(thebits : TBits_1); inline;
  20143. procedure setFRESET(thebits : TBits_1); inline;
  20144. procedure setFSIZE(thebits : TBits_5); inline;
  20145. procedure setRTREN(thebits : TBits_1); inline;
  20146. procedure setTXABAT(thebits : TBits_1); inline;
  20147. procedure setTXEN(thebits : TBits_1); inline;
  20148. procedure setTXERR(thebits : TBits_1); inline;
  20149. procedure setTXLARB(thebits : TBits_1); inline;
  20150. procedure setTXPRI(thebits : TBits_2); inline;
  20151. procedure setTXREQ(thebits : TBits_1); inline;
  20152. procedure setUINC(thebits : TBits_1); inline;
  20153. procedure setw(thebits : TBits_32); inline;
  20154. public
  20155. procedure clearDONLY; inline;
  20156. procedure clearFRESET; inline;
  20157. procedure clearRTREN; inline;
  20158. procedure clearTXABAT; inline;
  20159. procedure clearTXEN; inline;
  20160. procedure clearTXERR; inline;
  20161. procedure clearTXLARB; inline;
  20162. procedure clearTXREQ; inline;
  20163. procedure clearUINC; inline;
  20164. procedure setDONLY; inline;
  20165. procedure setFRESET; inline;
  20166. procedure setRTREN; inline;
  20167. procedure setTXABAT; inline;
  20168. procedure setTXEN; inline;
  20169. procedure setTXERR; inline;
  20170. procedure setTXLARB; inline;
  20171. procedure setTXREQ; inline;
  20172. procedure setUINC; inline;
  20173. property DONLY : TBits_1 read getDONLY write setDONLY;
  20174. property FRESET : TBits_1 read getFRESET write setFRESET;
  20175. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20176. property RTREN : TBits_1 read getRTREN write setRTREN;
  20177. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20178. property TXEN : TBits_1 read getTXEN write setTXEN;
  20179. property TXERR : TBits_1 read getTXERR write setTXERR;
  20180. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20181. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20182. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20183. property UINC : TBits_1 read getUINC write setUINC;
  20184. property w : TBits_32 read getw write setw;
  20185. end;
  20186. TCAN1_C1FIFOINT30 = record
  20187. private
  20188. function getRXFULLIE : TBits_1; inline;
  20189. function getRXFULLIF : TBits_1; inline;
  20190. function getRXHALFIE : TBits_1; inline;
  20191. function getRXHALFIF : TBits_1; inline;
  20192. function getRXNEMPTYIE : TBits_1; inline;
  20193. function getRXNEMPTYIF : TBits_1; inline;
  20194. function getRXOVFLIE : TBits_1; inline;
  20195. function getRXOVFLIF : TBits_1; inline;
  20196. function getTXEMPTYIE : TBits_1; inline;
  20197. function getTXEMPTYIF : TBits_1; inline;
  20198. function getTXHALFIE : TBits_1; inline;
  20199. function getTXHALFIF : TBits_1; inline;
  20200. function getTXNFULLIE : TBits_1; inline;
  20201. function getTXNFULLIF : TBits_1; inline;
  20202. function getw : TBits_32; inline;
  20203. procedure setRXFULLIE(thebits : TBits_1); inline;
  20204. procedure setRXFULLIF(thebits : TBits_1); inline;
  20205. procedure setRXHALFIE(thebits : TBits_1); inline;
  20206. procedure setRXHALFIF(thebits : TBits_1); inline;
  20207. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20208. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20209. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20210. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20211. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20212. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20213. procedure setTXHALFIE(thebits : TBits_1); inline;
  20214. procedure setTXHALFIF(thebits : TBits_1); inline;
  20215. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20216. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20217. procedure setw(thebits : TBits_32); inline;
  20218. public
  20219. procedure clearRXFULLIE; inline;
  20220. procedure clearRXFULLIF; inline;
  20221. procedure clearRXHALFIE; inline;
  20222. procedure clearRXHALFIF; inline;
  20223. procedure clearRXNEMPTYIE; inline;
  20224. procedure clearRXNEMPTYIF; inline;
  20225. procedure clearRXOVFLIE; inline;
  20226. procedure clearRXOVFLIF; inline;
  20227. procedure clearTXEMPTYIE; inline;
  20228. procedure clearTXEMPTYIF; inline;
  20229. procedure clearTXHALFIE; inline;
  20230. procedure clearTXHALFIF; inline;
  20231. procedure clearTXNFULLIE; inline;
  20232. procedure clearTXNFULLIF; inline;
  20233. procedure setRXFULLIE; inline;
  20234. procedure setRXFULLIF; inline;
  20235. procedure setRXHALFIE; inline;
  20236. procedure setRXHALFIF; inline;
  20237. procedure setRXNEMPTYIE; inline;
  20238. procedure setRXNEMPTYIF; inline;
  20239. procedure setRXOVFLIE; inline;
  20240. procedure setRXOVFLIF; inline;
  20241. procedure setTXEMPTYIE; inline;
  20242. procedure setTXEMPTYIF; inline;
  20243. procedure setTXHALFIE; inline;
  20244. procedure setTXHALFIF; inline;
  20245. procedure setTXNFULLIE; inline;
  20246. procedure setTXNFULLIF; inline;
  20247. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20248. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20249. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20250. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20251. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20252. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20253. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20254. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20255. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20256. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20257. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20258. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20259. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20260. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20261. property w : TBits_32 read getw write setw;
  20262. end;
  20263. TCAN1_C1FIFOCI30 = record
  20264. private
  20265. function getCFIFOCI : TBits_5; inline;
  20266. function getw : TBits_32; inline;
  20267. procedure setCFIFOCI(thebits : TBits_5); inline;
  20268. procedure setw(thebits : TBits_32); inline;
  20269. public
  20270. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20271. property w : TBits_32 read getw write setw;
  20272. end;
  20273. TCAN1_C1FIFOCON31 = record
  20274. private
  20275. function getDONLY : TBits_1; inline;
  20276. function getFRESET : TBits_1; inline;
  20277. function getFSIZE : TBits_5; inline;
  20278. function getRTREN : TBits_1; inline;
  20279. function getTXABAT : TBits_1; inline;
  20280. function getTXEN : TBits_1; inline;
  20281. function getTXERR : TBits_1; inline;
  20282. function getTXLARB : TBits_1; inline;
  20283. function getTXPRI : TBits_2; inline;
  20284. function getTXREQ : TBits_1; inline;
  20285. function getUINC : TBits_1; inline;
  20286. function getw : TBits_32; inline;
  20287. procedure setDONLY(thebits : TBits_1); inline;
  20288. procedure setFRESET(thebits : TBits_1); inline;
  20289. procedure setFSIZE(thebits : TBits_5); inline;
  20290. procedure setRTREN(thebits : TBits_1); inline;
  20291. procedure setTXABAT(thebits : TBits_1); inline;
  20292. procedure setTXEN(thebits : TBits_1); inline;
  20293. procedure setTXERR(thebits : TBits_1); inline;
  20294. procedure setTXLARB(thebits : TBits_1); inline;
  20295. procedure setTXPRI(thebits : TBits_2); inline;
  20296. procedure setTXREQ(thebits : TBits_1); inline;
  20297. procedure setUINC(thebits : TBits_1); inline;
  20298. procedure setw(thebits : TBits_32); inline;
  20299. public
  20300. procedure clearDONLY; inline;
  20301. procedure clearFRESET; inline;
  20302. procedure clearRTREN; inline;
  20303. procedure clearTXABAT; inline;
  20304. procedure clearTXEN; inline;
  20305. procedure clearTXERR; inline;
  20306. procedure clearTXLARB; inline;
  20307. procedure clearTXREQ; inline;
  20308. procedure clearUINC; inline;
  20309. procedure setDONLY; inline;
  20310. procedure setFRESET; inline;
  20311. procedure setRTREN; inline;
  20312. procedure setTXABAT; inline;
  20313. procedure setTXEN; inline;
  20314. procedure setTXERR; inline;
  20315. procedure setTXLARB; inline;
  20316. procedure setTXREQ; inline;
  20317. procedure setUINC; inline;
  20318. property DONLY : TBits_1 read getDONLY write setDONLY;
  20319. property FRESET : TBits_1 read getFRESET write setFRESET;
  20320. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20321. property RTREN : TBits_1 read getRTREN write setRTREN;
  20322. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20323. property TXEN : TBits_1 read getTXEN write setTXEN;
  20324. property TXERR : TBits_1 read getTXERR write setTXERR;
  20325. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20326. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20327. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20328. property UINC : TBits_1 read getUINC write setUINC;
  20329. property w : TBits_32 read getw write setw;
  20330. end;
  20331. TCAN1_C1FIFOINT31 = record
  20332. private
  20333. function getRXFULLIE : TBits_1; inline;
  20334. function getRXFULLIF : TBits_1; inline;
  20335. function getRXHALFIE : TBits_1; inline;
  20336. function getRXHALFIF : TBits_1; inline;
  20337. function getRXNEMPTYIE : TBits_1; inline;
  20338. function getRXNEMPTYIF : TBits_1; inline;
  20339. function getRXOVFLIE : TBits_1; inline;
  20340. function getRXOVFLIF : TBits_1; inline;
  20341. function getTXEMPTYIE : TBits_1; inline;
  20342. function getTXEMPTYIF : TBits_1; inline;
  20343. function getTXHALFIE : TBits_1; inline;
  20344. function getTXHALFIF : TBits_1; inline;
  20345. function getTXNFULLIE : TBits_1; inline;
  20346. function getTXNFULLIF : TBits_1; inline;
  20347. function getw : TBits_32; inline;
  20348. procedure setRXFULLIE(thebits : TBits_1); inline;
  20349. procedure setRXFULLIF(thebits : TBits_1); inline;
  20350. procedure setRXHALFIE(thebits : TBits_1); inline;
  20351. procedure setRXHALFIF(thebits : TBits_1); inline;
  20352. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20353. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20354. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20355. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20356. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20357. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20358. procedure setTXHALFIE(thebits : TBits_1); inline;
  20359. procedure setTXHALFIF(thebits : TBits_1); inline;
  20360. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20361. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20362. procedure setw(thebits : TBits_32); inline;
  20363. public
  20364. procedure clearRXFULLIE; inline;
  20365. procedure clearRXFULLIF; inline;
  20366. procedure clearRXHALFIE; inline;
  20367. procedure clearRXHALFIF; inline;
  20368. procedure clearRXNEMPTYIE; inline;
  20369. procedure clearRXNEMPTYIF; inline;
  20370. procedure clearRXOVFLIE; inline;
  20371. procedure clearRXOVFLIF; inline;
  20372. procedure clearTXEMPTYIE; inline;
  20373. procedure clearTXEMPTYIF; inline;
  20374. procedure clearTXHALFIE; inline;
  20375. procedure clearTXHALFIF; inline;
  20376. procedure clearTXNFULLIE; inline;
  20377. procedure clearTXNFULLIF; inline;
  20378. procedure setRXFULLIE; inline;
  20379. procedure setRXFULLIF; inline;
  20380. procedure setRXHALFIE; inline;
  20381. procedure setRXHALFIF; inline;
  20382. procedure setRXNEMPTYIE; inline;
  20383. procedure setRXNEMPTYIF; inline;
  20384. procedure setRXOVFLIE; inline;
  20385. procedure setRXOVFLIF; inline;
  20386. procedure setTXEMPTYIE; inline;
  20387. procedure setTXEMPTYIF; inline;
  20388. procedure setTXHALFIE; inline;
  20389. procedure setTXHALFIF; inline;
  20390. procedure setTXNFULLIE; inline;
  20391. procedure setTXNFULLIF; inline;
  20392. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20393. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20394. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20395. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20396. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20397. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20398. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20399. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20400. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20401. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20402. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20403. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20404. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20405. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20406. property w : TBits_32 read getw write setw;
  20407. end;
  20408. TCAN1_C1FIFOCI31 = record
  20409. private
  20410. function getCFIFOCI : TBits_5; inline;
  20411. function getw : TBits_32; inline;
  20412. procedure setCFIFOCI(thebits : TBits_5); inline;
  20413. procedure setw(thebits : TBits_32); inline;
  20414. public
  20415. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20416. property w : TBits_32 read getw write setw;
  20417. end;
  20418. type
  20419. TCAN1Registers = record
  20420. C1CONbits : TCAN1_C1CON;
  20421. C1CON : longWord;
  20422. C1CONCLR : longWord;
  20423. C1CONSET : longWord;
  20424. C1CONINV : longWord;
  20425. C1CFGbits : TCAN1_C1CFG;
  20426. C1CFG : longWord;
  20427. C1CFGCLR : longWord;
  20428. C1CFGSET : longWord;
  20429. C1CFGINV : longWord;
  20430. C1INTbits : TCAN1_C1INT;
  20431. C1INT : longWord;
  20432. C1INTCLR : longWord;
  20433. C1INTSET : longWord;
  20434. C1INTINV : longWord;
  20435. C1VECbits : TCAN1_C1VEC;
  20436. C1VEC : longWord;
  20437. C1VECCLR : longWord;
  20438. C1VECSET : longWord;
  20439. C1VECINV : longWord;
  20440. C1TRECbits : TCAN1_C1TREC;
  20441. C1TREC : longWord;
  20442. C1TRECCLR : longWord;
  20443. C1TRECSET : longWord;
  20444. C1TRECINV : longWord;
  20445. C1FSTATbits : TCAN1_C1FSTAT;
  20446. C1FSTAT : longWord;
  20447. C1FSTATCLR : longWord;
  20448. C1FSTATSET : longWord;
  20449. C1FSTATINV : longWord;
  20450. C1RXOVFbits : TCAN1_C1RXOVF;
  20451. C1RXOVF : longWord;
  20452. C1RXOVFCLR : longWord;
  20453. C1RXOVFSET : longWord;
  20454. C1RXOVFINV : longWord;
  20455. C1TMRbits : TCAN1_C1TMR;
  20456. C1TMR : longWord;
  20457. C1TMRCLR : longWord;
  20458. C1TMRSET : longWord;
  20459. C1TMRINV : longWord;
  20460. C1RXM0bits : TCAN1_C1RXM0;
  20461. C1RXM0 : longWord;
  20462. C1RXM0CLR : longWord;
  20463. C1RXM0SET : longWord;
  20464. C1RXM0INV : longWord;
  20465. C1RXM1bits : TCAN1_C1RXM1;
  20466. C1RXM1 : longWord;
  20467. C1RXM1CLR : longWord;
  20468. C1RXM1SET : longWord;
  20469. C1RXM1INV : longWord;
  20470. C1RXM2bits : TCAN1_C1RXM2;
  20471. C1RXM2 : longWord;
  20472. C1RXM2CLR : longWord;
  20473. C1RXM2SET : longWord;
  20474. C1RXM2INV : longWord;
  20475. C1RXM3bits : TCAN1_C1RXM3;
  20476. C1RXM3 : longWord;
  20477. C1RXM3CLR : longWord;
  20478. C1RXM3SET : longWord;
  20479. C1RXM3INV : longWord;
  20480. C1FLTCON0bits : TCAN1_C1FLTCON0;
  20481. C1FLTCON0 : longWord;
  20482. C1FLTCON0CLR : longWord;
  20483. C1FLTCON0SET : longWord;
  20484. C1FLTCON0INV : longWord;
  20485. C1FLTCON1bits : TCAN1_C1FLTCON1;
  20486. C1FLTCON1 : longWord;
  20487. C1FLTCON1CLR : longWord;
  20488. C1FLTCON1SET : longWord;
  20489. C1FLTCON1INV : longWord;
  20490. C1FLTCON2bits : TCAN1_C1FLTCON2;
  20491. C1FLTCON2 : longWord;
  20492. C1FLTCON2CLR : longWord;
  20493. C1FLTCON2SET : longWord;
  20494. C1FLTCON2INV : longWord;
  20495. C1FLTCON3bits : TCAN1_C1FLTCON3;
  20496. C1FLTCON3 : longWord;
  20497. C1FLTCON3CLR : longWord;
  20498. C1FLTCON3SET : longWord;
  20499. C1FLTCON3INV : longWord;
  20500. C1FLTCON4bits : TCAN1_C1FLTCON4;
  20501. C1FLTCON4 : longWord;
  20502. C1FLTCON4CLR : longWord;
  20503. C1FLTCON4SET : longWord;
  20504. C1FLTCON4INV : longWord;
  20505. C1FLTCON5bits : TCAN1_C1FLTCON5;
  20506. C1FLTCON5 : longWord;
  20507. C1FLTCON5CLR : longWord;
  20508. C1FLTCON5SET : longWord;
  20509. C1FLTCON5INV : longWord;
  20510. C1FLTCON6bits : TCAN1_C1FLTCON6;
  20511. C1FLTCON6 : longWord;
  20512. C1FLTCON6CLR : longWord;
  20513. C1FLTCON6SET : longWord;
  20514. C1FLTCON6INV : longWord;
  20515. C1FLTCON7bits : TCAN1_C1FLTCON7;
  20516. C1FLTCON7 : longWord;
  20517. C1FLTCON7CLR : longWord;
  20518. C1FLTCON7SET : longWord;
  20519. C1FLTCON7INV : longWord;
  20520. C1RXF0bits : TCAN1_C1RXF0;
  20521. C1RXF0 : longWord;
  20522. C1RXF0CLR : longWord;
  20523. C1RXF0SET : longWord;
  20524. C1RXF0INV : longWord;
  20525. C1RXF1bits : TCAN1_C1RXF1;
  20526. C1RXF1 : longWord;
  20527. C1RXF1CLR : longWord;
  20528. C1RXF1SET : longWord;
  20529. C1RXF1INV : longWord;
  20530. C1RXF2bits : TCAN1_C1RXF2;
  20531. C1RXF2 : longWord;
  20532. C1RXF2CLR : longWord;
  20533. C1RXF2SET : longWord;
  20534. C1RXF2INV : longWord;
  20535. C1RXF3bits : TCAN1_C1RXF3;
  20536. C1RXF3 : longWord;
  20537. C1RXF3CLR : longWord;
  20538. C1RXF3SET : longWord;
  20539. C1RXF3INV : longWord;
  20540. C1RXF4bits : TCAN1_C1RXF4;
  20541. C1RXF4 : longWord;
  20542. C1RXF4CLR : longWord;
  20543. C1RXF4SET : longWord;
  20544. C1RXF4INV : longWord;
  20545. C1RXF5bits : TCAN1_C1RXF5;
  20546. C1RXF5 : longWord;
  20547. C1RXF5CLR : longWord;
  20548. C1RXF5SET : longWord;
  20549. C1RXF5INV : longWord;
  20550. C1RXF6bits : TCAN1_C1RXF6;
  20551. C1RXF6 : longWord;
  20552. C1RXF6CLR : longWord;
  20553. C1RXF6SET : longWord;
  20554. C1RXF6INV : longWord;
  20555. C1RXF7bits : TCAN1_C1RXF7;
  20556. C1RXF7 : longWord;
  20557. C1RXF7CLR : longWord;
  20558. C1RXF7SET : longWord;
  20559. C1RXF7INV : longWord;
  20560. C1RXF8bits : TCAN1_C1RXF8;
  20561. C1RXF8 : longWord;
  20562. C1RXF8CLR : longWord;
  20563. C1RXF8SET : longWord;
  20564. C1RXF8INV : longWord;
  20565. C1RXF9bits : TCAN1_C1RXF9;
  20566. C1RXF9 : longWord;
  20567. C1RXF9CLR : longWord;
  20568. C1RXF9SET : longWord;
  20569. C1RXF9INV : longWord;
  20570. C1RXF10bits : TCAN1_C1RXF10;
  20571. C1RXF10 : longWord;
  20572. C1RXF10CLR : longWord;
  20573. C1RXF10SET : longWord;
  20574. C1RXF10INV : longWord;
  20575. C1RXF11bits : TCAN1_C1RXF11;
  20576. C1RXF11 : longWord;
  20577. C1RXF11CLR : longWord;
  20578. C1RXF11SET : longWord;
  20579. C1RXF11INV : longWord;
  20580. C1RXF12bits : TCAN1_C1RXF12;
  20581. C1RXF12 : longWord;
  20582. C1RXF12CLR : longWord;
  20583. C1RXF12SET : longWord;
  20584. C1RXF12INV : longWord;
  20585. C1RXF13bits : TCAN1_C1RXF13;
  20586. C1RXF13 : longWord;
  20587. C1RXF13CLR : longWord;
  20588. C1RXF13SET : longWord;
  20589. C1RXF13INV : longWord;
  20590. C1RXF14bits : TCAN1_C1RXF14;
  20591. C1RXF14 : longWord;
  20592. C1RXF14CLR : longWord;
  20593. C1RXF14SET : longWord;
  20594. C1RXF14INV : longWord;
  20595. C1RXF15bits : TCAN1_C1RXF15;
  20596. C1RXF15 : longWord;
  20597. C1RXF15CLR : longWord;
  20598. C1RXF15SET : longWord;
  20599. C1RXF15INV : longWord;
  20600. C1RXF16bits : TCAN1_C1RXF16;
  20601. C1RXF16 : longWord;
  20602. C1RXF16CLR : longWord;
  20603. C1RXF16SET : longWord;
  20604. C1RXF16INV : longWord;
  20605. C1RXF17bits : TCAN1_C1RXF17;
  20606. C1RXF17 : longWord;
  20607. C1RXF17CLR : longWord;
  20608. C1RXF17SET : longWord;
  20609. C1RXF17INV : longWord;
  20610. C1RXF18bits : TCAN1_C1RXF18;
  20611. C1RXF18 : longWord;
  20612. C1RXF18CLR : longWord;
  20613. C1RXF18SET : longWord;
  20614. C1RXF18INV : longWord;
  20615. C1RXF19bits : TCAN1_C1RXF19;
  20616. C1RXF19 : longWord;
  20617. C1RXF19CLR : longWord;
  20618. C1RXF19SET : longWord;
  20619. C1RXF19INV : longWord;
  20620. C1RXF20bits : TCAN1_C1RXF20;
  20621. C1RXF20 : longWord;
  20622. C1RXF20CLR : longWord;
  20623. C1RXF20SET : longWord;
  20624. C1RXF20INV : longWord;
  20625. C1RXF21bits : TCAN1_C1RXF21;
  20626. C1RXF21 : longWord;
  20627. C1RXF21CLR : longWord;
  20628. C1RXF21SET : longWord;
  20629. C1RXF21INV : longWord;
  20630. C1RXF22bits : TCAN1_C1RXF22;
  20631. C1RXF22 : longWord;
  20632. C1RXF22CLR : longWord;
  20633. C1RXF22SET : longWord;
  20634. C1RXF22INV : longWord;
  20635. C1RXF23bits : TCAN1_C1RXF23;
  20636. C1RXF23 : longWord;
  20637. C1RXF23CLR : longWord;
  20638. C1RXF23SET : longWord;
  20639. C1RXF23INV : longWord;
  20640. C1RXF24bits : TCAN1_C1RXF24;
  20641. C1RXF24 : longWord;
  20642. C1RXF24CLR : longWord;
  20643. C1RXF24SET : longWord;
  20644. C1RXF24INV : longWord;
  20645. C1RXF25bits : TCAN1_C1RXF25;
  20646. C1RXF25 : longWord;
  20647. C1RXF25CLR : longWord;
  20648. C1RXF25SET : longWord;
  20649. C1RXF25INV : longWord;
  20650. C1RXF26bits : TCAN1_C1RXF26;
  20651. C1RXF26 : longWord;
  20652. C1RXF26CLR : longWord;
  20653. C1RXF26SET : longWord;
  20654. C1RXF26INV : longWord;
  20655. C1RXF27bits : TCAN1_C1RXF27;
  20656. C1RXF27 : longWord;
  20657. C1RXF27CLR : longWord;
  20658. C1RXF27SET : longWord;
  20659. C1RXF27INV : longWord;
  20660. C1RXF28bits : TCAN1_C1RXF28;
  20661. C1RXF28 : longWord;
  20662. C1RXF28CLR : longWord;
  20663. C1RXF28SET : longWord;
  20664. C1RXF28INV : longWord;
  20665. C1RXF29bits : TCAN1_C1RXF29;
  20666. C1RXF29 : longWord;
  20667. C1RXF29CLR : longWord;
  20668. C1RXF29SET : longWord;
  20669. C1RXF29INV : longWord;
  20670. C1RXF30bits : TCAN1_C1RXF30;
  20671. C1RXF30 : longWord;
  20672. C1RXF30CLR : longWord;
  20673. C1RXF30SET : longWord;
  20674. C1RXF30INV : longWord;
  20675. C1RXF31bits : TCAN1_C1RXF31;
  20676. C1RXF31 : longWord;
  20677. C1RXF31CLR : longWord;
  20678. C1RXF31SET : longWord;
  20679. C1RXF31INV : longWord;
  20680. C1FIFOBA : longWord;
  20681. C1FIFOBACLR : longWord;
  20682. C1FIFOBASET : longWord;
  20683. C1FIFOBAINV : longWord;
  20684. C1FIFOCON0bits : TCAN1_C1FIFOCON0;
  20685. C1FIFOCON0 : longWord;
  20686. C1FIFOCON0CLR : longWord;
  20687. C1FIFOCON0SET : longWord;
  20688. C1FIFOCON0INV : longWord;
  20689. C1FIFOINT0bits : TCAN1_C1FIFOINT0;
  20690. C1FIFOINT0 : longWord;
  20691. C1FIFOINT0CLR : longWord;
  20692. C1FIFOINT0SET : longWord;
  20693. C1FIFOINT0INV : longWord;
  20694. C1FIFOUA0 : longWord;
  20695. C1FIFOUA0CLR : longWord;
  20696. C1FIFOUA0SET : longWord;
  20697. C1FIFOUA0INV : longWord;
  20698. C1FIFOCI0bits : TCAN1_C1FIFOCI0;
  20699. C1FIFOCI0 : longWord;
  20700. C1FIFOCI0CLR : longWord;
  20701. C1FIFOCI0SET : longWord;
  20702. C1FIFOCI0INV : longWord;
  20703. C1FIFOCON1bits : TCAN1_C1FIFOCON1;
  20704. C1FIFOCON1 : longWord;
  20705. C1FIFOCON1CLR : longWord;
  20706. C1FIFOCON1SET : longWord;
  20707. C1FIFOCON1INV : longWord;
  20708. C1FIFOINT1bits : TCAN1_C1FIFOINT1;
  20709. C1FIFOINT1 : longWord;
  20710. C1FIFOINT1CLR : longWord;
  20711. C1FIFOINT1SET : longWord;
  20712. C1FIFOINT1INV : longWord;
  20713. C1FIFOUA1 : longWord;
  20714. C1FIFOUA1CLR : longWord;
  20715. C1FIFOUA1SET : longWord;
  20716. C1FIFOUA1INV : longWord;
  20717. C1FIFOCI1bits : TCAN1_C1FIFOCI1;
  20718. C1FIFOCI1 : longWord;
  20719. C1FIFOCI1CLR : longWord;
  20720. C1FIFOCI1SET : longWord;
  20721. C1FIFOCI1INV : longWord;
  20722. C1FIFOCON2bits : TCAN1_C1FIFOCON2;
  20723. C1FIFOCON2 : longWord;
  20724. C1FIFOCON2CLR : longWord;
  20725. C1FIFOCON2SET : longWord;
  20726. C1FIFOCON2INV : longWord;
  20727. C1FIFOINT2bits : TCAN1_C1FIFOINT2;
  20728. C1FIFOINT2 : longWord;
  20729. C1FIFOINT2CLR : longWord;
  20730. C1FIFOINT2SET : longWord;
  20731. C1FIFOINT2INV : longWord;
  20732. C1FIFOUA2 : longWord;
  20733. C1FIFOUA2CLR : longWord;
  20734. C1FIFOUA2SET : longWord;
  20735. C1FIFOUA2INV : longWord;
  20736. C1FIFOCI2bits : TCAN1_C1FIFOCI2;
  20737. C1FIFOCI2 : longWord;
  20738. C1FIFOCI2CLR : longWord;
  20739. C1FIFOCI2SET : longWord;
  20740. C1FIFOCI2INV : longWord;
  20741. C1FIFOCON3bits : TCAN1_C1FIFOCON3;
  20742. C1FIFOCON3 : longWord;
  20743. C1FIFOCON3CLR : longWord;
  20744. C1FIFOCON3SET : longWord;
  20745. C1FIFOCON3INV : longWord;
  20746. C1FIFOINT3bits : TCAN1_C1FIFOINT3;
  20747. C1FIFOINT3 : longWord;
  20748. C1FIFOINT3CLR : longWord;
  20749. C1FIFOINT3SET : longWord;
  20750. C1FIFOINT3INV : longWord;
  20751. C1FIFOUA3 : longWord;
  20752. C1FIFOUA3CLR : longWord;
  20753. C1FIFOUA3SET : longWord;
  20754. C1FIFOUA3INV : longWord;
  20755. C1FIFOCI3bits : TCAN1_C1FIFOCI3;
  20756. C1FIFOCI3 : longWord;
  20757. C1FIFOCI3CLR : longWord;
  20758. C1FIFOCI3SET : longWord;
  20759. C1FIFOCI3INV : longWord;
  20760. C1FIFOCON4bits : TCAN1_C1FIFOCON4;
  20761. C1FIFOCON4 : longWord;
  20762. C1FIFOCON4CLR : longWord;
  20763. C1FIFOCON4SET : longWord;
  20764. C1FIFOCON4INV : longWord;
  20765. C1FIFOINT4bits : TCAN1_C1FIFOINT4;
  20766. C1FIFOINT4 : longWord;
  20767. C1FIFOINT4CLR : longWord;
  20768. C1FIFOINT4SET : longWord;
  20769. C1FIFOINT4INV : longWord;
  20770. C1FIFOUA4 : longWord;
  20771. C1FIFOUA4CLR : longWord;
  20772. C1FIFOUA4SET : longWord;
  20773. C1FIFOUA4INV : longWord;
  20774. C1FIFOCI4bits : TCAN1_C1FIFOCI4;
  20775. C1FIFOCI4 : longWord;
  20776. C1FIFOCI4CLR : longWord;
  20777. C1FIFOCI4SET : longWord;
  20778. C1FIFOCI4INV : longWord;
  20779. C1FIFOCON5bits : TCAN1_C1FIFOCON5;
  20780. C1FIFOCON5 : longWord;
  20781. C1FIFOCON5CLR : longWord;
  20782. C1FIFOCON5SET : longWord;
  20783. C1FIFOCON5INV : longWord;
  20784. C1FIFOINT5bits : TCAN1_C1FIFOINT5;
  20785. C1FIFOINT5 : longWord;
  20786. C1FIFOINT5CLR : longWord;
  20787. C1FIFOINT5SET : longWord;
  20788. C1FIFOINT5INV : longWord;
  20789. C1FIFOUA5 : longWord;
  20790. C1FIFOUA5CLR : longWord;
  20791. C1FIFOUA5SET : longWord;
  20792. C1FIFOUA5INV : longWord;
  20793. C1FIFOCI5bits : TCAN1_C1FIFOCI5;
  20794. C1FIFOCI5 : longWord;
  20795. C1FIFOCI5CLR : longWord;
  20796. C1FIFOCI5SET : longWord;
  20797. C1FIFOCI5INV : longWord;
  20798. C1FIFOCON6bits : TCAN1_C1FIFOCON6;
  20799. C1FIFOCON6 : longWord;
  20800. C1FIFOCON6CLR : longWord;
  20801. C1FIFOCON6SET : longWord;
  20802. C1FIFOCON6INV : longWord;
  20803. C1FIFOINT6bits : TCAN1_C1FIFOINT6;
  20804. C1FIFOINT6 : longWord;
  20805. C1FIFOINT6CLR : longWord;
  20806. C1FIFOINT6SET : longWord;
  20807. C1FIFOINT6INV : longWord;
  20808. C1FIFOUA6 : longWord;
  20809. C1FIFOUA6CLR : longWord;
  20810. C1FIFOUA6SET : longWord;
  20811. C1FIFOUA6INV : longWord;
  20812. C1FIFOCI6bits : TCAN1_C1FIFOCI6;
  20813. C1FIFOCI6 : longWord;
  20814. C1FIFOCI6CLR : longWord;
  20815. C1FIFOCI6SET : longWord;
  20816. C1FIFOCI6INV : longWord;
  20817. C1FIFOCON7bits : TCAN1_C1FIFOCON7;
  20818. C1FIFOCON7 : longWord;
  20819. C1FIFOCON7CLR : longWord;
  20820. C1FIFOCON7SET : longWord;
  20821. C1FIFOCON7INV : longWord;
  20822. C1FIFOINT7bits : TCAN1_C1FIFOINT7;
  20823. C1FIFOINT7 : longWord;
  20824. C1FIFOINT7CLR : longWord;
  20825. C1FIFOINT7SET : longWord;
  20826. C1FIFOINT7INV : longWord;
  20827. C1FIFOUA7 : longWord;
  20828. C1FIFOUA7CLR : longWord;
  20829. C1FIFOUA7SET : longWord;
  20830. C1FIFOUA7INV : longWord;
  20831. C1FIFOCI7bits : TCAN1_C1FIFOCI7;
  20832. C1FIFOCI7 : longWord;
  20833. C1FIFOCI7CLR : longWord;
  20834. C1FIFOCI7SET : longWord;
  20835. C1FIFOCI7INV : longWord;
  20836. C1FIFOCON8bits : TCAN1_C1FIFOCON8;
  20837. C1FIFOCON8 : longWord;
  20838. C1FIFOCON8CLR : longWord;
  20839. C1FIFOCON8SET : longWord;
  20840. C1FIFOCON8INV : longWord;
  20841. C1FIFOINT8bits : TCAN1_C1FIFOINT8;
  20842. C1FIFOINT8 : longWord;
  20843. C1FIFOINT8CLR : longWord;
  20844. C1FIFOINT8SET : longWord;
  20845. C1FIFOINT8INV : longWord;
  20846. C1FIFOUA8 : longWord;
  20847. C1FIFOUA8CLR : longWord;
  20848. C1FIFOUA8SET : longWord;
  20849. C1FIFOUA8INV : longWord;
  20850. C1FIFOCI8bits : TCAN1_C1FIFOCI8;
  20851. C1FIFOCI8 : longWord;
  20852. C1FIFOCI8CLR : longWord;
  20853. C1FIFOCI8SET : longWord;
  20854. C1FIFOCI8INV : longWord;
  20855. C1FIFOCON9bits : TCAN1_C1FIFOCON9;
  20856. C1FIFOCON9 : longWord;
  20857. C1FIFOCON9CLR : longWord;
  20858. C1FIFOCON9SET : longWord;
  20859. C1FIFOCON9INV : longWord;
  20860. C1FIFOINT9bits : TCAN1_C1FIFOINT9;
  20861. C1FIFOINT9 : longWord;
  20862. C1FIFOINT9CLR : longWord;
  20863. C1FIFOINT9SET : longWord;
  20864. C1FIFOINT9INV : longWord;
  20865. C1FIFOUA9 : longWord;
  20866. C1FIFOUA9CLR : longWord;
  20867. C1FIFOUA9SET : longWord;
  20868. C1FIFOUA9INV : longWord;
  20869. C1FIFOCI9bits : TCAN1_C1FIFOCI9;
  20870. C1FIFOCI9 : longWord;
  20871. C1FIFOCI9CLR : longWord;
  20872. C1FIFOCI9SET : longWord;
  20873. C1FIFOCI9INV : longWord;
  20874. C1FIFOCON10bits : TCAN1_C1FIFOCON10;
  20875. C1FIFOCON10 : longWord;
  20876. C1FIFOCON10CLR : longWord;
  20877. C1FIFOCON10SET : longWord;
  20878. C1FIFOCON10INV : longWord;
  20879. C1FIFOINT10bits : TCAN1_C1FIFOINT10;
  20880. C1FIFOINT10 : longWord;
  20881. C1FIFOINT10CLR : longWord;
  20882. C1FIFOINT10SET : longWord;
  20883. C1FIFOINT10INV : longWord;
  20884. C1FIFOUA10 : longWord;
  20885. C1FIFOUA10CLR : longWord;
  20886. C1FIFOUA10SET : longWord;
  20887. C1FIFOUA10INV : longWord;
  20888. C1FIFOCI10bits : TCAN1_C1FIFOCI10;
  20889. C1FIFOCI10 : longWord;
  20890. C1FIFOCI10CLR : longWord;
  20891. C1FIFOCI10SET : longWord;
  20892. C1FIFOCI10INV : longWord;
  20893. C1FIFOCON11bits : TCAN1_C1FIFOCON11;
  20894. C1FIFOCON11 : longWord;
  20895. C1FIFOCON11CLR : longWord;
  20896. C1FIFOCON11SET : longWord;
  20897. C1FIFOCON11INV : longWord;
  20898. C1FIFOINT11bits : TCAN1_C1FIFOINT11;
  20899. C1FIFOINT11 : longWord;
  20900. C1FIFOINT11CLR : longWord;
  20901. C1FIFOINT11SET : longWord;
  20902. C1FIFOINT11INV : longWord;
  20903. C1FIFOUA11 : longWord;
  20904. C1FIFOUA11CLR : longWord;
  20905. C1FIFOUA11SET : longWord;
  20906. C1FIFOUA11INV : longWord;
  20907. C1FIFOCI11bits : TCAN1_C1FIFOCI11;
  20908. C1FIFOCI11 : longWord;
  20909. C1FIFOCI11CLR : longWord;
  20910. C1FIFOCI11SET : longWord;
  20911. C1FIFOCI11INV : longWord;
  20912. C1FIFOCON12bits : TCAN1_C1FIFOCON12;
  20913. C1FIFOCON12 : longWord;
  20914. C1FIFOCON12CLR : longWord;
  20915. C1FIFOCON12SET : longWord;
  20916. C1FIFOCON12INV : longWord;
  20917. C1FIFOINT12bits : TCAN1_C1FIFOINT12;
  20918. C1FIFOINT12 : longWord;
  20919. C1FIFOINT12CLR : longWord;
  20920. C1FIFOINT12SET : longWord;
  20921. C1FIFOINT12INV : longWord;
  20922. C1FIFOUA12 : longWord;
  20923. C1FIFOUA12CLR : longWord;
  20924. C1FIFOUA12SET : longWord;
  20925. C1FIFOUA12INV : longWord;
  20926. C1FIFOCI12bits : TCAN1_C1FIFOCI12;
  20927. C1FIFOCI12 : longWord;
  20928. C1FIFOCI12CLR : longWord;
  20929. C1FIFOCI12SET : longWord;
  20930. C1FIFOCI12INV : longWord;
  20931. C1FIFOCON13bits : TCAN1_C1FIFOCON13;
  20932. C1FIFOCON13 : longWord;
  20933. C1FIFOCON13CLR : longWord;
  20934. C1FIFOCON13SET : longWord;
  20935. C1FIFOCON13INV : longWord;
  20936. C1FIFOINT13bits : TCAN1_C1FIFOINT13;
  20937. C1FIFOINT13 : longWord;
  20938. C1FIFOINT13CLR : longWord;
  20939. C1FIFOINT13SET : longWord;
  20940. C1FIFOINT13INV : longWord;
  20941. C1FIFOUA13 : longWord;
  20942. C1FIFOUA13CLR : longWord;
  20943. C1FIFOUA13SET : longWord;
  20944. C1FIFOUA13INV : longWord;
  20945. C1FIFOCI13bits : TCAN1_C1FIFOCI13;
  20946. C1FIFOCI13 : longWord;
  20947. C1FIFOCI13CLR : longWord;
  20948. C1FIFOCI13SET : longWord;
  20949. C1FIFOCI13INV : longWord;
  20950. C1FIFOCON14bits : TCAN1_C1FIFOCON14;
  20951. C1FIFOCON14 : longWord;
  20952. C1FIFOCON14CLR : longWord;
  20953. C1FIFOCON14SET : longWord;
  20954. C1FIFOCON14INV : longWord;
  20955. C1FIFOINT14bits : TCAN1_C1FIFOINT14;
  20956. C1FIFOINT14 : longWord;
  20957. C1FIFOINT14CLR : longWord;
  20958. C1FIFOINT14SET : longWord;
  20959. C1FIFOINT14INV : longWord;
  20960. C1FIFOUA14 : longWord;
  20961. C1FIFOUA14CLR : longWord;
  20962. C1FIFOUA14SET : longWord;
  20963. C1FIFOUA14INV : longWord;
  20964. C1FIFOCI14bits : TCAN1_C1FIFOCI14;
  20965. C1FIFOCI14 : longWord;
  20966. C1FIFOCI14CLR : longWord;
  20967. C1FIFOCI14SET : longWord;
  20968. C1FIFOCI14INV : longWord;
  20969. C1FIFOCON15bits : TCAN1_C1FIFOCON15;
  20970. C1FIFOCON15 : longWord;
  20971. C1FIFOCON15CLR : longWord;
  20972. C1FIFOCON15SET : longWord;
  20973. C1FIFOCON15INV : longWord;
  20974. C1FIFOINT15bits : TCAN1_C1FIFOINT15;
  20975. C1FIFOINT15 : longWord;
  20976. C1FIFOINT15CLR : longWord;
  20977. C1FIFOINT15SET : longWord;
  20978. C1FIFOINT15INV : longWord;
  20979. C1FIFOUA15 : longWord;
  20980. C1FIFOUA15CLR : longWord;
  20981. C1FIFOUA15SET : longWord;
  20982. C1FIFOUA15INV : longWord;
  20983. C1FIFOCI15bits : TCAN1_C1FIFOCI15;
  20984. C1FIFOCI15 : longWord;
  20985. C1FIFOCI15CLR : longWord;
  20986. C1FIFOCI15SET : longWord;
  20987. C1FIFOCI15INV : longWord;
  20988. C1FIFOCON16bits : TCAN1_C1FIFOCON16;
  20989. C1FIFOCON16 : longWord;
  20990. C1FIFOCON16CLR : longWord;
  20991. C1FIFOCON16SET : longWord;
  20992. C1FIFOCON16INV : longWord;
  20993. C1FIFOINT16bits : TCAN1_C1FIFOINT16;
  20994. C1FIFOINT16 : longWord;
  20995. C1FIFOINT16CLR : longWord;
  20996. C1FIFOINT16SET : longWord;
  20997. C1FIFOINT16INV : longWord;
  20998. C1FIFOUA16 : longWord;
  20999. C1FIFOUA16CLR : longWord;
  21000. C1FIFOUA16SET : longWord;
  21001. C1FIFOUA16INV : longWord;
  21002. C1FIFOCI16bits : TCAN1_C1FIFOCI16;
  21003. C1FIFOCI16 : longWord;
  21004. C1FIFOCI16CLR : longWord;
  21005. C1FIFOCI16SET : longWord;
  21006. C1FIFOCI16INV : longWord;
  21007. C1FIFOCON17bits : TCAN1_C1FIFOCON17;
  21008. C1FIFOCON17 : longWord;
  21009. C1FIFOCON17CLR : longWord;
  21010. C1FIFOCON17SET : longWord;
  21011. C1FIFOCON17INV : longWord;
  21012. C1FIFOINT17bits : TCAN1_C1FIFOINT17;
  21013. C1FIFOINT17 : longWord;
  21014. C1FIFOINT17CLR : longWord;
  21015. C1FIFOINT17SET : longWord;
  21016. C1FIFOINT17INV : longWord;
  21017. C1FIFOUA17 : longWord;
  21018. C1FIFOUA17CLR : longWord;
  21019. C1FIFOUA17SET : longWord;
  21020. C1FIFOUA17INV : longWord;
  21021. C1FIFOCI17bits : TCAN1_C1FIFOCI17;
  21022. C1FIFOCI17 : longWord;
  21023. C1FIFOCI17CLR : longWord;
  21024. C1FIFOCI17SET : longWord;
  21025. C1FIFOCI17INV : longWord;
  21026. C1FIFOCON18bits : TCAN1_C1FIFOCON18;
  21027. C1FIFOCON18 : longWord;
  21028. C1FIFOCON18CLR : longWord;
  21029. C1FIFOCON18SET : longWord;
  21030. C1FIFOCON18INV : longWord;
  21031. C1FIFOINT18bits : TCAN1_C1FIFOINT18;
  21032. C1FIFOINT18 : longWord;
  21033. C1FIFOINT18CLR : longWord;
  21034. C1FIFOINT18SET : longWord;
  21035. C1FIFOINT18INV : longWord;
  21036. C1FIFOUA18 : longWord;
  21037. C1FIFOUA18CLR : longWord;
  21038. C1FIFOUA18SET : longWord;
  21039. C1FIFOUA18INV : longWord;
  21040. C1FIFOCI18bits : TCAN1_C1FIFOCI18;
  21041. C1FIFOCI18 : longWord;
  21042. C1FIFOCI18CLR : longWord;
  21043. C1FIFOCI18SET : longWord;
  21044. C1FIFOCI18INV : longWord;
  21045. C1FIFOCON19bits : TCAN1_C1FIFOCON19;
  21046. C1FIFOCON19 : longWord;
  21047. C1FIFOCON19CLR : longWord;
  21048. C1FIFOCON19SET : longWord;
  21049. C1FIFOCON19INV : longWord;
  21050. C1FIFOINT19bits : TCAN1_C1FIFOINT19;
  21051. C1FIFOINT19 : longWord;
  21052. C1FIFOINT19CLR : longWord;
  21053. C1FIFOINT19SET : longWord;
  21054. C1FIFOINT19INV : longWord;
  21055. C1FIFOUA19 : longWord;
  21056. C1FIFOUA19CLR : longWord;
  21057. C1FIFOUA19SET : longWord;
  21058. C1FIFOUA19INV : longWord;
  21059. C1FIFOCI19bits : TCAN1_C1FIFOCI19;
  21060. C1FIFOCI19 : longWord;
  21061. C1FIFOCI19CLR : longWord;
  21062. C1FIFOCI19SET : longWord;
  21063. C1FIFOCI19INV : longWord;
  21064. C1FIFOCON20bits : TCAN1_C1FIFOCON20;
  21065. C1FIFOCON20 : longWord;
  21066. C1FIFOCON20CLR : longWord;
  21067. C1FIFOCON20SET : longWord;
  21068. C1FIFOCON20INV : longWord;
  21069. C1FIFOINT20bits : TCAN1_C1FIFOINT20;
  21070. C1FIFOINT20 : longWord;
  21071. C1FIFOINT20CLR : longWord;
  21072. C1FIFOINT20SET : longWord;
  21073. C1FIFOINT20INV : longWord;
  21074. C1FIFOUA20 : longWord;
  21075. C1FIFOUA20CLR : longWord;
  21076. C1FIFOUA20SET : longWord;
  21077. C1FIFOUA20INV : longWord;
  21078. C1FIFOCI20bits : TCAN1_C1FIFOCI20;
  21079. C1FIFOCI20 : longWord;
  21080. C1FIFOCI20CLR : longWord;
  21081. C1FIFOCI20SET : longWord;
  21082. C1FIFOCI20INV : longWord;
  21083. C1FIFOCON21bits : TCAN1_C1FIFOCON21;
  21084. C1FIFOCON21 : longWord;
  21085. C1FIFOCON21CLR : longWord;
  21086. C1FIFOCON21SET : longWord;
  21087. C1FIFOCON21INV : longWord;
  21088. C1FIFOINT21bits : TCAN1_C1FIFOINT21;
  21089. C1FIFOINT21 : longWord;
  21090. C1FIFOINT21CLR : longWord;
  21091. C1FIFOINT21SET : longWord;
  21092. C1FIFOINT21INV : longWord;
  21093. C1FIFOUA21 : longWord;
  21094. C1FIFOUA21CLR : longWord;
  21095. C1FIFOUA21SET : longWord;
  21096. C1FIFOUA21INV : longWord;
  21097. C1FIFOCI21bits : TCAN1_C1FIFOCI21;
  21098. C1FIFOCI21 : longWord;
  21099. C1FIFOCI21CLR : longWord;
  21100. C1FIFOCI21SET : longWord;
  21101. C1FIFOCI21INV : longWord;
  21102. C1FIFOCON22bits : TCAN1_C1FIFOCON22;
  21103. C1FIFOCON22 : longWord;
  21104. C1FIFOCON22CLR : longWord;
  21105. C1FIFOCON22SET : longWord;
  21106. C1FIFOCON22INV : longWord;
  21107. C1FIFOINT22bits : TCAN1_C1FIFOINT22;
  21108. C1FIFOINT22 : longWord;
  21109. C1FIFOINT22CLR : longWord;
  21110. C1FIFOINT22SET : longWord;
  21111. C1FIFOINT22INV : longWord;
  21112. C1FIFOUA22 : longWord;
  21113. C1FIFOUA22CLR : longWord;
  21114. C1FIFOUA22SET : longWord;
  21115. C1FIFOUA22INV : longWord;
  21116. C1FIFOCI22bits : TCAN1_C1FIFOCI22;
  21117. C1FIFOCI22 : longWord;
  21118. C1FIFOCI22CLR : longWord;
  21119. C1FIFOCI22SET : longWord;
  21120. C1FIFOCI22INV : longWord;
  21121. C1FIFOCON23bits : TCAN1_C1FIFOCON23;
  21122. C1FIFOCON23 : longWord;
  21123. C1FIFOCON23CLR : longWord;
  21124. C1FIFOCON23SET : longWord;
  21125. C1FIFOCON23INV : longWord;
  21126. C1FIFOINT23bits : TCAN1_C1FIFOINT23;
  21127. C1FIFOINT23 : longWord;
  21128. C1FIFOINT23CLR : longWord;
  21129. C1FIFOINT23SET : longWord;
  21130. C1FIFOINT23INV : longWord;
  21131. C1FIFOUA23 : longWord;
  21132. C1FIFOUA23CLR : longWord;
  21133. C1FIFOUA23SET : longWord;
  21134. C1FIFOUA23INV : longWord;
  21135. C1FIFOCI23bits : TCAN1_C1FIFOCI23;
  21136. C1FIFOCI23 : longWord;
  21137. C1FIFOCI23CLR : longWord;
  21138. C1FIFOCI23SET : longWord;
  21139. C1FIFOCI23INV : longWord;
  21140. C1FIFOCON24bits : TCAN1_C1FIFOCON24;
  21141. C1FIFOCON24 : longWord;
  21142. C1FIFOCON24CLR : longWord;
  21143. C1FIFOCON24SET : longWord;
  21144. C1FIFOCON24INV : longWord;
  21145. C1FIFOINT24bits : TCAN1_C1FIFOINT24;
  21146. C1FIFOINT24 : longWord;
  21147. C1FIFOINT24CLR : longWord;
  21148. C1FIFOINT24SET : longWord;
  21149. C1FIFOINT24INV : longWord;
  21150. C1FIFOUA24 : longWord;
  21151. C1FIFOUA24CLR : longWord;
  21152. C1FIFOUA24SET : longWord;
  21153. C1FIFOUA24INV : longWord;
  21154. C1FIFOCI24bits : TCAN1_C1FIFOCI24;
  21155. C1FIFOCI24 : longWord;
  21156. C1FIFOCI24CLR : longWord;
  21157. C1FIFOCI24SET : longWord;
  21158. C1FIFOCI24INV : longWord;
  21159. C1FIFOCON25bits : TCAN1_C1FIFOCON25;
  21160. C1FIFOCON25 : longWord;
  21161. C1FIFOCON25CLR : longWord;
  21162. C1FIFOCON25SET : longWord;
  21163. C1FIFOCON25INV : longWord;
  21164. C1FIFOINT25bits : TCAN1_C1FIFOINT25;
  21165. C1FIFOINT25 : longWord;
  21166. C1FIFOINT25CLR : longWord;
  21167. C1FIFOINT25SET : longWord;
  21168. C1FIFOINT25INV : longWord;
  21169. C1FIFOUA25 : longWord;
  21170. C1FIFOUA25CLR : longWord;
  21171. C1FIFOUA25SET : longWord;
  21172. C1FIFOUA25INV : longWord;
  21173. C1FIFOCI25bits : TCAN1_C1FIFOCI25;
  21174. C1FIFOCI25 : longWord;
  21175. C1FIFOCI25CLR : longWord;
  21176. C1FIFOCI25SET : longWord;
  21177. C1FIFOCI25INV : longWord;
  21178. C1FIFOCON26bits : TCAN1_C1FIFOCON26;
  21179. C1FIFOCON26 : longWord;
  21180. C1FIFOCON26CLR : longWord;
  21181. C1FIFOCON26SET : longWord;
  21182. C1FIFOCON26INV : longWord;
  21183. C1FIFOINT26bits : TCAN1_C1FIFOINT26;
  21184. C1FIFOINT26 : longWord;
  21185. C1FIFOINT26CLR : longWord;
  21186. C1FIFOINT26SET : longWord;
  21187. C1FIFOINT26INV : longWord;
  21188. C1FIFOUA26 : longWord;
  21189. C1FIFOUA26CLR : longWord;
  21190. C1FIFOUA26SET : longWord;
  21191. C1FIFOUA26INV : longWord;
  21192. C1FIFOCI26bits : TCAN1_C1FIFOCI26;
  21193. C1FIFOCI26 : longWord;
  21194. C1FIFOCI26CLR : longWord;
  21195. C1FIFOCI26SET : longWord;
  21196. C1FIFOCI26INV : longWord;
  21197. C1FIFOCON27bits : TCAN1_C1FIFOCON27;
  21198. C1FIFOCON27 : longWord;
  21199. C1FIFOCON27CLR : longWord;
  21200. C1FIFOCON27SET : longWord;
  21201. C1FIFOCON27INV : longWord;
  21202. C1FIFOINT27bits : TCAN1_C1FIFOINT27;
  21203. C1FIFOINT27 : longWord;
  21204. C1FIFOINT27CLR : longWord;
  21205. C1FIFOINT27SET : longWord;
  21206. C1FIFOINT27INV : longWord;
  21207. C1FIFOUA27 : longWord;
  21208. C1FIFOUA27CLR : longWord;
  21209. C1FIFOUA27SET : longWord;
  21210. C1FIFOUA27INV : longWord;
  21211. C1FIFOCI27bits : TCAN1_C1FIFOCI27;
  21212. C1FIFOCI27 : longWord;
  21213. C1FIFOCI27CLR : longWord;
  21214. C1FIFOCI27SET : longWord;
  21215. C1FIFOCI27INV : longWord;
  21216. C1FIFOCON28bits : TCAN1_C1FIFOCON28;
  21217. C1FIFOCON28 : longWord;
  21218. C1FIFOCON28CLR : longWord;
  21219. C1FIFOCON28SET : longWord;
  21220. C1FIFOCON28INV : longWord;
  21221. C1FIFOINT28bits : TCAN1_C1FIFOINT28;
  21222. C1FIFOINT28 : longWord;
  21223. C1FIFOINT28CLR : longWord;
  21224. C1FIFOINT28SET : longWord;
  21225. C1FIFOINT28INV : longWord;
  21226. C1FIFOUA28 : longWord;
  21227. C1FIFOUA28CLR : longWord;
  21228. C1FIFOUA28SET : longWord;
  21229. C1FIFOUA28INV : longWord;
  21230. C1FIFOCI28bits : TCAN1_C1FIFOCI28;
  21231. C1FIFOCI28 : longWord;
  21232. C1FIFOCI28CLR : longWord;
  21233. C1FIFOCI28SET : longWord;
  21234. C1FIFOCI28INV : longWord;
  21235. C1FIFOCON29bits : TCAN1_C1FIFOCON29;
  21236. C1FIFOCON29 : longWord;
  21237. C1FIFOCON29CLR : longWord;
  21238. C1FIFOCON29SET : longWord;
  21239. C1FIFOCON29INV : longWord;
  21240. C1FIFOINT29bits : TCAN1_C1FIFOINT29;
  21241. C1FIFOINT29 : longWord;
  21242. C1FIFOINT29CLR : longWord;
  21243. C1FIFOINT29SET : longWord;
  21244. C1FIFOINT29INV : longWord;
  21245. C1FIFOUA29 : longWord;
  21246. C1FIFOUA29CLR : longWord;
  21247. C1FIFOUA29SET : longWord;
  21248. C1FIFOUA29INV : longWord;
  21249. C1FIFOCI29bits : TCAN1_C1FIFOCI29;
  21250. C1FIFOCI29 : longWord;
  21251. C1FIFOCI29CLR : longWord;
  21252. C1FIFOCI29SET : longWord;
  21253. C1FIFOCI29INV : longWord;
  21254. C1FIFOCON30bits : TCAN1_C1FIFOCON30;
  21255. C1FIFOCON30 : longWord;
  21256. C1FIFOCON30CLR : longWord;
  21257. C1FIFOCON30SET : longWord;
  21258. C1FIFOCON30INV : longWord;
  21259. C1FIFOINT30bits : TCAN1_C1FIFOINT30;
  21260. C1FIFOINT30 : longWord;
  21261. C1FIFOINT30CLR : longWord;
  21262. C1FIFOINT30SET : longWord;
  21263. C1FIFOINT30INV : longWord;
  21264. C1FIFOUA30 : longWord;
  21265. C1FIFOUA30CLR : longWord;
  21266. C1FIFOUA30SET : longWord;
  21267. C1FIFOUA30INV : longWord;
  21268. C1FIFOCI30bits : TCAN1_C1FIFOCI30;
  21269. C1FIFOCI30 : longWord;
  21270. C1FIFOCI30CLR : longWord;
  21271. C1FIFOCI30SET : longWord;
  21272. C1FIFOCI30INV : longWord;
  21273. C1FIFOCON31bits : TCAN1_C1FIFOCON31;
  21274. C1FIFOCON31 : longWord;
  21275. C1FIFOCON31CLR : longWord;
  21276. C1FIFOCON31SET : longWord;
  21277. C1FIFOCON31INV : longWord;
  21278. C1FIFOINT31bits : TCAN1_C1FIFOINT31;
  21279. C1FIFOINT31 : longWord;
  21280. C1FIFOINT31CLR : longWord;
  21281. C1FIFOINT31SET : longWord;
  21282. C1FIFOINT31INV : longWord;
  21283. C1FIFOUA31 : longWord;
  21284. C1FIFOUA31CLR : longWord;
  21285. C1FIFOUA31SET : longWord;
  21286. C1FIFOUA31INV : longWord;
  21287. C1FIFOCI31bits : TCAN1_C1FIFOCI31;
  21288. C1FIFOCI31 : longWord;
  21289. C1FIFOCI31CLR : longWord;
  21290. C1FIFOCI31SET : longWord;
  21291. C1FIFOCI31INV : longWord;
  21292. end;
  21293. TDEVCFG_DEVCFG3 = record
  21294. private
  21295. function getFCANIO : TBits_1; inline;
  21296. function getFSRSSEL : TBits_3; inline;
  21297. function getFUSBIDIO : TBits_1; inline;
  21298. function getFVBUSONIO : TBits_1; inline;
  21299. function getUSERID : TBits_16; inline;
  21300. function getw : TBits_32; inline;
  21301. procedure setFCANIO(thebits : TBits_1); inline;
  21302. procedure setFSRSSEL(thebits : TBits_3); inline;
  21303. procedure setFUSBIDIO(thebits : TBits_1); inline;
  21304. procedure setFVBUSONIO(thebits : TBits_1); inline;
  21305. procedure setUSERID(thebits : TBits_16); inline;
  21306. procedure setw(thebits : TBits_32); inline;
  21307. public
  21308. procedure clearFCANIO; inline;
  21309. procedure clearFUSBIDIO; inline;
  21310. procedure clearFVBUSONIO; inline;
  21311. procedure setFCANIO; inline;
  21312. procedure setFUSBIDIO; inline;
  21313. procedure setFVBUSONIO; inline;
  21314. property FCANIO : TBits_1 read getFCANIO write setFCANIO;
  21315. property FSRSSEL : TBits_3 read getFSRSSEL write setFSRSSEL;
  21316. property FUSBIDIO : TBits_1 read getFUSBIDIO write setFUSBIDIO;
  21317. property FVBUSONIO : TBits_1 read getFVBUSONIO write setFVBUSONIO;
  21318. property USERID : TBits_16 read getUSERID write setUSERID;
  21319. property w : TBits_32 read getw write setw;
  21320. end;
  21321. TDEVCFG_DEVCFG2 = record
  21322. private
  21323. function getFPLLIDIV : TBits_3; inline;
  21324. function getFPLLMUL : TBits_3; inline;
  21325. function getFPLLODIV : TBits_3; inline;
  21326. function getUPLLEN : TBits_1; inline;
  21327. function getUPLLIDIV : TBits_3; inline;
  21328. function getw : TBits_32; inline;
  21329. procedure setFPLLIDIV(thebits : TBits_3); inline;
  21330. procedure setFPLLMUL(thebits : TBits_3); inline;
  21331. procedure setFPLLODIV(thebits : TBits_3); inline;
  21332. procedure setUPLLEN(thebits : TBits_1); inline;
  21333. procedure setUPLLIDIV(thebits : TBits_3); inline;
  21334. procedure setw(thebits : TBits_32); inline;
  21335. public
  21336. procedure clearUPLLEN; inline;
  21337. procedure setUPLLEN; inline;
  21338. property FPLLIDIV : TBits_3 read getFPLLIDIV write setFPLLIDIV;
  21339. property FPLLMUL : TBits_3 read getFPLLMUL write setFPLLMUL;
  21340. property FPLLODIV : TBits_3 read getFPLLODIV write setFPLLODIV;
  21341. property UPLLEN : TBits_1 read getUPLLEN write setUPLLEN;
  21342. property UPLLIDIV : TBits_3 read getUPLLIDIV write setUPLLIDIV;
  21343. property w : TBits_32 read getw write setw;
  21344. end;
  21345. TDEVCFG_DEVCFG1 = record
  21346. private
  21347. function getFCKSM : TBits_2; inline;
  21348. function getFNOSC : TBits_3; inline;
  21349. function getFPBDIV : TBits_2; inline;
  21350. function getFSOSCEN : TBits_1; inline;
  21351. function getFWDTEN : TBits_1; inline;
  21352. function getIESO : TBits_1; inline;
  21353. function getOSCIOFNC : TBits_1; inline;
  21354. function getPOSCMOD : TBits_2; inline;
  21355. function getWDTPS : TBits_5; inline;
  21356. function getw : TBits_32; inline;
  21357. procedure setFCKSM(thebits : TBits_2); inline;
  21358. procedure setFNOSC(thebits : TBits_3); inline;
  21359. procedure setFPBDIV(thebits : TBits_2); inline;
  21360. procedure setFSOSCEN(thebits : TBits_1); inline;
  21361. procedure setFWDTEN(thebits : TBits_1); inline;
  21362. procedure setIESO(thebits : TBits_1); inline;
  21363. procedure setOSCIOFNC(thebits : TBits_1); inline;
  21364. procedure setPOSCMOD(thebits : TBits_2); inline;
  21365. procedure setWDTPS(thebits : TBits_5); inline;
  21366. procedure setw(thebits : TBits_32); inline;
  21367. public
  21368. procedure clearFSOSCEN; inline;
  21369. procedure clearFWDTEN; inline;
  21370. procedure clearIESO; inline;
  21371. procedure clearOSCIOFNC; inline;
  21372. procedure setFSOSCEN; inline;
  21373. procedure setFWDTEN; inline;
  21374. procedure setIESO; inline;
  21375. procedure setOSCIOFNC; inline;
  21376. property FCKSM : TBits_2 read getFCKSM write setFCKSM;
  21377. property FNOSC : TBits_3 read getFNOSC write setFNOSC;
  21378. property FPBDIV : TBits_2 read getFPBDIV write setFPBDIV;
  21379. property FSOSCEN : TBits_1 read getFSOSCEN write setFSOSCEN;
  21380. property FWDTEN : TBits_1 read getFWDTEN write setFWDTEN;
  21381. property IESO : TBits_1 read getIESO write setIESO;
  21382. property OSCIOFNC : TBits_1 read getOSCIOFNC write setOSCIOFNC;
  21383. property POSCMOD : TBits_2 read getPOSCMOD write setPOSCMOD;
  21384. property WDTPS : TBits_5 read getWDTPS write setWDTPS;
  21385. property w : TBits_32 read getw write setw;
  21386. end;
  21387. TDEVCFG_DEVCFG0 = record
  21388. private
  21389. function getBWP : TBits_1; inline;
  21390. function getCP : TBits_1; inline;
  21391. function getDEBUG : TBits_2; inline;
  21392. function getFDEBUG : TBits_2; inline;
  21393. function getICESEL : TBits_1; inline;
  21394. function getPWP : TBits_8; inline;
  21395. function getw : TBits_32; inline;
  21396. procedure setBWP(thebits : TBits_1); inline;
  21397. procedure setCP(thebits : TBits_1); inline;
  21398. procedure setDEBUG(thebits : TBits_2); inline;
  21399. procedure setFDEBUG(thebits : TBits_2); inline;
  21400. procedure setICESEL(thebits : TBits_1); inline;
  21401. procedure setPWP(thebits : TBits_8); inline;
  21402. procedure setw(thebits : TBits_32); inline;
  21403. public
  21404. procedure clearBWP; inline;
  21405. procedure clearCP; inline;
  21406. procedure clearICESEL; inline;
  21407. procedure setBWP; inline;
  21408. procedure setCP; inline;
  21409. procedure setICESEL; inline;
  21410. property BWP : TBits_1 read getBWP write setBWP;
  21411. property CP : TBits_1 read getCP write setCP;
  21412. property DEBUG : TBits_2 read getDEBUG write setDEBUG;
  21413. property FDEBUG : TBits_2 read getFDEBUG write setFDEBUG;
  21414. property ICESEL : TBits_1 read getICESEL write setICESEL;
  21415. property PWP : TBits_8 read getPWP write setPWP;
  21416. property w : TBits_32 read getw write setw;
  21417. end;
  21418. const
  21419. _CORE_TIMER_IRQ = 0;
  21420. _CORE_SOFTWARE_0_IRQ = 1;
  21421. _CORE_SOFTWARE_1_IRQ = 2;
  21422. _EXTERNAL_0_IRQ = 3;
  21423. _TIMER_1_IRQ = 4;
  21424. _INPUT_CAPTURE_1_IRQ = 5;
  21425. _OUTPUT_COMPARE_1_IRQ = 6;
  21426. _EXTERNAL_1_IRQ = 7;
  21427. _TIMER_2_IRQ = 8;
  21428. _INPUT_CAPTURE_2_IRQ = 9;
  21429. _OUTPUT_COMPARE_2_IRQ = 10;
  21430. _EXTERNAL_2_IRQ = 11;
  21431. _TIMER_3_IRQ = 12;
  21432. _INPUT_CAPTURE_3_IRQ = 13;
  21433. _OUTPUT_COMPARE_3_IRQ = 14;
  21434. _EXTERNAL_3_IRQ = 15;
  21435. _TIMER_4_IRQ = 16;
  21436. _INPUT_CAPTURE_4_IRQ = 17;
  21437. _OUTPUT_COMPARE_4_IRQ = 18;
  21438. _EXTERNAL_4_IRQ = 19;
  21439. _TIMER_5_IRQ = 20;
  21440. _INPUT_CAPTURE_5_IRQ = 21;
  21441. _OUTPUT_COMPARE_5_IRQ = 22;
  21442. _I2C1A_ERR_IRQ = 26;
  21443. _I2C3_BUS_IRQ = 26;
  21444. _SPI1A_ERR_IRQ = 26;
  21445. _SPI3_ERR_IRQ = 26;
  21446. _UART1A_ERR_IRQ = 26;
  21447. _UART1_ERR_IRQ = 26;
  21448. _I2C1A_RX_IRQ = 27;
  21449. _I2C3_SLAVE_IRQ = 27;
  21450. _SPI1A_RX_IRQ = 27;
  21451. _SPI3_RX_IRQ = 27;
  21452. _UART1A_RX_IRQ = 27;
  21453. _UART1_RX_IRQ = 27;
  21454. _I2C1A_TX_IRQ = 28;
  21455. _I2C3_MASTER_IRQ = 28;
  21456. _SPI1A_TX_IRQ = 28;
  21457. _SPI3_TX_IRQ = 28;
  21458. _UART1A_TX_IRQ = 28;
  21459. _UART1_TX_IRQ = 28;
  21460. _I2C1_BUS_IRQ = 29;
  21461. _I2C1_SLAVE_IRQ = 30;
  21462. _I2C1_MASTER_IRQ = 31;
  21463. _CHANGE_NOTICE_IRQ = 32;
  21464. _ADC_IRQ = 33;
  21465. _PMP_IRQ = 34;
  21466. _COMPARATOR_1_IRQ = 35;
  21467. _COMPARATOR_2_IRQ = 36;
  21468. _I2C2A_ERR_IRQ = 37;
  21469. _I2C4_BUS_IRQ = 37;
  21470. _SPI2_ERR_IRQ = 37;
  21471. _SPI2A_ERR_IRQ = 37;
  21472. _UART2A_ERR_IRQ = 37;
  21473. _UART3_ERR_IRQ = 37;
  21474. _I2C2A_RX_IRQ = 38;
  21475. _I2C4_SLAVE_IRQ = 38;
  21476. _SPI2_RX_IRQ = 38;
  21477. _SPI2A_RX_IRQ = 38;
  21478. _UART2A_RX_IRQ = 38;
  21479. _UART3_RX_IRQ = 38;
  21480. _I2C2A_TX_IRQ = 39;
  21481. _I2C4_MASTER_IRQ = 39;
  21482. _SPI2A_TX_IRQ = 39;
  21483. _SPI2_TX_IRQ = 39;
  21484. _UART2A_TX_IRQ = 39;
  21485. _UART3_TX_IRQ = 39;
  21486. _I2C3A_ERR_IRQ = 40;
  21487. _I2C5_BUS_IRQ = 40;
  21488. _SPI3A_ERR_IRQ = 40;
  21489. _SPI4_ERR_IRQ = 40;
  21490. _UART2_ERR_IRQ = 40;
  21491. _UART3A_ERR_IRQ = 40;
  21492. _I2C3A_RX_IRQ = 41;
  21493. _I2C5_SLAVE_IRQ = 41;
  21494. _SPI3A_RX_IRQ = 41;
  21495. _SPI4_RX_IRQ = 41;
  21496. _UART2_RX_IRQ = 41;
  21497. _UART3A_RX_IRQ = 41;
  21498. _I2C3A_TX_IRQ = 42;
  21499. _I2C5_MASTER_IRQ = 42;
  21500. _SPI3A_TX_IRQ = 42;
  21501. _SPI4_TX_IRQ = 42;
  21502. _UART2_TX_IRQ = 42;
  21503. _UART3A_TX_IRQ = 42;
  21504. _FAIL_SAFE_MONITOR_IRQ = 46;
  21505. _RTCC_IRQ = 47;
  21506. _DMA0_IRQ = 48;
  21507. _DMA1_IRQ = 49;
  21508. _DMA2_IRQ = 50;
  21509. _DMA3_IRQ = 51;
  21510. _DMA4_IRQ = 52;
  21511. _DMA5_IRQ = 53;
  21512. _DMA6_IRQ = 54;
  21513. _DMA7_IRQ = 55;
  21514. _FLASH_CONTROL_IRQ = 56;
  21515. _USB_IRQ = 57;
  21516. _CAN1_IRQ = 58;
  21517. _INPUT_CAPTURE_ERROR_1_IRQ = 61;
  21518. _INPUT_CAPTURE_ERROR_2_IRQ = 62;
  21519. _INPUT_CAPTURE_ERROR_3_IRQ = 63;
  21520. _INPUT_CAPTURE_ERROR_4_IRQ = 64;
  21521. _INPUT_CAPTURE_ERROR_5_IRQ = 65;
  21522. _PMP_ERROR_IRQ = 66;
  21523. _UART1B_ERR_IRQ = 67;
  21524. _UART4_ERR_IRQ = 67;
  21525. _UART1B_RX_IRQ = 68;
  21526. _UART4_RX_IRQ = 68;
  21527. _UART1B_TX_IRQ = 69;
  21528. _UART4_TX_IRQ = 69;
  21529. _UART2B_ERR_IRQ = 70;
  21530. _UART6_ERR_IRQ = 70;
  21531. _UART2B_RX_IRQ = 71;
  21532. _UART6_RX_IRQ = 71;
  21533. _UART2B_TX_IRQ = 72;
  21534. _UART6_TX_IRQ = 72;
  21535. _UART3B_ERR_IRQ = 73;
  21536. _UART5_ERR_IRQ = 73;
  21537. _UART3B_RX_IRQ = 74;
  21538. _UART5_RX_IRQ = 74;
  21539. _UART3B_TX_IRQ = 75;
  21540. _UART5_TX_IRQ = 75;
  21541. const
  21542. ADC10_BASE_ADDRESS = $BF809000;
  21543. var
  21544. ADC10 : TADC10Registers absolute ADC10_BASE_ADDRESS;
  21545. const
  21546. BMX_BASE_ADDRESS = $BF882000;
  21547. var
  21548. BMX : TBMXRegisters absolute BMX_BASE_ADDRESS;
  21549. const
  21550. CAN1_BASE_ADDRESS = $BF88B000;
  21551. var
  21552. CAN1 : TCAN1Registers absolute CAN1_BASE_ADDRESS;
  21553. const
  21554. CFG_BASE_ADDRESS = $BF80F200;
  21555. var
  21556. CFG : TCFGRegisters absolute CFG_BASE_ADDRESS;
  21557. const
  21558. CMP_BASE_ADDRESS = $BF80A000;
  21559. var
  21560. CMP : TCMPRegisters absolute CMP_BASE_ADDRESS;
  21561. const
  21562. CVR_BASE_ADDRESS = $BF809800;
  21563. var
  21564. CVR : TCVRRegisters absolute CVR_BASE_ADDRESS;
  21565. const
  21566. DMAC_BASE_ADDRESS = $BF883000;
  21567. var
  21568. DMAC : TDMACRegisters absolute DMAC_BASE_ADDRESS;
  21569. const
  21570. DMAC0_BASE_ADDRESS = $BF883060;
  21571. var
  21572. DMAC0 : TDMAC0Registers absolute DMAC0_BASE_ADDRESS;
  21573. const
  21574. DMAC1_BASE_ADDRESS = $BF883120;
  21575. var
  21576. DMAC1 : TDMAC1Registers absolute DMAC1_BASE_ADDRESS;
  21577. const
  21578. DMAC2_BASE_ADDRESS = $BF8831E0;
  21579. var
  21580. DMAC2 : TDMAC2Registers absolute DMAC2_BASE_ADDRESS;
  21581. const
  21582. DMAC3_BASE_ADDRESS = $BF8832A0;
  21583. var
  21584. DMAC3 : TDMAC3Registers absolute DMAC3_BASE_ADDRESS;
  21585. const
  21586. DMAC4_BASE_ADDRESS = $BF883360;
  21587. var
  21588. DMAC4 : TDMAC4Registers absolute DMAC4_BASE_ADDRESS;
  21589. const
  21590. DMAC5_BASE_ADDRESS = $BF883420;
  21591. var
  21592. DMAC5 : TDMAC5Registers absolute DMAC5_BASE_ADDRESS;
  21593. const
  21594. DMAC6_BASE_ADDRESS = $BF8834E0;
  21595. var
  21596. DMAC6 : TDMAC6Registers absolute DMAC6_BASE_ADDRESS;
  21597. const
  21598. DMAC7_BASE_ADDRESS = $BF8835A0;
  21599. var
  21600. DMAC7 : TDMAC7Registers absolute DMAC7_BASE_ADDRESS;
  21601. const
  21602. I2C1_BASE_ADDRESS = $BF805300;
  21603. var
  21604. I2C1 : TI2C1Registers absolute I2C1_BASE_ADDRESS;
  21605. const
  21606. I2C3_BASE_ADDRESS = $BF805000;
  21607. var
  21608. I2C3 : TI2C3Registers absolute I2C3_BASE_ADDRESS;
  21609. const
  21610. I2C3A_BASE_ADDRESS = $BF805200;
  21611. var
  21612. I2C3A : TI2C3ARegisters absolute I2C3A_BASE_ADDRESS;
  21613. const
  21614. I2C4_BASE_ADDRESS = $BF805100;
  21615. var
  21616. I2C4 : TI2C4Registers absolute I2C4_BASE_ADDRESS;
  21617. const
  21618. ICAP1_BASE_ADDRESS = $BF802000;
  21619. var
  21620. ICAP1 : TICAP1Registers absolute ICAP1_BASE_ADDRESS;
  21621. const
  21622. ICAP2_BASE_ADDRESS = $BF802200;
  21623. var
  21624. ICAP2 : TICAP2Registers absolute ICAP2_BASE_ADDRESS;
  21625. const
  21626. ICAP3_BASE_ADDRESS = $BF802400;
  21627. var
  21628. ICAP3 : TICAP3Registers absolute ICAP3_BASE_ADDRESS;
  21629. const
  21630. ICAP4_BASE_ADDRESS = $BF802600;
  21631. var
  21632. ICAP4 : TICAP4Registers absolute ICAP4_BASE_ADDRESS;
  21633. const
  21634. ICAP5_BASE_ADDRESS = $BF802800;
  21635. var
  21636. ICAP5 : TICAP5Registers absolute ICAP5_BASE_ADDRESS;
  21637. const
  21638. INT_BASE_ADDRESS = $BF881000;
  21639. var
  21640. INT : TINTRegisters absolute INT_BASE_ADDRESS;
  21641. const
  21642. NVM_BASE_ADDRESS = $BF80F400;
  21643. var
  21644. NVM : TNVMRegisters absolute NVM_BASE_ADDRESS;
  21645. const
  21646. OCMP1_BASE_ADDRESS = $BF803000;
  21647. var
  21648. OCMP1 : TOCMP1Registers absolute OCMP1_BASE_ADDRESS;
  21649. const
  21650. OCMP2_BASE_ADDRESS = $BF803200;
  21651. var
  21652. OCMP2 : TOCMP2Registers absolute OCMP2_BASE_ADDRESS;
  21653. const
  21654. OCMP3_BASE_ADDRESS = $BF803400;
  21655. var
  21656. OCMP3 : TOCMP3Registers absolute OCMP3_BASE_ADDRESS;
  21657. const
  21658. OCMP4_BASE_ADDRESS = $BF803600;
  21659. var
  21660. OCMP4 : TOCMP4Registers absolute OCMP4_BASE_ADDRESS;
  21661. const
  21662. OCMP5_BASE_ADDRESS = $BF803800;
  21663. var
  21664. OCMP5 : TOCMP5Registers absolute OCMP5_BASE_ADDRESS;
  21665. const
  21666. OSC_BASE_ADDRESS = $BF80F000;
  21667. var
  21668. OSC : TOSCRegisters absolute OSC_BASE_ADDRESS;
  21669. const
  21670. PCACHE_BASE_ADDRESS = $BF884000;
  21671. var
  21672. PCACHE : TPCACHERegisters absolute PCACHE_BASE_ADDRESS;
  21673. const
  21674. PMP_BASE_ADDRESS = $BF807000;
  21675. var
  21676. PMP : TPMPRegisters absolute PMP_BASE_ADDRESS;
  21677. const
  21678. PORTB_BASE_ADDRESS = $BF886040;
  21679. var
  21680. PORTB : TPORTBRegisters absolute PORTB_BASE_ADDRESS;
  21681. const
  21682. PORTC_BASE_ADDRESS = $BF886080;
  21683. var
  21684. PORTC : TPORTCRegisters absolute PORTC_BASE_ADDRESS;
  21685. const
  21686. PORTD_BASE_ADDRESS = $BF8860C0;
  21687. var
  21688. PORTD : TPORTDRegisters absolute PORTD_BASE_ADDRESS;
  21689. const
  21690. PORTE_BASE_ADDRESS = $BF886100;
  21691. var
  21692. PORTE : TPORTERegisters absolute PORTE_BASE_ADDRESS;
  21693. const
  21694. PORTF_BASE_ADDRESS = $BF886140;
  21695. var
  21696. PORTF : TPORTFRegisters absolute PORTF_BASE_ADDRESS;
  21697. const
  21698. PORTG_BASE_ADDRESS = $BF886180;
  21699. var
  21700. PORTG : TPORTGRegisters absolute PORTG_BASE_ADDRESS;
  21701. const
  21702. RCON_BASE_ADDRESS = $BF80F600;
  21703. var
  21704. RCON : TRCONRegisters absolute RCON_BASE_ADDRESS;
  21705. const
  21706. RTCC_BASE_ADDRESS = $BF800200;
  21707. var
  21708. RTCC : TRTCCRegisters absolute RTCC_BASE_ADDRESS;
  21709. const
  21710. SPI1A_BASE_ADDRESS = $BF805800;
  21711. var
  21712. SPI1A : TSPI1ARegisters absolute SPI1A_BASE_ADDRESS;
  21713. const
  21714. SPI2_BASE_ADDRESS = $BF805A00;
  21715. var
  21716. SPI2 : TSPI2Registers absolute SPI2_BASE_ADDRESS;
  21717. const
  21718. SPI3A_BASE_ADDRESS = $BF805C00;
  21719. var
  21720. SPI3A : TSPI3ARegisters absolute SPI3A_BASE_ADDRESS;
  21721. const
  21722. TMR1_BASE_ADDRESS = $BF800600;
  21723. var
  21724. TMR1 : TTMR1Registers absolute TMR1_BASE_ADDRESS;
  21725. const
  21726. TMR2_BASE_ADDRESS = $BF800800;
  21727. var
  21728. TMR2 : TTMR2Registers absolute TMR2_BASE_ADDRESS;
  21729. const
  21730. TMR3_BASE_ADDRESS = $BF800A00;
  21731. var
  21732. TMR3 : TTMR3Registers absolute TMR3_BASE_ADDRESS;
  21733. const
  21734. TMR4_BASE_ADDRESS = $BF800C00;
  21735. var
  21736. TMR4 : TTMR4Registers absolute TMR4_BASE_ADDRESS;
  21737. const
  21738. TMR5_BASE_ADDRESS = $BF800E00;
  21739. var
  21740. TMR5 : TTMR5Registers absolute TMR5_BASE_ADDRESS;
  21741. const
  21742. UART1_BASE_ADDRESS = $BF806000;
  21743. var
  21744. UART1 : TUART1Registers absolute UART1_BASE_ADDRESS;
  21745. const
  21746. UART2B_BASE_ADDRESS = $BF806600;
  21747. var
  21748. UART2B : TUART2BRegisters absolute UART2B_BASE_ADDRESS;
  21749. const
  21750. UART3_BASE_ADDRESS = $BF806400;
  21751. var
  21752. UART3 : TUART3Registers absolute UART3_BASE_ADDRESS;
  21753. const
  21754. UART3A_BASE_ADDRESS = $BF806800;
  21755. var
  21756. UART3A : TUART3ARegisters absolute UART3A_BASE_ADDRESS;
  21757. const
  21758. UART4_BASE_ADDRESS = $BF806200;
  21759. var
  21760. UART4 : TUART4Registers absolute UART4_BASE_ADDRESS;
  21761. const
  21762. UART5_BASE_ADDRESS = $BF806A00;
  21763. var
  21764. UART5 : TUART5Registers absolute UART5_BASE_ADDRESS;
  21765. const
  21766. USB_BASE_ADDRESS = $BF885040;
  21767. var
  21768. USB : TUSBRegisters absolute USB_BASE_ADDRESS;
  21769. const
  21770. WDT_BASE_ADDRESS = $BF800000;
  21771. var
  21772. WDT : TWDTRegisters absolute WDT_BASE_ADDRESS;
  21773. const
  21774. _APPI_BASE_ADDRESS = $BF880190;
  21775. var
  21776. _APPI : T_APPIRegisters absolute _APPI_BASE_ADDRESS;
  21777. const
  21778. _APPO_BASE_ADDRESS = $BF880180;
  21779. var
  21780. _APPO : T_APPORegisters absolute _APPO_BASE_ADDRESS;
  21781. const
  21782. _DDPSTAT_BASE_ADDRESS = $BF880140;
  21783. var
  21784. _DDPSTAT : T_DDPSTATRegisters absolute _DDPSTAT_BASE_ADDRESS;
  21785. const
  21786. _STRO_BASE_ADDRESS = $BF880170;
  21787. var
  21788. _STRO : T_STRORegisters absolute _STRO_BASE_ADDRESS;
  21789. implementation
  21790. type
  21791. TDefRegMap = record
  21792. val : longWord;
  21793. clr : longWord;
  21794. &set : longWord;
  21795. inv : longWord;
  21796. end;
  21797. pTDefRegMap = ^TDefRegMap;
  21798. procedure TWDT_WDTCON.setWDTCLR; inline;
  21799. begin
  21800. pTDefRegMap(@Self)^.&set := $00000001;
  21801. end;
  21802. procedure TWDT_WDTCON.clearWDTCLR; inline;
  21803. begin
  21804. pTDefRegMap(@Self)^.clr := $00000001;
  21805. end;
  21806. procedure TWDT_WDTCON.setWDTCLR(thebits : TBits_1); inline;
  21807. begin
  21808. if thebits = 0 then
  21809. pTDefRegMap(@Self)^.clr := $00000001
  21810. else
  21811. pTDefRegMap(@Self)^.&set := $00000001;
  21812. end;
  21813. function TWDT_WDTCON.getWDTCLR : TBits_1; inline;
  21814. begin
  21815. getWDTCLR := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  21816. end;
  21817. procedure TWDT_WDTCON.setSWDTPS(thebits : TBits_5); inline;
  21818. begin
  21819. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  21820. end;
  21821. function TWDT_WDTCON.getSWDTPS : TBits_5; inline;
  21822. begin
  21823. getSWDTPS := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  21824. end;
  21825. procedure TWDT_WDTCON.setON; inline;
  21826. begin
  21827. pTDefRegMap(@Self)^.&set := $00008000;
  21828. end;
  21829. procedure TWDT_WDTCON.clearON; inline;
  21830. begin
  21831. pTDefRegMap(@Self)^.clr := $00008000;
  21832. end;
  21833. procedure TWDT_WDTCON.setON(thebits : TBits_1); inline;
  21834. begin
  21835. if thebits = 0 then
  21836. pTDefRegMap(@Self)^.clr := $00008000
  21837. else
  21838. pTDefRegMap(@Self)^.&set := $00008000;
  21839. end;
  21840. function TWDT_WDTCON.getON : TBits_1; inline;
  21841. begin
  21842. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  21843. end;
  21844. procedure TWDT_WDTCON.setSWDTPS0; inline;
  21845. begin
  21846. pTDefRegMap(@Self)^.&set := $00000004;
  21847. end;
  21848. procedure TWDT_WDTCON.clearSWDTPS0; inline;
  21849. begin
  21850. pTDefRegMap(@Self)^.clr := $00000004;
  21851. end;
  21852. procedure TWDT_WDTCON.setSWDTPS0(thebits : TBits_1); inline;
  21853. begin
  21854. if thebits = 0 then
  21855. pTDefRegMap(@Self)^.clr := $00000004
  21856. else
  21857. pTDefRegMap(@Self)^.&set := $00000004;
  21858. end;
  21859. function TWDT_WDTCON.getSWDTPS0 : TBits_1; inline;
  21860. begin
  21861. getSWDTPS0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  21862. end;
  21863. procedure TWDT_WDTCON.setSWDTPS1; inline;
  21864. begin
  21865. pTDefRegMap(@Self)^.&set := $00000008;
  21866. end;
  21867. procedure TWDT_WDTCON.clearSWDTPS1; inline;
  21868. begin
  21869. pTDefRegMap(@Self)^.clr := $00000008;
  21870. end;
  21871. procedure TWDT_WDTCON.setSWDTPS1(thebits : TBits_1); inline;
  21872. begin
  21873. if thebits = 0 then
  21874. pTDefRegMap(@Self)^.clr := $00000008
  21875. else
  21876. pTDefRegMap(@Self)^.&set := $00000008;
  21877. end;
  21878. function TWDT_WDTCON.getSWDTPS1 : TBits_1; inline;
  21879. begin
  21880. getSWDTPS1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  21881. end;
  21882. procedure TWDT_WDTCON.setSWDTPS2; inline;
  21883. begin
  21884. pTDefRegMap(@Self)^.&set := $00000010;
  21885. end;
  21886. procedure TWDT_WDTCON.clearSWDTPS2; inline;
  21887. begin
  21888. pTDefRegMap(@Self)^.clr := $00000010;
  21889. end;
  21890. procedure TWDT_WDTCON.setSWDTPS2(thebits : TBits_1); inline;
  21891. begin
  21892. if thebits = 0 then
  21893. pTDefRegMap(@Self)^.clr := $00000010
  21894. else
  21895. pTDefRegMap(@Self)^.&set := $00000010;
  21896. end;
  21897. function TWDT_WDTCON.getSWDTPS2 : TBits_1; inline;
  21898. begin
  21899. getSWDTPS2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  21900. end;
  21901. procedure TWDT_WDTCON.setSWDTPS3; inline;
  21902. begin
  21903. pTDefRegMap(@Self)^.&set := $00000020;
  21904. end;
  21905. procedure TWDT_WDTCON.clearSWDTPS3; inline;
  21906. begin
  21907. pTDefRegMap(@Self)^.clr := $00000020;
  21908. end;
  21909. procedure TWDT_WDTCON.setSWDTPS3(thebits : TBits_1); inline;
  21910. begin
  21911. if thebits = 0 then
  21912. pTDefRegMap(@Self)^.clr := $00000020
  21913. else
  21914. pTDefRegMap(@Self)^.&set := $00000020;
  21915. end;
  21916. function TWDT_WDTCON.getSWDTPS3 : TBits_1; inline;
  21917. begin
  21918. getSWDTPS3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  21919. end;
  21920. procedure TWDT_WDTCON.setSWDTPS4; inline;
  21921. begin
  21922. pTDefRegMap(@Self)^.&set := $00000040;
  21923. end;
  21924. procedure TWDT_WDTCON.clearSWDTPS4; inline;
  21925. begin
  21926. pTDefRegMap(@Self)^.clr := $00000040;
  21927. end;
  21928. procedure TWDT_WDTCON.setSWDTPS4(thebits : TBits_1); inline;
  21929. begin
  21930. if thebits = 0 then
  21931. pTDefRegMap(@Self)^.clr := $00000040
  21932. else
  21933. pTDefRegMap(@Self)^.&set := $00000040;
  21934. end;
  21935. function TWDT_WDTCON.getSWDTPS4 : TBits_1; inline;
  21936. begin
  21937. getSWDTPS4 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  21938. end;
  21939. procedure TWDT_WDTCON.setWDTPSTA(thebits : TBits_5); inline;
  21940. begin
  21941. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  21942. end;
  21943. function TWDT_WDTCON.getWDTPSTA : TBits_5; inline;
  21944. begin
  21945. getWDTPSTA := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  21946. end;
  21947. procedure TWDT_WDTCON.setWDTPS(thebits : TBits_5); inline;
  21948. begin
  21949. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  21950. end;
  21951. function TWDT_WDTCON.getWDTPS : TBits_5; inline;
  21952. begin
  21953. getWDTPS := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  21954. end;
  21955. procedure TWDT_WDTCON.setw(thebits : TBits_32); inline;
  21956. begin
  21957. pTDefRegMap(@Self)^.val := thebits;
  21958. end;
  21959. function TWDT_WDTCON.getw : TBits_32; inline;
  21960. begin
  21961. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  21962. end;
  21963. procedure TRTCC_RTCCON.setRTCOE; inline;
  21964. begin
  21965. pTDefRegMap(@Self)^.&set := $00000001;
  21966. end;
  21967. procedure TRTCC_RTCCON.clearRTCOE; inline;
  21968. begin
  21969. pTDefRegMap(@Self)^.clr := $00000001;
  21970. end;
  21971. procedure TRTCC_RTCCON.setRTCOE(thebits : TBits_1); inline;
  21972. begin
  21973. if thebits = 0 then
  21974. pTDefRegMap(@Self)^.clr := $00000001
  21975. else
  21976. pTDefRegMap(@Self)^.&set := $00000001;
  21977. end;
  21978. function TRTCC_RTCCON.getRTCOE : TBits_1; inline;
  21979. begin
  21980. getRTCOE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  21981. end;
  21982. procedure TRTCC_RTCCON.setHALFSEC; inline;
  21983. begin
  21984. pTDefRegMap(@Self)^.&set := $00000002;
  21985. end;
  21986. procedure TRTCC_RTCCON.clearHALFSEC; inline;
  21987. begin
  21988. pTDefRegMap(@Self)^.clr := $00000002;
  21989. end;
  21990. procedure TRTCC_RTCCON.setHALFSEC(thebits : TBits_1); inline;
  21991. begin
  21992. if thebits = 0 then
  21993. pTDefRegMap(@Self)^.clr := $00000002
  21994. else
  21995. pTDefRegMap(@Self)^.&set := $00000002;
  21996. end;
  21997. function TRTCC_RTCCON.getHALFSEC : TBits_1; inline;
  21998. begin
  21999. getHALFSEC := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  22000. end;
  22001. procedure TRTCC_RTCCON.setRTCSYNC; inline;
  22002. begin
  22003. pTDefRegMap(@Self)^.&set := $00000004;
  22004. end;
  22005. procedure TRTCC_RTCCON.clearRTCSYNC; inline;
  22006. begin
  22007. pTDefRegMap(@Self)^.clr := $00000004;
  22008. end;
  22009. procedure TRTCC_RTCCON.setRTCSYNC(thebits : TBits_1); inline;
  22010. begin
  22011. if thebits = 0 then
  22012. pTDefRegMap(@Self)^.clr := $00000004
  22013. else
  22014. pTDefRegMap(@Self)^.&set := $00000004;
  22015. end;
  22016. function TRTCC_RTCCON.getRTCSYNC : TBits_1; inline;
  22017. begin
  22018. getRTCSYNC := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  22019. end;
  22020. procedure TRTCC_RTCCON.setRTCWREN; inline;
  22021. begin
  22022. pTDefRegMap(@Self)^.&set := $00000008;
  22023. end;
  22024. procedure TRTCC_RTCCON.clearRTCWREN; inline;
  22025. begin
  22026. pTDefRegMap(@Self)^.clr := $00000008;
  22027. end;
  22028. procedure TRTCC_RTCCON.setRTCWREN(thebits : TBits_1); inline;
  22029. begin
  22030. if thebits = 0 then
  22031. pTDefRegMap(@Self)^.clr := $00000008
  22032. else
  22033. pTDefRegMap(@Self)^.&set := $00000008;
  22034. end;
  22035. function TRTCC_RTCCON.getRTCWREN : TBits_1; inline;
  22036. begin
  22037. getRTCWREN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  22038. end;
  22039. procedure TRTCC_RTCCON.setRTCCLKON; inline;
  22040. begin
  22041. pTDefRegMap(@Self)^.&set := $00000040;
  22042. end;
  22043. procedure TRTCC_RTCCON.clearRTCCLKON; inline;
  22044. begin
  22045. pTDefRegMap(@Self)^.clr := $00000040;
  22046. end;
  22047. procedure TRTCC_RTCCON.setRTCCLKON(thebits : TBits_1); inline;
  22048. begin
  22049. if thebits = 0 then
  22050. pTDefRegMap(@Self)^.clr := $00000040
  22051. else
  22052. pTDefRegMap(@Self)^.&set := $00000040;
  22053. end;
  22054. function TRTCC_RTCCON.getRTCCLKON : TBits_1; inline;
  22055. begin
  22056. getRTCCLKON := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  22057. end;
  22058. procedure TRTCC_RTCCON.setRTSECSEL; inline;
  22059. begin
  22060. pTDefRegMap(@Self)^.&set := $00000080;
  22061. end;
  22062. procedure TRTCC_RTCCON.clearRTSECSEL; inline;
  22063. begin
  22064. pTDefRegMap(@Self)^.clr := $00000080;
  22065. end;
  22066. procedure TRTCC_RTCCON.setRTSECSEL(thebits : TBits_1); inline;
  22067. begin
  22068. if thebits = 0 then
  22069. pTDefRegMap(@Self)^.clr := $00000080
  22070. else
  22071. pTDefRegMap(@Self)^.&set := $00000080;
  22072. end;
  22073. function TRTCC_RTCCON.getRTSECSEL : TBits_1; inline;
  22074. begin
  22075. getRTSECSEL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  22076. end;
  22077. procedure TRTCC_RTCCON.setSIDL; inline;
  22078. begin
  22079. pTDefRegMap(@Self)^.&set := $00002000;
  22080. end;
  22081. procedure TRTCC_RTCCON.clearSIDL; inline;
  22082. begin
  22083. pTDefRegMap(@Self)^.clr := $00002000;
  22084. end;
  22085. procedure TRTCC_RTCCON.setSIDL(thebits : TBits_1); inline;
  22086. begin
  22087. if thebits = 0 then
  22088. pTDefRegMap(@Self)^.clr := $00002000
  22089. else
  22090. pTDefRegMap(@Self)^.&set := $00002000;
  22091. end;
  22092. function TRTCC_RTCCON.getSIDL : TBits_1; inline;
  22093. begin
  22094. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22095. end;
  22096. procedure TRTCC_RTCCON.setON; inline;
  22097. begin
  22098. pTDefRegMap(@Self)^.&set := $00008000;
  22099. end;
  22100. procedure TRTCC_RTCCON.clearON; inline;
  22101. begin
  22102. pTDefRegMap(@Self)^.clr := $00008000;
  22103. end;
  22104. procedure TRTCC_RTCCON.setON(thebits : TBits_1); inline;
  22105. begin
  22106. if thebits = 0 then
  22107. pTDefRegMap(@Self)^.clr := $00008000
  22108. else
  22109. pTDefRegMap(@Self)^.&set := $00008000;
  22110. end;
  22111. function TRTCC_RTCCON.getON : TBits_1; inline;
  22112. begin
  22113. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22114. end;
  22115. procedure TRTCC_RTCCON.setCAL(thebits : TBits_10); inline;
  22116. begin
  22117. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FC00FFFF or ( thebits shl 16 );
  22118. end;
  22119. function TRTCC_RTCCON.getCAL : TBits_10; inline;
  22120. begin
  22121. getCAL := (pTDefRegMap(@Self)^.val and $03FF0000) shr 16;
  22122. end;
  22123. procedure TRTCC_RTCCON.setw(thebits : TBits_32); inline;
  22124. begin
  22125. pTDefRegMap(@Self)^.val := thebits;
  22126. end;
  22127. function TRTCC_RTCCON.getw : TBits_32; inline;
  22128. begin
  22129. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22130. end;
  22131. procedure TRTCC_RTCALRM.setARPT(thebits : TBits_8); inline;
  22132. begin
  22133. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  22134. end;
  22135. function TRTCC_RTCALRM.getARPT : TBits_8; inline;
  22136. begin
  22137. getARPT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  22138. end;
  22139. procedure TRTCC_RTCALRM.setAMASK(thebits : TBits_4); inline;
  22140. begin
  22141. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  22142. end;
  22143. function TRTCC_RTCALRM.getAMASK : TBits_4; inline;
  22144. begin
  22145. getAMASK := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  22146. end;
  22147. procedure TRTCC_RTCALRM.setALRMSYNC; inline;
  22148. begin
  22149. pTDefRegMap(@Self)^.&set := $00001000;
  22150. end;
  22151. procedure TRTCC_RTCALRM.clearALRMSYNC; inline;
  22152. begin
  22153. pTDefRegMap(@Self)^.clr := $00001000;
  22154. end;
  22155. procedure TRTCC_RTCALRM.setALRMSYNC(thebits : TBits_1); inline;
  22156. begin
  22157. if thebits = 0 then
  22158. pTDefRegMap(@Self)^.clr := $00001000
  22159. else
  22160. pTDefRegMap(@Self)^.&set := $00001000;
  22161. end;
  22162. function TRTCC_RTCALRM.getALRMSYNC : TBits_1; inline;
  22163. begin
  22164. getALRMSYNC := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  22165. end;
  22166. procedure TRTCC_RTCALRM.setPIV; inline;
  22167. begin
  22168. pTDefRegMap(@Self)^.&set := $00002000;
  22169. end;
  22170. procedure TRTCC_RTCALRM.clearPIV; inline;
  22171. begin
  22172. pTDefRegMap(@Self)^.clr := $00002000;
  22173. end;
  22174. procedure TRTCC_RTCALRM.setPIV(thebits : TBits_1); inline;
  22175. begin
  22176. if thebits = 0 then
  22177. pTDefRegMap(@Self)^.clr := $00002000
  22178. else
  22179. pTDefRegMap(@Self)^.&set := $00002000;
  22180. end;
  22181. function TRTCC_RTCALRM.getPIV : TBits_1; inline;
  22182. begin
  22183. getPIV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22184. end;
  22185. procedure TRTCC_RTCALRM.setCHIME; inline;
  22186. begin
  22187. pTDefRegMap(@Self)^.&set := $00004000;
  22188. end;
  22189. procedure TRTCC_RTCALRM.clearCHIME; inline;
  22190. begin
  22191. pTDefRegMap(@Self)^.clr := $00004000;
  22192. end;
  22193. procedure TRTCC_RTCALRM.setCHIME(thebits : TBits_1); inline;
  22194. begin
  22195. if thebits = 0 then
  22196. pTDefRegMap(@Self)^.clr := $00004000
  22197. else
  22198. pTDefRegMap(@Self)^.&set := $00004000;
  22199. end;
  22200. function TRTCC_RTCALRM.getCHIME : TBits_1; inline;
  22201. begin
  22202. getCHIME := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  22203. end;
  22204. procedure TRTCC_RTCALRM.setALRMEN; inline;
  22205. begin
  22206. pTDefRegMap(@Self)^.&set := $00008000;
  22207. end;
  22208. procedure TRTCC_RTCALRM.clearALRMEN; inline;
  22209. begin
  22210. pTDefRegMap(@Self)^.clr := $00008000;
  22211. end;
  22212. procedure TRTCC_RTCALRM.setALRMEN(thebits : TBits_1); inline;
  22213. begin
  22214. if thebits = 0 then
  22215. pTDefRegMap(@Self)^.clr := $00008000
  22216. else
  22217. pTDefRegMap(@Self)^.&set := $00008000;
  22218. end;
  22219. function TRTCC_RTCALRM.getALRMEN : TBits_1; inline;
  22220. begin
  22221. getALRMEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22222. end;
  22223. procedure TRTCC_RTCALRM.setw(thebits : TBits_32); inline;
  22224. begin
  22225. pTDefRegMap(@Self)^.val := thebits;
  22226. end;
  22227. function TRTCC_RTCALRM.getw : TBits_32; inline;
  22228. begin
  22229. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22230. end;
  22231. procedure TRTCC_RTCTIME.setSEC01(thebits : TBits_4); inline;
  22232. begin
  22233. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  22234. end;
  22235. function TRTCC_RTCTIME.getSEC01 : TBits_4; inline;
  22236. begin
  22237. getSEC01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  22238. end;
  22239. procedure TRTCC_RTCTIME.setSEC10(thebits : TBits_4); inline;
  22240. begin
  22241. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  22242. end;
  22243. function TRTCC_RTCTIME.getSEC10 : TBits_4; inline;
  22244. begin
  22245. getSEC10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  22246. end;
  22247. procedure TRTCC_RTCTIME.setMIN01(thebits : TBits_4); inline;
  22248. begin
  22249. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  22250. end;
  22251. function TRTCC_RTCTIME.getMIN01 : TBits_4; inline;
  22252. begin
  22253. getMIN01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  22254. end;
  22255. procedure TRTCC_RTCTIME.setMIN10(thebits : TBits_4); inline;
  22256. begin
  22257. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  22258. end;
  22259. function TRTCC_RTCTIME.getMIN10 : TBits_4; inline;
  22260. begin
  22261. getMIN10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  22262. end;
  22263. procedure TRTCC_RTCTIME.setHR01(thebits : TBits_4); inline;
  22264. begin
  22265. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  22266. end;
  22267. function TRTCC_RTCTIME.getHR01 : TBits_4; inline;
  22268. begin
  22269. getHR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  22270. end;
  22271. procedure TRTCC_RTCTIME.setHR10(thebits : TBits_4); inline;
  22272. begin
  22273. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  22274. end;
  22275. function TRTCC_RTCTIME.getHR10 : TBits_4; inline;
  22276. begin
  22277. getHR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  22278. end;
  22279. procedure TRTCC_RTCTIME.setw(thebits : TBits_32); inline;
  22280. begin
  22281. pTDefRegMap(@Self)^.val := thebits;
  22282. end;
  22283. function TRTCC_RTCTIME.getw : TBits_32; inline;
  22284. begin
  22285. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22286. end;
  22287. procedure TRTCC_RTCDATE.setWDAY01(thebits : TBits_4); inline;
  22288. begin
  22289. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  22290. end;
  22291. function TRTCC_RTCDATE.getWDAY01 : TBits_4; inline;
  22292. begin
  22293. getWDAY01 := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  22294. end;
  22295. procedure TRTCC_RTCDATE.setDAY01(thebits : TBits_4); inline;
  22296. begin
  22297. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  22298. end;
  22299. function TRTCC_RTCDATE.getDAY01 : TBits_4; inline;
  22300. begin
  22301. getDAY01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  22302. end;
  22303. procedure TRTCC_RTCDATE.setDAY10(thebits : TBits_4); inline;
  22304. begin
  22305. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  22306. end;
  22307. function TRTCC_RTCDATE.getDAY10 : TBits_4; inline;
  22308. begin
  22309. getDAY10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  22310. end;
  22311. procedure TRTCC_RTCDATE.setMONTH01(thebits : TBits_4); inline;
  22312. begin
  22313. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  22314. end;
  22315. function TRTCC_RTCDATE.getMONTH01 : TBits_4; inline;
  22316. begin
  22317. getMONTH01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  22318. end;
  22319. procedure TRTCC_RTCDATE.setMONTH10(thebits : TBits_4); inline;
  22320. begin
  22321. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  22322. end;
  22323. function TRTCC_RTCDATE.getMONTH10 : TBits_4; inline;
  22324. begin
  22325. getMONTH10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  22326. end;
  22327. procedure TRTCC_RTCDATE.setYEAR01(thebits : TBits_4); inline;
  22328. begin
  22329. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  22330. end;
  22331. function TRTCC_RTCDATE.getYEAR01 : TBits_4; inline;
  22332. begin
  22333. getYEAR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  22334. end;
  22335. procedure TRTCC_RTCDATE.setYEAR10(thebits : TBits_4); inline;
  22336. begin
  22337. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  22338. end;
  22339. function TRTCC_RTCDATE.getYEAR10 : TBits_4; inline;
  22340. begin
  22341. getYEAR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  22342. end;
  22343. procedure TRTCC_RTCDATE.setw(thebits : TBits_32); inline;
  22344. begin
  22345. pTDefRegMap(@Self)^.val := thebits;
  22346. end;
  22347. function TRTCC_RTCDATE.getw : TBits_32; inline;
  22348. begin
  22349. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22350. end;
  22351. procedure TRTCC_ALRMTIME.setSEC01(thebits : TBits_4); inline;
  22352. begin
  22353. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  22354. end;
  22355. function TRTCC_ALRMTIME.getSEC01 : TBits_4; inline;
  22356. begin
  22357. getSEC01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  22358. end;
  22359. procedure TRTCC_ALRMTIME.setSEC10(thebits : TBits_4); inline;
  22360. begin
  22361. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  22362. end;
  22363. function TRTCC_ALRMTIME.getSEC10 : TBits_4; inline;
  22364. begin
  22365. getSEC10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  22366. end;
  22367. procedure TRTCC_ALRMTIME.setMIN01(thebits : TBits_4); inline;
  22368. begin
  22369. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  22370. end;
  22371. function TRTCC_ALRMTIME.getMIN01 : TBits_4; inline;
  22372. begin
  22373. getMIN01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  22374. end;
  22375. procedure TRTCC_ALRMTIME.setMIN10(thebits : TBits_4); inline;
  22376. begin
  22377. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  22378. end;
  22379. function TRTCC_ALRMTIME.getMIN10 : TBits_4; inline;
  22380. begin
  22381. getMIN10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  22382. end;
  22383. procedure TRTCC_ALRMTIME.setHR01(thebits : TBits_4); inline;
  22384. begin
  22385. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  22386. end;
  22387. function TRTCC_ALRMTIME.getHR01 : TBits_4; inline;
  22388. begin
  22389. getHR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  22390. end;
  22391. procedure TRTCC_ALRMTIME.setHR10(thebits : TBits_4); inline;
  22392. begin
  22393. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  22394. end;
  22395. function TRTCC_ALRMTIME.getHR10 : TBits_4; inline;
  22396. begin
  22397. getHR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  22398. end;
  22399. procedure TRTCC_ALRMTIME.setw(thebits : TBits_32); inline;
  22400. begin
  22401. pTDefRegMap(@Self)^.val := thebits;
  22402. end;
  22403. function TRTCC_ALRMTIME.getw : TBits_32; inline;
  22404. begin
  22405. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22406. end;
  22407. procedure TRTCC_ALRMDATE.setWDAY01(thebits : TBits_4); inline;
  22408. begin
  22409. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  22410. end;
  22411. function TRTCC_ALRMDATE.getWDAY01 : TBits_4; inline;
  22412. begin
  22413. getWDAY01 := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  22414. end;
  22415. procedure TRTCC_ALRMDATE.setDAY01(thebits : TBits_4); inline;
  22416. begin
  22417. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  22418. end;
  22419. function TRTCC_ALRMDATE.getDAY01 : TBits_4; inline;
  22420. begin
  22421. getDAY01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  22422. end;
  22423. procedure TRTCC_ALRMDATE.setDAY10(thebits : TBits_4); inline;
  22424. begin
  22425. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  22426. end;
  22427. function TRTCC_ALRMDATE.getDAY10 : TBits_4; inline;
  22428. begin
  22429. getDAY10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  22430. end;
  22431. procedure TRTCC_ALRMDATE.setMONTH01(thebits : TBits_4); inline;
  22432. begin
  22433. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  22434. end;
  22435. function TRTCC_ALRMDATE.getMONTH01 : TBits_4; inline;
  22436. begin
  22437. getMONTH01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  22438. end;
  22439. procedure TRTCC_ALRMDATE.setMONTH10(thebits : TBits_4); inline;
  22440. begin
  22441. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  22442. end;
  22443. function TRTCC_ALRMDATE.getMONTH10 : TBits_4; inline;
  22444. begin
  22445. getMONTH10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  22446. end;
  22447. procedure TRTCC_ALRMDATE.setw(thebits : TBits_32); inline;
  22448. begin
  22449. pTDefRegMap(@Self)^.val := thebits;
  22450. end;
  22451. function TRTCC_ALRMDATE.getw : TBits_32; inline;
  22452. begin
  22453. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22454. end;
  22455. procedure TTMR1_T1CON.setTCS; inline;
  22456. begin
  22457. pTDefRegMap(@Self)^.&set := $00000002;
  22458. end;
  22459. procedure TTMR1_T1CON.clearTCS; inline;
  22460. begin
  22461. pTDefRegMap(@Self)^.clr := $00000002;
  22462. end;
  22463. procedure TTMR1_T1CON.setTCS(thebits : TBits_1); inline;
  22464. begin
  22465. if thebits = 0 then
  22466. pTDefRegMap(@Self)^.clr := $00000002
  22467. else
  22468. pTDefRegMap(@Self)^.&set := $00000002;
  22469. end;
  22470. function TTMR1_T1CON.getTCS : TBits_1; inline;
  22471. begin
  22472. getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  22473. end;
  22474. procedure TTMR1_T1CON.setTSYNC; inline;
  22475. begin
  22476. pTDefRegMap(@Self)^.&set := $00000004;
  22477. end;
  22478. procedure TTMR1_T1CON.clearTSYNC; inline;
  22479. begin
  22480. pTDefRegMap(@Self)^.clr := $00000004;
  22481. end;
  22482. procedure TTMR1_T1CON.setTSYNC(thebits : TBits_1); inline;
  22483. begin
  22484. if thebits = 0 then
  22485. pTDefRegMap(@Self)^.clr := $00000004
  22486. else
  22487. pTDefRegMap(@Self)^.&set := $00000004;
  22488. end;
  22489. function TTMR1_T1CON.getTSYNC : TBits_1; inline;
  22490. begin
  22491. getTSYNC := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  22492. end;
  22493. procedure TTMR1_T1CON.setTCKPS(thebits : TBits_2); inline;
  22494. begin
  22495. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFCF or ( thebits shl 4 );
  22496. end;
  22497. function TTMR1_T1CON.getTCKPS : TBits_2; inline;
  22498. begin
  22499. getTCKPS := (pTDefRegMap(@Self)^.val and $00000030) shr 4;
  22500. end;
  22501. procedure TTMR1_T1CON.setTGATE; inline;
  22502. begin
  22503. pTDefRegMap(@Self)^.&set := $00000080;
  22504. end;
  22505. procedure TTMR1_T1CON.clearTGATE; inline;
  22506. begin
  22507. pTDefRegMap(@Self)^.clr := $00000080;
  22508. end;
  22509. procedure TTMR1_T1CON.setTGATE(thebits : TBits_1); inline;
  22510. begin
  22511. if thebits = 0 then
  22512. pTDefRegMap(@Self)^.clr := $00000080
  22513. else
  22514. pTDefRegMap(@Self)^.&set := $00000080;
  22515. end;
  22516. function TTMR1_T1CON.getTGATE : TBits_1; inline;
  22517. begin
  22518. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  22519. end;
  22520. procedure TTMR1_T1CON.setTWIP; inline;
  22521. begin
  22522. pTDefRegMap(@Self)^.&set := $00000800;
  22523. end;
  22524. procedure TTMR1_T1CON.clearTWIP; inline;
  22525. begin
  22526. pTDefRegMap(@Self)^.clr := $00000800;
  22527. end;
  22528. procedure TTMR1_T1CON.setTWIP(thebits : TBits_1); inline;
  22529. begin
  22530. if thebits = 0 then
  22531. pTDefRegMap(@Self)^.clr := $00000800
  22532. else
  22533. pTDefRegMap(@Self)^.&set := $00000800;
  22534. end;
  22535. function TTMR1_T1CON.getTWIP : TBits_1; inline;
  22536. begin
  22537. getTWIP := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  22538. end;
  22539. procedure TTMR1_T1CON.setTWDIS; inline;
  22540. begin
  22541. pTDefRegMap(@Self)^.&set := $00001000;
  22542. end;
  22543. procedure TTMR1_T1CON.clearTWDIS; inline;
  22544. begin
  22545. pTDefRegMap(@Self)^.clr := $00001000;
  22546. end;
  22547. procedure TTMR1_T1CON.setTWDIS(thebits : TBits_1); inline;
  22548. begin
  22549. if thebits = 0 then
  22550. pTDefRegMap(@Self)^.clr := $00001000
  22551. else
  22552. pTDefRegMap(@Self)^.&set := $00001000;
  22553. end;
  22554. function TTMR1_T1CON.getTWDIS : TBits_1; inline;
  22555. begin
  22556. getTWDIS := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  22557. end;
  22558. procedure TTMR1_T1CON.setSIDL; inline;
  22559. begin
  22560. pTDefRegMap(@Self)^.&set := $00002000;
  22561. end;
  22562. procedure TTMR1_T1CON.clearSIDL; inline;
  22563. begin
  22564. pTDefRegMap(@Self)^.clr := $00002000;
  22565. end;
  22566. procedure TTMR1_T1CON.setSIDL(thebits : TBits_1); inline;
  22567. begin
  22568. if thebits = 0 then
  22569. pTDefRegMap(@Self)^.clr := $00002000
  22570. else
  22571. pTDefRegMap(@Self)^.&set := $00002000;
  22572. end;
  22573. function TTMR1_T1CON.getSIDL : TBits_1; inline;
  22574. begin
  22575. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22576. end;
  22577. procedure TTMR1_T1CON.setON; inline;
  22578. begin
  22579. pTDefRegMap(@Self)^.&set := $00008000;
  22580. end;
  22581. procedure TTMR1_T1CON.clearON; inline;
  22582. begin
  22583. pTDefRegMap(@Self)^.clr := $00008000;
  22584. end;
  22585. procedure TTMR1_T1CON.setON(thebits : TBits_1); inline;
  22586. begin
  22587. if thebits = 0 then
  22588. pTDefRegMap(@Self)^.clr := $00008000
  22589. else
  22590. pTDefRegMap(@Self)^.&set := $00008000;
  22591. end;
  22592. function TTMR1_T1CON.getON : TBits_1; inline;
  22593. begin
  22594. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22595. end;
  22596. procedure TTMR1_T1CON.setTCKPS0; inline;
  22597. begin
  22598. pTDefRegMap(@Self)^.&set := $00000010;
  22599. end;
  22600. procedure TTMR1_T1CON.clearTCKPS0; inline;
  22601. begin
  22602. pTDefRegMap(@Self)^.clr := $00000010;
  22603. end;
  22604. procedure TTMR1_T1CON.setTCKPS0(thebits : TBits_1); inline;
  22605. begin
  22606. if thebits = 0 then
  22607. pTDefRegMap(@Self)^.clr := $00000010
  22608. else
  22609. pTDefRegMap(@Self)^.&set := $00000010;
  22610. end;
  22611. function TTMR1_T1CON.getTCKPS0 : TBits_1; inline;
  22612. begin
  22613. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  22614. end;
  22615. procedure TTMR1_T1CON.setTCKPS1; inline;
  22616. begin
  22617. pTDefRegMap(@Self)^.&set := $00000020;
  22618. end;
  22619. procedure TTMR1_T1CON.clearTCKPS1; inline;
  22620. begin
  22621. pTDefRegMap(@Self)^.clr := $00000020;
  22622. end;
  22623. procedure TTMR1_T1CON.setTCKPS1(thebits : TBits_1); inline;
  22624. begin
  22625. if thebits = 0 then
  22626. pTDefRegMap(@Self)^.clr := $00000020
  22627. else
  22628. pTDefRegMap(@Self)^.&set := $00000020;
  22629. end;
  22630. function TTMR1_T1CON.getTCKPS1 : TBits_1; inline;
  22631. begin
  22632. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  22633. end;
  22634. procedure TTMR1_T1CON.setTSIDL; inline;
  22635. begin
  22636. pTDefRegMap(@Self)^.&set := $00002000;
  22637. end;
  22638. procedure TTMR1_T1CON.clearTSIDL; inline;
  22639. begin
  22640. pTDefRegMap(@Self)^.clr := $00002000;
  22641. end;
  22642. procedure TTMR1_T1CON.setTSIDL(thebits : TBits_1); inline;
  22643. begin
  22644. if thebits = 0 then
  22645. pTDefRegMap(@Self)^.clr := $00002000
  22646. else
  22647. pTDefRegMap(@Self)^.&set := $00002000;
  22648. end;
  22649. function TTMR1_T1CON.getTSIDL : TBits_1; inline;
  22650. begin
  22651. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22652. end;
  22653. procedure TTMR1_T1CON.setTON; inline;
  22654. begin
  22655. pTDefRegMap(@Self)^.&set := $00008000;
  22656. end;
  22657. procedure TTMR1_T1CON.clearTON; inline;
  22658. begin
  22659. pTDefRegMap(@Self)^.clr := $00008000;
  22660. end;
  22661. procedure TTMR1_T1CON.setTON(thebits : TBits_1); inline;
  22662. begin
  22663. if thebits = 0 then
  22664. pTDefRegMap(@Self)^.clr := $00008000
  22665. else
  22666. pTDefRegMap(@Self)^.&set := $00008000;
  22667. end;
  22668. function TTMR1_T1CON.getTON : TBits_1; inline;
  22669. begin
  22670. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22671. end;
  22672. procedure TTMR1_T1CON.setw(thebits : TBits_32); inline;
  22673. begin
  22674. pTDefRegMap(@Self)^.val := thebits;
  22675. end;
  22676. function TTMR1_T1CON.getw : TBits_32; inline;
  22677. begin
  22678. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22679. end;
  22680. procedure TTMR2_T2CON.setT32; inline;
  22681. begin
  22682. pTDefRegMap(@Self)^.&set := $00000008;
  22683. end;
  22684. procedure TTMR2_T2CON.clearT32; inline;
  22685. begin
  22686. pTDefRegMap(@Self)^.clr := $00000008;
  22687. end;
  22688. procedure TTMR2_T2CON.setT32(thebits : TBits_1); inline;
  22689. begin
  22690. if thebits = 0 then
  22691. pTDefRegMap(@Self)^.clr := $00000008
  22692. else
  22693. pTDefRegMap(@Self)^.&set := $00000008;
  22694. end;
  22695. function TTMR2_T2CON.getT32 : TBits_1; inline;
  22696. begin
  22697. getT32 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  22698. end;
  22699. procedure TTMR2_T2CON.setTCKPS(thebits : TBits_3); inline;
  22700. begin
  22701. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  22702. end;
  22703. function TTMR2_T2CON.getTCKPS : TBits_3; inline;
  22704. begin
  22705. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  22706. end;
  22707. procedure TTMR2_T2CON.setTGATE; inline;
  22708. begin
  22709. pTDefRegMap(@Self)^.&set := $00000080;
  22710. end;
  22711. procedure TTMR2_T2CON.clearTGATE; inline;
  22712. begin
  22713. pTDefRegMap(@Self)^.clr := $00000080;
  22714. end;
  22715. procedure TTMR2_T2CON.setTGATE(thebits : TBits_1); inline;
  22716. begin
  22717. if thebits = 0 then
  22718. pTDefRegMap(@Self)^.clr := $00000080
  22719. else
  22720. pTDefRegMap(@Self)^.&set := $00000080;
  22721. end;
  22722. function TTMR2_T2CON.getTGATE : TBits_1; inline;
  22723. begin
  22724. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  22725. end;
  22726. procedure TTMR2_T2CON.setSIDL; inline;
  22727. begin
  22728. pTDefRegMap(@Self)^.&set := $00002000;
  22729. end;
  22730. procedure TTMR2_T2CON.clearSIDL; inline;
  22731. begin
  22732. pTDefRegMap(@Self)^.clr := $00002000;
  22733. end;
  22734. procedure TTMR2_T2CON.setSIDL(thebits : TBits_1); inline;
  22735. begin
  22736. if thebits = 0 then
  22737. pTDefRegMap(@Self)^.clr := $00002000
  22738. else
  22739. pTDefRegMap(@Self)^.&set := $00002000;
  22740. end;
  22741. function TTMR2_T2CON.getSIDL : TBits_1; inline;
  22742. begin
  22743. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22744. end;
  22745. procedure TTMR2_T2CON.setON; inline;
  22746. begin
  22747. pTDefRegMap(@Self)^.&set := $00008000;
  22748. end;
  22749. procedure TTMR2_T2CON.clearON; inline;
  22750. begin
  22751. pTDefRegMap(@Self)^.clr := $00008000;
  22752. end;
  22753. procedure TTMR2_T2CON.setON(thebits : TBits_1); inline;
  22754. begin
  22755. if thebits = 0 then
  22756. pTDefRegMap(@Self)^.clr := $00008000
  22757. else
  22758. pTDefRegMap(@Self)^.&set := $00008000;
  22759. end;
  22760. function TTMR2_T2CON.getON : TBits_1; inline;
  22761. begin
  22762. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22763. end;
  22764. procedure TTMR2_T2CON.setTCKPS0; inline;
  22765. begin
  22766. pTDefRegMap(@Self)^.&set := $00000010;
  22767. end;
  22768. procedure TTMR2_T2CON.clearTCKPS0; inline;
  22769. begin
  22770. pTDefRegMap(@Self)^.clr := $00000010;
  22771. end;
  22772. procedure TTMR2_T2CON.setTCKPS0(thebits : TBits_1); inline;
  22773. begin
  22774. if thebits = 0 then
  22775. pTDefRegMap(@Self)^.clr := $00000010
  22776. else
  22777. pTDefRegMap(@Self)^.&set := $00000010;
  22778. end;
  22779. function TTMR2_T2CON.getTCKPS0 : TBits_1; inline;
  22780. begin
  22781. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  22782. end;
  22783. procedure TTMR2_T2CON.setTCKPS1; inline;
  22784. begin
  22785. pTDefRegMap(@Self)^.&set := $00000020;
  22786. end;
  22787. procedure TTMR2_T2CON.clearTCKPS1; inline;
  22788. begin
  22789. pTDefRegMap(@Self)^.clr := $00000020;
  22790. end;
  22791. procedure TTMR2_T2CON.setTCKPS1(thebits : TBits_1); inline;
  22792. begin
  22793. if thebits = 0 then
  22794. pTDefRegMap(@Self)^.clr := $00000020
  22795. else
  22796. pTDefRegMap(@Self)^.&set := $00000020;
  22797. end;
  22798. function TTMR2_T2CON.getTCKPS1 : TBits_1; inline;
  22799. begin
  22800. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  22801. end;
  22802. procedure TTMR2_T2CON.setTCKPS2; inline;
  22803. begin
  22804. pTDefRegMap(@Self)^.&set := $00000040;
  22805. end;
  22806. procedure TTMR2_T2CON.clearTCKPS2; inline;
  22807. begin
  22808. pTDefRegMap(@Self)^.clr := $00000040;
  22809. end;
  22810. procedure TTMR2_T2CON.setTCKPS2(thebits : TBits_1); inline;
  22811. begin
  22812. if thebits = 0 then
  22813. pTDefRegMap(@Self)^.clr := $00000040
  22814. else
  22815. pTDefRegMap(@Self)^.&set := $00000040;
  22816. end;
  22817. function TTMR2_T2CON.getTCKPS2 : TBits_1; inline;
  22818. begin
  22819. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  22820. end;
  22821. procedure TTMR2_T2CON.setTSIDL; inline;
  22822. begin
  22823. pTDefRegMap(@Self)^.&set := $00002000;
  22824. end;
  22825. procedure TTMR2_T2CON.clearTSIDL; inline;
  22826. begin
  22827. pTDefRegMap(@Self)^.clr := $00002000;
  22828. end;
  22829. procedure TTMR2_T2CON.setTSIDL(thebits : TBits_1); inline;
  22830. begin
  22831. if thebits = 0 then
  22832. pTDefRegMap(@Self)^.clr := $00002000
  22833. else
  22834. pTDefRegMap(@Self)^.&set := $00002000;
  22835. end;
  22836. function TTMR2_T2CON.getTSIDL : TBits_1; inline;
  22837. begin
  22838. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22839. end;
  22840. procedure TTMR2_T2CON.setTON; inline;
  22841. begin
  22842. pTDefRegMap(@Self)^.&set := $00008000;
  22843. end;
  22844. procedure TTMR2_T2CON.clearTON; inline;
  22845. begin
  22846. pTDefRegMap(@Self)^.clr := $00008000;
  22847. end;
  22848. procedure TTMR2_T2CON.setTON(thebits : TBits_1); inline;
  22849. begin
  22850. if thebits = 0 then
  22851. pTDefRegMap(@Self)^.clr := $00008000
  22852. else
  22853. pTDefRegMap(@Self)^.&set := $00008000;
  22854. end;
  22855. function TTMR2_T2CON.getTON : TBits_1; inline;
  22856. begin
  22857. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22858. end;
  22859. procedure TTMR2_T2CON.setw(thebits : TBits_32); inline;
  22860. begin
  22861. pTDefRegMap(@Self)^.val := thebits;
  22862. end;
  22863. function TTMR2_T2CON.getw : TBits_32; inline;
  22864. begin
  22865. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22866. end;
  22867. procedure TTMR3_T3CON.setTCKPS(thebits : TBits_3); inline;
  22868. begin
  22869. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  22870. end;
  22871. function TTMR3_T3CON.getTCKPS : TBits_3; inline;
  22872. begin
  22873. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  22874. end;
  22875. procedure TTMR3_T3CON.setTGATE; inline;
  22876. begin
  22877. pTDefRegMap(@Self)^.&set := $00000080;
  22878. end;
  22879. procedure TTMR3_T3CON.clearTGATE; inline;
  22880. begin
  22881. pTDefRegMap(@Self)^.clr := $00000080;
  22882. end;
  22883. procedure TTMR3_T3CON.setTGATE(thebits : TBits_1); inline;
  22884. begin
  22885. if thebits = 0 then
  22886. pTDefRegMap(@Self)^.clr := $00000080
  22887. else
  22888. pTDefRegMap(@Self)^.&set := $00000080;
  22889. end;
  22890. function TTMR3_T3CON.getTGATE : TBits_1; inline;
  22891. begin
  22892. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  22893. end;
  22894. procedure TTMR3_T3CON.setSIDL; inline;
  22895. begin
  22896. pTDefRegMap(@Self)^.&set := $00002000;
  22897. end;
  22898. procedure TTMR3_T3CON.clearSIDL; inline;
  22899. begin
  22900. pTDefRegMap(@Self)^.clr := $00002000;
  22901. end;
  22902. procedure TTMR3_T3CON.setSIDL(thebits : TBits_1); inline;
  22903. begin
  22904. if thebits = 0 then
  22905. pTDefRegMap(@Self)^.clr := $00002000
  22906. else
  22907. pTDefRegMap(@Self)^.&set := $00002000;
  22908. end;
  22909. function TTMR3_T3CON.getSIDL : TBits_1; inline;
  22910. begin
  22911. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22912. end;
  22913. procedure TTMR3_T3CON.setON; inline;
  22914. begin
  22915. pTDefRegMap(@Self)^.&set := $00008000;
  22916. end;
  22917. procedure TTMR3_T3CON.clearON; inline;
  22918. begin
  22919. pTDefRegMap(@Self)^.clr := $00008000;
  22920. end;
  22921. procedure TTMR3_T3CON.setON(thebits : TBits_1); inline;
  22922. begin
  22923. if thebits = 0 then
  22924. pTDefRegMap(@Self)^.clr := $00008000
  22925. else
  22926. pTDefRegMap(@Self)^.&set := $00008000;
  22927. end;
  22928. function TTMR3_T3CON.getON : TBits_1; inline;
  22929. begin
  22930. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22931. end;
  22932. procedure TTMR3_T3CON.setTCKPS0; inline;
  22933. begin
  22934. pTDefRegMap(@Self)^.&set := $00000010;
  22935. end;
  22936. procedure TTMR3_T3CON.clearTCKPS0; inline;
  22937. begin
  22938. pTDefRegMap(@Self)^.clr := $00000010;
  22939. end;
  22940. procedure TTMR3_T3CON.setTCKPS0(thebits : TBits_1); inline;
  22941. begin
  22942. if thebits = 0 then
  22943. pTDefRegMap(@Self)^.clr := $00000010
  22944. else
  22945. pTDefRegMap(@Self)^.&set := $00000010;
  22946. end;
  22947. function TTMR3_T3CON.getTCKPS0 : TBits_1; inline;
  22948. begin
  22949. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  22950. end;
  22951. procedure TTMR3_T3CON.setTCKPS1; inline;
  22952. begin
  22953. pTDefRegMap(@Self)^.&set := $00000020;
  22954. end;
  22955. procedure TTMR3_T3CON.clearTCKPS1; inline;
  22956. begin
  22957. pTDefRegMap(@Self)^.clr := $00000020;
  22958. end;
  22959. procedure TTMR3_T3CON.setTCKPS1(thebits : TBits_1); inline;
  22960. begin
  22961. if thebits = 0 then
  22962. pTDefRegMap(@Self)^.clr := $00000020
  22963. else
  22964. pTDefRegMap(@Self)^.&set := $00000020;
  22965. end;
  22966. function TTMR3_T3CON.getTCKPS1 : TBits_1; inline;
  22967. begin
  22968. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  22969. end;
  22970. procedure TTMR3_T3CON.setTCKPS2; inline;
  22971. begin
  22972. pTDefRegMap(@Self)^.&set := $00000040;
  22973. end;
  22974. procedure TTMR3_T3CON.clearTCKPS2; inline;
  22975. begin
  22976. pTDefRegMap(@Self)^.clr := $00000040;
  22977. end;
  22978. procedure TTMR3_T3CON.setTCKPS2(thebits : TBits_1); inline;
  22979. begin
  22980. if thebits = 0 then
  22981. pTDefRegMap(@Self)^.clr := $00000040
  22982. else
  22983. pTDefRegMap(@Self)^.&set := $00000040;
  22984. end;
  22985. function TTMR3_T3CON.getTCKPS2 : TBits_1; inline;
  22986. begin
  22987. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  22988. end;
  22989. procedure TTMR3_T3CON.setTSIDL; inline;
  22990. begin
  22991. pTDefRegMap(@Self)^.&set := $00002000;
  22992. end;
  22993. procedure TTMR3_T3CON.clearTSIDL; inline;
  22994. begin
  22995. pTDefRegMap(@Self)^.clr := $00002000;
  22996. end;
  22997. procedure TTMR3_T3CON.setTSIDL(thebits : TBits_1); inline;
  22998. begin
  22999. if thebits = 0 then
  23000. pTDefRegMap(@Self)^.clr := $00002000
  23001. else
  23002. pTDefRegMap(@Self)^.&set := $00002000;
  23003. end;
  23004. function TTMR3_T3CON.getTSIDL : TBits_1; inline;
  23005. begin
  23006. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23007. end;
  23008. procedure TTMR3_T3CON.setTON; inline;
  23009. begin
  23010. pTDefRegMap(@Self)^.&set := $00008000;
  23011. end;
  23012. procedure TTMR3_T3CON.clearTON; inline;
  23013. begin
  23014. pTDefRegMap(@Self)^.clr := $00008000;
  23015. end;
  23016. procedure TTMR3_T3CON.setTON(thebits : TBits_1); inline;
  23017. begin
  23018. if thebits = 0 then
  23019. pTDefRegMap(@Self)^.clr := $00008000
  23020. else
  23021. pTDefRegMap(@Self)^.&set := $00008000;
  23022. end;
  23023. function TTMR3_T3CON.getTON : TBits_1; inline;
  23024. begin
  23025. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23026. end;
  23027. procedure TTMR3_T3CON.setw(thebits : TBits_32); inline;
  23028. begin
  23029. pTDefRegMap(@Self)^.val := thebits;
  23030. end;
  23031. function TTMR3_T3CON.getw : TBits_32; inline;
  23032. begin
  23033. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23034. end;
  23035. procedure TTMR4_T4CON.setT32; inline;
  23036. begin
  23037. pTDefRegMap(@Self)^.&set := $00000008;
  23038. end;
  23039. procedure TTMR4_T4CON.clearT32; inline;
  23040. begin
  23041. pTDefRegMap(@Self)^.clr := $00000008;
  23042. end;
  23043. procedure TTMR4_T4CON.setT32(thebits : TBits_1); inline;
  23044. begin
  23045. if thebits = 0 then
  23046. pTDefRegMap(@Self)^.clr := $00000008
  23047. else
  23048. pTDefRegMap(@Self)^.&set := $00000008;
  23049. end;
  23050. function TTMR4_T4CON.getT32 : TBits_1; inline;
  23051. begin
  23052. getT32 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  23053. end;
  23054. procedure TTMR4_T4CON.setTCKPS(thebits : TBits_3); inline;
  23055. begin
  23056. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  23057. end;
  23058. function TTMR4_T4CON.getTCKPS : TBits_3; inline;
  23059. begin
  23060. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  23061. end;
  23062. procedure TTMR4_T4CON.setTGATE; inline;
  23063. begin
  23064. pTDefRegMap(@Self)^.&set := $00000080;
  23065. end;
  23066. procedure TTMR4_T4CON.clearTGATE; inline;
  23067. begin
  23068. pTDefRegMap(@Self)^.clr := $00000080;
  23069. end;
  23070. procedure TTMR4_T4CON.setTGATE(thebits : TBits_1); inline;
  23071. begin
  23072. if thebits = 0 then
  23073. pTDefRegMap(@Self)^.clr := $00000080
  23074. else
  23075. pTDefRegMap(@Self)^.&set := $00000080;
  23076. end;
  23077. function TTMR4_T4CON.getTGATE : TBits_1; inline;
  23078. begin
  23079. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23080. end;
  23081. procedure TTMR4_T4CON.setSIDL; inline;
  23082. begin
  23083. pTDefRegMap(@Self)^.&set := $00002000;
  23084. end;
  23085. procedure TTMR4_T4CON.clearSIDL; inline;
  23086. begin
  23087. pTDefRegMap(@Self)^.clr := $00002000;
  23088. end;
  23089. procedure TTMR4_T4CON.setSIDL(thebits : TBits_1); inline;
  23090. begin
  23091. if thebits = 0 then
  23092. pTDefRegMap(@Self)^.clr := $00002000
  23093. else
  23094. pTDefRegMap(@Self)^.&set := $00002000;
  23095. end;
  23096. function TTMR4_T4CON.getSIDL : TBits_1; inline;
  23097. begin
  23098. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23099. end;
  23100. procedure TTMR4_T4CON.setON; inline;
  23101. begin
  23102. pTDefRegMap(@Self)^.&set := $00008000;
  23103. end;
  23104. procedure TTMR4_T4CON.clearON; inline;
  23105. begin
  23106. pTDefRegMap(@Self)^.clr := $00008000;
  23107. end;
  23108. procedure TTMR4_T4CON.setON(thebits : TBits_1); inline;
  23109. begin
  23110. if thebits = 0 then
  23111. pTDefRegMap(@Self)^.clr := $00008000
  23112. else
  23113. pTDefRegMap(@Self)^.&set := $00008000;
  23114. end;
  23115. function TTMR4_T4CON.getON : TBits_1; inline;
  23116. begin
  23117. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23118. end;
  23119. procedure TTMR4_T4CON.setTCKPS0; inline;
  23120. begin
  23121. pTDefRegMap(@Self)^.&set := $00000010;
  23122. end;
  23123. procedure TTMR4_T4CON.clearTCKPS0; inline;
  23124. begin
  23125. pTDefRegMap(@Self)^.clr := $00000010;
  23126. end;
  23127. procedure TTMR4_T4CON.setTCKPS0(thebits : TBits_1); inline;
  23128. begin
  23129. if thebits = 0 then
  23130. pTDefRegMap(@Self)^.clr := $00000010
  23131. else
  23132. pTDefRegMap(@Self)^.&set := $00000010;
  23133. end;
  23134. function TTMR4_T4CON.getTCKPS0 : TBits_1; inline;
  23135. begin
  23136. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23137. end;
  23138. procedure TTMR4_T4CON.setTCKPS1; inline;
  23139. begin
  23140. pTDefRegMap(@Self)^.&set := $00000020;
  23141. end;
  23142. procedure TTMR4_T4CON.clearTCKPS1; inline;
  23143. begin
  23144. pTDefRegMap(@Self)^.clr := $00000020;
  23145. end;
  23146. procedure TTMR4_T4CON.setTCKPS1(thebits : TBits_1); inline;
  23147. begin
  23148. if thebits = 0 then
  23149. pTDefRegMap(@Self)^.clr := $00000020
  23150. else
  23151. pTDefRegMap(@Self)^.&set := $00000020;
  23152. end;
  23153. function TTMR4_T4CON.getTCKPS1 : TBits_1; inline;
  23154. begin
  23155. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23156. end;
  23157. procedure TTMR4_T4CON.setTCKPS2; inline;
  23158. begin
  23159. pTDefRegMap(@Self)^.&set := $00000040;
  23160. end;
  23161. procedure TTMR4_T4CON.clearTCKPS2; inline;
  23162. begin
  23163. pTDefRegMap(@Self)^.clr := $00000040;
  23164. end;
  23165. procedure TTMR4_T4CON.setTCKPS2(thebits : TBits_1); inline;
  23166. begin
  23167. if thebits = 0 then
  23168. pTDefRegMap(@Self)^.clr := $00000040
  23169. else
  23170. pTDefRegMap(@Self)^.&set := $00000040;
  23171. end;
  23172. function TTMR4_T4CON.getTCKPS2 : TBits_1; inline;
  23173. begin
  23174. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  23175. end;
  23176. procedure TTMR4_T4CON.setTSIDL; inline;
  23177. begin
  23178. pTDefRegMap(@Self)^.&set := $00002000;
  23179. end;
  23180. procedure TTMR4_T4CON.clearTSIDL; inline;
  23181. begin
  23182. pTDefRegMap(@Self)^.clr := $00002000;
  23183. end;
  23184. procedure TTMR4_T4CON.setTSIDL(thebits : TBits_1); inline;
  23185. begin
  23186. if thebits = 0 then
  23187. pTDefRegMap(@Self)^.clr := $00002000
  23188. else
  23189. pTDefRegMap(@Self)^.&set := $00002000;
  23190. end;
  23191. function TTMR4_T4CON.getTSIDL : TBits_1; inline;
  23192. begin
  23193. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23194. end;
  23195. procedure TTMR4_T4CON.setTON; inline;
  23196. begin
  23197. pTDefRegMap(@Self)^.&set := $00008000;
  23198. end;
  23199. procedure TTMR4_T4CON.clearTON; inline;
  23200. begin
  23201. pTDefRegMap(@Self)^.clr := $00008000;
  23202. end;
  23203. procedure TTMR4_T4CON.setTON(thebits : TBits_1); inline;
  23204. begin
  23205. if thebits = 0 then
  23206. pTDefRegMap(@Self)^.clr := $00008000
  23207. else
  23208. pTDefRegMap(@Self)^.&set := $00008000;
  23209. end;
  23210. function TTMR4_T4CON.getTON : TBits_1; inline;
  23211. begin
  23212. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23213. end;
  23214. procedure TTMR4_T4CON.setw(thebits : TBits_32); inline;
  23215. begin
  23216. pTDefRegMap(@Self)^.val := thebits;
  23217. end;
  23218. function TTMR4_T4CON.getw : TBits_32; inline;
  23219. begin
  23220. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23221. end;
  23222. procedure TTMR5_T5CON.setTCKPS(thebits : TBits_3); inline;
  23223. begin
  23224. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  23225. end;
  23226. function TTMR5_T5CON.getTCKPS : TBits_3; inline;
  23227. begin
  23228. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  23229. end;
  23230. procedure TTMR5_T5CON.setTGATE; inline;
  23231. begin
  23232. pTDefRegMap(@Self)^.&set := $00000080;
  23233. end;
  23234. procedure TTMR5_T5CON.clearTGATE; inline;
  23235. begin
  23236. pTDefRegMap(@Self)^.clr := $00000080;
  23237. end;
  23238. procedure TTMR5_T5CON.setTGATE(thebits : TBits_1); inline;
  23239. begin
  23240. if thebits = 0 then
  23241. pTDefRegMap(@Self)^.clr := $00000080
  23242. else
  23243. pTDefRegMap(@Self)^.&set := $00000080;
  23244. end;
  23245. function TTMR5_T5CON.getTGATE : TBits_1; inline;
  23246. begin
  23247. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23248. end;
  23249. procedure TTMR5_T5CON.setSIDL; inline;
  23250. begin
  23251. pTDefRegMap(@Self)^.&set := $00002000;
  23252. end;
  23253. procedure TTMR5_T5CON.clearSIDL; inline;
  23254. begin
  23255. pTDefRegMap(@Self)^.clr := $00002000;
  23256. end;
  23257. procedure TTMR5_T5CON.setSIDL(thebits : TBits_1); inline;
  23258. begin
  23259. if thebits = 0 then
  23260. pTDefRegMap(@Self)^.clr := $00002000
  23261. else
  23262. pTDefRegMap(@Self)^.&set := $00002000;
  23263. end;
  23264. function TTMR5_T5CON.getSIDL : TBits_1; inline;
  23265. begin
  23266. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23267. end;
  23268. procedure TTMR5_T5CON.setON; inline;
  23269. begin
  23270. pTDefRegMap(@Self)^.&set := $00008000;
  23271. end;
  23272. procedure TTMR5_T5CON.clearON; inline;
  23273. begin
  23274. pTDefRegMap(@Self)^.clr := $00008000;
  23275. end;
  23276. procedure TTMR5_T5CON.setON(thebits : TBits_1); inline;
  23277. begin
  23278. if thebits = 0 then
  23279. pTDefRegMap(@Self)^.clr := $00008000
  23280. else
  23281. pTDefRegMap(@Self)^.&set := $00008000;
  23282. end;
  23283. function TTMR5_T5CON.getON : TBits_1; inline;
  23284. begin
  23285. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23286. end;
  23287. procedure TTMR5_T5CON.setTCKPS0; inline;
  23288. begin
  23289. pTDefRegMap(@Self)^.&set := $00000010;
  23290. end;
  23291. procedure TTMR5_T5CON.clearTCKPS0; inline;
  23292. begin
  23293. pTDefRegMap(@Self)^.clr := $00000010;
  23294. end;
  23295. procedure TTMR5_T5CON.setTCKPS0(thebits : TBits_1); inline;
  23296. begin
  23297. if thebits = 0 then
  23298. pTDefRegMap(@Self)^.clr := $00000010
  23299. else
  23300. pTDefRegMap(@Self)^.&set := $00000010;
  23301. end;
  23302. function TTMR5_T5CON.getTCKPS0 : TBits_1; inline;
  23303. begin
  23304. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23305. end;
  23306. procedure TTMR5_T5CON.setTCKPS1; inline;
  23307. begin
  23308. pTDefRegMap(@Self)^.&set := $00000020;
  23309. end;
  23310. procedure TTMR5_T5CON.clearTCKPS1; inline;
  23311. begin
  23312. pTDefRegMap(@Self)^.clr := $00000020;
  23313. end;
  23314. procedure TTMR5_T5CON.setTCKPS1(thebits : TBits_1); inline;
  23315. begin
  23316. if thebits = 0 then
  23317. pTDefRegMap(@Self)^.clr := $00000020
  23318. else
  23319. pTDefRegMap(@Self)^.&set := $00000020;
  23320. end;
  23321. function TTMR5_T5CON.getTCKPS1 : TBits_1; inline;
  23322. begin
  23323. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23324. end;
  23325. procedure TTMR5_T5CON.setTCKPS2; inline;
  23326. begin
  23327. pTDefRegMap(@Self)^.&set := $00000040;
  23328. end;
  23329. procedure TTMR5_T5CON.clearTCKPS2; inline;
  23330. begin
  23331. pTDefRegMap(@Self)^.clr := $00000040;
  23332. end;
  23333. procedure TTMR5_T5CON.setTCKPS2(thebits : TBits_1); inline;
  23334. begin
  23335. if thebits = 0 then
  23336. pTDefRegMap(@Self)^.clr := $00000040
  23337. else
  23338. pTDefRegMap(@Self)^.&set := $00000040;
  23339. end;
  23340. function TTMR5_T5CON.getTCKPS2 : TBits_1; inline;
  23341. begin
  23342. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  23343. end;
  23344. procedure TTMR5_T5CON.setTSIDL; inline;
  23345. begin
  23346. pTDefRegMap(@Self)^.&set := $00002000;
  23347. end;
  23348. procedure TTMR5_T5CON.clearTSIDL; inline;
  23349. begin
  23350. pTDefRegMap(@Self)^.clr := $00002000;
  23351. end;
  23352. procedure TTMR5_T5CON.setTSIDL(thebits : TBits_1); inline;
  23353. begin
  23354. if thebits = 0 then
  23355. pTDefRegMap(@Self)^.clr := $00002000
  23356. else
  23357. pTDefRegMap(@Self)^.&set := $00002000;
  23358. end;
  23359. function TTMR5_T5CON.getTSIDL : TBits_1; inline;
  23360. begin
  23361. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23362. end;
  23363. procedure TTMR5_T5CON.setTON; inline;
  23364. begin
  23365. pTDefRegMap(@Self)^.&set := $00008000;
  23366. end;
  23367. procedure TTMR5_T5CON.clearTON; inline;
  23368. begin
  23369. pTDefRegMap(@Self)^.clr := $00008000;
  23370. end;
  23371. procedure TTMR5_T5CON.setTON(thebits : TBits_1); inline;
  23372. begin
  23373. if thebits = 0 then
  23374. pTDefRegMap(@Self)^.clr := $00008000
  23375. else
  23376. pTDefRegMap(@Self)^.&set := $00008000;
  23377. end;
  23378. function TTMR5_T5CON.getTON : TBits_1; inline;
  23379. begin
  23380. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23381. end;
  23382. procedure TTMR5_T5CON.setw(thebits : TBits_32); inline;
  23383. begin
  23384. pTDefRegMap(@Self)^.val := thebits;
  23385. end;
  23386. function TTMR5_T5CON.getw : TBits_32; inline;
  23387. begin
  23388. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23389. end;
  23390. procedure TICAP1_IC1CON.setICM(thebits : TBits_3); inline;
  23391. begin
  23392. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  23393. end;
  23394. function TICAP1_IC1CON.getICM : TBits_3; inline;
  23395. begin
  23396. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  23397. end;
  23398. procedure TICAP1_IC1CON.setICBNE; inline;
  23399. begin
  23400. pTDefRegMap(@Self)^.&set := $00000008;
  23401. end;
  23402. procedure TICAP1_IC1CON.clearICBNE; inline;
  23403. begin
  23404. pTDefRegMap(@Self)^.clr := $00000008;
  23405. end;
  23406. procedure TICAP1_IC1CON.setICBNE(thebits : TBits_1); inline;
  23407. begin
  23408. if thebits = 0 then
  23409. pTDefRegMap(@Self)^.clr := $00000008
  23410. else
  23411. pTDefRegMap(@Self)^.&set := $00000008;
  23412. end;
  23413. function TICAP1_IC1CON.getICBNE : TBits_1; inline;
  23414. begin
  23415. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  23416. end;
  23417. procedure TICAP1_IC1CON.setICOV; inline;
  23418. begin
  23419. pTDefRegMap(@Self)^.&set := $00000010;
  23420. end;
  23421. procedure TICAP1_IC1CON.clearICOV; inline;
  23422. begin
  23423. pTDefRegMap(@Self)^.clr := $00000010;
  23424. end;
  23425. procedure TICAP1_IC1CON.setICOV(thebits : TBits_1); inline;
  23426. begin
  23427. if thebits = 0 then
  23428. pTDefRegMap(@Self)^.clr := $00000010
  23429. else
  23430. pTDefRegMap(@Self)^.&set := $00000010;
  23431. end;
  23432. function TICAP1_IC1CON.getICOV : TBits_1; inline;
  23433. begin
  23434. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23435. end;
  23436. procedure TICAP1_IC1CON.setICI(thebits : TBits_2); inline;
  23437. begin
  23438. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  23439. end;
  23440. function TICAP1_IC1CON.getICI : TBits_2; inline;
  23441. begin
  23442. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  23443. end;
  23444. procedure TICAP1_IC1CON.setICTMR; inline;
  23445. begin
  23446. pTDefRegMap(@Self)^.&set := $00000080;
  23447. end;
  23448. procedure TICAP1_IC1CON.clearICTMR; inline;
  23449. begin
  23450. pTDefRegMap(@Self)^.clr := $00000080;
  23451. end;
  23452. procedure TICAP1_IC1CON.setICTMR(thebits : TBits_1); inline;
  23453. begin
  23454. if thebits = 0 then
  23455. pTDefRegMap(@Self)^.clr := $00000080
  23456. else
  23457. pTDefRegMap(@Self)^.&set := $00000080;
  23458. end;
  23459. function TICAP1_IC1CON.getICTMR : TBits_1; inline;
  23460. begin
  23461. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23462. end;
  23463. procedure TICAP1_IC1CON.setC32; inline;
  23464. begin
  23465. pTDefRegMap(@Self)^.&set := $00000100;
  23466. end;
  23467. procedure TICAP1_IC1CON.clearC32; inline;
  23468. begin
  23469. pTDefRegMap(@Self)^.clr := $00000100;
  23470. end;
  23471. procedure TICAP1_IC1CON.setC32(thebits : TBits_1); inline;
  23472. begin
  23473. if thebits = 0 then
  23474. pTDefRegMap(@Self)^.clr := $00000100
  23475. else
  23476. pTDefRegMap(@Self)^.&set := $00000100;
  23477. end;
  23478. function TICAP1_IC1CON.getC32 : TBits_1; inline;
  23479. begin
  23480. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  23481. end;
  23482. procedure TICAP1_IC1CON.setFEDGE; inline;
  23483. begin
  23484. pTDefRegMap(@Self)^.&set := $00000200;
  23485. end;
  23486. procedure TICAP1_IC1CON.clearFEDGE; inline;
  23487. begin
  23488. pTDefRegMap(@Self)^.clr := $00000200;
  23489. end;
  23490. procedure TICAP1_IC1CON.setFEDGE(thebits : TBits_1); inline;
  23491. begin
  23492. if thebits = 0 then
  23493. pTDefRegMap(@Self)^.clr := $00000200
  23494. else
  23495. pTDefRegMap(@Self)^.&set := $00000200;
  23496. end;
  23497. function TICAP1_IC1CON.getFEDGE : TBits_1; inline;
  23498. begin
  23499. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  23500. end;
  23501. procedure TICAP1_IC1CON.setSIDL; inline;
  23502. begin
  23503. pTDefRegMap(@Self)^.&set := $00002000;
  23504. end;
  23505. procedure TICAP1_IC1CON.clearSIDL; inline;
  23506. begin
  23507. pTDefRegMap(@Self)^.clr := $00002000;
  23508. end;
  23509. procedure TICAP1_IC1CON.setSIDL(thebits : TBits_1); inline;
  23510. begin
  23511. if thebits = 0 then
  23512. pTDefRegMap(@Self)^.clr := $00002000
  23513. else
  23514. pTDefRegMap(@Self)^.&set := $00002000;
  23515. end;
  23516. function TICAP1_IC1CON.getSIDL : TBits_1; inline;
  23517. begin
  23518. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23519. end;
  23520. procedure TICAP1_IC1CON.setON; inline;
  23521. begin
  23522. pTDefRegMap(@Self)^.&set := $00008000;
  23523. end;
  23524. procedure TICAP1_IC1CON.clearON; inline;
  23525. begin
  23526. pTDefRegMap(@Self)^.clr := $00008000;
  23527. end;
  23528. procedure TICAP1_IC1CON.setON(thebits : TBits_1); inline;
  23529. begin
  23530. if thebits = 0 then
  23531. pTDefRegMap(@Self)^.clr := $00008000
  23532. else
  23533. pTDefRegMap(@Self)^.&set := $00008000;
  23534. end;
  23535. function TICAP1_IC1CON.getON : TBits_1; inline;
  23536. begin
  23537. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23538. end;
  23539. procedure TICAP1_IC1CON.setICM0; inline;
  23540. begin
  23541. pTDefRegMap(@Self)^.&set := $00000001;
  23542. end;
  23543. procedure TICAP1_IC1CON.clearICM0; inline;
  23544. begin
  23545. pTDefRegMap(@Self)^.clr := $00000001;
  23546. end;
  23547. procedure TICAP1_IC1CON.setICM0(thebits : TBits_1); inline;
  23548. begin
  23549. if thebits = 0 then
  23550. pTDefRegMap(@Self)^.clr := $00000001
  23551. else
  23552. pTDefRegMap(@Self)^.&set := $00000001;
  23553. end;
  23554. function TICAP1_IC1CON.getICM0 : TBits_1; inline;
  23555. begin
  23556. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  23557. end;
  23558. procedure TICAP1_IC1CON.setICM1; inline;
  23559. begin
  23560. pTDefRegMap(@Self)^.&set := $00000002;
  23561. end;
  23562. procedure TICAP1_IC1CON.clearICM1; inline;
  23563. begin
  23564. pTDefRegMap(@Self)^.clr := $00000002;
  23565. end;
  23566. procedure TICAP1_IC1CON.setICM1(thebits : TBits_1); inline;
  23567. begin
  23568. if thebits = 0 then
  23569. pTDefRegMap(@Self)^.clr := $00000002
  23570. else
  23571. pTDefRegMap(@Self)^.&set := $00000002;
  23572. end;
  23573. function TICAP1_IC1CON.getICM1 : TBits_1; inline;
  23574. begin
  23575. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  23576. end;
  23577. procedure TICAP1_IC1CON.setICM2; inline;
  23578. begin
  23579. pTDefRegMap(@Self)^.&set := $00000004;
  23580. end;
  23581. procedure TICAP1_IC1CON.clearICM2; inline;
  23582. begin
  23583. pTDefRegMap(@Self)^.clr := $00000004;
  23584. end;
  23585. procedure TICAP1_IC1CON.setICM2(thebits : TBits_1); inline;
  23586. begin
  23587. if thebits = 0 then
  23588. pTDefRegMap(@Self)^.clr := $00000004
  23589. else
  23590. pTDefRegMap(@Self)^.&set := $00000004;
  23591. end;
  23592. function TICAP1_IC1CON.getICM2 : TBits_1; inline;
  23593. begin
  23594. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  23595. end;
  23596. procedure TICAP1_IC1CON.setICI0; inline;
  23597. begin
  23598. pTDefRegMap(@Self)^.&set := $00000020;
  23599. end;
  23600. procedure TICAP1_IC1CON.clearICI0; inline;
  23601. begin
  23602. pTDefRegMap(@Self)^.clr := $00000020;
  23603. end;
  23604. procedure TICAP1_IC1CON.setICI0(thebits : TBits_1); inline;
  23605. begin
  23606. if thebits = 0 then
  23607. pTDefRegMap(@Self)^.clr := $00000020
  23608. else
  23609. pTDefRegMap(@Self)^.&set := $00000020;
  23610. end;
  23611. function TICAP1_IC1CON.getICI0 : TBits_1; inline;
  23612. begin
  23613. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23614. end;
  23615. procedure TICAP1_IC1CON.setICI1; inline;
  23616. begin
  23617. pTDefRegMap(@Self)^.&set := $00000040;
  23618. end;
  23619. procedure TICAP1_IC1CON.clearICI1; inline;
  23620. begin
  23621. pTDefRegMap(@Self)^.clr := $00000040;
  23622. end;
  23623. procedure TICAP1_IC1CON.setICI1(thebits : TBits_1); inline;
  23624. begin
  23625. if thebits = 0 then
  23626. pTDefRegMap(@Self)^.clr := $00000040
  23627. else
  23628. pTDefRegMap(@Self)^.&set := $00000040;
  23629. end;
  23630. function TICAP1_IC1CON.getICI1 : TBits_1; inline;
  23631. begin
  23632. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  23633. end;
  23634. procedure TICAP1_IC1CON.setICSIDL; inline;
  23635. begin
  23636. pTDefRegMap(@Self)^.&set := $00002000;
  23637. end;
  23638. procedure TICAP1_IC1CON.clearICSIDL; inline;
  23639. begin
  23640. pTDefRegMap(@Self)^.clr := $00002000;
  23641. end;
  23642. procedure TICAP1_IC1CON.setICSIDL(thebits : TBits_1); inline;
  23643. begin
  23644. if thebits = 0 then
  23645. pTDefRegMap(@Self)^.clr := $00002000
  23646. else
  23647. pTDefRegMap(@Self)^.&set := $00002000;
  23648. end;
  23649. function TICAP1_IC1CON.getICSIDL : TBits_1; inline;
  23650. begin
  23651. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23652. end;
  23653. procedure TICAP1_IC1CON.setw(thebits : TBits_32); inline;
  23654. begin
  23655. pTDefRegMap(@Self)^.val := thebits;
  23656. end;
  23657. function TICAP1_IC1CON.getw : TBits_32; inline;
  23658. begin
  23659. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23660. end;
  23661. procedure TICAP2_IC2CON.setICM(thebits : TBits_3); inline;
  23662. begin
  23663. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  23664. end;
  23665. function TICAP2_IC2CON.getICM : TBits_3; inline;
  23666. begin
  23667. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  23668. end;
  23669. procedure TICAP2_IC2CON.setICBNE; inline;
  23670. begin
  23671. pTDefRegMap(@Self)^.&set := $00000008;
  23672. end;
  23673. procedure TICAP2_IC2CON.clearICBNE; inline;
  23674. begin
  23675. pTDefRegMap(@Self)^.clr := $00000008;
  23676. end;
  23677. procedure TICAP2_IC2CON.setICBNE(thebits : TBits_1); inline;
  23678. begin
  23679. if thebits = 0 then
  23680. pTDefRegMap(@Self)^.clr := $00000008
  23681. else
  23682. pTDefRegMap(@Self)^.&set := $00000008;
  23683. end;
  23684. function TICAP2_IC2CON.getICBNE : TBits_1; inline;
  23685. begin
  23686. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  23687. end;
  23688. procedure TICAP2_IC2CON.setICOV; inline;
  23689. begin
  23690. pTDefRegMap(@Self)^.&set := $00000010;
  23691. end;
  23692. procedure TICAP2_IC2CON.clearICOV; inline;
  23693. begin
  23694. pTDefRegMap(@Self)^.clr := $00000010;
  23695. end;
  23696. procedure TICAP2_IC2CON.setICOV(thebits : TBits_1); inline;
  23697. begin
  23698. if thebits = 0 then
  23699. pTDefRegMap(@Self)^.clr := $00000010
  23700. else
  23701. pTDefRegMap(@Self)^.&set := $00000010;
  23702. end;
  23703. function TICAP2_IC2CON.getICOV : TBits_1; inline;
  23704. begin
  23705. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23706. end;
  23707. procedure TICAP2_IC2CON.setICI(thebits : TBits_2); inline;
  23708. begin
  23709. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  23710. end;
  23711. function TICAP2_IC2CON.getICI : TBits_2; inline;
  23712. begin
  23713. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  23714. end;
  23715. procedure TICAP2_IC2CON.setICTMR; inline;
  23716. begin
  23717. pTDefRegMap(@Self)^.&set := $00000080;
  23718. end;
  23719. procedure TICAP2_IC2CON.clearICTMR; inline;
  23720. begin
  23721. pTDefRegMap(@Self)^.clr := $00000080;
  23722. end;
  23723. procedure TICAP2_IC2CON.setICTMR(thebits : TBits_1); inline;
  23724. begin
  23725. if thebits = 0 then
  23726. pTDefRegMap(@Self)^.clr := $00000080
  23727. else
  23728. pTDefRegMap(@Self)^.&set := $00000080;
  23729. end;
  23730. function TICAP2_IC2CON.getICTMR : TBits_1; inline;
  23731. begin
  23732. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23733. end;
  23734. procedure TICAP2_IC2CON.setC32; inline;
  23735. begin
  23736. pTDefRegMap(@Self)^.&set := $00000100;
  23737. end;
  23738. procedure TICAP2_IC2CON.clearC32; inline;
  23739. begin
  23740. pTDefRegMap(@Self)^.clr := $00000100;
  23741. end;
  23742. procedure TICAP2_IC2CON.setC32(thebits : TBits_1); inline;
  23743. begin
  23744. if thebits = 0 then
  23745. pTDefRegMap(@Self)^.clr := $00000100
  23746. else
  23747. pTDefRegMap(@Self)^.&set := $00000100;
  23748. end;
  23749. function TICAP2_IC2CON.getC32 : TBits_1; inline;
  23750. begin
  23751. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  23752. end;
  23753. procedure TICAP2_IC2CON.setFEDGE; inline;
  23754. begin
  23755. pTDefRegMap(@Self)^.&set := $00000200;
  23756. end;
  23757. procedure TICAP2_IC2CON.clearFEDGE; inline;
  23758. begin
  23759. pTDefRegMap(@Self)^.clr := $00000200;
  23760. end;
  23761. procedure TICAP2_IC2CON.setFEDGE(thebits : TBits_1); inline;
  23762. begin
  23763. if thebits = 0 then
  23764. pTDefRegMap(@Self)^.clr := $00000200
  23765. else
  23766. pTDefRegMap(@Self)^.&set := $00000200;
  23767. end;
  23768. function TICAP2_IC2CON.getFEDGE : TBits_1; inline;
  23769. begin
  23770. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  23771. end;
  23772. procedure TICAP2_IC2CON.setSIDL; inline;
  23773. begin
  23774. pTDefRegMap(@Self)^.&set := $00002000;
  23775. end;
  23776. procedure TICAP2_IC2CON.clearSIDL; inline;
  23777. begin
  23778. pTDefRegMap(@Self)^.clr := $00002000;
  23779. end;
  23780. procedure TICAP2_IC2CON.setSIDL(thebits : TBits_1); inline;
  23781. begin
  23782. if thebits = 0 then
  23783. pTDefRegMap(@Self)^.clr := $00002000
  23784. else
  23785. pTDefRegMap(@Self)^.&set := $00002000;
  23786. end;
  23787. function TICAP2_IC2CON.getSIDL : TBits_1; inline;
  23788. begin
  23789. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23790. end;
  23791. procedure TICAP2_IC2CON.setON; inline;
  23792. begin
  23793. pTDefRegMap(@Self)^.&set := $00008000;
  23794. end;
  23795. procedure TICAP2_IC2CON.clearON; inline;
  23796. begin
  23797. pTDefRegMap(@Self)^.clr := $00008000;
  23798. end;
  23799. procedure TICAP2_IC2CON.setON(thebits : TBits_1); inline;
  23800. begin
  23801. if thebits = 0 then
  23802. pTDefRegMap(@Self)^.clr := $00008000
  23803. else
  23804. pTDefRegMap(@Self)^.&set := $00008000;
  23805. end;
  23806. function TICAP2_IC2CON.getON : TBits_1; inline;
  23807. begin
  23808. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23809. end;
  23810. procedure TICAP2_IC2CON.setICM0; inline;
  23811. begin
  23812. pTDefRegMap(@Self)^.&set := $00000001;
  23813. end;
  23814. procedure TICAP2_IC2CON.clearICM0; inline;
  23815. begin
  23816. pTDefRegMap(@Self)^.clr := $00000001;
  23817. end;
  23818. procedure TICAP2_IC2CON.setICM0(thebits : TBits_1); inline;
  23819. begin
  23820. if thebits = 0 then
  23821. pTDefRegMap(@Self)^.clr := $00000001
  23822. else
  23823. pTDefRegMap(@Self)^.&set := $00000001;
  23824. end;
  23825. function TICAP2_IC2CON.getICM0 : TBits_1; inline;
  23826. begin
  23827. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  23828. end;
  23829. procedure TICAP2_IC2CON.setICM1; inline;
  23830. begin
  23831. pTDefRegMap(@Self)^.&set := $00000002;
  23832. end;
  23833. procedure TICAP2_IC2CON.clearICM1; inline;
  23834. begin
  23835. pTDefRegMap(@Self)^.clr := $00000002;
  23836. end;
  23837. procedure TICAP2_IC2CON.setICM1(thebits : TBits_1); inline;
  23838. begin
  23839. if thebits = 0 then
  23840. pTDefRegMap(@Self)^.clr := $00000002
  23841. else
  23842. pTDefRegMap(@Self)^.&set := $00000002;
  23843. end;
  23844. function TICAP2_IC2CON.getICM1 : TBits_1; inline;
  23845. begin
  23846. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  23847. end;
  23848. procedure TICAP2_IC2CON.setICM2; inline;
  23849. begin
  23850. pTDefRegMap(@Self)^.&set := $00000004;
  23851. end;
  23852. procedure TICAP2_IC2CON.clearICM2; inline;
  23853. begin
  23854. pTDefRegMap(@Self)^.clr := $00000004;
  23855. end;
  23856. procedure TICAP2_IC2CON.setICM2(thebits : TBits_1); inline;
  23857. begin
  23858. if thebits = 0 then
  23859. pTDefRegMap(@Self)^.clr := $00000004
  23860. else
  23861. pTDefRegMap(@Self)^.&set := $00000004;
  23862. end;
  23863. function TICAP2_IC2CON.getICM2 : TBits_1; inline;
  23864. begin
  23865. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  23866. end;
  23867. procedure TICAP2_IC2CON.setICI0; inline;
  23868. begin
  23869. pTDefRegMap(@Self)^.&set := $00000020;
  23870. end;
  23871. procedure TICAP2_IC2CON.clearICI0; inline;
  23872. begin
  23873. pTDefRegMap(@Self)^.clr := $00000020;
  23874. end;
  23875. procedure TICAP2_IC2CON.setICI0(thebits : TBits_1); inline;
  23876. begin
  23877. if thebits = 0 then
  23878. pTDefRegMap(@Self)^.clr := $00000020
  23879. else
  23880. pTDefRegMap(@Self)^.&set := $00000020;
  23881. end;
  23882. function TICAP2_IC2CON.getICI0 : TBits_1; inline;
  23883. begin
  23884. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23885. end;
  23886. procedure TICAP2_IC2CON.setICI1; inline;
  23887. begin
  23888. pTDefRegMap(@Self)^.&set := $00000040;
  23889. end;
  23890. procedure TICAP2_IC2CON.clearICI1; inline;
  23891. begin
  23892. pTDefRegMap(@Self)^.clr := $00000040;
  23893. end;
  23894. procedure TICAP2_IC2CON.setICI1(thebits : TBits_1); inline;
  23895. begin
  23896. if thebits = 0 then
  23897. pTDefRegMap(@Self)^.clr := $00000040
  23898. else
  23899. pTDefRegMap(@Self)^.&set := $00000040;
  23900. end;
  23901. function TICAP2_IC2CON.getICI1 : TBits_1; inline;
  23902. begin
  23903. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  23904. end;
  23905. procedure TICAP2_IC2CON.setICSIDL; inline;
  23906. begin
  23907. pTDefRegMap(@Self)^.&set := $00002000;
  23908. end;
  23909. procedure TICAP2_IC2CON.clearICSIDL; inline;
  23910. begin
  23911. pTDefRegMap(@Self)^.clr := $00002000;
  23912. end;
  23913. procedure TICAP2_IC2CON.setICSIDL(thebits : TBits_1); inline;
  23914. begin
  23915. if thebits = 0 then
  23916. pTDefRegMap(@Self)^.clr := $00002000
  23917. else
  23918. pTDefRegMap(@Self)^.&set := $00002000;
  23919. end;
  23920. function TICAP2_IC2CON.getICSIDL : TBits_1; inline;
  23921. begin
  23922. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23923. end;
  23924. procedure TICAP2_IC2CON.setw(thebits : TBits_32); inline;
  23925. begin
  23926. pTDefRegMap(@Self)^.val := thebits;
  23927. end;
  23928. function TICAP2_IC2CON.getw : TBits_32; inline;
  23929. begin
  23930. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23931. end;
  23932. procedure TICAP3_IC3CON.setICM(thebits : TBits_3); inline;
  23933. begin
  23934. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  23935. end;
  23936. function TICAP3_IC3CON.getICM : TBits_3; inline;
  23937. begin
  23938. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  23939. end;
  23940. procedure TICAP3_IC3CON.setICBNE; inline;
  23941. begin
  23942. pTDefRegMap(@Self)^.&set := $00000008;
  23943. end;
  23944. procedure TICAP3_IC3CON.clearICBNE; inline;
  23945. begin
  23946. pTDefRegMap(@Self)^.clr := $00000008;
  23947. end;
  23948. procedure TICAP3_IC3CON.setICBNE(thebits : TBits_1); inline;
  23949. begin
  23950. if thebits = 0 then
  23951. pTDefRegMap(@Self)^.clr := $00000008
  23952. else
  23953. pTDefRegMap(@Self)^.&set := $00000008;
  23954. end;
  23955. function TICAP3_IC3CON.getICBNE : TBits_1; inline;
  23956. begin
  23957. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  23958. end;
  23959. procedure TICAP3_IC3CON.setICOV; inline;
  23960. begin
  23961. pTDefRegMap(@Self)^.&set := $00000010;
  23962. end;
  23963. procedure TICAP3_IC3CON.clearICOV; inline;
  23964. begin
  23965. pTDefRegMap(@Self)^.clr := $00000010;
  23966. end;
  23967. procedure TICAP3_IC3CON.setICOV(thebits : TBits_1); inline;
  23968. begin
  23969. if thebits = 0 then
  23970. pTDefRegMap(@Self)^.clr := $00000010
  23971. else
  23972. pTDefRegMap(@Self)^.&set := $00000010;
  23973. end;
  23974. function TICAP3_IC3CON.getICOV : TBits_1; inline;
  23975. begin
  23976. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23977. end;
  23978. procedure TICAP3_IC3CON.setICI(thebits : TBits_2); inline;
  23979. begin
  23980. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  23981. end;
  23982. function TICAP3_IC3CON.getICI : TBits_2; inline;
  23983. begin
  23984. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  23985. end;
  23986. procedure TICAP3_IC3CON.setICTMR; inline;
  23987. begin
  23988. pTDefRegMap(@Self)^.&set := $00000080;
  23989. end;
  23990. procedure TICAP3_IC3CON.clearICTMR; inline;
  23991. begin
  23992. pTDefRegMap(@Self)^.clr := $00000080;
  23993. end;
  23994. procedure TICAP3_IC3CON.setICTMR(thebits : TBits_1); inline;
  23995. begin
  23996. if thebits = 0 then
  23997. pTDefRegMap(@Self)^.clr := $00000080
  23998. else
  23999. pTDefRegMap(@Self)^.&set := $00000080;
  24000. end;
  24001. function TICAP3_IC3CON.getICTMR : TBits_1; inline;
  24002. begin
  24003. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  24004. end;
  24005. procedure TICAP3_IC3CON.setC32; inline;
  24006. begin
  24007. pTDefRegMap(@Self)^.&set := $00000100;
  24008. end;
  24009. procedure TICAP3_IC3CON.clearC32; inline;
  24010. begin
  24011. pTDefRegMap(@Self)^.clr := $00000100;
  24012. end;
  24013. procedure TICAP3_IC3CON.setC32(thebits : TBits_1); inline;
  24014. begin
  24015. if thebits = 0 then
  24016. pTDefRegMap(@Self)^.clr := $00000100
  24017. else
  24018. pTDefRegMap(@Self)^.&set := $00000100;
  24019. end;
  24020. function TICAP3_IC3CON.getC32 : TBits_1; inline;
  24021. begin
  24022. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  24023. end;
  24024. procedure TICAP3_IC3CON.setFEDGE; inline;
  24025. begin
  24026. pTDefRegMap(@Self)^.&set := $00000200;
  24027. end;
  24028. procedure TICAP3_IC3CON.clearFEDGE; inline;
  24029. begin
  24030. pTDefRegMap(@Self)^.clr := $00000200;
  24031. end;
  24032. procedure TICAP3_IC3CON.setFEDGE(thebits : TBits_1); inline;
  24033. begin
  24034. if thebits = 0 then
  24035. pTDefRegMap(@Self)^.clr := $00000200
  24036. else
  24037. pTDefRegMap(@Self)^.&set := $00000200;
  24038. end;
  24039. function TICAP3_IC3CON.getFEDGE : TBits_1; inline;
  24040. begin
  24041. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  24042. end;
  24043. procedure TICAP3_IC3CON.setSIDL; inline;
  24044. begin
  24045. pTDefRegMap(@Self)^.&set := $00002000;
  24046. end;
  24047. procedure TICAP3_IC3CON.clearSIDL; inline;
  24048. begin
  24049. pTDefRegMap(@Self)^.clr := $00002000;
  24050. end;
  24051. procedure TICAP3_IC3CON.setSIDL(thebits : TBits_1); inline;
  24052. begin
  24053. if thebits = 0 then
  24054. pTDefRegMap(@Self)^.clr := $00002000
  24055. else
  24056. pTDefRegMap(@Self)^.&set := $00002000;
  24057. end;
  24058. function TICAP3_IC3CON.getSIDL : TBits_1; inline;
  24059. begin
  24060. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24061. end;
  24062. procedure TICAP3_IC3CON.setON; inline;
  24063. begin
  24064. pTDefRegMap(@Self)^.&set := $00008000;
  24065. end;
  24066. procedure TICAP3_IC3CON.clearON; inline;
  24067. begin
  24068. pTDefRegMap(@Self)^.clr := $00008000;
  24069. end;
  24070. procedure TICAP3_IC3CON.setON(thebits : TBits_1); inline;
  24071. begin
  24072. if thebits = 0 then
  24073. pTDefRegMap(@Self)^.clr := $00008000
  24074. else
  24075. pTDefRegMap(@Self)^.&set := $00008000;
  24076. end;
  24077. function TICAP3_IC3CON.getON : TBits_1; inline;
  24078. begin
  24079. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24080. end;
  24081. procedure TICAP3_IC3CON.setICM0; inline;
  24082. begin
  24083. pTDefRegMap(@Self)^.&set := $00000001;
  24084. end;
  24085. procedure TICAP3_IC3CON.clearICM0; inline;
  24086. begin
  24087. pTDefRegMap(@Self)^.clr := $00000001;
  24088. end;
  24089. procedure TICAP3_IC3CON.setICM0(thebits : TBits_1); inline;
  24090. begin
  24091. if thebits = 0 then
  24092. pTDefRegMap(@Self)^.clr := $00000001
  24093. else
  24094. pTDefRegMap(@Self)^.&set := $00000001;
  24095. end;
  24096. function TICAP3_IC3CON.getICM0 : TBits_1; inline;
  24097. begin
  24098. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24099. end;
  24100. procedure TICAP3_IC3CON.setICM1; inline;
  24101. begin
  24102. pTDefRegMap(@Self)^.&set := $00000002;
  24103. end;
  24104. procedure TICAP3_IC3CON.clearICM1; inline;
  24105. begin
  24106. pTDefRegMap(@Self)^.clr := $00000002;
  24107. end;
  24108. procedure TICAP3_IC3CON.setICM1(thebits : TBits_1); inline;
  24109. begin
  24110. if thebits = 0 then
  24111. pTDefRegMap(@Self)^.clr := $00000002
  24112. else
  24113. pTDefRegMap(@Self)^.&set := $00000002;
  24114. end;
  24115. function TICAP3_IC3CON.getICM1 : TBits_1; inline;
  24116. begin
  24117. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24118. end;
  24119. procedure TICAP3_IC3CON.setICM2; inline;
  24120. begin
  24121. pTDefRegMap(@Self)^.&set := $00000004;
  24122. end;
  24123. procedure TICAP3_IC3CON.clearICM2; inline;
  24124. begin
  24125. pTDefRegMap(@Self)^.clr := $00000004;
  24126. end;
  24127. procedure TICAP3_IC3CON.setICM2(thebits : TBits_1); inline;
  24128. begin
  24129. if thebits = 0 then
  24130. pTDefRegMap(@Self)^.clr := $00000004
  24131. else
  24132. pTDefRegMap(@Self)^.&set := $00000004;
  24133. end;
  24134. function TICAP3_IC3CON.getICM2 : TBits_1; inline;
  24135. begin
  24136. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24137. end;
  24138. procedure TICAP3_IC3CON.setICI0; inline;
  24139. begin
  24140. pTDefRegMap(@Self)^.&set := $00000020;
  24141. end;
  24142. procedure TICAP3_IC3CON.clearICI0; inline;
  24143. begin
  24144. pTDefRegMap(@Self)^.clr := $00000020;
  24145. end;
  24146. procedure TICAP3_IC3CON.setICI0(thebits : TBits_1); inline;
  24147. begin
  24148. if thebits = 0 then
  24149. pTDefRegMap(@Self)^.clr := $00000020
  24150. else
  24151. pTDefRegMap(@Self)^.&set := $00000020;
  24152. end;
  24153. function TICAP3_IC3CON.getICI0 : TBits_1; inline;
  24154. begin
  24155. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24156. end;
  24157. procedure TICAP3_IC3CON.setICI1; inline;
  24158. begin
  24159. pTDefRegMap(@Self)^.&set := $00000040;
  24160. end;
  24161. procedure TICAP3_IC3CON.clearICI1; inline;
  24162. begin
  24163. pTDefRegMap(@Self)^.clr := $00000040;
  24164. end;
  24165. procedure TICAP3_IC3CON.setICI1(thebits : TBits_1); inline;
  24166. begin
  24167. if thebits = 0 then
  24168. pTDefRegMap(@Self)^.clr := $00000040
  24169. else
  24170. pTDefRegMap(@Self)^.&set := $00000040;
  24171. end;
  24172. function TICAP3_IC3CON.getICI1 : TBits_1; inline;
  24173. begin
  24174. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  24175. end;
  24176. procedure TICAP3_IC3CON.setICSIDL; inline;
  24177. begin
  24178. pTDefRegMap(@Self)^.&set := $00002000;
  24179. end;
  24180. procedure TICAP3_IC3CON.clearICSIDL; inline;
  24181. begin
  24182. pTDefRegMap(@Self)^.clr := $00002000;
  24183. end;
  24184. procedure TICAP3_IC3CON.setICSIDL(thebits : TBits_1); inline;
  24185. begin
  24186. if thebits = 0 then
  24187. pTDefRegMap(@Self)^.clr := $00002000
  24188. else
  24189. pTDefRegMap(@Self)^.&set := $00002000;
  24190. end;
  24191. function TICAP3_IC3CON.getICSIDL : TBits_1; inline;
  24192. begin
  24193. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24194. end;
  24195. procedure TICAP3_IC3CON.setw(thebits : TBits_32); inline;
  24196. begin
  24197. pTDefRegMap(@Self)^.val := thebits;
  24198. end;
  24199. function TICAP3_IC3CON.getw : TBits_32; inline;
  24200. begin
  24201. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  24202. end;
  24203. procedure TICAP4_IC4CON.setICM(thebits : TBits_3); inline;
  24204. begin
  24205. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  24206. end;
  24207. function TICAP4_IC4CON.getICM : TBits_3; inline;
  24208. begin
  24209. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  24210. end;
  24211. procedure TICAP4_IC4CON.setICBNE; inline;
  24212. begin
  24213. pTDefRegMap(@Self)^.&set := $00000008;
  24214. end;
  24215. procedure TICAP4_IC4CON.clearICBNE; inline;
  24216. begin
  24217. pTDefRegMap(@Self)^.clr := $00000008;
  24218. end;
  24219. procedure TICAP4_IC4CON.setICBNE(thebits : TBits_1); inline;
  24220. begin
  24221. if thebits = 0 then
  24222. pTDefRegMap(@Self)^.clr := $00000008
  24223. else
  24224. pTDefRegMap(@Self)^.&set := $00000008;
  24225. end;
  24226. function TICAP4_IC4CON.getICBNE : TBits_1; inline;
  24227. begin
  24228. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  24229. end;
  24230. procedure TICAP4_IC4CON.setICOV; inline;
  24231. begin
  24232. pTDefRegMap(@Self)^.&set := $00000010;
  24233. end;
  24234. procedure TICAP4_IC4CON.clearICOV; inline;
  24235. begin
  24236. pTDefRegMap(@Self)^.clr := $00000010;
  24237. end;
  24238. procedure TICAP4_IC4CON.setICOV(thebits : TBits_1); inline;
  24239. begin
  24240. if thebits = 0 then
  24241. pTDefRegMap(@Self)^.clr := $00000010
  24242. else
  24243. pTDefRegMap(@Self)^.&set := $00000010;
  24244. end;
  24245. function TICAP4_IC4CON.getICOV : TBits_1; inline;
  24246. begin
  24247. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  24248. end;
  24249. procedure TICAP4_IC4CON.setICI(thebits : TBits_2); inline;
  24250. begin
  24251. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  24252. end;
  24253. function TICAP4_IC4CON.getICI : TBits_2; inline;
  24254. begin
  24255. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  24256. end;
  24257. procedure TICAP4_IC4CON.setICTMR; inline;
  24258. begin
  24259. pTDefRegMap(@Self)^.&set := $00000080;
  24260. end;
  24261. procedure TICAP4_IC4CON.clearICTMR; inline;
  24262. begin
  24263. pTDefRegMap(@Self)^.clr := $00000080;
  24264. end;
  24265. procedure TICAP4_IC4CON.setICTMR(thebits : TBits_1); inline;
  24266. begin
  24267. if thebits = 0 then
  24268. pTDefRegMap(@Self)^.clr := $00000080
  24269. else
  24270. pTDefRegMap(@Self)^.&set := $00000080;
  24271. end;
  24272. function TICAP4_IC4CON.getICTMR : TBits_1; inline;
  24273. begin
  24274. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  24275. end;
  24276. procedure TICAP4_IC4CON.setC32; inline;
  24277. begin
  24278. pTDefRegMap(@Self)^.&set := $00000100;
  24279. end;
  24280. procedure TICAP4_IC4CON.clearC32; inline;
  24281. begin
  24282. pTDefRegMap(@Self)^.clr := $00000100;
  24283. end;
  24284. procedure TICAP4_IC4CON.setC32(thebits : TBits_1); inline;
  24285. begin
  24286. if thebits = 0 then
  24287. pTDefRegMap(@Self)^.clr := $00000100
  24288. else
  24289. pTDefRegMap(@Self)^.&set := $00000100;
  24290. end;
  24291. function TICAP4_IC4CON.getC32 : TBits_1; inline;
  24292. begin
  24293. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  24294. end;
  24295. procedure TICAP4_IC4CON.setFEDGE; inline;
  24296. begin
  24297. pTDefRegMap(@Self)^.&set := $00000200;
  24298. end;
  24299. procedure TICAP4_IC4CON.clearFEDGE; inline;
  24300. begin
  24301. pTDefRegMap(@Self)^.clr := $00000200;
  24302. end;
  24303. procedure TICAP4_IC4CON.setFEDGE(thebits : TBits_1); inline;
  24304. begin
  24305. if thebits = 0 then
  24306. pTDefRegMap(@Self)^.clr := $00000200
  24307. else
  24308. pTDefRegMap(@Self)^.&set := $00000200;
  24309. end;
  24310. function TICAP4_IC4CON.getFEDGE : TBits_1; inline;
  24311. begin
  24312. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  24313. end;
  24314. procedure TICAP4_IC4CON.setSIDL; inline;
  24315. begin
  24316. pTDefRegMap(@Self)^.&set := $00002000;
  24317. end;
  24318. procedure TICAP4_IC4CON.clearSIDL; inline;
  24319. begin
  24320. pTDefRegMap(@Self)^.clr := $00002000;
  24321. end;
  24322. procedure TICAP4_IC4CON.setSIDL(thebits : TBits_1); inline;
  24323. begin
  24324. if thebits = 0 then
  24325. pTDefRegMap(@Self)^.clr := $00002000
  24326. else
  24327. pTDefRegMap(@Self)^.&set := $00002000;
  24328. end;
  24329. function TICAP4_IC4CON.getSIDL : TBits_1; inline;
  24330. begin
  24331. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24332. end;
  24333. procedure TICAP4_IC4CON.setON; inline;
  24334. begin
  24335. pTDefRegMap(@Self)^.&set := $00008000;
  24336. end;
  24337. procedure TICAP4_IC4CON.clearON; inline;
  24338. begin
  24339. pTDefRegMap(@Self)^.clr := $00008000;
  24340. end;
  24341. procedure TICAP4_IC4CON.setON(thebits : TBits_1); inline;
  24342. begin
  24343. if thebits = 0 then
  24344. pTDefRegMap(@Self)^.clr := $00008000
  24345. else
  24346. pTDefRegMap(@Self)^.&set := $00008000;
  24347. end;
  24348. function TICAP4_IC4CON.getON : TBits_1; inline;
  24349. begin
  24350. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24351. end;
  24352. procedure TICAP4_IC4CON.setICM0; inline;
  24353. begin
  24354. pTDefRegMap(@Self)^.&set := $00000001;
  24355. end;
  24356. procedure TICAP4_IC4CON.clearICM0; inline;
  24357. begin
  24358. pTDefRegMap(@Self)^.clr := $00000001;
  24359. end;
  24360. procedure TICAP4_IC4CON.setICM0(thebits : TBits_1); inline;
  24361. begin
  24362. if thebits = 0 then
  24363. pTDefRegMap(@Self)^.clr := $00000001
  24364. else
  24365. pTDefRegMap(@Self)^.&set := $00000001;
  24366. end;
  24367. function TICAP4_IC4CON.getICM0 : TBits_1; inline;
  24368. begin
  24369. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24370. end;
  24371. procedure TICAP4_IC4CON.setICM1; inline;
  24372. begin
  24373. pTDefRegMap(@Self)^.&set := $00000002;
  24374. end;
  24375. procedure TICAP4_IC4CON.clearICM1; inline;
  24376. begin
  24377. pTDefRegMap(@Self)^.clr := $00000002;
  24378. end;
  24379. procedure TICAP4_IC4CON.setICM1(thebits : TBits_1); inline;
  24380. begin
  24381. if thebits = 0 then
  24382. pTDefRegMap(@Self)^.clr := $00000002
  24383. else
  24384. pTDefRegMap(@Self)^.&set := $00000002;
  24385. end;
  24386. function TICAP4_IC4CON.getICM1 : TBits_1; inline;
  24387. begin
  24388. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24389. end;
  24390. procedure TICAP4_IC4CON.setICM2; inline;
  24391. begin
  24392. pTDefRegMap(@Self)^.&set := $00000004;
  24393. end;
  24394. procedure TICAP4_IC4CON.clearICM2; inline;
  24395. begin
  24396. pTDefRegMap(@Self)^.clr := $00000004;
  24397. end;
  24398. procedure TICAP4_IC4CON.setICM2(thebits : TBits_1); inline;
  24399. begin
  24400. if thebits = 0 then
  24401. pTDefRegMap(@Self)^.clr := $00000004
  24402. else
  24403. pTDefRegMap(@Self)^.&set := $00000004;
  24404. end;
  24405. function TICAP4_IC4CON.getICM2 : TBits_1; inline;
  24406. begin
  24407. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24408. end;
  24409. procedure TICAP4_IC4CON.setICI0; inline;
  24410. begin
  24411. pTDefRegMap(@Self)^.&set := $00000020;
  24412. end;
  24413. procedure TICAP4_IC4CON.clearICI0; inline;
  24414. begin
  24415. pTDefRegMap(@Self)^.clr := $00000020;
  24416. end;
  24417. procedure TICAP4_IC4CON.setICI0(thebits : TBits_1); inline;
  24418. begin
  24419. if thebits = 0 then
  24420. pTDefRegMap(@Self)^.clr := $00000020
  24421. else
  24422. pTDefRegMap(@Self)^.&set := $00000020;
  24423. end;
  24424. function TICAP4_IC4CON.getICI0 : TBits_1; inline;
  24425. begin
  24426. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24427. end;
  24428. procedure TICAP4_IC4CON.setICI1; inline;
  24429. begin
  24430. pTDefRegMap(@Self)^.&set := $00000040;
  24431. end;
  24432. procedure TICAP4_IC4CON.clearICI1; inline;
  24433. begin
  24434. pTDefRegMap(@Self)^.clr := $00000040;
  24435. end;
  24436. procedure TICAP4_IC4CON.setICI1(thebits : TBits_1); inline;
  24437. begin
  24438. if thebits = 0 then
  24439. pTDefRegMap(@Self)^.clr := $00000040
  24440. else
  24441. pTDefRegMap(@Self)^.&set := $00000040;
  24442. end;
  24443. function TICAP4_IC4CON.getICI1 : TBits_1; inline;
  24444. begin
  24445. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  24446. end;
  24447. procedure TICAP4_IC4CON.setICSIDL; inline;
  24448. begin
  24449. pTDefRegMap(@Self)^.&set := $00002000;
  24450. end;
  24451. procedure TICAP4_IC4CON.clearICSIDL; inline;
  24452. begin
  24453. pTDefRegMap(@Self)^.clr := $00002000;
  24454. end;
  24455. procedure TICAP4_IC4CON.setICSIDL(thebits : TBits_1); inline;
  24456. begin
  24457. if thebits = 0 then
  24458. pTDefRegMap(@Self)^.clr := $00002000
  24459. else
  24460. pTDefRegMap(@Self)^.&set := $00002000;
  24461. end;
  24462. function TICAP4_IC4CON.getICSIDL : TBits_1; inline;
  24463. begin
  24464. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24465. end;
  24466. procedure TICAP4_IC4CON.setw(thebits : TBits_32); inline;
  24467. begin
  24468. pTDefRegMap(@Self)^.val := thebits;
  24469. end;
  24470. function TICAP4_IC4CON.getw : TBits_32; inline;
  24471. begin
  24472. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  24473. end;
  24474. procedure TICAP5_IC5CON.setICM(thebits : TBits_3); inline;
  24475. begin
  24476. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  24477. end;
  24478. function TICAP5_IC5CON.getICM : TBits_3; inline;
  24479. begin
  24480. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  24481. end;
  24482. procedure TICAP5_IC5CON.setICBNE; inline;
  24483. begin
  24484. pTDefRegMap(@Self)^.&set := $00000008;
  24485. end;
  24486. procedure TICAP5_IC5CON.clearICBNE; inline;
  24487. begin
  24488. pTDefRegMap(@Self)^.clr := $00000008;
  24489. end;
  24490. procedure TICAP5_IC5CON.setICBNE(thebits : TBits_1); inline;
  24491. begin
  24492. if thebits = 0 then
  24493. pTDefRegMap(@Self)^.clr := $00000008
  24494. else
  24495. pTDefRegMap(@Self)^.&set := $00000008;
  24496. end;
  24497. function TICAP5_IC5CON.getICBNE : TBits_1; inline;
  24498. begin
  24499. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  24500. end;
  24501. procedure TICAP5_IC5CON.setICOV; inline;
  24502. begin
  24503. pTDefRegMap(@Self)^.&set := $00000010;
  24504. end;
  24505. procedure TICAP5_IC5CON.clearICOV; inline;
  24506. begin
  24507. pTDefRegMap(@Self)^.clr := $00000010;
  24508. end;
  24509. procedure TICAP5_IC5CON.setICOV(thebits : TBits_1); inline;
  24510. begin
  24511. if thebits = 0 then
  24512. pTDefRegMap(@Self)^.clr := $00000010
  24513. else
  24514. pTDefRegMap(@Self)^.&set := $00000010;
  24515. end;
  24516. function TICAP5_IC5CON.getICOV : TBits_1; inline;
  24517. begin
  24518. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  24519. end;
  24520. procedure TICAP5_IC5CON.setICI(thebits : TBits_2); inline;
  24521. begin
  24522. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  24523. end;
  24524. function TICAP5_IC5CON.getICI : TBits_2; inline;
  24525. begin
  24526. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  24527. end;
  24528. procedure TICAP5_IC5CON.setICTMR; inline;
  24529. begin
  24530. pTDefRegMap(@Self)^.&set := $00000080;
  24531. end;
  24532. procedure TICAP5_IC5CON.clearICTMR; inline;
  24533. begin
  24534. pTDefRegMap(@Self)^.clr := $00000080;
  24535. end;
  24536. procedure TICAP5_IC5CON.setICTMR(thebits : TBits_1); inline;
  24537. begin
  24538. if thebits = 0 then
  24539. pTDefRegMap(@Self)^.clr := $00000080
  24540. else
  24541. pTDefRegMap(@Self)^.&set := $00000080;
  24542. end;
  24543. function TICAP5_IC5CON.getICTMR : TBits_1; inline;
  24544. begin
  24545. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  24546. end;
  24547. procedure TICAP5_IC5CON.setC32; inline;
  24548. begin
  24549. pTDefRegMap(@Self)^.&set := $00000100;
  24550. end;
  24551. procedure TICAP5_IC5CON.clearC32; inline;
  24552. begin
  24553. pTDefRegMap(@Self)^.clr := $00000100;
  24554. end;
  24555. procedure TICAP5_IC5CON.setC32(thebits : TBits_1); inline;
  24556. begin
  24557. if thebits = 0 then
  24558. pTDefRegMap(@Self)^.clr := $00000100
  24559. else
  24560. pTDefRegMap(@Self)^.&set := $00000100;
  24561. end;
  24562. function TICAP5_IC5CON.getC32 : TBits_1; inline;
  24563. begin
  24564. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  24565. end;
  24566. procedure TICAP5_IC5CON.setFEDGE; inline;
  24567. begin
  24568. pTDefRegMap(@Self)^.&set := $00000200;
  24569. end;
  24570. procedure TICAP5_IC5CON.clearFEDGE; inline;
  24571. begin
  24572. pTDefRegMap(@Self)^.clr := $00000200;
  24573. end;
  24574. procedure TICAP5_IC5CON.setFEDGE(thebits : TBits_1); inline;
  24575. begin
  24576. if thebits = 0 then
  24577. pTDefRegMap(@Self)^.clr := $00000200
  24578. else
  24579. pTDefRegMap(@Self)^.&set := $00000200;
  24580. end;
  24581. function TICAP5_IC5CON.getFEDGE : TBits_1; inline;
  24582. begin
  24583. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  24584. end;
  24585. procedure TICAP5_IC5CON.setSIDL; inline;
  24586. begin
  24587. pTDefRegMap(@Self)^.&set := $00002000;
  24588. end;
  24589. procedure TICAP5_IC5CON.clearSIDL; inline;
  24590. begin
  24591. pTDefRegMap(@Self)^.clr := $00002000;
  24592. end;
  24593. procedure TICAP5_IC5CON.setSIDL(thebits : TBits_1); inline;
  24594. begin
  24595. if thebits = 0 then
  24596. pTDefRegMap(@Self)^.clr := $00002000
  24597. else
  24598. pTDefRegMap(@Self)^.&set := $00002000;
  24599. end;
  24600. function TICAP5_IC5CON.getSIDL : TBits_1; inline;
  24601. begin
  24602. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24603. end;
  24604. procedure TICAP5_IC5CON.setON; inline;
  24605. begin
  24606. pTDefRegMap(@Self)^.&set := $00008000;
  24607. end;
  24608. procedure TICAP5_IC5CON.clearON; inline;
  24609. begin
  24610. pTDefRegMap(@Self)^.clr := $00008000;
  24611. end;
  24612. procedure TICAP5_IC5CON.setON(thebits : TBits_1); inline;
  24613. begin
  24614. if thebits = 0 then
  24615. pTDefRegMap(@Self)^.clr := $00008000
  24616. else
  24617. pTDefRegMap(@Self)^.&set := $00008000;
  24618. end;
  24619. function TICAP5_IC5CON.getON : TBits_1; inline;
  24620. begin
  24621. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24622. end;
  24623. procedure TICAP5_IC5CON.setICM0; inline;
  24624. begin
  24625. pTDefRegMap(@Self)^.&set := $00000001;
  24626. end;
  24627. procedure TICAP5_IC5CON.clearICM0; inline;
  24628. begin
  24629. pTDefRegMap(@Self)^.clr := $00000001;
  24630. end;
  24631. procedure TICAP5_IC5CON.setICM0(thebits : TBits_1); inline;
  24632. begin
  24633. if thebits = 0 then
  24634. pTDefRegMap(@Self)^.clr := $00000001
  24635. else
  24636. pTDefRegMap(@Self)^.&set := $00000001;
  24637. end;
  24638. function TICAP5_IC5CON.getICM0 : TBits_1; inline;
  24639. begin
  24640. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24641. end;
  24642. procedure TICAP5_IC5CON.setICM1; inline;
  24643. begin
  24644. pTDefRegMap(@Self)^.&set := $00000002;
  24645. end;
  24646. procedure TICAP5_IC5CON.clearICM1; inline;
  24647. begin
  24648. pTDefRegMap(@Self)^.clr := $00000002;
  24649. end;
  24650. procedure TICAP5_IC5CON.setICM1(thebits : TBits_1); inline;
  24651. begin
  24652. if thebits = 0 then
  24653. pTDefRegMap(@Self)^.clr := $00000002
  24654. else
  24655. pTDefRegMap(@Self)^.&set := $00000002;
  24656. end;
  24657. function TICAP5_IC5CON.getICM1 : TBits_1; inline;
  24658. begin
  24659. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24660. end;
  24661. procedure TICAP5_IC5CON.setICM2; inline;
  24662. begin
  24663. pTDefRegMap(@Self)^.&set := $00000004;
  24664. end;
  24665. procedure TICAP5_IC5CON.clearICM2; inline;
  24666. begin
  24667. pTDefRegMap(@Self)^.clr := $00000004;
  24668. end;
  24669. procedure TICAP5_IC5CON.setICM2(thebits : TBits_1); inline;
  24670. begin
  24671. if thebits = 0 then
  24672. pTDefRegMap(@Self)^.clr := $00000004
  24673. else
  24674. pTDefRegMap(@Self)^.&set := $00000004;
  24675. end;
  24676. function TICAP5_IC5CON.getICM2 : TBits_1; inline;
  24677. begin
  24678. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24679. end;
  24680. procedure TICAP5_IC5CON.setICI0; inline;
  24681. begin
  24682. pTDefRegMap(@Self)^.&set := $00000020;
  24683. end;
  24684. procedure TICAP5_IC5CON.clearICI0; inline;
  24685. begin
  24686. pTDefRegMap(@Self)^.clr := $00000020;
  24687. end;
  24688. procedure TICAP5_IC5CON.setICI0(thebits : TBits_1); inline;
  24689. begin
  24690. if thebits = 0 then
  24691. pTDefRegMap(@Self)^.clr := $00000020
  24692. else
  24693. pTDefRegMap(@Self)^.&set := $00000020;
  24694. end;
  24695. function TICAP5_IC5CON.getICI0 : TBits_1; inline;
  24696. begin
  24697. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24698. end;
  24699. procedure TICAP5_IC5CON.setICI1; inline;
  24700. begin
  24701. pTDefRegMap(@Self)^.&set := $00000040;
  24702. end;
  24703. procedure TICAP5_IC5CON.clearICI1; inline;
  24704. begin
  24705. pTDefRegMap(@Self)^.clr := $00000040;
  24706. end;
  24707. procedure TICAP5_IC5CON.setICI1(thebits : TBits_1); inline;
  24708. begin
  24709. if thebits = 0 then
  24710. pTDefRegMap(@Self)^.clr := $00000040
  24711. else
  24712. pTDefRegMap(@Self)^.&set := $00000040;
  24713. end;
  24714. function TICAP5_IC5CON.getICI1 : TBits_1; inline;
  24715. begin
  24716. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  24717. end;
  24718. procedure TICAP5_IC5CON.setICSIDL; inline;
  24719. begin
  24720. pTDefRegMap(@Self)^.&set := $00002000;
  24721. end;
  24722. procedure TICAP5_IC5CON.clearICSIDL; inline;
  24723. begin
  24724. pTDefRegMap(@Self)^.clr := $00002000;
  24725. end;
  24726. procedure TICAP5_IC5CON.setICSIDL(thebits : TBits_1); inline;
  24727. begin
  24728. if thebits = 0 then
  24729. pTDefRegMap(@Self)^.clr := $00002000
  24730. else
  24731. pTDefRegMap(@Self)^.&set := $00002000;
  24732. end;
  24733. function TICAP5_IC5CON.getICSIDL : TBits_1; inline;
  24734. begin
  24735. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24736. end;
  24737. procedure TICAP5_IC5CON.setw(thebits : TBits_32); inline;
  24738. begin
  24739. pTDefRegMap(@Self)^.val := thebits;
  24740. end;
  24741. function TICAP5_IC5CON.getw : TBits_32; inline;
  24742. begin
  24743. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  24744. end;
  24745. procedure TOCMP1_OC1CON.setOCM(thebits : TBits_3); inline;
  24746. begin
  24747. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  24748. end;
  24749. function TOCMP1_OC1CON.getOCM : TBits_3; inline;
  24750. begin
  24751. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  24752. end;
  24753. procedure TOCMP1_OC1CON.setOCTSEL; inline;
  24754. begin
  24755. pTDefRegMap(@Self)^.&set := $00000008;
  24756. end;
  24757. procedure TOCMP1_OC1CON.clearOCTSEL; inline;
  24758. begin
  24759. pTDefRegMap(@Self)^.clr := $00000008;
  24760. end;
  24761. procedure TOCMP1_OC1CON.setOCTSEL(thebits : TBits_1); inline;
  24762. begin
  24763. if thebits = 0 then
  24764. pTDefRegMap(@Self)^.clr := $00000008
  24765. else
  24766. pTDefRegMap(@Self)^.&set := $00000008;
  24767. end;
  24768. function TOCMP1_OC1CON.getOCTSEL : TBits_1; inline;
  24769. begin
  24770. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  24771. end;
  24772. procedure TOCMP1_OC1CON.setOCFLT; inline;
  24773. begin
  24774. pTDefRegMap(@Self)^.&set := $00000010;
  24775. end;
  24776. procedure TOCMP1_OC1CON.clearOCFLT; inline;
  24777. begin
  24778. pTDefRegMap(@Self)^.clr := $00000010;
  24779. end;
  24780. procedure TOCMP1_OC1CON.setOCFLT(thebits : TBits_1); inline;
  24781. begin
  24782. if thebits = 0 then
  24783. pTDefRegMap(@Self)^.clr := $00000010
  24784. else
  24785. pTDefRegMap(@Self)^.&set := $00000010;
  24786. end;
  24787. function TOCMP1_OC1CON.getOCFLT : TBits_1; inline;
  24788. begin
  24789. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  24790. end;
  24791. procedure TOCMP1_OC1CON.setOC32; inline;
  24792. begin
  24793. pTDefRegMap(@Self)^.&set := $00000020;
  24794. end;
  24795. procedure TOCMP1_OC1CON.clearOC32; inline;
  24796. begin
  24797. pTDefRegMap(@Self)^.clr := $00000020;
  24798. end;
  24799. procedure TOCMP1_OC1CON.setOC32(thebits : TBits_1); inline;
  24800. begin
  24801. if thebits = 0 then
  24802. pTDefRegMap(@Self)^.clr := $00000020
  24803. else
  24804. pTDefRegMap(@Self)^.&set := $00000020;
  24805. end;
  24806. function TOCMP1_OC1CON.getOC32 : TBits_1; inline;
  24807. begin
  24808. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24809. end;
  24810. procedure TOCMP1_OC1CON.setSIDL; inline;
  24811. begin
  24812. pTDefRegMap(@Self)^.&set := $00002000;
  24813. end;
  24814. procedure TOCMP1_OC1CON.clearSIDL; inline;
  24815. begin
  24816. pTDefRegMap(@Self)^.clr := $00002000;
  24817. end;
  24818. procedure TOCMP1_OC1CON.setSIDL(thebits : TBits_1); inline;
  24819. begin
  24820. if thebits = 0 then
  24821. pTDefRegMap(@Self)^.clr := $00002000
  24822. else
  24823. pTDefRegMap(@Self)^.&set := $00002000;
  24824. end;
  24825. function TOCMP1_OC1CON.getSIDL : TBits_1; inline;
  24826. begin
  24827. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24828. end;
  24829. procedure TOCMP1_OC1CON.setON; inline;
  24830. begin
  24831. pTDefRegMap(@Self)^.&set := $00008000;
  24832. end;
  24833. procedure TOCMP1_OC1CON.clearON; inline;
  24834. begin
  24835. pTDefRegMap(@Self)^.clr := $00008000;
  24836. end;
  24837. procedure TOCMP1_OC1CON.setON(thebits : TBits_1); inline;
  24838. begin
  24839. if thebits = 0 then
  24840. pTDefRegMap(@Self)^.clr := $00008000
  24841. else
  24842. pTDefRegMap(@Self)^.&set := $00008000;
  24843. end;
  24844. function TOCMP1_OC1CON.getON : TBits_1; inline;
  24845. begin
  24846. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24847. end;
  24848. procedure TOCMP1_OC1CON.setOCM0; inline;
  24849. begin
  24850. pTDefRegMap(@Self)^.&set := $00000001;
  24851. end;
  24852. procedure TOCMP1_OC1CON.clearOCM0; inline;
  24853. begin
  24854. pTDefRegMap(@Self)^.clr := $00000001;
  24855. end;
  24856. procedure TOCMP1_OC1CON.setOCM0(thebits : TBits_1); inline;
  24857. begin
  24858. if thebits = 0 then
  24859. pTDefRegMap(@Self)^.clr := $00000001
  24860. else
  24861. pTDefRegMap(@Self)^.&set := $00000001;
  24862. end;
  24863. function TOCMP1_OC1CON.getOCM0 : TBits_1; inline;
  24864. begin
  24865. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24866. end;
  24867. procedure TOCMP1_OC1CON.setOCM1; inline;
  24868. begin
  24869. pTDefRegMap(@Self)^.&set := $00000002;
  24870. end;
  24871. procedure TOCMP1_OC1CON.clearOCM1; inline;
  24872. begin
  24873. pTDefRegMap(@Self)^.clr := $00000002;
  24874. end;
  24875. procedure TOCMP1_OC1CON.setOCM1(thebits : TBits_1); inline;
  24876. begin
  24877. if thebits = 0 then
  24878. pTDefRegMap(@Self)^.clr := $00000002
  24879. else
  24880. pTDefRegMap(@Self)^.&set := $00000002;
  24881. end;
  24882. function TOCMP1_OC1CON.getOCM1 : TBits_1; inline;
  24883. begin
  24884. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24885. end;
  24886. procedure TOCMP1_OC1CON.setOCM2; inline;
  24887. begin
  24888. pTDefRegMap(@Self)^.&set := $00000004;
  24889. end;
  24890. procedure TOCMP1_OC1CON.clearOCM2; inline;
  24891. begin
  24892. pTDefRegMap(@Self)^.clr := $00000004;
  24893. end;
  24894. procedure TOCMP1_OC1CON.setOCM2(thebits : TBits_1); inline;
  24895. begin
  24896. if thebits = 0 then
  24897. pTDefRegMap(@Self)^.clr := $00000004
  24898. else
  24899. pTDefRegMap(@Self)^.&set := $00000004;
  24900. end;
  24901. function TOCMP1_OC1CON.getOCM2 : TBits_1; inline;
  24902. begin
  24903. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24904. end;
  24905. procedure TOCMP1_OC1CON.setOCSIDL; inline;
  24906. begin
  24907. pTDefRegMap(@Self)^.&set := $00002000;
  24908. end;
  24909. procedure TOCMP1_OC1CON.clearOCSIDL; inline;
  24910. begin
  24911. pTDefRegMap(@Self)^.clr := $00002000;
  24912. end;
  24913. procedure TOCMP1_OC1CON.setOCSIDL(thebits : TBits_1); inline;
  24914. begin
  24915. if thebits = 0 then
  24916. pTDefRegMap(@Self)^.clr := $00002000
  24917. else
  24918. pTDefRegMap(@Self)^.&set := $00002000;
  24919. end;
  24920. function TOCMP1_OC1CON.getOCSIDL : TBits_1; inline;
  24921. begin
  24922. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24923. end;
  24924. procedure TOCMP1_OC1CON.setw(thebits : TBits_32); inline;
  24925. begin
  24926. pTDefRegMap(@Self)^.val := thebits;
  24927. end;
  24928. function TOCMP1_OC1CON.getw : TBits_32; inline;
  24929. begin
  24930. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  24931. end;
  24932. procedure TOCMP2_OC2CON.setOCM(thebits : TBits_3); inline;
  24933. begin
  24934. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  24935. end;
  24936. function TOCMP2_OC2CON.getOCM : TBits_3; inline;
  24937. begin
  24938. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  24939. end;
  24940. procedure TOCMP2_OC2CON.setOCTSEL; inline;
  24941. begin
  24942. pTDefRegMap(@Self)^.&set := $00000008;
  24943. end;
  24944. procedure TOCMP2_OC2CON.clearOCTSEL; inline;
  24945. begin
  24946. pTDefRegMap(@Self)^.clr := $00000008;
  24947. end;
  24948. procedure TOCMP2_OC2CON.setOCTSEL(thebits : TBits_1); inline;
  24949. begin
  24950. if thebits = 0 then
  24951. pTDefRegMap(@Self)^.clr := $00000008
  24952. else
  24953. pTDefRegMap(@Self)^.&set := $00000008;
  24954. end;
  24955. function TOCMP2_OC2CON.getOCTSEL : TBits_1; inline;
  24956. begin
  24957. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  24958. end;
  24959. procedure TOCMP2_OC2CON.setOCFLT; inline;
  24960. begin
  24961. pTDefRegMap(@Self)^.&set := $00000010;
  24962. end;
  24963. procedure TOCMP2_OC2CON.clearOCFLT; inline;
  24964. begin
  24965. pTDefRegMap(@Self)^.clr := $00000010;
  24966. end;
  24967. procedure TOCMP2_OC2CON.setOCFLT(thebits : TBits_1); inline;
  24968. begin
  24969. if thebits = 0 then
  24970. pTDefRegMap(@Self)^.clr := $00000010
  24971. else
  24972. pTDefRegMap(@Self)^.&set := $00000010;
  24973. end;
  24974. function TOCMP2_OC2CON.getOCFLT : TBits_1; inline;
  24975. begin
  24976. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  24977. end;
  24978. procedure TOCMP2_OC2CON.setOC32; inline;
  24979. begin
  24980. pTDefRegMap(@Self)^.&set := $00000020;
  24981. end;
  24982. procedure TOCMP2_OC2CON.clearOC32; inline;
  24983. begin
  24984. pTDefRegMap(@Self)^.clr := $00000020;
  24985. end;
  24986. procedure TOCMP2_OC2CON.setOC32(thebits : TBits_1); inline;
  24987. begin
  24988. if thebits = 0 then
  24989. pTDefRegMap(@Self)^.clr := $00000020
  24990. else
  24991. pTDefRegMap(@Self)^.&set := $00000020;
  24992. end;
  24993. function TOCMP2_OC2CON.getOC32 : TBits_1; inline;
  24994. begin
  24995. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24996. end;
  24997. procedure TOCMP2_OC2CON.setSIDL; inline;
  24998. begin
  24999. pTDefRegMap(@Self)^.&set := $00002000;
  25000. end;
  25001. procedure TOCMP2_OC2CON.clearSIDL; inline;
  25002. begin
  25003. pTDefRegMap(@Self)^.clr := $00002000;
  25004. end;
  25005. procedure TOCMP2_OC2CON.setSIDL(thebits : TBits_1); inline;
  25006. begin
  25007. if thebits = 0 then
  25008. pTDefRegMap(@Self)^.clr := $00002000
  25009. else
  25010. pTDefRegMap(@Self)^.&set := $00002000;
  25011. end;
  25012. function TOCMP2_OC2CON.getSIDL : TBits_1; inline;
  25013. begin
  25014. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25015. end;
  25016. procedure TOCMP2_OC2CON.setON; inline;
  25017. begin
  25018. pTDefRegMap(@Self)^.&set := $00008000;
  25019. end;
  25020. procedure TOCMP2_OC2CON.clearON; inline;
  25021. begin
  25022. pTDefRegMap(@Self)^.clr := $00008000;
  25023. end;
  25024. procedure TOCMP2_OC2CON.setON(thebits : TBits_1); inline;
  25025. begin
  25026. if thebits = 0 then
  25027. pTDefRegMap(@Self)^.clr := $00008000
  25028. else
  25029. pTDefRegMap(@Self)^.&set := $00008000;
  25030. end;
  25031. function TOCMP2_OC2CON.getON : TBits_1; inline;
  25032. begin
  25033. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25034. end;
  25035. procedure TOCMP2_OC2CON.setOCM0; inline;
  25036. begin
  25037. pTDefRegMap(@Self)^.&set := $00000001;
  25038. end;
  25039. procedure TOCMP2_OC2CON.clearOCM0; inline;
  25040. begin
  25041. pTDefRegMap(@Self)^.clr := $00000001;
  25042. end;
  25043. procedure TOCMP2_OC2CON.setOCM0(thebits : TBits_1); inline;
  25044. begin
  25045. if thebits = 0 then
  25046. pTDefRegMap(@Self)^.clr := $00000001
  25047. else
  25048. pTDefRegMap(@Self)^.&set := $00000001;
  25049. end;
  25050. function TOCMP2_OC2CON.getOCM0 : TBits_1; inline;
  25051. begin
  25052. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25053. end;
  25054. procedure TOCMP2_OC2CON.setOCM1; inline;
  25055. begin
  25056. pTDefRegMap(@Self)^.&set := $00000002;
  25057. end;
  25058. procedure TOCMP2_OC2CON.clearOCM1; inline;
  25059. begin
  25060. pTDefRegMap(@Self)^.clr := $00000002;
  25061. end;
  25062. procedure TOCMP2_OC2CON.setOCM1(thebits : TBits_1); inline;
  25063. begin
  25064. if thebits = 0 then
  25065. pTDefRegMap(@Self)^.clr := $00000002
  25066. else
  25067. pTDefRegMap(@Self)^.&set := $00000002;
  25068. end;
  25069. function TOCMP2_OC2CON.getOCM1 : TBits_1; inline;
  25070. begin
  25071. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25072. end;
  25073. procedure TOCMP2_OC2CON.setOCM2; inline;
  25074. begin
  25075. pTDefRegMap(@Self)^.&set := $00000004;
  25076. end;
  25077. procedure TOCMP2_OC2CON.clearOCM2; inline;
  25078. begin
  25079. pTDefRegMap(@Self)^.clr := $00000004;
  25080. end;
  25081. procedure TOCMP2_OC2CON.setOCM2(thebits : TBits_1); inline;
  25082. begin
  25083. if thebits = 0 then
  25084. pTDefRegMap(@Self)^.clr := $00000004
  25085. else
  25086. pTDefRegMap(@Self)^.&set := $00000004;
  25087. end;
  25088. function TOCMP2_OC2CON.getOCM2 : TBits_1; inline;
  25089. begin
  25090. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25091. end;
  25092. procedure TOCMP2_OC2CON.setOCSIDL; inline;
  25093. begin
  25094. pTDefRegMap(@Self)^.&set := $00002000;
  25095. end;
  25096. procedure TOCMP2_OC2CON.clearOCSIDL; inline;
  25097. begin
  25098. pTDefRegMap(@Self)^.clr := $00002000;
  25099. end;
  25100. procedure TOCMP2_OC2CON.setOCSIDL(thebits : TBits_1); inline;
  25101. begin
  25102. if thebits = 0 then
  25103. pTDefRegMap(@Self)^.clr := $00002000
  25104. else
  25105. pTDefRegMap(@Self)^.&set := $00002000;
  25106. end;
  25107. function TOCMP2_OC2CON.getOCSIDL : TBits_1; inline;
  25108. begin
  25109. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25110. end;
  25111. procedure TOCMP2_OC2CON.setw(thebits : TBits_32); inline;
  25112. begin
  25113. pTDefRegMap(@Self)^.val := thebits;
  25114. end;
  25115. function TOCMP2_OC2CON.getw : TBits_32; inline;
  25116. begin
  25117. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25118. end;
  25119. procedure TOCMP3_OC3CON.setOCM(thebits : TBits_3); inline;
  25120. begin
  25121. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  25122. end;
  25123. function TOCMP3_OC3CON.getOCM : TBits_3; inline;
  25124. begin
  25125. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  25126. end;
  25127. procedure TOCMP3_OC3CON.setOCTSEL; inline;
  25128. begin
  25129. pTDefRegMap(@Self)^.&set := $00000008;
  25130. end;
  25131. procedure TOCMP3_OC3CON.clearOCTSEL; inline;
  25132. begin
  25133. pTDefRegMap(@Self)^.clr := $00000008;
  25134. end;
  25135. procedure TOCMP3_OC3CON.setOCTSEL(thebits : TBits_1); inline;
  25136. begin
  25137. if thebits = 0 then
  25138. pTDefRegMap(@Self)^.clr := $00000008
  25139. else
  25140. pTDefRegMap(@Self)^.&set := $00000008;
  25141. end;
  25142. function TOCMP3_OC3CON.getOCTSEL : TBits_1; inline;
  25143. begin
  25144. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  25145. end;
  25146. procedure TOCMP3_OC3CON.setOCFLT; inline;
  25147. begin
  25148. pTDefRegMap(@Self)^.&set := $00000010;
  25149. end;
  25150. procedure TOCMP3_OC3CON.clearOCFLT; inline;
  25151. begin
  25152. pTDefRegMap(@Self)^.clr := $00000010;
  25153. end;
  25154. procedure TOCMP3_OC3CON.setOCFLT(thebits : TBits_1); inline;
  25155. begin
  25156. if thebits = 0 then
  25157. pTDefRegMap(@Self)^.clr := $00000010
  25158. else
  25159. pTDefRegMap(@Self)^.&set := $00000010;
  25160. end;
  25161. function TOCMP3_OC3CON.getOCFLT : TBits_1; inline;
  25162. begin
  25163. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  25164. end;
  25165. procedure TOCMP3_OC3CON.setOC32; inline;
  25166. begin
  25167. pTDefRegMap(@Self)^.&set := $00000020;
  25168. end;
  25169. procedure TOCMP3_OC3CON.clearOC32; inline;
  25170. begin
  25171. pTDefRegMap(@Self)^.clr := $00000020;
  25172. end;
  25173. procedure TOCMP3_OC3CON.setOC32(thebits : TBits_1); inline;
  25174. begin
  25175. if thebits = 0 then
  25176. pTDefRegMap(@Self)^.clr := $00000020
  25177. else
  25178. pTDefRegMap(@Self)^.&set := $00000020;
  25179. end;
  25180. function TOCMP3_OC3CON.getOC32 : TBits_1; inline;
  25181. begin
  25182. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  25183. end;
  25184. procedure TOCMP3_OC3CON.setSIDL; inline;
  25185. begin
  25186. pTDefRegMap(@Self)^.&set := $00002000;
  25187. end;
  25188. procedure TOCMP3_OC3CON.clearSIDL; inline;
  25189. begin
  25190. pTDefRegMap(@Self)^.clr := $00002000;
  25191. end;
  25192. procedure TOCMP3_OC3CON.setSIDL(thebits : TBits_1); inline;
  25193. begin
  25194. if thebits = 0 then
  25195. pTDefRegMap(@Self)^.clr := $00002000
  25196. else
  25197. pTDefRegMap(@Self)^.&set := $00002000;
  25198. end;
  25199. function TOCMP3_OC3CON.getSIDL : TBits_1; inline;
  25200. begin
  25201. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25202. end;
  25203. procedure TOCMP3_OC3CON.setON; inline;
  25204. begin
  25205. pTDefRegMap(@Self)^.&set := $00008000;
  25206. end;
  25207. procedure TOCMP3_OC3CON.clearON; inline;
  25208. begin
  25209. pTDefRegMap(@Self)^.clr := $00008000;
  25210. end;
  25211. procedure TOCMP3_OC3CON.setON(thebits : TBits_1); inline;
  25212. begin
  25213. if thebits = 0 then
  25214. pTDefRegMap(@Self)^.clr := $00008000
  25215. else
  25216. pTDefRegMap(@Self)^.&set := $00008000;
  25217. end;
  25218. function TOCMP3_OC3CON.getON : TBits_1; inline;
  25219. begin
  25220. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25221. end;
  25222. procedure TOCMP3_OC3CON.setOCM0; inline;
  25223. begin
  25224. pTDefRegMap(@Self)^.&set := $00000001;
  25225. end;
  25226. procedure TOCMP3_OC3CON.clearOCM0; inline;
  25227. begin
  25228. pTDefRegMap(@Self)^.clr := $00000001;
  25229. end;
  25230. procedure TOCMP3_OC3CON.setOCM0(thebits : TBits_1); inline;
  25231. begin
  25232. if thebits = 0 then
  25233. pTDefRegMap(@Self)^.clr := $00000001
  25234. else
  25235. pTDefRegMap(@Self)^.&set := $00000001;
  25236. end;
  25237. function TOCMP3_OC3CON.getOCM0 : TBits_1; inline;
  25238. begin
  25239. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25240. end;
  25241. procedure TOCMP3_OC3CON.setOCM1; inline;
  25242. begin
  25243. pTDefRegMap(@Self)^.&set := $00000002;
  25244. end;
  25245. procedure TOCMP3_OC3CON.clearOCM1; inline;
  25246. begin
  25247. pTDefRegMap(@Self)^.clr := $00000002;
  25248. end;
  25249. procedure TOCMP3_OC3CON.setOCM1(thebits : TBits_1); inline;
  25250. begin
  25251. if thebits = 0 then
  25252. pTDefRegMap(@Self)^.clr := $00000002
  25253. else
  25254. pTDefRegMap(@Self)^.&set := $00000002;
  25255. end;
  25256. function TOCMP3_OC3CON.getOCM1 : TBits_1; inline;
  25257. begin
  25258. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25259. end;
  25260. procedure TOCMP3_OC3CON.setOCM2; inline;
  25261. begin
  25262. pTDefRegMap(@Self)^.&set := $00000004;
  25263. end;
  25264. procedure TOCMP3_OC3CON.clearOCM2; inline;
  25265. begin
  25266. pTDefRegMap(@Self)^.clr := $00000004;
  25267. end;
  25268. procedure TOCMP3_OC3CON.setOCM2(thebits : TBits_1); inline;
  25269. begin
  25270. if thebits = 0 then
  25271. pTDefRegMap(@Self)^.clr := $00000004
  25272. else
  25273. pTDefRegMap(@Self)^.&set := $00000004;
  25274. end;
  25275. function TOCMP3_OC3CON.getOCM2 : TBits_1; inline;
  25276. begin
  25277. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25278. end;
  25279. procedure TOCMP3_OC3CON.setOCSIDL; inline;
  25280. begin
  25281. pTDefRegMap(@Self)^.&set := $00002000;
  25282. end;
  25283. procedure TOCMP3_OC3CON.clearOCSIDL; inline;
  25284. begin
  25285. pTDefRegMap(@Self)^.clr := $00002000;
  25286. end;
  25287. procedure TOCMP3_OC3CON.setOCSIDL(thebits : TBits_1); inline;
  25288. begin
  25289. if thebits = 0 then
  25290. pTDefRegMap(@Self)^.clr := $00002000
  25291. else
  25292. pTDefRegMap(@Self)^.&set := $00002000;
  25293. end;
  25294. function TOCMP3_OC3CON.getOCSIDL : TBits_1; inline;
  25295. begin
  25296. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25297. end;
  25298. procedure TOCMP3_OC3CON.setw(thebits : TBits_32); inline;
  25299. begin
  25300. pTDefRegMap(@Self)^.val := thebits;
  25301. end;
  25302. function TOCMP3_OC3CON.getw : TBits_32; inline;
  25303. begin
  25304. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25305. end;
  25306. procedure TOCMP4_OC4CON.setOCM(thebits : TBits_3); inline;
  25307. begin
  25308. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  25309. end;
  25310. function TOCMP4_OC4CON.getOCM : TBits_3; inline;
  25311. begin
  25312. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  25313. end;
  25314. procedure TOCMP4_OC4CON.setOCTSEL; inline;
  25315. begin
  25316. pTDefRegMap(@Self)^.&set := $00000008;
  25317. end;
  25318. procedure TOCMP4_OC4CON.clearOCTSEL; inline;
  25319. begin
  25320. pTDefRegMap(@Self)^.clr := $00000008;
  25321. end;
  25322. procedure TOCMP4_OC4CON.setOCTSEL(thebits : TBits_1); inline;
  25323. begin
  25324. if thebits = 0 then
  25325. pTDefRegMap(@Self)^.clr := $00000008
  25326. else
  25327. pTDefRegMap(@Self)^.&set := $00000008;
  25328. end;
  25329. function TOCMP4_OC4CON.getOCTSEL : TBits_1; inline;
  25330. begin
  25331. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  25332. end;
  25333. procedure TOCMP4_OC4CON.setOCFLT; inline;
  25334. begin
  25335. pTDefRegMap(@Self)^.&set := $00000010;
  25336. end;
  25337. procedure TOCMP4_OC4CON.clearOCFLT; inline;
  25338. begin
  25339. pTDefRegMap(@Self)^.clr := $00000010;
  25340. end;
  25341. procedure TOCMP4_OC4CON.setOCFLT(thebits : TBits_1); inline;
  25342. begin
  25343. if thebits = 0 then
  25344. pTDefRegMap(@Self)^.clr := $00000010
  25345. else
  25346. pTDefRegMap(@Self)^.&set := $00000010;
  25347. end;
  25348. function TOCMP4_OC4CON.getOCFLT : TBits_1; inline;
  25349. begin
  25350. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  25351. end;
  25352. procedure TOCMP4_OC4CON.setOC32; inline;
  25353. begin
  25354. pTDefRegMap(@Self)^.&set := $00000020;
  25355. end;
  25356. procedure TOCMP4_OC4CON.clearOC32; inline;
  25357. begin
  25358. pTDefRegMap(@Self)^.clr := $00000020;
  25359. end;
  25360. procedure TOCMP4_OC4CON.setOC32(thebits : TBits_1); inline;
  25361. begin
  25362. if thebits = 0 then
  25363. pTDefRegMap(@Self)^.clr := $00000020
  25364. else
  25365. pTDefRegMap(@Self)^.&set := $00000020;
  25366. end;
  25367. function TOCMP4_OC4CON.getOC32 : TBits_1; inline;
  25368. begin
  25369. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  25370. end;
  25371. procedure TOCMP4_OC4CON.setSIDL; inline;
  25372. begin
  25373. pTDefRegMap(@Self)^.&set := $00002000;
  25374. end;
  25375. procedure TOCMP4_OC4CON.clearSIDL; inline;
  25376. begin
  25377. pTDefRegMap(@Self)^.clr := $00002000;
  25378. end;
  25379. procedure TOCMP4_OC4CON.setSIDL(thebits : TBits_1); inline;
  25380. begin
  25381. if thebits = 0 then
  25382. pTDefRegMap(@Self)^.clr := $00002000
  25383. else
  25384. pTDefRegMap(@Self)^.&set := $00002000;
  25385. end;
  25386. function TOCMP4_OC4CON.getSIDL : TBits_1; inline;
  25387. begin
  25388. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25389. end;
  25390. procedure TOCMP4_OC4CON.setON; inline;
  25391. begin
  25392. pTDefRegMap(@Self)^.&set := $00008000;
  25393. end;
  25394. procedure TOCMP4_OC4CON.clearON; inline;
  25395. begin
  25396. pTDefRegMap(@Self)^.clr := $00008000;
  25397. end;
  25398. procedure TOCMP4_OC4CON.setON(thebits : TBits_1); inline;
  25399. begin
  25400. if thebits = 0 then
  25401. pTDefRegMap(@Self)^.clr := $00008000
  25402. else
  25403. pTDefRegMap(@Self)^.&set := $00008000;
  25404. end;
  25405. function TOCMP4_OC4CON.getON : TBits_1; inline;
  25406. begin
  25407. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25408. end;
  25409. procedure TOCMP4_OC4CON.setOCM0; inline;
  25410. begin
  25411. pTDefRegMap(@Self)^.&set := $00000001;
  25412. end;
  25413. procedure TOCMP4_OC4CON.clearOCM0; inline;
  25414. begin
  25415. pTDefRegMap(@Self)^.clr := $00000001;
  25416. end;
  25417. procedure TOCMP4_OC4CON.setOCM0(thebits : TBits_1); inline;
  25418. begin
  25419. if thebits = 0 then
  25420. pTDefRegMap(@Self)^.clr := $00000001
  25421. else
  25422. pTDefRegMap(@Self)^.&set := $00000001;
  25423. end;
  25424. function TOCMP4_OC4CON.getOCM0 : TBits_1; inline;
  25425. begin
  25426. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25427. end;
  25428. procedure TOCMP4_OC4CON.setOCM1; inline;
  25429. begin
  25430. pTDefRegMap(@Self)^.&set := $00000002;
  25431. end;
  25432. procedure TOCMP4_OC4CON.clearOCM1; inline;
  25433. begin
  25434. pTDefRegMap(@Self)^.clr := $00000002;
  25435. end;
  25436. procedure TOCMP4_OC4CON.setOCM1(thebits : TBits_1); inline;
  25437. begin
  25438. if thebits = 0 then
  25439. pTDefRegMap(@Self)^.clr := $00000002
  25440. else
  25441. pTDefRegMap(@Self)^.&set := $00000002;
  25442. end;
  25443. function TOCMP4_OC4CON.getOCM1 : TBits_1; inline;
  25444. begin
  25445. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25446. end;
  25447. procedure TOCMP4_OC4CON.setOCM2; inline;
  25448. begin
  25449. pTDefRegMap(@Self)^.&set := $00000004;
  25450. end;
  25451. procedure TOCMP4_OC4CON.clearOCM2; inline;
  25452. begin
  25453. pTDefRegMap(@Self)^.clr := $00000004;
  25454. end;
  25455. procedure TOCMP4_OC4CON.setOCM2(thebits : TBits_1); inline;
  25456. begin
  25457. if thebits = 0 then
  25458. pTDefRegMap(@Self)^.clr := $00000004
  25459. else
  25460. pTDefRegMap(@Self)^.&set := $00000004;
  25461. end;
  25462. function TOCMP4_OC4CON.getOCM2 : TBits_1; inline;
  25463. begin
  25464. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25465. end;
  25466. procedure TOCMP4_OC4CON.setOCSIDL; inline;
  25467. begin
  25468. pTDefRegMap(@Self)^.&set := $00002000;
  25469. end;
  25470. procedure TOCMP4_OC4CON.clearOCSIDL; inline;
  25471. begin
  25472. pTDefRegMap(@Self)^.clr := $00002000;
  25473. end;
  25474. procedure TOCMP4_OC4CON.setOCSIDL(thebits : TBits_1); inline;
  25475. begin
  25476. if thebits = 0 then
  25477. pTDefRegMap(@Self)^.clr := $00002000
  25478. else
  25479. pTDefRegMap(@Self)^.&set := $00002000;
  25480. end;
  25481. function TOCMP4_OC4CON.getOCSIDL : TBits_1; inline;
  25482. begin
  25483. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25484. end;
  25485. procedure TOCMP4_OC4CON.setw(thebits : TBits_32); inline;
  25486. begin
  25487. pTDefRegMap(@Self)^.val := thebits;
  25488. end;
  25489. function TOCMP4_OC4CON.getw : TBits_32; inline;
  25490. begin
  25491. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25492. end;
  25493. procedure TOCMP5_OC5CON.setOCM(thebits : TBits_3); inline;
  25494. begin
  25495. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  25496. end;
  25497. function TOCMP5_OC5CON.getOCM : TBits_3; inline;
  25498. begin
  25499. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  25500. end;
  25501. procedure TOCMP5_OC5CON.setOCTSEL; inline;
  25502. begin
  25503. pTDefRegMap(@Self)^.&set := $00000008;
  25504. end;
  25505. procedure TOCMP5_OC5CON.clearOCTSEL; inline;
  25506. begin
  25507. pTDefRegMap(@Self)^.clr := $00000008;
  25508. end;
  25509. procedure TOCMP5_OC5CON.setOCTSEL(thebits : TBits_1); inline;
  25510. begin
  25511. if thebits = 0 then
  25512. pTDefRegMap(@Self)^.clr := $00000008
  25513. else
  25514. pTDefRegMap(@Self)^.&set := $00000008;
  25515. end;
  25516. function TOCMP5_OC5CON.getOCTSEL : TBits_1; inline;
  25517. begin
  25518. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  25519. end;
  25520. procedure TOCMP5_OC5CON.setOCFLT; inline;
  25521. begin
  25522. pTDefRegMap(@Self)^.&set := $00000010;
  25523. end;
  25524. procedure TOCMP5_OC5CON.clearOCFLT; inline;
  25525. begin
  25526. pTDefRegMap(@Self)^.clr := $00000010;
  25527. end;
  25528. procedure TOCMP5_OC5CON.setOCFLT(thebits : TBits_1); inline;
  25529. begin
  25530. if thebits = 0 then
  25531. pTDefRegMap(@Self)^.clr := $00000010
  25532. else
  25533. pTDefRegMap(@Self)^.&set := $00000010;
  25534. end;
  25535. function TOCMP5_OC5CON.getOCFLT : TBits_1; inline;
  25536. begin
  25537. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  25538. end;
  25539. procedure TOCMP5_OC5CON.setOC32; inline;
  25540. begin
  25541. pTDefRegMap(@Self)^.&set := $00000020;
  25542. end;
  25543. procedure TOCMP5_OC5CON.clearOC32; inline;
  25544. begin
  25545. pTDefRegMap(@Self)^.clr := $00000020;
  25546. end;
  25547. procedure TOCMP5_OC5CON.setOC32(thebits : TBits_1); inline;
  25548. begin
  25549. if thebits = 0 then
  25550. pTDefRegMap(@Self)^.clr := $00000020
  25551. else
  25552. pTDefRegMap(@Self)^.&set := $00000020;
  25553. end;
  25554. function TOCMP5_OC5CON.getOC32 : TBits_1; inline;
  25555. begin
  25556. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  25557. end;
  25558. procedure TOCMP5_OC5CON.setSIDL; inline;
  25559. begin
  25560. pTDefRegMap(@Self)^.&set := $00002000;
  25561. end;
  25562. procedure TOCMP5_OC5CON.clearSIDL; inline;
  25563. begin
  25564. pTDefRegMap(@Self)^.clr := $00002000;
  25565. end;
  25566. procedure TOCMP5_OC5CON.setSIDL(thebits : TBits_1); inline;
  25567. begin
  25568. if thebits = 0 then
  25569. pTDefRegMap(@Self)^.clr := $00002000
  25570. else
  25571. pTDefRegMap(@Self)^.&set := $00002000;
  25572. end;
  25573. function TOCMP5_OC5CON.getSIDL : TBits_1; inline;
  25574. begin
  25575. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25576. end;
  25577. procedure TOCMP5_OC5CON.setON; inline;
  25578. begin
  25579. pTDefRegMap(@Self)^.&set := $00008000;
  25580. end;
  25581. procedure TOCMP5_OC5CON.clearON; inline;
  25582. begin
  25583. pTDefRegMap(@Self)^.clr := $00008000;
  25584. end;
  25585. procedure TOCMP5_OC5CON.setON(thebits : TBits_1); inline;
  25586. begin
  25587. if thebits = 0 then
  25588. pTDefRegMap(@Self)^.clr := $00008000
  25589. else
  25590. pTDefRegMap(@Self)^.&set := $00008000;
  25591. end;
  25592. function TOCMP5_OC5CON.getON : TBits_1; inline;
  25593. begin
  25594. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25595. end;
  25596. procedure TOCMP5_OC5CON.setOCM0; inline;
  25597. begin
  25598. pTDefRegMap(@Self)^.&set := $00000001;
  25599. end;
  25600. procedure TOCMP5_OC5CON.clearOCM0; inline;
  25601. begin
  25602. pTDefRegMap(@Self)^.clr := $00000001;
  25603. end;
  25604. procedure TOCMP5_OC5CON.setOCM0(thebits : TBits_1); inline;
  25605. begin
  25606. if thebits = 0 then
  25607. pTDefRegMap(@Self)^.clr := $00000001
  25608. else
  25609. pTDefRegMap(@Self)^.&set := $00000001;
  25610. end;
  25611. function TOCMP5_OC5CON.getOCM0 : TBits_1; inline;
  25612. begin
  25613. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25614. end;
  25615. procedure TOCMP5_OC5CON.setOCM1; inline;
  25616. begin
  25617. pTDefRegMap(@Self)^.&set := $00000002;
  25618. end;
  25619. procedure TOCMP5_OC5CON.clearOCM1; inline;
  25620. begin
  25621. pTDefRegMap(@Self)^.clr := $00000002;
  25622. end;
  25623. procedure TOCMP5_OC5CON.setOCM1(thebits : TBits_1); inline;
  25624. begin
  25625. if thebits = 0 then
  25626. pTDefRegMap(@Self)^.clr := $00000002
  25627. else
  25628. pTDefRegMap(@Self)^.&set := $00000002;
  25629. end;
  25630. function TOCMP5_OC5CON.getOCM1 : TBits_1; inline;
  25631. begin
  25632. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25633. end;
  25634. procedure TOCMP5_OC5CON.setOCM2; inline;
  25635. begin
  25636. pTDefRegMap(@Self)^.&set := $00000004;
  25637. end;
  25638. procedure TOCMP5_OC5CON.clearOCM2; inline;
  25639. begin
  25640. pTDefRegMap(@Self)^.clr := $00000004;
  25641. end;
  25642. procedure TOCMP5_OC5CON.setOCM2(thebits : TBits_1); inline;
  25643. begin
  25644. if thebits = 0 then
  25645. pTDefRegMap(@Self)^.clr := $00000004
  25646. else
  25647. pTDefRegMap(@Self)^.&set := $00000004;
  25648. end;
  25649. function TOCMP5_OC5CON.getOCM2 : TBits_1; inline;
  25650. begin
  25651. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25652. end;
  25653. procedure TOCMP5_OC5CON.setOCSIDL; inline;
  25654. begin
  25655. pTDefRegMap(@Self)^.&set := $00002000;
  25656. end;
  25657. procedure TOCMP5_OC5CON.clearOCSIDL; inline;
  25658. begin
  25659. pTDefRegMap(@Self)^.clr := $00002000;
  25660. end;
  25661. procedure TOCMP5_OC5CON.setOCSIDL(thebits : TBits_1); inline;
  25662. begin
  25663. if thebits = 0 then
  25664. pTDefRegMap(@Self)^.clr := $00002000
  25665. else
  25666. pTDefRegMap(@Self)^.&set := $00002000;
  25667. end;
  25668. function TOCMP5_OC5CON.getOCSIDL : TBits_1; inline;
  25669. begin
  25670. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25671. end;
  25672. procedure TOCMP5_OC5CON.setw(thebits : TBits_32); inline;
  25673. begin
  25674. pTDefRegMap(@Self)^.val := thebits;
  25675. end;
  25676. function TOCMP5_OC5CON.getw : TBits_32; inline;
  25677. begin
  25678. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25679. end;
  25680. procedure TI2C3_I2C1ACON.setSEN; inline;
  25681. begin
  25682. pTDefRegMap(@Self)^.&set := $00000001;
  25683. end;
  25684. procedure TI2C3_I2C1ACON.clearSEN; inline;
  25685. begin
  25686. pTDefRegMap(@Self)^.clr := $00000001;
  25687. end;
  25688. procedure TI2C3_I2C1ACON.setSEN(thebits : TBits_1); inline;
  25689. begin
  25690. if thebits = 0 then
  25691. pTDefRegMap(@Self)^.clr := $00000001
  25692. else
  25693. pTDefRegMap(@Self)^.&set := $00000001;
  25694. end;
  25695. function TI2C3_I2C1ACON.getSEN : TBits_1; inline;
  25696. begin
  25697. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25698. end;
  25699. procedure TI2C3_I2C1ACON.setRSEN; inline;
  25700. begin
  25701. pTDefRegMap(@Self)^.&set := $00000002;
  25702. end;
  25703. procedure TI2C3_I2C1ACON.clearRSEN; inline;
  25704. begin
  25705. pTDefRegMap(@Self)^.clr := $00000002;
  25706. end;
  25707. procedure TI2C3_I2C1ACON.setRSEN(thebits : TBits_1); inline;
  25708. begin
  25709. if thebits = 0 then
  25710. pTDefRegMap(@Self)^.clr := $00000002
  25711. else
  25712. pTDefRegMap(@Self)^.&set := $00000002;
  25713. end;
  25714. function TI2C3_I2C1ACON.getRSEN : TBits_1; inline;
  25715. begin
  25716. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25717. end;
  25718. procedure TI2C3_I2C1ACON.setPEN; inline;
  25719. begin
  25720. pTDefRegMap(@Self)^.&set := $00000004;
  25721. end;
  25722. procedure TI2C3_I2C1ACON.clearPEN; inline;
  25723. begin
  25724. pTDefRegMap(@Self)^.clr := $00000004;
  25725. end;
  25726. procedure TI2C3_I2C1ACON.setPEN(thebits : TBits_1); inline;
  25727. begin
  25728. if thebits = 0 then
  25729. pTDefRegMap(@Self)^.clr := $00000004
  25730. else
  25731. pTDefRegMap(@Self)^.&set := $00000004;
  25732. end;
  25733. function TI2C3_I2C1ACON.getPEN : TBits_1; inline;
  25734. begin
  25735. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25736. end;
  25737. procedure TI2C3_I2C1ACON.setRCEN; inline;
  25738. begin
  25739. pTDefRegMap(@Self)^.&set := $00000008;
  25740. end;
  25741. procedure TI2C3_I2C1ACON.clearRCEN; inline;
  25742. begin
  25743. pTDefRegMap(@Self)^.clr := $00000008;
  25744. end;
  25745. procedure TI2C3_I2C1ACON.setRCEN(thebits : TBits_1); inline;
  25746. begin
  25747. if thebits = 0 then
  25748. pTDefRegMap(@Self)^.clr := $00000008
  25749. else
  25750. pTDefRegMap(@Self)^.&set := $00000008;
  25751. end;
  25752. function TI2C3_I2C1ACON.getRCEN : TBits_1; inline;
  25753. begin
  25754. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  25755. end;
  25756. procedure TI2C3_I2C1ACON.setACKEN; inline;
  25757. begin
  25758. pTDefRegMap(@Self)^.&set := $00000010;
  25759. end;
  25760. procedure TI2C3_I2C1ACON.clearACKEN; inline;
  25761. begin
  25762. pTDefRegMap(@Self)^.clr := $00000010;
  25763. end;
  25764. procedure TI2C3_I2C1ACON.setACKEN(thebits : TBits_1); inline;
  25765. begin
  25766. if thebits = 0 then
  25767. pTDefRegMap(@Self)^.clr := $00000010
  25768. else
  25769. pTDefRegMap(@Self)^.&set := $00000010;
  25770. end;
  25771. function TI2C3_I2C1ACON.getACKEN : TBits_1; inline;
  25772. begin
  25773. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  25774. end;
  25775. procedure TI2C3_I2C1ACON.setACKDT; inline;
  25776. begin
  25777. pTDefRegMap(@Self)^.&set := $00000020;
  25778. end;
  25779. procedure TI2C3_I2C1ACON.clearACKDT; inline;
  25780. begin
  25781. pTDefRegMap(@Self)^.clr := $00000020;
  25782. end;
  25783. procedure TI2C3_I2C1ACON.setACKDT(thebits : TBits_1); inline;
  25784. begin
  25785. if thebits = 0 then
  25786. pTDefRegMap(@Self)^.clr := $00000020
  25787. else
  25788. pTDefRegMap(@Self)^.&set := $00000020;
  25789. end;
  25790. function TI2C3_I2C1ACON.getACKDT : TBits_1; inline;
  25791. begin
  25792. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  25793. end;
  25794. procedure TI2C3_I2C1ACON.setSTREN; inline;
  25795. begin
  25796. pTDefRegMap(@Self)^.&set := $00000040;
  25797. end;
  25798. procedure TI2C3_I2C1ACON.clearSTREN; inline;
  25799. begin
  25800. pTDefRegMap(@Self)^.clr := $00000040;
  25801. end;
  25802. procedure TI2C3_I2C1ACON.setSTREN(thebits : TBits_1); inline;
  25803. begin
  25804. if thebits = 0 then
  25805. pTDefRegMap(@Self)^.clr := $00000040
  25806. else
  25807. pTDefRegMap(@Self)^.&set := $00000040;
  25808. end;
  25809. function TI2C3_I2C1ACON.getSTREN : TBits_1; inline;
  25810. begin
  25811. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  25812. end;
  25813. procedure TI2C3_I2C1ACON.setGCEN; inline;
  25814. begin
  25815. pTDefRegMap(@Self)^.&set := $00000080;
  25816. end;
  25817. procedure TI2C3_I2C1ACON.clearGCEN; inline;
  25818. begin
  25819. pTDefRegMap(@Self)^.clr := $00000080;
  25820. end;
  25821. procedure TI2C3_I2C1ACON.setGCEN(thebits : TBits_1); inline;
  25822. begin
  25823. if thebits = 0 then
  25824. pTDefRegMap(@Self)^.clr := $00000080
  25825. else
  25826. pTDefRegMap(@Self)^.&set := $00000080;
  25827. end;
  25828. function TI2C3_I2C1ACON.getGCEN : TBits_1; inline;
  25829. begin
  25830. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  25831. end;
  25832. procedure TI2C3_I2C1ACON.setSMEN; inline;
  25833. begin
  25834. pTDefRegMap(@Self)^.&set := $00000100;
  25835. end;
  25836. procedure TI2C3_I2C1ACON.clearSMEN; inline;
  25837. begin
  25838. pTDefRegMap(@Self)^.clr := $00000100;
  25839. end;
  25840. procedure TI2C3_I2C1ACON.setSMEN(thebits : TBits_1); inline;
  25841. begin
  25842. if thebits = 0 then
  25843. pTDefRegMap(@Self)^.clr := $00000100
  25844. else
  25845. pTDefRegMap(@Self)^.&set := $00000100;
  25846. end;
  25847. function TI2C3_I2C1ACON.getSMEN : TBits_1; inline;
  25848. begin
  25849. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  25850. end;
  25851. procedure TI2C3_I2C1ACON.setDISSLW; inline;
  25852. begin
  25853. pTDefRegMap(@Self)^.&set := $00000200;
  25854. end;
  25855. procedure TI2C3_I2C1ACON.clearDISSLW; inline;
  25856. begin
  25857. pTDefRegMap(@Self)^.clr := $00000200;
  25858. end;
  25859. procedure TI2C3_I2C1ACON.setDISSLW(thebits : TBits_1); inline;
  25860. begin
  25861. if thebits = 0 then
  25862. pTDefRegMap(@Self)^.clr := $00000200
  25863. else
  25864. pTDefRegMap(@Self)^.&set := $00000200;
  25865. end;
  25866. function TI2C3_I2C1ACON.getDISSLW : TBits_1; inline;
  25867. begin
  25868. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  25869. end;
  25870. procedure TI2C3_I2C1ACON.setA10M; inline;
  25871. begin
  25872. pTDefRegMap(@Self)^.&set := $00000400;
  25873. end;
  25874. procedure TI2C3_I2C1ACON.clearA10M; inline;
  25875. begin
  25876. pTDefRegMap(@Self)^.clr := $00000400;
  25877. end;
  25878. procedure TI2C3_I2C1ACON.setA10M(thebits : TBits_1); inline;
  25879. begin
  25880. if thebits = 0 then
  25881. pTDefRegMap(@Self)^.clr := $00000400
  25882. else
  25883. pTDefRegMap(@Self)^.&set := $00000400;
  25884. end;
  25885. function TI2C3_I2C1ACON.getA10M : TBits_1; inline;
  25886. begin
  25887. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  25888. end;
  25889. procedure TI2C3_I2C1ACON.setSTRICT; inline;
  25890. begin
  25891. pTDefRegMap(@Self)^.&set := $00000800;
  25892. end;
  25893. procedure TI2C3_I2C1ACON.clearSTRICT; inline;
  25894. begin
  25895. pTDefRegMap(@Self)^.clr := $00000800;
  25896. end;
  25897. procedure TI2C3_I2C1ACON.setSTRICT(thebits : TBits_1); inline;
  25898. begin
  25899. if thebits = 0 then
  25900. pTDefRegMap(@Self)^.clr := $00000800
  25901. else
  25902. pTDefRegMap(@Self)^.&set := $00000800;
  25903. end;
  25904. function TI2C3_I2C1ACON.getSTRICT : TBits_1; inline;
  25905. begin
  25906. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  25907. end;
  25908. procedure TI2C3_I2C1ACON.setSCLREL; inline;
  25909. begin
  25910. pTDefRegMap(@Self)^.&set := $00001000;
  25911. end;
  25912. procedure TI2C3_I2C1ACON.clearSCLREL; inline;
  25913. begin
  25914. pTDefRegMap(@Self)^.clr := $00001000;
  25915. end;
  25916. procedure TI2C3_I2C1ACON.setSCLREL(thebits : TBits_1); inline;
  25917. begin
  25918. if thebits = 0 then
  25919. pTDefRegMap(@Self)^.clr := $00001000
  25920. else
  25921. pTDefRegMap(@Self)^.&set := $00001000;
  25922. end;
  25923. function TI2C3_I2C1ACON.getSCLREL : TBits_1; inline;
  25924. begin
  25925. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  25926. end;
  25927. procedure TI2C3_I2C1ACON.setSIDL; inline;
  25928. begin
  25929. pTDefRegMap(@Self)^.&set := $00002000;
  25930. end;
  25931. procedure TI2C3_I2C1ACON.clearSIDL; inline;
  25932. begin
  25933. pTDefRegMap(@Self)^.clr := $00002000;
  25934. end;
  25935. procedure TI2C3_I2C1ACON.setSIDL(thebits : TBits_1); inline;
  25936. begin
  25937. if thebits = 0 then
  25938. pTDefRegMap(@Self)^.clr := $00002000
  25939. else
  25940. pTDefRegMap(@Self)^.&set := $00002000;
  25941. end;
  25942. function TI2C3_I2C1ACON.getSIDL : TBits_1; inline;
  25943. begin
  25944. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25945. end;
  25946. procedure TI2C3_I2C1ACON.setON; inline;
  25947. begin
  25948. pTDefRegMap(@Self)^.&set := $00008000;
  25949. end;
  25950. procedure TI2C3_I2C1ACON.clearON; inline;
  25951. begin
  25952. pTDefRegMap(@Self)^.clr := $00008000;
  25953. end;
  25954. procedure TI2C3_I2C1ACON.setON(thebits : TBits_1); inline;
  25955. begin
  25956. if thebits = 0 then
  25957. pTDefRegMap(@Self)^.clr := $00008000
  25958. else
  25959. pTDefRegMap(@Self)^.&set := $00008000;
  25960. end;
  25961. function TI2C3_I2C1ACON.getON : TBits_1; inline;
  25962. begin
  25963. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25964. end;
  25965. procedure TI2C3_I2C1ACON.setIPMIEN; inline;
  25966. begin
  25967. pTDefRegMap(@Self)^.&set := $00000800;
  25968. end;
  25969. procedure TI2C3_I2C1ACON.clearIPMIEN; inline;
  25970. begin
  25971. pTDefRegMap(@Self)^.clr := $00000800;
  25972. end;
  25973. procedure TI2C3_I2C1ACON.setIPMIEN(thebits : TBits_1); inline;
  25974. begin
  25975. if thebits = 0 then
  25976. pTDefRegMap(@Self)^.clr := $00000800
  25977. else
  25978. pTDefRegMap(@Self)^.&set := $00000800;
  25979. end;
  25980. function TI2C3_I2C1ACON.getIPMIEN : TBits_1; inline;
  25981. begin
  25982. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  25983. end;
  25984. procedure TI2C3_I2C1ACON.setI2CSIDL; inline;
  25985. begin
  25986. pTDefRegMap(@Self)^.&set := $00002000;
  25987. end;
  25988. procedure TI2C3_I2C1ACON.clearI2CSIDL; inline;
  25989. begin
  25990. pTDefRegMap(@Self)^.clr := $00002000;
  25991. end;
  25992. procedure TI2C3_I2C1ACON.setI2CSIDL(thebits : TBits_1); inline;
  25993. begin
  25994. if thebits = 0 then
  25995. pTDefRegMap(@Self)^.clr := $00002000
  25996. else
  25997. pTDefRegMap(@Self)^.&set := $00002000;
  25998. end;
  25999. function TI2C3_I2C1ACON.getI2CSIDL : TBits_1; inline;
  26000. begin
  26001. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26002. end;
  26003. procedure TI2C3_I2C1ACON.setI2CEN; inline;
  26004. begin
  26005. pTDefRegMap(@Self)^.&set := $00008000;
  26006. end;
  26007. procedure TI2C3_I2C1ACON.clearI2CEN; inline;
  26008. begin
  26009. pTDefRegMap(@Self)^.clr := $00008000;
  26010. end;
  26011. procedure TI2C3_I2C1ACON.setI2CEN(thebits : TBits_1); inline;
  26012. begin
  26013. if thebits = 0 then
  26014. pTDefRegMap(@Self)^.clr := $00008000
  26015. else
  26016. pTDefRegMap(@Self)^.&set := $00008000;
  26017. end;
  26018. function TI2C3_I2C1ACON.getI2CEN : TBits_1; inline;
  26019. begin
  26020. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26021. end;
  26022. procedure TI2C3_I2C1ACON.setw(thebits : TBits_32); inline;
  26023. begin
  26024. pTDefRegMap(@Self)^.val := thebits;
  26025. end;
  26026. function TI2C3_I2C1ACON.getw : TBits_32; inline;
  26027. begin
  26028. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  26029. end;
  26030. procedure TI2C3_I2C3CON.setSEN; inline;
  26031. begin
  26032. pTDefRegMap(@Self)^.&set := $00000001;
  26033. end;
  26034. procedure TI2C3_I2C3CON.clearSEN; inline;
  26035. begin
  26036. pTDefRegMap(@Self)^.clr := $00000001;
  26037. end;
  26038. procedure TI2C3_I2C3CON.setSEN(thebits : TBits_1); inline;
  26039. begin
  26040. if thebits = 0 then
  26041. pTDefRegMap(@Self)^.clr := $00000001
  26042. else
  26043. pTDefRegMap(@Self)^.&set := $00000001;
  26044. end;
  26045. function TI2C3_I2C3CON.getSEN : TBits_1; inline;
  26046. begin
  26047. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  26048. end;
  26049. procedure TI2C3_I2C3CON.setRSEN; inline;
  26050. begin
  26051. pTDefRegMap(@Self)^.&set := $00000002;
  26052. end;
  26053. procedure TI2C3_I2C3CON.clearRSEN; inline;
  26054. begin
  26055. pTDefRegMap(@Self)^.clr := $00000002;
  26056. end;
  26057. procedure TI2C3_I2C3CON.setRSEN(thebits : TBits_1); inline;
  26058. begin
  26059. if thebits = 0 then
  26060. pTDefRegMap(@Self)^.clr := $00000002
  26061. else
  26062. pTDefRegMap(@Self)^.&set := $00000002;
  26063. end;
  26064. function TI2C3_I2C3CON.getRSEN : TBits_1; inline;
  26065. begin
  26066. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  26067. end;
  26068. procedure TI2C3_I2C3CON.setPEN; inline;
  26069. begin
  26070. pTDefRegMap(@Self)^.&set := $00000004;
  26071. end;
  26072. procedure TI2C3_I2C3CON.clearPEN; inline;
  26073. begin
  26074. pTDefRegMap(@Self)^.clr := $00000004;
  26075. end;
  26076. procedure TI2C3_I2C3CON.setPEN(thebits : TBits_1); inline;
  26077. begin
  26078. if thebits = 0 then
  26079. pTDefRegMap(@Self)^.clr := $00000004
  26080. else
  26081. pTDefRegMap(@Self)^.&set := $00000004;
  26082. end;
  26083. function TI2C3_I2C3CON.getPEN : TBits_1; inline;
  26084. begin
  26085. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  26086. end;
  26087. procedure TI2C3_I2C3CON.setRCEN; inline;
  26088. begin
  26089. pTDefRegMap(@Self)^.&set := $00000008;
  26090. end;
  26091. procedure TI2C3_I2C3CON.clearRCEN; inline;
  26092. begin
  26093. pTDefRegMap(@Self)^.clr := $00000008;
  26094. end;
  26095. procedure TI2C3_I2C3CON.setRCEN(thebits : TBits_1); inline;
  26096. begin
  26097. if thebits = 0 then
  26098. pTDefRegMap(@Self)^.clr := $00000008
  26099. else
  26100. pTDefRegMap(@Self)^.&set := $00000008;
  26101. end;
  26102. function TI2C3_I2C3CON.getRCEN : TBits_1; inline;
  26103. begin
  26104. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  26105. end;
  26106. procedure TI2C3_I2C3CON.setACKEN; inline;
  26107. begin
  26108. pTDefRegMap(@Self)^.&set := $00000010;
  26109. end;
  26110. procedure TI2C3_I2C3CON.clearACKEN; inline;
  26111. begin
  26112. pTDefRegMap(@Self)^.clr := $00000010;
  26113. end;
  26114. procedure TI2C3_I2C3CON.setACKEN(thebits : TBits_1); inline;
  26115. begin
  26116. if thebits = 0 then
  26117. pTDefRegMap(@Self)^.clr := $00000010
  26118. else
  26119. pTDefRegMap(@Self)^.&set := $00000010;
  26120. end;
  26121. function TI2C3_I2C3CON.getACKEN : TBits_1; inline;
  26122. begin
  26123. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  26124. end;
  26125. procedure TI2C3_I2C3CON.setACKDT; inline;
  26126. begin
  26127. pTDefRegMap(@Self)^.&set := $00000020;
  26128. end;
  26129. procedure TI2C3_I2C3CON.clearACKDT; inline;
  26130. begin
  26131. pTDefRegMap(@Self)^.clr := $00000020;
  26132. end;
  26133. procedure TI2C3_I2C3CON.setACKDT(thebits : TBits_1); inline;
  26134. begin
  26135. if thebits = 0 then
  26136. pTDefRegMap(@Self)^.clr := $00000020
  26137. else
  26138. pTDefRegMap(@Self)^.&set := $00000020;
  26139. end;
  26140. function TI2C3_I2C3CON.getACKDT : TBits_1; inline;
  26141. begin
  26142. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  26143. end;
  26144. procedure TI2C3_I2C3CON.setSTREN; inline;
  26145. begin
  26146. pTDefRegMap(@Self)^.&set := $00000040;
  26147. end;
  26148. procedure TI2C3_I2C3CON.clearSTREN; inline;
  26149. begin
  26150. pTDefRegMap(@Self)^.clr := $00000040;
  26151. end;
  26152. procedure TI2C3_I2C3CON.setSTREN(thebits : TBits_1); inline;
  26153. begin
  26154. if thebits = 0 then
  26155. pTDefRegMap(@Self)^.clr := $00000040
  26156. else
  26157. pTDefRegMap(@Self)^.&set := $00000040;
  26158. end;
  26159. function TI2C3_I2C3CON.getSTREN : TBits_1; inline;
  26160. begin
  26161. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  26162. end;
  26163. procedure TI2C3_I2C3CON.setGCEN; inline;
  26164. begin
  26165. pTDefRegMap(@Self)^.&set := $00000080;
  26166. end;
  26167. procedure TI2C3_I2C3CON.clearGCEN; inline;
  26168. begin
  26169. pTDefRegMap(@Self)^.clr := $00000080;
  26170. end;
  26171. procedure TI2C3_I2C3CON.setGCEN(thebits : TBits_1); inline;
  26172. begin
  26173. if thebits = 0 then
  26174. pTDefRegMap(@Self)^.clr := $00000080
  26175. else
  26176. pTDefRegMap(@Self)^.&set := $00000080;
  26177. end;
  26178. function TI2C3_I2C3CON.getGCEN : TBits_1; inline;
  26179. begin
  26180. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  26181. end;
  26182. procedure TI2C3_I2C3CON.setSMEN; inline;
  26183. begin
  26184. pTDefRegMap(@Self)^.&set := $00000100;
  26185. end;
  26186. procedure TI2C3_I2C3CON.clearSMEN; inline;
  26187. begin
  26188. pTDefRegMap(@Self)^.clr := $00000100;
  26189. end;
  26190. procedure TI2C3_I2C3CON.setSMEN(thebits : TBits_1); inline;
  26191. begin
  26192. if thebits = 0 then
  26193. pTDefRegMap(@Self)^.clr := $00000100
  26194. else
  26195. pTDefRegMap(@Self)^.&set := $00000100;
  26196. end;
  26197. function TI2C3_I2C3CON.getSMEN : TBits_1; inline;
  26198. begin
  26199. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  26200. end;
  26201. procedure TI2C3_I2C3CON.setDISSLW; inline;
  26202. begin
  26203. pTDefRegMap(@Self)^.&set := $00000200;
  26204. end;
  26205. procedure TI2C3_I2C3CON.clearDISSLW; inline;
  26206. begin
  26207. pTDefRegMap(@Self)^.clr := $00000200;
  26208. end;
  26209. procedure TI2C3_I2C3CON.setDISSLW(thebits : TBits_1); inline;
  26210. begin
  26211. if thebits = 0 then
  26212. pTDefRegMap(@Self)^.clr := $00000200
  26213. else
  26214. pTDefRegMap(@Self)^.&set := $00000200;
  26215. end;
  26216. function TI2C3_I2C3CON.getDISSLW : TBits_1; inline;
  26217. begin
  26218. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  26219. end;
  26220. procedure TI2C3_I2C3CON.setA10M; inline;
  26221. begin
  26222. pTDefRegMap(@Self)^.&set := $00000400;
  26223. end;
  26224. procedure TI2C3_I2C3CON.clearA10M; inline;
  26225. begin
  26226. pTDefRegMap(@Self)^.clr := $00000400;
  26227. end;
  26228. procedure TI2C3_I2C3CON.setA10M(thebits : TBits_1); inline;
  26229. begin
  26230. if thebits = 0 then
  26231. pTDefRegMap(@Self)^.clr := $00000400
  26232. else
  26233. pTDefRegMap(@Self)^.&set := $00000400;
  26234. end;
  26235. function TI2C3_I2C3CON.getA10M : TBits_1; inline;
  26236. begin
  26237. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  26238. end;
  26239. procedure TI2C3_I2C3CON.setSTRICT; inline;
  26240. begin
  26241. pTDefRegMap(@Self)^.&set := $00000800;
  26242. end;
  26243. procedure TI2C3_I2C3CON.clearSTRICT; inline;
  26244. begin
  26245. pTDefRegMap(@Self)^.clr := $00000800;
  26246. end;
  26247. procedure TI2C3_I2C3CON.setSTRICT(thebits : TBits_1); inline;
  26248. begin
  26249. if thebits = 0 then
  26250. pTDefRegMap(@Self)^.clr := $00000800
  26251. else
  26252. pTDefRegMap(@Self)^.&set := $00000800;
  26253. end;
  26254. function TI2C3_I2C3CON.getSTRICT : TBits_1; inline;
  26255. begin
  26256. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  26257. end;
  26258. procedure TI2C3_I2C3CON.setSCLREL; inline;
  26259. begin
  26260. pTDefRegMap(@Self)^.&set := $00001000;
  26261. end;
  26262. procedure TI2C3_I2C3CON.clearSCLREL; inline;
  26263. begin
  26264. pTDefRegMap(@Self)^.clr := $00001000;
  26265. end;
  26266. procedure TI2C3_I2C3CON.setSCLREL(thebits : TBits_1); inline;
  26267. begin
  26268. if thebits = 0 then
  26269. pTDefRegMap(@Self)^.clr := $00001000
  26270. else
  26271. pTDefRegMap(@Self)^.&set := $00001000;
  26272. end;
  26273. function TI2C3_I2C3CON.getSCLREL : TBits_1; inline;
  26274. begin
  26275. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  26276. end;
  26277. procedure TI2C3_I2C3CON.setSIDL; inline;
  26278. begin
  26279. pTDefRegMap(@Self)^.&set := $00002000;
  26280. end;
  26281. procedure TI2C3_I2C3CON.clearSIDL; inline;
  26282. begin
  26283. pTDefRegMap(@Self)^.clr := $00002000;
  26284. end;
  26285. procedure TI2C3_I2C3CON.setSIDL(thebits : TBits_1); inline;
  26286. begin
  26287. if thebits = 0 then
  26288. pTDefRegMap(@Self)^.clr := $00002000
  26289. else
  26290. pTDefRegMap(@Self)^.&set := $00002000;
  26291. end;
  26292. function TI2C3_I2C3CON.getSIDL : TBits_1; inline;
  26293. begin
  26294. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26295. end;
  26296. procedure TI2C3_I2C3CON.setON; inline;
  26297. begin
  26298. pTDefRegMap(@Self)^.&set := $00008000;
  26299. end;
  26300. procedure TI2C3_I2C3CON.clearON; inline;
  26301. begin
  26302. pTDefRegMap(@Self)^.clr := $00008000;
  26303. end;
  26304. procedure TI2C3_I2C3CON.setON(thebits : TBits_1); inline;
  26305. begin
  26306. if thebits = 0 then
  26307. pTDefRegMap(@Self)^.clr := $00008000
  26308. else
  26309. pTDefRegMap(@Self)^.&set := $00008000;
  26310. end;
  26311. function TI2C3_I2C3CON.getON : TBits_1; inline;
  26312. begin
  26313. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26314. end;
  26315. procedure TI2C3_I2C3CON.setIPMIEN; inline;
  26316. begin
  26317. pTDefRegMap(@Self)^.&set := $00000800;
  26318. end;
  26319. procedure TI2C3_I2C3CON.clearIPMIEN; inline;
  26320. begin
  26321. pTDefRegMap(@Self)^.clr := $00000800;
  26322. end;
  26323. procedure TI2C3_I2C3CON.setIPMIEN(thebits : TBits_1); inline;
  26324. begin
  26325. if thebits = 0 then
  26326. pTDefRegMap(@Self)^.clr := $00000800
  26327. else
  26328. pTDefRegMap(@Self)^.&set := $00000800;
  26329. end;
  26330. function TI2C3_I2C3CON.getIPMIEN : TBits_1; inline;
  26331. begin
  26332. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  26333. end;
  26334. procedure TI2C3_I2C3CON.setI2CSIDL; inline;
  26335. begin
  26336. pTDefRegMap(@Self)^.&set := $00002000;
  26337. end;
  26338. procedure TI2C3_I2C3CON.clearI2CSIDL; inline;
  26339. begin
  26340. pTDefRegMap(@Self)^.clr := $00002000;
  26341. end;
  26342. procedure TI2C3_I2C3CON.setI2CSIDL(thebits : TBits_1); inline;
  26343. begin
  26344. if thebits = 0 then
  26345. pTDefRegMap(@Self)^.clr := $00002000
  26346. else
  26347. pTDefRegMap(@Self)^.&set := $00002000;
  26348. end;
  26349. function TI2C3_I2C3CON.getI2CSIDL : TBits_1; inline;
  26350. begin
  26351. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26352. end;
  26353. procedure TI2C3_I2C3CON.setI2CEN; inline;
  26354. begin
  26355. pTDefRegMap(@Self)^.&set := $00008000;
  26356. end;
  26357. procedure TI2C3_I2C3CON.clearI2CEN; inline;
  26358. begin
  26359. pTDefRegMap(@Self)^.clr := $00008000;
  26360. end;
  26361. procedure TI2C3_I2C3CON.setI2CEN(thebits : TBits_1); inline;
  26362. begin
  26363. if thebits = 0 then
  26364. pTDefRegMap(@Self)^.clr := $00008000
  26365. else
  26366. pTDefRegMap(@Self)^.&set := $00008000;
  26367. end;
  26368. function TI2C3_I2C3CON.getI2CEN : TBits_1; inline;
  26369. begin
  26370. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26371. end;
  26372. procedure TI2C3_I2C3CON.setw(thebits : TBits_32); inline;
  26373. begin
  26374. pTDefRegMap(@Self)^.val := thebits;
  26375. end;
  26376. function TI2C3_I2C3CON.getw : TBits_32; inline;
  26377. begin
  26378. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  26379. end;
  26380. procedure TI2C3_I2C1ASTAT.setTBF; inline;
  26381. begin
  26382. pTDefRegMap(@Self)^.&set := $00000001;
  26383. end;
  26384. procedure TI2C3_I2C1ASTAT.clearTBF; inline;
  26385. begin
  26386. pTDefRegMap(@Self)^.clr := $00000001;
  26387. end;
  26388. procedure TI2C3_I2C1ASTAT.setTBF(thebits : TBits_1); inline;
  26389. begin
  26390. if thebits = 0 then
  26391. pTDefRegMap(@Self)^.clr := $00000001
  26392. else
  26393. pTDefRegMap(@Self)^.&set := $00000001;
  26394. end;
  26395. function TI2C3_I2C1ASTAT.getTBF : TBits_1; inline;
  26396. begin
  26397. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  26398. end;
  26399. procedure TI2C3_I2C1ASTAT.setRBF; inline;
  26400. begin
  26401. pTDefRegMap(@Self)^.&set := $00000002;
  26402. end;
  26403. procedure TI2C3_I2C1ASTAT.clearRBF; inline;
  26404. begin
  26405. pTDefRegMap(@Self)^.clr := $00000002;
  26406. end;
  26407. procedure TI2C3_I2C1ASTAT.setRBF(thebits : TBits_1); inline;
  26408. begin
  26409. if thebits = 0 then
  26410. pTDefRegMap(@Self)^.clr := $00000002
  26411. else
  26412. pTDefRegMap(@Self)^.&set := $00000002;
  26413. end;
  26414. function TI2C3_I2C1ASTAT.getRBF : TBits_1; inline;
  26415. begin
  26416. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  26417. end;
  26418. procedure TI2C3_I2C1ASTAT.setR_W; inline;
  26419. begin
  26420. pTDefRegMap(@Self)^.&set := $00000004;
  26421. end;
  26422. procedure TI2C3_I2C1ASTAT.clearR_W; inline;
  26423. begin
  26424. pTDefRegMap(@Self)^.clr := $00000004;
  26425. end;
  26426. procedure TI2C3_I2C1ASTAT.setR_W(thebits : TBits_1); inline;
  26427. begin
  26428. if thebits = 0 then
  26429. pTDefRegMap(@Self)^.clr := $00000004
  26430. else
  26431. pTDefRegMap(@Self)^.&set := $00000004;
  26432. end;
  26433. function TI2C3_I2C1ASTAT.getR_W : TBits_1; inline;
  26434. begin
  26435. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  26436. end;
  26437. procedure TI2C3_I2C1ASTAT.setS; inline;
  26438. begin
  26439. pTDefRegMap(@Self)^.&set := $00000008;
  26440. end;
  26441. procedure TI2C3_I2C1ASTAT.clearS; inline;
  26442. begin
  26443. pTDefRegMap(@Self)^.clr := $00000008;
  26444. end;
  26445. procedure TI2C3_I2C1ASTAT.setS(thebits : TBits_1); inline;
  26446. begin
  26447. if thebits = 0 then
  26448. pTDefRegMap(@Self)^.clr := $00000008
  26449. else
  26450. pTDefRegMap(@Self)^.&set := $00000008;
  26451. end;
  26452. function TI2C3_I2C1ASTAT.getS : TBits_1; inline;
  26453. begin
  26454. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  26455. end;
  26456. procedure TI2C3_I2C1ASTAT.setP; inline;
  26457. begin
  26458. pTDefRegMap(@Self)^.&set := $00000010;
  26459. end;
  26460. procedure TI2C3_I2C1ASTAT.clearP; inline;
  26461. begin
  26462. pTDefRegMap(@Self)^.clr := $00000010;
  26463. end;
  26464. procedure TI2C3_I2C1ASTAT.setP(thebits : TBits_1); inline;
  26465. begin
  26466. if thebits = 0 then
  26467. pTDefRegMap(@Self)^.clr := $00000010
  26468. else
  26469. pTDefRegMap(@Self)^.&set := $00000010;
  26470. end;
  26471. function TI2C3_I2C1ASTAT.getP : TBits_1; inline;
  26472. begin
  26473. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  26474. end;
  26475. procedure TI2C3_I2C1ASTAT.setD_A; inline;
  26476. begin
  26477. pTDefRegMap(@Self)^.&set := $00000020;
  26478. end;
  26479. procedure TI2C3_I2C1ASTAT.clearD_A; inline;
  26480. begin
  26481. pTDefRegMap(@Self)^.clr := $00000020;
  26482. end;
  26483. procedure TI2C3_I2C1ASTAT.setD_A(thebits : TBits_1); inline;
  26484. begin
  26485. if thebits = 0 then
  26486. pTDefRegMap(@Self)^.clr := $00000020
  26487. else
  26488. pTDefRegMap(@Self)^.&set := $00000020;
  26489. end;
  26490. function TI2C3_I2C1ASTAT.getD_A : TBits_1; inline;
  26491. begin
  26492. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  26493. end;
  26494. procedure TI2C3_I2C1ASTAT.setI2COV; inline;
  26495. begin
  26496. pTDefRegMap(@Self)^.&set := $00000040;
  26497. end;
  26498. procedure TI2C3_I2C1ASTAT.clearI2COV; inline;
  26499. begin
  26500. pTDefRegMap(@Self)^.clr := $00000040;
  26501. end;
  26502. procedure TI2C3_I2C1ASTAT.setI2COV(thebits : TBits_1); inline;
  26503. begin
  26504. if thebits = 0 then
  26505. pTDefRegMap(@Self)^.clr := $00000040
  26506. else
  26507. pTDefRegMap(@Self)^.&set := $00000040;
  26508. end;
  26509. function TI2C3_I2C1ASTAT.getI2COV : TBits_1; inline;
  26510. begin
  26511. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  26512. end;
  26513. procedure TI2C3_I2C1ASTAT.setIWCOL; inline;
  26514. begin
  26515. pTDefRegMap(@Self)^.&set := $00000080;
  26516. end;
  26517. procedure TI2C3_I2C1ASTAT.clearIWCOL; inline;
  26518. begin
  26519. pTDefRegMap(@Self)^.clr := $00000080;
  26520. end;
  26521. procedure TI2C3_I2C1ASTAT.setIWCOL(thebits : TBits_1); inline;
  26522. begin
  26523. if thebits = 0 then
  26524. pTDefRegMap(@Self)^.clr := $00000080
  26525. else
  26526. pTDefRegMap(@Self)^.&set := $00000080;
  26527. end;
  26528. function TI2C3_I2C1ASTAT.getIWCOL : TBits_1; inline;
  26529. begin
  26530. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  26531. end;
  26532. procedure TI2C3_I2C1ASTAT.setADD10; inline;
  26533. begin
  26534. pTDefRegMap(@Self)^.&set := $00000100;
  26535. end;
  26536. procedure TI2C3_I2C1ASTAT.clearADD10; inline;
  26537. begin
  26538. pTDefRegMap(@Self)^.clr := $00000100;
  26539. end;
  26540. procedure TI2C3_I2C1ASTAT.setADD10(thebits : TBits_1); inline;
  26541. begin
  26542. if thebits = 0 then
  26543. pTDefRegMap(@Self)^.clr := $00000100
  26544. else
  26545. pTDefRegMap(@Self)^.&set := $00000100;
  26546. end;
  26547. function TI2C3_I2C1ASTAT.getADD10 : TBits_1; inline;
  26548. begin
  26549. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  26550. end;
  26551. procedure TI2C3_I2C1ASTAT.setGCSTAT; inline;
  26552. begin
  26553. pTDefRegMap(@Self)^.&set := $00000200;
  26554. end;
  26555. procedure TI2C3_I2C1ASTAT.clearGCSTAT; inline;
  26556. begin
  26557. pTDefRegMap(@Self)^.clr := $00000200;
  26558. end;
  26559. procedure TI2C3_I2C1ASTAT.setGCSTAT(thebits : TBits_1); inline;
  26560. begin
  26561. if thebits = 0 then
  26562. pTDefRegMap(@Self)^.clr := $00000200
  26563. else
  26564. pTDefRegMap(@Self)^.&set := $00000200;
  26565. end;
  26566. function TI2C3_I2C1ASTAT.getGCSTAT : TBits_1; inline;
  26567. begin
  26568. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  26569. end;
  26570. procedure TI2C3_I2C1ASTAT.setBCL; inline;
  26571. begin
  26572. pTDefRegMap(@Self)^.&set := $00000400;
  26573. end;
  26574. procedure TI2C3_I2C1ASTAT.clearBCL; inline;
  26575. begin
  26576. pTDefRegMap(@Self)^.clr := $00000400;
  26577. end;
  26578. procedure TI2C3_I2C1ASTAT.setBCL(thebits : TBits_1); inline;
  26579. begin
  26580. if thebits = 0 then
  26581. pTDefRegMap(@Self)^.clr := $00000400
  26582. else
  26583. pTDefRegMap(@Self)^.&set := $00000400;
  26584. end;
  26585. function TI2C3_I2C1ASTAT.getBCL : TBits_1; inline;
  26586. begin
  26587. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  26588. end;
  26589. procedure TI2C3_I2C1ASTAT.setTRSTAT; inline;
  26590. begin
  26591. pTDefRegMap(@Self)^.&set := $00004000;
  26592. end;
  26593. procedure TI2C3_I2C1ASTAT.clearTRSTAT; inline;
  26594. begin
  26595. pTDefRegMap(@Self)^.clr := $00004000;
  26596. end;
  26597. procedure TI2C3_I2C1ASTAT.setTRSTAT(thebits : TBits_1); inline;
  26598. begin
  26599. if thebits = 0 then
  26600. pTDefRegMap(@Self)^.clr := $00004000
  26601. else
  26602. pTDefRegMap(@Self)^.&set := $00004000;
  26603. end;
  26604. function TI2C3_I2C1ASTAT.getTRSTAT : TBits_1; inline;
  26605. begin
  26606. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  26607. end;
  26608. procedure TI2C3_I2C1ASTAT.setACKSTAT; inline;
  26609. begin
  26610. pTDefRegMap(@Self)^.&set := $00008000;
  26611. end;
  26612. procedure TI2C3_I2C1ASTAT.clearACKSTAT; inline;
  26613. begin
  26614. pTDefRegMap(@Self)^.clr := $00008000;
  26615. end;
  26616. procedure TI2C3_I2C1ASTAT.setACKSTAT(thebits : TBits_1); inline;
  26617. begin
  26618. if thebits = 0 then
  26619. pTDefRegMap(@Self)^.clr := $00008000
  26620. else
  26621. pTDefRegMap(@Self)^.&set := $00008000;
  26622. end;
  26623. function TI2C3_I2C1ASTAT.getACKSTAT : TBits_1; inline;
  26624. begin
  26625. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26626. end;
  26627. procedure TI2C3_I2C1ASTAT.setI2CPOV; inline;
  26628. begin
  26629. pTDefRegMap(@Self)^.&set := $00000040;
  26630. end;
  26631. procedure TI2C3_I2C1ASTAT.clearI2CPOV; inline;
  26632. begin
  26633. pTDefRegMap(@Self)^.clr := $00000040;
  26634. end;
  26635. procedure TI2C3_I2C1ASTAT.setI2CPOV(thebits : TBits_1); inline;
  26636. begin
  26637. if thebits = 0 then
  26638. pTDefRegMap(@Self)^.clr := $00000040
  26639. else
  26640. pTDefRegMap(@Self)^.&set := $00000040;
  26641. end;
  26642. function TI2C3_I2C1ASTAT.getI2CPOV : TBits_1; inline;
  26643. begin
  26644. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  26645. end;
  26646. procedure TI2C3_I2C1ASTAT.setw(thebits : TBits_32); inline;
  26647. begin
  26648. pTDefRegMap(@Self)^.val := thebits;
  26649. end;
  26650. function TI2C3_I2C1ASTAT.getw : TBits_32; inline;
  26651. begin
  26652. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  26653. end;
  26654. procedure TI2C3_I2C3STAT.setTBF; inline;
  26655. begin
  26656. pTDefRegMap(@Self)^.&set := $00000001;
  26657. end;
  26658. procedure TI2C3_I2C3STAT.clearTBF; inline;
  26659. begin
  26660. pTDefRegMap(@Self)^.clr := $00000001;
  26661. end;
  26662. procedure TI2C3_I2C3STAT.setTBF(thebits : TBits_1); inline;
  26663. begin
  26664. if thebits = 0 then
  26665. pTDefRegMap(@Self)^.clr := $00000001
  26666. else
  26667. pTDefRegMap(@Self)^.&set := $00000001;
  26668. end;
  26669. function TI2C3_I2C3STAT.getTBF : TBits_1; inline;
  26670. begin
  26671. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  26672. end;
  26673. procedure TI2C3_I2C3STAT.setRBF; inline;
  26674. begin
  26675. pTDefRegMap(@Self)^.&set := $00000002;
  26676. end;
  26677. procedure TI2C3_I2C3STAT.clearRBF; inline;
  26678. begin
  26679. pTDefRegMap(@Self)^.clr := $00000002;
  26680. end;
  26681. procedure TI2C3_I2C3STAT.setRBF(thebits : TBits_1); inline;
  26682. begin
  26683. if thebits = 0 then
  26684. pTDefRegMap(@Self)^.clr := $00000002
  26685. else
  26686. pTDefRegMap(@Self)^.&set := $00000002;
  26687. end;
  26688. function TI2C3_I2C3STAT.getRBF : TBits_1; inline;
  26689. begin
  26690. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  26691. end;
  26692. procedure TI2C3_I2C3STAT.setR_W; inline;
  26693. begin
  26694. pTDefRegMap(@Self)^.&set := $00000004;
  26695. end;
  26696. procedure TI2C3_I2C3STAT.clearR_W; inline;
  26697. begin
  26698. pTDefRegMap(@Self)^.clr := $00000004;
  26699. end;
  26700. procedure TI2C3_I2C3STAT.setR_W(thebits : TBits_1); inline;
  26701. begin
  26702. if thebits = 0 then
  26703. pTDefRegMap(@Self)^.clr := $00000004
  26704. else
  26705. pTDefRegMap(@Self)^.&set := $00000004;
  26706. end;
  26707. function TI2C3_I2C3STAT.getR_W : TBits_1; inline;
  26708. begin
  26709. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  26710. end;
  26711. procedure TI2C3_I2C3STAT.setS; inline;
  26712. begin
  26713. pTDefRegMap(@Self)^.&set := $00000008;
  26714. end;
  26715. procedure TI2C3_I2C3STAT.clearS; inline;
  26716. begin
  26717. pTDefRegMap(@Self)^.clr := $00000008;
  26718. end;
  26719. procedure TI2C3_I2C3STAT.setS(thebits : TBits_1); inline;
  26720. begin
  26721. if thebits = 0 then
  26722. pTDefRegMap(@Self)^.clr := $00000008
  26723. else
  26724. pTDefRegMap(@Self)^.&set := $00000008;
  26725. end;
  26726. function TI2C3_I2C3STAT.getS : TBits_1; inline;
  26727. begin
  26728. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  26729. end;
  26730. procedure TI2C3_I2C3STAT.setP; inline;
  26731. begin
  26732. pTDefRegMap(@Self)^.&set := $00000010;
  26733. end;
  26734. procedure TI2C3_I2C3STAT.clearP; inline;
  26735. begin
  26736. pTDefRegMap(@Self)^.clr := $00000010;
  26737. end;
  26738. procedure TI2C3_I2C3STAT.setP(thebits : TBits_1); inline;
  26739. begin
  26740. if thebits = 0 then
  26741. pTDefRegMap(@Self)^.clr := $00000010
  26742. else
  26743. pTDefRegMap(@Self)^.&set := $00000010;
  26744. end;
  26745. function TI2C3_I2C3STAT.getP : TBits_1; inline;
  26746. begin
  26747. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  26748. end;
  26749. procedure TI2C3_I2C3STAT.setD_A; inline;
  26750. begin
  26751. pTDefRegMap(@Self)^.&set := $00000020;
  26752. end;
  26753. procedure TI2C3_I2C3STAT.clearD_A; inline;
  26754. begin
  26755. pTDefRegMap(@Self)^.clr := $00000020;
  26756. end;
  26757. procedure TI2C3_I2C3STAT.setD_A(thebits : TBits_1); inline;
  26758. begin
  26759. if thebits = 0 then
  26760. pTDefRegMap(@Self)^.clr := $00000020
  26761. else
  26762. pTDefRegMap(@Self)^.&set := $00000020;
  26763. end;
  26764. function TI2C3_I2C3STAT.getD_A : TBits_1; inline;
  26765. begin
  26766. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  26767. end;
  26768. procedure TI2C3_I2C3STAT.setI2COV; inline;
  26769. begin
  26770. pTDefRegMap(@Self)^.&set := $00000040;
  26771. end;
  26772. procedure TI2C3_I2C3STAT.clearI2COV; inline;
  26773. begin
  26774. pTDefRegMap(@Self)^.clr := $00000040;
  26775. end;
  26776. procedure TI2C3_I2C3STAT.setI2COV(thebits : TBits_1); inline;
  26777. begin
  26778. if thebits = 0 then
  26779. pTDefRegMap(@Self)^.clr := $00000040
  26780. else
  26781. pTDefRegMap(@Self)^.&set := $00000040;
  26782. end;
  26783. function TI2C3_I2C3STAT.getI2COV : TBits_1; inline;
  26784. begin
  26785. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  26786. end;
  26787. procedure TI2C3_I2C3STAT.setIWCOL; inline;
  26788. begin
  26789. pTDefRegMap(@Self)^.&set := $00000080;
  26790. end;
  26791. procedure TI2C3_I2C3STAT.clearIWCOL; inline;
  26792. begin
  26793. pTDefRegMap(@Self)^.clr := $00000080;
  26794. end;
  26795. procedure TI2C3_I2C3STAT.setIWCOL(thebits : TBits_1); inline;
  26796. begin
  26797. if thebits = 0 then
  26798. pTDefRegMap(@Self)^.clr := $00000080
  26799. else
  26800. pTDefRegMap(@Self)^.&set := $00000080;
  26801. end;
  26802. function TI2C3_I2C3STAT.getIWCOL : TBits_1; inline;
  26803. begin
  26804. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  26805. end;
  26806. procedure TI2C3_I2C3STAT.setADD10; inline;
  26807. begin
  26808. pTDefRegMap(@Self)^.&set := $00000100;
  26809. end;
  26810. procedure TI2C3_I2C3STAT.clearADD10; inline;
  26811. begin
  26812. pTDefRegMap(@Self)^.clr := $00000100;
  26813. end;
  26814. procedure TI2C3_I2C3STAT.setADD10(thebits : TBits_1); inline;
  26815. begin
  26816. if thebits = 0 then
  26817. pTDefRegMap(@Self)^.clr := $00000100
  26818. else
  26819. pTDefRegMap(@Self)^.&set := $00000100;
  26820. end;
  26821. function TI2C3_I2C3STAT.getADD10 : TBits_1; inline;
  26822. begin
  26823. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  26824. end;
  26825. procedure TI2C3_I2C3STAT.setGCSTAT; inline;
  26826. begin
  26827. pTDefRegMap(@Self)^.&set := $00000200;
  26828. end;
  26829. procedure TI2C3_I2C3STAT.clearGCSTAT; inline;
  26830. begin
  26831. pTDefRegMap(@Self)^.clr := $00000200;
  26832. end;
  26833. procedure TI2C3_I2C3STAT.setGCSTAT(thebits : TBits_1); inline;
  26834. begin
  26835. if thebits = 0 then
  26836. pTDefRegMap(@Self)^.clr := $00000200
  26837. else
  26838. pTDefRegMap(@Self)^.&set := $00000200;
  26839. end;
  26840. function TI2C3_I2C3STAT.getGCSTAT : TBits_1; inline;
  26841. begin
  26842. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  26843. end;
  26844. procedure TI2C3_I2C3STAT.setBCL; inline;
  26845. begin
  26846. pTDefRegMap(@Self)^.&set := $00000400;
  26847. end;
  26848. procedure TI2C3_I2C3STAT.clearBCL; inline;
  26849. begin
  26850. pTDefRegMap(@Self)^.clr := $00000400;
  26851. end;
  26852. procedure TI2C3_I2C3STAT.setBCL(thebits : TBits_1); inline;
  26853. begin
  26854. if thebits = 0 then
  26855. pTDefRegMap(@Self)^.clr := $00000400
  26856. else
  26857. pTDefRegMap(@Self)^.&set := $00000400;
  26858. end;
  26859. function TI2C3_I2C3STAT.getBCL : TBits_1; inline;
  26860. begin
  26861. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  26862. end;
  26863. procedure TI2C3_I2C3STAT.setTRSTAT; inline;
  26864. begin
  26865. pTDefRegMap(@Self)^.&set := $00004000;
  26866. end;
  26867. procedure TI2C3_I2C3STAT.clearTRSTAT; inline;
  26868. begin
  26869. pTDefRegMap(@Self)^.clr := $00004000;
  26870. end;
  26871. procedure TI2C3_I2C3STAT.setTRSTAT(thebits : TBits_1); inline;
  26872. begin
  26873. if thebits = 0 then
  26874. pTDefRegMap(@Self)^.clr := $00004000
  26875. else
  26876. pTDefRegMap(@Self)^.&set := $00004000;
  26877. end;
  26878. function TI2C3_I2C3STAT.getTRSTAT : TBits_1; inline;
  26879. begin
  26880. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  26881. end;
  26882. procedure TI2C3_I2C3STAT.setACKSTAT; inline;
  26883. begin
  26884. pTDefRegMap(@Self)^.&set := $00008000;
  26885. end;
  26886. procedure TI2C3_I2C3STAT.clearACKSTAT; inline;
  26887. begin
  26888. pTDefRegMap(@Self)^.clr := $00008000;
  26889. end;
  26890. procedure TI2C3_I2C3STAT.setACKSTAT(thebits : TBits_1); inline;
  26891. begin
  26892. if thebits = 0 then
  26893. pTDefRegMap(@Self)^.clr := $00008000
  26894. else
  26895. pTDefRegMap(@Self)^.&set := $00008000;
  26896. end;
  26897. function TI2C3_I2C3STAT.getACKSTAT : TBits_1; inline;
  26898. begin
  26899. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26900. end;
  26901. procedure TI2C3_I2C3STAT.setI2CPOV; inline;
  26902. begin
  26903. pTDefRegMap(@Self)^.&set := $00000040;
  26904. end;
  26905. procedure TI2C3_I2C3STAT.clearI2CPOV; inline;
  26906. begin
  26907. pTDefRegMap(@Self)^.clr := $00000040;
  26908. end;
  26909. procedure TI2C3_I2C3STAT.setI2CPOV(thebits : TBits_1); inline;
  26910. begin
  26911. if thebits = 0 then
  26912. pTDefRegMap(@Self)^.clr := $00000040
  26913. else
  26914. pTDefRegMap(@Self)^.&set := $00000040;
  26915. end;
  26916. function TI2C3_I2C3STAT.getI2CPOV : TBits_1; inline;
  26917. begin
  26918. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  26919. end;
  26920. procedure TI2C3_I2C3STAT.setw(thebits : TBits_32); inline;
  26921. begin
  26922. pTDefRegMap(@Self)^.val := thebits;
  26923. end;
  26924. function TI2C3_I2C3STAT.getw : TBits_32; inline;
  26925. begin
  26926. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  26927. end;
  26928. procedure TI2C4_I2C2ACON.setSEN; inline;
  26929. begin
  26930. pTDefRegMap(@Self)^.&set := $00000001;
  26931. end;
  26932. procedure TI2C4_I2C2ACON.clearSEN; inline;
  26933. begin
  26934. pTDefRegMap(@Self)^.clr := $00000001;
  26935. end;
  26936. procedure TI2C4_I2C2ACON.setSEN(thebits : TBits_1); inline;
  26937. begin
  26938. if thebits = 0 then
  26939. pTDefRegMap(@Self)^.clr := $00000001
  26940. else
  26941. pTDefRegMap(@Self)^.&set := $00000001;
  26942. end;
  26943. function TI2C4_I2C2ACON.getSEN : TBits_1; inline;
  26944. begin
  26945. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  26946. end;
  26947. procedure TI2C4_I2C2ACON.setRSEN; inline;
  26948. begin
  26949. pTDefRegMap(@Self)^.&set := $00000002;
  26950. end;
  26951. procedure TI2C4_I2C2ACON.clearRSEN; inline;
  26952. begin
  26953. pTDefRegMap(@Self)^.clr := $00000002;
  26954. end;
  26955. procedure TI2C4_I2C2ACON.setRSEN(thebits : TBits_1); inline;
  26956. begin
  26957. if thebits = 0 then
  26958. pTDefRegMap(@Self)^.clr := $00000002
  26959. else
  26960. pTDefRegMap(@Self)^.&set := $00000002;
  26961. end;
  26962. function TI2C4_I2C2ACON.getRSEN : TBits_1; inline;
  26963. begin
  26964. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  26965. end;
  26966. procedure TI2C4_I2C2ACON.setPEN; inline;
  26967. begin
  26968. pTDefRegMap(@Self)^.&set := $00000004;
  26969. end;
  26970. procedure TI2C4_I2C2ACON.clearPEN; inline;
  26971. begin
  26972. pTDefRegMap(@Self)^.clr := $00000004;
  26973. end;
  26974. procedure TI2C4_I2C2ACON.setPEN(thebits : TBits_1); inline;
  26975. begin
  26976. if thebits = 0 then
  26977. pTDefRegMap(@Self)^.clr := $00000004
  26978. else
  26979. pTDefRegMap(@Self)^.&set := $00000004;
  26980. end;
  26981. function TI2C4_I2C2ACON.getPEN : TBits_1; inline;
  26982. begin
  26983. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  26984. end;
  26985. procedure TI2C4_I2C2ACON.setRCEN; inline;
  26986. begin
  26987. pTDefRegMap(@Self)^.&set := $00000008;
  26988. end;
  26989. procedure TI2C4_I2C2ACON.clearRCEN; inline;
  26990. begin
  26991. pTDefRegMap(@Self)^.clr := $00000008;
  26992. end;
  26993. procedure TI2C4_I2C2ACON.setRCEN(thebits : TBits_1); inline;
  26994. begin
  26995. if thebits = 0 then
  26996. pTDefRegMap(@Self)^.clr := $00000008
  26997. else
  26998. pTDefRegMap(@Self)^.&set := $00000008;
  26999. end;
  27000. function TI2C4_I2C2ACON.getRCEN : TBits_1; inline;
  27001. begin
  27002. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  27003. end;
  27004. procedure TI2C4_I2C2ACON.setACKEN; inline;
  27005. begin
  27006. pTDefRegMap(@Self)^.&set := $00000010;
  27007. end;
  27008. procedure TI2C4_I2C2ACON.clearACKEN; inline;
  27009. begin
  27010. pTDefRegMap(@Self)^.clr := $00000010;
  27011. end;
  27012. procedure TI2C4_I2C2ACON.setACKEN(thebits : TBits_1); inline;
  27013. begin
  27014. if thebits = 0 then
  27015. pTDefRegMap(@Self)^.clr := $00000010
  27016. else
  27017. pTDefRegMap(@Self)^.&set := $00000010;
  27018. end;
  27019. function TI2C4_I2C2ACON.getACKEN : TBits_1; inline;
  27020. begin
  27021. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  27022. end;
  27023. procedure TI2C4_I2C2ACON.setACKDT; inline;
  27024. begin
  27025. pTDefRegMap(@Self)^.&set := $00000020;
  27026. end;
  27027. procedure TI2C4_I2C2ACON.clearACKDT; inline;
  27028. begin
  27029. pTDefRegMap(@Self)^.clr := $00000020;
  27030. end;
  27031. procedure TI2C4_I2C2ACON.setACKDT(thebits : TBits_1); inline;
  27032. begin
  27033. if thebits = 0 then
  27034. pTDefRegMap(@Self)^.clr := $00000020
  27035. else
  27036. pTDefRegMap(@Self)^.&set := $00000020;
  27037. end;
  27038. function TI2C4_I2C2ACON.getACKDT : TBits_1; inline;
  27039. begin
  27040. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  27041. end;
  27042. procedure TI2C4_I2C2ACON.setSTREN; inline;
  27043. begin
  27044. pTDefRegMap(@Self)^.&set := $00000040;
  27045. end;
  27046. procedure TI2C4_I2C2ACON.clearSTREN; inline;
  27047. begin
  27048. pTDefRegMap(@Self)^.clr := $00000040;
  27049. end;
  27050. procedure TI2C4_I2C2ACON.setSTREN(thebits : TBits_1); inline;
  27051. begin
  27052. if thebits = 0 then
  27053. pTDefRegMap(@Self)^.clr := $00000040
  27054. else
  27055. pTDefRegMap(@Self)^.&set := $00000040;
  27056. end;
  27057. function TI2C4_I2C2ACON.getSTREN : TBits_1; inline;
  27058. begin
  27059. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27060. end;
  27061. procedure TI2C4_I2C2ACON.setGCEN; inline;
  27062. begin
  27063. pTDefRegMap(@Self)^.&set := $00000080;
  27064. end;
  27065. procedure TI2C4_I2C2ACON.clearGCEN; inline;
  27066. begin
  27067. pTDefRegMap(@Self)^.clr := $00000080;
  27068. end;
  27069. procedure TI2C4_I2C2ACON.setGCEN(thebits : TBits_1); inline;
  27070. begin
  27071. if thebits = 0 then
  27072. pTDefRegMap(@Self)^.clr := $00000080
  27073. else
  27074. pTDefRegMap(@Self)^.&set := $00000080;
  27075. end;
  27076. function TI2C4_I2C2ACON.getGCEN : TBits_1; inline;
  27077. begin
  27078. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  27079. end;
  27080. procedure TI2C4_I2C2ACON.setSMEN; inline;
  27081. begin
  27082. pTDefRegMap(@Self)^.&set := $00000100;
  27083. end;
  27084. procedure TI2C4_I2C2ACON.clearSMEN; inline;
  27085. begin
  27086. pTDefRegMap(@Self)^.clr := $00000100;
  27087. end;
  27088. procedure TI2C4_I2C2ACON.setSMEN(thebits : TBits_1); inline;
  27089. begin
  27090. if thebits = 0 then
  27091. pTDefRegMap(@Self)^.clr := $00000100
  27092. else
  27093. pTDefRegMap(@Self)^.&set := $00000100;
  27094. end;
  27095. function TI2C4_I2C2ACON.getSMEN : TBits_1; inline;
  27096. begin
  27097. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  27098. end;
  27099. procedure TI2C4_I2C2ACON.setDISSLW; inline;
  27100. begin
  27101. pTDefRegMap(@Self)^.&set := $00000200;
  27102. end;
  27103. procedure TI2C4_I2C2ACON.clearDISSLW; inline;
  27104. begin
  27105. pTDefRegMap(@Self)^.clr := $00000200;
  27106. end;
  27107. procedure TI2C4_I2C2ACON.setDISSLW(thebits : TBits_1); inline;
  27108. begin
  27109. if thebits = 0 then
  27110. pTDefRegMap(@Self)^.clr := $00000200
  27111. else
  27112. pTDefRegMap(@Self)^.&set := $00000200;
  27113. end;
  27114. function TI2C4_I2C2ACON.getDISSLW : TBits_1; inline;
  27115. begin
  27116. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  27117. end;
  27118. procedure TI2C4_I2C2ACON.setA10M; inline;
  27119. begin
  27120. pTDefRegMap(@Self)^.&set := $00000400;
  27121. end;
  27122. procedure TI2C4_I2C2ACON.clearA10M; inline;
  27123. begin
  27124. pTDefRegMap(@Self)^.clr := $00000400;
  27125. end;
  27126. procedure TI2C4_I2C2ACON.setA10M(thebits : TBits_1); inline;
  27127. begin
  27128. if thebits = 0 then
  27129. pTDefRegMap(@Self)^.clr := $00000400
  27130. else
  27131. pTDefRegMap(@Self)^.&set := $00000400;
  27132. end;
  27133. function TI2C4_I2C2ACON.getA10M : TBits_1; inline;
  27134. begin
  27135. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  27136. end;
  27137. procedure TI2C4_I2C2ACON.setSTRICT; inline;
  27138. begin
  27139. pTDefRegMap(@Self)^.&set := $00000800;
  27140. end;
  27141. procedure TI2C4_I2C2ACON.clearSTRICT; inline;
  27142. begin
  27143. pTDefRegMap(@Self)^.clr := $00000800;
  27144. end;
  27145. procedure TI2C4_I2C2ACON.setSTRICT(thebits : TBits_1); inline;
  27146. begin
  27147. if thebits = 0 then
  27148. pTDefRegMap(@Self)^.clr := $00000800
  27149. else
  27150. pTDefRegMap(@Self)^.&set := $00000800;
  27151. end;
  27152. function TI2C4_I2C2ACON.getSTRICT : TBits_1; inline;
  27153. begin
  27154. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  27155. end;
  27156. procedure TI2C4_I2C2ACON.setSCLREL; inline;
  27157. begin
  27158. pTDefRegMap(@Self)^.&set := $00001000;
  27159. end;
  27160. procedure TI2C4_I2C2ACON.clearSCLREL; inline;
  27161. begin
  27162. pTDefRegMap(@Self)^.clr := $00001000;
  27163. end;
  27164. procedure TI2C4_I2C2ACON.setSCLREL(thebits : TBits_1); inline;
  27165. begin
  27166. if thebits = 0 then
  27167. pTDefRegMap(@Self)^.clr := $00001000
  27168. else
  27169. pTDefRegMap(@Self)^.&set := $00001000;
  27170. end;
  27171. function TI2C4_I2C2ACON.getSCLREL : TBits_1; inline;
  27172. begin
  27173. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  27174. end;
  27175. procedure TI2C4_I2C2ACON.setSIDL; inline;
  27176. begin
  27177. pTDefRegMap(@Self)^.&set := $00002000;
  27178. end;
  27179. procedure TI2C4_I2C2ACON.clearSIDL; inline;
  27180. begin
  27181. pTDefRegMap(@Self)^.clr := $00002000;
  27182. end;
  27183. procedure TI2C4_I2C2ACON.setSIDL(thebits : TBits_1); inline;
  27184. begin
  27185. if thebits = 0 then
  27186. pTDefRegMap(@Self)^.clr := $00002000
  27187. else
  27188. pTDefRegMap(@Self)^.&set := $00002000;
  27189. end;
  27190. function TI2C4_I2C2ACON.getSIDL : TBits_1; inline;
  27191. begin
  27192. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  27193. end;
  27194. procedure TI2C4_I2C2ACON.setON; inline;
  27195. begin
  27196. pTDefRegMap(@Self)^.&set := $00008000;
  27197. end;
  27198. procedure TI2C4_I2C2ACON.clearON; inline;
  27199. begin
  27200. pTDefRegMap(@Self)^.clr := $00008000;
  27201. end;
  27202. procedure TI2C4_I2C2ACON.setON(thebits : TBits_1); inline;
  27203. begin
  27204. if thebits = 0 then
  27205. pTDefRegMap(@Self)^.clr := $00008000
  27206. else
  27207. pTDefRegMap(@Self)^.&set := $00008000;
  27208. end;
  27209. function TI2C4_I2C2ACON.getON : TBits_1; inline;
  27210. begin
  27211. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27212. end;
  27213. procedure TI2C4_I2C2ACON.setIPMIEN; inline;
  27214. begin
  27215. pTDefRegMap(@Self)^.&set := $00000800;
  27216. end;
  27217. procedure TI2C4_I2C2ACON.clearIPMIEN; inline;
  27218. begin
  27219. pTDefRegMap(@Self)^.clr := $00000800;
  27220. end;
  27221. procedure TI2C4_I2C2ACON.setIPMIEN(thebits : TBits_1); inline;
  27222. begin
  27223. if thebits = 0 then
  27224. pTDefRegMap(@Self)^.clr := $00000800
  27225. else
  27226. pTDefRegMap(@Self)^.&set := $00000800;
  27227. end;
  27228. function TI2C4_I2C2ACON.getIPMIEN : TBits_1; inline;
  27229. begin
  27230. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  27231. end;
  27232. procedure TI2C4_I2C2ACON.setI2CSIDL; inline;
  27233. begin
  27234. pTDefRegMap(@Self)^.&set := $00002000;
  27235. end;
  27236. procedure TI2C4_I2C2ACON.clearI2CSIDL; inline;
  27237. begin
  27238. pTDefRegMap(@Self)^.clr := $00002000;
  27239. end;
  27240. procedure TI2C4_I2C2ACON.setI2CSIDL(thebits : TBits_1); inline;
  27241. begin
  27242. if thebits = 0 then
  27243. pTDefRegMap(@Self)^.clr := $00002000
  27244. else
  27245. pTDefRegMap(@Self)^.&set := $00002000;
  27246. end;
  27247. function TI2C4_I2C2ACON.getI2CSIDL : TBits_1; inline;
  27248. begin
  27249. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  27250. end;
  27251. procedure TI2C4_I2C2ACON.setI2CEN; inline;
  27252. begin
  27253. pTDefRegMap(@Self)^.&set := $00008000;
  27254. end;
  27255. procedure TI2C4_I2C2ACON.clearI2CEN; inline;
  27256. begin
  27257. pTDefRegMap(@Self)^.clr := $00008000;
  27258. end;
  27259. procedure TI2C4_I2C2ACON.setI2CEN(thebits : TBits_1); inline;
  27260. begin
  27261. if thebits = 0 then
  27262. pTDefRegMap(@Self)^.clr := $00008000
  27263. else
  27264. pTDefRegMap(@Self)^.&set := $00008000;
  27265. end;
  27266. function TI2C4_I2C2ACON.getI2CEN : TBits_1; inline;
  27267. begin
  27268. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27269. end;
  27270. procedure TI2C4_I2C2ACON.setw(thebits : TBits_32); inline;
  27271. begin
  27272. pTDefRegMap(@Self)^.val := thebits;
  27273. end;
  27274. function TI2C4_I2C2ACON.getw : TBits_32; inline;
  27275. begin
  27276. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  27277. end;
  27278. procedure TI2C4_I2C4CON.setSEN; inline;
  27279. begin
  27280. pTDefRegMap(@Self)^.&set := $00000001;
  27281. end;
  27282. procedure TI2C4_I2C4CON.clearSEN; inline;
  27283. begin
  27284. pTDefRegMap(@Self)^.clr := $00000001;
  27285. end;
  27286. procedure TI2C4_I2C4CON.setSEN(thebits : TBits_1); inline;
  27287. begin
  27288. if thebits = 0 then
  27289. pTDefRegMap(@Self)^.clr := $00000001
  27290. else
  27291. pTDefRegMap(@Self)^.&set := $00000001;
  27292. end;
  27293. function TI2C4_I2C4CON.getSEN : TBits_1; inline;
  27294. begin
  27295. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  27296. end;
  27297. procedure TI2C4_I2C4CON.setRSEN; inline;
  27298. begin
  27299. pTDefRegMap(@Self)^.&set := $00000002;
  27300. end;
  27301. procedure TI2C4_I2C4CON.clearRSEN; inline;
  27302. begin
  27303. pTDefRegMap(@Self)^.clr := $00000002;
  27304. end;
  27305. procedure TI2C4_I2C4CON.setRSEN(thebits : TBits_1); inline;
  27306. begin
  27307. if thebits = 0 then
  27308. pTDefRegMap(@Self)^.clr := $00000002
  27309. else
  27310. pTDefRegMap(@Self)^.&set := $00000002;
  27311. end;
  27312. function TI2C4_I2C4CON.getRSEN : TBits_1; inline;
  27313. begin
  27314. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  27315. end;
  27316. procedure TI2C4_I2C4CON.setPEN; inline;
  27317. begin
  27318. pTDefRegMap(@Self)^.&set := $00000004;
  27319. end;
  27320. procedure TI2C4_I2C4CON.clearPEN; inline;
  27321. begin
  27322. pTDefRegMap(@Self)^.clr := $00000004;
  27323. end;
  27324. procedure TI2C4_I2C4CON.setPEN(thebits : TBits_1); inline;
  27325. begin
  27326. if thebits = 0 then
  27327. pTDefRegMap(@Self)^.clr := $00000004
  27328. else
  27329. pTDefRegMap(@Self)^.&set := $00000004;
  27330. end;
  27331. function TI2C4_I2C4CON.getPEN : TBits_1; inline;
  27332. begin
  27333. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  27334. end;
  27335. procedure TI2C4_I2C4CON.setRCEN; inline;
  27336. begin
  27337. pTDefRegMap(@Self)^.&set := $00000008;
  27338. end;
  27339. procedure TI2C4_I2C4CON.clearRCEN; inline;
  27340. begin
  27341. pTDefRegMap(@Self)^.clr := $00000008;
  27342. end;
  27343. procedure TI2C4_I2C4CON.setRCEN(thebits : TBits_1); inline;
  27344. begin
  27345. if thebits = 0 then
  27346. pTDefRegMap(@Self)^.clr := $00000008
  27347. else
  27348. pTDefRegMap(@Self)^.&set := $00000008;
  27349. end;
  27350. function TI2C4_I2C4CON.getRCEN : TBits_1; inline;
  27351. begin
  27352. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  27353. end;
  27354. procedure TI2C4_I2C4CON.setACKEN; inline;
  27355. begin
  27356. pTDefRegMap(@Self)^.&set := $00000010;
  27357. end;
  27358. procedure TI2C4_I2C4CON.clearACKEN; inline;
  27359. begin
  27360. pTDefRegMap(@Self)^.clr := $00000010;
  27361. end;
  27362. procedure TI2C4_I2C4CON.setACKEN(thebits : TBits_1); inline;
  27363. begin
  27364. if thebits = 0 then
  27365. pTDefRegMap(@Self)^.clr := $00000010
  27366. else
  27367. pTDefRegMap(@Self)^.&set := $00000010;
  27368. end;
  27369. function TI2C4_I2C4CON.getACKEN : TBits_1; inline;
  27370. begin
  27371. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  27372. end;
  27373. procedure TI2C4_I2C4CON.setACKDT; inline;
  27374. begin
  27375. pTDefRegMap(@Self)^.&set := $00000020;
  27376. end;
  27377. procedure TI2C4_I2C4CON.clearACKDT; inline;
  27378. begin
  27379. pTDefRegMap(@Self)^.clr := $00000020;
  27380. end;
  27381. procedure TI2C4_I2C4CON.setACKDT(thebits : TBits_1); inline;
  27382. begin
  27383. if thebits = 0 then
  27384. pTDefRegMap(@Self)^.clr := $00000020
  27385. else
  27386. pTDefRegMap(@Self)^.&set := $00000020;
  27387. end;
  27388. function TI2C4_I2C4CON.getACKDT : TBits_1; inline;
  27389. begin
  27390. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  27391. end;
  27392. procedure TI2C4_I2C4CON.setSTREN; inline;
  27393. begin
  27394. pTDefRegMap(@Self)^.&set := $00000040;
  27395. end;
  27396. procedure TI2C4_I2C4CON.clearSTREN; inline;
  27397. begin
  27398. pTDefRegMap(@Self)^.clr := $00000040;
  27399. end;
  27400. procedure TI2C4_I2C4CON.setSTREN(thebits : TBits_1); inline;
  27401. begin
  27402. if thebits = 0 then
  27403. pTDefRegMap(@Self)^.clr := $00000040
  27404. else
  27405. pTDefRegMap(@Self)^.&set := $00000040;
  27406. end;
  27407. function TI2C4_I2C4CON.getSTREN : TBits_1; inline;
  27408. begin
  27409. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27410. end;
  27411. procedure TI2C4_I2C4CON.setGCEN; inline;
  27412. begin
  27413. pTDefRegMap(@Self)^.&set := $00000080;
  27414. end;
  27415. procedure TI2C4_I2C4CON.clearGCEN; inline;
  27416. begin
  27417. pTDefRegMap(@Self)^.clr := $00000080;
  27418. end;
  27419. procedure TI2C4_I2C4CON.setGCEN(thebits : TBits_1); inline;
  27420. begin
  27421. if thebits = 0 then
  27422. pTDefRegMap(@Self)^.clr := $00000080
  27423. else
  27424. pTDefRegMap(@Self)^.&set := $00000080;
  27425. end;
  27426. function TI2C4_I2C4CON.getGCEN : TBits_1; inline;
  27427. begin
  27428. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  27429. end;
  27430. procedure TI2C4_I2C4CON.setSMEN; inline;
  27431. begin
  27432. pTDefRegMap(@Self)^.&set := $00000100;
  27433. end;
  27434. procedure TI2C4_I2C4CON.clearSMEN; inline;
  27435. begin
  27436. pTDefRegMap(@Self)^.clr := $00000100;
  27437. end;
  27438. procedure TI2C4_I2C4CON.setSMEN(thebits : TBits_1); inline;
  27439. begin
  27440. if thebits = 0 then
  27441. pTDefRegMap(@Self)^.clr := $00000100
  27442. else
  27443. pTDefRegMap(@Self)^.&set := $00000100;
  27444. end;
  27445. function TI2C4_I2C4CON.getSMEN : TBits_1; inline;
  27446. begin
  27447. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  27448. end;
  27449. procedure TI2C4_I2C4CON.setDISSLW; inline;
  27450. begin
  27451. pTDefRegMap(@Self)^.&set := $00000200;
  27452. end;
  27453. procedure TI2C4_I2C4CON.clearDISSLW; inline;
  27454. begin
  27455. pTDefRegMap(@Self)^.clr := $00000200;
  27456. end;
  27457. procedure TI2C4_I2C4CON.setDISSLW(thebits : TBits_1); inline;
  27458. begin
  27459. if thebits = 0 then
  27460. pTDefRegMap(@Self)^.clr := $00000200
  27461. else
  27462. pTDefRegMap(@Self)^.&set := $00000200;
  27463. end;
  27464. function TI2C4_I2C4CON.getDISSLW : TBits_1; inline;
  27465. begin
  27466. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  27467. end;
  27468. procedure TI2C4_I2C4CON.setA10M; inline;
  27469. begin
  27470. pTDefRegMap(@Self)^.&set := $00000400;
  27471. end;
  27472. procedure TI2C4_I2C4CON.clearA10M; inline;
  27473. begin
  27474. pTDefRegMap(@Self)^.clr := $00000400;
  27475. end;
  27476. procedure TI2C4_I2C4CON.setA10M(thebits : TBits_1); inline;
  27477. begin
  27478. if thebits = 0 then
  27479. pTDefRegMap(@Self)^.clr := $00000400
  27480. else
  27481. pTDefRegMap(@Self)^.&set := $00000400;
  27482. end;
  27483. function TI2C4_I2C4CON.getA10M : TBits_1; inline;
  27484. begin
  27485. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  27486. end;
  27487. procedure TI2C4_I2C4CON.setSTRICT; inline;
  27488. begin
  27489. pTDefRegMap(@Self)^.&set := $00000800;
  27490. end;
  27491. procedure TI2C4_I2C4CON.clearSTRICT; inline;
  27492. begin
  27493. pTDefRegMap(@Self)^.clr := $00000800;
  27494. end;
  27495. procedure TI2C4_I2C4CON.setSTRICT(thebits : TBits_1); inline;
  27496. begin
  27497. if thebits = 0 then
  27498. pTDefRegMap(@Self)^.clr := $00000800
  27499. else
  27500. pTDefRegMap(@Self)^.&set := $00000800;
  27501. end;
  27502. function TI2C4_I2C4CON.getSTRICT : TBits_1; inline;
  27503. begin
  27504. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  27505. end;
  27506. procedure TI2C4_I2C4CON.setSCLREL; inline;
  27507. begin
  27508. pTDefRegMap(@Self)^.&set := $00001000;
  27509. end;
  27510. procedure TI2C4_I2C4CON.clearSCLREL; inline;
  27511. begin
  27512. pTDefRegMap(@Self)^.clr := $00001000;
  27513. end;
  27514. procedure TI2C4_I2C4CON.setSCLREL(thebits : TBits_1); inline;
  27515. begin
  27516. if thebits = 0 then
  27517. pTDefRegMap(@Self)^.clr := $00001000
  27518. else
  27519. pTDefRegMap(@Self)^.&set := $00001000;
  27520. end;
  27521. function TI2C4_I2C4CON.getSCLREL : TBits_1; inline;
  27522. begin
  27523. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  27524. end;
  27525. procedure TI2C4_I2C4CON.setSIDL; inline;
  27526. begin
  27527. pTDefRegMap(@Self)^.&set := $00002000;
  27528. end;
  27529. procedure TI2C4_I2C4CON.clearSIDL; inline;
  27530. begin
  27531. pTDefRegMap(@Self)^.clr := $00002000;
  27532. end;
  27533. procedure TI2C4_I2C4CON.setSIDL(thebits : TBits_1); inline;
  27534. begin
  27535. if thebits = 0 then
  27536. pTDefRegMap(@Self)^.clr := $00002000
  27537. else
  27538. pTDefRegMap(@Self)^.&set := $00002000;
  27539. end;
  27540. function TI2C4_I2C4CON.getSIDL : TBits_1; inline;
  27541. begin
  27542. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  27543. end;
  27544. procedure TI2C4_I2C4CON.setON; inline;
  27545. begin
  27546. pTDefRegMap(@Self)^.&set := $00008000;
  27547. end;
  27548. procedure TI2C4_I2C4CON.clearON; inline;
  27549. begin
  27550. pTDefRegMap(@Self)^.clr := $00008000;
  27551. end;
  27552. procedure TI2C4_I2C4CON.setON(thebits : TBits_1); inline;
  27553. begin
  27554. if thebits = 0 then
  27555. pTDefRegMap(@Self)^.clr := $00008000
  27556. else
  27557. pTDefRegMap(@Self)^.&set := $00008000;
  27558. end;
  27559. function TI2C4_I2C4CON.getON : TBits_1; inline;
  27560. begin
  27561. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27562. end;
  27563. procedure TI2C4_I2C4CON.setIPMIEN; inline;
  27564. begin
  27565. pTDefRegMap(@Self)^.&set := $00000800;
  27566. end;
  27567. procedure TI2C4_I2C4CON.clearIPMIEN; inline;
  27568. begin
  27569. pTDefRegMap(@Self)^.clr := $00000800;
  27570. end;
  27571. procedure TI2C4_I2C4CON.setIPMIEN(thebits : TBits_1); inline;
  27572. begin
  27573. if thebits = 0 then
  27574. pTDefRegMap(@Self)^.clr := $00000800
  27575. else
  27576. pTDefRegMap(@Self)^.&set := $00000800;
  27577. end;
  27578. function TI2C4_I2C4CON.getIPMIEN : TBits_1; inline;
  27579. begin
  27580. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  27581. end;
  27582. procedure TI2C4_I2C4CON.setI2CSIDL; inline;
  27583. begin
  27584. pTDefRegMap(@Self)^.&set := $00002000;
  27585. end;
  27586. procedure TI2C4_I2C4CON.clearI2CSIDL; inline;
  27587. begin
  27588. pTDefRegMap(@Self)^.clr := $00002000;
  27589. end;
  27590. procedure TI2C4_I2C4CON.setI2CSIDL(thebits : TBits_1); inline;
  27591. begin
  27592. if thebits = 0 then
  27593. pTDefRegMap(@Self)^.clr := $00002000
  27594. else
  27595. pTDefRegMap(@Self)^.&set := $00002000;
  27596. end;
  27597. function TI2C4_I2C4CON.getI2CSIDL : TBits_1; inline;
  27598. begin
  27599. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  27600. end;
  27601. procedure TI2C4_I2C4CON.setI2CEN; inline;
  27602. begin
  27603. pTDefRegMap(@Self)^.&set := $00008000;
  27604. end;
  27605. procedure TI2C4_I2C4CON.clearI2CEN; inline;
  27606. begin
  27607. pTDefRegMap(@Self)^.clr := $00008000;
  27608. end;
  27609. procedure TI2C4_I2C4CON.setI2CEN(thebits : TBits_1); inline;
  27610. begin
  27611. if thebits = 0 then
  27612. pTDefRegMap(@Self)^.clr := $00008000
  27613. else
  27614. pTDefRegMap(@Self)^.&set := $00008000;
  27615. end;
  27616. function TI2C4_I2C4CON.getI2CEN : TBits_1; inline;
  27617. begin
  27618. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27619. end;
  27620. procedure TI2C4_I2C4CON.setw(thebits : TBits_32); inline;
  27621. begin
  27622. pTDefRegMap(@Self)^.val := thebits;
  27623. end;
  27624. function TI2C4_I2C4CON.getw : TBits_32; inline;
  27625. begin
  27626. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  27627. end;
  27628. procedure TI2C4_I2C2ASTAT.setTBF; inline;
  27629. begin
  27630. pTDefRegMap(@Self)^.&set := $00000001;
  27631. end;
  27632. procedure TI2C4_I2C2ASTAT.clearTBF; inline;
  27633. begin
  27634. pTDefRegMap(@Self)^.clr := $00000001;
  27635. end;
  27636. procedure TI2C4_I2C2ASTAT.setTBF(thebits : TBits_1); inline;
  27637. begin
  27638. if thebits = 0 then
  27639. pTDefRegMap(@Self)^.clr := $00000001
  27640. else
  27641. pTDefRegMap(@Self)^.&set := $00000001;
  27642. end;
  27643. function TI2C4_I2C2ASTAT.getTBF : TBits_1; inline;
  27644. begin
  27645. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  27646. end;
  27647. procedure TI2C4_I2C2ASTAT.setRBF; inline;
  27648. begin
  27649. pTDefRegMap(@Self)^.&set := $00000002;
  27650. end;
  27651. procedure TI2C4_I2C2ASTAT.clearRBF; inline;
  27652. begin
  27653. pTDefRegMap(@Self)^.clr := $00000002;
  27654. end;
  27655. procedure TI2C4_I2C2ASTAT.setRBF(thebits : TBits_1); inline;
  27656. begin
  27657. if thebits = 0 then
  27658. pTDefRegMap(@Self)^.clr := $00000002
  27659. else
  27660. pTDefRegMap(@Self)^.&set := $00000002;
  27661. end;
  27662. function TI2C4_I2C2ASTAT.getRBF : TBits_1; inline;
  27663. begin
  27664. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  27665. end;
  27666. procedure TI2C4_I2C2ASTAT.setR_W; inline;
  27667. begin
  27668. pTDefRegMap(@Self)^.&set := $00000004;
  27669. end;
  27670. procedure TI2C4_I2C2ASTAT.clearR_W; inline;
  27671. begin
  27672. pTDefRegMap(@Self)^.clr := $00000004;
  27673. end;
  27674. procedure TI2C4_I2C2ASTAT.setR_W(thebits : TBits_1); inline;
  27675. begin
  27676. if thebits = 0 then
  27677. pTDefRegMap(@Self)^.clr := $00000004
  27678. else
  27679. pTDefRegMap(@Self)^.&set := $00000004;
  27680. end;
  27681. function TI2C4_I2C2ASTAT.getR_W : TBits_1; inline;
  27682. begin
  27683. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  27684. end;
  27685. procedure TI2C4_I2C2ASTAT.setS; inline;
  27686. begin
  27687. pTDefRegMap(@Self)^.&set := $00000008;
  27688. end;
  27689. procedure TI2C4_I2C2ASTAT.clearS; inline;
  27690. begin
  27691. pTDefRegMap(@Self)^.clr := $00000008;
  27692. end;
  27693. procedure TI2C4_I2C2ASTAT.setS(thebits : TBits_1); inline;
  27694. begin
  27695. if thebits = 0 then
  27696. pTDefRegMap(@Self)^.clr := $00000008
  27697. else
  27698. pTDefRegMap(@Self)^.&set := $00000008;
  27699. end;
  27700. function TI2C4_I2C2ASTAT.getS : TBits_1; inline;
  27701. begin
  27702. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  27703. end;
  27704. procedure TI2C4_I2C2ASTAT.setP; inline;
  27705. begin
  27706. pTDefRegMap(@Self)^.&set := $00000010;
  27707. end;
  27708. procedure TI2C4_I2C2ASTAT.clearP; inline;
  27709. begin
  27710. pTDefRegMap(@Self)^.clr := $00000010;
  27711. end;
  27712. procedure TI2C4_I2C2ASTAT.setP(thebits : TBits_1); inline;
  27713. begin
  27714. if thebits = 0 then
  27715. pTDefRegMap(@Self)^.clr := $00000010
  27716. else
  27717. pTDefRegMap(@Self)^.&set := $00000010;
  27718. end;
  27719. function TI2C4_I2C2ASTAT.getP : TBits_1; inline;
  27720. begin
  27721. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  27722. end;
  27723. procedure TI2C4_I2C2ASTAT.setD_A; inline;
  27724. begin
  27725. pTDefRegMap(@Self)^.&set := $00000020;
  27726. end;
  27727. procedure TI2C4_I2C2ASTAT.clearD_A; inline;
  27728. begin
  27729. pTDefRegMap(@Self)^.clr := $00000020;
  27730. end;
  27731. procedure TI2C4_I2C2ASTAT.setD_A(thebits : TBits_1); inline;
  27732. begin
  27733. if thebits = 0 then
  27734. pTDefRegMap(@Self)^.clr := $00000020
  27735. else
  27736. pTDefRegMap(@Self)^.&set := $00000020;
  27737. end;
  27738. function TI2C4_I2C2ASTAT.getD_A : TBits_1; inline;
  27739. begin
  27740. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  27741. end;
  27742. procedure TI2C4_I2C2ASTAT.setI2COV; inline;
  27743. begin
  27744. pTDefRegMap(@Self)^.&set := $00000040;
  27745. end;
  27746. procedure TI2C4_I2C2ASTAT.clearI2COV; inline;
  27747. begin
  27748. pTDefRegMap(@Self)^.clr := $00000040;
  27749. end;
  27750. procedure TI2C4_I2C2ASTAT.setI2COV(thebits : TBits_1); inline;
  27751. begin
  27752. if thebits = 0 then
  27753. pTDefRegMap(@Self)^.clr := $00000040
  27754. else
  27755. pTDefRegMap(@Self)^.&set := $00000040;
  27756. end;
  27757. function TI2C4_I2C2ASTAT.getI2COV : TBits_1; inline;
  27758. begin
  27759. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27760. end;
  27761. procedure TI2C4_I2C2ASTAT.setIWCOL; inline;
  27762. begin
  27763. pTDefRegMap(@Self)^.&set := $00000080;
  27764. end;
  27765. procedure TI2C4_I2C2ASTAT.clearIWCOL; inline;
  27766. begin
  27767. pTDefRegMap(@Self)^.clr := $00000080;
  27768. end;
  27769. procedure TI2C4_I2C2ASTAT.setIWCOL(thebits : TBits_1); inline;
  27770. begin
  27771. if thebits = 0 then
  27772. pTDefRegMap(@Self)^.clr := $00000080
  27773. else
  27774. pTDefRegMap(@Self)^.&set := $00000080;
  27775. end;
  27776. function TI2C4_I2C2ASTAT.getIWCOL : TBits_1; inline;
  27777. begin
  27778. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  27779. end;
  27780. procedure TI2C4_I2C2ASTAT.setADD10; inline;
  27781. begin
  27782. pTDefRegMap(@Self)^.&set := $00000100;
  27783. end;
  27784. procedure TI2C4_I2C2ASTAT.clearADD10; inline;
  27785. begin
  27786. pTDefRegMap(@Self)^.clr := $00000100;
  27787. end;
  27788. procedure TI2C4_I2C2ASTAT.setADD10(thebits : TBits_1); inline;
  27789. begin
  27790. if thebits = 0 then
  27791. pTDefRegMap(@Self)^.clr := $00000100
  27792. else
  27793. pTDefRegMap(@Self)^.&set := $00000100;
  27794. end;
  27795. function TI2C4_I2C2ASTAT.getADD10 : TBits_1; inline;
  27796. begin
  27797. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  27798. end;
  27799. procedure TI2C4_I2C2ASTAT.setGCSTAT; inline;
  27800. begin
  27801. pTDefRegMap(@Self)^.&set := $00000200;
  27802. end;
  27803. procedure TI2C4_I2C2ASTAT.clearGCSTAT; inline;
  27804. begin
  27805. pTDefRegMap(@Self)^.clr := $00000200;
  27806. end;
  27807. procedure TI2C4_I2C2ASTAT.setGCSTAT(thebits : TBits_1); inline;
  27808. begin
  27809. if thebits = 0 then
  27810. pTDefRegMap(@Self)^.clr := $00000200
  27811. else
  27812. pTDefRegMap(@Self)^.&set := $00000200;
  27813. end;
  27814. function TI2C4_I2C2ASTAT.getGCSTAT : TBits_1; inline;
  27815. begin
  27816. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  27817. end;
  27818. procedure TI2C4_I2C2ASTAT.setBCL; inline;
  27819. begin
  27820. pTDefRegMap(@Self)^.&set := $00000400;
  27821. end;
  27822. procedure TI2C4_I2C2ASTAT.clearBCL; inline;
  27823. begin
  27824. pTDefRegMap(@Self)^.clr := $00000400;
  27825. end;
  27826. procedure TI2C4_I2C2ASTAT.setBCL(thebits : TBits_1); inline;
  27827. begin
  27828. if thebits = 0 then
  27829. pTDefRegMap(@Self)^.clr := $00000400
  27830. else
  27831. pTDefRegMap(@Self)^.&set := $00000400;
  27832. end;
  27833. function TI2C4_I2C2ASTAT.getBCL : TBits_1; inline;
  27834. begin
  27835. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  27836. end;
  27837. procedure TI2C4_I2C2ASTAT.setTRSTAT; inline;
  27838. begin
  27839. pTDefRegMap(@Self)^.&set := $00004000;
  27840. end;
  27841. procedure TI2C4_I2C2ASTAT.clearTRSTAT; inline;
  27842. begin
  27843. pTDefRegMap(@Self)^.clr := $00004000;
  27844. end;
  27845. procedure TI2C4_I2C2ASTAT.setTRSTAT(thebits : TBits_1); inline;
  27846. begin
  27847. if thebits = 0 then
  27848. pTDefRegMap(@Self)^.clr := $00004000
  27849. else
  27850. pTDefRegMap(@Self)^.&set := $00004000;
  27851. end;
  27852. function TI2C4_I2C2ASTAT.getTRSTAT : TBits_1; inline;
  27853. begin
  27854. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  27855. end;
  27856. procedure TI2C4_I2C2ASTAT.setACKSTAT; inline;
  27857. begin
  27858. pTDefRegMap(@Self)^.&set := $00008000;
  27859. end;
  27860. procedure TI2C4_I2C2ASTAT.clearACKSTAT; inline;
  27861. begin
  27862. pTDefRegMap(@Self)^.clr := $00008000;
  27863. end;
  27864. procedure TI2C4_I2C2ASTAT.setACKSTAT(thebits : TBits_1); inline;
  27865. begin
  27866. if thebits = 0 then
  27867. pTDefRegMap(@Self)^.clr := $00008000
  27868. else
  27869. pTDefRegMap(@Self)^.&set := $00008000;
  27870. end;
  27871. function TI2C4_I2C2ASTAT.getACKSTAT : TBits_1; inline;
  27872. begin
  27873. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27874. end;
  27875. procedure TI2C4_I2C2ASTAT.setI2CPOV; inline;
  27876. begin
  27877. pTDefRegMap(@Self)^.&set := $00000040;
  27878. end;
  27879. procedure TI2C4_I2C2ASTAT.clearI2CPOV; inline;
  27880. begin
  27881. pTDefRegMap(@Self)^.clr := $00000040;
  27882. end;
  27883. procedure TI2C4_I2C2ASTAT.setI2CPOV(thebits : TBits_1); inline;
  27884. begin
  27885. if thebits = 0 then
  27886. pTDefRegMap(@Self)^.clr := $00000040
  27887. else
  27888. pTDefRegMap(@Self)^.&set := $00000040;
  27889. end;
  27890. function TI2C4_I2C2ASTAT.getI2CPOV : TBits_1; inline;
  27891. begin
  27892. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27893. end;
  27894. procedure TI2C4_I2C2ASTAT.setw(thebits : TBits_32); inline;
  27895. begin
  27896. pTDefRegMap(@Self)^.val := thebits;
  27897. end;
  27898. function TI2C4_I2C2ASTAT.getw : TBits_32; inline;
  27899. begin
  27900. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  27901. end;
  27902. procedure TI2C4_I2C4STAT.setTBF; inline;
  27903. begin
  27904. pTDefRegMap(@Self)^.&set := $00000001;
  27905. end;
  27906. procedure TI2C4_I2C4STAT.clearTBF; inline;
  27907. begin
  27908. pTDefRegMap(@Self)^.clr := $00000001;
  27909. end;
  27910. procedure TI2C4_I2C4STAT.setTBF(thebits : TBits_1); inline;
  27911. begin
  27912. if thebits = 0 then
  27913. pTDefRegMap(@Self)^.clr := $00000001
  27914. else
  27915. pTDefRegMap(@Self)^.&set := $00000001;
  27916. end;
  27917. function TI2C4_I2C4STAT.getTBF : TBits_1; inline;
  27918. begin
  27919. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  27920. end;
  27921. procedure TI2C4_I2C4STAT.setRBF; inline;
  27922. begin
  27923. pTDefRegMap(@Self)^.&set := $00000002;
  27924. end;
  27925. procedure TI2C4_I2C4STAT.clearRBF; inline;
  27926. begin
  27927. pTDefRegMap(@Self)^.clr := $00000002;
  27928. end;
  27929. procedure TI2C4_I2C4STAT.setRBF(thebits : TBits_1); inline;
  27930. begin
  27931. if thebits = 0 then
  27932. pTDefRegMap(@Self)^.clr := $00000002
  27933. else
  27934. pTDefRegMap(@Self)^.&set := $00000002;
  27935. end;
  27936. function TI2C4_I2C4STAT.getRBF : TBits_1; inline;
  27937. begin
  27938. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  27939. end;
  27940. procedure TI2C4_I2C4STAT.setR_W; inline;
  27941. begin
  27942. pTDefRegMap(@Self)^.&set := $00000004;
  27943. end;
  27944. procedure TI2C4_I2C4STAT.clearR_W; inline;
  27945. begin
  27946. pTDefRegMap(@Self)^.clr := $00000004;
  27947. end;
  27948. procedure TI2C4_I2C4STAT.setR_W(thebits : TBits_1); inline;
  27949. begin
  27950. if thebits = 0 then
  27951. pTDefRegMap(@Self)^.clr := $00000004
  27952. else
  27953. pTDefRegMap(@Self)^.&set := $00000004;
  27954. end;
  27955. function TI2C4_I2C4STAT.getR_W : TBits_1; inline;
  27956. begin
  27957. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  27958. end;
  27959. procedure TI2C4_I2C4STAT.setS; inline;
  27960. begin
  27961. pTDefRegMap(@Self)^.&set := $00000008;
  27962. end;
  27963. procedure TI2C4_I2C4STAT.clearS; inline;
  27964. begin
  27965. pTDefRegMap(@Self)^.clr := $00000008;
  27966. end;
  27967. procedure TI2C4_I2C4STAT.setS(thebits : TBits_1); inline;
  27968. begin
  27969. if thebits = 0 then
  27970. pTDefRegMap(@Self)^.clr := $00000008
  27971. else
  27972. pTDefRegMap(@Self)^.&set := $00000008;
  27973. end;
  27974. function TI2C4_I2C4STAT.getS : TBits_1; inline;
  27975. begin
  27976. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  27977. end;
  27978. procedure TI2C4_I2C4STAT.setP; inline;
  27979. begin
  27980. pTDefRegMap(@Self)^.&set := $00000010;
  27981. end;
  27982. procedure TI2C4_I2C4STAT.clearP; inline;
  27983. begin
  27984. pTDefRegMap(@Self)^.clr := $00000010;
  27985. end;
  27986. procedure TI2C4_I2C4STAT.setP(thebits : TBits_1); inline;
  27987. begin
  27988. if thebits = 0 then
  27989. pTDefRegMap(@Self)^.clr := $00000010
  27990. else
  27991. pTDefRegMap(@Self)^.&set := $00000010;
  27992. end;
  27993. function TI2C4_I2C4STAT.getP : TBits_1; inline;
  27994. begin
  27995. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  27996. end;
  27997. procedure TI2C4_I2C4STAT.setD_A; inline;
  27998. begin
  27999. pTDefRegMap(@Self)^.&set := $00000020;
  28000. end;
  28001. procedure TI2C4_I2C4STAT.clearD_A; inline;
  28002. begin
  28003. pTDefRegMap(@Self)^.clr := $00000020;
  28004. end;
  28005. procedure TI2C4_I2C4STAT.setD_A(thebits : TBits_1); inline;
  28006. begin
  28007. if thebits = 0 then
  28008. pTDefRegMap(@Self)^.clr := $00000020
  28009. else
  28010. pTDefRegMap(@Self)^.&set := $00000020;
  28011. end;
  28012. function TI2C4_I2C4STAT.getD_A : TBits_1; inline;
  28013. begin
  28014. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  28015. end;
  28016. procedure TI2C4_I2C4STAT.setI2COV; inline;
  28017. begin
  28018. pTDefRegMap(@Self)^.&set := $00000040;
  28019. end;
  28020. procedure TI2C4_I2C4STAT.clearI2COV; inline;
  28021. begin
  28022. pTDefRegMap(@Self)^.clr := $00000040;
  28023. end;
  28024. procedure TI2C4_I2C4STAT.setI2COV(thebits : TBits_1); inline;
  28025. begin
  28026. if thebits = 0 then
  28027. pTDefRegMap(@Self)^.clr := $00000040
  28028. else
  28029. pTDefRegMap(@Self)^.&set := $00000040;
  28030. end;
  28031. function TI2C4_I2C4STAT.getI2COV : TBits_1; inline;
  28032. begin
  28033. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28034. end;
  28035. procedure TI2C4_I2C4STAT.setIWCOL; inline;
  28036. begin
  28037. pTDefRegMap(@Self)^.&set := $00000080;
  28038. end;
  28039. procedure TI2C4_I2C4STAT.clearIWCOL; inline;
  28040. begin
  28041. pTDefRegMap(@Self)^.clr := $00000080;
  28042. end;
  28043. procedure TI2C4_I2C4STAT.setIWCOL(thebits : TBits_1); inline;
  28044. begin
  28045. if thebits = 0 then
  28046. pTDefRegMap(@Self)^.clr := $00000080
  28047. else
  28048. pTDefRegMap(@Self)^.&set := $00000080;
  28049. end;
  28050. function TI2C4_I2C4STAT.getIWCOL : TBits_1; inline;
  28051. begin
  28052. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  28053. end;
  28054. procedure TI2C4_I2C4STAT.setADD10; inline;
  28055. begin
  28056. pTDefRegMap(@Self)^.&set := $00000100;
  28057. end;
  28058. procedure TI2C4_I2C4STAT.clearADD10; inline;
  28059. begin
  28060. pTDefRegMap(@Self)^.clr := $00000100;
  28061. end;
  28062. procedure TI2C4_I2C4STAT.setADD10(thebits : TBits_1); inline;
  28063. begin
  28064. if thebits = 0 then
  28065. pTDefRegMap(@Self)^.clr := $00000100
  28066. else
  28067. pTDefRegMap(@Self)^.&set := $00000100;
  28068. end;
  28069. function TI2C4_I2C4STAT.getADD10 : TBits_1; inline;
  28070. begin
  28071. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  28072. end;
  28073. procedure TI2C4_I2C4STAT.setGCSTAT; inline;
  28074. begin
  28075. pTDefRegMap(@Self)^.&set := $00000200;
  28076. end;
  28077. procedure TI2C4_I2C4STAT.clearGCSTAT; inline;
  28078. begin
  28079. pTDefRegMap(@Self)^.clr := $00000200;
  28080. end;
  28081. procedure TI2C4_I2C4STAT.setGCSTAT(thebits : TBits_1); inline;
  28082. begin
  28083. if thebits = 0 then
  28084. pTDefRegMap(@Self)^.clr := $00000200
  28085. else
  28086. pTDefRegMap(@Self)^.&set := $00000200;
  28087. end;
  28088. function TI2C4_I2C4STAT.getGCSTAT : TBits_1; inline;
  28089. begin
  28090. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  28091. end;
  28092. procedure TI2C4_I2C4STAT.setBCL; inline;
  28093. begin
  28094. pTDefRegMap(@Self)^.&set := $00000400;
  28095. end;
  28096. procedure TI2C4_I2C4STAT.clearBCL; inline;
  28097. begin
  28098. pTDefRegMap(@Self)^.clr := $00000400;
  28099. end;
  28100. procedure TI2C4_I2C4STAT.setBCL(thebits : TBits_1); inline;
  28101. begin
  28102. if thebits = 0 then
  28103. pTDefRegMap(@Self)^.clr := $00000400
  28104. else
  28105. pTDefRegMap(@Self)^.&set := $00000400;
  28106. end;
  28107. function TI2C4_I2C4STAT.getBCL : TBits_1; inline;
  28108. begin
  28109. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  28110. end;
  28111. procedure TI2C4_I2C4STAT.setTRSTAT; inline;
  28112. begin
  28113. pTDefRegMap(@Self)^.&set := $00004000;
  28114. end;
  28115. procedure TI2C4_I2C4STAT.clearTRSTAT; inline;
  28116. begin
  28117. pTDefRegMap(@Self)^.clr := $00004000;
  28118. end;
  28119. procedure TI2C4_I2C4STAT.setTRSTAT(thebits : TBits_1); inline;
  28120. begin
  28121. if thebits = 0 then
  28122. pTDefRegMap(@Self)^.clr := $00004000
  28123. else
  28124. pTDefRegMap(@Self)^.&set := $00004000;
  28125. end;
  28126. function TI2C4_I2C4STAT.getTRSTAT : TBits_1; inline;
  28127. begin
  28128. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  28129. end;
  28130. procedure TI2C4_I2C4STAT.setACKSTAT; inline;
  28131. begin
  28132. pTDefRegMap(@Self)^.&set := $00008000;
  28133. end;
  28134. procedure TI2C4_I2C4STAT.clearACKSTAT; inline;
  28135. begin
  28136. pTDefRegMap(@Self)^.clr := $00008000;
  28137. end;
  28138. procedure TI2C4_I2C4STAT.setACKSTAT(thebits : TBits_1); inline;
  28139. begin
  28140. if thebits = 0 then
  28141. pTDefRegMap(@Self)^.clr := $00008000
  28142. else
  28143. pTDefRegMap(@Self)^.&set := $00008000;
  28144. end;
  28145. function TI2C4_I2C4STAT.getACKSTAT : TBits_1; inline;
  28146. begin
  28147. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28148. end;
  28149. procedure TI2C4_I2C4STAT.setI2CPOV; inline;
  28150. begin
  28151. pTDefRegMap(@Self)^.&set := $00000040;
  28152. end;
  28153. procedure TI2C4_I2C4STAT.clearI2CPOV; inline;
  28154. begin
  28155. pTDefRegMap(@Self)^.clr := $00000040;
  28156. end;
  28157. procedure TI2C4_I2C4STAT.setI2CPOV(thebits : TBits_1); inline;
  28158. begin
  28159. if thebits = 0 then
  28160. pTDefRegMap(@Self)^.clr := $00000040
  28161. else
  28162. pTDefRegMap(@Self)^.&set := $00000040;
  28163. end;
  28164. function TI2C4_I2C4STAT.getI2CPOV : TBits_1; inline;
  28165. begin
  28166. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28167. end;
  28168. procedure TI2C4_I2C4STAT.setw(thebits : TBits_32); inline;
  28169. begin
  28170. pTDefRegMap(@Self)^.val := thebits;
  28171. end;
  28172. function TI2C4_I2C4STAT.getw : TBits_32; inline;
  28173. begin
  28174. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  28175. end;
  28176. procedure TI2C3A_I2C3ACON.setSEN; inline;
  28177. begin
  28178. pTDefRegMap(@Self)^.&set := $00000001;
  28179. end;
  28180. procedure TI2C3A_I2C3ACON.clearSEN; inline;
  28181. begin
  28182. pTDefRegMap(@Self)^.clr := $00000001;
  28183. end;
  28184. procedure TI2C3A_I2C3ACON.setSEN(thebits : TBits_1); inline;
  28185. begin
  28186. if thebits = 0 then
  28187. pTDefRegMap(@Self)^.clr := $00000001
  28188. else
  28189. pTDefRegMap(@Self)^.&set := $00000001;
  28190. end;
  28191. function TI2C3A_I2C3ACON.getSEN : TBits_1; inline;
  28192. begin
  28193. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  28194. end;
  28195. procedure TI2C3A_I2C3ACON.setRSEN; inline;
  28196. begin
  28197. pTDefRegMap(@Self)^.&set := $00000002;
  28198. end;
  28199. procedure TI2C3A_I2C3ACON.clearRSEN; inline;
  28200. begin
  28201. pTDefRegMap(@Self)^.clr := $00000002;
  28202. end;
  28203. procedure TI2C3A_I2C3ACON.setRSEN(thebits : TBits_1); inline;
  28204. begin
  28205. if thebits = 0 then
  28206. pTDefRegMap(@Self)^.clr := $00000002
  28207. else
  28208. pTDefRegMap(@Self)^.&set := $00000002;
  28209. end;
  28210. function TI2C3A_I2C3ACON.getRSEN : TBits_1; inline;
  28211. begin
  28212. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  28213. end;
  28214. procedure TI2C3A_I2C3ACON.setPEN; inline;
  28215. begin
  28216. pTDefRegMap(@Self)^.&set := $00000004;
  28217. end;
  28218. procedure TI2C3A_I2C3ACON.clearPEN; inline;
  28219. begin
  28220. pTDefRegMap(@Self)^.clr := $00000004;
  28221. end;
  28222. procedure TI2C3A_I2C3ACON.setPEN(thebits : TBits_1); inline;
  28223. begin
  28224. if thebits = 0 then
  28225. pTDefRegMap(@Self)^.clr := $00000004
  28226. else
  28227. pTDefRegMap(@Self)^.&set := $00000004;
  28228. end;
  28229. function TI2C3A_I2C3ACON.getPEN : TBits_1; inline;
  28230. begin
  28231. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  28232. end;
  28233. procedure TI2C3A_I2C3ACON.setRCEN; inline;
  28234. begin
  28235. pTDefRegMap(@Self)^.&set := $00000008;
  28236. end;
  28237. procedure TI2C3A_I2C3ACON.clearRCEN; inline;
  28238. begin
  28239. pTDefRegMap(@Self)^.clr := $00000008;
  28240. end;
  28241. procedure TI2C3A_I2C3ACON.setRCEN(thebits : TBits_1); inline;
  28242. begin
  28243. if thebits = 0 then
  28244. pTDefRegMap(@Self)^.clr := $00000008
  28245. else
  28246. pTDefRegMap(@Self)^.&set := $00000008;
  28247. end;
  28248. function TI2C3A_I2C3ACON.getRCEN : TBits_1; inline;
  28249. begin
  28250. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  28251. end;
  28252. procedure TI2C3A_I2C3ACON.setACKEN; inline;
  28253. begin
  28254. pTDefRegMap(@Self)^.&set := $00000010;
  28255. end;
  28256. procedure TI2C3A_I2C3ACON.clearACKEN; inline;
  28257. begin
  28258. pTDefRegMap(@Self)^.clr := $00000010;
  28259. end;
  28260. procedure TI2C3A_I2C3ACON.setACKEN(thebits : TBits_1); inline;
  28261. begin
  28262. if thebits = 0 then
  28263. pTDefRegMap(@Self)^.clr := $00000010
  28264. else
  28265. pTDefRegMap(@Self)^.&set := $00000010;
  28266. end;
  28267. function TI2C3A_I2C3ACON.getACKEN : TBits_1; inline;
  28268. begin
  28269. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  28270. end;
  28271. procedure TI2C3A_I2C3ACON.setACKDT; inline;
  28272. begin
  28273. pTDefRegMap(@Self)^.&set := $00000020;
  28274. end;
  28275. procedure TI2C3A_I2C3ACON.clearACKDT; inline;
  28276. begin
  28277. pTDefRegMap(@Self)^.clr := $00000020;
  28278. end;
  28279. procedure TI2C3A_I2C3ACON.setACKDT(thebits : TBits_1); inline;
  28280. begin
  28281. if thebits = 0 then
  28282. pTDefRegMap(@Self)^.clr := $00000020
  28283. else
  28284. pTDefRegMap(@Self)^.&set := $00000020;
  28285. end;
  28286. function TI2C3A_I2C3ACON.getACKDT : TBits_1; inline;
  28287. begin
  28288. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  28289. end;
  28290. procedure TI2C3A_I2C3ACON.setSTREN; inline;
  28291. begin
  28292. pTDefRegMap(@Self)^.&set := $00000040;
  28293. end;
  28294. procedure TI2C3A_I2C3ACON.clearSTREN; inline;
  28295. begin
  28296. pTDefRegMap(@Self)^.clr := $00000040;
  28297. end;
  28298. procedure TI2C3A_I2C3ACON.setSTREN(thebits : TBits_1); inline;
  28299. begin
  28300. if thebits = 0 then
  28301. pTDefRegMap(@Self)^.clr := $00000040
  28302. else
  28303. pTDefRegMap(@Self)^.&set := $00000040;
  28304. end;
  28305. function TI2C3A_I2C3ACON.getSTREN : TBits_1; inline;
  28306. begin
  28307. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28308. end;
  28309. procedure TI2C3A_I2C3ACON.setGCEN; inline;
  28310. begin
  28311. pTDefRegMap(@Self)^.&set := $00000080;
  28312. end;
  28313. procedure TI2C3A_I2C3ACON.clearGCEN; inline;
  28314. begin
  28315. pTDefRegMap(@Self)^.clr := $00000080;
  28316. end;
  28317. procedure TI2C3A_I2C3ACON.setGCEN(thebits : TBits_1); inline;
  28318. begin
  28319. if thebits = 0 then
  28320. pTDefRegMap(@Self)^.clr := $00000080
  28321. else
  28322. pTDefRegMap(@Self)^.&set := $00000080;
  28323. end;
  28324. function TI2C3A_I2C3ACON.getGCEN : TBits_1; inline;
  28325. begin
  28326. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  28327. end;
  28328. procedure TI2C3A_I2C3ACON.setSMEN; inline;
  28329. begin
  28330. pTDefRegMap(@Self)^.&set := $00000100;
  28331. end;
  28332. procedure TI2C3A_I2C3ACON.clearSMEN; inline;
  28333. begin
  28334. pTDefRegMap(@Self)^.clr := $00000100;
  28335. end;
  28336. procedure TI2C3A_I2C3ACON.setSMEN(thebits : TBits_1); inline;
  28337. begin
  28338. if thebits = 0 then
  28339. pTDefRegMap(@Self)^.clr := $00000100
  28340. else
  28341. pTDefRegMap(@Self)^.&set := $00000100;
  28342. end;
  28343. function TI2C3A_I2C3ACON.getSMEN : TBits_1; inline;
  28344. begin
  28345. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  28346. end;
  28347. procedure TI2C3A_I2C3ACON.setDISSLW; inline;
  28348. begin
  28349. pTDefRegMap(@Self)^.&set := $00000200;
  28350. end;
  28351. procedure TI2C3A_I2C3ACON.clearDISSLW; inline;
  28352. begin
  28353. pTDefRegMap(@Self)^.clr := $00000200;
  28354. end;
  28355. procedure TI2C3A_I2C3ACON.setDISSLW(thebits : TBits_1); inline;
  28356. begin
  28357. if thebits = 0 then
  28358. pTDefRegMap(@Self)^.clr := $00000200
  28359. else
  28360. pTDefRegMap(@Self)^.&set := $00000200;
  28361. end;
  28362. function TI2C3A_I2C3ACON.getDISSLW : TBits_1; inline;
  28363. begin
  28364. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  28365. end;
  28366. procedure TI2C3A_I2C3ACON.setA10M; inline;
  28367. begin
  28368. pTDefRegMap(@Self)^.&set := $00000400;
  28369. end;
  28370. procedure TI2C3A_I2C3ACON.clearA10M; inline;
  28371. begin
  28372. pTDefRegMap(@Self)^.clr := $00000400;
  28373. end;
  28374. procedure TI2C3A_I2C3ACON.setA10M(thebits : TBits_1); inline;
  28375. begin
  28376. if thebits = 0 then
  28377. pTDefRegMap(@Self)^.clr := $00000400
  28378. else
  28379. pTDefRegMap(@Self)^.&set := $00000400;
  28380. end;
  28381. function TI2C3A_I2C3ACON.getA10M : TBits_1; inline;
  28382. begin
  28383. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  28384. end;
  28385. procedure TI2C3A_I2C3ACON.setSTRICT; inline;
  28386. begin
  28387. pTDefRegMap(@Self)^.&set := $00000800;
  28388. end;
  28389. procedure TI2C3A_I2C3ACON.clearSTRICT; inline;
  28390. begin
  28391. pTDefRegMap(@Self)^.clr := $00000800;
  28392. end;
  28393. procedure TI2C3A_I2C3ACON.setSTRICT(thebits : TBits_1); inline;
  28394. begin
  28395. if thebits = 0 then
  28396. pTDefRegMap(@Self)^.clr := $00000800
  28397. else
  28398. pTDefRegMap(@Self)^.&set := $00000800;
  28399. end;
  28400. function TI2C3A_I2C3ACON.getSTRICT : TBits_1; inline;
  28401. begin
  28402. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  28403. end;
  28404. procedure TI2C3A_I2C3ACON.setSCLREL; inline;
  28405. begin
  28406. pTDefRegMap(@Self)^.&set := $00001000;
  28407. end;
  28408. procedure TI2C3A_I2C3ACON.clearSCLREL; inline;
  28409. begin
  28410. pTDefRegMap(@Self)^.clr := $00001000;
  28411. end;
  28412. procedure TI2C3A_I2C3ACON.setSCLREL(thebits : TBits_1); inline;
  28413. begin
  28414. if thebits = 0 then
  28415. pTDefRegMap(@Self)^.clr := $00001000
  28416. else
  28417. pTDefRegMap(@Self)^.&set := $00001000;
  28418. end;
  28419. function TI2C3A_I2C3ACON.getSCLREL : TBits_1; inline;
  28420. begin
  28421. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  28422. end;
  28423. procedure TI2C3A_I2C3ACON.setSIDL; inline;
  28424. begin
  28425. pTDefRegMap(@Self)^.&set := $00002000;
  28426. end;
  28427. procedure TI2C3A_I2C3ACON.clearSIDL; inline;
  28428. begin
  28429. pTDefRegMap(@Self)^.clr := $00002000;
  28430. end;
  28431. procedure TI2C3A_I2C3ACON.setSIDL(thebits : TBits_1); inline;
  28432. begin
  28433. if thebits = 0 then
  28434. pTDefRegMap(@Self)^.clr := $00002000
  28435. else
  28436. pTDefRegMap(@Self)^.&set := $00002000;
  28437. end;
  28438. function TI2C3A_I2C3ACON.getSIDL : TBits_1; inline;
  28439. begin
  28440. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  28441. end;
  28442. procedure TI2C3A_I2C3ACON.setON; inline;
  28443. begin
  28444. pTDefRegMap(@Self)^.&set := $00008000;
  28445. end;
  28446. procedure TI2C3A_I2C3ACON.clearON; inline;
  28447. begin
  28448. pTDefRegMap(@Self)^.clr := $00008000;
  28449. end;
  28450. procedure TI2C3A_I2C3ACON.setON(thebits : TBits_1); inline;
  28451. begin
  28452. if thebits = 0 then
  28453. pTDefRegMap(@Self)^.clr := $00008000
  28454. else
  28455. pTDefRegMap(@Self)^.&set := $00008000;
  28456. end;
  28457. function TI2C3A_I2C3ACON.getON : TBits_1; inline;
  28458. begin
  28459. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28460. end;
  28461. procedure TI2C3A_I2C3ACON.setIPMIEN; inline;
  28462. begin
  28463. pTDefRegMap(@Self)^.&set := $00000800;
  28464. end;
  28465. procedure TI2C3A_I2C3ACON.clearIPMIEN; inline;
  28466. begin
  28467. pTDefRegMap(@Self)^.clr := $00000800;
  28468. end;
  28469. procedure TI2C3A_I2C3ACON.setIPMIEN(thebits : TBits_1); inline;
  28470. begin
  28471. if thebits = 0 then
  28472. pTDefRegMap(@Self)^.clr := $00000800
  28473. else
  28474. pTDefRegMap(@Self)^.&set := $00000800;
  28475. end;
  28476. function TI2C3A_I2C3ACON.getIPMIEN : TBits_1; inline;
  28477. begin
  28478. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  28479. end;
  28480. procedure TI2C3A_I2C3ACON.setI2CSIDL; inline;
  28481. begin
  28482. pTDefRegMap(@Self)^.&set := $00002000;
  28483. end;
  28484. procedure TI2C3A_I2C3ACON.clearI2CSIDL; inline;
  28485. begin
  28486. pTDefRegMap(@Self)^.clr := $00002000;
  28487. end;
  28488. procedure TI2C3A_I2C3ACON.setI2CSIDL(thebits : TBits_1); inline;
  28489. begin
  28490. if thebits = 0 then
  28491. pTDefRegMap(@Self)^.clr := $00002000
  28492. else
  28493. pTDefRegMap(@Self)^.&set := $00002000;
  28494. end;
  28495. function TI2C3A_I2C3ACON.getI2CSIDL : TBits_1; inline;
  28496. begin
  28497. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  28498. end;
  28499. procedure TI2C3A_I2C3ACON.setI2CEN; inline;
  28500. begin
  28501. pTDefRegMap(@Self)^.&set := $00008000;
  28502. end;
  28503. procedure TI2C3A_I2C3ACON.clearI2CEN; inline;
  28504. begin
  28505. pTDefRegMap(@Self)^.clr := $00008000;
  28506. end;
  28507. procedure TI2C3A_I2C3ACON.setI2CEN(thebits : TBits_1); inline;
  28508. begin
  28509. if thebits = 0 then
  28510. pTDefRegMap(@Self)^.clr := $00008000
  28511. else
  28512. pTDefRegMap(@Self)^.&set := $00008000;
  28513. end;
  28514. function TI2C3A_I2C3ACON.getI2CEN : TBits_1; inline;
  28515. begin
  28516. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28517. end;
  28518. procedure TI2C3A_I2C3ACON.setw(thebits : TBits_32); inline;
  28519. begin
  28520. pTDefRegMap(@Self)^.val := thebits;
  28521. end;
  28522. function TI2C3A_I2C3ACON.getw : TBits_32; inline;
  28523. begin
  28524. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  28525. end;
  28526. procedure TI2C3A_I2C5CON.setSEN; inline;
  28527. begin
  28528. pTDefRegMap(@Self)^.&set := $00000001;
  28529. end;
  28530. procedure TI2C3A_I2C5CON.clearSEN; inline;
  28531. begin
  28532. pTDefRegMap(@Self)^.clr := $00000001;
  28533. end;
  28534. procedure TI2C3A_I2C5CON.setSEN(thebits : TBits_1); inline;
  28535. begin
  28536. if thebits = 0 then
  28537. pTDefRegMap(@Self)^.clr := $00000001
  28538. else
  28539. pTDefRegMap(@Self)^.&set := $00000001;
  28540. end;
  28541. function TI2C3A_I2C5CON.getSEN : TBits_1; inline;
  28542. begin
  28543. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  28544. end;
  28545. procedure TI2C3A_I2C5CON.setRSEN; inline;
  28546. begin
  28547. pTDefRegMap(@Self)^.&set := $00000002;
  28548. end;
  28549. procedure TI2C3A_I2C5CON.clearRSEN; inline;
  28550. begin
  28551. pTDefRegMap(@Self)^.clr := $00000002;
  28552. end;
  28553. procedure TI2C3A_I2C5CON.setRSEN(thebits : TBits_1); inline;
  28554. begin
  28555. if thebits = 0 then
  28556. pTDefRegMap(@Self)^.clr := $00000002
  28557. else
  28558. pTDefRegMap(@Self)^.&set := $00000002;
  28559. end;
  28560. function TI2C3A_I2C5CON.getRSEN : TBits_1; inline;
  28561. begin
  28562. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  28563. end;
  28564. procedure TI2C3A_I2C5CON.setPEN; inline;
  28565. begin
  28566. pTDefRegMap(@Self)^.&set := $00000004;
  28567. end;
  28568. procedure TI2C3A_I2C5CON.clearPEN; inline;
  28569. begin
  28570. pTDefRegMap(@Self)^.clr := $00000004;
  28571. end;
  28572. procedure TI2C3A_I2C5CON.setPEN(thebits : TBits_1); inline;
  28573. begin
  28574. if thebits = 0 then
  28575. pTDefRegMap(@Self)^.clr := $00000004
  28576. else
  28577. pTDefRegMap(@Self)^.&set := $00000004;
  28578. end;
  28579. function TI2C3A_I2C5CON.getPEN : TBits_1; inline;
  28580. begin
  28581. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  28582. end;
  28583. procedure TI2C3A_I2C5CON.setRCEN; inline;
  28584. begin
  28585. pTDefRegMap(@Self)^.&set := $00000008;
  28586. end;
  28587. procedure TI2C3A_I2C5CON.clearRCEN; inline;
  28588. begin
  28589. pTDefRegMap(@Self)^.clr := $00000008;
  28590. end;
  28591. procedure TI2C3A_I2C5CON.setRCEN(thebits : TBits_1); inline;
  28592. begin
  28593. if thebits = 0 then
  28594. pTDefRegMap(@Self)^.clr := $00000008
  28595. else
  28596. pTDefRegMap(@Self)^.&set := $00000008;
  28597. end;
  28598. function TI2C3A_I2C5CON.getRCEN : TBits_1; inline;
  28599. begin
  28600. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  28601. end;
  28602. procedure TI2C3A_I2C5CON.setACKEN; inline;
  28603. begin
  28604. pTDefRegMap(@Self)^.&set := $00000010;
  28605. end;
  28606. procedure TI2C3A_I2C5CON.clearACKEN; inline;
  28607. begin
  28608. pTDefRegMap(@Self)^.clr := $00000010;
  28609. end;
  28610. procedure TI2C3A_I2C5CON.setACKEN(thebits : TBits_1); inline;
  28611. begin
  28612. if thebits = 0 then
  28613. pTDefRegMap(@Self)^.clr := $00000010
  28614. else
  28615. pTDefRegMap(@Self)^.&set := $00000010;
  28616. end;
  28617. function TI2C3A_I2C5CON.getACKEN : TBits_1; inline;
  28618. begin
  28619. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  28620. end;
  28621. procedure TI2C3A_I2C5CON.setACKDT; inline;
  28622. begin
  28623. pTDefRegMap(@Self)^.&set := $00000020;
  28624. end;
  28625. procedure TI2C3A_I2C5CON.clearACKDT; inline;
  28626. begin
  28627. pTDefRegMap(@Self)^.clr := $00000020;
  28628. end;
  28629. procedure TI2C3A_I2C5CON.setACKDT(thebits : TBits_1); inline;
  28630. begin
  28631. if thebits = 0 then
  28632. pTDefRegMap(@Self)^.clr := $00000020
  28633. else
  28634. pTDefRegMap(@Self)^.&set := $00000020;
  28635. end;
  28636. function TI2C3A_I2C5CON.getACKDT : TBits_1; inline;
  28637. begin
  28638. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  28639. end;
  28640. procedure TI2C3A_I2C5CON.setSTREN; inline;
  28641. begin
  28642. pTDefRegMap(@Self)^.&set := $00000040;
  28643. end;
  28644. procedure TI2C3A_I2C5CON.clearSTREN; inline;
  28645. begin
  28646. pTDefRegMap(@Self)^.clr := $00000040;
  28647. end;
  28648. procedure TI2C3A_I2C5CON.setSTREN(thebits : TBits_1); inline;
  28649. begin
  28650. if thebits = 0 then
  28651. pTDefRegMap(@Self)^.clr := $00000040
  28652. else
  28653. pTDefRegMap(@Self)^.&set := $00000040;
  28654. end;
  28655. function TI2C3A_I2C5CON.getSTREN : TBits_1; inline;
  28656. begin
  28657. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28658. end;
  28659. procedure TI2C3A_I2C5CON.setGCEN; inline;
  28660. begin
  28661. pTDefRegMap(@Self)^.&set := $00000080;
  28662. end;
  28663. procedure TI2C3A_I2C5CON.clearGCEN; inline;
  28664. begin
  28665. pTDefRegMap(@Self)^.clr := $00000080;
  28666. end;
  28667. procedure TI2C3A_I2C5CON.setGCEN(thebits : TBits_1); inline;
  28668. begin
  28669. if thebits = 0 then
  28670. pTDefRegMap(@Self)^.clr := $00000080
  28671. else
  28672. pTDefRegMap(@Self)^.&set := $00000080;
  28673. end;
  28674. function TI2C3A_I2C5CON.getGCEN : TBits_1; inline;
  28675. begin
  28676. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  28677. end;
  28678. procedure TI2C3A_I2C5CON.setSMEN; inline;
  28679. begin
  28680. pTDefRegMap(@Self)^.&set := $00000100;
  28681. end;
  28682. procedure TI2C3A_I2C5CON.clearSMEN; inline;
  28683. begin
  28684. pTDefRegMap(@Self)^.clr := $00000100;
  28685. end;
  28686. procedure TI2C3A_I2C5CON.setSMEN(thebits : TBits_1); inline;
  28687. begin
  28688. if thebits = 0 then
  28689. pTDefRegMap(@Self)^.clr := $00000100
  28690. else
  28691. pTDefRegMap(@Self)^.&set := $00000100;
  28692. end;
  28693. function TI2C3A_I2C5CON.getSMEN : TBits_1; inline;
  28694. begin
  28695. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  28696. end;
  28697. procedure TI2C3A_I2C5CON.setDISSLW; inline;
  28698. begin
  28699. pTDefRegMap(@Self)^.&set := $00000200;
  28700. end;
  28701. procedure TI2C3A_I2C5CON.clearDISSLW; inline;
  28702. begin
  28703. pTDefRegMap(@Self)^.clr := $00000200;
  28704. end;
  28705. procedure TI2C3A_I2C5CON.setDISSLW(thebits : TBits_1); inline;
  28706. begin
  28707. if thebits = 0 then
  28708. pTDefRegMap(@Self)^.clr := $00000200
  28709. else
  28710. pTDefRegMap(@Self)^.&set := $00000200;
  28711. end;
  28712. function TI2C3A_I2C5CON.getDISSLW : TBits_1; inline;
  28713. begin
  28714. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  28715. end;
  28716. procedure TI2C3A_I2C5CON.setA10M; inline;
  28717. begin
  28718. pTDefRegMap(@Self)^.&set := $00000400;
  28719. end;
  28720. procedure TI2C3A_I2C5CON.clearA10M; inline;
  28721. begin
  28722. pTDefRegMap(@Self)^.clr := $00000400;
  28723. end;
  28724. procedure TI2C3A_I2C5CON.setA10M(thebits : TBits_1); inline;
  28725. begin
  28726. if thebits = 0 then
  28727. pTDefRegMap(@Self)^.clr := $00000400
  28728. else
  28729. pTDefRegMap(@Self)^.&set := $00000400;
  28730. end;
  28731. function TI2C3A_I2C5CON.getA10M : TBits_1; inline;
  28732. begin
  28733. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  28734. end;
  28735. procedure TI2C3A_I2C5CON.setSTRICT; inline;
  28736. begin
  28737. pTDefRegMap(@Self)^.&set := $00000800;
  28738. end;
  28739. procedure TI2C3A_I2C5CON.clearSTRICT; inline;
  28740. begin
  28741. pTDefRegMap(@Self)^.clr := $00000800;
  28742. end;
  28743. procedure TI2C3A_I2C5CON.setSTRICT(thebits : TBits_1); inline;
  28744. begin
  28745. if thebits = 0 then
  28746. pTDefRegMap(@Self)^.clr := $00000800
  28747. else
  28748. pTDefRegMap(@Self)^.&set := $00000800;
  28749. end;
  28750. function TI2C3A_I2C5CON.getSTRICT : TBits_1; inline;
  28751. begin
  28752. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  28753. end;
  28754. procedure TI2C3A_I2C5CON.setSCLREL; inline;
  28755. begin
  28756. pTDefRegMap(@Self)^.&set := $00001000;
  28757. end;
  28758. procedure TI2C3A_I2C5CON.clearSCLREL; inline;
  28759. begin
  28760. pTDefRegMap(@Self)^.clr := $00001000;
  28761. end;
  28762. procedure TI2C3A_I2C5CON.setSCLREL(thebits : TBits_1); inline;
  28763. begin
  28764. if thebits = 0 then
  28765. pTDefRegMap(@Self)^.clr := $00001000
  28766. else
  28767. pTDefRegMap(@Self)^.&set := $00001000;
  28768. end;
  28769. function TI2C3A_I2C5CON.getSCLREL : TBits_1; inline;
  28770. begin
  28771. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  28772. end;
  28773. procedure TI2C3A_I2C5CON.setSIDL; inline;
  28774. begin
  28775. pTDefRegMap(@Self)^.&set := $00002000;
  28776. end;
  28777. procedure TI2C3A_I2C5CON.clearSIDL; inline;
  28778. begin
  28779. pTDefRegMap(@Self)^.clr := $00002000;
  28780. end;
  28781. procedure TI2C3A_I2C5CON.setSIDL(thebits : TBits_1); inline;
  28782. begin
  28783. if thebits = 0 then
  28784. pTDefRegMap(@Self)^.clr := $00002000
  28785. else
  28786. pTDefRegMap(@Self)^.&set := $00002000;
  28787. end;
  28788. function TI2C3A_I2C5CON.getSIDL : TBits_1; inline;
  28789. begin
  28790. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  28791. end;
  28792. procedure TI2C3A_I2C5CON.setON; inline;
  28793. begin
  28794. pTDefRegMap(@Self)^.&set := $00008000;
  28795. end;
  28796. procedure TI2C3A_I2C5CON.clearON; inline;
  28797. begin
  28798. pTDefRegMap(@Self)^.clr := $00008000;
  28799. end;
  28800. procedure TI2C3A_I2C5CON.setON(thebits : TBits_1); inline;
  28801. begin
  28802. if thebits = 0 then
  28803. pTDefRegMap(@Self)^.clr := $00008000
  28804. else
  28805. pTDefRegMap(@Self)^.&set := $00008000;
  28806. end;
  28807. function TI2C3A_I2C5CON.getON : TBits_1; inline;
  28808. begin
  28809. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28810. end;
  28811. procedure TI2C3A_I2C5CON.setIPMIEN; inline;
  28812. begin
  28813. pTDefRegMap(@Self)^.&set := $00000800;
  28814. end;
  28815. procedure TI2C3A_I2C5CON.clearIPMIEN; inline;
  28816. begin
  28817. pTDefRegMap(@Self)^.clr := $00000800;
  28818. end;
  28819. procedure TI2C3A_I2C5CON.setIPMIEN(thebits : TBits_1); inline;
  28820. begin
  28821. if thebits = 0 then
  28822. pTDefRegMap(@Self)^.clr := $00000800
  28823. else
  28824. pTDefRegMap(@Self)^.&set := $00000800;
  28825. end;
  28826. function TI2C3A_I2C5CON.getIPMIEN : TBits_1; inline;
  28827. begin
  28828. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  28829. end;
  28830. procedure TI2C3A_I2C5CON.setI2CSIDL; inline;
  28831. begin
  28832. pTDefRegMap(@Self)^.&set := $00002000;
  28833. end;
  28834. procedure TI2C3A_I2C5CON.clearI2CSIDL; inline;
  28835. begin
  28836. pTDefRegMap(@Self)^.clr := $00002000;
  28837. end;
  28838. procedure TI2C3A_I2C5CON.setI2CSIDL(thebits : TBits_1); inline;
  28839. begin
  28840. if thebits = 0 then
  28841. pTDefRegMap(@Self)^.clr := $00002000
  28842. else
  28843. pTDefRegMap(@Self)^.&set := $00002000;
  28844. end;
  28845. function TI2C3A_I2C5CON.getI2CSIDL : TBits_1; inline;
  28846. begin
  28847. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  28848. end;
  28849. procedure TI2C3A_I2C5CON.setI2CEN; inline;
  28850. begin
  28851. pTDefRegMap(@Self)^.&set := $00008000;
  28852. end;
  28853. procedure TI2C3A_I2C5CON.clearI2CEN; inline;
  28854. begin
  28855. pTDefRegMap(@Self)^.clr := $00008000;
  28856. end;
  28857. procedure TI2C3A_I2C5CON.setI2CEN(thebits : TBits_1); inline;
  28858. begin
  28859. if thebits = 0 then
  28860. pTDefRegMap(@Self)^.clr := $00008000
  28861. else
  28862. pTDefRegMap(@Self)^.&set := $00008000;
  28863. end;
  28864. function TI2C3A_I2C5CON.getI2CEN : TBits_1; inline;
  28865. begin
  28866. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28867. end;
  28868. procedure TI2C3A_I2C5CON.setw(thebits : TBits_32); inline;
  28869. begin
  28870. pTDefRegMap(@Self)^.val := thebits;
  28871. end;
  28872. function TI2C3A_I2C5CON.getw : TBits_32; inline;
  28873. begin
  28874. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  28875. end;
  28876. procedure TI2C3A_I2C3ASTAT.setTBF; inline;
  28877. begin
  28878. pTDefRegMap(@Self)^.&set := $00000001;
  28879. end;
  28880. procedure TI2C3A_I2C3ASTAT.clearTBF; inline;
  28881. begin
  28882. pTDefRegMap(@Self)^.clr := $00000001;
  28883. end;
  28884. procedure TI2C3A_I2C3ASTAT.setTBF(thebits : TBits_1); inline;
  28885. begin
  28886. if thebits = 0 then
  28887. pTDefRegMap(@Self)^.clr := $00000001
  28888. else
  28889. pTDefRegMap(@Self)^.&set := $00000001;
  28890. end;
  28891. function TI2C3A_I2C3ASTAT.getTBF : TBits_1; inline;
  28892. begin
  28893. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  28894. end;
  28895. procedure TI2C3A_I2C3ASTAT.setRBF; inline;
  28896. begin
  28897. pTDefRegMap(@Self)^.&set := $00000002;
  28898. end;
  28899. procedure TI2C3A_I2C3ASTAT.clearRBF; inline;
  28900. begin
  28901. pTDefRegMap(@Self)^.clr := $00000002;
  28902. end;
  28903. procedure TI2C3A_I2C3ASTAT.setRBF(thebits : TBits_1); inline;
  28904. begin
  28905. if thebits = 0 then
  28906. pTDefRegMap(@Self)^.clr := $00000002
  28907. else
  28908. pTDefRegMap(@Self)^.&set := $00000002;
  28909. end;
  28910. function TI2C3A_I2C3ASTAT.getRBF : TBits_1; inline;
  28911. begin
  28912. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  28913. end;
  28914. procedure TI2C3A_I2C3ASTAT.setR_W; inline;
  28915. begin
  28916. pTDefRegMap(@Self)^.&set := $00000004;
  28917. end;
  28918. procedure TI2C3A_I2C3ASTAT.clearR_W; inline;
  28919. begin
  28920. pTDefRegMap(@Self)^.clr := $00000004;
  28921. end;
  28922. procedure TI2C3A_I2C3ASTAT.setR_W(thebits : TBits_1); inline;
  28923. begin
  28924. if thebits = 0 then
  28925. pTDefRegMap(@Self)^.clr := $00000004
  28926. else
  28927. pTDefRegMap(@Self)^.&set := $00000004;
  28928. end;
  28929. function TI2C3A_I2C3ASTAT.getR_W : TBits_1; inline;
  28930. begin
  28931. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  28932. end;
  28933. procedure TI2C3A_I2C3ASTAT.setS; inline;
  28934. begin
  28935. pTDefRegMap(@Self)^.&set := $00000008;
  28936. end;
  28937. procedure TI2C3A_I2C3ASTAT.clearS; inline;
  28938. begin
  28939. pTDefRegMap(@Self)^.clr := $00000008;
  28940. end;
  28941. procedure TI2C3A_I2C3ASTAT.setS(thebits : TBits_1); inline;
  28942. begin
  28943. if thebits = 0 then
  28944. pTDefRegMap(@Self)^.clr := $00000008
  28945. else
  28946. pTDefRegMap(@Self)^.&set := $00000008;
  28947. end;
  28948. function TI2C3A_I2C3ASTAT.getS : TBits_1; inline;
  28949. begin
  28950. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  28951. end;
  28952. procedure TI2C3A_I2C3ASTAT.setP; inline;
  28953. begin
  28954. pTDefRegMap(@Self)^.&set := $00000010;
  28955. end;
  28956. procedure TI2C3A_I2C3ASTAT.clearP; inline;
  28957. begin
  28958. pTDefRegMap(@Self)^.clr := $00000010;
  28959. end;
  28960. procedure TI2C3A_I2C3ASTAT.setP(thebits : TBits_1); inline;
  28961. begin
  28962. if thebits = 0 then
  28963. pTDefRegMap(@Self)^.clr := $00000010
  28964. else
  28965. pTDefRegMap(@Self)^.&set := $00000010;
  28966. end;
  28967. function TI2C3A_I2C3ASTAT.getP : TBits_1; inline;
  28968. begin
  28969. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  28970. end;
  28971. procedure TI2C3A_I2C3ASTAT.setD_A; inline;
  28972. begin
  28973. pTDefRegMap(@Self)^.&set := $00000020;
  28974. end;
  28975. procedure TI2C3A_I2C3ASTAT.clearD_A; inline;
  28976. begin
  28977. pTDefRegMap(@Self)^.clr := $00000020;
  28978. end;
  28979. procedure TI2C3A_I2C3ASTAT.setD_A(thebits : TBits_1); inline;
  28980. begin
  28981. if thebits = 0 then
  28982. pTDefRegMap(@Self)^.clr := $00000020
  28983. else
  28984. pTDefRegMap(@Self)^.&set := $00000020;
  28985. end;
  28986. function TI2C3A_I2C3ASTAT.getD_A : TBits_1; inline;
  28987. begin
  28988. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  28989. end;
  28990. procedure TI2C3A_I2C3ASTAT.setI2COV; inline;
  28991. begin
  28992. pTDefRegMap(@Self)^.&set := $00000040;
  28993. end;
  28994. procedure TI2C3A_I2C3ASTAT.clearI2COV; inline;
  28995. begin
  28996. pTDefRegMap(@Self)^.clr := $00000040;
  28997. end;
  28998. procedure TI2C3A_I2C3ASTAT.setI2COV(thebits : TBits_1); inline;
  28999. begin
  29000. if thebits = 0 then
  29001. pTDefRegMap(@Self)^.clr := $00000040
  29002. else
  29003. pTDefRegMap(@Self)^.&set := $00000040;
  29004. end;
  29005. function TI2C3A_I2C3ASTAT.getI2COV : TBits_1; inline;
  29006. begin
  29007. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29008. end;
  29009. procedure TI2C3A_I2C3ASTAT.setIWCOL; inline;
  29010. begin
  29011. pTDefRegMap(@Self)^.&set := $00000080;
  29012. end;
  29013. procedure TI2C3A_I2C3ASTAT.clearIWCOL; inline;
  29014. begin
  29015. pTDefRegMap(@Self)^.clr := $00000080;
  29016. end;
  29017. procedure TI2C3A_I2C3ASTAT.setIWCOL(thebits : TBits_1); inline;
  29018. begin
  29019. if thebits = 0 then
  29020. pTDefRegMap(@Self)^.clr := $00000080
  29021. else
  29022. pTDefRegMap(@Self)^.&set := $00000080;
  29023. end;
  29024. function TI2C3A_I2C3ASTAT.getIWCOL : TBits_1; inline;
  29025. begin
  29026. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  29027. end;
  29028. procedure TI2C3A_I2C3ASTAT.setADD10; inline;
  29029. begin
  29030. pTDefRegMap(@Self)^.&set := $00000100;
  29031. end;
  29032. procedure TI2C3A_I2C3ASTAT.clearADD10; inline;
  29033. begin
  29034. pTDefRegMap(@Self)^.clr := $00000100;
  29035. end;
  29036. procedure TI2C3A_I2C3ASTAT.setADD10(thebits : TBits_1); inline;
  29037. begin
  29038. if thebits = 0 then
  29039. pTDefRegMap(@Self)^.clr := $00000100
  29040. else
  29041. pTDefRegMap(@Self)^.&set := $00000100;
  29042. end;
  29043. function TI2C3A_I2C3ASTAT.getADD10 : TBits_1; inline;
  29044. begin
  29045. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  29046. end;
  29047. procedure TI2C3A_I2C3ASTAT.setGCSTAT; inline;
  29048. begin
  29049. pTDefRegMap(@Self)^.&set := $00000200;
  29050. end;
  29051. procedure TI2C3A_I2C3ASTAT.clearGCSTAT; inline;
  29052. begin
  29053. pTDefRegMap(@Self)^.clr := $00000200;
  29054. end;
  29055. procedure TI2C3A_I2C3ASTAT.setGCSTAT(thebits : TBits_1); inline;
  29056. begin
  29057. if thebits = 0 then
  29058. pTDefRegMap(@Self)^.clr := $00000200
  29059. else
  29060. pTDefRegMap(@Self)^.&set := $00000200;
  29061. end;
  29062. function TI2C3A_I2C3ASTAT.getGCSTAT : TBits_1; inline;
  29063. begin
  29064. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  29065. end;
  29066. procedure TI2C3A_I2C3ASTAT.setBCL; inline;
  29067. begin
  29068. pTDefRegMap(@Self)^.&set := $00000400;
  29069. end;
  29070. procedure TI2C3A_I2C3ASTAT.clearBCL; inline;
  29071. begin
  29072. pTDefRegMap(@Self)^.clr := $00000400;
  29073. end;
  29074. procedure TI2C3A_I2C3ASTAT.setBCL(thebits : TBits_1); inline;
  29075. begin
  29076. if thebits = 0 then
  29077. pTDefRegMap(@Self)^.clr := $00000400
  29078. else
  29079. pTDefRegMap(@Self)^.&set := $00000400;
  29080. end;
  29081. function TI2C3A_I2C3ASTAT.getBCL : TBits_1; inline;
  29082. begin
  29083. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  29084. end;
  29085. procedure TI2C3A_I2C3ASTAT.setTRSTAT; inline;
  29086. begin
  29087. pTDefRegMap(@Self)^.&set := $00004000;
  29088. end;
  29089. procedure TI2C3A_I2C3ASTAT.clearTRSTAT; inline;
  29090. begin
  29091. pTDefRegMap(@Self)^.clr := $00004000;
  29092. end;
  29093. procedure TI2C3A_I2C3ASTAT.setTRSTAT(thebits : TBits_1); inline;
  29094. begin
  29095. if thebits = 0 then
  29096. pTDefRegMap(@Self)^.clr := $00004000
  29097. else
  29098. pTDefRegMap(@Self)^.&set := $00004000;
  29099. end;
  29100. function TI2C3A_I2C3ASTAT.getTRSTAT : TBits_1; inline;
  29101. begin
  29102. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  29103. end;
  29104. procedure TI2C3A_I2C3ASTAT.setACKSTAT; inline;
  29105. begin
  29106. pTDefRegMap(@Self)^.&set := $00008000;
  29107. end;
  29108. procedure TI2C3A_I2C3ASTAT.clearACKSTAT; inline;
  29109. begin
  29110. pTDefRegMap(@Self)^.clr := $00008000;
  29111. end;
  29112. procedure TI2C3A_I2C3ASTAT.setACKSTAT(thebits : TBits_1); inline;
  29113. begin
  29114. if thebits = 0 then
  29115. pTDefRegMap(@Self)^.clr := $00008000
  29116. else
  29117. pTDefRegMap(@Self)^.&set := $00008000;
  29118. end;
  29119. function TI2C3A_I2C3ASTAT.getACKSTAT : TBits_1; inline;
  29120. begin
  29121. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  29122. end;
  29123. procedure TI2C3A_I2C3ASTAT.setI2CPOV; inline;
  29124. begin
  29125. pTDefRegMap(@Self)^.&set := $00000040;
  29126. end;
  29127. procedure TI2C3A_I2C3ASTAT.clearI2CPOV; inline;
  29128. begin
  29129. pTDefRegMap(@Self)^.clr := $00000040;
  29130. end;
  29131. procedure TI2C3A_I2C3ASTAT.setI2CPOV(thebits : TBits_1); inline;
  29132. begin
  29133. if thebits = 0 then
  29134. pTDefRegMap(@Self)^.clr := $00000040
  29135. else
  29136. pTDefRegMap(@Self)^.&set := $00000040;
  29137. end;
  29138. function TI2C3A_I2C3ASTAT.getI2CPOV : TBits_1; inline;
  29139. begin
  29140. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29141. end;
  29142. procedure TI2C3A_I2C3ASTAT.setw(thebits : TBits_32); inline;
  29143. begin
  29144. pTDefRegMap(@Self)^.val := thebits;
  29145. end;
  29146. function TI2C3A_I2C3ASTAT.getw : TBits_32; inline;
  29147. begin
  29148. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  29149. end;
  29150. procedure TI2C3A_I2C5STAT.setTBF; inline;
  29151. begin
  29152. pTDefRegMap(@Self)^.&set := $00000001;
  29153. end;
  29154. procedure TI2C3A_I2C5STAT.clearTBF; inline;
  29155. begin
  29156. pTDefRegMap(@Self)^.clr := $00000001;
  29157. end;
  29158. procedure TI2C3A_I2C5STAT.setTBF(thebits : TBits_1); inline;
  29159. begin
  29160. if thebits = 0 then
  29161. pTDefRegMap(@Self)^.clr := $00000001
  29162. else
  29163. pTDefRegMap(@Self)^.&set := $00000001;
  29164. end;
  29165. function TI2C3A_I2C5STAT.getTBF : TBits_1; inline;
  29166. begin
  29167. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  29168. end;
  29169. procedure TI2C3A_I2C5STAT.setRBF; inline;
  29170. begin
  29171. pTDefRegMap(@Self)^.&set := $00000002;
  29172. end;
  29173. procedure TI2C3A_I2C5STAT.clearRBF; inline;
  29174. begin
  29175. pTDefRegMap(@Self)^.clr := $00000002;
  29176. end;
  29177. procedure TI2C3A_I2C5STAT.setRBF(thebits : TBits_1); inline;
  29178. begin
  29179. if thebits = 0 then
  29180. pTDefRegMap(@Self)^.clr := $00000002
  29181. else
  29182. pTDefRegMap(@Self)^.&set := $00000002;
  29183. end;
  29184. function TI2C3A_I2C5STAT.getRBF : TBits_1; inline;
  29185. begin
  29186. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  29187. end;
  29188. procedure TI2C3A_I2C5STAT.setR_W; inline;
  29189. begin
  29190. pTDefRegMap(@Self)^.&set := $00000004;
  29191. end;
  29192. procedure TI2C3A_I2C5STAT.clearR_W; inline;
  29193. begin
  29194. pTDefRegMap(@Self)^.clr := $00000004;
  29195. end;
  29196. procedure TI2C3A_I2C5STAT.setR_W(thebits : TBits_1); inline;
  29197. begin
  29198. if thebits = 0 then
  29199. pTDefRegMap(@Self)^.clr := $00000004
  29200. else
  29201. pTDefRegMap(@Self)^.&set := $00000004;
  29202. end;
  29203. function TI2C3A_I2C5STAT.getR_W : TBits_1; inline;
  29204. begin
  29205. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  29206. end;
  29207. procedure TI2C3A_I2C5STAT.setS; inline;
  29208. begin
  29209. pTDefRegMap(@Self)^.&set := $00000008;
  29210. end;
  29211. procedure TI2C3A_I2C5STAT.clearS; inline;
  29212. begin
  29213. pTDefRegMap(@Self)^.clr := $00000008;
  29214. end;
  29215. procedure TI2C3A_I2C5STAT.setS(thebits : TBits_1); inline;
  29216. begin
  29217. if thebits = 0 then
  29218. pTDefRegMap(@Self)^.clr := $00000008
  29219. else
  29220. pTDefRegMap(@Self)^.&set := $00000008;
  29221. end;
  29222. function TI2C3A_I2C5STAT.getS : TBits_1; inline;
  29223. begin
  29224. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  29225. end;
  29226. procedure TI2C3A_I2C5STAT.setP; inline;
  29227. begin
  29228. pTDefRegMap(@Self)^.&set := $00000010;
  29229. end;
  29230. procedure TI2C3A_I2C5STAT.clearP; inline;
  29231. begin
  29232. pTDefRegMap(@Self)^.clr := $00000010;
  29233. end;
  29234. procedure TI2C3A_I2C5STAT.setP(thebits : TBits_1); inline;
  29235. begin
  29236. if thebits = 0 then
  29237. pTDefRegMap(@Self)^.clr := $00000010
  29238. else
  29239. pTDefRegMap(@Self)^.&set := $00000010;
  29240. end;
  29241. function TI2C3A_I2C5STAT.getP : TBits_1; inline;
  29242. begin
  29243. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  29244. end;
  29245. procedure TI2C3A_I2C5STAT.setD_A; inline;
  29246. begin
  29247. pTDefRegMap(@Self)^.&set := $00000020;
  29248. end;
  29249. procedure TI2C3A_I2C5STAT.clearD_A; inline;
  29250. begin
  29251. pTDefRegMap(@Self)^.clr := $00000020;
  29252. end;
  29253. procedure TI2C3A_I2C5STAT.setD_A(thebits : TBits_1); inline;
  29254. begin
  29255. if thebits = 0 then
  29256. pTDefRegMap(@Self)^.clr := $00000020
  29257. else
  29258. pTDefRegMap(@Self)^.&set := $00000020;
  29259. end;
  29260. function TI2C3A_I2C5STAT.getD_A : TBits_1; inline;
  29261. begin
  29262. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  29263. end;
  29264. procedure TI2C3A_I2C5STAT.setI2COV; inline;
  29265. begin
  29266. pTDefRegMap(@Self)^.&set := $00000040;
  29267. end;
  29268. procedure TI2C3A_I2C5STAT.clearI2COV; inline;
  29269. begin
  29270. pTDefRegMap(@Self)^.clr := $00000040;
  29271. end;
  29272. procedure TI2C3A_I2C5STAT.setI2COV(thebits : TBits_1); inline;
  29273. begin
  29274. if thebits = 0 then
  29275. pTDefRegMap(@Self)^.clr := $00000040
  29276. else
  29277. pTDefRegMap(@Self)^.&set := $00000040;
  29278. end;
  29279. function TI2C3A_I2C5STAT.getI2COV : TBits_1; inline;
  29280. begin
  29281. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29282. end;
  29283. procedure TI2C3A_I2C5STAT.setIWCOL; inline;
  29284. begin
  29285. pTDefRegMap(@Self)^.&set := $00000080;
  29286. end;
  29287. procedure TI2C3A_I2C5STAT.clearIWCOL; inline;
  29288. begin
  29289. pTDefRegMap(@Self)^.clr := $00000080;
  29290. end;
  29291. procedure TI2C3A_I2C5STAT.setIWCOL(thebits : TBits_1); inline;
  29292. begin
  29293. if thebits = 0 then
  29294. pTDefRegMap(@Self)^.clr := $00000080
  29295. else
  29296. pTDefRegMap(@Self)^.&set := $00000080;
  29297. end;
  29298. function TI2C3A_I2C5STAT.getIWCOL : TBits_1; inline;
  29299. begin
  29300. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  29301. end;
  29302. procedure TI2C3A_I2C5STAT.setADD10; inline;
  29303. begin
  29304. pTDefRegMap(@Self)^.&set := $00000100;
  29305. end;
  29306. procedure TI2C3A_I2C5STAT.clearADD10; inline;
  29307. begin
  29308. pTDefRegMap(@Self)^.clr := $00000100;
  29309. end;
  29310. procedure TI2C3A_I2C5STAT.setADD10(thebits : TBits_1); inline;
  29311. begin
  29312. if thebits = 0 then
  29313. pTDefRegMap(@Self)^.clr := $00000100
  29314. else
  29315. pTDefRegMap(@Self)^.&set := $00000100;
  29316. end;
  29317. function TI2C3A_I2C5STAT.getADD10 : TBits_1; inline;
  29318. begin
  29319. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  29320. end;
  29321. procedure TI2C3A_I2C5STAT.setGCSTAT; inline;
  29322. begin
  29323. pTDefRegMap(@Self)^.&set := $00000200;
  29324. end;
  29325. procedure TI2C3A_I2C5STAT.clearGCSTAT; inline;
  29326. begin
  29327. pTDefRegMap(@Self)^.clr := $00000200;
  29328. end;
  29329. procedure TI2C3A_I2C5STAT.setGCSTAT(thebits : TBits_1); inline;
  29330. begin
  29331. if thebits = 0 then
  29332. pTDefRegMap(@Self)^.clr := $00000200
  29333. else
  29334. pTDefRegMap(@Self)^.&set := $00000200;
  29335. end;
  29336. function TI2C3A_I2C5STAT.getGCSTAT : TBits_1; inline;
  29337. begin
  29338. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  29339. end;
  29340. procedure TI2C3A_I2C5STAT.setBCL; inline;
  29341. begin
  29342. pTDefRegMap(@Self)^.&set := $00000400;
  29343. end;
  29344. procedure TI2C3A_I2C5STAT.clearBCL; inline;
  29345. begin
  29346. pTDefRegMap(@Self)^.clr := $00000400;
  29347. end;
  29348. procedure TI2C3A_I2C5STAT.setBCL(thebits : TBits_1); inline;
  29349. begin
  29350. if thebits = 0 then
  29351. pTDefRegMap(@Self)^.clr := $00000400
  29352. else
  29353. pTDefRegMap(@Self)^.&set := $00000400;
  29354. end;
  29355. function TI2C3A_I2C5STAT.getBCL : TBits_1; inline;
  29356. begin
  29357. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  29358. end;
  29359. procedure TI2C3A_I2C5STAT.setTRSTAT; inline;
  29360. begin
  29361. pTDefRegMap(@Self)^.&set := $00004000;
  29362. end;
  29363. procedure TI2C3A_I2C5STAT.clearTRSTAT; inline;
  29364. begin
  29365. pTDefRegMap(@Self)^.clr := $00004000;
  29366. end;
  29367. procedure TI2C3A_I2C5STAT.setTRSTAT(thebits : TBits_1); inline;
  29368. begin
  29369. if thebits = 0 then
  29370. pTDefRegMap(@Self)^.clr := $00004000
  29371. else
  29372. pTDefRegMap(@Self)^.&set := $00004000;
  29373. end;
  29374. function TI2C3A_I2C5STAT.getTRSTAT : TBits_1; inline;
  29375. begin
  29376. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  29377. end;
  29378. procedure TI2C3A_I2C5STAT.setACKSTAT; inline;
  29379. begin
  29380. pTDefRegMap(@Self)^.&set := $00008000;
  29381. end;
  29382. procedure TI2C3A_I2C5STAT.clearACKSTAT; inline;
  29383. begin
  29384. pTDefRegMap(@Self)^.clr := $00008000;
  29385. end;
  29386. procedure TI2C3A_I2C5STAT.setACKSTAT(thebits : TBits_1); inline;
  29387. begin
  29388. if thebits = 0 then
  29389. pTDefRegMap(@Self)^.clr := $00008000
  29390. else
  29391. pTDefRegMap(@Self)^.&set := $00008000;
  29392. end;
  29393. function TI2C3A_I2C5STAT.getACKSTAT : TBits_1; inline;
  29394. begin
  29395. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  29396. end;
  29397. procedure TI2C3A_I2C5STAT.setI2CPOV; inline;
  29398. begin
  29399. pTDefRegMap(@Self)^.&set := $00000040;
  29400. end;
  29401. procedure TI2C3A_I2C5STAT.clearI2CPOV; inline;
  29402. begin
  29403. pTDefRegMap(@Self)^.clr := $00000040;
  29404. end;
  29405. procedure TI2C3A_I2C5STAT.setI2CPOV(thebits : TBits_1); inline;
  29406. begin
  29407. if thebits = 0 then
  29408. pTDefRegMap(@Self)^.clr := $00000040
  29409. else
  29410. pTDefRegMap(@Self)^.&set := $00000040;
  29411. end;
  29412. function TI2C3A_I2C5STAT.getI2CPOV : TBits_1; inline;
  29413. begin
  29414. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29415. end;
  29416. procedure TI2C3A_I2C5STAT.setw(thebits : TBits_32); inline;
  29417. begin
  29418. pTDefRegMap(@Self)^.val := thebits;
  29419. end;
  29420. function TI2C3A_I2C5STAT.getw : TBits_32; inline;
  29421. begin
  29422. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  29423. end;
  29424. procedure TI2C1_I2C1CON.setSEN; inline;
  29425. begin
  29426. pTDefRegMap(@Self)^.&set := $00000001;
  29427. end;
  29428. procedure TI2C1_I2C1CON.clearSEN; inline;
  29429. begin
  29430. pTDefRegMap(@Self)^.clr := $00000001;
  29431. end;
  29432. procedure TI2C1_I2C1CON.setSEN(thebits : TBits_1); inline;
  29433. begin
  29434. if thebits = 0 then
  29435. pTDefRegMap(@Self)^.clr := $00000001
  29436. else
  29437. pTDefRegMap(@Self)^.&set := $00000001;
  29438. end;
  29439. function TI2C1_I2C1CON.getSEN : TBits_1; inline;
  29440. begin
  29441. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  29442. end;
  29443. procedure TI2C1_I2C1CON.setRSEN; inline;
  29444. begin
  29445. pTDefRegMap(@Self)^.&set := $00000002;
  29446. end;
  29447. procedure TI2C1_I2C1CON.clearRSEN; inline;
  29448. begin
  29449. pTDefRegMap(@Self)^.clr := $00000002;
  29450. end;
  29451. procedure TI2C1_I2C1CON.setRSEN(thebits : TBits_1); inline;
  29452. begin
  29453. if thebits = 0 then
  29454. pTDefRegMap(@Self)^.clr := $00000002
  29455. else
  29456. pTDefRegMap(@Self)^.&set := $00000002;
  29457. end;
  29458. function TI2C1_I2C1CON.getRSEN : TBits_1; inline;
  29459. begin
  29460. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  29461. end;
  29462. procedure TI2C1_I2C1CON.setPEN; inline;
  29463. begin
  29464. pTDefRegMap(@Self)^.&set := $00000004;
  29465. end;
  29466. procedure TI2C1_I2C1CON.clearPEN; inline;
  29467. begin
  29468. pTDefRegMap(@Self)^.clr := $00000004;
  29469. end;
  29470. procedure TI2C1_I2C1CON.setPEN(thebits : TBits_1); inline;
  29471. begin
  29472. if thebits = 0 then
  29473. pTDefRegMap(@Self)^.clr := $00000004
  29474. else
  29475. pTDefRegMap(@Self)^.&set := $00000004;
  29476. end;
  29477. function TI2C1_I2C1CON.getPEN : TBits_1; inline;
  29478. begin
  29479. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  29480. end;
  29481. procedure TI2C1_I2C1CON.setRCEN; inline;
  29482. begin
  29483. pTDefRegMap(@Self)^.&set := $00000008;
  29484. end;
  29485. procedure TI2C1_I2C1CON.clearRCEN; inline;
  29486. begin
  29487. pTDefRegMap(@Self)^.clr := $00000008;
  29488. end;
  29489. procedure TI2C1_I2C1CON.setRCEN(thebits : TBits_1); inline;
  29490. begin
  29491. if thebits = 0 then
  29492. pTDefRegMap(@Self)^.clr := $00000008
  29493. else
  29494. pTDefRegMap(@Self)^.&set := $00000008;
  29495. end;
  29496. function TI2C1_I2C1CON.getRCEN : TBits_1; inline;
  29497. begin
  29498. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  29499. end;
  29500. procedure TI2C1_I2C1CON.setACKEN; inline;
  29501. begin
  29502. pTDefRegMap(@Self)^.&set := $00000010;
  29503. end;
  29504. procedure TI2C1_I2C1CON.clearACKEN; inline;
  29505. begin
  29506. pTDefRegMap(@Self)^.clr := $00000010;
  29507. end;
  29508. procedure TI2C1_I2C1CON.setACKEN(thebits : TBits_1); inline;
  29509. begin
  29510. if thebits = 0 then
  29511. pTDefRegMap(@Self)^.clr := $00000010
  29512. else
  29513. pTDefRegMap(@Self)^.&set := $00000010;
  29514. end;
  29515. function TI2C1_I2C1CON.getACKEN : TBits_1; inline;
  29516. begin
  29517. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  29518. end;
  29519. procedure TI2C1_I2C1CON.setACKDT; inline;
  29520. begin
  29521. pTDefRegMap(@Self)^.&set := $00000020;
  29522. end;
  29523. procedure TI2C1_I2C1CON.clearACKDT; inline;
  29524. begin
  29525. pTDefRegMap(@Self)^.clr := $00000020;
  29526. end;
  29527. procedure TI2C1_I2C1CON.setACKDT(thebits : TBits_1); inline;
  29528. begin
  29529. if thebits = 0 then
  29530. pTDefRegMap(@Self)^.clr := $00000020
  29531. else
  29532. pTDefRegMap(@Self)^.&set := $00000020;
  29533. end;
  29534. function TI2C1_I2C1CON.getACKDT : TBits_1; inline;
  29535. begin
  29536. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  29537. end;
  29538. procedure TI2C1_I2C1CON.setSTREN; inline;
  29539. begin
  29540. pTDefRegMap(@Self)^.&set := $00000040;
  29541. end;
  29542. procedure TI2C1_I2C1CON.clearSTREN; inline;
  29543. begin
  29544. pTDefRegMap(@Self)^.clr := $00000040;
  29545. end;
  29546. procedure TI2C1_I2C1CON.setSTREN(thebits : TBits_1); inline;
  29547. begin
  29548. if thebits = 0 then
  29549. pTDefRegMap(@Self)^.clr := $00000040
  29550. else
  29551. pTDefRegMap(@Self)^.&set := $00000040;
  29552. end;
  29553. function TI2C1_I2C1CON.getSTREN : TBits_1; inline;
  29554. begin
  29555. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29556. end;
  29557. procedure TI2C1_I2C1CON.setGCEN; inline;
  29558. begin
  29559. pTDefRegMap(@Self)^.&set := $00000080;
  29560. end;
  29561. procedure TI2C1_I2C1CON.clearGCEN; inline;
  29562. begin
  29563. pTDefRegMap(@Self)^.clr := $00000080;
  29564. end;
  29565. procedure TI2C1_I2C1CON.setGCEN(thebits : TBits_1); inline;
  29566. begin
  29567. if thebits = 0 then
  29568. pTDefRegMap(@Self)^.clr := $00000080
  29569. else
  29570. pTDefRegMap(@Self)^.&set := $00000080;
  29571. end;
  29572. function TI2C1_I2C1CON.getGCEN : TBits_1; inline;
  29573. begin
  29574. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  29575. end;
  29576. procedure TI2C1_I2C1CON.setSMEN; inline;
  29577. begin
  29578. pTDefRegMap(@Self)^.&set := $00000100;
  29579. end;
  29580. procedure TI2C1_I2C1CON.clearSMEN; inline;
  29581. begin
  29582. pTDefRegMap(@Self)^.clr := $00000100;
  29583. end;
  29584. procedure TI2C1_I2C1CON.setSMEN(thebits : TBits_1); inline;
  29585. begin
  29586. if thebits = 0 then
  29587. pTDefRegMap(@Self)^.clr := $00000100
  29588. else
  29589. pTDefRegMap(@Self)^.&set := $00000100;
  29590. end;
  29591. function TI2C1_I2C1CON.getSMEN : TBits_1; inline;
  29592. begin
  29593. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  29594. end;
  29595. procedure TI2C1_I2C1CON.setDISSLW; inline;
  29596. begin
  29597. pTDefRegMap(@Self)^.&set := $00000200;
  29598. end;
  29599. procedure TI2C1_I2C1CON.clearDISSLW; inline;
  29600. begin
  29601. pTDefRegMap(@Self)^.clr := $00000200;
  29602. end;
  29603. procedure TI2C1_I2C1CON.setDISSLW(thebits : TBits_1); inline;
  29604. begin
  29605. if thebits = 0 then
  29606. pTDefRegMap(@Self)^.clr := $00000200
  29607. else
  29608. pTDefRegMap(@Self)^.&set := $00000200;
  29609. end;
  29610. function TI2C1_I2C1CON.getDISSLW : TBits_1; inline;
  29611. begin
  29612. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  29613. end;
  29614. procedure TI2C1_I2C1CON.setA10M; inline;
  29615. begin
  29616. pTDefRegMap(@Self)^.&set := $00000400;
  29617. end;
  29618. procedure TI2C1_I2C1CON.clearA10M; inline;
  29619. begin
  29620. pTDefRegMap(@Self)^.clr := $00000400;
  29621. end;
  29622. procedure TI2C1_I2C1CON.setA10M(thebits : TBits_1); inline;
  29623. begin
  29624. if thebits = 0 then
  29625. pTDefRegMap(@Self)^.clr := $00000400
  29626. else
  29627. pTDefRegMap(@Self)^.&set := $00000400;
  29628. end;
  29629. function TI2C1_I2C1CON.getA10M : TBits_1; inline;
  29630. begin
  29631. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  29632. end;
  29633. procedure TI2C1_I2C1CON.setSTRICT; inline;
  29634. begin
  29635. pTDefRegMap(@Self)^.&set := $00000800;
  29636. end;
  29637. procedure TI2C1_I2C1CON.clearSTRICT; inline;
  29638. begin
  29639. pTDefRegMap(@Self)^.clr := $00000800;
  29640. end;
  29641. procedure TI2C1_I2C1CON.setSTRICT(thebits : TBits_1); inline;
  29642. begin
  29643. if thebits = 0 then
  29644. pTDefRegMap(@Self)^.clr := $00000800
  29645. else
  29646. pTDefRegMap(@Self)^.&set := $00000800;
  29647. end;
  29648. function TI2C1_I2C1CON.getSTRICT : TBits_1; inline;
  29649. begin
  29650. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  29651. end;
  29652. procedure TI2C1_I2C1CON.setSCLREL; inline;
  29653. begin
  29654. pTDefRegMap(@Self)^.&set := $00001000;
  29655. end;
  29656. procedure TI2C1_I2C1CON.clearSCLREL; inline;
  29657. begin
  29658. pTDefRegMap(@Self)^.clr := $00001000;
  29659. end;
  29660. procedure TI2C1_I2C1CON.setSCLREL(thebits : TBits_1); inline;
  29661. begin
  29662. if thebits = 0 then
  29663. pTDefRegMap(@Self)^.clr := $00001000
  29664. else
  29665. pTDefRegMap(@Self)^.&set := $00001000;
  29666. end;
  29667. function TI2C1_I2C1CON.getSCLREL : TBits_1; inline;
  29668. begin
  29669. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  29670. end;
  29671. procedure TI2C1_I2C1CON.setSIDL; inline;
  29672. begin
  29673. pTDefRegMap(@Self)^.&set := $00002000;
  29674. end;
  29675. procedure TI2C1_I2C1CON.clearSIDL; inline;
  29676. begin
  29677. pTDefRegMap(@Self)^.clr := $00002000;
  29678. end;
  29679. procedure TI2C1_I2C1CON.setSIDL(thebits : TBits_1); inline;
  29680. begin
  29681. if thebits = 0 then
  29682. pTDefRegMap(@Self)^.clr := $00002000
  29683. else
  29684. pTDefRegMap(@Self)^.&set := $00002000;
  29685. end;
  29686. function TI2C1_I2C1CON.getSIDL : TBits_1; inline;
  29687. begin
  29688. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  29689. end;
  29690. procedure TI2C1_I2C1CON.setON; inline;
  29691. begin
  29692. pTDefRegMap(@Self)^.&set := $00008000;
  29693. end;
  29694. procedure TI2C1_I2C1CON.clearON; inline;
  29695. begin
  29696. pTDefRegMap(@Self)^.clr := $00008000;
  29697. end;
  29698. procedure TI2C1_I2C1CON.setON(thebits : TBits_1); inline;
  29699. begin
  29700. if thebits = 0 then
  29701. pTDefRegMap(@Self)^.clr := $00008000
  29702. else
  29703. pTDefRegMap(@Self)^.&set := $00008000;
  29704. end;
  29705. function TI2C1_I2C1CON.getON : TBits_1; inline;
  29706. begin
  29707. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  29708. end;
  29709. procedure TI2C1_I2C1CON.setIPMIEN; inline;
  29710. begin
  29711. pTDefRegMap(@Self)^.&set := $00000800;
  29712. end;
  29713. procedure TI2C1_I2C1CON.clearIPMIEN; inline;
  29714. begin
  29715. pTDefRegMap(@Self)^.clr := $00000800;
  29716. end;
  29717. procedure TI2C1_I2C1CON.setIPMIEN(thebits : TBits_1); inline;
  29718. begin
  29719. if thebits = 0 then
  29720. pTDefRegMap(@Self)^.clr := $00000800
  29721. else
  29722. pTDefRegMap(@Self)^.&set := $00000800;
  29723. end;
  29724. function TI2C1_I2C1CON.getIPMIEN : TBits_1; inline;
  29725. begin
  29726. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  29727. end;
  29728. procedure TI2C1_I2C1CON.setI2CSIDL; inline;
  29729. begin
  29730. pTDefRegMap(@Self)^.&set := $00002000;
  29731. end;
  29732. procedure TI2C1_I2C1CON.clearI2CSIDL; inline;
  29733. begin
  29734. pTDefRegMap(@Self)^.clr := $00002000;
  29735. end;
  29736. procedure TI2C1_I2C1CON.setI2CSIDL(thebits : TBits_1); inline;
  29737. begin
  29738. if thebits = 0 then
  29739. pTDefRegMap(@Self)^.clr := $00002000
  29740. else
  29741. pTDefRegMap(@Self)^.&set := $00002000;
  29742. end;
  29743. function TI2C1_I2C1CON.getI2CSIDL : TBits_1; inline;
  29744. begin
  29745. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  29746. end;
  29747. procedure TI2C1_I2C1CON.setI2CEN; inline;
  29748. begin
  29749. pTDefRegMap(@Self)^.&set := $00008000;
  29750. end;
  29751. procedure TI2C1_I2C1CON.clearI2CEN; inline;
  29752. begin
  29753. pTDefRegMap(@Self)^.clr := $00008000;
  29754. end;
  29755. procedure TI2C1_I2C1CON.setI2CEN(thebits : TBits_1); inline;
  29756. begin
  29757. if thebits = 0 then
  29758. pTDefRegMap(@Self)^.clr := $00008000
  29759. else
  29760. pTDefRegMap(@Self)^.&set := $00008000;
  29761. end;
  29762. function TI2C1_I2C1CON.getI2CEN : TBits_1; inline;
  29763. begin
  29764. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  29765. end;
  29766. procedure TI2C1_I2C1CON.setw(thebits : TBits_32); inline;
  29767. begin
  29768. pTDefRegMap(@Self)^.val := thebits;
  29769. end;
  29770. function TI2C1_I2C1CON.getw : TBits_32; inline;
  29771. begin
  29772. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  29773. end;
  29774. procedure TI2C1_I2C1STAT.setTBF; inline;
  29775. begin
  29776. pTDefRegMap(@Self)^.&set := $00000001;
  29777. end;
  29778. procedure TI2C1_I2C1STAT.clearTBF; inline;
  29779. begin
  29780. pTDefRegMap(@Self)^.clr := $00000001;
  29781. end;
  29782. procedure TI2C1_I2C1STAT.setTBF(thebits : TBits_1); inline;
  29783. begin
  29784. if thebits = 0 then
  29785. pTDefRegMap(@Self)^.clr := $00000001
  29786. else
  29787. pTDefRegMap(@Self)^.&set := $00000001;
  29788. end;
  29789. function TI2C1_I2C1STAT.getTBF : TBits_1; inline;
  29790. begin
  29791. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  29792. end;
  29793. procedure TI2C1_I2C1STAT.setRBF; inline;
  29794. begin
  29795. pTDefRegMap(@Self)^.&set := $00000002;
  29796. end;
  29797. procedure TI2C1_I2C1STAT.clearRBF; inline;
  29798. begin
  29799. pTDefRegMap(@Self)^.clr := $00000002;
  29800. end;
  29801. procedure TI2C1_I2C1STAT.setRBF(thebits : TBits_1); inline;
  29802. begin
  29803. if thebits = 0 then
  29804. pTDefRegMap(@Self)^.clr := $00000002
  29805. else
  29806. pTDefRegMap(@Self)^.&set := $00000002;
  29807. end;
  29808. function TI2C1_I2C1STAT.getRBF : TBits_1; inline;
  29809. begin
  29810. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  29811. end;
  29812. procedure TI2C1_I2C1STAT.setR_W; inline;
  29813. begin
  29814. pTDefRegMap(@Self)^.&set := $00000004;
  29815. end;
  29816. procedure TI2C1_I2C1STAT.clearR_W; inline;
  29817. begin
  29818. pTDefRegMap(@Self)^.clr := $00000004;
  29819. end;
  29820. procedure TI2C1_I2C1STAT.setR_W(thebits : TBits_1); inline;
  29821. begin
  29822. if thebits = 0 then
  29823. pTDefRegMap(@Self)^.clr := $00000004
  29824. else
  29825. pTDefRegMap(@Self)^.&set := $00000004;
  29826. end;
  29827. function TI2C1_I2C1STAT.getR_W : TBits_1; inline;
  29828. begin
  29829. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  29830. end;
  29831. procedure TI2C1_I2C1STAT.setS; inline;
  29832. begin
  29833. pTDefRegMap(@Self)^.&set := $00000008;
  29834. end;
  29835. procedure TI2C1_I2C1STAT.clearS; inline;
  29836. begin
  29837. pTDefRegMap(@Self)^.clr := $00000008;
  29838. end;
  29839. procedure TI2C1_I2C1STAT.setS(thebits : TBits_1); inline;
  29840. begin
  29841. if thebits = 0 then
  29842. pTDefRegMap(@Self)^.clr := $00000008
  29843. else
  29844. pTDefRegMap(@Self)^.&set := $00000008;
  29845. end;
  29846. function TI2C1_I2C1STAT.getS : TBits_1; inline;
  29847. begin
  29848. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  29849. end;
  29850. procedure TI2C1_I2C1STAT.setP; inline;
  29851. begin
  29852. pTDefRegMap(@Self)^.&set := $00000010;
  29853. end;
  29854. procedure TI2C1_I2C1STAT.clearP; inline;
  29855. begin
  29856. pTDefRegMap(@Self)^.clr := $00000010;
  29857. end;
  29858. procedure TI2C1_I2C1STAT.setP(thebits : TBits_1); inline;
  29859. begin
  29860. if thebits = 0 then
  29861. pTDefRegMap(@Self)^.clr := $00000010
  29862. else
  29863. pTDefRegMap(@Self)^.&set := $00000010;
  29864. end;
  29865. function TI2C1_I2C1STAT.getP : TBits_1; inline;
  29866. begin
  29867. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  29868. end;
  29869. procedure TI2C1_I2C1STAT.setD_A; inline;
  29870. begin
  29871. pTDefRegMap(@Self)^.&set := $00000020;
  29872. end;
  29873. procedure TI2C1_I2C1STAT.clearD_A; inline;
  29874. begin
  29875. pTDefRegMap(@Self)^.clr := $00000020;
  29876. end;
  29877. procedure TI2C1_I2C1STAT.setD_A(thebits : TBits_1); inline;
  29878. begin
  29879. if thebits = 0 then
  29880. pTDefRegMap(@Self)^.clr := $00000020
  29881. else
  29882. pTDefRegMap(@Self)^.&set := $00000020;
  29883. end;
  29884. function TI2C1_I2C1STAT.getD_A : TBits_1; inline;
  29885. begin
  29886. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  29887. end;
  29888. procedure TI2C1_I2C1STAT.setI2COV; inline;
  29889. begin
  29890. pTDefRegMap(@Self)^.&set := $00000040;
  29891. end;
  29892. procedure TI2C1_I2C1STAT.clearI2COV; inline;
  29893. begin
  29894. pTDefRegMap(@Self)^.clr := $00000040;
  29895. end;
  29896. procedure TI2C1_I2C1STAT.setI2COV(thebits : TBits_1); inline;
  29897. begin
  29898. if thebits = 0 then
  29899. pTDefRegMap(@Self)^.clr := $00000040
  29900. else
  29901. pTDefRegMap(@Self)^.&set := $00000040;
  29902. end;
  29903. function TI2C1_I2C1STAT.getI2COV : TBits_1; inline;
  29904. begin
  29905. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29906. end;
  29907. procedure TI2C1_I2C1STAT.setIWCOL; inline;
  29908. begin
  29909. pTDefRegMap(@Self)^.&set := $00000080;
  29910. end;
  29911. procedure TI2C1_I2C1STAT.clearIWCOL; inline;
  29912. begin
  29913. pTDefRegMap(@Self)^.clr := $00000080;
  29914. end;
  29915. procedure TI2C1_I2C1STAT.setIWCOL(thebits : TBits_1); inline;
  29916. begin
  29917. if thebits = 0 then
  29918. pTDefRegMap(@Self)^.clr := $00000080
  29919. else
  29920. pTDefRegMap(@Self)^.&set := $00000080;
  29921. end;
  29922. function TI2C1_I2C1STAT.getIWCOL : TBits_1; inline;
  29923. begin
  29924. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  29925. end;
  29926. procedure TI2C1_I2C1STAT.setADD10; inline;
  29927. begin
  29928. pTDefRegMap(@Self)^.&set := $00000100;
  29929. end;
  29930. procedure TI2C1_I2C1STAT.clearADD10; inline;
  29931. begin
  29932. pTDefRegMap(@Self)^.clr := $00000100;
  29933. end;
  29934. procedure TI2C1_I2C1STAT.setADD10(thebits : TBits_1); inline;
  29935. begin
  29936. if thebits = 0 then
  29937. pTDefRegMap(@Self)^.clr := $00000100
  29938. else
  29939. pTDefRegMap(@Self)^.&set := $00000100;
  29940. end;
  29941. function TI2C1_I2C1STAT.getADD10 : TBits_1; inline;
  29942. begin
  29943. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  29944. end;
  29945. procedure TI2C1_I2C1STAT.setGCSTAT; inline;
  29946. begin
  29947. pTDefRegMap(@Self)^.&set := $00000200;
  29948. end;
  29949. procedure TI2C1_I2C1STAT.clearGCSTAT; inline;
  29950. begin
  29951. pTDefRegMap(@Self)^.clr := $00000200;
  29952. end;
  29953. procedure TI2C1_I2C1STAT.setGCSTAT(thebits : TBits_1); inline;
  29954. begin
  29955. if thebits = 0 then
  29956. pTDefRegMap(@Self)^.clr := $00000200
  29957. else
  29958. pTDefRegMap(@Self)^.&set := $00000200;
  29959. end;
  29960. function TI2C1_I2C1STAT.getGCSTAT : TBits_1; inline;
  29961. begin
  29962. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  29963. end;
  29964. procedure TI2C1_I2C1STAT.setBCL; inline;
  29965. begin
  29966. pTDefRegMap(@Self)^.&set := $00000400;
  29967. end;
  29968. procedure TI2C1_I2C1STAT.clearBCL; inline;
  29969. begin
  29970. pTDefRegMap(@Self)^.clr := $00000400;
  29971. end;
  29972. procedure TI2C1_I2C1STAT.setBCL(thebits : TBits_1); inline;
  29973. begin
  29974. if thebits = 0 then
  29975. pTDefRegMap(@Self)^.clr := $00000400
  29976. else
  29977. pTDefRegMap(@Self)^.&set := $00000400;
  29978. end;
  29979. function TI2C1_I2C1STAT.getBCL : TBits_1; inline;
  29980. begin
  29981. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  29982. end;
  29983. procedure TI2C1_I2C1STAT.setTRSTAT; inline;
  29984. begin
  29985. pTDefRegMap(@Self)^.&set := $00004000;
  29986. end;
  29987. procedure TI2C1_I2C1STAT.clearTRSTAT; inline;
  29988. begin
  29989. pTDefRegMap(@Self)^.clr := $00004000;
  29990. end;
  29991. procedure TI2C1_I2C1STAT.setTRSTAT(thebits : TBits_1); inline;
  29992. begin
  29993. if thebits = 0 then
  29994. pTDefRegMap(@Self)^.clr := $00004000
  29995. else
  29996. pTDefRegMap(@Self)^.&set := $00004000;
  29997. end;
  29998. function TI2C1_I2C1STAT.getTRSTAT : TBits_1; inline;
  29999. begin
  30000. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  30001. end;
  30002. procedure TI2C1_I2C1STAT.setACKSTAT; inline;
  30003. begin
  30004. pTDefRegMap(@Self)^.&set := $00008000;
  30005. end;
  30006. procedure TI2C1_I2C1STAT.clearACKSTAT; inline;
  30007. begin
  30008. pTDefRegMap(@Self)^.clr := $00008000;
  30009. end;
  30010. procedure TI2C1_I2C1STAT.setACKSTAT(thebits : TBits_1); inline;
  30011. begin
  30012. if thebits = 0 then
  30013. pTDefRegMap(@Self)^.clr := $00008000
  30014. else
  30015. pTDefRegMap(@Self)^.&set := $00008000;
  30016. end;
  30017. function TI2C1_I2C1STAT.getACKSTAT : TBits_1; inline;
  30018. begin
  30019. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  30020. end;
  30021. procedure TI2C1_I2C1STAT.setI2CPOV; inline;
  30022. begin
  30023. pTDefRegMap(@Self)^.&set := $00000040;
  30024. end;
  30025. procedure TI2C1_I2C1STAT.clearI2CPOV; inline;
  30026. begin
  30027. pTDefRegMap(@Self)^.clr := $00000040;
  30028. end;
  30029. procedure TI2C1_I2C1STAT.setI2CPOV(thebits : TBits_1); inline;
  30030. begin
  30031. if thebits = 0 then
  30032. pTDefRegMap(@Self)^.clr := $00000040
  30033. else
  30034. pTDefRegMap(@Self)^.&set := $00000040;
  30035. end;
  30036. function TI2C1_I2C1STAT.getI2CPOV : TBits_1; inline;
  30037. begin
  30038. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30039. end;
  30040. procedure TI2C1_I2C1STAT.setw(thebits : TBits_32); inline;
  30041. begin
  30042. pTDefRegMap(@Self)^.val := thebits;
  30043. end;
  30044. function TI2C1_I2C1STAT.getw : TBits_32; inline;
  30045. begin
  30046. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30047. end;
  30048. procedure TSPI1A_SPI1ACON.setSRXISEL(thebits : TBits_2); inline;
  30049. begin
  30050. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  30051. end;
  30052. function TSPI1A_SPI1ACON.getSRXISEL : TBits_2; inline;
  30053. begin
  30054. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  30055. end;
  30056. procedure TSPI1A_SPI1ACON.setSTXISEL(thebits : TBits_2); inline;
  30057. begin
  30058. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  30059. end;
  30060. function TSPI1A_SPI1ACON.getSTXISEL : TBits_2; inline;
  30061. begin
  30062. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  30063. end;
  30064. procedure TSPI1A_SPI1ACON.setMSTEN; inline;
  30065. begin
  30066. pTDefRegMap(@Self)^.&set := $00000020;
  30067. end;
  30068. procedure TSPI1A_SPI1ACON.clearMSTEN; inline;
  30069. begin
  30070. pTDefRegMap(@Self)^.clr := $00000020;
  30071. end;
  30072. procedure TSPI1A_SPI1ACON.setMSTEN(thebits : TBits_1); inline;
  30073. begin
  30074. if thebits = 0 then
  30075. pTDefRegMap(@Self)^.clr := $00000020
  30076. else
  30077. pTDefRegMap(@Self)^.&set := $00000020;
  30078. end;
  30079. function TSPI1A_SPI1ACON.getMSTEN : TBits_1; inline;
  30080. begin
  30081. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  30082. end;
  30083. procedure TSPI1A_SPI1ACON.setCKP; inline;
  30084. begin
  30085. pTDefRegMap(@Self)^.&set := $00000040;
  30086. end;
  30087. procedure TSPI1A_SPI1ACON.clearCKP; inline;
  30088. begin
  30089. pTDefRegMap(@Self)^.clr := $00000040;
  30090. end;
  30091. procedure TSPI1A_SPI1ACON.setCKP(thebits : TBits_1); inline;
  30092. begin
  30093. if thebits = 0 then
  30094. pTDefRegMap(@Self)^.clr := $00000040
  30095. else
  30096. pTDefRegMap(@Self)^.&set := $00000040;
  30097. end;
  30098. function TSPI1A_SPI1ACON.getCKP : TBits_1; inline;
  30099. begin
  30100. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30101. end;
  30102. procedure TSPI1A_SPI1ACON.setSSEN; inline;
  30103. begin
  30104. pTDefRegMap(@Self)^.&set := $00000080;
  30105. end;
  30106. procedure TSPI1A_SPI1ACON.clearSSEN; inline;
  30107. begin
  30108. pTDefRegMap(@Self)^.clr := $00000080;
  30109. end;
  30110. procedure TSPI1A_SPI1ACON.setSSEN(thebits : TBits_1); inline;
  30111. begin
  30112. if thebits = 0 then
  30113. pTDefRegMap(@Self)^.clr := $00000080
  30114. else
  30115. pTDefRegMap(@Self)^.&set := $00000080;
  30116. end;
  30117. function TSPI1A_SPI1ACON.getSSEN : TBits_1; inline;
  30118. begin
  30119. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  30120. end;
  30121. procedure TSPI1A_SPI1ACON.setCKE; inline;
  30122. begin
  30123. pTDefRegMap(@Self)^.&set := $00000100;
  30124. end;
  30125. procedure TSPI1A_SPI1ACON.clearCKE; inline;
  30126. begin
  30127. pTDefRegMap(@Self)^.clr := $00000100;
  30128. end;
  30129. procedure TSPI1A_SPI1ACON.setCKE(thebits : TBits_1); inline;
  30130. begin
  30131. if thebits = 0 then
  30132. pTDefRegMap(@Self)^.clr := $00000100
  30133. else
  30134. pTDefRegMap(@Self)^.&set := $00000100;
  30135. end;
  30136. function TSPI1A_SPI1ACON.getCKE : TBits_1; inline;
  30137. begin
  30138. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  30139. end;
  30140. procedure TSPI1A_SPI1ACON.setSMP; inline;
  30141. begin
  30142. pTDefRegMap(@Self)^.&set := $00000200;
  30143. end;
  30144. procedure TSPI1A_SPI1ACON.clearSMP; inline;
  30145. begin
  30146. pTDefRegMap(@Self)^.clr := $00000200;
  30147. end;
  30148. procedure TSPI1A_SPI1ACON.setSMP(thebits : TBits_1); inline;
  30149. begin
  30150. if thebits = 0 then
  30151. pTDefRegMap(@Self)^.clr := $00000200
  30152. else
  30153. pTDefRegMap(@Self)^.&set := $00000200;
  30154. end;
  30155. function TSPI1A_SPI1ACON.getSMP : TBits_1; inline;
  30156. begin
  30157. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  30158. end;
  30159. procedure TSPI1A_SPI1ACON.setMODE16; inline;
  30160. begin
  30161. pTDefRegMap(@Self)^.&set := $00000400;
  30162. end;
  30163. procedure TSPI1A_SPI1ACON.clearMODE16; inline;
  30164. begin
  30165. pTDefRegMap(@Self)^.clr := $00000400;
  30166. end;
  30167. procedure TSPI1A_SPI1ACON.setMODE16(thebits : TBits_1); inline;
  30168. begin
  30169. if thebits = 0 then
  30170. pTDefRegMap(@Self)^.clr := $00000400
  30171. else
  30172. pTDefRegMap(@Self)^.&set := $00000400;
  30173. end;
  30174. function TSPI1A_SPI1ACON.getMODE16 : TBits_1; inline;
  30175. begin
  30176. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  30177. end;
  30178. procedure TSPI1A_SPI1ACON.setMODE32; inline;
  30179. begin
  30180. pTDefRegMap(@Self)^.&set := $00000800;
  30181. end;
  30182. procedure TSPI1A_SPI1ACON.clearMODE32; inline;
  30183. begin
  30184. pTDefRegMap(@Self)^.clr := $00000800;
  30185. end;
  30186. procedure TSPI1A_SPI1ACON.setMODE32(thebits : TBits_1); inline;
  30187. begin
  30188. if thebits = 0 then
  30189. pTDefRegMap(@Self)^.clr := $00000800
  30190. else
  30191. pTDefRegMap(@Self)^.&set := $00000800;
  30192. end;
  30193. function TSPI1A_SPI1ACON.getMODE32 : TBits_1; inline;
  30194. begin
  30195. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  30196. end;
  30197. procedure TSPI1A_SPI1ACON.setDISSDO; inline;
  30198. begin
  30199. pTDefRegMap(@Self)^.&set := $00001000;
  30200. end;
  30201. procedure TSPI1A_SPI1ACON.clearDISSDO; inline;
  30202. begin
  30203. pTDefRegMap(@Self)^.clr := $00001000;
  30204. end;
  30205. procedure TSPI1A_SPI1ACON.setDISSDO(thebits : TBits_1); inline;
  30206. begin
  30207. if thebits = 0 then
  30208. pTDefRegMap(@Self)^.clr := $00001000
  30209. else
  30210. pTDefRegMap(@Self)^.&set := $00001000;
  30211. end;
  30212. function TSPI1A_SPI1ACON.getDISSDO : TBits_1; inline;
  30213. begin
  30214. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  30215. end;
  30216. procedure TSPI1A_SPI1ACON.setSIDL; inline;
  30217. begin
  30218. pTDefRegMap(@Self)^.&set := $00002000;
  30219. end;
  30220. procedure TSPI1A_SPI1ACON.clearSIDL; inline;
  30221. begin
  30222. pTDefRegMap(@Self)^.clr := $00002000;
  30223. end;
  30224. procedure TSPI1A_SPI1ACON.setSIDL(thebits : TBits_1); inline;
  30225. begin
  30226. if thebits = 0 then
  30227. pTDefRegMap(@Self)^.clr := $00002000
  30228. else
  30229. pTDefRegMap(@Self)^.&set := $00002000;
  30230. end;
  30231. function TSPI1A_SPI1ACON.getSIDL : TBits_1; inline;
  30232. begin
  30233. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  30234. end;
  30235. procedure TSPI1A_SPI1ACON.setON; inline;
  30236. begin
  30237. pTDefRegMap(@Self)^.&set := $00008000;
  30238. end;
  30239. procedure TSPI1A_SPI1ACON.clearON; inline;
  30240. begin
  30241. pTDefRegMap(@Self)^.clr := $00008000;
  30242. end;
  30243. procedure TSPI1A_SPI1ACON.setON(thebits : TBits_1); inline;
  30244. begin
  30245. if thebits = 0 then
  30246. pTDefRegMap(@Self)^.clr := $00008000
  30247. else
  30248. pTDefRegMap(@Self)^.&set := $00008000;
  30249. end;
  30250. function TSPI1A_SPI1ACON.getON : TBits_1; inline;
  30251. begin
  30252. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  30253. end;
  30254. procedure TSPI1A_SPI1ACON.setENHBUF; inline;
  30255. begin
  30256. pTDefRegMap(@Self)^.&set := $00010000;
  30257. end;
  30258. procedure TSPI1A_SPI1ACON.clearENHBUF; inline;
  30259. begin
  30260. pTDefRegMap(@Self)^.clr := $00010000;
  30261. end;
  30262. procedure TSPI1A_SPI1ACON.setENHBUF(thebits : TBits_1); inline;
  30263. begin
  30264. if thebits = 0 then
  30265. pTDefRegMap(@Self)^.clr := $00010000
  30266. else
  30267. pTDefRegMap(@Self)^.&set := $00010000;
  30268. end;
  30269. function TSPI1A_SPI1ACON.getENHBUF : TBits_1; inline;
  30270. begin
  30271. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  30272. end;
  30273. procedure TSPI1A_SPI1ACON.setSPIFE; inline;
  30274. begin
  30275. pTDefRegMap(@Self)^.&set := $00020000;
  30276. end;
  30277. procedure TSPI1A_SPI1ACON.clearSPIFE; inline;
  30278. begin
  30279. pTDefRegMap(@Self)^.clr := $00020000;
  30280. end;
  30281. procedure TSPI1A_SPI1ACON.setSPIFE(thebits : TBits_1); inline;
  30282. begin
  30283. if thebits = 0 then
  30284. pTDefRegMap(@Self)^.clr := $00020000
  30285. else
  30286. pTDefRegMap(@Self)^.&set := $00020000;
  30287. end;
  30288. function TSPI1A_SPI1ACON.getSPIFE : TBits_1; inline;
  30289. begin
  30290. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  30291. end;
  30292. procedure TSPI1A_SPI1ACON.setFRMCNT(thebits : TBits_3); inline;
  30293. begin
  30294. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  30295. end;
  30296. function TSPI1A_SPI1ACON.getFRMCNT : TBits_3; inline;
  30297. begin
  30298. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  30299. end;
  30300. procedure TSPI1A_SPI1ACON.setFRMSYPW; inline;
  30301. begin
  30302. pTDefRegMap(@Self)^.&set := $08000000;
  30303. end;
  30304. procedure TSPI1A_SPI1ACON.clearFRMSYPW; inline;
  30305. begin
  30306. pTDefRegMap(@Self)^.clr := $08000000;
  30307. end;
  30308. procedure TSPI1A_SPI1ACON.setFRMSYPW(thebits : TBits_1); inline;
  30309. begin
  30310. if thebits = 0 then
  30311. pTDefRegMap(@Self)^.clr := $08000000
  30312. else
  30313. pTDefRegMap(@Self)^.&set := $08000000;
  30314. end;
  30315. function TSPI1A_SPI1ACON.getFRMSYPW : TBits_1; inline;
  30316. begin
  30317. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  30318. end;
  30319. procedure TSPI1A_SPI1ACON.setMSSEN; inline;
  30320. begin
  30321. pTDefRegMap(@Self)^.&set := $10000000;
  30322. end;
  30323. procedure TSPI1A_SPI1ACON.clearMSSEN; inline;
  30324. begin
  30325. pTDefRegMap(@Self)^.clr := $10000000;
  30326. end;
  30327. procedure TSPI1A_SPI1ACON.setMSSEN(thebits : TBits_1); inline;
  30328. begin
  30329. if thebits = 0 then
  30330. pTDefRegMap(@Self)^.clr := $10000000
  30331. else
  30332. pTDefRegMap(@Self)^.&set := $10000000;
  30333. end;
  30334. function TSPI1A_SPI1ACON.getMSSEN : TBits_1; inline;
  30335. begin
  30336. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  30337. end;
  30338. procedure TSPI1A_SPI1ACON.setFRMPOL; inline;
  30339. begin
  30340. pTDefRegMap(@Self)^.&set := $20000000;
  30341. end;
  30342. procedure TSPI1A_SPI1ACON.clearFRMPOL; inline;
  30343. begin
  30344. pTDefRegMap(@Self)^.clr := $20000000;
  30345. end;
  30346. procedure TSPI1A_SPI1ACON.setFRMPOL(thebits : TBits_1); inline;
  30347. begin
  30348. if thebits = 0 then
  30349. pTDefRegMap(@Self)^.clr := $20000000
  30350. else
  30351. pTDefRegMap(@Self)^.&set := $20000000;
  30352. end;
  30353. function TSPI1A_SPI1ACON.getFRMPOL : TBits_1; inline;
  30354. begin
  30355. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  30356. end;
  30357. procedure TSPI1A_SPI1ACON.setFRMSYNC; inline;
  30358. begin
  30359. pTDefRegMap(@Self)^.&set := $40000000;
  30360. end;
  30361. procedure TSPI1A_SPI1ACON.clearFRMSYNC; inline;
  30362. begin
  30363. pTDefRegMap(@Self)^.clr := $40000000;
  30364. end;
  30365. procedure TSPI1A_SPI1ACON.setFRMSYNC(thebits : TBits_1); inline;
  30366. begin
  30367. if thebits = 0 then
  30368. pTDefRegMap(@Self)^.clr := $40000000
  30369. else
  30370. pTDefRegMap(@Self)^.&set := $40000000;
  30371. end;
  30372. function TSPI1A_SPI1ACON.getFRMSYNC : TBits_1; inline;
  30373. begin
  30374. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  30375. end;
  30376. procedure TSPI1A_SPI1ACON.setFRMEN; inline;
  30377. begin
  30378. pTDefRegMap(@Self)^.&set := $80000000;
  30379. end;
  30380. procedure TSPI1A_SPI1ACON.clearFRMEN; inline;
  30381. begin
  30382. pTDefRegMap(@Self)^.clr := $80000000;
  30383. end;
  30384. procedure TSPI1A_SPI1ACON.setFRMEN(thebits : TBits_1); inline;
  30385. begin
  30386. if thebits = 0 then
  30387. pTDefRegMap(@Self)^.clr := $80000000
  30388. else
  30389. pTDefRegMap(@Self)^.&set := $80000000;
  30390. end;
  30391. function TSPI1A_SPI1ACON.getFRMEN : TBits_1; inline;
  30392. begin
  30393. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  30394. end;
  30395. procedure TSPI1A_SPI1ACON.setw(thebits : TBits_32); inline;
  30396. begin
  30397. pTDefRegMap(@Self)^.val := thebits;
  30398. end;
  30399. function TSPI1A_SPI1ACON.getw : TBits_32; inline;
  30400. begin
  30401. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30402. end;
  30403. procedure TSPI1A_SPI3CON.setSRXISEL(thebits : TBits_2); inline;
  30404. begin
  30405. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  30406. end;
  30407. function TSPI1A_SPI3CON.getSRXISEL : TBits_2; inline;
  30408. begin
  30409. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  30410. end;
  30411. procedure TSPI1A_SPI3CON.setSTXISEL(thebits : TBits_2); inline;
  30412. begin
  30413. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  30414. end;
  30415. function TSPI1A_SPI3CON.getSTXISEL : TBits_2; inline;
  30416. begin
  30417. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  30418. end;
  30419. procedure TSPI1A_SPI3CON.setMSTEN; inline;
  30420. begin
  30421. pTDefRegMap(@Self)^.&set := $00000020;
  30422. end;
  30423. procedure TSPI1A_SPI3CON.clearMSTEN; inline;
  30424. begin
  30425. pTDefRegMap(@Self)^.clr := $00000020;
  30426. end;
  30427. procedure TSPI1A_SPI3CON.setMSTEN(thebits : TBits_1); inline;
  30428. begin
  30429. if thebits = 0 then
  30430. pTDefRegMap(@Self)^.clr := $00000020
  30431. else
  30432. pTDefRegMap(@Self)^.&set := $00000020;
  30433. end;
  30434. function TSPI1A_SPI3CON.getMSTEN : TBits_1; inline;
  30435. begin
  30436. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  30437. end;
  30438. procedure TSPI1A_SPI3CON.setCKP; inline;
  30439. begin
  30440. pTDefRegMap(@Self)^.&set := $00000040;
  30441. end;
  30442. procedure TSPI1A_SPI3CON.clearCKP; inline;
  30443. begin
  30444. pTDefRegMap(@Self)^.clr := $00000040;
  30445. end;
  30446. procedure TSPI1A_SPI3CON.setCKP(thebits : TBits_1); inline;
  30447. begin
  30448. if thebits = 0 then
  30449. pTDefRegMap(@Self)^.clr := $00000040
  30450. else
  30451. pTDefRegMap(@Self)^.&set := $00000040;
  30452. end;
  30453. function TSPI1A_SPI3CON.getCKP : TBits_1; inline;
  30454. begin
  30455. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30456. end;
  30457. procedure TSPI1A_SPI3CON.setSSEN; inline;
  30458. begin
  30459. pTDefRegMap(@Self)^.&set := $00000080;
  30460. end;
  30461. procedure TSPI1A_SPI3CON.clearSSEN; inline;
  30462. begin
  30463. pTDefRegMap(@Self)^.clr := $00000080;
  30464. end;
  30465. procedure TSPI1A_SPI3CON.setSSEN(thebits : TBits_1); inline;
  30466. begin
  30467. if thebits = 0 then
  30468. pTDefRegMap(@Self)^.clr := $00000080
  30469. else
  30470. pTDefRegMap(@Self)^.&set := $00000080;
  30471. end;
  30472. function TSPI1A_SPI3CON.getSSEN : TBits_1; inline;
  30473. begin
  30474. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  30475. end;
  30476. procedure TSPI1A_SPI3CON.setCKE; inline;
  30477. begin
  30478. pTDefRegMap(@Self)^.&set := $00000100;
  30479. end;
  30480. procedure TSPI1A_SPI3CON.clearCKE; inline;
  30481. begin
  30482. pTDefRegMap(@Self)^.clr := $00000100;
  30483. end;
  30484. procedure TSPI1A_SPI3CON.setCKE(thebits : TBits_1); inline;
  30485. begin
  30486. if thebits = 0 then
  30487. pTDefRegMap(@Self)^.clr := $00000100
  30488. else
  30489. pTDefRegMap(@Self)^.&set := $00000100;
  30490. end;
  30491. function TSPI1A_SPI3CON.getCKE : TBits_1; inline;
  30492. begin
  30493. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  30494. end;
  30495. procedure TSPI1A_SPI3CON.setSMP; inline;
  30496. begin
  30497. pTDefRegMap(@Self)^.&set := $00000200;
  30498. end;
  30499. procedure TSPI1A_SPI3CON.clearSMP; inline;
  30500. begin
  30501. pTDefRegMap(@Self)^.clr := $00000200;
  30502. end;
  30503. procedure TSPI1A_SPI3CON.setSMP(thebits : TBits_1); inline;
  30504. begin
  30505. if thebits = 0 then
  30506. pTDefRegMap(@Self)^.clr := $00000200
  30507. else
  30508. pTDefRegMap(@Self)^.&set := $00000200;
  30509. end;
  30510. function TSPI1A_SPI3CON.getSMP : TBits_1; inline;
  30511. begin
  30512. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  30513. end;
  30514. procedure TSPI1A_SPI3CON.setMODE16; inline;
  30515. begin
  30516. pTDefRegMap(@Self)^.&set := $00000400;
  30517. end;
  30518. procedure TSPI1A_SPI3CON.clearMODE16; inline;
  30519. begin
  30520. pTDefRegMap(@Self)^.clr := $00000400;
  30521. end;
  30522. procedure TSPI1A_SPI3CON.setMODE16(thebits : TBits_1); inline;
  30523. begin
  30524. if thebits = 0 then
  30525. pTDefRegMap(@Self)^.clr := $00000400
  30526. else
  30527. pTDefRegMap(@Self)^.&set := $00000400;
  30528. end;
  30529. function TSPI1A_SPI3CON.getMODE16 : TBits_1; inline;
  30530. begin
  30531. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  30532. end;
  30533. procedure TSPI1A_SPI3CON.setMODE32; inline;
  30534. begin
  30535. pTDefRegMap(@Self)^.&set := $00000800;
  30536. end;
  30537. procedure TSPI1A_SPI3CON.clearMODE32; inline;
  30538. begin
  30539. pTDefRegMap(@Self)^.clr := $00000800;
  30540. end;
  30541. procedure TSPI1A_SPI3CON.setMODE32(thebits : TBits_1); inline;
  30542. begin
  30543. if thebits = 0 then
  30544. pTDefRegMap(@Self)^.clr := $00000800
  30545. else
  30546. pTDefRegMap(@Self)^.&set := $00000800;
  30547. end;
  30548. function TSPI1A_SPI3CON.getMODE32 : TBits_1; inline;
  30549. begin
  30550. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  30551. end;
  30552. procedure TSPI1A_SPI3CON.setDISSDO; inline;
  30553. begin
  30554. pTDefRegMap(@Self)^.&set := $00001000;
  30555. end;
  30556. procedure TSPI1A_SPI3CON.clearDISSDO; inline;
  30557. begin
  30558. pTDefRegMap(@Self)^.clr := $00001000;
  30559. end;
  30560. procedure TSPI1A_SPI3CON.setDISSDO(thebits : TBits_1); inline;
  30561. begin
  30562. if thebits = 0 then
  30563. pTDefRegMap(@Self)^.clr := $00001000
  30564. else
  30565. pTDefRegMap(@Self)^.&set := $00001000;
  30566. end;
  30567. function TSPI1A_SPI3CON.getDISSDO : TBits_1; inline;
  30568. begin
  30569. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  30570. end;
  30571. procedure TSPI1A_SPI3CON.setSIDL; inline;
  30572. begin
  30573. pTDefRegMap(@Self)^.&set := $00002000;
  30574. end;
  30575. procedure TSPI1A_SPI3CON.clearSIDL; inline;
  30576. begin
  30577. pTDefRegMap(@Self)^.clr := $00002000;
  30578. end;
  30579. procedure TSPI1A_SPI3CON.setSIDL(thebits : TBits_1); inline;
  30580. begin
  30581. if thebits = 0 then
  30582. pTDefRegMap(@Self)^.clr := $00002000
  30583. else
  30584. pTDefRegMap(@Self)^.&set := $00002000;
  30585. end;
  30586. function TSPI1A_SPI3CON.getSIDL : TBits_1; inline;
  30587. begin
  30588. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  30589. end;
  30590. procedure TSPI1A_SPI3CON.setON; inline;
  30591. begin
  30592. pTDefRegMap(@Self)^.&set := $00008000;
  30593. end;
  30594. procedure TSPI1A_SPI3CON.clearON; inline;
  30595. begin
  30596. pTDefRegMap(@Self)^.clr := $00008000;
  30597. end;
  30598. procedure TSPI1A_SPI3CON.setON(thebits : TBits_1); inline;
  30599. begin
  30600. if thebits = 0 then
  30601. pTDefRegMap(@Self)^.clr := $00008000
  30602. else
  30603. pTDefRegMap(@Self)^.&set := $00008000;
  30604. end;
  30605. function TSPI1A_SPI3CON.getON : TBits_1; inline;
  30606. begin
  30607. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  30608. end;
  30609. procedure TSPI1A_SPI3CON.setENHBUF; inline;
  30610. begin
  30611. pTDefRegMap(@Self)^.&set := $00010000;
  30612. end;
  30613. procedure TSPI1A_SPI3CON.clearENHBUF; inline;
  30614. begin
  30615. pTDefRegMap(@Self)^.clr := $00010000;
  30616. end;
  30617. procedure TSPI1A_SPI3CON.setENHBUF(thebits : TBits_1); inline;
  30618. begin
  30619. if thebits = 0 then
  30620. pTDefRegMap(@Self)^.clr := $00010000
  30621. else
  30622. pTDefRegMap(@Self)^.&set := $00010000;
  30623. end;
  30624. function TSPI1A_SPI3CON.getENHBUF : TBits_1; inline;
  30625. begin
  30626. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  30627. end;
  30628. procedure TSPI1A_SPI3CON.setSPIFE; inline;
  30629. begin
  30630. pTDefRegMap(@Self)^.&set := $00020000;
  30631. end;
  30632. procedure TSPI1A_SPI3CON.clearSPIFE; inline;
  30633. begin
  30634. pTDefRegMap(@Self)^.clr := $00020000;
  30635. end;
  30636. procedure TSPI1A_SPI3CON.setSPIFE(thebits : TBits_1); inline;
  30637. begin
  30638. if thebits = 0 then
  30639. pTDefRegMap(@Self)^.clr := $00020000
  30640. else
  30641. pTDefRegMap(@Self)^.&set := $00020000;
  30642. end;
  30643. function TSPI1A_SPI3CON.getSPIFE : TBits_1; inline;
  30644. begin
  30645. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  30646. end;
  30647. procedure TSPI1A_SPI3CON.setFRMCNT(thebits : TBits_3); inline;
  30648. begin
  30649. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  30650. end;
  30651. function TSPI1A_SPI3CON.getFRMCNT : TBits_3; inline;
  30652. begin
  30653. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  30654. end;
  30655. procedure TSPI1A_SPI3CON.setFRMSYPW; inline;
  30656. begin
  30657. pTDefRegMap(@Self)^.&set := $08000000;
  30658. end;
  30659. procedure TSPI1A_SPI3CON.clearFRMSYPW; inline;
  30660. begin
  30661. pTDefRegMap(@Self)^.clr := $08000000;
  30662. end;
  30663. procedure TSPI1A_SPI3CON.setFRMSYPW(thebits : TBits_1); inline;
  30664. begin
  30665. if thebits = 0 then
  30666. pTDefRegMap(@Self)^.clr := $08000000
  30667. else
  30668. pTDefRegMap(@Self)^.&set := $08000000;
  30669. end;
  30670. function TSPI1A_SPI3CON.getFRMSYPW : TBits_1; inline;
  30671. begin
  30672. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  30673. end;
  30674. procedure TSPI1A_SPI3CON.setMSSEN; inline;
  30675. begin
  30676. pTDefRegMap(@Self)^.&set := $10000000;
  30677. end;
  30678. procedure TSPI1A_SPI3CON.clearMSSEN; inline;
  30679. begin
  30680. pTDefRegMap(@Self)^.clr := $10000000;
  30681. end;
  30682. procedure TSPI1A_SPI3CON.setMSSEN(thebits : TBits_1); inline;
  30683. begin
  30684. if thebits = 0 then
  30685. pTDefRegMap(@Self)^.clr := $10000000
  30686. else
  30687. pTDefRegMap(@Self)^.&set := $10000000;
  30688. end;
  30689. function TSPI1A_SPI3CON.getMSSEN : TBits_1; inline;
  30690. begin
  30691. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  30692. end;
  30693. procedure TSPI1A_SPI3CON.setFRMPOL; inline;
  30694. begin
  30695. pTDefRegMap(@Self)^.&set := $20000000;
  30696. end;
  30697. procedure TSPI1A_SPI3CON.clearFRMPOL; inline;
  30698. begin
  30699. pTDefRegMap(@Self)^.clr := $20000000;
  30700. end;
  30701. procedure TSPI1A_SPI3CON.setFRMPOL(thebits : TBits_1); inline;
  30702. begin
  30703. if thebits = 0 then
  30704. pTDefRegMap(@Self)^.clr := $20000000
  30705. else
  30706. pTDefRegMap(@Self)^.&set := $20000000;
  30707. end;
  30708. function TSPI1A_SPI3CON.getFRMPOL : TBits_1; inline;
  30709. begin
  30710. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  30711. end;
  30712. procedure TSPI1A_SPI3CON.setFRMSYNC; inline;
  30713. begin
  30714. pTDefRegMap(@Self)^.&set := $40000000;
  30715. end;
  30716. procedure TSPI1A_SPI3CON.clearFRMSYNC; inline;
  30717. begin
  30718. pTDefRegMap(@Self)^.clr := $40000000;
  30719. end;
  30720. procedure TSPI1A_SPI3CON.setFRMSYNC(thebits : TBits_1); inline;
  30721. begin
  30722. if thebits = 0 then
  30723. pTDefRegMap(@Self)^.clr := $40000000
  30724. else
  30725. pTDefRegMap(@Self)^.&set := $40000000;
  30726. end;
  30727. function TSPI1A_SPI3CON.getFRMSYNC : TBits_1; inline;
  30728. begin
  30729. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  30730. end;
  30731. procedure TSPI1A_SPI3CON.setFRMEN; inline;
  30732. begin
  30733. pTDefRegMap(@Self)^.&set := $80000000;
  30734. end;
  30735. procedure TSPI1A_SPI3CON.clearFRMEN; inline;
  30736. begin
  30737. pTDefRegMap(@Self)^.clr := $80000000;
  30738. end;
  30739. procedure TSPI1A_SPI3CON.setFRMEN(thebits : TBits_1); inline;
  30740. begin
  30741. if thebits = 0 then
  30742. pTDefRegMap(@Self)^.clr := $80000000
  30743. else
  30744. pTDefRegMap(@Self)^.&set := $80000000;
  30745. end;
  30746. function TSPI1A_SPI3CON.getFRMEN : TBits_1; inline;
  30747. begin
  30748. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  30749. end;
  30750. procedure TSPI1A_SPI3CON.setw(thebits : TBits_32); inline;
  30751. begin
  30752. pTDefRegMap(@Self)^.val := thebits;
  30753. end;
  30754. function TSPI1A_SPI3CON.getw : TBits_32; inline;
  30755. begin
  30756. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30757. end;
  30758. procedure TSPI1A_SPI1ASTAT.setSPIRBF; inline;
  30759. begin
  30760. pTDefRegMap(@Self)^.&set := $00000001;
  30761. end;
  30762. procedure TSPI1A_SPI1ASTAT.clearSPIRBF; inline;
  30763. begin
  30764. pTDefRegMap(@Self)^.clr := $00000001;
  30765. end;
  30766. procedure TSPI1A_SPI1ASTAT.setSPIRBF(thebits : TBits_1); inline;
  30767. begin
  30768. if thebits = 0 then
  30769. pTDefRegMap(@Self)^.clr := $00000001
  30770. else
  30771. pTDefRegMap(@Self)^.&set := $00000001;
  30772. end;
  30773. function TSPI1A_SPI1ASTAT.getSPIRBF : TBits_1; inline;
  30774. begin
  30775. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  30776. end;
  30777. procedure TSPI1A_SPI1ASTAT.setSPITBF; inline;
  30778. begin
  30779. pTDefRegMap(@Self)^.&set := $00000002;
  30780. end;
  30781. procedure TSPI1A_SPI1ASTAT.clearSPITBF; inline;
  30782. begin
  30783. pTDefRegMap(@Self)^.clr := $00000002;
  30784. end;
  30785. procedure TSPI1A_SPI1ASTAT.setSPITBF(thebits : TBits_1); inline;
  30786. begin
  30787. if thebits = 0 then
  30788. pTDefRegMap(@Self)^.clr := $00000002
  30789. else
  30790. pTDefRegMap(@Self)^.&set := $00000002;
  30791. end;
  30792. function TSPI1A_SPI1ASTAT.getSPITBF : TBits_1; inline;
  30793. begin
  30794. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  30795. end;
  30796. procedure TSPI1A_SPI1ASTAT.setSPITBE; inline;
  30797. begin
  30798. pTDefRegMap(@Self)^.&set := $00000008;
  30799. end;
  30800. procedure TSPI1A_SPI1ASTAT.clearSPITBE; inline;
  30801. begin
  30802. pTDefRegMap(@Self)^.clr := $00000008;
  30803. end;
  30804. procedure TSPI1A_SPI1ASTAT.setSPITBE(thebits : TBits_1); inline;
  30805. begin
  30806. if thebits = 0 then
  30807. pTDefRegMap(@Self)^.clr := $00000008
  30808. else
  30809. pTDefRegMap(@Self)^.&set := $00000008;
  30810. end;
  30811. function TSPI1A_SPI1ASTAT.getSPITBE : TBits_1; inline;
  30812. begin
  30813. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  30814. end;
  30815. procedure TSPI1A_SPI1ASTAT.setSPIRBE; inline;
  30816. begin
  30817. pTDefRegMap(@Self)^.&set := $00000020;
  30818. end;
  30819. procedure TSPI1A_SPI1ASTAT.clearSPIRBE; inline;
  30820. begin
  30821. pTDefRegMap(@Self)^.clr := $00000020;
  30822. end;
  30823. procedure TSPI1A_SPI1ASTAT.setSPIRBE(thebits : TBits_1); inline;
  30824. begin
  30825. if thebits = 0 then
  30826. pTDefRegMap(@Self)^.clr := $00000020
  30827. else
  30828. pTDefRegMap(@Self)^.&set := $00000020;
  30829. end;
  30830. function TSPI1A_SPI1ASTAT.getSPIRBE : TBits_1; inline;
  30831. begin
  30832. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  30833. end;
  30834. procedure TSPI1A_SPI1ASTAT.setSPIROV; inline;
  30835. begin
  30836. pTDefRegMap(@Self)^.&set := $00000040;
  30837. end;
  30838. procedure TSPI1A_SPI1ASTAT.clearSPIROV; inline;
  30839. begin
  30840. pTDefRegMap(@Self)^.clr := $00000040;
  30841. end;
  30842. procedure TSPI1A_SPI1ASTAT.setSPIROV(thebits : TBits_1); inline;
  30843. begin
  30844. if thebits = 0 then
  30845. pTDefRegMap(@Self)^.clr := $00000040
  30846. else
  30847. pTDefRegMap(@Self)^.&set := $00000040;
  30848. end;
  30849. function TSPI1A_SPI1ASTAT.getSPIROV : TBits_1; inline;
  30850. begin
  30851. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30852. end;
  30853. procedure TSPI1A_SPI1ASTAT.setSRMT; inline;
  30854. begin
  30855. pTDefRegMap(@Self)^.&set := $00000080;
  30856. end;
  30857. procedure TSPI1A_SPI1ASTAT.clearSRMT; inline;
  30858. begin
  30859. pTDefRegMap(@Self)^.clr := $00000080;
  30860. end;
  30861. procedure TSPI1A_SPI1ASTAT.setSRMT(thebits : TBits_1); inline;
  30862. begin
  30863. if thebits = 0 then
  30864. pTDefRegMap(@Self)^.clr := $00000080
  30865. else
  30866. pTDefRegMap(@Self)^.&set := $00000080;
  30867. end;
  30868. function TSPI1A_SPI1ASTAT.getSRMT : TBits_1; inline;
  30869. begin
  30870. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  30871. end;
  30872. procedure TSPI1A_SPI1ASTAT.setSPITUR; inline;
  30873. begin
  30874. pTDefRegMap(@Self)^.&set := $00000100;
  30875. end;
  30876. procedure TSPI1A_SPI1ASTAT.clearSPITUR; inline;
  30877. begin
  30878. pTDefRegMap(@Self)^.clr := $00000100;
  30879. end;
  30880. procedure TSPI1A_SPI1ASTAT.setSPITUR(thebits : TBits_1); inline;
  30881. begin
  30882. if thebits = 0 then
  30883. pTDefRegMap(@Self)^.clr := $00000100
  30884. else
  30885. pTDefRegMap(@Self)^.&set := $00000100;
  30886. end;
  30887. function TSPI1A_SPI1ASTAT.getSPITUR : TBits_1; inline;
  30888. begin
  30889. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  30890. end;
  30891. procedure TSPI1A_SPI1ASTAT.setSPIBUSY; inline;
  30892. begin
  30893. pTDefRegMap(@Self)^.&set := $00000800;
  30894. end;
  30895. procedure TSPI1A_SPI1ASTAT.clearSPIBUSY; inline;
  30896. begin
  30897. pTDefRegMap(@Self)^.clr := $00000800;
  30898. end;
  30899. procedure TSPI1A_SPI1ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  30900. begin
  30901. if thebits = 0 then
  30902. pTDefRegMap(@Self)^.clr := $00000800
  30903. else
  30904. pTDefRegMap(@Self)^.&set := $00000800;
  30905. end;
  30906. function TSPI1A_SPI1ASTAT.getSPIBUSY : TBits_1; inline;
  30907. begin
  30908. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  30909. end;
  30910. procedure TSPI1A_SPI1ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  30911. begin
  30912. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  30913. end;
  30914. function TSPI1A_SPI1ASTAT.getTXBUFELM : TBits_5; inline;
  30915. begin
  30916. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  30917. end;
  30918. procedure TSPI1A_SPI1ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  30919. begin
  30920. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  30921. end;
  30922. function TSPI1A_SPI1ASTAT.getRXBUFELM : TBits_5; inline;
  30923. begin
  30924. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  30925. end;
  30926. procedure TSPI1A_SPI1ASTAT.setw(thebits : TBits_32); inline;
  30927. begin
  30928. pTDefRegMap(@Self)^.val := thebits;
  30929. end;
  30930. function TSPI1A_SPI1ASTAT.getw : TBits_32; inline;
  30931. begin
  30932. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30933. end;
  30934. procedure TSPI1A_SPI3STAT.setSPIRBF; inline;
  30935. begin
  30936. pTDefRegMap(@Self)^.&set := $00000001;
  30937. end;
  30938. procedure TSPI1A_SPI3STAT.clearSPIRBF; inline;
  30939. begin
  30940. pTDefRegMap(@Self)^.clr := $00000001;
  30941. end;
  30942. procedure TSPI1A_SPI3STAT.setSPIRBF(thebits : TBits_1); inline;
  30943. begin
  30944. if thebits = 0 then
  30945. pTDefRegMap(@Self)^.clr := $00000001
  30946. else
  30947. pTDefRegMap(@Self)^.&set := $00000001;
  30948. end;
  30949. function TSPI1A_SPI3STAT.getSPIRBF : TBits_1; inline;
  30950. begin
  30951. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  30952. end;
  30953. procedure TSPI1A_SPI3STAT.setSPITBF; inline;
  30954. begin
  30955. pTDefRegMap(@Self)^.&set := $00000002;
  30956. end;
  30957. procedure TSPI1A_SPI3STAT.clearSPITBF; inline;
  30958. begin
  30959. pTDefRegMap(@Self)^.clr := $00000002;
  30960. end;
  30961. procedure TSPI1A_SPI3STAT.setSPITBF(thebits : TBits_1); inline;
  30962. begin
  30963. if thebits = 0 then
  30964. pTDefRegMap(@Self)^.clr := $00000002
  30965. else
  30966. pTDefRegMap(@Self)^.&set := $00000002;
  30967. end;
  30968. function TSPI1A_SPI3STAT.getSPITBF : TBits_1; inline;
  30969. begin
  30970. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  30971. end;
  30972. procedure TSPI1A_SPI3STAT.setSPITBE; inline;
  30973. begin
  30974. pTDefRegMap(@Self)^.&set := $00000008;
  30975. end;
  30976. procedure TSPI1A_SPI3STAT.clearSPITBE; inline;
  30977. begin
  30978. pTDefRegMap(@Self)^.clr := $00000008;
  30979. end;
  30980. procedure TSPI1A_SPI3STAT.setSPITBE(thebits : TBits_1); inline;
  30981. begin
  30982. if thebits = 0 then
  30983. pTDefRegMap(@Self)^.clr := $00000008
  30984. else
  30985. pTDefRegMap(@Self)^.&set := $00000008;
  30986. end;
  30987. function TSPI1A_SPI3STAT.getSPITBE : TBits_1; inline;
  30988. begin
  30989. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  30990. end;
  30991. procedure TSPI1A_SPI3STAT.setSPIRBE; inline;
  30992. begin
  30993. pTDefRegMap(@Self)^.&set := $00000020;
  30994. end;
  30995. procedure TSPI1A_SPI3STAT.clearSPIRBE; inline;
  30996. begin
  30997. pTDefRegMap(@Self)^.clr := $00000020;
  30998. end;
  30999. procedure TSPI1A_SPI3STAT.setSPIRBE(thebits : TBits_1); inline;
  31000. begin
  31001. if thebits = 0 then
  31002. pTDefRegMap(@Self)^.clr := $00000020
  31003. else
  31004. pTDefRegMap(@Self)^.&set := $00000020;
  31005. end;
  31006. function TSPI1A_SPI3STAT.getSPIRBE : TBits_1; inline;
  31007. begin
  31008. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31009. end;
  31010. procedure TSPI1A_SPI3STAT.setSPIROV; inline;
  31011. begin
  31012. pTDefRegMap(@Self)^.&set := $00000040;
  31013. end;
  31014. procedure TSPI1A_SPI3STAT.clearSPIROV; inline;
  31015. begin
  31016. pTDefRegMap(@Self)^.clr := $00000040;
  31017. end;
  31018. procedure TSPI1A_SPI3STAT.setSPIROV(thebits : TBits_1); inline;
  31019. begin
  31020. if thebits = 0 then
  31021. pTDefRegMap(@Self)^.clr := $00000040
  31022. else
  31023. pTDefRegMap(@Self)^.&set := $00000040;
  31024. end;
  31025. function TSPI1A_SPI3STAT.getSPIROV : TBits_1; inline;
  31026. begin
  31027. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31028. end;
  31029. procedure TSPI1A_SPI3STAT.setSRMT; inline;
  31030. begin
  31031. pTDefRegMap(@Self)^.&set := $00000080;
  31032. end;
  31033. procedure TSPI1A_SPI3STAT.clearSRMT; inline;
  31034. begin
  31035. pTDefRegMap(@Self)^.clr := $00000080;
  31036. end;
  31037. procedure TSPI1A_SPI3STAT.setSRMT(thebits : TBits_1); inline;
  31038. begin
  31039. if thebits = 0 then
  31040. pTDefRegMap(@Self)^.clr := $00000080
  31041. else
  31042. pTDefRegMap(@Self)^.&set := $00000080;
  31043. end;
  31044. function TSPI1A_SPI3STAT.getSRMT : TBits_1; inline;
  31045. begin
  31046. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31047. end;
  31048. procedure TSPI1A_SPI3STAT.setSPITUR; inline;
  31049. begin
  31050. pTDefRegMap(@Self)^.&set := $00000100;
  31051. end;
  31052. procedure TSPI1A_SPI3STAT.clearSPITUR; inline;
  31053. begin
  31054. pTDefRegMap(@Self)^.clr := $00000100;
  31055. end;
  31056. procedure TSPI1A_SPI3STAT.setSPITUR(thebits : TBits_1); inline;
  31057. begin
  31058. if thebits = 0 then
  31059. pTDefRegMap(@Self)^.clr := $00000100
  31060. else
  31061. pTDefRegMap(@Self)^.&set := $00000100;
  31062. end;
  31063. function TSPI1A_SPI3STAT.getSPITUR : TBits_1; inline;
  31064. begin
  31065. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  31066. end;
  31067. procedure TSPI1A_SPI3STAT.setSPIBUSY; inline;
  31068. begin
  31069. pTDefRegMap(@Self)^.&set := $00000800;
  31070. end;
  31071. procedure TSPI1A_SPI3STAT.clearSPIBUSY; inline;
  31072. begin
  31073. pTDefRegMap(@Self)^.clr := $00000800;
  31074. end;
  31075. procedure TSPI1A_SPI3STAT.setSPIBUSY(thebits : TBits_1); inline;
  31076. begin
  31077. if thebits = 0 then
  31078. pTDefRegMap(@Self)^.clr := $00000800
  31079. else
  31080. pTDefRegMap(@Self)^.&set := $00000800;
  31081. end;
  31082. function TSPI1A_SPI3STAT.getSPIBUSY : TBits_1; inline;
  31083. begin
  31084. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31085. end;
  31086. procedure TSPI1A_SPI3STAT.setTXBUFELM(thebits : TBits_5); inline;
  31087. begin
  31088. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  31089. end;
  31090. function TSPI1A_SPI3STAT.getTXBUFELM : TBits_5; inline;
  31091. begin
  31092. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  31093. end;
  31094. procedure TSPI1A_SPI3STAT.setRXBUFELM(thebits : TBits_5); inline;
  31095. begin
  31096. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  31097. end;
  31098. function TSPI1A_SPI3STAT.getRXBUFELM : TBits_5; inline;
  31099. begin
  31100. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  31101. end;
  31102. procedure TSPI1A_SPI3STAT.setw(thebits : TBits_32); inline;
  31103. begin
  31104. pTDefRegMap(@Self)^.val := thebits;
  31105. end;
  31106. function TSPI1A_SPI3STAT.getw : TBits_32; inline;
  31107. begin
  31108. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31109. end;
  31110. procedure TSPI2_SPI2ACON.setSRXISEL(thebits : TBits_2); inline;
  31111. begin
  31112. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  31113. end;
  31114. function TSPI2_SPI2ACON.getSRXISEL : TBits_2; inline;
  31115. begin
  31116. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  31117. end;
  31118. procedure TSPI2_SPI2ACON.setSTXISEL(thebits : TBits_2); inline;
  31119. begin
  31120. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  31121. end;
  31122. function TSPI2_SPI2ACON.getSTXISEL : TBits_2; inline;
  31123. begin
  31124. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  31125. end;
  31126. procedure TSPI2_SPI2ACON.setMSTEN; inline;
  31127. begin
  31128. pTDefRegMap(@Self)^.&set := $00000020;
  31129. end;
  31130. procedure TSPI2_SPI2ACON.clearMSTEN; inline;
  31131. begin
  31132. pTDefRegMap(@Self)^.clr := $00000020;
  31133. end;
  31134. procedure TSPI2_SPI2ACON.setMSTEN(thebits : TBits_1); inline;
  31135. begin
  31136. if thebits = 0 then
  31137. pTDefRegMap(@Self)^.clr := $00000020
  31138. else
  31139. pTDefRegMap(@Self)^.&set := $00000020;
  31140. end;
  31141. function TSPI2_SPI2ACON.getMSTEN : TBits_1; inline;
  31142. begin
  31143. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31144. end;
  31145. procedure TSPI2_SPI2ACON.setCKP; inline;
  31146. begin
  31147. pTDefRegMap(@Self)^.&set := $00000040;
  31148. end;
  31149. procedure TSPI2_SPI2ACON.clearCKP; inline;
  31150. begin
  31151. pTDefRegMap(@Self)^.clr := $00000040;
  31152. end;
  31153. procedure TSPI2_SPI2ACON.setCKP(thebits : TBits_1); inline;
  31154. begin
  31155. if thebits = 0 then
  31156. pTDefRegMap(@Self)^.clr := $00000040
  31157. else
  31158. pTDefRegMap(@Self)^.&set := $00000040;
  31159. end;
  31160. function TSPI2_SPI2ACON.getCKP : TBits_1; inline;
  31161. begin
  31162. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31163. end;
  31164. procedure TSPI2_SPI2ACON.setSSEN; inline;
  31165. begin
  31166. pTDefRegMap(@Self)^.&set := $00000080;
  31167. end;
  31168. procedure TSPI2_SPI2ACON.clearSSEN; inline;
  31169. begin
  31170. pTDefRegMap(@Self)^.clr := $00000080;
  31171. end;
  31172. procedure TSPI2_SPI2ACON.setSSEN(thebits : TBits_1); inline;
  31173. begin
  31174. if thebits = 0 then
  31175. pTDefRegMap(@Self)^.clr := $00000080
  31176. else
  31177. pTDefRegMap(@Self)^.&set := $00000080;
  31178. end;
  31179. function TSPI2_SPI2ACON.getSSEN : TBits_1; inline;
  31180. begin
  31181. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31182. end;
  31183. procedure TSPI2_SPI2ACON.setCKE; inline;
  31184. begin
  31185. pTDefRegMap(@Self)^.&set := $00000100;
  31186. end;
  31187. procedure TSPI2_SPI2ACON.clearCKE; inline;
  31188. begin
  31189. pTDefRegMap(@Self)^.clr := $00000100;
  31190. end;
  31191. procedure TSPI2_SPI2ACON.setCKE(thebits : TBits_1); inline;
  31192. begin
  31193. if thebits = 0 then
  31194. pTDefRegMap(@Self)^.clr := $00000100
  31195. else
  31196. pTDefRegMap(@Self)^.&set := $00000100;
  31197. end;
  31198. function TSPI2_SPI2ACON.getCKE : TBits_1; inline;
  31199. begin
  31200. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  31201. end;
  31202. procedure TSPI2_SPI2ACON.setSMP; inline;
  31203. begin
  31204. pTDefRegMap(@Self)^.&set := $00000200;
  31205. end;
  31206. procedure TSPI2_SPI2ACON.clearSMP; inline;
  31207. begin
  31208. pTDefRegMap(@Self)^.clr := $00000200;
  31209. end;
  31210. procedure TSPI2_SPI2ACON.setSMP(thebits : TBits_1); inline;
  31211. begin
  31212. if thebits = 0 then
  31213. pTDefRegMap(@Self)^.clr := $00000200
  31214. else
  31215. pTDefRegMap(@Self)^.&set := $00000200;
  31216. end;
  31217. function TSPI2_SPI2ACON.getSMP : TBits_1; inline;
  31218. begin
  31219. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  31220. end;
  31221. procedure TSPI2_SPI2ACON.setMODE16; inline;
  31222. begin
  31223. pTDefRegMap(@Self)^.&set := $00000400;
  31224. end;
  31225. procedure TSPI2_SPI2ACON.clearMODE16; inline;
  31226. begin
  31227. pTDefRegMap(@Self)^.clr := $00000400;
  31228. end;
  31229. procedure TSPI2_SPI2ACON.setMODE16(thebits : TBits_1); inline;
  31230. begin
  31231. if thebits = 0 then
  31232. pTDefRegMap(@Self)^.clr := $00000400
  31233. else
  31234. pTDefRegMap(@Self)^.&set := $00000400;
  31235. end;
  31236. function TSPI2_SPI2ACON.getMODE16 : TBits_1; inline;
  31237. begin
  31238. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  31239. end;
  31240. procedure TSPI2_SPI2ACON.setMODE32; inline;
  31241. begin
  31242. pTDefRegMap(@Self)^.&set := $00000800;
  31243. end;
  31244. procedure TSPI2_SPI2ACON.clearMODE32; inline;
  31245. begin
  31246. pTDefRegMap(@Self)^.clr := $00000800;
  31247. end;
  31248. procedure TSPI2_SPI2ACON.setMODE32(thebits : TBits_1); inline;
  31249. begin
  31250. if thebits = 0 then
  31251. pTDefRegMap(@Self)^.clr := $00000800
  31252. else
  31253. pTDefRegMap(@Self)^.&set := $00000800;
  31254. end;
  31255. function TSPI2_SPI2ACON.getMODE32 : TBits_1; inline;
  31256. begin
  31257. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31258. end;
  31259. procedure TSPI2_SPI2ACON.setDISSDO; inline;
  31260. begin
  31261. pTDefRegMap(@Self)^.&set := $00001000;
  31262. end;
  31263. procedure TSPI2_SPI2ACON.clearDISSDO; inline;
  31264. begin
  31265. pTDefRegMap(@Self)^.clr := $00001000;
  31266. end;
  31267. procedure TSPI2_SPI2ACON.setDISSDO(thebits : TBits_1); inline;
  31268. begin
  31269. if thebits = 0 then
  31270. pTDefRegMap(@Self)^.clr := $00001000
  31271. else
  31272. pTDefRegMap(@Self)^.&set := $00001000;
  31273. end;
  31274. function TSPI2_SPI2ACON.getDISSDO : TBits_1; inline;
  31275. begin
  31276. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  31277. end;
  31278. procedure TSPI2_SPI2ACON.setSIDL; inline;
  31279. begin
  31280. pTDefRegMap(@Self)^.&set := $00002000;
  31281. end;
  31282. procedure TSPI2_SPI2ACON.clearSIDL; inline;
  31283. begin
  31284. pTDefRegMap(@Self)^.clr := $00002000;
  31285. end;
  31286. procedure TSPI2_SPI2ACON.setSIDL(thebits : TBits_1); inline;
  31287. begin
  31288. if thebits = 0 then
  31289. pTDefRegMap(@Self)^.clr := $00002000
  31290. else
  31291. pTDefRegMap(@Self)^.&set := $00002000;
  31292. end;
  31293. function TSPI2_SPI2ACON.getSIDL : TBits_1; inline;
  31294. begin
  31295. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31296. end;
  31297. procedure TSPI2_SPI2ACON.setON; inline;
  31298. begin
  31299. pTDefRegMap(@Self)^.&set := $00008000;
  31300. end;
  31301. procedure TSPI2_SPI2ACON.clearON; inline;
  31302. begin
  31303. pTDefRegMap(@Self)^.clr := $00008000;
  31304. end;
  31305. procedure TSPI2_SPI2ACON.setON(thebits : TBits_1); inline;
  31306. begin
  31307. if thebits = 0 then
  31308. pTDefRegMap(@Self)^.clr := $00008000
  31309. else
  31310. pTDefRegMap(@Self)^.&set := $00008000;
  31311. end;
  31312. function TSPI2_SPI2ACON.getON : TBits_1; inline;
  31313. begin
  31314. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31315. end;
  31316. procedure TSPI2_SPI2ACON.setENHBUF; inline;
  31317. begin
  31318. pTDefRegMap(@Self)^.&set := $00010000;
  31319. end;
  31320. procedure TSPI2_SPI2ACON.clearENHBUF; inline;
  31321. begin
  31322. pTDefRegMap(@Self)^.clr := $00010000;
  31323. end;
  31324. procedure TSPI2_SPI2ACON.setENHBUF(thebits : TBits_1); inline;
  31325. begin
  31326. if thebits = 0 then
  31327. pTDefRegMap(@Self)^.clr := $00010000
  31328. else
  31329. pTDefRegMap(@Self)^.&set := $00010000;
  31330. end;
  31331. function TSPI2_SPI2ACON.getENHBUF : TBits_1; inline;
  31332. begin
  31333. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  31334. end;
  31335. procedure TSPI2_SPI2ACON.setSPIFE; inline;
  31336. begin
  31337. pTDefRegMap(@Self)^.&set := $00020000;
  31338. end;
  31339. procedure TSPI2_SPI2ACON.clearSPIFE; inline;
  31340. begin
  31341. pTDefRegMap(@Self)^.clr := $00020000;
  31342. end;
  31343. procedure TSPI2_SPI2ACON.setSPIFE(thebits : TBits_1); inline;
  31344. begin
  31345. if thebits = 0 then
  31346. pTDefRegMap(@Self)^.clr := $00020000
  31347. else
  31348. pTDefRegMap(@Self)^.&set := $00020000;
  31349. end;
  31350. function TSPI2_SPI2ACON.getSPIFE : TBits_1; inline;
  31351. begin
  31352. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  31353. end;
  31354. procedure TSPI2_SPI2ACON.setFRMCNT(thebits : TBits_3); inline;
  31355. begin
  31356. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  31357. end;
  31358. function TSPI2_SPI2ACON.getFRMCNT : TBits_3; inline;
  31359. begin
  31360. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  31361. end;
  31362. procedure TSPI2_SPI2ACON.setFRMSYPW; inline;
  31363. begin
  31364. pTDefRegMap(@Self)^.&set := $08000000;
  31365. end;
  31366. procedure TSPI2_SPI2ACON.clearFRMSYPW; inline;
  31367. begin
  31368. pTDefRegMap(@Self)^.clr := $08000000;
  31369. end;
  31370. procedure TSPI2_SPI2ACON.setFRMSYPW(thebits : TBits_1); inline;
  31371. begin
  31372. if thebits = 0 then
  31373. pTDefRegMap(@Self)^.clr := $08000000
  31374. else
  31375. pTDefRegMap(@Self)^.&set := $08000000;
  31376. end;
  31377. function TSPI2_SPI2ACON.getFRMSYPW : TBits_1; inline;
  31378. begin
  31379. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  31380. end;
  31381. procedure TSPI2_SPI2ACON.setMSSEN; inline;
  31382. begin
  31383. pTDefRegMap(@Self)^.&set := $10000000;
  31384. end;
  31385. procedure TSPI2_SPI2ACON.clearMSSEN; inline;
  31386. begin
  31387. pTDefRegMap(@Self)^.clr := $10000000;
  31388. end;
  31389. procedure TSPI2_SPI2ACON.setMSSEN(thebits : TBits_1); inline;
  31390. begin
  31391. if thebits = 0 then
  31392. pTDefRegMap(@Self)^.clr := $10000000
  31393. else
  31394. pTDefRegMap(@Self)^.&set := $10000000;
  31395. end;
  31396. function TSPI2_SPI2ACON.getMSSEN : TBits_1; inline;
  31397. begin
  31398. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  31399. end;
  31400. procedure TSPI2_SPI2ACON.setFRMPOL; inline;
  31401. begin
  31402. pTDefRegMap(@Self)^.&set := $20000000;
  31403. end;
  31404. procedure TSPI2_SPI2ACON.clearFRMPOL; inline;
  31405. begin
  31406. pTDefRegMap(@Self)^.clr := $20000000;
  31407. end;
  31408. procedure TSPI2_SPI2ACON.setFRMPOL(thebits : TBits_1); inline;
  31409. begin
  31410. if thebits = 0 then
  31411. pTDefRegMap(@Self)^.clr := $20000000
  31412. else
  31413. pTDefRegMap(@Self)^.&set := $20000000;
  31414. end;
  31415. function TSPI2_SPI2ACON.getFRMPOL : TBits_1; inline;
  31416. begin
  31417. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  31418. end;
  31419. procedure TSPI2_SPI2ACON.setFRMSYNC; inline;
  31420. begin
  31421. pTDefRegMap(@Self)^.&set := $40000000;
  31422. end;
  31423. procedure TSPI2_SPI2ACON.clearFRMSYNC; inline;
  31424. begin
  31425. pTDefRegMap(@Self)^.clr := $40000000;
  31426. end;
  31427. procedure TSPI2_SPI2ACON.setFRMSYNC(thebits : TBits_1); inline;
  31428. begin
  31429. if thebits = 0 then
  31430. pTDefRegMap(@Self)^.clr := $40000000
  31431. else
  31432. pTDefRegMap(@Self)^.&set := $40000000;
  31433. end;
  31434. function TSPI2_SPI2ACON.getFRMSYNC : TBits_1; inline;
  31435. begin
  31436. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  31437. end;
  31438. procedure TSPI2_SPI2ACON.setFRMEN; inline;
  31439. begin
  31440. pTDefRegMap(@Self)^.&set := $80000000;
  31441. end;
  31442. procedure TSPI2_SPI2ACON.clearFRMEN; inline;
  31443. begin
  31444. pTDefRegMap(@Self)^.clr := $80000000;
  31445. end;
  31446. procedure TSPI2_SPI2ACON.setFRMEN(thebits : TBits_1); inline;
  31447. begin
  31448. if thebits = 0 then
  31449. pTDefRegMap(@Self)^.clr := $80000000
  31450. else
  31451. pTDefRegMap(@Self)^.&set := $80000000;
  31452. end;
  31453. function TSPI2_SPI2ACON.getFRMEN : TBits_1; inline;
  31454. begin
  31455. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  31456. end;
  31457. procedure TSPI2_SPI2ACON.setw(thebits : TBits_32); inline;
  31458. begin
  31459. pTDefRegMap(@Self)^.val := thebits;
  31460. end;
  31461. function TSPI2_SPI2ACON.getw : TBits_32; inline;
  31462. begin
  31463. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31464. end;
  31465. procedure TSPI2_SPI2CON.setSRXISEL(thebits : TBits_2); inline;
  31466. begin
  31467. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  31468. end;
  31469. function TSPI2_SPI2CON.getSRXISEL : TBits_2; inline;
  31470. begin
  31471. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  31472. end;
  31473. procedure TSPI2_SPI2CON.setSTXISEL(thebits : TBits_2); inline;
  31474. begin
  31475. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  31476. end;
  31477. function TSPI2_SPI2CON.getSTXISEL : TBits_2; inline;
  31478. begin
  31479. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  31480. end;
  31481. procedure TSPI2_SPI2CON.setMSTEN; inline;
  31482. begin
  31483. pTDefRegMap(@Self)^.&set := $00000020;
  31484. end;
  31485. procedure TSPI2_SPI2CON.clearMSTEN; inline;
  31486. begin
  31487. pTDefRegMap(@Self)^.clr := $00000020;
  31488. end;
  31489. procedure TSPI2_SPI2CON.setMSTEN(thebits : TBits_1); inline;
  31490. begin
  31491. if thebits = 0 then
  31492. pTDefRegMap(@Self)^.clr := $00000020
  31493. else
  31494. pTDefRegMap(@Self)^.&set := $00000020;
  31495. end;
  31496. function TSPI2_SPI2CON.getMSTEN : TBits_1; inline;
  31497. begin
  31498. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31499. end;
  31500. procedure TSPI2_SPI2CON.setCKP; inline;
  31501. begin
  31502. pTDefRegMap(@Self)^.&set := $00000040;
  31503. end;
  31504. procedure TSPI2_SPI2CON.clearCKP; inline;
  31505. begin
  31506. pTDefRegMap(@Self)^.clr := $00000040;
  31507. end;
  31508. procedure TSPI2_SPI2CON.setCKP(thebits : TBits_1); inline;
  31509. begin
  31510. if thebits = 0 then
  31511. pTDefRegMap(@Self)^.clr := $00000040
  31512. else
  31513. pTDefRegMap(@Self)^.&set := $00000040;
  31514. end;
  31515. function TSPI2_SPI2CON.getCKP : TBits_1; inline;
  31516. begin
  31517. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31518. end;
  31519. procedure TSPI2_SPI2CON.setSSEN; inline;
  31520. begin
  31521. pTDefRegMap(@Self)^.&set := $00000080;
  31522. end;
  31523. procedure TSPI2_SPI2CON.clearSSEN; inline;
  31524. begin
  31525. pTDefRegMap(@Self)^.clr := $00000080;
  31526. end;
  31527. procedure TSPI2_SPI2CON.setSSEN(thebits : TBits_1); inline;
  31528. begin
  31529. if thebits = 0 then
  31530. pTDefRegMap(@Self)^.clr := $00000080
  31531. else
  31532. pTDefRegMap(@Self)^.&set := $00000080;
  31533. end;
  31534. function TSPI2_SPI2CON.getSSEN : TBits_1; inline;
  31535. begin
  31536. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31537. end;
  31538. procedure TSPI2_SPI2CON.setCKE; inline;
  31539. begin
  31540. pTDefRegMap(@Self)^.&set := $00000100;
  31541. end;
  31542. procedure TSPI2_SPI2CON.clearCKE; inline;
  31543. begin
  31544. pTDefRegMap(@Self)^.clr := $00000100;
  31545. end;
  31546. procedure TSPI2_SPI2CON.setCKE(thebits : TBits_1); inline;
  31547. begin
  31548. if thebits = 0 then
  31549. pTDefRegMap(@Self)^.clr := $00000100
  31550. else
  31551. pTDefRegMap(@Self)^.&set := $00000100;
  31552. end;
  31553. function TSPI2_SPI2CON.getCKE : TBits_1; inline;
  31554. begin
  31555. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  31556. end;
  31557. procedure TSPI2_SPI2CON.setSMP; inline;
  31558. begin
  31559. pTDefRegMap(@Self)^.&set := $00000200;
  31560. end;
  31561. procedure TSPI2_SPI2CON.clearSMP; inline;
  31562. begin
  31563. pTDefRegMap(@Self)^.clr := $00000200;
  31564. end;
  31565. procedure TSPI2_SPI2CON.setSMP(thebits : TBits_1); inline;
  31566. begin
  31567. if thebits = 0 then
  31568. pTDefRegMap(@Self)^.clr := $00000200
  31569. else
  31570. pTDefRegMap(@Self)^.&set := $00000200;
  31571. end;
  31572. function TSPI2_SPI2CON.getSMP : TBits_1; inline;
  31573. begin
  31574. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  31575. end;
  31576. procedure TSPI2_SPI2CON.setMODE16; inline;
  31577. begin
  31578. pTDefRegMap(@Self)^.&set := $00000400;
  31579. end;
  31580. procedure TSPI2_SPI2CON.clearMODE16; inline;
  31581. begin
  31582. pTDefRegMap(@Self)^.clr := $00000400;
  31583. end;
  31584. procedure TSPI2_SPI2CON.setMODE16(thebits : TBits_1); inline;
  31585. begin
  31586. if thebits = 0 then
  31587. pTDefRegMap(@Self)^.clr := $00000400
  31588. else
  31589. pTDefRegMap(@Self)^.&set := $00000400;
  31590. end;
  31591. function TSPI2_SPI2CON.getMODE16 : TBits_1; inline;
  31592. begin
  31593. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  31594. end;
  31595. procedure TSPI2_SPI2CON.setMODE32; inline;
  31596. begin
  31597. pTDefRegMap(@Self)^.&set := $00000800;
  31598. end;
  31599. procedure TSPI2_SPI2CON.clearMODE32; inline;
  31600. begin
  31601. pTDefRegMap(@Self)^.clr := $00000800;
  31602. end;
  31603. procedure TSPI2_SPI2CON.setMODE32(thebits : TBits_1); inline;
  31604. begin
  31605. if thebits = 0 then
  31606. pTDefRegMap(@Self)^.clr := $00000800
  31607. else
  31608. pTDefRegMap(@Self)^.&set := $00000800;
  31609. end;
  31610. function TSPI2_SPI2CON.getMODE32 : TBits_1; inline;
  31611. begin
  31612. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31613. end;
  31614. procedure TSPI2_SPI2CON.setDISSDO; inline;
  31615. begin
  31616. pTDefRegMap(@Self)^.&set := $00001000;
  31617. end;
  31618. procedure TSPI2_SPI2CON.clearDISSDO; inline;
  31619. begin
  31620. pTDefRegMap(@Self)^.clr := $00001000;
  31621. end;
  31622. procedure TSPI2_SPI2CON.setDISSDO(thebits : TBits_1); inline;
  31623. begin
  31624. if thebits = 0 then
  31625. pTDefRegMap(@Self)^.clr := $00001000
  31626. else
  31627. pTDefRegMap(@Self)^.&set := $00001000;
  31628. end;
  31629. function TSPI2_SPI2CON.getDISSDO : TBits_1; inline;
  31630. begin
  31631. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  31632. end;
  31633. procedure TSPI2_SPI2CON.setSIDL; inline;
  31634. begin
  31635. pTDefRegMap(@Self)^.&set := $00002000;
  31636. end;
  31637. procedure TSPI2_SPI2CON.clearSIDL; inline;
  31638. begin
  31639. pTDefRegMap(@Self)^.clr := $00002000;
  31640. end;
  31641. procedure TSPI2_SPI2CON.setSIDL(thebits : TBits_1); inline;
  31642. begin
  31643. if thebits = 0 then
  31644. pTDefRegMap(@Self)^.clr := $00002000
  31645. else
  31646. pTDefRegMap(@Self)^.&set := $00002000;
  31647. end;
  31648. function TSPI2_SPI2CON.getSIDL : TBits_1; inline;
  31649. begin
  31650. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31651. end;
  31652. procedure TSPI2_SPI2CON.setON; inline;
  31653. begin
  31654. pTDefRegMap(@Self)^.&set := $00008000;
  31655. end;
  31656. procedure TSPI2_SPI2CON.clearON; inline;
  31657. begin
  31658. pTDefRegMap(@Self)^.clr := $00008000;
  31659. end;
  31660. procedure TSPI2_SPI2CON.setON(thebits : TBits_1); inline;
  31661. begin
  31662. if thebits = 0 then
  31663. pTDefRegMap(@Self)^.clr := $00008000
  31664. else
  31665. pTDefRegMap(@Self)^.&set := $00008000;
  31666. end;
  31667. function TSPI2_SPI2CON.getON : TBits_1; inline;
  31668. begin
  31669. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31670. end;
  31671. procedure TSPI2_SPI2CON.setENHBUF; inline;
  31672. begin
  31673. pTDefRegMap(@Self)^.&set := $00010000;
  31674. end;
  31675. procedure TSPI2_SPI2CON.clearENHBUF; inline;
  31676. begin
  31677. pTDefRegMap(@Self)^.clr := $00010000;
  31678. end;
  31679. procedure TSPI2_SPI2CON.setENHBUF(thebits : TBits_1); inline;
  31680. begin
  31681. if thebits = 0 then
  31682. pTDefRegMap(@Self)^.clr := $00010000
  31683. else
  31684. pTDefRegMap(@Self)^.&set := $00010000;
  31685. end;
  31686. function TSPI2_SPI2CON.getENHBUF : TBits_1; inline;
  31687. begin
  31688. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  31689. end;
  31690. procedure TSPI2_SPI2CON.setSPIFE; inline;
  31691. begin
  31692. pTDefRegMap(@Self)^.&set := $00020000;
  31693. end;
  31694. procedure TSPI2_SPI2CON.clearSPIFE; inline;
  31695. begin
  31696. pTDefRegMap(@Self)^.clr := $00020000;
  31697. end;
  31698. procedure TSPI2_SPI2CON.setSPIFE(thebits : TBits_1); inline;
  31699. begin
  31700. if thebits = 0 then
  31701. pTDefRegMap(@Self)^.clr := $00020000
  31702. else
  31703. pTDefRegMap(@Self)^.&set := $00020000;
  31704. end;
  31705. function TSPI2_SPI2CON.getSPIFE : TBits_1; inline;
  31706. begin
  31707. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  31708. end;
  31709. procedure TSPI2_SPI2CON.setFRMCNT(thebits : TBits_3); inline;
  31710. begin
  31711. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  31712. end;
  31713. function TSPI2_SPI2CON.getFRMCNT : TBits_3; inline;
  31714. begin
  31715. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  31716. end;
  31717. procedure TSPI2_SPI2CON.setFRMSYPW; inline;
  31718. begin
  31719. pTDefRegMap(@Self)^.&set := $08000000;
  31720. end;
  31721. procedure TSPI2_SPI2CON.clearFRMSYPW; inline;
  31722. begin
  31723. pTDefRegMap(@Self)^.clr := $08000000;
  31724. end;
  31725. procedure TSPI2_SPI2CON.setFRMSYPW(thebits : TBits_1); inline;
  31726. begin
  31727. if thebits = 0 then
  31728. pTDefRegMap(@Self)^.clr := $08000000
  31729. else
  31730. pTDefRegMap(@Self)^.&set := $08000000;
  31731. end;
  31732. function TSPI2_SPI2CON.getFRMSYPW : TBits_1; inline;
  31733. begin
  31734. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  31735. end;
  31736. procedure TSPI2_SPI2CON.setMSSEN; inline;
  31737. begin
  31738. pTDefRegMap(@Self)^.&set := $10000000;
  31739. end;
  31740. procedure TSPI2_SPI2CON.clearMSSEN; inline;
  31741. begin
  31742. pTDefRegMap(@Self)^.clr := $10000000;
  31743. end;
  31744. procedure TSPI2_SPI2CON.setMSSEN(thebits : TBits_1); inline;
  31745. begin
  31746. if thebits = 0 then
  31747. pTDefRegMap(@Self)^.clr := $10000000
  31748. else
  31749. pTDefRegMap(@Self)^.&set := $10000000;
  31750. end;
  31751. function TSPI2_SPI2CON.getMSSEN : TBits_1; inline;
  31752. begin
  31753. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  31754. end;
  31755. procedure TSPI2_SPI2CON.setFRMPOL; inline;
  31756. begin
  31757. pTDefRegMap(@Self)^.&set := $20000000;
  31758. end;
  31759. procedure TSPI2_SPI2CON.clearFRMPOL; inline;
  31760. begin
  31761. pTDefRegMap(@Self)^.clr := $20000000;
  31762. end;
  31763. procedure TSPI2_SPI2CON.setFRMPOL(thebits : TBits_1); inline;
  31764. begin
  31765. if thebits = 0 then
  31766. pTDefRegMap(@Self)^.clr := $20000000
  31767. else
  31768. pTDefRegMap(@Self)^.&set := $20000000;
  31769. end;
  31770. function TSPI2_SPI2CON.getFRMPOL : TBits_1; inline;
  31771. begin
  31772. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  31773. end;
  31774. procedure TSPI2_SPI2CON.setFRMSYNC; inline;
  31775. begin
  31776. pTDefRegMap(@Self)^.&set := $40000000;
  31777. end;
  31778. procedure TSPI2_SPI2CON.clearFRMSYNC; inline;
  31779. begin
  31780. pTDefRegMap(@Self)^.clr := $40000000;
  31781. end;
  31782. procedure TSPI2_SPI2CON.setFRMSYNC(thebits : TBits_1); inline;
  31783. begin
  31784. if thebits = 0 then
  31785. pTDefRegMap(@Self)^.clr := $40000000
  31786. else
  31787. pTDefRegMap(@Self)^.&set := $40000000;
  31788. end;
  31789. function TSPI2_SPI2CON.getFRMSYNC : TBits_1; inline;
  31790. begin
  31791. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  31792. end;
  31793. procedure TSPI2_SPI2CON.setFRMEN; inline;
  31794. begin
  31795. pTDefRegMap(@Self)^.&set := $80000000;
  31796. end;
  31797. procedure TSPI2_SPI2CON.clearFRMEN; inline;
  31798. begin
  31799. pTDefRegMap(@Self)^.clr := $80000000;
  31800. end;
  31801. procedure TSPI2_SPI2CON.setFRMEN(thebits : TBits_1); inline;
  31802. begin
  31803. if thebits = 0 then
  31804. pTDefRegMap(@Self)^.clr := $80000000
  31805. else
  31806. pTDefRegMap(@Self)^.&set := $80000000;
  31807. end;
  31808. function TSPI2_SPI2CON.getFRMEN : TBits_1; inline;
  31809. begin
  31810. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  31811. end;
  31812. procedure TSPI2_SPI2CON.setw(thebits : TBits_32); inline;
  31813. begin
  31814. pTDefRegMap(@Self)^.val := thebits;
  31815. end;
  31816. function TSPI2_SPI2CON.getw : TBits_32; inline;
  31817. begin
  31818. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31819. end;
  31820. procedure TSPI2_SPI2ASTAT.setSPIRBF; inline;
  31821. begin
  31822. pTDefRegMap(@Self)^.&set := $00000001;
  31823. end;
  31824. procedure TSPI2_SPI2ASTAT.clearSPIRBF; inline;
  31825. begin
  31826. pTDefRegMap(@Self)^.clr := $00000001;
  31827. end;
  31828. procedure TSPI2_SPI2ASTAT.setSPIRBF(thebits : TBits_1); inline;
  31829. begin
  31830. if thebits = 0 then
  31831. pTDefRegMap(@Self)^.clr := $00000001
  31832. else
  31833. pTDefRegMap(@Self)^.&set := $00000001;
  31834. end;
  31835. function TSPI2_SPI2ASTAT.getSPIRBF : TBits_1; inline;
  31836. begin
  31837. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  31838. end;
  31839. procedure TSPI2_SPI2ASTAT.setSPITBF; inline;
  31840. begin
  31841. pTDefRegMap(@Self)^.&set := $00000002;
  31842. end;
  31843. procedure TSPI2_SPI2ASTAT.clearSPITBF; inline;
  31844. begin
  31845. pTDefRegMap(@Self)^.clr := $00000002;
  31846. end;
  31847. procedure TSPI2_SPI2ASTAT.setSPITBF(thebits : TBits_1); inline;
  31848. begin
  31849. if thebits = 0 then
  31850. pTDefRegMap(@Self)^.clr := $00000002
  31851. else
  31852. pTDefRegMap(@Self)^.&set := $00000002;
  31853. end;
  31854. function TSPI2_SPI2ASTAT.getSPITBF : TBits_1; inline;
  31855. begin
  31856. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  31857. end;
  31858. procedure TSPI2_SPI2ASTAT.setSPITBE; inline;
  31859. begin
  31860. pTDefRegMap(@Self)^.&set := $00000008;
  31861. end;
  31862. procedure TSPI2_SPI2ASTAT.clearSPITBE; inline;
  31863. begin
  31864. pTDefRegMap(@Self)^.clr := $00000008;
  31865. end;
  31866. procedure TSPI2_SPI2ASTAT.setSPITBE(thebits : TBits_1); inline;
  31867. begin
  31868. if thebits = 0 then
  31869. pTDefRegMap(@Self)^.clr := $00000008
  31870. else
  31871. pTDefRegMap(@Self)^.&set := $00000008;
  31872. end;
  31873. function TSPI2_SPI2ASTAT.getSPITBE : TBits_1; inline;
  31874. begin
  31875. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  31876. end;
  31877. procedure TSPI2_SPI2ASTAT.setSPIRBE; inline;
  31878. begin
  31879. pTDefRegMap(@Self)^.&set := $00000020;
  31880. end;
  31881. procedure TSPI2_SPI2ASTAT.clearSPIRBE; inline;
  31882. begin
  31883. pTDefRegMap(@Self)^.clr := $00000020;
  31884. end;
  31885. procedure TSPI2_SPI2ASTAT.setSPIRBE(thebits : TBits_1); inline;
  31886. begin
  31887. if thebits = 0 then
  31888. pTDefRegMap(@Self)^.clr := $00000020
  31889. else
  31890. pTDefRegMap(@Self)^.&set := $00000020;
  31891. end;
  31892. function TSPI2_SPI2ASTAT.getSPIRBE : TBits_1; inline;
  31893. begin
  31894. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31895. end;
  31896. procedure TSPI2_SPI2ASTAT.setSPIROV; inline;
  31897. begin
  31898. pTDefRegMap(@Self)^.&set := $00000040;
  31899. end;
  31900. procedure TSPI2_SPI2ASTAT.clearSPIROV; inline;
  31901. begin
  31902. pTDefRegMap(@Self)^.clr := $00000040;
  31903. end;
  31904. procedure TSPI2_SPI2ASTAT.setSPIROV(thebits : TBits_1); inline;
  31905. begin
  31906. if thebits = 0 then
  31907. pTDefRegMap(@Self)^.clr := $00000040
  31908. else
  31909. pTDefRegMap(@Self)^.&set := $00000040;
  31910. end;
  31911. function TSPI2_SPI2ASTAT.getSPIROV : TBits_1; inline;
  31912. begin
  31913. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31914. end;
  31915. procedure TSPI2_SPI2ASTAT.setSRMT; inline;
  31916. begin
  31917. pTDefRegMap(@Self)^.&set := $00000080;
  31918. end;
  31919. procedure TSPI2_SPI2ASTAT.clearSRMT; inline;
  31920. begin
  31921. pTDefRegMap(@Self)^.clr := $00000080;
  31922. end;
  31923. procedure TSPI2_SPI2ASTAT.setSRMT(thebits : TBits_1); inline;
  31924. begin
  31925. if thebits = 0 then
  31926. pTDefRegMap(@Self)^.clr := $00000080
  31927. else
  31928. pTDefRegMap(@Self)^.&set := $00000080;
  31929. end;
  31930. function TSPI2_SPI2ASTAT.getSRMT : TBits_1; inline;
  31931. begin
  31932. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31933. end;
  31934. procedure TSPI2_SPI2ASTAT.setSPITUR; inline;
  31935. begin
  31936. pTDefRegMap(@Self)^.&set := $00000100;
  31937. end;
  31938. procedure TSPI2_SPI2ASTAT.clearSPITUR; inline;
  31939. begin
  31940. pTDefRegMap(@Self)^.clr := $00000100;
  31941. end;
  31942. procedure TSPI2_SPI2ASTAT.setSPITUR(thebits : TBits_1); inline;
  31943. begin
  31944. if thebits = 0 then
  31945. pTDefRegMap(@Self)^.clr := $00000100
  31946. else
  31947. pTDefRegMap(@Self)^.&set := $00000100;
  31948. end;
  31949. function TSPI2_SPI2ASTAT.getSPITUR : TBits_1; inline;
  31950. begin
  31951. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  31952. end;
  31953. procedure TSPI2_SPI2ASTAT.setSPIBUSY; inline;
  31954. begin
  31955. pTDefRegMap(@Self)^.&set := $00000800;
  31956. end;
  31957. procedure TSPI2_SPI2ASTAT.clearSPIBUSY; inline;
  31958. begin
  31959. pTDefRegMap(@Self)^.clr := $00000800;
  31960. end;
  31961. procedure TSPI2_SPI2ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  31962. begin
  31963. if thebits = 0 then
  31964. pTDefRegMap(@Self)^.clr := $00000800
  31965. else
  31966. pTDefRegMap(@Self)^.&set := $00000800;
  31967. end;
  31968. function TSPI2_SPI2ASTAT.getSPIBUSY : TBits_1; inline;
  31969. begin
  31970. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31971. end;
  31972. procedure TSPI2_SPI2ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  31973. begin
  31974. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  31975. end;
  31976. function TSPI2_SPI2ASTAT.getTXBUFELM : TBits_5; inline;
  31977. begin
  31978. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  31979. end;
  31980. procedure TSPI2_SPI2ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  31981. begin
  31982. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  31983. end;
  31984. function TSPI2_SPI2ASTAT.getRXBUFELM : TBits_5; inline;
  31985. begin
  31986. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  31987. end;
  31988. procedure TSPI2_SPI2ASTAT.setw(thebits : TBits_32); inline;
  31989. begin
  31990. pTDefRegMap(@Self)^.val := thebits;
  31991. end;
  31992. function TSPI2_SPI2ASTAT.getw : TBits_32; inline;
  31993. begin
  31994. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31995. end;
  31996. procedure TSPI2_SPI2STAT.setSPIRBF; inline;
  31997. begin
  31998. pTDefRegMap(@Self)^.&set := $00000001;
  31999. end;
  32000. procedure TSPI2_SPI2STAT.clearSPIRBF; inline;
  32001. begin
  32002. pTDefRegMap(@Self)^.clr := $00000001;
  32003. end;
  32004. procedure TSPI2_SPI2STAT.setSPIRBF(thebits : TBits_1); inline;
  32005. begin
  32006. if thebits = 0 then
  32007. pTDefRegMap(@Self)^.clr := $00000001
  32008. else
  32009. pTDefRegMap(@Self)^.&set := $00000001;
  32010. end;
  32011. function TSPI2_SPI2STAT.getSPIRBF : TBits_1; inline;
  32012. begin
  32013. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  32014. end;
  32015. procedure TSPI2_SPI2STAT.setSPITBF; inline;
  32016. begin
  32017. pTDefRegMap(@Self)^.&set := $00000002;
  32018. end;
  32019. procedure TSPI2_SPI2STAT.clearSPITBF; inline;
  32020. begin
  32021. pTDefRegMap(@Self)^.clr := $00000002;
  32022. end;
  32023. procedure TSPI2_SPI2STAT.setSPITBF(thebits : TBits_1); inline;
  32024. begin
  32025. if thebits = 0 then
  32026. pTDefRegMap(@Self)^.clr := $00000002
  32027. else
  32028. pTDefRegMap(@Self)^.&set := $00000002;
  32029. end;
  32030. function TSPI2_SPI2STAT.getSPITBF : TBits_1; inline;
  32031. begin
  32032. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32033. end;
  32034. procedure TSPI2_SPI2STAT.setSPITBE; inline;
  32035. begin
  32036. pTDefRegMap(@Self)^.&set := $00000008;
  32037. end;
  32038. procedure TSPI2_SPI2STAT.clearSPITBE; inline;
  32039. begin
  32040. pTDefRegMap(@Self)^.clr := $00000008;
  32041. end;
  32042. procedure TSPI2_SPI2STAT.setSPITBE(thebits : TBits_1); inline;
  32043. begin
  32044. if thebits = 0 then
  32045. pTDefRegMap(@Self)^.clr := $00000008
  32046. else
  32047. pTDefRegMap(@Self)^.&set := $00000008;
  32048. end;
  32049. function TSPI2_SPI2STAT.getSPITBE : TBits_1; inline;
  32050. begin
  32051. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32052. end;
  32053. procedure TSPI2_SPI2STAT.setSPIRBE; inline;
  32054. begin
  32055. pTDefRegMap(@Self)^.&set := $00000020;
  32056. end;
  32057. procedure TSPI2_SPI2STAT.clearSPIRBE; inline;
  32058. begin
  32059. pTDefRegMap(@Self)^.clr := $00000020;
  32060. end;
  32061. procedure TSPI2_SPI2STAT.setSPIRBE(thebits : TBits_1); inline;
  32062. begin
  32063. if thebits = 0 then
  32064. pTDefRegMap(@Self)^.clr := $00000020
  32065. else
  32066. pTDefRegMap(@Self)^.&set := $00000020;
  32067. end;
  32068. function TSPI2_SPI2STAT.getSPIRBE : TBits_1; inline;
  32069. begin
  32070. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32071. end;
  32072. procedure TSPI2_SPI2STAT.setSPIROV; inline;
  32073. begin
  32074. pTDefRegMap(@Self)^.&set := $00000040;
  32075. end;
  32076. procedure TSPI2_SPI2STAT.clearSPIROV; inline;
  32077. begin
  32078. pTDefRegMap(@Self)^.clr := $00000040;
  32079. end;
  32080. procedure TSPI2_SPI2STAT.setSPIROV(thebits : TBits_1); inline;
  32081. begin
  32082. if thebits = 0 then
  32083. pTDefRegMap(@Self)^.clr := $00000040
  32084. else
  32085. pTDefRegMap(@Self)^.&set := $00000040;
  32086. end;
  32087. function TSPI2_SPI2STAT.getSPIROV : TBits_1; inline;
  32088. begin
  32089. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32090. end;
  32091. procedure TSPI2_SPI2STAT.setSRMT; inline;
  32092. begin
  32093. pTDefRegMap(@Self)^.&set := $00000080;
  32094. end;
  32095. procedure TSPI2_SPI2STAT.clearSRMT; inline;
  32096. begin
  32097. pTDefRegMap(@Self)^.clr := $00000080;
  32098. end;
  32099. procedure TSPI2_SPI2STAT.setSRMT(thebits : TBits_1); inline;
  32100. begin
  32101. if thebits = 0 then
  32102. pTDefRegMap(@Self)^.clr := $00000080
  32103. else
  32104. pTDefRegMap(@Self)^.&set := $00000080;
  32105. end;
  32106. function TSPI2_SPI2STAT.getSRMT : TBits_1; inline;
  32107. begin
  32108. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32109. end;
  32110. procedure TSPI2_SPI2STAT.setSPITUR; inline;
  32111. begin
  32112. pTDefRegMap(@Self)^.&set := $00000100;
  32113. end;
  32114. procedure TSPI2_SPI2STAT.clearSPITUR; inline;
  32115. begin
  32116. pTDefRegMap(@Self)^.clr := $00000100;
  32117. end;
  32118. procedure TSPI2_SPI2STAT.setSPITUR(thebits : TBits_1); inline;
  32119. begin
  32120. if thebits = 0 then
  32121. pTDefRegMap(@Self)^.clr := $00000100
  32122. else
  32123. pTDefRegMap(@Self)^.&set := $00000100;
  32124. end;
  32125. function TSPI2_SPI2STAT.getSPITUR : TBits_1; inline;
  32126. begin
  32127. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32128. end;
  32129. procedure TSPI2_SPI2STAT.setSPIBUSY; inline;
  32130. begin
  32131. pTDefRegMap(@Self)^.&set := $00000800;
  32132. end;
  32133. procedure TSPI2_SPI2STAT.clearSPIBUSY; inline;
  32134. begin
  32135. pTDefRegMap(@Self)^.clr := $00000800;
  32136. end;
  32137. procedure TSPI2_SPI2STAT.setSPIBUSY(thebits : TBits_1); inline;
  32138. begin
  32139. if thebits = 0 then
  32140. pTDefRegMap(@Self)^.clr := $00000800
  32141. else
  32142. pTDefRegMap(@Self)^.&set := $00000800;
  32143. end;
  32144. function TSPI2_SPI2STAT.getSPIBUSY : TBits_1; inline;
  32145. begin
  32146. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  32147. end;
  32148. procedure TSPI2_SPI2STAT.setTXBUFELM(thebits : TBits_5); inline;
  32149. begin
  32150. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  32151. end;
  32152. function TSPI2_SPI2STAT.getTXBUFELM : TBits_5; inline;
  32153. begin
  32154. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  32155. end;
  32156. procedure TSPI2_SPI2STAT.setRXBUFELM(thebits : TBits_5); inline;
  32157. begin
  32158. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  32159. end;
  32160. function TSPI2_SPI2STAT.getRXBUFELM : TBits_5; inline;
  32161. begin
  32162. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  32163. end;
  32164. procedure TSPI2_SPI2STAT.setw(thebits : TBits_32); inline;
  32165. begin
  32166. pTDefRegMap(@Self)^.val := thebits;
  32167. end;
  32168. function TSPI2_SPI2STAT.getw : TBits_32; inline;
  32169. begin
  32170. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32171. end;
  32172. procedure TSPI3A_SPI3ACON.setSRXISEL(thebits : TBits_2); inline;
  32173. begin
  32174. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  32175. end;
  32176. function TSPI3A_SPI3ACON.getSRXISEL : TBits_2; inline;
  32177. begin
  32178. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  32179. end;
  32180. procedure TSPI3A_SPI3ACON.setSTXISEL(thebits : TBits_2); inline;
  32181. begin
  32182. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  32183. end;
  32184. function TSPI3A_SPI3ACON.getSTXISEL : TBits_2; inline;
  32185. begin
  32186. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  32187. end;
  32188. procedure TSPI3A_SPI3ACON.setMSTEN; inline;
  32189. begin
  32190. pTDefRegMap(@Self)^.&set := $00000020;
  32191. end;
  32192. procedure TSPI3A_SPI3ACON.clearMSTEN; inline;
  32193. begin
  32194. pTDefRegMap(@Self)^.clr := $00000020;
  32195. end;
  32196. procedure TSPI3A_SPI3ACON.setMSTEN(thebits : TBits_1); inline;
  32197. begin
  32198. if thebits = 0 then
  32199. pTDefRegMap(@Self)^.clr := $00000020
  32200. else
  32201. pTDefRegMap(@Self)^.&set := $00000020;
  32202. end;
  32203. function TSPI3A_SPI3ACON.getMSTEN : TBits_1; inline;
  32204. begin
  32205. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32206. end;
  32207. procedure TSPI3A_SPI3ACON.setCKP; inline;
  32208. begin
  32209. pTDefRegMap(@Self)^.&set := $00000040;
  32210. end;
  32211. procedure TSPI3A_SPI3ACON.clearCKP; inline;
  32212. begin
  32213. pTDefRegMap(@Self)^.clr := $00000040;
  32214. end;
  32215. procedure TSPI3A_SPI3ACON.setCKP(thebits : TBits_1); inline;
  32216. begin
  32217. if thebits = 0 then
  32218. pTDefRegMap(@Self)^.clr := $00000040
  32219. else
  32220. pTDefRegMap(@Self)^.&set := $00000040;
  32221. end;
  32222. function TSPI3A_SPI3ACON.getCKP : TBits_1; inline;
  32223. begin
  32224. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32225. end;
  32226. procedure TSPI3A_SPI3ACON.setSSEN; inline;
  32227. begin
  32228. pTDefRegMap(@Self)^.&set := $00000080;
  32229. end;
  32230. procedure TSPI3A_SPI3ACON.clearSSEN; inline;
  32231. begin
  32232. pTDefRegMap(@Self)^.clr := $00000080;
  32233. end;
  32234. procedure TSPI3A_SPI3ACON.setSSEN(thebits : TBits_1); inline;
  32235. begin
  32236. if thebits = 0 then
  32237. pTDefRegMap(@Self)^.clr := $00000080
  32238. else
  32239. pTDefRegMap(@Self)^.&set := $00000080;
  32240. end;
  32241. function TSPI3A_SPI3ACON.getSSEN : TBits_1; inline;
  32242. begin
  32243. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32244. end;
  32245. procedure TSPI3A_SPI3ACON.setCKE; inline;
  32246. begin
  32247. pTDefRegMap(@Self)^.&set := $00000100;
  32248. end;
  32249. procedure TSPI3A_SPI3ACON.clearCKE; inline;
  32250. begin
  32251. pTDefRegMap(@Self)^.clr := $00000100;
  32252. end;
  32253. procedure TSPI3A_SPI3ACON.setCKE(thebits : TBits_1); inline;
  32254. begin
  32255. if thebits = 0 then
  32256. pTDefRegMap(@Self)^.clr := $00000100
  32257. else
  32258. pTDefRegMap(@Self)^.&set := $00000100;
  32259. end;
  32260. function TSPI3A_SPI3ACON.getCKE : TBits_1; inline;
  32261. begin
  32262. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32263. end;
  32264. procedure TSPI3A_SPI3ACON.setSMP; inline;
  32265. begin
  32266. pTDefRegMap(@Self)^.&set := $00000200;
  32267. end;
  32268. procedure TSPI3A_SPI3ACON.clearSMP; inline;
  32269. begin
  32270. pTDefRegMap(@Self)^.clr := $00000200;
  32271. end;
  32272. procedure TSPI3A_SPI3ACON.setSMP(thebits : TBits_1); inline;
  32273. begin
  32274. if thebits = 0 then
  32275. pTDefRegMap(@Self)^.clr := $00000200
  32276. else
  32277. pTDefRegMap(@Self)^.&set := $00000200;
  32278. end;
  32279. function TSPI3A_SPI3ACON.getSMP : TBits_1; inline;
  32280. begin
  32281. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  32282. end;
  32283. procedure TSPI3A_SPI3ACON.setMODE16; inline;
  32284. begin
  32285. pTDefRegMap(@Self)^.&set := $00000400;
  32286. end;
  32287. procedure TSPI3A_SPI3ACON.clearMODE16; inline;
  32288. begin
  32289. pTDefRegMap(@Self)^.clr := $00000400;
  32290. end;
  32291. procedure TSPI3A_SPI3ACON.setMODE16(thebits : TBits_1); inline;
  32292. begin
  32293. if thebits = 0 then
  32294. pTDefRegMap(@Self)^.clr := $00000400
  32295. else
  32296. pTDefRegMap(@Self)^.&set := $00000400;
  32297. end;
  32298. function TSPI3A_SPI3ACON.getMODE16 : TBits_1; inline;
  32299. begin
  32300. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  32301. end;
  32302. procedure TSPI3A_SPI3ACON.setMODE32; inline;
  32303. begin
  32304. pTDefRegMap(@Self)^.&set := $00000800;
  32305. end;
  32306. procedure TSPI3A_SPI3ACON.clearMODE32; inline;
  32307. begin
  32308. pTDefRegMap(@Self)^.clr := $00000800;
  32309. end;
  32310. procedure TSPI3A_SPI3ACON.setMODE32(thebits : TBits_1); inline;
  32311. begin
  32312. if thebits = 0 then
  32313. pTDefRegMap(@Self)^.clr := $00000800
  32314. else
  32315. pTDefRegMap(@Self)^.&set := $00000800;
  32316. end;
  32317. function TSPI3A_SPI3ACON.getMODE32 : TBits_1; inline;
  32318. begin
  32319. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  32320. end;
  32321. procedure TSPI3A_SPI3ACON.setDISSDO; inline;
  32322. begin
  32323. pTDefRegMap(@Self)^.&set := $00001000;
  32324. end;
  32325. procedure TSPI3A_SPI3ACON.clearDISSDO; inline;
  32326. begin
  32327. pTDefRegMap(@Self)^.clr := $00001000;
  32328. end;
  32329. procedure TSPI3A_SPI3ACON.setDISSDO(thebits : TBits_1); inline;
  32330. begin
  32331. if thebits = 0 then
  32332. pTDefRegMap(@Self)^.clr := $00001000
  32333. else
  32334. pTDefRegMap(@Self)^.&set := $00001000;
  32335. end;
  32336. function TSPI3A_SPI3ACON.getDISSDO : TBits_1; inline;
  32337. begin
  32338. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  32339. end;
  32340. procedure TSPI3A_SPI3ACON.setSIDL; inline;
  32341. begin
  32342. pTDefRegMap(@Self)^.&set := $00002000;
  32343. end;
  32344. procedure TSPI3A_SPI3ACON.clearSIDL; inline;
  32345. begin
  32346. pTDefRegMap(@Self)^.clr := $00002000;
  32347. end;
  32348. procedure TSPI3A_SPI3ACON.setSIDL(thebits : TBits_1); inline;
  32349. begin
  32350. if thebits = 0 then
  32351. pTDefRegMap(@Self)^.clr := $00002000
  32352. else
  32353. pTDefRegMap(@Self)^.&set := $00002000;
  32354. end;
  32355. function TSPI3A_SPI3ACON.getSIDL : TBits_1; inline;
  32356. begin
  32357. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32358. end;
  32359. procedure TSPI3A_SPI3ACON.setON; inline;
  32360. begin
  32361. pTDefRegMap(@Self)^.&set := $00008000;
  32362. end;
  32363. procedure TSPI3A_SPI3ACON.clearON; inline;
  32364. begin
  32365. pTDefRegMap(@Self)^.clr := $00008000;
  32366. end;
  32367. procedure TSPI3A_SPI3ACON.setON(thebits : TBits_1); inline;
  32368. begin
  32369. if thebits = 0 then
  32370. pTDefRegMap(@Self)^.clr := $00008000
  32371. else
  32372. pTDefRegMap(@Self)^.&set := $00008000;
  32373. end;
  32374. function TSPI3A_SPI3ACON.getON : TBits_1; inline;
  32375. begin
  32376. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32377. end;
  32378. procedure TSPI3A_SPI3ACON.setENHBUF; inline;
  32379. begin
  32380. pTDefRegMap(@Self)^.&set := $00010000;
  32381. end;
  32382. procedure TSPI3A_SPI3ACON.clearENHBUF; inline;
  32383. begin
  32384. pTDefRegMap(@Self)^.clr := $00010000;
  32385. end;
  32386. procedure TSPI3A_SPI3ACON.setENHBUF(thebits : TBits_1); inline;
  32387. begin
  32388. if thebits = 0 then
  32389. pTDefRegMap(@Self)^.clr := $00010000
  32390. else
  32391. pTDefRegMap(@Self)^.&set := $00010000;
  32392. end;
  32393. function TSPI3A_SPI3ACON.getENHBUF : TBits_1; inline;
  32394. begin
  32395. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  32396. end;
  32397. procedure TSPI3A_SPI3ACON.setSPIFE; inline;
  32398. begin
  32399. pTDefRegMap(@Self)^.&set := $00020000;
  32400. end;
  32401. procedure TSPI3A_SPI3ACON.clearSPIFE; inline;
  32402. begin
  32403. pTDefRegMap(@Self)^.clr := $00020000;
  32404. end;
  32405. procedure TSPI3A_SPI3ACON.setSPIFE(thebits : TBits_1); inline;
  32406. begin
  32407. if thebits = 0 then
  32408. pTDefRegMap(@Self)^.clr := $00020000
  32409. else
  32410. pTDefRegMap(@Self)^.&set := $00020000;
  32411. end;
  32412. function TSPI3A_SPI3ACON.getSPIFE : TBits_1; inline;
  32413. begin
  32414. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  32415. end;
  32416. procedure TSPI3A_SPI3ACON.setFRMCNT(thebits : TBits_3); inline;
  32417. begin
  32418. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  32419. end;
  32420. function TSPI3A_SPI3ACON.getFRMCNT : TBits_3; inline;
  32421. begin
  32422. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  32423. end;
  32424. procedure TSPI3A_SPI3ACON.setFRMSYPW; inline;
  32425. begin
  32426. pTDefRegMap(@Self)^.&set := $08000000;
  32427. end;
  32428. procedure TSPI3A_SPI3ACON.clearFRMSYPW; inline;
  32429. begin
  32430. pTDefRegMap(@Self)^.clr := $08000000;
  32431. end;
  32432. procedure TSPI3A_SPI3ACON.setFRMSYPW(thebits : TBits_1); inline;
  32433. begin
  32434. if thebits = 0 then
  32435. pTDefRegMap(@Self)^.clr := $08000000
  32436. else
  32437. pTDefRegMap(@Self)^.&set := $08000000;
  32438. end;
  32439. function TSPI3A_SPI3ACON.getFRMSYPW : TBits_1; inline;
  32440. begin
  32441. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  32442. end;
  32443. procedure TSPI3A_SPI3ACON.setMSSEN; inline;
  32444. begin
  32445. pTDefRegMap(@Self)^.&set := $10000000;
  32446. end;
  32447. procedure TSPI3A_SPI3ACON.clearMSSEN; inline;
  32448. begin
  32449. pTDefRegMap(@Self)^.clr := $10000000;
  32450. end;
  32451. procedure TSPI3A_SPI3ACON.setMSSEN(thebits : TBits_1); inline;
  32452. begin
  32453. if thebits = 0 then
  32454. pTDefRegMap(@Self)^.clr := $10000000
  32455. else
  32456. pTDefRegMap(@Self)^.&set := $10000000;
  32457. end;
  32458. function TSPI3A_SPI3ACON.getMSSEN : TBits_1; inline;
  32459. begin
  32460. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  32461. end;
  32462. procedure TSPI3A_SPI3ACON.setFRMPOL; inline;
  32463. begin
  32464. pTDefRegMap(@Self)^.&set := $20000000;
  32465. end;
  32466. procedure TSPI3A_SPI3ACON.clearFRMPOL; inline;
  32467. begin
  32468. pTDefRegMap(@Self)^.clr := $20000000;
  32469. end;
  32470. procedure TSPI3A_SPI3ACON.setFRMPOL(thebits : TBits_1); inline;
  32471. begin
  32472. if thebits = 0 then
  32473. pTDefRegMap(@Self)^.clr := $20000000
  32474. else
  32475. pTDefRegMap(@Self)^.&set := $20000000;
  32476. end;
  32477. function TSPI3A_SPI3ACON.getFRMPOL : TBits_1; inline;
  32478. begin
  32479. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  32480. end;
  32481. procedure TSPI3A_SPI3ACON.setFRMSYNC; inline;
  32482. begin
  32483. pTDefRegMap(@Self)^.&set := $40000000;
  32484. end;
  32485. procedure TSPI3A_SPI3ACON.clearFRMSYNC; inline;
  32486. begin
  32487. pTDefRegMap(@Self)^.clr := $40000000;
  32488. end;
  32489. procedure TSPI3A_SPI3ACON.setFRMSYNC(thebits : TBits_1); inline;
  32490. begin
  32491. if thebits = 0 then
  32492. pTDefRegMap(@Self)^.clr := $40000000
  32493. else
  32494. pTDefRegMap(@Self)^.&set := $40000000;
  32495. end;
  32496. function TSPI3A_SPI3ACON.getFRMSYNC : TBits_1; inline;
  32497. begin
  32498. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  32499. end;
  32500. procedure TSPI3A_SPI3ACON.setFRMEN; inline;
  32501. begin
  32502. pTDefRegMap(@Self)^.&set := $80000000;
  32503. end;
  32504. procedure TSPI3A_SPI3ACON.clearFRMEN; inline;
  32505. begin
  32506. pTDefRegMap(@Self)^.clr := $80000000;
  32507. end;
  32508. procedure TSPI3A_SPI3ACON.setFRMEN(thebits : TBits_1); inline;
  32509. begin
  32510. if thebits = 0 then
  32511. pTDefRegMap(@Self)^.clr := $80000000
  32512. else
  32513. pTDefRegMap(@Self)^.&set := $80000000;
  32514. end;
  32515. function TSPI3A_SPI3ACON.getFRMEN : TBits_1; inline;
  32516. begin
  32517. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  32518. end;
  32519. procedure TSPI3A_SPI3ACON.setw(thebits : TBits_32); inline;
  32520. begin
  32521. pTDefRegMap(@Self)^.val := thebits;
  32522. end;
  32523. function TSPI3A_SPI3ACON.getw : TBits_32; inline;
  32524. begin
  32525. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32526. end;
  32527. procedure TSPI3A_SPI4CON.setSRXISEL(thebits : TBits_2); inline;
  32528. begin
  32529. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  32530. end;
  32531. function TSPI3A_SPI4CON.getSRXISEL : TBits_2; inline;
  32532. begin
  32533. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  32534. end;
  32535. procedure TSPI3A_SPI4CON.setSTXISEL(thebits : TBits_2); inline;
  32536. begin
  32537. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  32538. end;
  32539. function TSPI3A_SPI4CON.getSTXISEL : TBits_2; inline;
  32540. begin
  32541. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  32542. end;
  32543. procedure TSPI3A_SPI4CON.setMSTEN; inline;
  32544. begin
  32545. pTDefRegMap(@Self)^.&set := $00000020;
  32546. end;
  32547. procedure TSPI3A_SPI4CON.clearMSTEN; inline;
  32548. begin
  32549. pTDefRegMap(@Self)^.clr := $00000020;
  32550. end;
  32551. procedure TSPI3A_SPI4CON.setMSTEN(thebits : TBits_1); inline;
  32552. begin
  32553. if thebits = 0 then
  32554. pTDefRegMap(@Self)^.clr := $00000020
  32555. else
  32556. pTDefRegMap(@Self)^.&set := $00000020;
  32557. end;
  32558. function TSPI3A_SPI4CON.getMSTEN : TBits_1; inline;
  32559. begin
  32560. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32561. end;
  32562. procedure TSPI3A_SPI4CON.setCKP; inline;
  32563. begin
  32564. pTDefRegMap(@Self)^.&set := $00000040;
  32565. end;
  32566. procedure TSPI3A_SPI4CON.clearCKP; inline;
  32567. begin
  32568. pTDefRegMap(@Self)^.clr := $00000040;
  32569. end;
  32570. procedure TSPI3A_SPI4CON.setCKP(thebits : TBits_1); inline;
  32571. begin
  32572. if thebits = 0 then
  32573. pTDefRegMap(@Self)^.clr := $00000040
  32574. else
  32575. pTDefRegMap(@Self)^.&set := $00000040;
  32576. end;
  32577. function TSPI3A_SPI4CON.getCKP : TBits_1; inline;
  32578. begin
  32579. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32580. end;
  32581. procedure TSPI3A_SPI4CON.setSSEN; inline;
  32582. begin
  32583. pTDefRegMap(@Self)^.&set := $00000080;
  32584. end;
  32585. procedure TSPI3A_SPI4CON.clearSSEN; inline;
  32586. begin
  32587. pTDefRegMap(@Self)^.clr := $00000080;
  32588. end;
  32589. procedure TSPI3A_SPI4CON.setSSEN(thebits : TBits_1); inline;
  32590. begin
  32591. if thebits = 0 then
  32592. pTDefRegMap(@Self)^.clr := $00000080
  32593. else
  32594. pTDefRegMap(@Self)^.&set := $00000080;
  32595. end;
  32596. function TSPI3A_SPI4CON.getSSEN : TBits_1; inline;
  32597. begin
  32598. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32599. end;
  32600. procedure TSPI3A_SPI4CON.setCKE; inline;
  32601. begin
  32602. pTDefRegMap(@Self)^.&set := $00000100;
  32603. end;
  32604. procedure TSPI3A_SPI4CON.clearCKE; inline;
  32605. begin
  32606. pTDefRegMap(@Self)^.clr := $00000100;
  32607. end;
  32608. procedure TSPI3A_SPI4CON.setCKE(thebits : TBits_1); inline;
  32609. begin
  32610. if thebits = 0 then
  32611. pTDefRegMap(@Self)^.clr := $00000100
  32612. else
  32613. pTDefRegMap(@Self)^.&set := $00000100;
  32614. end;
  32615. function TSPI3A_SPI4CON.getCKE : TBits_1; inline;
  32616. begin
  32617. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32618. end;
  32619. procedure TSPI3A_SPI4CON.setSMP; inline;
  32620. begin
  32621. pTDefRegMap(@Self)^.&set := $00000200;
  32622. end;
  32623. procedure TSPI3A_SPI4CON.clearSMP; inline;
  32624. begin
  32625. pTDefRegMap(@Self)^.clr := $00000200;
  32626. end;
  32627. procedure TSPI3A_SPI4CON.setSMP(thebits : TBits_1); inline;
  32628. begin
  32629. if thebits = 0 then
  32630. pTDefRegMap(@Self)^.clr := $00000200
  32631. else
  32632. pTDefRegMap(@Self)^.&set := $00000200;
  32633. end;
  32634. function TSPI3A_SPI4CON.getSMP : TBits_1; inline;
  32635. begin
  32636. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  32637. end;
  32638. procedure TSPI3A_SPI4CON.setMODE16; inline;
  32639. begin
  32640. pTDefRegMap(@Self)^.&set := $00000400;
  32641. end;
  32642. procedure TSPI3A_SPI4CON.clearMODE16; inline;
  32643. begin
  32644. pTDefRegMap(@Self)^.clr := $00000400;
  32645. end;
  32646. procedure TSPI3A_SPI4CON.setMODE16(thebits : TBits_1); inline;
  32647. begin
  32648. if thebits = 0 then
  32649. pTDefRegMap(@Self)^.clr := $00000400
  32650. else
  32651. pTDefRegMap(@Self)^.&set := $00000400;
  32652. end;
  32653. function TSPI3A_SPI4CON.getMODE16 : TBits_1; inline;
  32654. begin
  32655. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  32656. end;
  32657. procedure TSPI3A_SPI4CON.setMODE32; inline;
  32658. begin
  32659. pTDefRegMap(@Self)^.&set := $00000800;
  32660. end;
  32661. procedure TSPI3A_SPI4CON.clearMODE32; inline;
  32662. begin
  32663. pTDefRegMap(@Self)^.clr := $00000800;
  32664. end;
  32665. procedure TSPI3A_SPI4CON.setMODE32(thebits : TBits_1); inline;
  32666. begin
  32667. if thebits = 0 then
  32668. pTDefRegMap(@Self)^.clr := $00000800
  32669. else
  32670. pTDefRegMap(@Self)^.&set := $00000800;
  32671. end;
  32672. function TSPI3A_SPI4CON.getMODE32 : TBits_1; inline;
  32673. begin
  32674. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  32675. end;
  32676. procedure TSPI3A_SPI4CON.setDISSDO; inline;
  32677. begin
  32678. pTDefRegMap(@Self)^.&set := $00001000;
  32679. end;
  32680. procedure TSPI3A_SPI4CON.clearDISSDO; inline;
  32681. begin
  32682. pTDefRegMap(@Self)^.clr := $00001000;
  32683. end;
  32684. procedure TSPI3A_SPI4CON.setDISSDO(thebits : TBits_1); inline;
  32685. begin
  32686. if thebits = 0 then
  32687. pTDefRegMap(@Self)^.clr := $00001000
  32688. else
  32689. pTDefRegMap(@Self)^.&set := $00001000;
  32690. end;
  32691. function TSPI3A_SPI4CON.getDISSDO : TBits_1; inline;
  32692. begin
  32693. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  32694. end;
  32695. procedure TSPI3A_SPI4CON.setSIDL; inline;
  32696. begin
  32697. pTDefRegMap(@Self)^.&set := $00002000;
  32698. end;
  32699. procedure TSPI3A_SPI4CON.clearSIDL; inline;
  32700. begin
  32701. pTDefRegMap(@Self)^.clr := $00002000;
  32702. end;
  32703. procedure TSPI3A_SPI4CON.setSIDL(thebits : TBits_1); inline;
  32704. begin
  32705. if thebits = 0 then
  32706. pTDefRegMap(@Self)^.clr := $00002000
  32707. else
  32708. pTDefRegMap(@Self)^.&set := $00002000;
  32709. end;
  32710. function TSPI3A_SPI4CON.getSIDL : TBits_1; inline;
  32711. begin
  32712. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32713. end;
  32714. procedure TSPI3A_SPI4CON.setON; inline;
  32715. begin
  32716. pTDefRegMap(@Self)^.&set := $00008000;
  32717. end;
  32718. procedure TSPI3A_SPI4CON.clearON; inline;
  32719. begin
  32720. pTDefRegMap(@Self)^.clr := $00008000;
  32721. end;
  32722. procedure TSPI3A_SPI4CON.setON(thebits : TBits_1); inline;
  32723. begin
  32724. if thebits = 0 then
  32725. pTDefRegMap(@Self)^.clr := $00008000
  32726. else
  32727. pTDefRegMap(@Self)^.&set := $00008000;
  32728. end;
  32729. function TSPI3A_SPI4CON.getON : TBits_1; inline;
  32730. begin
  32731. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32732. end;
  32733. procedure TSPI3A_SPI4CON.setENHBUF; inline;
  32734. begin
  32735. pTDefRegMap(@Self)^.&set := $00010000;
  32736. end;
  32737. procedure TSPI3A_SPI4CON.clearENHBUF; inline;
  32738. begin
  32739. pTDefRegMap(@Self)^.clr := $00010000;
  32740. end;
  32741. procedure TSPI3A_SPI4CON.setENHBUF(thebits : TBits_1); inline;
  32742. begin
  32743. if thebits = 0 then
  32744. pTDefRegMap(@Self)^.clr := $00010000
  32745. else
  32746. pTDefRegMap(@Self)^.&set := $00010000;
  32747. end;
  32748. function TSPI3A_SPI4CON.getENHBUF : TBits_1; inline;
  32749. begin
  32750. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  32751. end;
  32752. procedure TSPI3A_SPI4CON.setSPIFE; inline;
  32753. begin
  32754. pTDefRegMap(@Self)^.&set := $00020000;
  32755. end;
  32756. procedure TSPI3A_SPI4CON.clearSPIFE; inline;
  32757. begin
  32758. pTDefRegMap(@Self)^.clr := $00020000;
  32759. end;
  32760. procedure TSPI3A_SPI4CON.setSPIFE(thebits : TBits_1); inline;
  32761. begin
  32762. if thebits = 0 then
  32763. pTDefRegMap(@Self)^.clr := $00020000
  32764. else
  32765. pTDefRegMap(@Self)^.&set := $00020000;
  32766. end;
  32767. function TSPI3A_SPI4CON.getSPIFE : TBits_1; inline;
  32768. begin
  32769. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  32770. end;
  32771. procedure TSPI3A_SPI4CON.setFRMCNT(thebits : TBits_3); inline;
  32772. begin
  32773. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  32774. end;
  32775. function TSPI3A_SPI4CON.getFRMCNT : TBits_3; inline;
  32776. begin
  32777. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  32778. end;
  32779. procedure TSPI3A_SPI4CON.setFRMSYPW; inline;
  32780. begin
  32781. pTDefRegMap(@Self)^.&set := $08000000;
  32782. end;
  32783. procedure TSPI3A_SPI4CON.clearFRMSYPW; inline;
  32784. begin
  32785. pTDefRegMap(@Self)^.clr := $08000000;
  32786. end;
  32787. procedure TSPI3A_SPI4CON.setFRMSYPW(thebits : TBits_1); inline;
  32788. begin
  32789. if thebits = 0 then
  32790. pTDefRegMap(@Self)^.clr := $08000000
  32791. else
  32792. pTDefRegMap(@Self)^.&set := $08000000;
  32793. end;
  32794. function TSPI3A_SPI4CON.getFRMSYPW : TBits_1; inline;
  32795. begin
  32796. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  32797. end;
  32798. procedure TSPI3A_SPI4CON.setMSSEN; inline;
  32799. begin
  32800. pTDefRegMap(@Self)^.&set := $10000000;
  32801. end;
  32802. procedure TSPI3A_SPI4CON.clearMSSEN; inline;
  32803. begin
  32804. pTDefRegMap(@Self)^.clr := $10000000;
  32805. end;
  32806. procedure TSPI3A_SPI4CON.setMSSEN(thebits : TBits_1); inline;
  32807. begin
  32808. if thebits = 0 then
  32809. pTDefRegMap(@Self)^.clr := $10000000
  32810. else
  32811. pTDefRegMap(@Self)^.&set := $10000000;
  32812. end;
  32813. function TSPI3A_SPI4CON.getMSSEN : TBits_1; inline;
  32814. begin
  32815. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  32816. end;
  32817. procedure TSPI3A_SPI4CON.setFRMPOL; inline;
  32818. begin
  32819. pTDefRegMap(@Self)^.&set := $20000000;
  32820. end;
  32821. procedure TSPI3A_SPI4CON.clearFRMPOL; inline;
  32822. begin
  32823. pTDefRegMap(@Self)^.clr := $20000000;
  32824. end;
  32825. procedure TSPI3A_SPI4CON.setFRMPOL(thebits : TBits_1); inline;
  32826. begin
  32827. if thebits = 0 then
  32828. pTDefRegMap(@Self)^.clr := $20000000
  32829. else
  32830. pTDefRegMap(@Self)^.&set := $20000000;
  32831. end;
  32832. function TSPI3A_SPI4CON.getFRMPOL : TBits_1; inline;
  32833. begin
  32834. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  32835. end;
  32836. procedure TSPI3A_SPI4CON.setFRMSYNC; inline;
  32837. begin
  32838. pTDefRegMap(@Self)^.&set := $40000000;
  32839. end;
  32840. procedure TSPI3A_SPI4CON.clearFRMSYNC; inline;
  32841. begin
  32842. pTDefRegMap(@Self)^.clr := $40000000;
  32843. end;
  32844. procedure TSPI3A_SPI4CON.setFRMSYNC(thebits : TBits_1); inline;
  32845. begin
  32846. if thebits = 0 then
  32847. pTDefRegMap(@Self)^.clr := $40000000
  32848. else
  32849. pTDefRegMap(@Self)^.&set := $40000000;
  32850. end;
  32851. function TSPI3A_SPI4CON.getFRMSYNC : TBits_1; inline;
  32852. begin
  32853. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  32854. end;
  32855. procedure TSPI3A_SPI4CON.setFRMEN; inline;
  32856. begin
  32857. pTDefRegMap(@Self)^.&set := $80000000;
  32858. end;
  32859. procedure TSPI3A_SPI4CON.clearFRMEN; inline;
  32860. begin
  32861. pTDefRegMap(@Self)^.clr := $80000000;
  32862. end;
  32863. procedure TSPI3A_SPI4CON.setFRMEN(thebits : TBits_1); inline;
  32864. begin
  32865. if thebits = 0 then
  32866. pTDefRegMap(@Self)^.clr := $80000000
  32867. else
  32868. pTDefRegMap(@Self)^.&set := $80000000;
  32869. end;
  32870. function TSPI3A_SPI4CON.getFRMEN : TBits_1; inline;
  32871. begin
  32872. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  32873. end;
  32874. procedure TSPI3A_SPI4CON.setw(thebits : TBits_32); inline;
  32875. begin
  32876. pTDefRegMap(@Self)^.val := thebits;
  32877. end;
  32878. function TSPI3A_SPI4CON.getw : TBits_32; inline;
  32879. begin
  32880. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32881. end;
  32882. procedure TSPI3A_SPI3ASTAT.setSPIRBF; inline;
  32883. begin
  32884. pTDefRegMap(@Self)^.&set := $00000001;
  32885. end;
  32886. procedure TSPI3A_SPI3ASTAT.clearSPIRBF; inline;
  32887. begin
  32888. pTDefRegMap(@Self)^.clr := $00000001;
  32889. end;
  32890. procedure TSPI3A_SPI3ASTAT.setSPIRBF(thebits : TBits_1); inline;
  32891. begin
  32892. if thebits = 0 then
  32893. pTDefRegMap(@Self)^.clr := $00000001
  32894. else
  32895. pTDefRegMap(@Self)^.&set := $00000001;
  32896. end;
  32897. function TSPI3A_SPI3ASTAT.getSPIRBF : TBits_1; inline;
  32898. begin
  32899. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  32900. end;
  32901. procedure TSPI3A_SPI3ASTAT.setSPITBF; inline;
  32902. begin
  32903. pTDefRegMap(@Self)^.&set := $00000002;
  32904. end;
  32905. procedure TSPI3A_SPI3ASTAT.clearSPITBF; inline;
  32906. begin
  32907. pTDefRegMap(@Self)^.clr := $00000002;
  32908. end;
  32909. procedure TSPI3A_SPI3ASTAT.setSPITBF(thebits : TBits_1); inline;
  32910. begin
  32911. if thebits = 0 then
  32912. pTDefRegMap(@Self)^.clr := $00000002
  32913. else
  32914. pTDefRegMap(@Self)^.&set := $00000002;
  32915. end;
  32916. function TSPI3A_SPI3ASTAT.getSPITBF : TBits_1; inline;
  32917. begin
  32918. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32919. end;
  32920. procedure TSPI3A_SPI3ASTAT.setSPITBE; inline;
  32921. begin
  32922. pTDefRegMap(@Self)^.&set := $00000008;
  32923. end;
  32924. procedure TSPI3A_SPI3ASTAT.clearSPITBE; inline;
  32925. begin
  32926. pTDefRegMap(@Self)^.clr := $00000008;
  32927. end;
  32928. procedure TSPI3A_SPI3ASTAT.setSPITBE(thebits : TBits_1); inline;
  32929. begin
  32930. if thebits = 0 then
  32931. pTDefRegMap(@Self)^.clr := $00000008
  32932. else
  32933. pTDefRegMap(@Self)^.&set := $00000008;
  32934. end;
  32935. function TSPI3A_SPI3ASTAT.getSPITBE : TBits_1; inline;
  32936. begin
  32937. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32938. end;
  32939. procedure TSPI3A_SPI3ASTAT.setSPIRBE; inline;
  32940. begin
  32941. pTDefRegMap(@Self)^.&set := $00000020;
  32942. end;
  32943. procedure TSPI3A_SPI3ASTAT.clearSPIRBE; inline;
  32944. begin
  32945. pTDefRegMap(@Self)^.clr := $00000020;
  32946. end;
  32947. procedure TSPI3A_SPI3ASTAT.setSPIRBE(thebits : TBits_1); inline;
  32948. begin
  32949. if thebits = 0 then
  32950. pTDefRegMap(@Self)^.clr := $00000020
  32951. else
  32952. pTDefRegMap(@Self)^.&set := $00000020;
  32953. end;
  32954. function TSPI3A_SPI3ASTAT.getSPIRBE : TBits_1; inline;
  32955. begin
  32956. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32957. end;
  32958. procedure TSPI3A_SPI3ASTAT.setSPIROV; inline;
  32959. begin
  32960. pTDefRegMap(@Self)^.&set := $00000040;
  32961. end;
  32962. procedure TSPI3A_SPI3ASTAT.clearSPIROV; inline;
  32963. begin
  32964. pTDefRegMap(@Self)^.clr := $00000040;
  32965. end;
  32966. procedure TSPI3A_SPI3ASTAT.setSPIROV(thebits : TBits_1); inline;
  32967. begin
  32968. if thebits = 0 then
  32969. pTDefRegMap(@Self)^.clr := $00000040
  32970. else
  32971. pTDefRegMap(@Self)^.&set := $00000040;
  32972. end;
  32973. function TSPI3A_SPI3ASTAT.getSPIROV : TBits_1; inline;
  32974. begin
  32975. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32976. end;
  32977. procedure TSPI3A_SPI3ASTAT.setSRMT; inline;
  32978. begin
  32979. pTDefRegMap(@Self)^.&set := $00000080;
  32980. end;
  32981. procedure TSPI3A_SPI3ASTAT.clearSRMT; inline;
  32982. begin
  32983. pTDefRegMap(@Self)^.clr := $00000080;
  32984. end;
  32985. procedure TSPI3A_SPI3ASTAT.setSRMT(thebits : TBits_1); inline;
  32986. begin
  32987. if thebits = 0 then
  32988. pTDefRegMap(@Self)^.clr := $00000080
  32989. else
  32990. pTDefRegMap(@Self)^.&set := $00000080;
  32991. end;
  32992. function TSPI3A_SPI3ASTAT.getSRMT : TBits_1; inline;
  32993. begin
  32994. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32995. end;
  32996. procedure TSPI3A_SPI3ASTAT.setSPITUR; inline;
  32997. begin
  32998. pTDefRegMap(@Self)^.&set := $00000100;
  32999. end;
  33000. procedure TSPI3A_SPI3ASTAT.clearSPITUR; inline;
  33001. begin
  33002. pTDefRegMap(@Self)^.clr := $00000100;
  33003. end;
  33004. procedure TSPI3A_SPI3ASTAT.setSPITUR(thebits : TBits_1); inline;
  33005. begin
  33006. if thebits = 0 then
  33007. pTDefRegMap(@Self)^.clr := $00000100
  33008. else
  33009. pTDefRegMap(@Self)^.&set := $00000100;
  33010. end;
  33011. function TSPI3A_SPI3ASTAT.getSPITUR : TBits_1; inline;
  33012. begin
  33013. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33014. end;
  33015. procedure TSPI3A_SPI3ASTAT.setSPIBUSY; inline;
  33016. begin
  33017. pTDefRegMap(@Self)^.&set := $00000800;
  33018. end;
  33019. procedure TSPI3A_SPI3ASTAT.clearSPIBUSY; inline;
  33020. begin
  33021. pTDefRegMap(@Self)^.clr := $00000800;
  33022. end;
  33023. procedure TSPI3A_SPI3ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  33024. begin
  33025. if thebits = 0 then
  33026. pTDefRegMap(@Self)^.clr := $00000800
  33027. else
  33028. pTDefRegMap(@Self)^.&set := $00000800;
  33029. end;
  33030. function TSPI3A_SPI3ASTAT.getSPIBUSY : TBits_1; inline;
  33031. begin
  33032. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  33033. end;
  33034. procedure TSPI3A_SPI3ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  33035. begin
  33036. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  33037. end;
  33038. function TSPI3A_SPI3ASTAT.getTXBUFELM : TBits_5; inline;
  33039. begin
  33040. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  33041. end;
  33042. procedure TSPI3A_SPI3ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  33043. begin
  33044. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  33045. end;
  33046. function TSPI3A_SPI3ASTAT.getRXBUFELM : TBits_5; inline;
  33047. begin
  33048. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  33049. end;
  33050. procedure TSPI3A_SPI3ASTAT.setw(thebits : TBits_32); inline;
  33051. begin
  33052. pTDefRegMap(@Self)^.val := thebits;
  33053. end;
  33054. function TSPI3A_SPI3ASTAT.getw : TBits_32; inline;
  33055. begin
  33056. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33057. end;
  33058. procedure TSPI3A_SPI4STAT.setSPIRBF; inline;
  33059. begin
  33060. pTDefRegMap(@Self)^.&set := $00000001;
  33061. end;
  33062. procedure TSPI3A_SPI4STAT.clearSPIRBF; inline;
  33063. begin
  33064. pTDefRegMap(@Self)^.clr := $00000001;
  33065. end;
  33066. procedure TSPI3A_SPI4STAT.setSPIRBF(thebits : TBits_1); inline;
  33067. begin
  33068. if thebits = 0 then
  33069. pTDefRegMap(@Self)^.clr := $00000001
  33070. else
  33071. pTDefRegMap(@Self)^.&set := $00000001;
  33072. end;
  33073. function TSPI3A_SPI4STAT.getSPIRBF : TBits_1; inline;
  33074. begin
  33075. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33076. end;
  33077. procedure TSPI3A_SPI4STAT.setSPITBF; inline;
  33078. begin
  33079. pTDefRegMap(@Self)^.&set := $00000002;
  33080. end;
  33081. procedure TSPI3A_SPI4STAT.clearSPITBF; inline;
  33082. begin
  33083. pTDefRegMap(@Self)^.clr := $00000002;
  33084. end;
  33085. procedure TSPI3A_SPI4STAT.setSPITBF(thebits : TBits_1); inline;
  33086. begin
  33087. if thebits = 0 then
  33088. pTDefRegMap(@Self)^.clr := $00000002
  33089. else
  33090. pTDefRegMap(@Self)^.&set := $00000002;
  33091. end;
  33092. function TSPI3A_SPI4STAT.getSPITBF : TBits_1; inline;
  33093. begin
  33094. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33095. end;
  33096. procedure TSPI3A_SPI4STAT.setSPITBE; inline;
  33097. begin
  33098. pTDefRegMap(@Self)^.&set := $00000008;
  33099. end;
  33100. procedure TSPI3A_SPI4STAT.clearSPITBE; inline;
  33101. begin
  33102. pTDefRegMap(@Self)^.clr := $00000008;
  33103. end;
  33104. procedure TSPI3A_SPI4STAT.setSPITBE(thebits : TBits_1); inline;
  33105. begin
  33106. if thebits = 0 then
  33107. pTDefRegMap(@Self)^.clr := $00000008
  33108. else
  33109. pTDefRegMap(@Self)^.&set := $00000008;
  33110. end;
  33111. function TSPI3A_SPI4STAT.getSPITBE : TBits_1; inline;
  33112. begin
  33113. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33114. end;
  33115. procedure TSPI3A_SPI4STAT.setSPIRBE; inline;
  33116. begin
  33117. pTDefRegMap(@Self)^.&set := $00000020;
  33118. end;
  33119. procedure TSPI3A_SPI4STAT.clearSPIRBE; inline;
  33120. begin
  33121. pTDefRegMap(@Self)^.clr := $00000020;
  33122. end;
  33123. procedure TSPI3A_SPI4STAT.setSPIRBE(thebits : TBits_1); inline;
  33124. begin
  33125. if thebits = 0 then
  33126. pTDefRegMap(@Self)^.clr := $00000020
  33127. else
  33128. pTDefRegMap(@Self)^.&set := $00000020;
  33129. end;
  33130. function TSPI3A_SPI4STAT.getSPIRBE : TBits_1; inline;
  33131. begin
  33132. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33133. end;
  33134. procedure TSPI3A_SPI4STAT.setSPIROV; inline;
  33135. begin
  33136. pTDefRegMap(@Self)^.&set := $00000040;
  33137. end;
  33138. procedure TSPI3A_SPI4STAT.clearSPIROV; inline;
  33139. begin
  33140. pTDefRegMap(@Self)^.clr := $00000040;
  33141. end;
  33142. procedure TSPI3A_SPI4STAT.setSPIROV(thebits : TBits_1); inline;
  33143. begin
  33144. if thebits = 0 then
  33145. pTDefRegMap(@Self)^.clr := $00000040
  33146. else
  33147. pTDefRegMap(@Self)^.&set := $00000040;
  33148. end;
  33149. function TSPI3A_SPI4STAT.getSPIROV : TBits_1; inline;
  33150. begin
  33151. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33152. end;
  33153. procedure TSPI3A_SPI4STAT.setSRMT; inline;
  33154. begin
  33155. pTDefRegMap(@Self)^.&set := $00000080;
  33156. end;
  33157. procedure TSPI3A_SPI4STAT.clearSRMT; inline;
  33158. begin
  33159. pTDefRegMap(@Self)^.clr := $00000080;
  33160. end;
  33161. procedure TSPI3A_SPI4STAT.setSRMT(thebits : TBits_1); inline;
  33162. begin
  33163. if thebits = 0 then
  33164. pTDefRegMap(@Self)^.clr := $00000080
  33165. else
  33166. pTDefRegMap(@Self)^.&set := $00000080;
  33167. end;
  33168. function TSPI3A_SPI4STAT.getSRMT : TBits_1; inline;
  33169. begin
  33170. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33171. end;
  33172. procedure TSPI3A_SPI4STAT.setSPITUR; inline;
  33173. begin
  33174. pTDefRegMap(@Self)^.&set := $00000100;
  33175. end;
  33176. procedure TSPI3A_SPI4STAT.clearSPITUR; inline;
  33177. begin
  33178. pTDefRegMap(@Self)^.clr := $00000100;
  33179. end;
  33180. procedure TSPI3A_SPI4STAT.setSPITUR(thebits : TBits_1); inline;
  33181. begin
  33182. if thebits = 0 then
  33183. pTDefRegMap(@Self)^.clr := $00000100
  33184. else
  33185. pTDefRegMap(@Self)^.&set := $00000100;
  33186. end;
  33187. function TSPI3A_SPI4STAT.getSPITUR : TBits_1; inline;
  33188. begin
  33189. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33190. end;
  33191. procedure TSPI3A_SPI4STAT.setSPIBUSY; inline;
  33192. begin
  33193. pTDefRegMap(@Self)^.&set := $00000800;
  33194. end;
  33195. procedure TSPI3A_SPI4STAT.clearSPIBUSY; inline;
  33196. begin
  33197. pTDefRegMap(@Self)^.clr := $00000800;
  33198. end;
  33199. procedure TSPI3A_SPI4STAT.setSPIBUSY(thebits : TBits_1); inline;
  33200. begin
  33201. if thebits = 0 then
  33202. pTDefRegMap(@Self)^.clr := $00000800
  33203. else
  33204. pTDefRegMap(@Self)^.&set := $00000800;
  33205. end;
  33206. function TSPI3A_SPI4STAT.getSPIBUSY : TBits_1; inline;
  33207. begin
  33208. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  33209. end;
  33210. procedure TSPI3A_SPI4STAT.setTXBUFELM(thebits : TBits_5); inline;
  33211. begin
  33212. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  33213. end;
  33214. function TSPI3A_SPI4STAT.getTXBUFELM : TBits_5; inline;
  33215. begin
  33216. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  33217. end;
  33218. procedure TSPI3A_SPI4STAT.setRXBUFELM(thebits : TBits_5); inline;
  33219. begin
  33220. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  33221. end;
  33222. function TSPI3A_SPI4STAT.getRXBUFELM : TBits_5; inline;
  33223. begin
  33224. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  33225. end;
  33226. procedure TSPI3A_SPI4STAT.setw(thebits : TBits_32); inline;
  33227. begin
  33228. pTDefRegMap(@Self)^.val := thebits;
  33229. end;
  33230. function TSPI3A_SPI4STAT.getw : TBits_32; inline;
  33231. begin
  33232. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33233. end;
  33234. procedure TUART1_U1AMODE.setSTSEL; inline;
  33235. begin
  33236. pTDefRegMap(@Self)^.&set := $00000001;
  33237. end;
  33238. procedure TUART1_U1AMODE.clearSTSEL; inline;
  33239. begin
  33240. pTDefRegMap(@Self)^.clr := $00000001;
  33241. end;
  33242. procedure TUART1_U1AMODE.setSTSEL(thebits : TBits_1); inline;
  33243. begin
  33244. if thebits = 0 then
  33245. pTDefRegMap(@Self)^.clr := $00000001
  33246. else
  33247. pTDefRegMap(@Self)^.&set := $00000001;
  33248. end;
  33249. function TUART1_U1AMODE.getSTSEL : TBits_1; inline;
  33250. begin
  33251. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33252. end;
  33253. procedure TUART1_U1AMODE.setPDSEL(thebits : TBits_2); inline;
  33254. begin
  33255. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  33256. end;
  33257. function TUART1_U1AMODE.getPDSEL : TBits_2; inline;
  33258. begin
  33259. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  33260. end;
  33261. procedure TUART1_U1AMODE.setBRGH; inline;
  33262. begin
  33263. pTDefRegMap(@Self)^.&set := $00000008;
  33264. end;
  33265. procedure TUART1_U1AMODE.clearBRGH; inline;
  33266. begin
  33267. pTDefRegMap(@Self)^.clr := $00000008;
  33268. end;
  33269. procedure TUART1_U1AMODE.setBRGH(thebits : TBits_1); inline;
  33270. begin
  33271. if thebits = 0 then
  33272. pTDefRegMap(@Self)^.clr := $00000008
  33273. else
  33274. pTDefRegMap(@Self)^.&set := $00000008;
  33275. end;
  33276. function TUART1_U1AMODE.getBRGH : TBits_1; inline;
  33277. begin
  33278. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33279. end;
  33280. procedure TUART1_U1AMODE.setRXINV; inline;
  33281. begin
  33282. pTDefRegMap(@Self)^.&set := $00000010;
  33283. end;
  33284. procedure TUART1_U1AMODE.clearRXINV; inline;
  33285. begin
  33286. pTDefRegMap(@Self)^.clr := $00000010;
  33287. end;
  33288. procedure TUART1_U1AMODE.setRXINV(thebits : TBits_1); inline;
  33289. begin
  33290. if thebits = 0 then
  33291. pTDefRegMap(@Self)^.clr := $00000010
  33292. else
  33293. pTDefRegMap(@Self)^.&set := $00000010;
  33294. end;
  33295. function TUART1_U1AMODE.getRXINV : TBits_1; inline;
  33296. begin
  33297. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33298. end;
  33299. procedure TUART1_U1AMODE.setABAUD; inline;
  33300. begin
  33301. pTDefRegMap(@Self)^.&set := $00000020;
  33302. end;
  33303. procedure TUART1_U1AMODE.clearABAUD; inline;
  33304. begin
  33305. pTDefRegMap(@Self)^.clr := $00000020;
  33306. end;
  33307. procedure TUART1_U1AMODE.setABAUD(thebits : TBits_1); inline;
  33308. begin
  33309. if thebits = 0 then
  33310. pTDefRegMap(@Self)^.clr := $00000020
  33311. else
  33312. pTDefRegMap(@Self)^.&set := $00000020;
  33313. end;
  33314. function TUART1_U1AMODE.getABAUD : TBits_1; inline;
  33315. begin
  33316. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33317. end;
  33318. procedure TUART1_U1AMODE.setLPBACK; inline;
  33319. begin
  33320. pTDefRegMap(@Self)^.&set := $00000040;
  33321. end;
  33322. procedure TUART1_U1AMODE.clearLPBACK; inline;
  33323. begin
  33324. pTDefRegMap(@Self)^.clr := $00000040;
  33325. end;
  33326. procedure TUART1_U1AMODE.setLPBACK(thebits : TBits_1); inline;
  33327. begin
  33328. if thebits = 0 then
  33329. pTDefRegMap(@Self)^.clr := $00000040
  33330. else
  33331. pTDefRegMap(@Self)^.&set := $00000040;
  33332. end;
  33333. function TUART1_U1AMODE.getLPBACK : TBits_1; inline;
  33334. begin
  33335. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33336. end;
  33337. procedure TUART1_U1AMODE.setWAKE; inline;
  33338. begin
  33339. pTDefRegMap(@Self)^.&set := $00000080;
  33340. end;
  33341. procedure TUART1_U1AMODE.clearWAKE; inline;
  33342. begin
  33343. pTDefRegMap(@Self)^.clr := $00000080;
  33344. end;
  33345. procedure TUART1_U1AMODE.setWAKE(thebits : TBits_1); inline;
  33346. begin
  33347. if thebits = 0 then
  33348. pTDefRegMap(@Self)^.clr := $00000080
  33349. else
  33350. pTDefRegMap(@Self)^.&set := $00000080;
  33351. end;
  33352. function TUART1_U1AMODE.getWAKE : TBits_1; inline;
  33353. begin
  33354. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33355. end;
  33356. procedure TUART1_U1AMODE.setUEN(thebits : TBits_2); inline;
  33357. begin
  33358. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  33359. end;
  33360. function TUART1_U1AMODE.getUEN : TBits_2; inline;
  33361. begin
  33362. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  33363. end;
  33364. procedure TUART1_U1AMODE.setRTSMD; inline;
  33365. begin
  33366. pTDefRegMap(@Self)^.&set := $00000800;
  33367. end;
  33368. procedure TUART1_U1AMODE.clearRTSMD; inline;
  33369. begin
  33370. pTDefRegMap(@Self)^.clr := $00000800;
  33371. end;
  33372. procedure TUART1_U1AMODE.setRTSMD(thebits : TBits_1); inline;
  33373. begin
  33374. if thebits = 0 then
  33375. pTDefRegMap(@Self)^.clr := $00000800
  33376. else
  33377. pTDefRegMap(@Self)^.&set := $00000800;
  33378. end;
  33379. function TUART1_U1AMODE.getRTSMD : TBits_1; inline;
  33380. begin
  33381. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  33382. end;
  33383. procedure TUART1_U1AMODE.setIREN; inline;
  33384. begin
  33385. pTDefRegMap(@Self)^.&set := $00001000;
  33386. end;
  33387. procedure TUART1_U1AMODE.clearIREN; inline;
  33388. begin
  33389. pTDefRegMap(@Self)^.clr := $00001000;
  33390. end;
  33391. procedure TUART1_U1AMODE.setIREN(thebits : TBits_1); inline;
  33392. begin
  33393. if thebits = 0 then
  33394. pTDefRegMap(@Self)^.clr := $00001000
  33395. else
  33396. pTDefRegMap(@Self)^.&set := $00001000;
  33397. end;
  33398. function TUART1_U1AMODE.getIREN : TBits_1; inline;
  33399. begin
  33400. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  33401. end;
  33402. procedure TUART1_U1AMODE.setSIDL; inline;
  33403. begin
  33404. pTDefRegMap(@Self)^.&set := $00002000;
  33405. end;
  33406. procedure TUART1_U1AMODE.clearSIDL; inline;
  33407. begin
  33408. pTDefRegMap(@Self)^.clr := $00002000;
  33409. end;
  33410. procedure TUART1_U1AMODE.setSIDL(thebits : TBits_1); inline;
  33411. begin
  33412. if thebits = 0 then
  33413. pTDefRegMap(@Self)^.clr := $00002000
  33414. else
  33415. pTDefRegMap(@Self)^.&set := $00002000;
  33416. end;
  33417. function TUART1_U1AMODE.getSIDL : TBits_1; inline;
  33418. begin
  33419. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33420. end;
  33421. procedure TUART1_U1AMODE.setON; inline;
  33422. begin
  33423. pTDefRegMap(@Self)^.&set := $00008000;
  33424. end;
  33425. procedure TUART1_U1AMODE.clearON; inline;
  33426. begin
  33427. pTDefRegMap(@Self)^.clr := $00008000;
  33428. end;
  33429. procedure TUART1_U1AMODE.setON(thebits : TBits_1); inline;
  33430. begin
  33431. if thebits = 0 then
  33432. pTDefRegMap(@Self)^.clr := $00008000
  33433. else
  33434. pTDefRegMap(@Self)^.&set := $00008000;
  33435. end;
  33436. function TUART1_U1AMODE.getON : TBits_1; inline;
  33437. begin
  33438. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33439. end;
  33440. procedure TUART1_U1AMODE.setPDSEL0; inline;
  33441. begin
  33442. pTDefRegMap(@Self)^.&set := $00000002;
  33443. end;
  33444. procedure TUART1_U1AMODE.clearPDSEL0; inline;
  33445. begin
  33446. pTDefRegMap(@Self)^.clr := $00000002;
  33447. end;
  33448. procedure TUART1_U1AMODE.setPDSEL0(thebits : TBits_1); inline;
  33449. begin
  33450. if thebits = 0 then
  33451. pTDefRegMap(@Self)^.clr := $00000002
  33452. else
  33453. pTDefRegMap(@Self)^.&set := $00000002;
  33454. end;
  33455. function TUART1_U1AMODE.getPDSEL0 : TBits_1; inline;
  33456. begin
  33457. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33458. end;
  33459. procedure TUART1_U1AMODE.setPDSEL1; inline;
  33460. begin
  33461. pTDefRegMap(@Self)^.&set := $00000004;
  33462. end;
  33463. procedure TUART1_U1AMODE.clearPDSEL1; inline;
  33464. begin
  33465. pTDefRegMap(@Self)^.clr := $00000004;
  33466. end;
  33467. procedure TUART1_U1AMODE.setPDSEL1(thebits : TBits_1); inline;
  33468. begin
  33469. if thebits = 0 then
  33470. pTDefRegMap(@Self)^.clr := $00000004
  33471. else
  33472. pTDefRegMap(@Self)^.&set := $00000004;
  33473. end;
  33474. function TUART1_U1AMODE.getPDSEL1 : TBits_1; inline;
  33475. begin
  33476. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33477. end;
  33478. procedure TUART1_U1AMODE.setUEN0; inline;
  33479. begin
  33480. pTDefRegMap(@Self)^.&set := $00000100;
  33481. end;
  33482. procedure TUART1_U1AMODE.clearUEN0; inline;
  33483. begin
  33484. pTDefRegMap(@Self)^.clr := $00000100;
  33485. end;
  33486. procedure TUART1_U1AMODE.setUEN0(thebits : TBits_1); inline;
  33487. begin
  33488. if thebits = 0 then
  33489. pTDefRegMap(@Self)^.clr := $00000100
  33490. else
  33491. pTDefRegMap(@Self)^.&set := $00000100;
  33492. end;
  33493. function TUART1_U1AMODE.getUEN0 : TBits_1; inline;
  33494. begin
  33495. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33496. end;
  33497. procedure TUART1_U1AMODE.setUEN1; inline;
  33498. begin
  33499. pTDefRegMap(@Self)^.&set := $00000200;
  33500. end;
  33501. procedure TUART1_U1AMODE.clearUEN1; inline;
  33502. begin
  33503. pTDefRegMap(@Self)^.clr := $00000200;
  33504. end;
  33505. procedure TUART1_U1AMODE.setUEN1(thebits : TBits_1); inline;
  33506. begin
  33507. if thebits = 0 then
  33508. pTDefRegMap(@Self)^.clr := $00000200
  33509. else
  33510. pTDefRegMap(@Self)^.&set := $00000200;
  33511. end;
  33512. function TUART1_U1AMODE.getUEN1 : TBits_1; inline;
  33513. begin
  33514. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  33515. end;
  33516. procedure TUART1_U1AMODE.setUSIDL; inline;
  33517. begin
  33518. pTDefRegMap(@Self)^.&set := $00002000;
  33519. end;
  33520. procedure TUART1_U1AMODE.clearUSIDL; inline;
  33521. begin
  33522. pTDefRegMap(@Self)^.clr := $00002000;
  33523. end;
  33524. procedure TUART1_U1AMODE.setUSIDL(thebits : TBits_1); inline;
  33525. begin
  33526. if thebits = 0 then
  33527. pTDefRegMap(@Self)^.clr := $00002000
  33528. else
  33529. pTDefRegMap(@Self)^.&set := $00002000;
  33530. end;
  33531. function TUART1_U1AMODE.getUSIDL : TBits_1; inline;
  33532. begin
  33533. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33534. end;
  33535. procedure TUART1_U1AMODE.setUARTEN; inline;
  33536. begin
  33537. pTDefRegMap(@Self)^.&set := $00008000;
  33538. end;
  33539. procedure TUART1_U1AMODE.clearUARTEN; inline;
  33540. begin
  33541. pTDefRegMap(@Self)^.clr := $00008000;
  33542. end;
  33543. procedure TUART1_U1AMODE.setUARTEN(thebits : TBits_1); inline;
  33544. begin
  33545. if thebits = 0 then
  33546. pTDefRegMap(@Self)^.clr := $00008000
  33547. else
  33548. pTDefRegMap(@Self)^.&set := $00008000;
  33549. end;
  33550. function TUART1_U1AMODE.getUARTEN : TBits_1; inline;
  33551. begin
  33552. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33553. end;
  33554. procedure TUART1_U1AMODE.setw(thebits : TBits_32); inline;
  33555. begin
  33556. pTDefRegMap(@Self)^.val := thebits;
  33557. end;
  33558. function TUART1_U1AMODE.getw : TBits_32; inline;
  33559. begin
  33560. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33561. end;
  33562. procedure TUART1_U1MODE.setSTSEL; inline;
  33563. begin
  33564. pTDefRegMap(@Self)^.&set := $00000001;
  33565. end;
  33566. procedure TUART1_U1MODE.clearSTSEL; inline;
  33567. begin
  33568. pTDefRegMap(@Self)^.clr := $00000001;
  33569. end;
  33570. procedure TUART1_U1MODE.setSTSEL(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 TUART1_U1MODE.getSTSEL : TBits_1; inline;
  33578. begin
  33579. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33580. end;
  33581. procedure TUART1_U1MODE.setPDSEL(thebits : TBits_2); inline;
  33582. begin
  33583. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  33584. end;
  33585. function TUART1_U1MODE.getPDSEL : TBits_2; inline;
  33586. begin
  33587. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  33588. end;
  33589. procedure TUART1_U1MODE.setBRGH; inline;
  33590. begin
  33591. pTDefRegMap(@Self)^.&set := $00000008;
  33592. end;
  33593. procedure TUART1_U1MODE.clearBRGH; inline;
  33594. begin
  33595. pTDefRegMap(@Self)^.clr := $00000008;
  33596. end;
  33597. procedure TUART1_U1MODE.setBRGH(thebits : TBits_1); inline;
  33598. begin
  33599. if thebits = 0 then
  33600. pTDefRegMap(@Self)^.clr := $00000008
  33601. else
  33602. pTDefRegMap(@Self)^.&set := $00000008;
  33603. end;
  33604. function TUART1_U1MODE.getBRGH : TBits_1; inline;
  33605. begin
  33606. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33607. end;
  33608. procedure TUART1_U1MODE.setRXINV; inline;
  33609. begin
  33610. pTDefRegMap(@Self)^.&set := $00000010;
  33611. end;
  33612. procedure TUART1_U1MODE.clearRXINV; inline;
  33613. begin
  33614. pTDefRegMap(@Self)^.clr := $00000010;
  33615. end;
  33616. procedure TUART1_U1MODE.setRXINV(thebits : TBits_1); inline;
  33617. begin
  33618. if thebits = 0 then
  33619. pTDefRegMap(@Self)^.clr := $00000010
  33620. else
  33621. pTDefRegMap(@Self)^.&set := $00000010;
  33622. end;
  33623. function TUART1_U1MODE.getRXINV : TBits_1; inline;
  33624. begin
  33625. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33626. end;
  33627. procedure TUART1_U1MODE.setABAUD; inline;
  33628. begin
  33629. pTDefRegMap(@Self)^.&set := $00000020;
  33630. end;
  33631. procedure TUART1_U1MODE.clearABAUD; inline;
  33632. begin
  33633. pTDefRegMap(@Self)^.clr := $00000020;
  33634. end;
  33635. procedure TUART1_U1MODE.setABAUD(thebits : TBits_1); inline;
  33636. begin
  33637. if thebits = 0 then
  33638. pTDefRegMap(@Self)^.clr := $00000020
  33639. else
  33640. pTDefRegMap(@Self)^.&set := $00000020;
  33641. end;
  33642. function TUART1_U1MODE.getABAUD : TBits_1; inline;
  33643. begin
  33644. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33645. end;
  33646. procedure TUART1_U1MODE.setLPBACK; inline;
  33647. begin
  33648. pTDefRegMap(@Self)^.&set := $00000040;
  33649. end;
  33650. procedure TUART1_U1MODE.clearLPBACK; inline;
  33651. begin
  33652. pTDefRegMap(@Self)^.clr := $00000040;
  33653. end;
  33654. procedure TUART1_U1MODE.setLPBACK(thebits : TBits_1); inline;
  33655. begin
  33656. if thebits = 0 then
  33657. pTDefRegMap(@Self)^.clr := $00000040
  33658. else
  33659. pTDefRegMap(@Self)^.&set := $00000040;
  33660. end;
  33661. function TUART1_U1MODE.getLPBACK : TBits_1; inline;
  33662. begin
  33663. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33664. end;
  33665. procedure TUART1_U1MODE.setWAKE; inline;
  33666. begin
  33667. pTDefRegMap(@Self)^.&set := $00000080;
  33668. end;
  33669. procedure TUART1_U1MODE.clearWAKE; inline;
  33670. begin
  33671. pTDefRegMap(@Self)^.clr := $00000080;
  33672. end;
  33673. procedure TUART1_U1MODE.setWAKE(thebits : TBits_1); inline;
  33674. begin
  33675. if thebits = 0 then
  33676. pTDefRegMap(@Self)^.clr := $00000080
  33677. else
  33678. pTDefRegMap(@Self)^.&set := $00000080;
  33679. end;
  33680. function TUART1_U1MODE.getWAKE : TBits_1; inline;
  33681. begin
  33682. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33683. end;
  33684. procedure TUART1_U1MODE.setUEN(thebits : TBits_2); inline;
  33685. begin
  33686. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  33687. end;
  33688. function TUART1_U1MODE.getUEN : TBits_2; inline;
  33689. begin
  33690. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  33691. end;
  33692. procedure TUART1_U1MODE.setRTSMD; inline;
  33693. begin
  33694. pTDefRegMap(@Self)^.&set := $00000800;
  33695. end;
  33696. procedure TUART1_U1MODE.clearRTSMD; inline;
  33697. begin
  33698. pTDefRegMap(@Self)^.clr := $00000800;
  33699. end;
  33700. procedure TUART1_U1MODE.setRTSMD(thebits : TBits_1); inline;
  33701. begin
  33702. if thebits = 0 then
  33703. pTDefRegMap(@Self)^.clr := $00000800
  33704. else
  33705. pTDefRegMap(@Self)^.&set := $00000800;
  33706. end;
  33707. function TUART1_U1MODE.getRTSMD : TBits_1; inline;
  33708. begin
  33709. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  33710. end;
  33711. procedure TUART1_U1MODE.setIREN; inline;
  33712. begin
  33713. pTDefRegMap(@Self)^.&set := $00001000;
  33714. end;
  33715. procedure TUART1_U1MODE.clearIREN; inline;
  33716. begin
  33717. pTDefRegMap(@Self)^.clr := $00001000;
  33718. end;
  33719. procedure TUART1_U1MODE.setIREN(thebits : TBits_1); inline;
  33720. begin
  33721. if thebits = 0 then
  33722. pTDefRegMap(@Self)^.clr := $00001000
  33723. else
  33724. pTDefRegMap(@Self)^.&set := $00001000;
  33725. end;
  33726. function TUART1_U1MODE.getIREN : TBits_1; inline;
  33727. begin
  33728. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  33729. end;
  33730. procedure TUART1_U1MODE.setSIDL; inline;
  33731. begin
  33732. pTDefRegMap(@Self)^.&set := $00002000;
  33733. end;
  33734. procedure TUART1_U1MODE.clearSIDL; inline;
  33735. begin
  33736. pTDefRegMap(@Self)^.clr := $00002000;
  33737. end;
  33738. procedure TUART1_U1MODE.setSIDL(thebits : TBits_1); inline;
  33739. begin
  33740. if thebits = 0 then
  33741. pTDefRegMap(@Self)^.clr := $00002000
  33742. else
  33743. pTDefRegMap(@Self)^.&set := $00002000;
  33744. end;
  33745. function TUART1_U1MODE.getSIDL : TBits_1; inline;
  33746. begin
  33747. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33748. end;
  33749. procedure TUART1_U1MODE.setON; inline;
  33750. begin
  33751. pTDefRegMap(@Self)^.&set := $00008000;
  33752. end;
  33753. procedure TUART1_U1MODE.clearON; inline;
  33754. begin
  33755. pTDefRegMap(@Self)^.clr := $00008000;
  33756. end;
  33757. procedure TUART1_U1MODE.setON(thebits : TBits_1); inline;
  33758. begin
  33759. if thebits = 0 then
  33760. pTDefRegMap(@Self)^.clr := $00008000
  33761. else
  33762. pTDefRegMap(@Self)^.&set := $00008000;
  33763. end;
  33764. function TUART1_U1MODE.getON : TBits_1; inline;
  33765. begin
  33766. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33767. end;
  33768. procedure TUART1_U1MODE.setPDSEL0; inline;
  33769. begin
  33770. pTDefRegMap(@Self)^.&set := $00000002;
  33771. end;
  33772. procedure TUART1_U1MODE.clearPDSEL0; inline;
  33773. begin
  33774. pTDefRegMap(@Self)^.clr := $00000002;
  33775. end;
  33776. procedure TUART1_U1MODE.setPDSEL0(thebits : TBits_1); inline;
  33777. begin
  33778. if thebits = 0 then
  33779. pTDefRegMap(@Self)^.clr := $00000002
  33780. else
  33781. pTDefRegMap(@Self)^.&set := $00000002;
  33782. end;
  33783. function TUART1_U1MODE.getPDSEL0 : TBits_1; inline;
  33784. begin
  33785. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33786. end;
  33787. procedure TUART1_U1MODE.setPDSEL1; inline;
  33788. begin
  33789. pTDefRegMap(@Self)^.&set := $00000004;
  33790. end;
  33791. procedure TUART1_U1MODE.clearPDSEL1; inline;
  33792. begin
  33793. pTDefRegMap(@Self)^.clr := $00000004;
  33794. end;
  33795. procedure TUART1_U1MODE.setPDSEL1(thebits : TBits_1); inline;
  33796. begin
  33797. if thebits = 0 then
  33798. pTDefRegMap(@Self)^.clr := $00000004
  33799. else
  33800. pTDefRegMap(@Self)^.&set := $00000004;
  33801. end;
  33802. function TUART1_U1MODE.getPDSEL1 : TBits_1; inline;
  33803. begin
  33804. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33805. end;
  33806. procedure TUART1_U1MODE.setUEN0; inline;
  33807. begin
  33808. pTDefRegMap(@Self)^.&set := $00000100;
  33809. end;
  33810. procedure TUART1_U1MODE.clearUEN0; inline;
  33811. begin
  33812. pTDefRegMap(@Self)^.clr := $00000100;
  33813. end;
  33814. procedure TUART1_U1MODE.setUEN0(thebits : TBits_1); inline;
  33815. begin
  33816. if thebits = 0 then
  33817. pTDefRegMap(@Self)^.clr := $00000100
  33818. else
  33819. pTDefRegMap(@Self)^.&set := $00000100;
  33820. end;
  33821. function TUART1_U1MODE.getUEN0 : TBits_1; inline;
  33822. begin
  33823. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33824. end;
  33825. procedure TUART1_U1MODE.setUEN1; inline;
  33826. begin
  33827. pTDefRegMap(@Self)^.&set := $00000200;
  33828. end;
  33829. procedure TUART1_U1MODE.clearUEN1; inline;
  33830. begin
  33831. pTDefRegMap(@Self)^.clr := $00000200;
  33832. end;
  33833. procedure TUART1_U1MODE.setUEN1(thebits : TBits_1); inline;
  33834. begin
  33835. if thebits = 0 then
  33836. pTDefRegMap(@Self)^.clr := $00000200
  33837. else
  33838. pTDefRegMap(@Self)^.&set := $00000200;
  33839. end;
  33840. function TUART1_U1MODE.getUEN1 : TBits_1; inline;
  33841. begin
  33842. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  33843. end;
  33844. procedure TUART1_U1MODE.setUSIDL; inline;
  33845. begin
  33846. pTDefRegMap(@Self)^.&set := $00002000;
  33847. end;
  33848. procedure TUART1_U1MODE.clearUSIDL; inline;
  33849. begin
  33850. pTDefRegMap(@Self)^.clr := $00002000;
  33851. end;
  33852. procedure TUART1_U1MODE.setUSIDL(thebits : TBits_1); inline;
  33853. begin
  33854. if thebits = 0 then
  33855. pTDefRegMap(@Self)^.clr := $00002000
  33856. else
  33857. pTDefRegMap(@Self)^.&set := $00002000;
  33858. end;
  33859. function TUART1_U1MODE.getUSIDL : TBits_1; inline;
  33860. begin
  33861. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33862. end;
  33863. procedure TUART1_U1MODE.setUARTEN; inline;
  33864. begin
  33865. pTDefRegMap(@Self)^.&set := $00008000;
  33866. end;
  33867. procedure TUART1_U1MODE.clearUARTEN; inline;
  33868. begin
  33869. pTDefRegMap(@Self)^.clr := $00008000;
  33870. end;
  33871. procedure TUART1_U1MODE.setUARTEN(thebits : TBits_1); inline;
  33872. begin
  33873. if thebits = 0 then
  33874. pTDefRegMap(@Self)^.clr := $00008000
  33875. else
  33876. pTDefRegMap(@Self)^.&set := $00008000;
  33877. end;
  33878. function TUART1_U1MODE.getUARTEN : TBits_1; inline;
  33879. begin
  33880. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33881. end;
  33882. procedure TUART1_U1MODE.setw(thebits : TBits_32); inline;
  33883. begin
  33884. pTDefRegMap(@Self)^.val := thebits;
  33885. end;
  33886. function TUART1_U1MODE.getw : TBits_32; inline;
  33887. begin
  33888. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33889. end;
  33890. procedure TUART1_U1ASTA.setURXDA; inline;
  33891. begin
  33892. pTDefRegMap(@Self)^.&set := $00000001;
  33893. end;
  33894. procedure TUART1_U1ASTA.clearURXDA; inline;
  33895. begin
  33896. pTDefRegMap(@Self)^.clr := $00000001;
  33897. end;
  33898. procedure TUART1_U1ASTA.setURXDA(thebits : TBits_1); inline;
  33899. begin
  33900. if thebits = 0 then
  33901. pTDefRegMap(@Self)^.clr := $00000001
  33902. else
  33903. pTDefRegMap(@Self)^.&set := $00000001;
  33904. end;
  33905. function TUART1_U1ASTA.getURXDA : TBits_1; inline;
  33906. begin
  33907. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33908. end;
  33909. procedure TUART1_U1ASTA.setOERR; inline;
  33910. begin
  33911. pTDefRegMap(@Self)^.&set := $00000002;
  33912. end;
  33913. procedure TUART1_U1ASTA.clearOERR; inline;
  33914. begin
  33915. pTDefRegMap(@Self)^.clr := $00000002;
  33916. end;
  33917. procedure TUART1_U1ASTA.setOERR(thebits : TBits_1); inline;
  33918. begin
  33919. if thebits = 0 then
  33920. pTDefRegMap(@Self)^.clr := $00000002
  33921. else
  33922. pTDefRegMap(@Self)^.&set := $00000002;
  33923. end;
  33924. function TUART1_U1ASTA.getOERR : TBits_1; inline;
  33925. begin
  33926. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33927. end;
  33928. procedure TUART1_U1ASTA.setFERR; inline;
  33929. begin
  33930. pTDefRegMap(@Self)^.&set := $00000004;
  33931. end;
  33932. procedure TUART1_U1ASTA.clearFERR; inline;
  33933. begin
  33934. pTDefRegMap(@Self)^.clr := $00000004;
  33935. end;
  33936. procedure TUART1_U1ASTA.setFERR(thebits : TBits_1); inline;
  33937. begin
  33938. if thebits = 0 then
  33939. pTDefRegMap(@Self)^.clr := $00000004
  33940. else
  33941. pTDefRegMap(@Self)^.&set := $00000004;
  33942. end;
  33943. function TUART1_U1ASTA.getFERR : TBits_1; inline;
  33944. begin
  33945. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33946. end;
  33947. procedure TUART1_U1ASTA.setPERR; inline;
  33948. begin
  33949. pTDefRegMap(@Self)^.&set := $00000008;
  33950. end;
  33951. procedure TUART1_U1ASTA.clearPERR; inline;
  33952. begin
  33953. pTDefRegMap(@Self)^.clr := $00000008;
  33954. end;
  33955. procedure TUART1_U1ASTA.setPERR(thebits : TBits_1); inline;
  33956. begin
  33957. if thebits = 0 then
  33958. pTDefRegMap(@Self)^.clr := $00000008
  33959. else
  33960. pTDefRegMap(@Self)^.&set := $00000008;
  33961. end;
  33962. function TUART1_U1ASTA.getPERR : TBits_1; inline;
  33963. begin
  33964. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33965. end;
  33966. procedure TUART1_U1ASTA.setRIDLE; inline;
  33967. begin
  33968. pTDefRegMap(@Self)^.&set := $00000010;
  33969. end;
  33970. procedure TUART1_U1ASTA.clearRIDLE; inline;
  33971. begin
  33972. pTDefRegMap(@Self)^.clr := $00000010;
  33973. end;
  33974. procedure TUART1_U1ASTA.setRIDLE(thebits : TBits_1); inline;
  33975. begin
  33976. if thebits = 0 then
  33977. pTDefRegMap(@Self)^.clr := $00000010
  33978. else
  33979. pTDefRegMap(@Self)^.&set := $00000010;
  33980. end;
  33981. function TUART1_U1ASTA.getRIDLE : TBits_1; inline;
  33982. begin
  33983. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33984. end;
  33985. procedure TUART1_U1ASTA.setADDEN; inline;
  33986. begin
  33987. pTDefRegMap(@Self)^.&set := $00000020;
  33988. end;
  33989. procedure TUART1_U1ASTA.clearADDEN; inline;
  33990. begin
  33991. pTDefRegMap(@Self)^.clr := $00000020;
  33992. end;
  33993. procedure TUART1_U1ASTA.setADDEN(thebits : TBits_1); inline;
  33994. begin
  33995. if thebits = 0 then
  33996. pTDefRegMap(@Self)^.clr := $00000020
  33997. else
  33998. pTDefRegMap(@Self)^.&set := $00000020;
  33999. end;
  34000. function TUART1_U1ASTA.getADDEN : TBits_1; inline;
  34001. begin
  34002. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34003. end;
  34004. procedure TUART1_U1ASTA.setURXISEL(thebits : TBits_2); inline;
  34005. begin
  34006. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  34007. end;
  34008. function TUART1_U1ASTA.getURXISEL : TBits_2; inline;
  34009. begin
  34010. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  34011. end;
  34012. procedure TUART1_U1ASTA.setTRMT; inline;
  34013. begin
  34014. pTDefRegMap(@Self)^.&set := $00000100;
  34015. end;
  34016. procedure TUART1_U1ASTA.clearTRMT; inline;
  34017. begin
  34018. pTDefRegMap(@Self)^.clr := $00000100;
  34019. end;
  34020. procedure TUART1_U1ASTA.setTRMT(thebits : TBits_1); inline;
  34021. begin
  34022. if thebits = 0 then
  34023. pTDefRegMap(@Self)^.clr := $00000100
  34024. else
  34025. pTDefRegMap(@Self)^.&set := $00000100;
  34026. end;
  34027. function TUART1_U1ASTA.getTRMT : TBits_1; inline;
  34028. begin
  34029. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  34030. end;
  34031. procedure TUART1_U1ASTA.setUTXBF; inline;
  34032. begin
  34033. pTDefRegMap(@Self)^.&set := $00000200;
  34034. end;
  34035. procedure TUART1_U1ASTA.clearUTXBF; inline;
  34036. begin
  34037. pTDefRegMap(@Self)^.clr := $00000200;
  34038. end;
  34039. procedure TUART1_U1ASTA.setUTXBF(thebits : TBits_1); inline;
  34040. begin
  34041. if thebits = 0 then
  34042. pTDefRegMap(@Self)^.clr := $00000200
  34043. else
  34044. pTDefRegMap(@Self)^.&set := $00000200;
  34045. end;
  34046. function TUART1_U1ASTA.getUTXBF : TBits_1; inline;
  34047. begin
  34048. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  34049. end;
  34050. procedure TUART1_U1ASTA.setUTXEN; inline;
  34051. begin
  34052. pTDefRegMap(@Self)^.&set := $00000400;
  34053. end;
  34054. procedure TUART1_U1ASTA.clearUTXEN; inline;
  34055. begin
  34056. pTDefRegMap(@Self)^.clr := $00000400;
  34057. end;
  34058. procedure TUART1_U1ASTA.setUTXEN(thebits : TBits_1); inline;
  34059. begin
  34060. if thebits = 0 then
  34061. pTDefRegMap(@Self)^.clr := $00000400
  34062. else
  34063. pTDefRegMap(@Self)^.&set := $00000400;
  34064. end;
  34065. function TUART1_U1ASTA.getUTXEN : TBits_1; inline;
  34066. begin
  34067. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  34068. end;
  34069. procedure TUART1_U1ASTA.setUTXBRK; inline;
  34070. begin
  34071. pTDefRegMap(@Self)^.&set := $00000800;
  34072. end;
  34073. procedure TUART1_U1ASTA.clearUTXBRK; inline;
  34074. begin
  34075. pTDefRegMap(@Self)^.clr := $00000800;
  34076. end;
  34077. procedure TUART1_U1ASTA.setUTXBRK(thebits : TBits_1); inline;
  34078. begin
  34079. if thebits = 0 then
  34080. pTDefRegMap(@Self)^.clr := $00000800
  34081. else
  34082. pTDefRegMap(@Self)^.&set := $00000800;
  34083. end;
  34084. function TUART1_U1ASTA.getUTXBRK : TBits_1; inline;
  34085. begin
  34086. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  34087. end;
  34088. procedure TUART1_U1ASTA.setURXEN; inline;
  34089. begin
  34090. pTDefRegMap(@Self)^.&set := $00001000;
  34091. end;
  34092. procedure TUART1_U1ASTA.clearURXEN; inline;
  34093. begin
  34094. pTDefRegMap(@Self)^.clr := $00001000;
  34095. end;
  34096. procedure TUART1_U1ASTA.setURXEN(thebits : TBits_1); inline;
  34097. begin
  34098. if thebits = 0 then
  34099. pTDefRegMap(@Self)^.clr := $00001000
  34100. else
  34101. pTDefRegMap(@Self)^.&set := $00001000;
  34102. end;
  34103. function TUART1_U1ASTA.getURXEN : TBits_1; inline;
  34104. begin
  34105. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  34106. end;
  34107. procedure TUART1_U1ASTA.setUTXINV; inline;
  34108. begin
  34109. pTDefRegMap(@Self)^.&set := $00002000;
  34110. end;
  34111. procedure TUART1_U1ASTA.clearUTXINV; inline;
  34112. begin
  34113. pTDefRegMap(@Self)^.clr := $00002000;
  34114. end;
  34115. procedure TUART1_U1ASTA.setUTXINV(thebits : TBits_1); inline;
  34116. begin
  34117. if thebits = 0 then
  34118. pTDefRegMap(@Self)^.clr := $00002000
  34119. else
  34120. pTDefRegMap(@Self)^.&set := $00002000;
  34121. end;
  34122. function TUART1_U1ASTA.getUTXINV : TBits_1; inline;
  34123. begin
  34124. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34125. end;
  34126. procedure TUART1_U1ASTA.setUTXISEL(thebits : TBits_2); inline;
  34127. begin
  34128. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  34129. end;
  34130. function TUART1_U1ASTA.getUTXISEL : TBits_2; inline;
  34131. begin
  34132. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  34133. end;
  34134. procedure TUART1_U1ASTA.setADDR(thebits : TBits_8); inline;
  34135. begin
  34136. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  34137. end;
  34138. function TUART1_U1ASTA.getADDR : TBits_8; inline;
  34139. begin
  34140. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  34141. end;
  34142. procedure TUART1_U1ASTA.setADM_EN; inline;
  34143. begin
  34144. pTDefRegMap(@Self)^.&set := $01000000;
  34145. end;
  34146. procedure TUART1_U1ASTA.clearADM_EN; inline;
  34147. begin
  34148. pTDefRegMap(@Self)^.clr := $01000000;
  34149. end;
  34150. procedure TUART1_U1ASTA.setADM_EN(thebits : TBits_1); inline;
  34151. begin
  34152. if thebits = 0 then
  34153. pTDefRegMap(@Self)^.clr := $01000000
  34154. else
  34155. pTDefRegMap(@Self)^.&set := $01000000;
  34156. end;
  34157. function TUART1_U1ASTA.getADM_EN : TBits_1; inline;
  34158. begin
  34159. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  34160. end;
  34161. procedure TUART1_U1ASTA.setURXISEL0; inline;
  34162. begin
  34163. pTDefRegMap(@Self)^.&set := $00000040;
  34164. end;
  34165. procedure TUART1_U1ASTA.clearURXISEL0; inline;
  34166. begin
  34167. pTDefRegMap(@Self)^.clr := $00000040;
  34168. end;
  34169. procedure TUART1_U1ASTA.setURXISEL0(thebits : TBits_1); inline;
  34170. begin
  34171. if thebits = 0 then
  34172. pTDefRegMap(@Self)^.clr := $00000040
  34173. else
  34174. pTDefRegMap(@Self)^.&set := $00000040;
  34175. end;
  34176. function TUART1_U1ASTA.getURXISEL0 : TBits_1; inline;
  34177. begin
  34178. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34179. end;
  34180. procedure TUART1_U1ASTA.setURXISEL1; inline;
  34181. begin
  34182. pTDefRegMap(@Self)^.&set := $00000080;
  34183. end;
  34184. procedure TUART1_U1ASTA.clearURXISEL1; inline;
  34185. begin
  34186. pTDefRegMap(@Self)^.clr := $00000080;
  34187. end;
  34188. procedure TUART1_U1ASTA.setURXISEL1(thebits : TBits_1); inline;
  34189. begin
  34190. if thebits = 0 then
  34191. pTDefRegMap(@Self)^.clr := $00000080
  34192. else
  34193. pTDefRegMap(@Self)^.&set := $00000080;
  34194. end;
  34195. function TUART1_U1ASTA.getURXISEL1 : TBits_1; inline;
  34196. begin
  34197. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  34198. end;
  34199. procedure TUART1_U1ASTA.setUTXISEL0; inline;
  34200. begin
  34201. pTDefRegMap(@Self)^.&set := $00004000;
  34202. end;
  34203. procedure TUART1_U1ASTA.clearUTXISEL0; inline;
  34204. begin
  34205. pTDefRegMap(@Self)^.clr := $00004000;
  34206. end;
  34207. procedure TUART1_U1ASTA.setUTXISEL0(thebits : TBits_1); inline;
  34208. begin
  34209. if thebits = 0 then
  34210. pTDefRegMap(@Self)^.clr := $00004000
  34211. else
  34212. pTDefRegMap(@Self)^.&set := $00004000;
  34213. end;
  34214. function TUART1_U1ASTA.getUTXISEL0 : TBits_1; inline;
  34215. begin
  34216. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  34217. end;
  34218. procedure TUART1_U1ASTA.setUTXISEL1; inline;
  34219. begin
  34220. pTDefRegMap(@Self)^.&set := $00008000;
  34221. end;
  34222. procedure TUART1_U1ASTA.clearUTXISEL1; inline;
  34223. begin
  34224. pTDefRegMap(@Self)^.clr := $00008000;
  34225. end;
  34226. procedure TUART1_U1ASTA.setUTXISEL1(thebits : TBits_1); inline;
  34227. begin
  34228. if thebits = 0 then
  34229. pTDefRegMap(@Self)^.clr := $00008000
  34230. else
  34231. pTDefRegMap(@Self)^.&set := $00008000;
  34232. end;
  34233. function TUART1_U1ASTA.getUTXISEL1 : TBits_1; inline;
  34234. begin
  34235. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34236. end;
  34237. procedure TUART1_U1ASTA.setUTXSEL(thebits : TBits_2); inline;
  34238. begin
  34239. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  34240. end;
  34241. function TUART1_U1ASTA.getUTXSEL : TBits_2; inline;
  34242. begin
  34243. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  34244. end;
  34245. procedure TUART1_U1ASTA.setw(thebits : TBits_32); inline;
  34246. begin
  34247. pTDefRegMap(@Self)^.val := thebits;
  34248. end;
  34249. function TUART1_U1ASTA.getw : TBits_32; inline;
  34250. begin
  34251. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34252. end;
  34253. procedure TUART1_U1STA.setURXDA; inline;
  34254. begin
  34255. pTDefRegMap(@Self)^.&set := $00000001;
  34256. end;
  34257. procedure TUART1_U1STA.clearURXDA; inline;
  34258. begin
  34259. pTDefRegMap(@Self)^.clr := $00000001;
  34260. end;
  34261. procedure TUART1_U1STA.setURXDA(thebits : TBits_1); inline;
  34262. begin
  34263. if thebits = 0 then
  34264. pTDefRegMap(@Self)^.clr := $00000001
  34265. else
  34266. pTDefRegMap(@Self)^.&set := $00000001;
  34267. end;
  34268. function TUART1_U1STA.getURXDA : TBits_1; inline;
  34269. begin
  34270. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34271. end;
  34272. procedure TUART1_U1STA.setOERR; inline;
  34273. begin
  34274. pTDefRegMap(@Self)^.&set := $00000002;
  34275. end;
  34276. procedure TUART1_U1STA.clearOERR; inline;
  34277. begin
  34278. pTDefRegMap(@Self)^.clr := $00000002;
  34279. end;
  34280. procedure TUART1_U1STA.setOERR(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 TUART1_U1STA.getOERR : TBits_1; inline;
  34288. begin
  34289. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34290. end;
  34291. procedure TUART1_U1STA.setFERR; inline;
  34292. begin
  34293. pTDefRegMap(@Self)^.&set := $00000004;
  34294. end;
  34295. procedure TUART1_U1STA.clearFERR; inline;
  34296. begin
  34297. pTDefRegMap(@Self)^.clr := $00000004;
  34298. end;
  34299. procedure TUART1_U1STA.setFERR(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 TUART1_U1STA.getFERR : TBits_1; inline;
  34307. begin
  34308. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34309. end;
  34310. procedure TUART1_U1STA.setPERR; inline;
  34311. begin
  34312. pTDefRegMap(@Self)^.&set := $00000008;
  34313. end;
  34314. procedure TUART1_U1STA.clearPERR; inline;
  34315. begin
  34316. pTDefRegMap(@Self)^.clr := $00000008;
  34317. end;
  34318. procedure TUART1_U1STA.setPERR(thebits : TBits_1); inline;
  34319. begin
  34320. if thebits = 0 then
  34321. pTDefRegMap(@Self)^.clr := $00000008
  34322. else
  34323. pTDefRegMap(@Self)^.&set := $00000008;
  34324. end;
  34325. function TUART1_U1STA.getPERR : TBits_1; inline;
  34326. begin
  34327. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34328. end;
  34329. procedure TUART1_U1STA.setRIDLE; inline;
  34330. begin
  34331. pTDefRegMap(@Self)^.&set := $00000010;
  34332. end;
  34333. procedure TUART1_U1STA.clearRIDLE; inline;
  34334. begin
  34335. pTDefRegMap(@Self)^.clr := $00000010;
  34336. end;
  34337. procedure TUART1_U1STA.setRIDLE(thebits : TBits_1); inline;
  34338. begin
  34339. if thebits = 0 then
  34340. pTDefRegMap(@Self)^.clr := $00000010
  34341. else
  34342. pTDefRegMap(@Self)^.&set := $00000010;
  34343. end;
  34344. function TUART1_U1STA.getRIDLE : TBits_1; inline;
  34345. begin
  34346. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34347. end;
  34348. procedure TUART1_U1STA.setADDEN; inline;
  34349. begin
  34350. pTDefRegMap(@Self)^.&set := $00000020;
  34351. end;
  34352. procedure TUART1_U1STA.clearADDEN; inline;
  34353. begin
  34354. pTDefRegMap(@Self)^.clr := $00000020;
  34355. end;
  34356. procedure TUART1_U1STA.setADDEN(thebits : TBits_1); inline;
  34357. begin
  34358. if thebits = 0 then
  34359. pTDefRegMap(@Self)^.clr := $00000020
  34360. else
  34361. pTDefRegMap(@Self)^.&set := $00000020;
  34362. end;
  34363. function TUART1_U1STA.getADDEN : TBits_1; inline;
  34364. begin
  34365. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34366. end;
  34367. procedure TUART1_U1STA.setURXISEL(thebits : TBits_2); inline;
  34368. begin
  34369. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  34370. end;
  34371. function TUART1_U1STA.getURXISEL : TBits_2; inline;
  34372. begin
  34373. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  34374. end;
  34375. procedure TUART1_U1STA.setTRMT; inline;
  34376. begin
  34377. pTDefRegMap(@Self)^.&set := $00000100;
  34378. end;
  34379. procedure TUART1_U1STA.clearTRMT; inline;
  34380. begin
  34381. pTDefRegMap(@Self)^.clr := $00000100;
  34382. end;
  34383. procedure TUART1_U1STA.setTRMT(thebits : TBits_1); inline;
  34384. begin
  34385. if thebits = 0 then
  34386. pTDefRegMap(@Self)^.clr := $00000100
  34387. else
  34388. pTDefRegMap(@Self)^.&set := $00000100;
  34389. end;
  34390. function TUART1_U1STA.getTRMT : TBits_1; inline;
  34391. begin
  34392. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  34393. end;
  34394. procedure TUART1_U1STA.setUTXBF; inline;
  34395. begin
  34396. pTDefRegMap(@Self)^.&set := $00000200;
  34397. end;
  34398. procedure TUART1_U1STA.clearUTXBF; inline;
  34399. begin
  34400. pTDefRegMap(@Self)^.clr := $00000200;
  34401. end;
  34402. procedure TUART1_U1STA.setUTXBF(thebits : TBits_1); inline;
  34403. begin
  34404. if thebits = 0 then
  34405. pTDefRegMap(@Self)^.clr := $00000200
  34406. else
  34407. pTDefRegMap(@Self)^.&set := $00000200;
  34408. end;
  34409. function TUART1_U1STA.getUTXBF : TBits_1; inline;
  34410. begin
  34411. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  34412. end;
  34413. procedure TUART1_U1STA.setUTXEN; inline;
  34414. begin
  34415. pTDefRegMap(@Self)^.&set := $00000400;
  34416. end;
  34417. procedure TUART1_U1STA.clearUTXEN; inline;
  34418. begin
  34419. pTDefRegMap(@Self)^.clr := $00000400;
  34420. end;
  34421. procedure TUART1_U1STA.setUTXEN(thebits : TBits_1); inline;
  34422. begin
  34423. if thebits = 0 then
  34424. pTDefRegMap(@Self)^.clr := $00000400
  34425. else
  34426. pTDefRegMap(@Self)^.&set := $00000400;
  34427. end;
  34428. function TUART1_U1STA.getUTXEN : TBits_1; inline;
  34429. begin
  34430. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  34431. end;
  34432. procedure TUART1_U1STA.setUTXBRK; inline;
  34433. begin
  34434. pTDefRegMap(@Self)^.&set := $00000800;
  34435. end;
  34436. procedure TUART1_U1STA.clearUTXBRK; inline;
  34437. begin
  34438. pTDefRegMap(@Self)^.clr := $00000800;
  34439. end;
  34440. procedure TUART1_U1STA.setUTXBRK(thebits : TBits_1); inline;
  34441. begin
  34442. if thebits = 0 then
  34443. pTDefRegMap(@Self)^.clr := $00000800
  34444. else
  34445. pTDefRegMap(@Self)^.&set := $00000800;
  34446. end;
  34447. function TUART1_U1STA.getUTXBRK : TBits_1; inline;
  34448. begin
  34449. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  34450. end;
  34451. procedure TUART1_U1STA.setURXEN; inline;
  34452. begin
  34453. pTDefRegMap(@Self)^.&set := $00001000;
  34454. end;
  34455. procedure TUART1_U1STA.clearURXEN; inline;
  34456. begin
  34457. pTDefRegMap(@Self)^.clr := $00001000;
  34458. end;
  34459. procedure TUART1_U1STA.setURXEN(thebits : TBits_1); inline;
  34460. begin
  34461. if thebits = 0 then
  34462. pTDefRegMap(@Self)^.clr := $00001000
  34463. else
  34464. pTDefRegMap(@Self)^.&set := $00001000;
  34465. end;
  34466. function TUART1_U1STA.getURXEN : TBits_1; inline;
  34467. begin
  34468. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  34469. end;
  34470. procedure TUART1_U1STA.setUTXINV; inline;
  34471. begin
  34472. pTDefRegMap(@Self)^.&set := $00002000;
  34473. end;
  34474. procedure TUART1_U1STA.clearUTXINV; inline;
  34475. begin
  34476. pTDefRegMap(@Self)^.clr := $00002000;
  34477. end;
  34478. procedure TUART1_U1STA.setUTXINV(thebits : TBits_1); inline;
  34479. begin
  34480. if thebits = 0 then
  34481. pTDefRegMap(@Self)^.clr := $00002000
  34482. else
  34483. pTDefRegMap(@Self)^.&set := $00002000;
  34484. end;
  34485. function TUART1_U1STA.getUTXINV : TBits_1; inline;
  34486. begin
  34487. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34488. end;
  34489. procedure TUART1_U1STA.setUTXISEL(thebits : TBits_2); inline;
  34490. begin
  34491. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  34492. end;
  34493. function TUART1_U1STA.getUTXISEL : TBits_2; inline;
  34494. begin
  34495. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  34496. end;
  34497. procedure TUART1_U1STA.setADDR(thebits : TBits_8); inline;
  34498. begin
  34499. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  34500. end;
  34501. function TUART1_U1STA.getADDR : TBits_8; inline;
  34502. begin
  34503. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  34504. end;
  34505. procedure TUART1_U1STA.setADM_EN; inline;
  34506. begin
  34507. pTDefRegMap(@Self)^.&set := $01000000;
  34508. end;
  34509. procedure TUART1_U1STA.clearADM_EN; inline;
  34510. begin
  34511. pTDefRegMap(@Self)^.clr := $01000000;
  34512. end;
  34513. procedure TUART1_U1STA.setADM_EN(thebits : TBits_1); inline;
  34514. begin
  34515. if thebits = 0 then
  34516. pTDefRegMap(@Self)^.clr := $01000000
  34517. else
  34518. pTDefRegMap(@Self)^.&set := $01000000;
  34519. end;
  34520. function TUART1_U1STA.getADM_EN : TBits_1; inline;
  34521. begin
  34522. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  34523. end;
  34524. procedure TUART1_U1STA.setURXISEL0; inline;
  34525. begin
  34526. pTDefRegMap(@Self)^.&set := $00000040;
  34527. end;
  34528. procedure TUART1_U1STA.clearURXISEL0; inline;
  34529. begin
  34530. pTDefRegMap(@Self)^.clr := $00000040;
  34531. end;
  34532. procedure TUART1_U1STA.setURXISEL0(thebits : TBits_1); inline;
  34533. begin
  34534. if thebits = 0 then
  34535. pTDefRegMap(@Self)^.clr := $00000040
  34536. else
  34537. pTDefRegMap(@Self)^.&set := $00000040;
  34538. end;
  34539. function TUART1_U1STA.getURXISEL0 : TBits_1; inline;
  34540. begin
  34541. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34542. end;
  34543. procedure TUART1_U1STA.setURXISEL1; inline;
  34544. begin
  34545. pTDefRegMap(@Self)^.&set := $00000080;
  34546. end;
  34547. procedure TUART1_U1STA.clearURXISEL1; inline;
  34548. begin
  34549. pTDefRegMap(@Self)^.clr := $00000080;
  34550. end;
  34551. procedure TUART1_U1STA.setURXISEL1(thebits : TBits_1); inline;
  34552. begin
  34553. if thebits = 0 then
  34554. pTDefRegMap(@Self)^.clr := $00000080
  34555. else
  34556. pTDefRegMap(@Self)^.&set := $00000080;
  34557. end;
  34558. function TUART1_U1STA.getURXISEL1 : TBits_1; inline;
  34559. begin
  34560. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  34561. end;
  34562. procedure TUART1_U1STA.setUTXISEL0; inline;
  34563. begin
  34564. pTDefRegMap(@Self)^.&set := $00004000;
  34565. end;
  34566. procedure TUART1_U1STA.clearUTXISEL0; inline;
  34567. begin
  34568. pTDefRegMap(@Self)^.clr := $00004000;
  34569. end;
  34570. procedure TUART1_U1STA.setUTXISEL0(thebits : TBits_1); inline;
  34571. begin
  34572. if thebits = 0 then
  34573. pTDefRegMap(@Self)^.clr := $00004000
  34574. else
  34575. pTDefRegMap(@Self)^.&set := $00004000;
  34576. end;
  34577. function TUART1_U1STA.getUTXISEL0 : TBits_1; inline;
  34578. begin
  34579. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  34580. end;
  34581. procedure TUART1_U1STA.setUTXISEL1; inline;
  34582. begin
  34583. pTDefRegMap(@Self)^.&set := $00008000;
  34584. end;
  34585. procedure TUART1_U1STA.clearUTXISEL1; inline;
  34586. begin
  34587. pTDefRegMap(@Self)^.clr := $00008000;
  34588. end;
  34589. procedure TUART1_U1STA.setUTXISEL1(thebits : TBits_1); inline;
  34590. begin
  34591. if thebits = 0 then
  34592. pTDefRegMap(@Self)^.clr := $00008000
  34593. else
  34594. pTDefRegMap(@Self)^.&set := $00008000;
  34595. end;
  34596. function TUART1_U1STA.getUTXISEL1 : TBits_1; inline;
  34597. begin
  34598. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34599. end;
  34600. procedure TUART1_U1STA.setUTXSEL(thebits : TBits_2); inline;
  34601. begin
  34602. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  34603. end;
  34604. function TUART1_U1STA.getUTXSEL : TBits_2; inline;
  34605. begin
  34606. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  34607. end;
  34608. procedure TUART1_U1STA.setw(thebits : TBits_32); inline;
  34609. begin
  34610. pTDefRegMap(@Self)^.val := thebits;
  34611. end;
  34612. function TUART1_U1STA.getw : TBits_32; inline;
  34613. begin
  34614. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34615. end;
  34616. procedure TUART4_U1BMODE.setSTSEL; inline;
  34617. begin
  34618. pTDefRegMap(@Self)^.&set := $00000001;
  34619. end;
  34620. procedure TUART4_U1BMODE.clearSTSEL; inline;
  34621. begin
  34622. pTDefRegMap(@Self)^.clr := $00000001;
  34623. end;
  34624. procedure TUART4_U1BMODE.setSTSEL(thebits : TBits_1); inline;
  34625. begin
  34626. if thebits = 0 then
  34627. pTDefRegMap(@Self)^.clr := $00000001
  34628. else
  34629. pTDefRegMap(@Self)^.&set := $00000001;
  34630. end;
  34631. function TUART4_U1BMODE.getSTSEL : TBits_1; inline;
  34632. begin
  34633. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34634. end;
  34635. procedure TUART4_U1BMODE.setPDSEL(thebits : TBits_2); inline;
  34636. begin
  34637. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  34638. end;
  34639. function TUART4_U1BMODE.getPDSEL : TBits_2; inline;
  34640. begin
  34641. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  34642. end;
  34643. procedure TUART4_U1BMODE.setBRGH; inline;
  34644. begin
  34645. pTDefRegMap(@Self)^.&set := $00000008;
  34646. end;
  34647. procedure TUART4_U1BMODE.clearBRGH; inline;
  34648. begin
  34649. pTDefRegMap(@Self)^.clr := $00000008;
  34650. end;
  34651. procedure TUART4_U1BMODE.setBRGH(thebits : TBits_1); inline;
  34652. begin
  34653. if thebits = 0 then
  34654. pTDefRegMap(@Self)^.clr := $00000008
  34655. else
  34656. pTDefRegMap(@Self)^.&set := $00000008;
  34657. end;
  34658. function TUART4_U1BMODE.getBRGH : TBits_1; inline;
  34659. begin
  34660. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34661. end;
  34662. procedure TUART4_U1BMODE.setRXINV; inline;
  34663. begin
  34664. pTDefRegMap(@Self)^.&set := $00000010;
  34665. end;
  34666. procedure TUART4_U1BMODE.clearRXINV; inline;
  34667. begin
  34668. pTDefRegMap(@Self)^.clr := $00000010;
  34669. end;
  34670. procedure TUART4_U1BMODE.setRXINV(thebits : TBits_1); inline;
  34671. begin
  34672. if thebits = 0 then
  34673. pTDefRegMap(@Self)^.clr := $00000010
  34674. else
  34675. pTDefRegMap(@Self)^.&set := $00000010;
  34676. end;
  34677. function TUART4_U1BMODE.getRXINV : TBits_1; inline;
  34678. begin
  34679. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34680. end;
  34681. procedure TUART4_U1BMODE.setABAUD; inline;
  34682. begin
  34683. pTDefRegMap(@Self)^.&set := $00000020;
  34684. end;
  34685. procedure TUART4_U1BMODE.clearABAUD; inline;
  34686. begin
  34687. pTDefRegMap(@Self)^.clr := $00000020;
  34688. end;
  34689. procedure TUART4_U1BMODE.setABAUD(thebits : TBits_1); inline;
  34690. begin
  34691. if thebits = 0 then
  34692. pTDefRegMap(@Self)^.clr := $00000020
  34693. else
  34694. pTDefRegMap(@Self)^.&set := $00000020;
  34695. end;
  34696. function TUART4_U1BMODE.getABAUD : TBits_1; inline;
  34697. begin
  34698. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34699. end;
  34700. procedure TUART4_U1BMODE.setLPBACK; inline;
  34701. begin
  34702. pTDefRegMap(@Self)^.&set := $00000040;
  34703. end;
  34704. procedure TUART4_U1BMODE.clearLPBACK; inline;
  34705. begin
  34706. pTDefRegMap(@Self)^.clr := $00000040;
  34707. end;
  34708. procedure TUART4_U1BMODE.setLPBACK(thebits : TBits_1); inline;
  34709. begin
  34710. if thebits = 0 then
  34711. pTDefRegMap(@Self)^.clr := $00000040
  34712. else
  34713. pTDefRegMap(@Self)^.&set := $00000040;
  34714. end;
  34715. function TUART4_U1BMODE.getLPBACK : TBits_1; inline;
  34716. begin
  34717. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34718. end;
  34719. procedure TUART4_U1BMODE.setWAKE; inline;
  34720. begin
  34721. pTDefRegMap(@Self)^.&set := $00000080;
  34722. end;
  34723. procedure TUART4_U1BMODE.clearWAKE; inline;
  34724. begin
  34725. pTDefRegMap(@Self)^.clr := $00000080;
  34726. end;
  34727. procedure TUART4_U1BMODE.setWAKE(thebits : TBits_1); inline;
  34728. begin
  34729. if thebits = 0 then
  34730. pTDefRegMap(@Self)^.clr := $00000080
  34731. else
  34732. pTDefRegMap(@Self)^.&set := $00000080;
  34733. end;
  34734. function TUART4_U1BMODE.getWAKE : TBits_1; inline;
  34735. begin
  34736. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  34737. end;
  34738. procedure TUART4_U1BMODE.setIREN; inline;
  34739. begin
  34740. pTDefRegMap(@Self)^.&set := $00001000;
  34741. end;
  34742. procedure TUART4_U1BMODE.clearIREN; inline;
  34743. begin
  34744. pTDefRegMap(@Self)^.clr := $00001000;
  34745. end;
  34746. procedure TUART4_U1BMODE.setIREN(thebits : TBits_1); inline;
  34747. begin
  34748. if thebits = 0 then
  34749. pTDefRegMap(@Self)^.clr := $00001000
  34750. else
  34751. pTDefRegMap(@Self)^.&set := $00001000;
  34752. end;
  34753. function TUART4_U1BMODE.getIREN : TBits_1; inline;
  34754. begin
  34755. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  34756. end;
  34757. procedure TUART4_U1BMODE.setSIDL; inline;
  34758. begin
  34759. pTDefRegMap(@Self)^.&set := $00002000;
  34760. end;
  34761. procedure TUART4_U1BMODE.clearSIDL; inline;
  34762. begin
  34763. pTDefRegMap(@Self)^.clr := $00002000;
  34764. end;
  34765. procedure TUART4_U1BMODE.setSIDL(thebits : TBits_1); inline;
  34766. begin
  34767. if thebits = 0 then
  34768. pTDefRegMap(@Self)^.clr := $00002000
  34769. else
  34770. pTDefRegMap(@Self)^.&set := $00002000;
  34771. end;
  34772. function TUART4_U1BMODE.getSIDL : TBits_1; inline;
  34773. begin
  34774. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34775. end;
  34776. procedure TUART4_U1BMODE.setON; inline;
  34777. begin
  34778. pTDefRegMap(@Self)^.&set := $00008000;
  34779. end;
  34780. procedure TUART4_U1BMODE.clearON; inline;
  34781. begin
  34782. pTDefRegMap(@Self)^.clr := $00008000;
  34783. end;
  34784. procedure TUART4_U1BMODE.setON(thebits : TBits_1); inline;
  34785. begin
  34786. if thebits = 0 then
  34787. pTDefRegMap(@Self)^.clr := $00008000
  34788. else
  34789. pTDefRegMap(@Self)^.&set := $00008000;
  34790. end;
  34791. function TUART4_U1BMODE.getON : TBits_1; inline;
  34792. begin
  34793. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34794. end;
  34795. procedure TUART4_U1BMODE.setPDSEL0; inline;
  34796. begin
  34797. pTDefRegMap(@Self)^.&set := $00000002;
  34798. end;
  34799. procedure TUART4_U1BMODE.clearPDSEL0; inline;
  34800. begin
  34801. pTDefRegMap(@Self)^.clr := $00000002;
  34802. end;
  34803. procedure TUART4_U1BMODE.setPDSEL0(thebits : TBits_1); inline;
  34804. begin
  34805. if thebits = 0 then
  34806. pTDefRegMap(@Self)^.clr := $00000002
  34807. else
  34808. pTDefRegMap(@Self)^.&set := $00000002;
  34809. end;
  34810. function TUART4_U1BMODE.getPDSEL0 : TBits_1; inline;
  34811. begin
  34812. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34813. end;
  34814. procedure TUART4_U1BMODE.setPDSEL1; inline;
  34815. begin
  34816. pTDefRegMap(@Self)^.&set := $00000004;
  34817. end;
  34818. procedure TUART4_U1BMODE.clearPDSEL1; inline;
  34819. begin
  34820. pTDefRegMap(@Self)^.clr := $00000004;
  34821. end;
  34822. procedure TUART4_U1BMODE.setPDSEL1(thebits : TBits_1); inline;
  34823. begin
  34824. if thebits = 0 then
  34825. pTDefRegMap(@Self)^.clr := $00000004
  34826. else
  34827. pTDefRegMap(@Self)^.&set := $00000004;
  34828. end;
  34829. function TUART4_U1BMODE.getPDSEL1 : TBits_1; inline;
  34830. begin
  34831. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34832. end;
  34833. procedure TUART4_U1BMODE.setUSIDL; inline;
  34834. begin
  34835. pTDefRegMap(@Self)^.&set := $00002000;
  34836. end;
  34837. procedure TUART4_U1BMODE.clearUSIDL; inline;
  34838. begin
  34839. pTDefRegMap(@Self)^.clr := $00002000;
  34840. end;
  34841. procedure TUART4_U1BMODE.setUSIDL(thebits : TBits_1); inline;
  34842. begin
  34843. if thebits = 0 then
  34844. pTDefRegMap(@Self)^.clr := $00002000
  34845. else
  34846. pTDefRegMap(@Self)^.&set := $00002000;
  34847. end;
  34848. function TUART4_U1BMODE.getUSIDL : TBits_1; inline;
  34849. begin
  34850. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34851. end;
  34852. procedure TUART4_U1BMODE.setUARTEN; inline;
  34853. begin
  34854. pTDefRegMap(@Self)^.&set := $00008000;
  34855. end;
  34856. procedure TUART4_U1BMODE.clearUARTEN; inline;
  34857. begin
  34858. pTDefRegMap(@Self)^.clr := $00008000;
  34859. end;
  34860. procedure TUART4_U1BMODE.setUARTEN(thebits : TBits_1); inline;
  34861. begin
  34862. if thebits = 0 then
  34863. pTDefRegMap(@Self)^.clr := $00008000
  34864. else
  34865. pTDefRegMap(@Self)^.&set := $00008000;
  34866. end;
  34867. function TUART4_U1BMODE.getUARTEN : TBits_1; inline;
  34868. begin
  34869. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34870. end;
  34871. procedure TUART4_U1BMODE.setw(thebits : TBits_32); inline;
  34872. begin
  34873. pTDefRegMap(@Self)^.val := thebits;
  34874. end;
  34875. function TUART4_U1BMODE.getw : TBits_32; inline;
  34876. begin
  34877. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34878. end;
  34879. procedure TUART4_U4MODE.setSTSEL; inline;
  34880. begin
  34881. pTDefRegMap(@Self)^.&set := $00000001;
  34882. end;
  34883. procedure TUART4_U4MODE.clearSTSEL; inline;
  34884. begin
  34885. pTDefRegMap(@Self)^.clr := $00000001;
  34886. end;
  34887. procedure TUART4_U4MODE.setSTSEL(thebits : TBits_1); inline;
  34888. begin
  34889. if thebits = 0 then
  34890. pTDefRegMap(@Self)^.clr := $00000001
  34891. else
  34892. pTDefRegMap(@Self)^.&set := $00000001;
  34893. end;
  34894. function TUART4_U4MODE.getSTSEL : TBits_1; inline;
  34895. begin
  34896. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34897. end;
  34898. procedure TUART4_U4MODE.setPDSEL(thebits : TBits_2); inline;
  34899. begin
  34900. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  34901. end;
  34902. function TUART4_U4MODE.getPDSEL : TBits_2; inline;
  34903. begin
  34904. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  34905. end;
  34906. procedure TUART4_U4MODE.setBRGH; inline;
  34907. begin
  34908. pTDefRegMap(@Self)^.&set := $00000008;
  34909. end;
  34910. procedure TUART4_U4MODE.clearBRGH; inline;
  34911. begin
  34912. pTDefRegMap(@Self)^.clr := $00000008;
  34913. end;
  34914. procedure TUART4_U4MODE.setBRGH(thebits : TBits_1); inline;
  34915. begin
  34916. if thebits = 0 then
  34917. pTDefRegMap(@Self)^.clr := $00000008
  34918. else
  34919. pTDefRegMap(@Self)^.&set := $00000008;
  34920. end;
  34921. function TUART4_U4MODE.getBRGH : TBits_1; inline;
  34922. begin
  34923. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34924. end;
  34925. procedure TUART4_U4MODE.setRXINV; inline;
  34926. begin
  34927. pTDefRegMap(@Self)^.&set := $00000010;
  34928. end;
  34929. procedure TUART4_U4MODE.clearRXINV; inline;
  34930. begin
  34931. pTDefRegMap(@Self)^.clr := $00000010;
  34932. end;
  34933. procedure TUART4_U4MODE.setRXINV(thebits : TBits_1); inline;
  34934. begin
  34935. if thebits = 0 then
  34936. pTDefRegMap(@Self)^.clr := $00000010
  34937. else
  34938. pTDefRegMap(@Self)^.&set := $00000010;
  34939. end;
  34940. function TUART4_U4MODE.getRXINV : TBits_1; inline;
  34941. begin
  34942. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34943. end;
  34944. procedure TUART4_U4MODE.setABAUD; inline;
  34945. begin
  34946. pTDefRegMap(@Self)^.&set := $00000020;
  34947. end;
  34948. procedure TUART4_U4MODE.clearABAUD; inline;
  34949. begin
  34950. pTDefRegMap(@Self)^.clr := $00000020;
  34951. end;
  34952. procedure TUART4_U4MODE.setABAUD(thebits : TBits_1); inline;
  34953. begin
  34954. if thebits = 0 then
  34955. pTDefRegMap(@Self)^.clr := $00000020
  34956. else
  34957. pTDefRegMap(@Self)^.&set := $00000020;
  34958. end;
  34959. function TUART4_U4MODE.getABAUD : TBits_1; inline;
  34960. begin
  34961. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34962. end;
  34963. procedure TUART4_U4MODE.setLPBACK; inline;
  34964. begin
  34965. pTDefRegMap(@Self)^.&set := $00000040;
  34966. end;
  34967. procedure TUART4_U4MODE.clearLPBACK; inline;
  34968. begin
  34969. pTDefRegMap(@Self)^.clr := $00000040;
  34970. end;
  34971. procedure TUART4_U4MODE.setLPBACK(thebits : TBits_1); inline;
  34972. begin
  34973. if thebits = 0 then
  34974. pTDefRegMap(@Self)^.clr := $00000040
  34975. else
  34976. pTDefRegMap(@Self)^.&set := $00000040;
  34977. end;
  34978. function TUART4_U4MODE.getLPBACK : TBits_1; inline;
  34979. begin
  34980. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34981. end;
  34982. procedure TUART4_U4MODE.setWAKE; inline;
  34983. begin
  34984. pTDefRegMap(@Self)^.&set := $00000080;
  34985. end;
  34986. procedure TUART4_U4MODE.clearWAKE; inline;
  34987. begin
  34988. pTDefRegMap(@Self)^.clr := $00000080;
  34989. end;
  34990. procedure TUART4_U4MODE.setWAKE(thebits : TBits_1); inline;
  34991. begin
  34992. if thebits = 0 then
  34993. pTDefRegMap(@Self)^.clr := $00000080
  34994. else
  34995. pTDefRegMap(@Self)^.&set := $00000080;
  34996. end;
  34997. function TUART4_U4MODE.getWAKE : TBits_1; inline;
  34998. begin
  34999. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35000. end;
  35001. procedure TUART4_U4MODE.setIREN; inline;
  35002. begin
  35003. pTDefRegMap(@Self)^.&set := $00001000;
  35004. end;
  35005. procedure TUART4_U4MODE.clearIREN; inline;
  35006. begin
  35007. pTDefRegMap(@Self)^.clr := $00001000;
  35008. end;
  35009. procedure TUART4_U4MODE.setIREN(thebits : TBits_1); inline;
  35010. begin
  35011. if thebits = 0 then
  35012. pTDefRegMap(@Self)^.clr := $00001000
  35013. else
  35014. pTDefRegMap(@Self)^.&set := $00001000;
  35015. end;
  35016. function TUART4_U4MODE.getIREN : TBits_1; inline;
  35017. begin
  35018. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  35019. end;
  35020. procedure TUART4_U4MODE.setSIDL; inline;
  35021. begin
  35022. pTDefRegMap(@Self)^.&set := $00002000;
  35023. end;
  35024. procedure TUART4_U4MODE.clearSIDL; inline;
  35025. begin
  35026. pTDefRegMap(@Self)^.clr := $00002000;
  35027. end;
  35028. procedure TUART4_U4MODE.setSIDL(thebits : TBits_1); inline;
  35029. begin
  35030. if thebits = 0 then
  35031. pTDefRegMap(@Self)^.clr := $00002000
  35032. else
  35033. pTDefRegMap(@Self)^.&set := $00002000;
  35034. end;
  35035. function TUART4_U4MODE.getSIDL : TBits_1; inline;
  35036. begin
  35037. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35038. end;
  35039. procedure TUART4_U4MODE.setON; inline;
  35040. begin
  35041. pTDefRegMap(@Self)^.&set := $00008000;
  35042. end;
  35043. procedure TUART4_U4MODE.clearON; inline;
  35044. begin
  35045. pTDefRegMap(@Self)^.clr := $00008000;
  35046. end;
  35047. procedure TUART4_U4MODE.setON(thebits : TBits_1); inline;
  35048. begin
  35049. if thebits = 0 then
  35050. pTDefRegMap(@Self)^.clr := $00008000
  35051. else
  35052. pTDefRegMap(@Self)^.&set := $00008000;
  35053. end;
  35054. function TUART4_U4MODE.getON : TBits_1; inline;
  35055. begin
  35056. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35057. end;
  35058. procedure TUART4_U4MODE.setPDSEL0; inline;
  35059. begin
  35060. pTDefRegMap(@Self)^.&set := $00000002;
  35061. end;
  35062. procedure TUART4_U4MODE.clearPDSEL0; inline;
  35063. begin
  35064. pTDefRegMap(@Self)^.clr := $00000002;
  35065. end;
  35066. procedure TUART4_U4MODE.setPDSEL0(thebits : TBits_1); inline;
  35067. begin
  35068. if thebits = 0 then
  35069. pTDefRegMap(@Self)^.clr := $00000002
  35070. else
  35071. pTDefRegMap(@Self)^.&set := $00000002;
  35072. end;
  35073. function TUART4_U4MODE.getPDSEL0 : TBits_1; inline;
  35074. begin
  35075. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35076. end;
  35077. procedure TUART4_U4MODE.setPDSEL1; inline;
  35078. begin
  35079. pTDefRegMap(@Self)^.&set := $00000004;
  35080. end;
  35081. procedure TUART4_U4MODE.clearPDSEL1; inline;
  35082. begin
  35083. pTDefRegMap(@Self)^.clr := $00000004;
  35084. end;
  35085. procedure TUART4_U4MODE.setPDSEL1(thebits : TBits_1); inline;
  35086. begin
  35087. if thebits = 0 then
  35088. pTDefRegMap(@Self)^.clr := $00000004
  35089. else
  35090. pTDefRegMap(@Self)^.&set := $00000004;
  35091. end;
  35092. function TUART4_U4MODE.getPDSEL1 : TBits_1; inline;
  35093. begin
  35094. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35095. end;
  35096. procedure TUART4_U4MODE.setUSIDL; inline;
  35097. begin
  35098. pTDefRegMap(@Self)^.&set := $00002000;
  35099. end;
  35100. procedure TUART4_U4MODE.clearUSIDL; inline;
  35101. begin
  35102. pTDefRegMap(@Self)^.clr := $00002000;
  35103. end;
  35104. procedure TUART4_U4MODE.setUSIDL(thebits : TBits_1); inline;
  35105. begin
  35106. if thebits = 0 then
  35107. pTDefRegMap(@Self)^.clr := $00002000
  35108. else
  35109. pTDefRegMap(@Self)^.&set := $00002000;
  35110. end;
  35111. function TUART4_U4MODE.getUSIDL : TBits_1; inline;
  35112. begin
  35113. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35114. end;
  35115. procedure TUART4_U4MODE.setUARTEN; inline;
  35116. begin
  35117. pTDefRegMap(@Self)^.&set := $00008000;
  35118. end;
  35119. procedure TUART4_U4MODE.clearUARTEN; inline;
  35120. begin
  35121. pTDefRegMap(@Self)^.clr := $00008000;
  35122. end;
  35123. procedure TUART4_U4MODE.setUARTEN(thebits : TBits_1); inline;
  35124. begin
  35125. if thebits = 0 then
  35126. pTDefRegMap(@Self)^.clr := $00008000
  35127. else
  35128. pTDefRegMap(@Self)^.&set := $00008000;
  35129. end;
  35130. function TUART4_U4MODE.getUARTEN : TBits_1; inline;
  35131. begin
  35132. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35133. end;
  35134. procedure TUART4_U4MODE.setw(thebits : TBits_32); inline;
  35135. begin
  35136. pTDefRegMap(@Self)^.val := thebits;
  35137. end;
  35138. function TUART4_U4MODE.getw : TBits_32; inline;
  35139. begin
  35140. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35141. end;
  35142. procedure TUART4_U1BSTA.setURXDA; inline;
  35143. begin
  35144. pTDefRegMap(@Self)^.&set := $00000001;
  35145. end;
  35146. procedure TUART4_U1BSTA.clearURXDA; inline;
  35147. begin
  35148. pTDefRegMap(@Self)^.clr := $00000001;
  35149. end;
  35150. procedure TUART4_U1BSTA.setURXDA(thebits : TBits_1); inline;
  35151. begin
  35152. if thebits = 0 then
  35153. pTDefRegMap(@Self)^.clr := $00000001
  35154. else
  35155. pTDefRegMap(@Self)^.&set := $00000001;
  35156. end;
  35157. function TUART4_U1BSTA.getURXDA : TBits_1; inline;
  35158. begin
  35159. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35160. end;
  35161. procedure TUART4_U1BSTA.setOERR; inline;
  35162. begin
  35163. pTDefRegMap(@Self)^.&set := $00000002;
  35164. end;
  35165. procedure TUART4_U1BSTA.clearOERR; inline;
  35166. begin
  35167. pTDefRegMap(@Self)^.clr := $00000002;
  35168. end;
  35169. procedure TUART4_U1BSTA.setOERR(thebits : TBits_1); inline;
  35170. begin
  35171. if thebits = 0 then
  35172. pTDefRegMap(@Self)^.clr := $00000002
  35173. else
  35174. pTDefRegMap(@Self)^.&set := $00000002;
  35175. end;
  35176. function TUART4_U1BSTA.getOERR : TBits_1; inline;
  35177. begin
  35178. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35179. end;
  35180. procedure TUART4_U1BSTA.setFERR; inline;
  35181. begin
  35182. pTDefRegMap(@Self)^.&set := $00000004;
  35183. end;
  35184. procedure TUART4_U1BSTA.clearFERR; inline;
  35185. begin
  35186. pTDefRegMap(@Self)^.clr := $00000004;
  35187. end;
  35188. procedure TUART4_U1BSTA.setFERR(thebits : TBits_1); inline;
  35189. begin
  35190. if thebits = 0 then
  35191. pTDefRegMap(@Self)^.clr := $00000004
  35192. else
  35193. pTDefRegMap(@Self)^.&set := $00000004;
  35194. end;
  35195. function TUART4_U1BSTA.getFERR : TBits_1; inline;
  35196. begin
  35197. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35198. end;
  35199. procedure TUART4_U1BSTA.setPERR; inline;
  35200. begin
  35201. pTDefRegMap(@Self)^.&set := $00000008;
  35202. end;
  35203. procedure TUART4_U1BSTA.clearPERR; inline;
  35204. begin
  35205. pTDefRegMap(@Self)^.clr := $00000008;
  35206. end;
  35207. procedure TUART4_U1BSTA.setPERR(thebits : TBits_1); inline;
  35208. begin
  35209. if thebits = 0 then
  35210. pTDefRegMap(@Self)^.clr := $00000008
  35211. else
  35212. pTDefRegMap(@Self)^.&set := $00000008;
  35213. end;
  35214. function TUART4_U1BSTA.getPERR : TBits_1; inline;
  35215. begin
  35216. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35217. end;
  35218. procedure TUART4_U1BSTA.setRIDLE; inline;
  35219. begin
  35220. pTDefRegMap(@Self)^.&set := $00000010;
  35221. end;
  35222. procedure TUART4_U1BSTA.clearRIDLE; inline;
  35223. begin
  35224. pTDefRegMap(@Self)^.clr := $00000010;
  35225. end;
  35226. procedure TUART4_U1BSTA.setRIDLE(thebits : TBits_1); inline;
  35227. begin
  35228. if thebits = 0 then
  35229. pTDefRegMap(@Self)^.clr := $00000010
  35230. else
  35231. pTDefRegMap(@Self)^.&set := $00000010;
  35232. end;
  35233. function TUART4_U1BSTA.getRIDLE : TBits_1; inline;
  35234. begin
  35235. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35236. end;
  35237. procedure TUART4_U1BSTA.setADDEN; inline;
  35238. begin
  35239. pTDefRegMap(@Self)^.&set := $00000020;
  35240. end;
  35241. procedure TUART4_U1BSTA.clearADDEN; inline;
  35242. begin
  35243. pTDefRegMap(@Self)^.clr := $00000020;
  35244. end;
  35245. procedure TUART4_U1BSTA.setADDEN(thebits : TBits_1); inline;
  35246. begin
  35247. if thebits = 0 then
  35248. pTDefRegMap(@Self)^.clr := $00000020
  35249. else
  35250. pTDefRegMap(@Self)^.&set := $00000020;
  35251. end;
  35252. function TUART4_U1BSTA.getADDEN : TBits_1; inline;
  35253. begin
  35254. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35255. end;
  35256. procedure TUART4_U1BSTA.setURXISEL(thebits : TBits_2); inline;
  35257. begin
  35258. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  35259. end;
  35260. function TUART4_U1BSTA.getURXISEL : TBits_2; inline;
  35261. begin
  35262. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  35263. end;
  35264. procedure TUART4_U1BSTA.setTRMT; inline;
  35265. begin
  35266. pTDefRegMap(@Self)^.&set := $00000100;
  35267. end;
  35268. procedure TUART4_U1BSTA.clearTRMT; inline;
  35269. begin
  35270. pTDefRegMap(@Self)^.clr := $00000100;
  35271. end;
  35272. procedure TUART4_U1BSTA.setTRMT(thebits : TBits_1); inline;
  35273. begin
  35274. if thebits = 0 then
  35275. pTDefRegMap(@Self)^.clr := $00000100
  35276. else
  35277. pTDefRegMap(@Self)^.&set := $00000100;
  35278. end;
  35279. function TUART4_U1BSTA.getTRMT : TBits_1; inline;
  35280. begin
  35281. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  35282. end;
  35283. procedure TUART4_U1BSTA.setUTXBF; inline;
  35284. begin
  35285. pTDefRegMap(@Self)^.&set := $00000200;
  35286. end;
  35287. procedure TUART4_U1BSTA.clearUTXBF; inline;
  35288. begin
  35289. pTDefRegMap(@Self)^.clr := $00000200;
  35290. end;
  35291. procedure TUART4_U1BSTA.setUTXBF(thebits : TBits_1); inline;
  35292. begin
  35293. if thebits = 0 then
  35294. pTDefRegMap(@Self)^.clr := $00000200
  35295. else
  35296. pTDefRegMap(@Self)^.&set := $00000200;
  35297. end;
  35298. function TUART4_U1BSTA.getUTXBF : TBits_1; inline;
  35299. begin
  35300. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  35301. end;
  35302. procedure TUART4_U1BSTA.setUTXEN; inline;
  35303. begin
  35304. pTDefRegMap(@Self)^.&set := $00000400;
  35305. end;
  35306. procedure TUART4_U1BSTA.clearUTXEN; inline;
  35307. begin
  35308. pTDefRegMap(@Self)^.clr := $00000400;
  35309. end;
  35310. procedure TUART4_U1BSTA.setUTXEN(thebits : TBits_1); inline;
  35311. begin
  35312. if thebits = 0 then
  35313. pTDefRegMap(@Self)^.clr := $00000400
  35314. else
  35315. pTDefRegMap(@Self)^.&set := $00000400;
  35316. end;
  35317. function TUART4_U1BSTA.getUTXEN : TBits_1; inline;
  35318. begin
  35319. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  35320. end;
  35321. procedure TUART4_U1BSTA.setUTXBRK; inline;
  35322. begin
  35323. pTDefRegMap(@Self)^.&set := $00000800;
  35324. end;
  35325. procedure TUART4_U1BSTA.clearUTXBRK; inline;
  35326. begin
  35327. pTDefRegMap(@Self)^.clr := $00000800;
  35328. end;
  35329. procedure TUART4_U1BSTA.setUTXBRK(thebits : TBits_1); inline;
  35330. begin
  35331. if thebits = 0 then
  35332. pTDefRegMap(@Self)^.clr := $00000800
  35333. else
  35334. pTDefRegMap(@Self)^.&set := $00000800;
  35335. end;
  35336. function TUART4_U1BSTA.getUTXBRK : TBits_1; inline;
  35337. begin
  35338. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  35339. end;
  35340. procedure TUART4_U1BSTA.setURXEN; inline;
  35341. begin
  35342. pTDefRegMap(@Self)^.&set := $00001000;
  35343. end;
  35344. procedure TUART4_U1BSTA.clearURXEN; inline;
  35345. begin
  35346. pTDefRegMap(@Self)^.clr := $00001000;
  35347. end;
  35348. procedure TUART4_U1BSTA.setURXEN(thebits : TBits_1); inline;
  35349. begin
  35350. if thebits = 0 then
  35351. pTDefRegMap(@Self)^.clr := $00001000
  35352. else
  35353. pTDefRegMap(@Self)^.&set := $00001000;
  35354. end;
  35355. function TUART4_U1BSTA.getURXEN : TBits_1; inline;
  35356. begin
  35357. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  35358. end;
  35359. procedure TUART4_U1BSTA.setUTXINV; inline;
  35360. begin
  35361. pTDefRegMap(@Self)^.&set := $00002000;
  35362. end;
  35363. procedure TUART4_U1BSTA.clearUTXINV; inline;
  35364. begin
  35365. pTDefRegMap(@Self)^.clr := $00002000;
  35366. end;
  35367. procedure TUART4_U1BSTA.setUTXINV(thebits : TBits_1); inline;
  35368. begin
  35369. if thebits = 0 then
  35370. pTDefRegMap(@Self)^.clr := $00002000
  35371. else
  35372. pTDefRegMap(@Self)^.&set := $00002000;
  35373. end;
  35374. function TUART4_U1BSTA.getUTXINV : TBits_1; inline;
  35375. begin
  35376. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35377. end;
  35378. procedure TUART4_U1BSTA.setUTXISEL(thebits : TBits_2); inline;
  35379. begin
  35380. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  35381. end;
  35382. function TUART4_U1BSTA.getUTXISEL : TBits_2; inline;
  35383. begin
  35384. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  35385. end;
  35386. procedure TUART4_U1BSTA.setADDR(thebits : TBits_8); inline;
  35387. begin
  35388. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  35389. end;
  35390. function TUART4_U1BSTA.getADDR : TBits_8; inline;
  35391. begin
  35392. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  35393. end;
  35394. procedure TUART4_U1BSTA.setADM_EN; inline;
  35395. begin
  35396. pTDefRegMap(@Self)^.&set := $01000000;
  35397. end;
  35398. procedure TUART4_U1BSTA.clearADM_EN; inline;
  35399. begin
  35400. pTDefRegMap(@Self)^.clr := $01000000;
  35401. end;
  35402. procedure TUART4_U1BSTA.setADM_EN(thebits : TBits_1); inline;
  35403. begin
  35404. if thebits = 0 then
  35405. pTDefRegMap(@Self)^.clr := $01000000
  35406. else
  35407. pTDefRegMap(@Self)^.&set := $01000000;
  35408. end;
  35409. function TUART4_U1BSTA.getADM_EN : TBits_1; inline;
  35410. begin
  35411. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  35412. end;
  35413. procedure TUART4_U1BSTA.setURXISEL0; inline;
  35414. begin
  35415. pTDefRegMap(@Self)^.&set := $00000040;
  35416. end;
  35417. procedure TUART4_U1BSTA.clearURXISEL0; inline;
  35418. begin
  35419. pTDefRegMap(@Self)^.clr := $00000040;
  35420. end;
  35421. procedure TUART4_U1BSTA.setURXISEL0(thebits : TBits_1); inline;
  35422. begin
  35423. if thebits = 0 then
  35424. pTDefRegMap(@Self)^.clr := $00000040
  35425. else
  35426. pTDefRegMap(@Self)^.&set := $00000040;
  35427. end;
  35428. function TUART4_U1BSTA.getURXISEL0 : TBits_1; inline;
  35429. begin
  35430. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35431. end;
  35432. procedure TUART4_U1BSTA.setURXISEL1; inline;
  35433. begin
  35434. pTDefRegMap(@Self)^.&set := $00000080;
  35435. end;
  35436. procedure TUART4_U1BSTA.clearURXISEL1; inline;
  35437. begin
  35438. pTDefRegMap(@Self)^.clr := $00000080;
  35439. end;
  35440. procedure TUART4_U1BSTA.setURXISEL1(thebits : TBits_1); inline;
  35441. begin
  35442. if thebits = 0 then
  35443. pTDefRegMap(@Self)^.clr := $00000080
  35444. else
  35445. pTDefRegMap(@Self)^.&set := $00000080;
  35446. end;
  35447. function TUART4_U1BSTA.getURXISEL1 : TBits_1; inline;
  35448. begin
  35449. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35450. end;
  35451. procedure TUART4_U1BSTA.setUTXISEL0; inline;
  35452. begin
  35453. pTDefRegMap(@Self)^.&set := $00004000;
  35454. end;
  35455. procedure TUART4_U1BSTA.clearUTXISEL0; inline;
  35456. begin
  35457. pTDefRegMap(@Self)^.clr := $00004000;
  35458. end;
  35459. procedure TUART4_U1BSTA.setUTXISEL0(thebits : TBits_1); inline;
  35460. begin
  35461. if thebits = 0 then
  35462. pTDefRegMap(@Self)^.clr := $00004000
  35463. else
  35464. pTDefRegMap(@Self)^.&set := $00004000;
  35465. end;
  35466. function TUART4_U1BSTA.getUTXISEL0 : TBits_1; inline;
  35467. begin
  35468. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  35469. end;
  35470. procedure TUART4_U1BSTA.setUTXISEL1; inline;
  35471. begin
  35472. pTDefRegMap(@Self)^.&set := $00008000;
  35473. end;
  35474. procedure TUART4_U1BSTA.clearUTXISEL1; inline;
  35475. begin
  35476. pTDefRegMap(@Self)^.clr := $00008000;
  35477. end;
  35478. procedure TUART4_U1BSTA.setUTXISEL1(thebits : TBits_1); inline;
  35479. begin
  35480. if thebits = 0 then
  35481. pTDefRegMap(@Self)^.clr := $00008000
  35482. else
  35483. pTDefRegMap(@Self)^.&set := $00008000;
  35484. end;
  35485. function TUART4_U1BSTA.getUTXISEL1 : TBits_1; inline;
  35486. begin
  35487. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35488. end;
  35489. procedure TUART4_U1BSTA.setUTXSEL(thebits : TBits_2); inline;
  35490. begin
  35491. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  35492. end;
  35493. function TUART4_U1BSTA.getUTXSEL : TBits_2; inline;
  35494. begin
  35495. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  35496. end;
  35497. procedure TUART4_U1BSTA.setw(thebits : TBits_32); inline;
  35498. begin
  35499. pTDefRegMap(@Self)^.val := thebits;
  35500. end;
  35501. function TUART4_U1BSTA.getw : TBits_32; inline;
  35502. begin
  35503. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35504. end;
  35505. procedure TUART4_U4STA.setURXDA; inline;
  35506. begin
  35507. pTDefRegMap(@Self)^.&set := $00000001;
  35508. end;
  35509. procedure TUART4_U4STA.clearURXDA; inline;
  35510. begin
  35511. pTDefRegMap(@Self)^.clr := $00000001;
  35512. end;
  35513. procedure TUART4_U4STA.setURXDA(thebits : TBits_1); inline;
  35514. begin
  35515. if thebits = 0 then
  35516. pTDefRegMap(@Self)^.clr := $00000001
  35517. else
  35518. pTDefRegMap(@Self)^.&set := $00000001;
  35519. end;
  35520. function TUART4_U4STA.getURXDA : TBits_1; inline;
  35521. begin
  35522. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35523. end;
  35524. procedure TUART4_U4STA.setOERR; inline;
  35525. begin
  35526. pTDefRegMap(@Self)^.&set := $00000002;
  35527. end;
  35528. procedure TUART4_U4STA.clearOERR; inline;
  35529. begin
  35530. pTDefRegMap(@Self)^.clr := $00000002;
  35531. end;
  35532. procedure TUART4_U4STA.setOERR(thebits : TBits_1); inline;
  35533. begin
  35534. if thebits = 0 then
  35535. pTDefRegMap(@Self)^.clr := $00000002
  35536. else
  35537. pTDefRegMap(@Self)^.&set := $00000002;
  35538. end;
  35539. function TUART4_U4STA.getOERR : TBits_1; inline;
  35540. begin
  35541. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35542. end;
  35543. procedure TUART4_U4STA.setFERR; inline;
  35544. begin
  35545. pTDefRegMap(@Self)^.&set := $00000004;
  35546. end;
  35547. procedure TUART4_U4STA.clearFERR; inline;
  35548. begin
  35549. pTDefRegMap(@Self)^.clr := $00000004;
  35550. end;
  35551. procedure TUART4_U4STA.setFERR(thebits : TBits_1); inline;
  35552. begin
  35553. if thebits = 0 then
  35554. pTDefRegMap(@Self)^.clr := $00000004
  35555. else
  35556. pTDefRegMap(@Self)^.&set := $00000004;
  35557. end;
  35558. function TUART4_U4STA.getFERR : TBits_1; inline;
  35559. begin
  35560. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35561. end;
  35562. procedure TUART4_U4STA.setPERR; inline;
  35563. begin
  35564. pTDefRegMap(@Self)^.&set := $00000008;
  35565. end;
  35566. procedure TUART4_U4STA.clearPERR; inline;
  35567. begin
  35568. pTDefRegMap(@Self)^.clr := $00000008;
  35569. end;
  35570. procedure TUART4_U4STA.setPERR(thebits : TBits_1); inline;
  35571. begin
  35572. if thebits = 0 then
  35573. pTDefRegMap(@Self)^.clr := $00000008
  35574. else
  35575. pTDefRegMap(@Self)^.&set := $00000008;
  35576. end;
  35577. function TUART4_U4STA.getPERR : TBits_1; inline;
  35578. begin
  35579. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35580. end;
  35581. procedure TUART4_U4STA.setRIDLE; inline;
  35582. begin
  35583. pTDefRegMap(@Self)^.&set := $00000010;
  35584. end;
  35585. procedure TUART4_U4STA.clearRIDLE; inline;
  35586. begin
  35587. pTDefRegMap(@Self)^.clr := $00000010;
  35588. end;
  35589. procedure TUART4_U4STA.setRIDLE(thebits : TBits_1); inline;
  35590. begin
  35591. if thebits = 0 then
  35592. pTDefRegMap(@Self)^.clr := $00000010
  35593. else
  35594. pTDefRegMap(@Self)^.&set := $00000010;
  35595. end;
  35596. function TUART4_U4STA.getRIDLE : TBits_1; inline;
  35597. begin
  35598. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35599. end;
  35600. procedure TUART4_U4STA.setADDEN; inline;
  35601. begin
  35602. pTDefRegMap(@Self)^.&set := $00000020;
  35603. end;
  35604. procedure TUART4_U4STA.clearADDEN; inline;
  35605. begin
  35606. pTDefRegMap(@Self)^.clr := $00000020;
  35607. end;
  35608. procedure TUART4_U4STA.setADDEN(thebits : TBits_1); inline;
  35609. begin
  35610. if thebits = 0 then
  35611. pTDefRegMap(@Self)^.clr := $00000020
  35612. else
  35613. pTDefRegMap(@Self)^.&set := $00000020;
  35614. end;
  35615. function TUART4_U4STA.getADDEN : TBits_1; inline;
  35616. begin
  35617. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35618. end;
  35619. procedure TUART4_U4STA.setURXISEL(thebits : TBits_2); inline;
  35620. begin
  35621. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  35622. end;
  35623. function TUART4_U4STA.getURXISEL : TBits_2; inline;
  35624. begin
  35625. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  35626. end;
  35627. procedure TUART4_U4STA.setTRMT; inline;
  35628. begin
  35629. pTDefRegMap(@Self)^.&set := $00000100;
  35630. end;
  35631. procedure TUART4_U4STA.clearTRMT; inline;
  35632. begin
  35633. pTDefRegMap(@Self)^.clr := $00000100;
  35634. end;
  35635. procedure TUART4_U4STA.setTRMT(thebits : TBits_1); inline;
  35636. begin
  35637. if thebits = 0 then
  35638. pTDefRegMap(@Self)^.clr := $00000100
  35639. else
  35640. pTDefRegMap(@Self)^.&set := $00000100;
  35641. end;
  35642. function TUART4_U4STA.getTRMT : TBits_1; inline;
  35643. begin
  35644. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  35645. end;
  35646. procedure TUART4_U4STA.setUTXBF; inline;
  35647. begin
  35648. pTDefRegMap(@Self)^.&set := $00000200;
  35649. end;
  35650. procedure TUART4_U4STA.clearUTXBF; inline;
  35651. begin
  35652. pTDefRegMap(@Self)^.clr := $00000200;
  35653. end;
  35654. procedure TUART4_U4STA.setUTXBF(thebits : TBits_1); inline;
  35655. begin
  35656. if thebits = 0 then
  35657. pTDefRegMap(@Self)^.clr := $00000200
  35658. else
  35659. pTDefRegMap(@Self)^.&set := $00000200;
  35660. end;
  35661. function TUART4_U4STA.getUTXBF : TBits_1; inline;
  35662. begin
  35663. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  35664. end;
  35665. procedure TUART4_U4STA.setUTXEN; inline;
  35666. begin
  35667. pTDefRegMap(@Self)^.&set := $00000400;
  35668. end;
  35669. procedure TUART4_U4STA.clearUTXEN; inline;
  35670. begin
  35671. pTDefRegMap(@Self)^.clr := $00000400;
  35672. end;
  35673. procedure TUART4_U4STA.setUTXEN(thebits : TBits_1); inline;
  35674. begin
  35675. if thebits = 0 then
  35676. pTDefRegMap(@Self)^.clr := $00000400
  35677. else
  35678. pTDefRegMap(@Self)^.&set := $00000400;
  35679. end;
  35680. function TUART4_U4STA.getUTXEN : TBits_1; inline;
  35681. begin
  35682. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  35683. end;
  35684. procedure TUART4_U4STA.setUTXBRK; inline;
  35685. begin
  35686. pTDefRegMap(@Self)^.&set := $00000800;
  35687. end;
  35688. procedure TUART4_U4STA.clearUTXBRK; inline;
  35689. begin
  35690. pTDefRegMap(@Self)^.clr := $00000800;
  35691. end;
  35692. procedure TUART4_U4STA.setUTXBRK(thebits : TBits_1); inline;
  35693. begin
  35694. if thebits = 0 then
  35695. pTDefRegMap(@Self)^.clr := $00000800
  35696. else
  35697. pTDefRegMap(@Self)^.&set := $00000800;
  35698. end;
  35699. function TUART4_U4STA.getUTXBRK : TBits_1; inline;
  35700. begin
  35701. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  35702. end;
  35703. procedure TUART4_U4STA.setURXEN; inline;
  35704. begin
  35705. pTDefRegMap(@Self)^.&set := $00001000;
  35706. end;
  35707. procedure TUART4_U4STA.clearURXEN; inline;
  35708. begin
  35709. pTDefRegMap(@Self)^.clr := $00001000;
  35710. end;
  35711. procedure TUART4_U4STA.setURXEN(thebits : TBits_1); inline;
  35712. begin
  35713. if thebits = 0 then
  35714. pTDefRegMap(@Self)^.clr := $00001000
  35715. else
  35716. pTDefRegMap(@Self)^.&set := $00001000;
  35717. end;
  35718. function TUART4_U4STA.getURXEN : TBits_1; inline;
  35719. begin
  35720. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  35721. end;
  35722. procedure TUART4_U4STA.setUTXINV; inline;
  35723. begin
  35724. pTDefRegMap(@Self)^.&set := $00002000;
  35725. end;
  35726. procedure TUART4_U4STA.clearUTXINV; inline;
  35727. begin
  35728. pTDefRegMap(@Self)^.clr := $00002000;
  35729. end;
  35730. procedure TUART4_U4STA.setUTXINV(thebits : TBits_1); inline;
  35731. begin
  35732. if thebits = 0 then
  35733. pTDefRegMap(@Self)^.clr := $00002000
  35734. else
  35735. pTDefRegMap(@Self)^.&set := $00002000;
  35736. end;
  35737. function TUART4_U4STA.getUTXINV : TBits_1; inline;
  35738. begin
  35739. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35740. end;
  35741. procedure TUART4_U4STA.setUTXISEL(thebits : TBits_2); inline;
  35742. begin
  35743. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  35744. end;
  35745. function TUART4_U4STA.getUTXISEL : TBits_2; inline;
  35746. begin
  35747. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  35748. end;
  35749. procedure TUART4_U4STA.setADDR(thebits : TBits_8); inline;
  35750. begin
  35751. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  35752. end;
  35753. function TUART4_U4STA.getADDR : TBits_8; inline;
  35754. begin
  35755. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  35756. end;
  35757. procedure TUART4_U4STA.setADM_EN; inline;
  35758. begin
  35759. pTDefRegMap(@Self)^.&set := $01000000;
  35760. end;
  35761. procedure TUART4_U4STA.clearADM_EN; inline;
  35762. begin
  35763. pTDefRegMap(@Self)^.clr := $01000000;
  35764. end;
  35765. procedure TUART4_U4STA.setADM_EN(thebits : TBits_1); inline;
  35766. begin
  35767. if thebits = 0 then
  35768. pTDefRegMap(@Self)^.clr := $01000000
  35769. else
  35770. pTDefRegMap(@Self)^.&set := $01000000;
  35771. end;
  35772. function TUART4_U4STA.getADM_EN : TBits_1; inline;
  35773. begin
  35774. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  35775. end;
  35776. procedure TUART4_U4STA.setURXISEL0; inline;
  35777. begin
  35778. pTDefRegMap(@Self)^.&set := $00000040;
  35779. end;
  35780. procedure TUART4_U4STA.clearURXISEL0; inline;
  35781. begin
  35782. pTDefRegMap(@Self)^.clr := $00000040;
  35783. end;
  35784. procedure TUART4_U4STA.setURXISEL0(thebits : TBits_1); inline;
  35785. begin
  35786. if thebits = 0 then
  35787. pTDefRegMap(@Self)^.clr := $00000040
  35788. else
  35789. pTDefRegMap(@Self)^.&set := $00000040;
  35790. end;
  35791. function TUART4_U4STA.getURXISEL0 : TBits_1; inline;
  35792. begin
  35793. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35794. end;
  35795. procedure TUART4_U4STA.setURXISEL1; inline;
  35796. begin
  35797. pTDefRegMap(@Self)^.&set := $00000080;
  35798. end;
  35799. procedure TUART4_U4STA.clearURXISEL1; inline;
  35800. begin
  35801. pTDefRegMap(@Self)^.clr := $00000080;
  35802. end;
  35803. procedure TUART4_U4STA.setURXISEL1(thebits : TBits_1); inline;
  35804. begin
  35805. if thebits = 0 then
  35806. pTDefRegMap(@Self)^.clr := $00000080
  35807. else
  35808. pTDefRegMap(@Self)^.&set := $00000080;
  35809. end;
  35810. function TUART4_U4STA.getURXISEL1 : TBits_1; inline;
  35811. begin
  35812. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35813. end;
  35814. procedure TUART4_U4STA.setUTXISEL0; inline;
  35815. begin
  35816. pTDefRegMap(@Self)^.&set := $00004000;
  35817. end;
  35818. procedure TUART4_U4STA.clearUTXISEL0; inline;
  35819. begin
  35820. pTDefRegMap(@Self)^.clr := $00004000;
  35821. end;
  35822. procedure TUART4_U4STA.setUTXISEL0(thebits : TBits_1); inline;
  35823. begin
  35824. if thebits = 0 then
  35825. pTDefRegMap(@Self)^.clr := $00004000
  35826. else
  35827. pTDefRegMap(@Self)^.&set := $00004000;
  35828. end;
  35829. function TUART4_U4STA.getUTXISEL0 : TBits_1; inline;
  35830. begin
  35831. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  35832. end;
  35833. procedure TUART4_U4STA.setUTXISEL1; inline;
  35834. begin
  35835. pTDefRegMap(@Self)^.&set := $00008000;
  35836. end;
  35837. procedure TUART4_U4STA.clearUTXISEL1; inline;
  35838. begin
  35839. pTDefRegMap(@Self)^.clr := $00008000;
  35840. end;
  35841. procedure TUART4_U4STA.setUTXISEL1(thebits : TBits_1); inline;
  35842. begin
  35843. if thebits = 0 then
  35844. pTDefRegMap(@Self)^.clr := $00008000
  35845. else
  35846. pTDefRegMap(@Self)^.&set := $00008000;
  35847. end;
  35848. function TUART4_U4STA.getUTXISEL1 : TBits_1; inline;
  35849. begin
  35850. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35851. end;
  35852. procedure TUART4_U4STA.setUTXSEL(thebits : TBits_2); inline;
  35853. begin
  35854. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  35855. end;
  35856. function TUART4_U4STA.getUTXSEL : TBits_2; inline;
  35857. begin
  35858. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  35859. end;
  35860. procedure TUART4_U4STA.setw(thebits : TBits_32); inline;
  35861. begin
  35862. pTDefRegMap(@Self)^.val := thebits;
  35863. end;
  35864. function TUART4_U4STA.getw : TBits_32; inline;
  35865. begin
  35866. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35867. end;
  35868. procedure TUART3_U2AMODE.setSTSEL; inline;
  35869. begin
  35870. pTDefRegMap(@Self)^.&set := $00000001;
  35871. end;
  35872. procedure TUART3_U2AMODE.clearSTSEL; inline;
  35873. begin
  35874. pTDefRegMap(@Self)^.clr := $00000001;
  35875. end;
  35876. procedure TUART3_U2AMODE.setSTSEL(thebits : TBits_1); inline;
  35877. begin
  35878. if thebits = 0 then
  35879. pTDefRegMap(@Self)^.clr := $00000001
  35880. else
  35881. pTDefRegMap(@Self)^.&set := $00000001;
  35882. end;
  35883. function TUART3_U2AMODE.getSTSEL : TBits_1; inline;
  35884. begin
  35885. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35886. end;
  35887. procedure TUART3_U2AMODE.setPDSEL(thebits : TBits_2); inline;
  35888. begin
  35889. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  35890. end;
  35891. function TUART3_U2AMODE.getPDSEL : TBits_2; inline;
  35892. begin
  35893. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  35894. end;
  35895. procedure TUART3_U2AMODE.setBRGH; inline;
  35896. begin
  35897. pTDefRegMap(@Self)^.&set := $00000008;
  35898. end;
  35899. procedure TUART3_U2AMODE.clearBRGH; inline;
  35900. begin
  35901. pTDefRegMap(@Self)^.clr := $00000008;
  35902. end;
  35903. procedure TUART3_U2AMODE.setBRGH(thebits : TBits_1); inline;
  35904. begin
  35905. if thebits = 0 then
  35906. pTDefRegMap(@Self)^.clr := $00000008
  35907. else
  35908. pTDefRegMap(@Self)^.&set := $00000008;
  35909. end;
  35910. function TUART3_U2AMODE.getBRGH : TBits_1; inline;
  35911. begin
  35912. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35913. end;
  35914. procedure TUART3_U2AMODE.setRXINV; inline;
  35915. begin
  35916. pTDefRegMap(@Self)^.&set := $00000010;
  35917. end;
  35918. procedure TUART3_U2AMODE.clearRXINV; inline;
  35919. begin
  35920. pTDefRegMap(@Self)^.clr := $00000010;
  35921. end;
  35922. procedure TUART3_U2AMODE.setRXINV(thebits : TBits_1); inline;
  35923. begin
  35924. if thebits = 0 then
  35925. pTDefRegMap(@Self)^.clr := $00000010
  35926. else
  35927. pTDefRegMap(@Self)^.&set := $00000010;
  35928. end;
  35929. function TUART3_U2AMODE.getRXINV : TBits_1; inline;
  35930. begin
  35931. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35932. end;
  35933. procedure TUART3_U2AMODE.setABAUD; inline;
  35934. begin
  35935. pTDefRegMap(@Self)^.&set := $00000020;
  35936. end;
  35937. procedure TUART3_U2AMODE.clearABAUD; inline;
  35938. begin
  35939. pTDefRegMap(@Self)^.clr := $00000020;
  35940. end;
  35941. procedure TUART3_U2AMODE.setABAUD(thebits : TBits_1); inline;
  35942. begin
  35943. if thebits = 0 then
  35944. pTDefRegMap(@Self)^.clr := $00000020
  35945. else
  35946. pTDefRegMap(@Self)^.&set := $00000020;
  35947. end;
  35948. function TUART3_U2AMODE.getABAUD : TBits_1; inline;
  35949. begin
  35950. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35951. end;
  35952. procedure TUART3_U2AMODE.setLPBACK; inline;
  35953. begin
  35954. pTDefRegMap(@Self)^.&set := $00000040;
  35955. end;
  35956. procedure TUART3_U2AMODE.clearLPBACK; inline;
  35957. begin
  35958. pTDefRegMap(@Self)^.clr := $00000040;
  35959. end;
  35960. procedure TUART3_U2AMODE.setLPBACK(thebits : TBits_1); inline;
  35961. begin
  35962. if thebits = 0 then
  35963. pTDefRegMap(@Self)^.clr := $00000040
  35964. else
  35965. pTDefRegMap(@Self)^.&set := $00000040;
  35966. end;
  35967. function TUART3_U2AMODE.getLPBACK : TBits_1; inline;
  35968. begin
  35969. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35970. end;
  35971. procedure TUART3_U2AMODE.setWAKE; inline;
  35972. begin
  35973. pTDefRegMap(@Self)^.&set := $00000080;
  35974. end;
  35975. procedure TUART3_U2AMODE.clearWAKE; inline;
  35976. begin
  35977. pTDefRegMap(@Self)^.clr := $00000080;
  35978. end;
  35979. procedure TUART3_U2AMODE.setWAKE(thebits : TBits_1); inline;
  35980. begin
  35981. if thebits = 0 then
  35982. pTDefRegMap(@Self)^.clr := $00000080
  35983. else
  35984. pTDefRegMap(@Self)^.&set := $00000080;
  35985. end;
  35986. function TUART3_U2AMODE.getWAKE : TBits_1; inline;
  35987. begin
  35988. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35989. end;
  35990. procedure TUART3_U2AMODE.setUEN(thebits : TBits_2); inline;
  35991. begin
  35992. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  35993. end;
  35994. function TUART3_U2AMODE.getUEN : TBits_2; inline;
  35995. begin
  35996. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  35997. end;
  35998. procedure TUART3_U2AMODE.setRTSMD; inline;
  35999. begin
  36000. pTDefRegMap(@Self)^.&set := $00000800;
  36001. end;
  36002. procedure TUART3_U2AMODE.clearRTSMD; inline;
  36003. begin
  36004. pTDefRegMap(@Self)^.clr := $00000800;
  36005. end;
  36006. procedure TUART3_U2AMODE.setRTSMD(thebits : TBits_1); inline;
  36007. begin
  36008. if thebits = 0 then
  36009. pTDefRegMap(@Self)^.clr := $00000800
  36010. else
  36011. pTDefRegMap(@Self)^.&set := $00000800;
  36012. end;
  36013. function TUART3_U2AMODE.getRTSMD : TBits_1; inline;
  36014. begin
  36015. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  36016. end;
  36017. procedure TUART3_U2AMODE.setIREN; inline;
  36018. begin
  36019. pTDefRegMap(@Self)^.&set := $00001000;
  36020. end;
  36021. procedure TUART3_U2AMODE.clearIREN; inline;
  36022. begin
  36023. pTDefRegMap(@Self)^.clr := $00001000;
  36024. end;
  36025. procedure TUART3_U2AMODE.setIREN(thebits : TBits_1); inline;
  36026. begin
  36027. if thebits = 0 then
  36028. pTDefRegMap(@Self)^.clr := $00001000
  36029. else
  36030. pTDefRegMap(@Self)^.&set := $00001000;
  36031. end;
  36032. function TUART3_U2AMODE.getIREN : TBits_1; inline;
  36033. begin
  36034. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  36035. end;
  36036. procedure TUART3_U2AMODE.setSIDL; inline;
  36037. begin
  36038. pTDefRegMap(@Self)^.&set := $00002000;
  36039. end;
  36040. procedure TUART3_U2AMODE.clearSIDL; inline;
  36041. begin
  36042. pTDefRegMap(@Self)^.clr := $00002000;
  36043. end;
  36044. procedure TUART3_U2AMODE.setSIDL(thebits : TBits_1); inline;
  36045. begin
  36046. if thebits = 0 then
  36047. pTDefRegMap(@Self)^.clr := $00002000
  36048. else
  36049. pTDefRegMap(@Self)^.&set := $00002000;
  36050. end;
  36051. function TUART3_U2AMODE.getSIDL : TBits_1; inline;
  36052. begin
  36053. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36054. end;
  36055. procedure TUART3_U2AMODE.setON; inline;
  36056. begin
  36057. pTDefRegMap(@Self)^.&set := $00008000;
  36058. end;
  36059. procedure TUART3_U2AMODE.clearON; inline;
  36060. begin
  36061. pTDefRegMap(@Self)^.clr := $00008000;
  36062. end;
  36063. procedure TUART3_U2AMODE.setON(thebits : TBits_1); inline;
  36064. begin
  36065. if thebits = 0 then
  36066. pTDefRegMap(@Self)^.clr := $00008000
  36067. else
  36068. pTDefRegMap(@Self)^.&set := $00008000;
  36069. end;
  36070. function TUART3_U2AMODE.getON : TBits_1; inline;
  36071. begin
  36072. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36073. end;
  36074. procedure TUART3_U2AMODE.setPDSEL0; inline;
  36075. begin
  36076. pTDefRegMap(@Self)^.&set := $00000002;
  36077. end;
  36078. procedure TUART3_U2AMODE.clearPDSEL0; inline;
  36079. begin
  36080. pTDefRegMap(@Self)^.clr := $00000002;
  36081. end;
  36082. procedure TUART3_U2AMODE.setPDSEL0(thebits : TBits_1); inline;
  36083. begin
  36084. if thebits = 0 then
  36085. pTDefRegMap(@Self)^.clr := $00000002
  36086. else
  36087. pTDefRegMap(@Self)^.&set := $00000002;
  36088. end;
  36089. function TUART3_U2AMODE.getPDSEL0 : TBits_1; inline;
  36090. begin
  36091. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36092. end;
  36093. procedure TUART3_U2AMODE.setPDSEL1; inline;
  36094. begin
  36095. pTDefRegMap(@Self)^.&set := $00000004;
  36096. end;
  36097. procedure TUART3_U2AMODE.clearPDSEL1; inline;
  36098. begin
  36099. pTDefRegMap(@Self)^.clr := $00000004;
  36100. end;
  36101. procedure TUART3_U2AMODE.setPDSEL1(thebits : TBits_1); inline;
  36102. begin
  36103. if thebits = 0 then
  36104. pTDefRegMap(@Self)^.clr := $00000004
  36105. else
  36106. pTDefRegMap(@Self)^.&set := $00000004;
  36107. end;
  36108. function TUART3_U2AMODE.getPDSEL1 : TBits_1; inline;
  36109. begin
  36110. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36111. end;
  36112. procedure TUART3_U2AMODE.setUEN0; inline;
  36113. begin
  36114. pTDefRegMap(@Self)^.&set := $00000100;
  36115. end;
  36116. procedure TUART3_U2AMODE.clearUEN0; inline;
  36117. begin
  36118. pTDefRegMap(@Self)^.clr := $00000100;
  36119. end;
  36120. procedure TUART3_U2AMODE.setUEN0(thebits : TBits_1); inline;
  36121. begin
  36122. if thebits = 0 then
  36123. pTDefRegMap(@Self)^.clr := $00000100
  36124. else
  36125. pTDefRegMap(@Self)^.&set := $00000100;
  36126. end;
  36127. function TUART3_U2AMODE.getUEN0 : TBits_1; inline;
  36128. begin
  36129. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36130. end;
  36131. procedure TUART3_U2AMODE.setUEN1; inline;
  36132. begin
  36133. pTDefRegMap(@Self)^.&set := $00000200;
  36134. end;
  36135. procedure TUART3_U2AMODE.clearUEN1; inline;
  36136. begin
  36137. pTDefRegMap(@Self)^.clr := $00000200;
  36138. end;
  36139. procedure TUART3_U2AMODE.setUEN1(thebits : TBits_1); inline;
  36140. begin
  36141. if thebits = 0 then
  36142. pTDefRegMap(@Self)^.clr := $00000200
  36143. else
  36144. pTDefRegMap(@Self)^.&set := $00000200;
  36145. end;
  36146. function TUART3_U2AMODE.getUEN1 : TBits_1; inline;
  36147. begin
  36148. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36149. end;
  36150. procedure TUART3_U2AMODE.setUSIDL; inline;
  36151. begin
  36152. pTDefRegMap(@Self)^.&set := $00002000;
  36153. end;
  36154. procedure TUART3_U2AMODE.clearUSIDL; inline;
  36155. begin
  36156. pTDefRegMap(@Self)^.clr := $00002000;
  36157. end;
  36158. procedure TUART3_U2AMODE.setUSIDL(thebits : TBits_1); inline;
  36159. begin
  36160. if thebits = 0 then
  36161. pTDefRegMap(@Self)^.clr := $00002000
  36162. else
  36163. pTDefRegMap(@Self)^.&set := $00002000;
  36164. end;
  36165. function TUART3_U2AMODE.getUSIDL : TBits_1; inline;
  36166. begin
  36167. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36168. end;
  36169. procedure TUART3_U2AMODE.setUARTEN; inline;
  36170. begin
  36171. pTDefRegMap(@Self)^.&set := $00008000;
  36172. end;
  36173. procedure TUART3_U2AMODE.clearUARTEN; inline;
  36174. begin
  36175. pTDefRegMap(@Self)^.clr := $00008000;
  36176. end;
  36177. procedure TUART3_U2AMODE.setUARTEN(thebits : TBits_1); inline;
  36178. begin
  36179. if thebits = 0 then
  36180. pTDefRegMap(@Self)^.clr := $00008000
  36181. else
  36182. pTDefRegMap(@Self)^.&set := $00008000;
  36183. end;
  36184. function TUART3_U2AMODE.getUARTEN : TBits_1; inline;
  36185. begin
  36186. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36187. end;
  36188. procedure TUART3_U2AMODE.setw(thebits : TBits_32); inline;
  36189. begin
  36190. pTDefRegMap(@Self)^.val := thebits;
  36191. end;
  36192. function TUART3_U2AMODE.getw : TBits_32; inline;
  36193. begin
  36194. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36195. end;
  36196. procedure TUART3_U3MODE.setSTSEL; inline;
  36197. begin
  36198. pTDefRegMap(@Self)^.&set := $00000001;
  36199. end;
  36200. procedure TUART3_U3MODE.clearSTSEL; inline;
  36201. begin
  36202. pTDefRegMap(@Self)^.clr := $00000001;
  36203. end;
  36204. procedure TUART3_U3MODE.setSTSEL(thebits : TBits_1); inline;
  36205. begin
  36206. if thebits = 0 then
  36207. pTDefRegMap(@Self)^.clr := $00000001
  36208. else
  36209. pTDefRegMap(@Self)^.&set := $00000001;
  36210. end;
  36211. function TUART3_U3MODE.getSTSEL : TBits_1; inline;
  36212. begin
  36213. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36214. end;
  36215. procedure TUART3_U3MODE.setPDSEL(thebits : TBits_2); inline;
  36216. begin
  36217. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  36218. end;
  36219. function TUART3_U3MODE.getPDSEL : TBits_2; inline;
  36220. begin
  36221. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  36222. end;
  36223. procedure TUART3_U3MODE.setBRGH; inline;
  36224. begin
  36225. pTDefRegMap(@Self)^.&set := $00000008;
  36226. end;
  36227. procedure TUART3_U3MODE.clearBRGH; inline;
  36228. begin
  36229. pTDefRegMap(@Self)^.clr := $00000008;
  36230. end;
  36231. procedure TUART3_U3MODE.setBRGH(thebits : TBits_1); inline;
  36232. begin
  36233. if thebits = 0 then
  36234. pTDefRegMap(@Self)^.clr := $00000008
  36235. else
  36236. pTDefRegMap(@Self)^.&set := $00000008;
  36237. end;
  36238. function TUART3_U3MODE.getBRGH : TBits_1; inline;
  36239. begin
  36240. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36241. end;
  36242. procedure TUART3_U3MODE.setRXINV; inline;
  36243. begin
  36244. pTDefRegMap(@Self)^.&set := $00000010;
  36245. end;
  36246. procedure TUART3_U3MODE.clearRXINV; inline;
  36247. begin
  36248. pTDefRegMap(@Self)^.clr := $00000010;
  36249. end;
  36250. procedure TUART3_U3MODE.setRXINV(thebits : TBits_1); inline;
  36251. begin
  36252. if thebits = 0 then
  36253. pTDefRegMap(@Self)^.clr := $00000010
  36254. else
  36255. pTDefRegMap(@Self)^.&set := $00000010;
  36256. end;
  36257. function TUART3_U3MODE.getRXINV : TBits_1; inline;
  36258. begin
  36259. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36260. end;
  36261. procedure TUART3_U3MODE.setABAUD; inline;
  36262. begin
  36263. pTDefRegMap(@Self)^.&set := $00000020;
  36264. end;
  36265. procedure TUART3_U3MODE.clearABAUD; inline;
  36266. begin
  36267. pTDefRegMap(@Self)^.clr := $00000020;
  36268. end;
  36269. procedure TUART3_U3MODE.setABAUD(thebits : TBits_1); inline;
  36270. begin
  36271. if thebits = 0 then
  36272. pTDefRegMap(@Self)^.clr := $00000020
  36273. else
  36274. pTDefRegMap(@Self)^.&set := $00000020;
  36275. end;
  36276. function TUART3_U3MODE.getABAUD : TBits_1; inline;
  36277. begin
  36278. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36279. end;
  36280. procedure TUART3_U3MODE.setLPBACK; inline;
  36281. begin
  36282. pTDefRegMap(@Self)^.&set := $00000040;
  36283. end;
  36284. procedure TUART3_U3MODE.clearLPBACK; inline;
  36285. begin
  36286. pTDefRegMap(@Self)^.clr := $00000040;
  36287. end;
  36288. procedure TUART3_U3MODE.setLPBACK(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 TUART3_U3MODE.getLPBACK : TBits_1; inline;
  36296. begin
  36297. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36298. end;
  36299. procedure TUART3_U3MODE.setWAKE; inline;
  36300. begin
  36301. pTDefRegMap(@Self)^.&set := $00000080;
  36302. end;
  36303. procedure TUART3_U3MODE.clearWAKE; inline;
  36304. begin
  36305. pTDefRegMap(@Self)^.clr := $00000080;
  36306. end;
  36307. procedure TUART3_U3MODE.setWAKE(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 TUART3_U3MODE.getWAKE : TBits_1; inline;
  36315. begin
  36316. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36317. end;
  36318. procedure TUART3_U3MODE.setUEN(thebits : TBits_2); inline;
  36319. begin
  36320. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  36321. end;
  36322. function TUART3_U3MODE.getUEN : TBits_2; inline;
  36323. begin
  36324. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  36325. end;
  36326. procedure TUART3_U3MODE.setRTSMD; inline;
  36327. begin
  36328. pTDefRegMap(@Self)^.&set := $00000800;
  36329. end;
  36330. procedure TUART3_U3MODE.clearRTSMD; inline;
  36331. begin
  36332. pTDefRegMap(@Self)^.clr := $00000800;
  36333. end;
  36334. procedure TUART3_U3MODE.setRTSMD(thebits : TBits_1); inline;
  36335. begin
  36336. if thebits = 0 then
  36337. pTDefRegMap(@Self)^.clr := $00000800
  36338. else
  36339. pTDefRegMap(@Self)^.&set := $00000800;
  36340. end;
  36341. function TUART3_U3MODE.getRTSMD : TBits_1; inline;
  36342. begin
  36343. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  36344. end;
  36345. procedure TUART3_U3MODE.setIREN; inline;
  36346. begin
  36347. pTDefRegMap(@Self)^.&set := $00001000;
  36348. end;
  36349. procedure TUART3_U3MODE.clearIREN; inline;
  36350. begin
  36351. pTDefRegMap(@Self)^.clr := $00001000;
  36352. end;
  36353. procedure TUART3_U3MODE.setIREN(thebits : TBits_1); inline;
  36354. begin
  36355. if thebits = 0 then
  36356. pTDefRegMap(@Self)^.clr := $00001000
  36357. else
  36358. pTDefRegMap(@Self)^.&set := $00001000;
  36359. end;
  36360. function TUART3_U3MODE.getIREN : TBits_1; inline;
  36361. begin
  36362. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  36363. end;
  36364. procedure TUART3_U3MODE.setSIDL; inline;
  36365. begin
  36366. pTDefRegMap(@Self)^.&set := $00002000;
  36367. end;
  36368. procedure TUART3_U3MODE.clearSIDL; inline;
  36369. begin
  36370. pTDefRegMap(@Self)^.clr := $00002000;
  36371. end;
  36372. procedure TUART3_U3MODE.setSIDL(thebits : TBits_1); inline;
  36373. begin
  36374. if thebits = 0 then
  36375. pTDefRegMap(@Self)^.clr := $00002000
  36376. else
  36377. pTDefRegMap(@Self)^.&set := $00002000;
  36378. end;
  36379. function TUART3_U3MODE.getSIDL : TBits_1; inline;
  36380. begin
  36381. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36382. end;
  36383. procedure TUART3_U3MODE.setON; inline;
  36384. begin
  36385. pTDefRegMap(@Self)^.&set := $00008000;
  36386. end;
  36387. procedure TUART3_U3MODE.clearON; inline;
  36388. begin
  36389. pTDefRegMap(@Self)^.clr := $00008000;
  36390. end;
  36391. procedure TUART3_U3MODE.setON(thebits : TBits_1); inline;
  36392. begin
  36393. if thebits = 0 then
  36394. pTDefRegMap(@Self)^.clr := $00008000
  36395. else
  36396. pTDefRegMap(@Self)^.&set := $00008000;
  36397. end;
  36398. function TUART3_U3MODE.getON : TBits_1; inline;
  36399. begin
  36400. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36401. end;
  36402. procedure TUART3_U3MODE.setPDSEL0; inline;
  36403. begin
  36404. pTDefRegMap(@Self)^.&set := $00000002;
  36405. end;
  36406. procedure TUART3_U3MODE.clearPDSEL0; inline;
  36407. begin
  36408. pTDefRegMap(@Self)^.clr := $00000002;
  36409. end;
  36410. procedure TUART3_U3MODE.setPDSEL0(thebits : TBits_1); inline;
  36411. begin
  36412. if thebits = 0 then
  36413. pTDefRegMap(@Self)^.clr := $00000002
  36414. else
  36415. pTDefRegMap(@Self)^.&set := $00000002;
  36416. end;
  36417. function TUART3_U3MODE.getPDSEL0 : TBits_1; inline;
  36418. begin
  36419. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36420. end;
  36421. procedure TUART3_U3MODE.setPDSEL1; inline;
  36422. begin
  36423. pTDefRegMap(@Self)^.&set := $00000004;
  36424. end;
  36425. procedure TUART3_U3MODE.clearPDSEL1; inline;
  36426. begin
  36427. pTDefRegMap(@Self)^.clr := $00000004;
  36428. end;
  36429. procedure TUART3_U3MODE.setPDSEL1(thebits : TBits_1); inline;
  36430. begin
  36431. if thebits = 0 then
  36432. pTDefRegMap(@Self)^.clr := $00000004
  36433. else
  36434. pTDefRegMap(@Self)^.&set := $00000004;
  36435. end;
  36436. function TUART3_U3MODE.getPDSEL1 : TBits_1; inline;
  36437. begin
  36438. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36439. end;
  36440. procedure TUART3_U3MODE.setUEN0; inline;
  36441. begin
  36442. pTDefRegMap(@Self)^.&set := $00000100;
  36443. end;
  36444. procedure TUART3_U3MODE.clearUEN0; inline;
  36445. begin
  36446. pTDefRegMap(@Self)^.clr := $00000100;
  36447. end;
  36448. procedure TUART3_U3MODE.setUEN0(thebits : TBits_1); inline;
  36449. begin
  36450. if thebits = 0 then
  36451. pTDefRegMap(@Self)^.clr := $00000100
  36452. else
  36453. pTDefRegMap(@Self)^.&set := $00000100;
  36454. end;
  36455. function TUART3_U3MODE.getUEN0 : TBits_1; inline;
  36456. begin
  36457. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36458. end;
  36459. procedure TUART3_U3MODE.setUEN1; inline;
  36460. begin
  36461. pTDefRegMap(@Self)^.&set := $00000200;
  36462. end;
  36463. procedure TUART3_U3MODE.clearUEN1; inline;
  36464. begin
  36465. pTDefRegMap(@Self)^.clr := $00000200;
  36466. end;
  36467. procedure TUART3_U3MODE.setUEN1(thebits : TBits_1); inline;
  36468. begin
  36469. if thebits = 0 then
  36470. pTDefRegMap(@Self)^.clr := $00000200
  36471. else
  36472. pTDefRegMap(@Self)^.&set := $00000200;
  36473. end;
  36474. function TUART3_U3MODE.getUEN1 : TBits_1; inline;
  36475. begin
  36476. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36477. end;
  36478. procedure TUART3_U3MODE.setUSIDL; inline;
  36479. begin
  36480. pTDefRegMap(@Self)^.&set := $00002000;
  36481. end;
  36482. procedure TUART3_U3MODE.clearUSIDL; inline;
  36483. begin
  36484. pTDefRegMap(@Self)^.clr := $00002000;
  36485. end;
  36486. procedure TUART3_U3MODE.setUSIDL(thebits : TBits_1); inline;
  36487. begin
  36488. if thebits = 0 then
  36489. pTDefRegMap(@Self)^.clr := $00002000
  36490. else
  36491. pTDefRegMap(@Self)^.&set := $00002000;
  36492. end;
  36493. function TUART3_U3MODE.getUSIDL : TBits_1; inline;
  36494. begin
  36495. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36496. end;
  36497. procedure TUART3_U3MODE.setUARTEN; inline;
  36498. begin
  36499. pTDefRegMap(@Self)^.&set := $00008000;
  36500. end;
  36501. procedure TUART3_U3MODE.clearUARTEN; inline;
  36502. begin
  36503. pTDefRegMap(@Self)^.clr := $00008000;
  36504. end;
  36505. procedure TUART3_U3MODE.setUARTEN(thebits : TBits_1); inline;
  36506. begin
  36507. if thebits = 0 then
  36508. pTDefRegMap(@Self)^.clr := $00008000
  36509. else
  36510. pTDefRegMap(@Self)^.&set := $00008000;
  36511. end;
  36512. function TUART3_U3MODE.getUARTEN : TBits_1; inline;
  36513. begin
  36514. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36515. end;
  36516. procedure TUART3_U3MODE.setw(thebits : TBits_32); inline;
  36517. begin
  36518. pTDefRegMap(@Self)^.val := thebits;
  36519. end;
  36520. function TUART3_U3MODE.getw : TBits_32; inline;
  36521. begin
  36522. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36523. end;
  36524. procedure TUART3_U2ASTA.setURXDA; inline;
  36525. begin
  36526. pTDefRegMap(@Self)^.&set := $00000001;
  36527. end;
  36528. procedure TUART3_U2ASTA.clearURXDA; inline;
  36529. begin
  36530. pTDefRegMap(@Self)^.clr := $00000001;
  36531. end;
  36532. procedure TUART3_U2ASTA.setURXDA(thebits : TBits_1); inline;
  36533. begin
  36534. if thebits = 0 then
  36535. pTDefRegMap(@Self)^.clr := $00000001
  36536. else
  36537. pTDefRegMap(@Self)^.&set := $00000001;
  36538. end;
  36539. function TUART3_U2ASTA.getURXDA : TBits_1; inline;
  36540. begin
  36541. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36542. end;
  36543. procedure TUART3_U2ASTA.setOERR; inline;
  36544. begin
  36545. pTDefRegMap(@Self)^.&set := $00000002;
  36546. end;
  36547. procedure TUART3_U2ASTA.clearOERR; inline;
  36548. begin
  36549. pTDefRegMap(@Self)^.clr := $00000002;
  36550. end;
  36551. procedure TUART3_U2ASTA.setOERR(thebits : TBits_1); inline;
  36552. begin
  36553. if thebits = 0 then
  36554. pTDefRegMap(@Self)^.clr := $00000002
  36555. else
  36556. pTDefRegMap(@Self)^.&set := $00000002;
  36557. end;
  36558. function TUART3_U2ASTA.getOERR : TBits_1; inline;
  36559. begin
  36560. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36561. end;
  36562. procedure TUART3_U2ASTA.setFERR; inline;
  36563. begin
  36564. pTDefRegMap(@Self)^.&set := $00000004;
  36565. end;
  36566. procedure TUART3_U2ASTA.clearFERR; inline;
  36567. begin
  36568. pTDefRegMap(@Self)^.clr := $00000004;
  36569. end;
  36570. procedure TUART3_U2ASTA.setFERR(thebits : TBits_1); inline;
  36571. begin
  36572. if thebits = 0 then
  36573. pTDefRegMap(@Self)^.clr := $00000004
  36574. else
  36575. pTDefRegMap(@Self)^.&set := $00000004;
  36576. end;
  36577. function TUART3_U2ASTA.getFERR : TBits_1; inline;
  36578. begin
  36579. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36580. end;
  36581. procedure TUART3_U2ASTA.setPERR; inline;
  36582. begin
  36583. pTDefRegMap(@Self)^.&set := $00000008;
  36584. end;
  36585. procedure TUART3_U2ASTA.clearPERR; inline;
  36586. begin
  36587. pTDefRegMap(@Self)^.clr := $00000008;
  36588. end;
  36589. procedure TUART3_U2ASTA.setPERR(thebits : TBits_1); inline;
  36590. begin
  36591. if thebits = 0 then
  36592. pTDefRegMap(@Self)^.clr := $00000008
  36593. else
  36594. pTDefRegMap(@Self)^.&set := $00000008;
  36595. end;
  36596. function TUART3_U2ASTA.getPERR : TBits_1; inline;
  36597. begin
  36598. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36599. end;
  36600. procedure TUART3_U2ASTA.setRIDLE; inline;
  36601. begin
  36602. pTDefRegMap(@Self)^.&set := $00000010;
  36603. end;
  36604. procedure TUART3_U2ASTA.clearRIDLE; inline;
  36605. begin
  36606. pTDefRegMap(@Self)^.clr := $00000010;
  36607. end;
  36608. procedure TUART3_U2ASTA.setRIDLE(thebits : TBits_1); inline;
  36609. begin
  36610. if thebits = 0 then
  36611. pTDefRegMap(@Self)^.clr := $00000010
  36612. else
  36613. pTDefRegMap(@Self)^.&set := $00000010;
  36614. end;
  36615. function TUART3_U2ASTA.getRIDLE : TBits_1; inline;
  36616. begin
  36617. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36618. end;
  36619. procedure TUART3_U2ASTA.setADDEN; inline;
  36620. begin
  36621. pTDefRegMap(@Self)^.&set := $00000020;
  36622. end;
  36623. procedure TUART3_U2ASTA.clearADDEN; inline;
  36624. begin
  36625. pTDefRegMap(@Self)^.clr := $00000020;
  36626. end;
  36627. procedure TUART3_U2ASTA.setADDEN(thebits : TBits_1); inline;
  36628. begin
  36629. if thebits = 0 then
  36630. pTDefRegMap(@Self)^.clr := $00000020
  36631. else
  36632. pTDefRegMap(@Self)^.&set := $00000020;
  36633. end;
  36634. function TUART3_U2ASTA.getADDEN : TBits_1; inline;
  36635. begin
  36636. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36637. end;
  36638. procedure TUART3_U2ASTA.setURXISEL(thebits : TBits_2); inline;
  36639. begin
  36640. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  36641. end;
  36642. function TUART3_U2ASTA.getURXISEL : TBits_2; inline;
  36643. begin
  36644. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  36645. end;
  36646. procedure TUART3_U2ASTA.setTRMT; inline;
  36647. begin
  36648. pTDefRegMap(@Self)^.&set := $00000100;
  36649. end;
  36650. procedure TUART3_U2ASTA.clearTRMT; inline;
  36651. begin
  36652. pTDefRegMap(@Self)^.clr := $00000100;
  36653. end;
  36654. procedure TUART3_U2ASTA.setTRMT(thebits : TBits_1); inline;
  36655. begin
  36656. if thebits = 0 then
  36657. pTDefRegMap(@Self)^.clr := $00000100
  36658. else
  36659. pTDefRegMap(@Self)^.&set := $00000100;
  36660. end;
  36661. function TUART3_U2ASTA.getTRMT : TBits_1; inline;
  36662. begin
  36663. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36664. end;
  36665. procedure TUART3_U2ASTA.setUTXBF; inline;
  36666. begin
  36667. pTDefRegMap(@Self)^.&set := $00000200;
  36668. end;
  36669. procedure TUART3_U2ASTA.clearUTXBF; inline;
  36670. begin
  36671. pTDefRegMap(@Self)^.clr := $00000200;
  36672. end;
  36673. procedure TUART3_U2ASTA.setUTXBF(thebits : TBits_1); inline;
  36674. begin
  36675. if thebits = 0 then
  36676. pTDefRegMap(@Self)^.clr := $00000200
  36677. else
  36678. pTDefRegMap(@Self)^.&set := $00000200;
  36679. end;
  36680. function TUART3_U2ASTA.getUTXBF : TBits_1; inline;
  36681. begin
  36682. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36683. end;
  36684. procedure TUART3_U2ASTA.setUTXEN; inline;
  36685. begin
  36686. pTDefRegMap(@Self)^.&set := $00000400;
  36687. end;
  36688. procedure TUART3_U2ASTA.clearUTXEN; inline;
  36689. begin
  36690. pTDefRegMap(@Self)^.clr := $00000400;
  36691. end;
  36692. procedure TUART3_U2ASTA.setUTXEN(thebits : TBits_1); inline;
  36693. begin
  36694. if thebits = 0 then
  36695. pTDefRegMap(@Self)^.clr := $00000400
  36696. else
  36697. pTDefRegMap(@Self)^.&set := $00000400;
  36698. end;
  36699. function TUART3_U2ASTA.getUTXEN : TBits_1; inline;
  36700. begin
  36701. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  36702. end;
  36703. procedure TUART3_U2ASTA.setUTXBRK; inline;
  36704. begin
  36705. pTDefRegMap(@Self)^.&set := $00000800;
  36706. end;
  36707. procedure TUART3_U2ASTA.clearUTXBRK; inline;
  36708. begin
  36709. pTDefRegMap(@Self)^.clr := $00000800;
  36710. end;
  36711. procedure TUART3_U2ASTA.setUTXBRK(thebits : TBits_1); inline;
  36712. begin
  36713. if thebits = 0 then
  36714. pTDefRegMap(@Self)^.clr := $00000800
  36715. else
  36716. pTDefRegMap(@Self)^.&set := $00000800;
  36717. end;
  36718. function TUART3_U2ASTA.getUTXBRK : TBits_1; inline;
  36719. begin
  36720. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  36721. end;
  36722. procedure TUART3_U2ASTA.setURXEN; inline;
  36723. begin
  36724. pTDefRegMap(@Self)^.&set := $00001000;
  36725. end;
  36726. procedure TUART3_U2ASTA.clearURXEN; inline;
  36727. begin
  36728. pTDefRegMap(@Self)^.clr := $00001000;
  36729. end;
  36730. procedure TUART3_U2ASTA.setURXEN(thebits : TBits_1); inline;
  36731. begin
  36732. if thebits = 0 then
  36733. pTDefRegMap(@Self)^.clr := $00001000
  36734. else
  36735. pTDefRegMap(@Self)^.&set := $00001000;
  36736. end;
  36737. function TUART3_U2ASTA.getURXEN : TBits_1; inline;
  36738. begin
  36739. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  36740. end;
  36741. procedure TUART3_U2ASTA.setUTXINV; inline;
  36742. begin
  36743. pTDefRegMap(@Self)^.&set := $00002000;
  36744. end;
  36745. procedure TUART3_U2ASTA.clearUTXINV; inline;
  36746. begin
  36747. pTDefRegMap(@Self)^.clr := $00002000;
  36748. end;
  36749. procedure TUART3_U2ASTA.setUTXINV(thebits : TBits_1); inline;
  36750. begin
  36751. if thebits = 0 then
  36752. pTDefRegMap(@Self)^.clr := $00002000
  36753. else
  36754. pTDefRegMap(@Self)^.&set := $00002000;
  36755. end;
  36756. function TUART3_U2ASTA.getUTXINV : TBits_1; inline;
  36757. begin
  36758. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36759. end;
  36760. procedure TUART3_U2ASTA.setUTXISEL(thebits : TBits_2); inline;
  36761. begin
  36762. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  36763. end;
  36764. function TUART3_U2ASTA.getUTXISEL : TBits_2; inline;
  36765. begin
  36766. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  36767. end;
  36768. procedure TUART3_U2ASTA.setADDR(thebits : TBits_8); inline;
  36769. begin
  36770. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  36771. end;
  36772. function TUART3_U2ASTA.getADDR : TBits_8; inline;
  36773. begin
  36774. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  36775. end;
  36776. procedure TUART3_U2ASTA.setADM_EN; inline;
  36777. begin
  36778. pTDefRegMap(@Self)^.&set := $01000000;
  36779. end;
  36780. procedure TUART3_U2ASTA.clearADM_EN; inline;
  36781. begin
  36782. pTDefRegMap(@Self)^.clr := $01000000;
  36783. end;
  36784. procedure TUART3_U2ASTA.setADM_EN(thebits : TBits_1); inline;
  36785. begin
  36786. if thebits = 0 then
  36787. pTDefRegMap(@Self)^.clr := $01000000
  36788. else
  36789. pTDefRegMap(@Self)^.&set := $01000000;
  36790. end;
  36791. function TUART3_U2ASTA.getADM_EN : TBits_1; inline;
  36792. begin
  36793. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  36794. end;
  36795. procedure TUART3_U2ASTA.setURXISEL0; inline;
  36796. begin
  36797. pTDefRegMap(@Self)^.&set := $00000040;
  36798. end;
  36799. procedure TUART3_U2ASTA.clearURXISEL0; inline;
  36800. begin
  36801. pTDefRegMap(@Self)^.clr := $00000040;
  36802. end;
  36803. procedure TUART3_U2ASTA.setURXISEL0(thebits : TBits_1); inline;
  36804. begin
  36805. if thebits = 0 then
  36806. pTDefRegMap(@Self)^.clr := $00000040
  36807. else
  36808. pTDefRegMap(@Self)^.&set := $00000040;
  36809. end;
  36810. function TUART3_U2ASTA.getURXISEL0 : TBits_1; inline;
  36811. begin
  36812. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36813. end;
  36814. procedure TUART3_U2ASTA.setURXISEL1; inline;
  36815. begin
  36816. pTDefRegMap(@Self)^.&set := $00000080;
  36817. end;
  36818. procedure TUART3_U2ASTA.clearURXISEL1; inline;
  36819. begin
  36820. pTDefRegMap(@Self)^.clr := $00000080;
  36821. end;
  36822. procedure TUART3_U2ASTA.setURXISEL1(thebits : TBits_1); inline;
  36823. begin
  36824. if thebits = 0 then
  36825. pTDefRegMap(@Self)^.clr := $00000080
  36826. else
  36827. pTDefRegMap(@Self)^.&set := $00000080;
  36828. end;
  36829. function TUART3_U2ASTA.getURXISEL1 : TBits_1; inline;
  36830. begin
  36831. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36832. end;
  36833. procedure TUART3_U2ASTA.setUTXISEL0; inline;
  36834. begin
  36835. pTDefRegMap(@Self)^.&set := $00004000;
  36836. end;
  36837. procedure TUART3_U2ASTA.clearUTXISEL0; inline;
  36838. begin
  36839. pTDefRegMap(@Self)^.clr := $00004000;
  36840. end;
  36841. procedure TUART3_U2ASTA.setUTXISEL0(thebits : TBits_1); inline;
  36842. begin
  36843. if thebits = 0 then
  36844. pTDefRegMap(@Self)^.clr := $00004000
  36845. else
  36846. pTDefRegMap(@Self)^.&set := $00004000;
  36847. end;
  36848. function TUART3_U2ASTA.getUTXISEL0 : TBits_1; inline;
  36849. begin
  36850. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  36851. end;
  36852. procedure TUART3_U2ASTA.setUTXISEL1; inline;
  36853. begin
  36854. pTDefRegMap(@Self)^.&set := $00008000;
  36855. end;
  36856. procedure TUART3_U2ASTA.clearUTXISEL1; inline;
  36857. begin
  36858. pTDefRegMap(@Self)^.clr := $00008000;
  36859. end;
  36860. procedure TUART3_U2ASTA.setUTXISEL1(thebits : TBits_1); inline;
  36861. begin
  36862. if thebits = 0 then
  36863. pTDefRegMap(@Self)^.clr := $00008000
  36864. else
  36865. pTDefRegMap(@Self)^.&set := $00008000;
  36866. end;
  36867. function TUART3_U2ASTA.getUTXISEL1 : TBits_1; inline;
  36868. begin
  36869. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36870. end;
  36871. procedure TUART3_U2ASTA.setUTXSEL(thebits : TBits_2); inline;
  36872. begin
  36873. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  36874. end;
  36875. function TUART3_U2ASTA.getUTXSEL : TBits_2; inline;
  36876. begin
  36877. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  36878. end;
  36879. procedure TUART3_U2ASTA.setw(thebits : TBits_32); inline;
  36880. begin
  36881. pTDefRegMap(@Self)^.val := thebits;
  36882. end;
  36883. function TUART3_U2ASTA.getw : TBits_32; inline;
  36884. begin
  36885. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36886. end;
  36887. procedure TUART3_U3STA.setURXDA; inline;
  36888. begin
  36889. pTDefRegMap(@Self)^.&set := $00000001;
  36890. end;
  36891. procedure TUART3_U3STA.clearURXDA; inline;
  36892. begin
  36893. pTDefRegMap(@Self)^.clr := $00000001;
  36894. end;
  36895. procedure TUART3_U3STA.setURXDA(thebits : TBits_1); inline;
  36896. begin
  36897. if thebits = 0 then
  36898. pTDefRegMap(@Self)^.clr := $00000001
  36899. else
  36900. pTDefRegMap(@Self)^.&set := $00000001;
  36901. end;
  36902. function TUART3_U3STA.getURXDA : TBits_1; inline;
  36903. begin
  36904. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36905. end;
  36906. procedure TUART3_U3STA.setOERR; inline;
  36907. begin
  36908. pTDefRegMap(@Self)^.&set := $00000002;
  36909. end;
  36910. procedure TUART3_U3STA.clearOERR; inline;
  36911. begin
  36912. pTDefRegMap(@Self)^.clr := $00000002;
  36913. end;
  36914. procedure TUART3_U3STA.setOERR(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 TUART3_U3STA.getOERR : TBits_1; inline;
  36922. begin
  36923. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36924. end;
  36925. procedure TUART3_U3STA.setFERR; inline;
  36926. begin
  36927. pTDefRegMap(@Self)^.&set := $00000004;
  36928. end;
  36929. procedure TUART3_U3STA.clearFERR; inline;
  36930. begin
  36931. pTDefRegMap(@Self)^.clr := $00000004;
  36932. end;
  36933. procedure TUART3_U3STA.setFERR(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 TUART3_U3STA.getFERR : TBits_1; inline;
  36941. begin
  36942. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36943. end;
  36944. procedure TUART3_U3STA.setPERR; inline;
  36945. begin
  36946. pTDefRegMap(@Self)^.&set := $00000008;
  36947. end;
  36948. procedure TUART3_U3STA.clearPERR; inline;
  36949. begin
  36950. pTDefRegMap(@Self)^.clr := $00000008;
  36951. end;
  36952. procedure TUART3_U3STA.setPERR(thebits : TBits_1); inline;
  36953. begin
  36954. if thebits = 0 then
  36955. pTDefRegMap(@Self)^.clr := $00000008
  36956. else
  36957. pTDefRegMap(@Self)^.&set := $00000008;
  36958. end;
  36959. function TUART3_U3STA.getPERR : TBits_1; inline;
  36960. begin
  36961. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36962. end;
  36963. procedure TUART3_U3STA.setRIDLE; inline;
  36964. begin
  36965. pTDefRegMap(@Self)^.&set := $00000010;
  36966. end;
  36967. procedure TUART3_U3STA.clearRIDLE; inline;
  36968. begin
  36969. pTDefRegMap(@Self)^.clr := $00000010;
  36970. end;
  36971. procedure TUART3_U3STA.setRIDLE(thebits : TBits_1); inline;
  36972. begin
  36973. if thebits = 0 then
  36974. pTDefRegMap(@Self)^.clr := $00000010
  36975. else
  36976. pTDefRegMap(@Self)^.&set := $00000010;
  36977. end;
  36978. function TUART3_U3STA.getRIDLE : TBits_1; inline;
  36979. begin
  36980. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36981. end;
  36982. procedure TUART3_U3STA.setADDEN; inline;
  36983. begin
  36984. pTDefRegMap(@Self)^.&set := $00000020;
  36985. end;
  36986. procedure TUART3_U3STA.clearADDEN; inline;
  36987. begin
  36988. pTDefRegMap(@Self)^.clr := $00000020;
  36989. end;
  36990. procedure TUART3_U3STA.setADDEN(thebits : TBits_1); inline;
  36991. begin
  36992. if thebits = 0 then
  36993. pTDefRegMap(@Self)^.clr := $00000020
  36994. else
  36995. pTDefRegMap(@Self)^.&set := $00000020;
  36996. end;
  36997. function TUART3_U3STA.getADDEN : TBits_1; inline;
  36998. begin
  36999. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37000. end;
  37001. procedure TUART3_U3STA.setURXISEL(thebits : TBits_2); inline;
  37002. begin
  37003. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  37004. end;
  37005. function TUART3_U3STA.getURXISEL : TBits_2; inline;
  37006. begin
  37007. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  37008. end;
  37009. procedure TUART3_U3STA.setTRMT; inline;
  37010. begin
  37011. pTDefRegMap(@Self)^.&set := $00000100;
  37012. end;
  37013. procedure TUART3_U3STA.clearTRMT; inline;
  37014. begin
  37015. pTDefRegMap(@Self)^.clr := $00000100;
  37016. end;
  37017. procedure TUART3_U3STA.setTRMT(thebits : TBits_1); inline;
  37018. begin
  37019. if thebits = 0 then
  37020. pTDefRegMap(@Self)^.clr := $00000100
  37021. else
  37022. pTDefRegMap(@Self)^.&set := $00000100;
  37023. end;
  37024. function TUART3_U3STA.getTRMT : TBits_1; inline;
  37025. begin
  37026. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37027. end;
  37028. procedure TUART3_U3STA.setUTXBF; inline;
  37029. begin
  37030. pTDefRegMap(@Self)^.&set := $00000200;
  37031. end;
  37032. procedure TUART3_U3STA.clearUTXBF; inline;
  37033. begin
  37034. pTDefRegMap(@Self)^.clr := $00000200;
  37035. end;
  37036. procedure TUART3_U3STA.setUTXBF(thebits : TBits_1); inline;
  37037. begin
  37038. if thebits = 0 then
  37039. pTDefRegMap(@Self)^.clr := $00000200
  37040. else
  37041. pTDefRegMap(@Self)^.&set := $00000200;
  37042. end;
  37043. function TUART3_U3STA.getUTXBF : TBits_1; inline;
  37044. begin
  37045. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37046. end;
  37047. procedure TUART3_U3STA.setUTXEN; inline;
  37048. begin
  37049. pTDefRegMap(@Self)^.&set := $00000400;
  37050. end;
  37051. procedure TUART3_U3STA.clearUTXEN; inline;
  37052. begin
  37053. pTDefRegMap(@Self)^.clr := $00000400;
  37054. end;
  37055. procedure TUART3_U3STA.setUTXEN(thebits : TBits_1); inline;
  37056. begin
  37057. if thebits = 0 then
  37058. pTDefRegMap(@Self)^.clr := $00000400
  37059. else
  37060. pTDefRegMap(@Self)^.&set := $00000400;
  37061. end;
  37062. function TUART3_U3STA.getUTXEN : TBits_1; inline;
  37063. begin
  37064. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  37065. end;
  37066. procedure TUART3_U3STA.setUTXBRK; inline;
  37067. begin
  37068. pTDefRegMap(@Self)^.&set := $00000800;
  37069. end;
  37070. procedure TUART3_U3STA.clearUTXBRK; inline;
  37071. begin
  37072. pTDefRegMap(@Self)^.clr := $00000800;
  37073. end;
  37074. procedure TUART3_U3STA.setUTXBRK(thebits : TBits_1); inline;
  37075. begin
  37076. if thebits = 0 then
  37077. pTDefRegMap(@Self)^.clr := $00000800
  37078. else
  37079. pTDefRegMap(@Self)^.&set := $00000800;
  37080. end;
  37081. function TUART3_U3STA.getUTXBRK : TBits_1; inline;
  37082. begin
  37083. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37084. end;
  37085. procedure TUART3_U3STA.setURXEN; inline;
  37086. begin
  37087. pTDefRegMap(@Self)^.&set := $00001000;
  37088. end;
  37089. procedure TUART3_U3STA.clearURXEN; inline;
  37090. begin
  37091. pTDefRegMap(@Self)^.clr := $00001000;
  37092. end;
  37093. procedure TUART3_U3STA.setURXEN(thebits : TBits_1); inline;
  37094. begin
  37095. if thebits = 0 then
  37096. pTDefRegMap(@Self)^.clr := $00001000
  37097. else
  37098. pTDefRegMap(@Self)^.&set := $00001000;
  37099. end;
  37100. function TUART3_U3STA.getURXEN : TBits_1; inline;
  37101. begin
  37102. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37103. end;
  37104. procedure TUART3_U3STA.setUTXINV; inline;
  37105. begin
  37106. pTDefRegMap(@Self)^.&set := $00002000;
  37107. end;
  37108. procedure TUART3_U3STA.clearUTXINV; inline;
  37109. begin
  37110. pTDefRegMap(@Self)^.clr := $00002000;
  37111. end;
  37112. procedure TUART3_U3STA.setUTXINV(thebits : TBits_1); inline;
  37113. begin
  37114. if thebits = 0 then
  37115. pTDefRegMap(@Self)^.clr := $00002000
  37116. else
  37117. pTDefRegMap(@Self)^.&set := $00002000;
  37118. end;
  37119. function TUART3_U3STA.getUTXINV : TBits_1; inline;
  37120. begin
  37121. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37122. end;
  37123. procedure TUART3_U3STA.setUTXISEL(thebits : TBits_2); inline;
  37124. begin
  37125. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  37126. end;
  37127. function TUART3_U3STA.getUTXISEL : TBits_2; inline;
  37128. begin
  37129. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  37130. end;
  37131. procedure TUART3_U3STA.setADDR(thebits : TBits_8); inline;
  37132. begin
  37133. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  37134. end;
  37135. function TUART3_U3STA.getADDR : TBits_8; inline;
  37136. begin
  37137. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  37138. end;
  37139. procedure TUART3_U3STA.setADM_EN; inline;
  37140. begin
  37141. pTDefRegMap(@Self)^.&set := $01000000;
  37142. end;
  37143. procedure TUART3_U3STA.clearADM_EN; inline;
  37144. begin
  37145. pTDefRegMap(@Self)^.clr := $01000000;
  37146. end;
  37147. procedure TUART3_U3STA.setADM_EN(thebits : TBits_1); inline;
  37148. begin
  37149. if thebits = 0 then
  37150. pTDefRegMap(@Self)^.clr := $01000000
  37151. else
  37152. pTDefRegMap(@Self)^.&set := $01000000;
  37153. end;
  37154. function TUART3_U3STA.getADM_EN : TBits_1; inline;
  37155. begin
  37156. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  37157. end;
  37158. procedure TUART3_U3STA.setURXISEL0; inline;
  37159. begin
  37160. pTDefRegMap(@Self)^.&set := $00000040;
  37161. end;
  37162. procedure TUART3_U3STA.clearURXISEL0; inline;
  37163. begin
  37164. pTDefRegMap(@Self)^.clr := $00000040;
  37165. end;
  37166. procedure TUART3_U3STA.setURXISEL0(thebits : TBits_1); inline;
  37167. begin
  37168. if thebits = 0 then
  37169. pTDefRegMap(@Self)^.clr := $00000040
  37170. else
  37171. pTDefRegMap(@Self)^.&set := $00000040;
  37172. end;
  37173. function TUART3_U3STA.getURXISEL0 : TBits_1; inline;
  37174. begin
  37175. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37176. end;
  37177. procedure TUART3_U3STA.setURXISEL1; inline;
  37178. begin
  37179. pTDefRegMap(@Self)^.&set := $00000080;
  37180. end;
  37181. procedure TUART3_U3STA.clearURXISEL1; inline;
  37182. begin
  37183. pTDefRegMap(@Self)^.clr := $00000080;
  37184. end;
  37185. procedure TUART3_U3STA.setURXISEL1(thebits : TBits_1); inline;
  37186. begin
  37187. if thebits = 0 then
  37188. pTDefRegMap(@Self)^.clr := $00000080
  37189. else
  37190. pTDefRegMap(@Self)^.&set := $00000080;
  37191. end;
  37192. function TUART3_U3STA.getURXISEL1 : TBits_1; inline;
  37193. begin
  37194. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37195. end;
  37196. procedure TUART3_U3STA.setUTXISEL0; inline;
  37197. begin
  37198. pTDefRegMap(@Self)^.&set := $00004000;
  37199. end;
  37200. procedure TUART3_U3STA.clearUTXISEL0; inline;
  37201. begin
  37202. pTDefRegMap(@Self)^.clr := $00004000;
  37203. end;
  37204. procedure TUART3_U3STA.setUTXISEL0(thebits : TBits_1); inline;
  37205. begin
  37206. if thebits = 0 then
  37207. pTDefRegMap(@Self)^.clr := $00004000
  37208. else
  37209. pTDefRegMap(@Self)^.&set := $00004000;
  37210. end;
  37211. function TUART3_U3STA.getUTXISEL0 : TBits_1; inline;
  37212. begin
  37213. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  37214. end;
  37215. procedure TUART3_U3STA.setUTXISEL1; inline;
  37216. begin
  37217. pTDefRegMap(@Self)^.&set := $00008000;
  37218. end;
  37219. procedure TUART3_U3STA.clearUTXISEL1; inline;
  37220. begin
  37221. pTDefRegMap(@Self)^.clr := $00008000;
  37222. end;
  37223. procedure TUART3_U3STA.setUTXISEL1(thebits : TBits_1); inline;
  37224. begin
  37225. if thebits = 0 then
  37226. pTDefRegMap(@Self)^.clr := $00008000
  37227. else
  37228. pTDefRegMap(@Self)^.&set := $00008000;
  37229. end;
  37230. function TUART3_U3STA.getUTXISEL1 : TBits_1; inline;
  37231. begin
  37232. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37233. end;
  37234. procedure TUART3_U3STA.setUTXSEL(thebits : TBits_2); inline;
  37235. begin
  37236. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  37237. end;
  37238. function TUART3_U3STA.getUTXSEL : TBits_2; inline;
  37239. begin
  37240. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  37241. end;
  37242. procedure TUART3_U3STA.setw(thebits : TBits_32); inline;
  37243. begin
  37244. pTDefRegMap(@Self)^.val := thebits;
  37245. end;
  37246. function TUART3_U3STA.getw : TBits_32; inline;
  37247. begin
  37248. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37249. end;
  37250. procedure TUART2B_U2BMODE.setSTSEL; inline;
  37251. begin
  37252. pTDefRegMap(@Self)^.&set := $00000001;
  37253. end;
  37254. procedure TUART2B_U2BMODE.clearSTSEL; inline;
  37255. begin
  37256. pTDefRegMap(@Self)^.clr := $00000001;
  37257. end;
  37258. procedure TUART2B_U2BMODE.setSTSEL(thebits : TBits_1); inline;
  37259. begin
  37260. if thebits = 0 then
  37261. pTDefRegMap(@Self)^.clr := $00000001
  37262. else
  37263. pTDefRegMap(@Self)^.&set := $00000001;
  37264. end;
  37265. function TUART2B_U2BMODE.getSTSEL : TBits_1; inline;
  37266. begin
  37267. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37268. end;
  37269. procedure TUART2B_U2BMODE.setPDSEL(thebits : TBits_2); inline;
  37270. begin
  37271. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  37272. end;
  37273. function TUART2B_U2BMODE.getPDSEL : TBits_2; inline;
  37274. begin
  37275. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  37276. end;
  37277. procedure TUART2B_U2BMODE.setBRGH; inline;
  37278. begin
  37279. pTDefRegMap(@Self)^.&set := $00000008;
  37280. end;
  37281. procedure TUART2B_U2BMODE.clearBRGH; inline;
  37282. begin
  37283. pTDefRegMap(@Self)^.clr := $00000008;
  37284. end;
  37285. procedure TUART2B_U2BMODE.setBRGH(thebits : TBits_1); inline;
  37286. begin
  37287. if thebits = 0 then
  37288. pTDefRegMap(@Self)^.clr := $00000008
  37289. else
  37290. pTDefRegMap(@Self)^.&set := $00000008;
  37291. end;
  37292. function TUART2B_U2BMODE.getBRGH : TBits_1; inline;
  37293. begin
  37294. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37295. end;
  37296. procedure TUART2B_U2BMODE.setRXINV; inline;
  37297. begin
  37298. pTDefRegMap(@Self)^.&set := $00000010;
  37299. end;
  37300. procedure TUART2B_U2BMODE.clearRXINV; inline;
  37301. begin
  37302. pTDefRegMap(@Self)^.clr := $00000010;
  37303. end;
  37304. procedure TUART2B_U2BMODE.setRXINV(thebits : TBits_1); inline;
  37305. begin
  37306. if thebits = 0 then
  37307. pTDefRegMap(@Self)^.clr := $00000010
  37308. else
  37309. pTDefRegMap(@Self)^.&set := $00000010;
  37310. end;
  37311. function TUART2B_U2BMODE.getRXINV : TBits_1; inline;
  37312. begin
  37313. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37314. end;
  37315. procedure TUART2B_U2BMODE.setABAUD; inline;
  37316. begin
  37317. pTDefRegMap(@Self)^.&set := $00000020;
  37318. end;
  37319. procedure TUART2B_U2BMODE.clearABAUD; inline;
  37320. begin
  37321. pTDefRegMap(@Self)^.clr := $00000020;
  37322. end;
  37323. procedure TUART2B_U2BMODE.setABAUD(thebits : TBits_1); inline;
  37324. begin
  37325. if thebits = 0 then
  37326. pTDefRegMap(@Self)^.clr := $00000020
  37327. else
  37328. pTDefRegMap(@Self)^.&set := $00000020;
  37329. end;
  37330. function TUART2B_U2BMODE.getABAUD : TBits_1; inline;
  37331. begin
  37332. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37333. end;
  37334. procedure TUART2B_U2BMODE.setLPBACK; inline;
  37335. begin
  37336. pTDefRegMap(@Self)^.&set := $00000040;
  37337. end;
  37338. procedure TUART2B_U2BMODE.clearLPBACK; inline;
  37339. begin
  37340. pTDefRegMap(@Self)^.clr := $00000040;
  37341. end;
  37342. procedure TUART2B_U2BMODE.setLPBACK(thebits : TBits_1); inline;
  37343. begin
  37344. if thebits = 0 then
  37345. pTDefRegMap(@Self)^.clr := $00000040
  37346. else
  37347. pTDefRegMap(@Self)^.&set := $00000040;
  37348. end;
  37349. function TUART2B_U2BMODE.getLPBACK : TBits_1; inline;
  37350. begin
  37351. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37352. end;
  37353. procedure TUART2B_U2BMODE.setWAKE; inline;
  37354. begin
  37355. pTDefRegMap(@Self)^.&set := $00000080;
  37356. end;
  37357. procedure TUART2B_U2BMODE.clearWAKE; inline;
  37358. begin
  37359. pTDefRegMap(@Self)^.clr := $00000080;
  37360. end;
  37361. procedure TUART2B_U2BMODE.setWAKE(thebits : TBits_1); inline;
  37362. begin
  37363. if thebits = 0 then
  37364. pTDefRegMap(@Self)^.clr := $00000080
  37365. else
  37366. pTDefRegMap(@Self)^.&set := $00000080;
  37367. end;
  37368. function TUART2B_U2BMODE.getWAKE : TBits_1; inline;
  37369. begin
  37370. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37371. end;
  37372. procedure TUART2B_U2BMODE.setIREN; inline;
  37373. begin
  37374. pTDefRegMap(@Self)^.&set := $00001000;
  37375. end;
  37376. procedure TUART2B_U2BMODE.clearIREN; inline;
  37377. begin
  37378. pTDefRegMap(@Self)^.clr := $00001000;
  37379. end;
  37380. procedure TUART2B_U2BMODE.setIREN(thebits : TBits_1); inline;
  37381. begin
  37382. if thebits = 0 then
  37383. pTDefRegMap(@Self)^.clr := $00001000
  37384. else
  37385. pTDefRegMap(@Self)^.&set := $00001000;
  37386. end;
  37387. function TUART2B_U2BMODE.getIREN : TBits_1; inline;
  37388. begin
  37389. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37390. end;
  37391. procedure TUART2B_U2BMODE.setSIDL; inline;
  37392. begin
  37393. pTDefRegMap(@Self)^.&set := $00002000;
  37394. end;
  37395. procedure TUART2B_U2BMODE.clearSIDL; inline;
  37396. begin
  37397. pTDefRegMap(@Self)^.clr := $00002000;
  37398. end;
  37399. procedure TUART2B_U2BMODE.setSIDL(thebits : TBits_1); inline;
  37400. begin
  37401. if thebits = 0 then
  37402. pTDefRegMap(@Self)^.clr := $00002000
  37403. else
  37404. pTDefRegMap(@Self)^.&set := $00002000;
  37405. end;
  37406. function TUART2B_U2BMODE.getSIDL : TBits_1; inline;
  37407. begin
  37408. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37409. end;
  37410. procedure TUART2B_U2BMODE.setON; inline;
  37411. begin
  37412. pTDefRegMap(@Self)^.&set := $00008000;
  37413. end;
  37414. procedure TUART2B_U2BMODE.clearON; inline;
  37415. begin
  37416. pTDefRegMap(@Self)^.clr := $00008000;
  37417. end;
  37418. procedure TUART2B_U2BMODE.setON(thebits : TBits_1); inline;
  37419. begin
  37420. if thebits = 0 then
  37421. pTDefRegMap(@Self)^.clr := $00008000
  37422. else
  37423. pTDefRegMap(@Self)^.&set := $00008000;
  37424. end;
  37425. function TUART2B_U2BMODE.getON : TBits_1; inline;
  37426. begin
  37427. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37428. end;
  37429. procedure TUART2B_U2BMODE.setPDSEL0; inline;
  37430. begin
  37431. pTDefRegMap(@Self)^.&set := $00000002;
  37432. end;
  37433. procedure TUART2B_U2BMODE.clearPDSEL0; inline;
  37434. begin
  37435. pTDefRegMap(@Self)^.clr := $00000002;
  37436. end;
  37437. procedure TUART2B_U2BMODE.setPDSEL0(thebits : TBits_1); inline;
  37438. begin
  37439. if thebits = 0 then
  37440. pTDefRegMap(@Self)^.clr := $00000002
  37441. else
  37442. pTDefRegMap(@Self)^.&set := $00000002;
  37443. end;
  37444. function TUART2B_U2BMODE.getPDSEL0 : TBits_1; inline;
  37445. begin
  37446. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37447. end;
  37448. procedure TUART2B_U2BMODE.setPDSEL1; inline;
  37449. begin
  37450. pTDefRegMap(@Self)^.&set := $00000004;
  37451. end;
  37452. procedure TUART2B_U2BMODE.clearPDSEL1; inline;
  37453. begin
  37454. pTDefRegMap(@Self)^.clr := $00000004;
  37455. end;
  37456. procedure TUART2B_U2BMODE.setPDSEL1(thebits : TBits_1); inline;
  37457. begin
  37458. if thebits = 0 then
  37459. pTDefRegMap(@Self)^.clr := $00000004
  37460. else
  37461. pTDefRegMap(@Self)^.&set := $00000004;
  37462. end;
  37463. function TUART2B_U2BMODE.getPDSEL1 : TBits_1; inline;
  37464. begin
  37465. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37466. end;
  37467. procedure TUART2B_U2BMODE.setUSIDL; inline;
  37468. begin
  37469. pTDefRegMap(@Self)^.&set := $00002000;
  37470. end;
  37471. procedure TUART2B_U2BMODE.clearUSIDL; inline;
  37472. begin
  37473. pTDefRegMap(@Self)^.clr := $00002000;
  37474. end;
  37475. procedure TUART2B_U2BMODE.setUSIDL(thebits : TBits_1); inline;
  37476. begin
  37477. if thebits = 0 then
  37478. pTDefRegMap(@Self)^.clr := $00002000
  37479. else
  37480. pTDefRegMap(@Self)^.&set := $00002000;
  37481. end;
  37482. function TUART2B_U2BMODE.getUSIDL : TBits_1; inline;
  37483. begin
  37484. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37485. end;
  37486. procedure TUART2B_U2BMODE.setUARTEN; inline;
  37487. begin
  37488. pTDefRegMap(@Self)^.&set := $00008000;
  37489. end;
  37490. procedure TUART2B_U2BMODE.clearUARTEN; inline;
  37491. begin
  37492. pTDefRegMap(@Self)^.clr := $00008000;
  37493. end;
  37494. procedure TUART2B_U2BMODE.setUARTEN(thebits : TBits_1); inline;
  37495. begin
  37496. if thebits = 0 then
  37497. pTDefRegMap(@Self)^.clr := $00008000
  37498. else
  37499. pTDefRegMap(@Self)^.&set := $00008000;
  37500. end;
  37501. function TUART2B_U2BMODE.getUARTEN : TBits_1; inline;
  37502. begin
  37503. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37504. end;
  37505. procedure TUART2B_U2BMODE.setw(thebits : TBits_32); inline;
  37506. begin
  37507. pTDefRegMap(@Self)^.val := thebits;
  37508. end;
  37509. function TUART2B_U2BMODE.getw : TBits_32; inline;
  37510. begin
  37511. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37512. end;
  37513. procedure TUART2B_U6MODE.setSTSEL; inline;
  37514. begin
  37515. pTDefRegMap(@Self)^.&set := $00000001;
  37516. end;
  37517. procedure TUART2B_U6MODE.clearSTSEL; inline;
  37518. begin
  37519. pTDefRegMap(@Self)^.clr := $00000001;
  37520. end;
  37521. procedure TUART2B_U6MODE.setSTSEL(thebits : TBits_1); inline;
  37522. begin
  37523. if thebits = 0 then
  37524. pTDefRegMap(@Self)^.clr := $00000001
  37525. else
  37526. pTDefRegMap(@Self)^.&set := $00000001;
  37527. end;
  37528. function TUART2B_U6MODE.getSTSEL : TBits_1; inline;
  37529. begin
  37530. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37531. end;
  37532. procedure TUART2B_U6MODE.setPDSEL(thebits : TBits_2); inline;
  37533. begin
  37534. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  37535. end;
  37536. function TUART2B_U6MODE.getPDSEL : TBits_2; inline;
  37537. begin
  37538. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  37539. end;
  37540. procedure TUART2B_U6MODE.setBRGH; inline;
  37541. begin
  37542. pTDefRegMap(@Self)^.&set := $00000008;
  37543. end;
  37544. procedure TUART2B_U6MODE.clearBRGH; inline;
  37545. begin
  37546. pTDefRegMap(@Self)^.clr := $00000008;
  37547. end;
  37548. procedure TUART2B_U6MODE.setBRGH(thebits : TBits_1); inline;
  37549. begin
  37550. if thebits = 0 then
  37551. pTDefRegMap(@Self)^.clr := $00000008
  37552. else
  37553. pTDefRegMap(@Self)^.&set := $00000008;
  37554. end;
  37555. function TUART2B_U6MODE.getBRGH : TBits_1; inline;
  37556. begin
  37557. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37558. end;
  37559. procedure TUART2B_U6MODE.setRXINV; inline;
  37560. begin
  37561. pTDefRegMap(@Self)^.&set := $00000010;
  37562. end;
  37563. procedure TUART2B_U6MODE.clearRXINV; inline;
  37564. begin
  37565. pTDefRegMap(@Self)^.clr := $00000010;
  37566. end;
  37567. procedure TUART2B_U6MODE.setRXINV(thebits : TBits_1); inline;
  37568. begin
  37569. if thebits = 0 then
  37570. pTDefRegMap(@Self)^.clr := $00000010
  37571. else
  37572. pTDefRegMap(@Self)^.&set := $00000010;
  37573. end;
  37574. function TUART2B_U6MODE.getRXINV : TBits_1; inline;
  37575. begin
  37576. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37577. end;
  37578. procedure TUART2B_U6MODE.setABAUD; inline;
  37579. begin
  37580. pTDefRegMap(@Self)^.&set := $00000020;
  37581. end;
  37582. procedure TUART2B_U6MODE.clearABAUD; inline;
  37583. begin
  37584. pTDefRegMap(@Self)^.clr := $00000020;
  37585. end;
  37586. procedure TUART2B_U6MODE.setABAUD(thebits : TBits_1); inline;
  37587. begin
  37588. if thebits = 0 then
  37589. pTDefRegMap(@Self)^.clr := $00000020
  37590. else
  37591. pTDefRegMap(@Self)^.&set := $00000020;
  37592. end;
  37593. function TUART2B_U6MODE.getABAUD : TBits_1; inline;
  37594. begin
  37595. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37596. end;
  37597. procedure TUART2B_U6MODE.setLPBACK; inline;
  37598. begin
  37599. pTDefRegMap(@Self)^.&set := $00000040;
  37600. end;
  37601. procedure TUART2B_U6MODE.clearLPBACK; inline;
  37602. begin
  37603. pTDefRegMap(@Self)^.clr := $00000040;
  37604. end;
  37605. procedure TUART2B_U6MODE.setLPBACK(thebits : TBits_1); inline;
  37606. begin
  37607. if thebits = 0 then
  37608. pTDefRegMap(@Self)^.clr := $00000040
  37609. else
  37610. pTDefRegMap(@Self)^.&set := $00000040;
  37611. end;
  37612. function TUART2B_U6MODE.getLPBACK : TBits_1; inline;
  37613. begin
  37614. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37615. end;
  37616. procedure TUART2B_U6MODE.setWAKE; inline;
  37617. begin
  37618. pTDefRegMap(@Self)^.&set := $00000080;
  37619. end;
  37620. procedure TUART2B_U6MODE.clearWAKE; inline;
  37621. begin
  37622. pTDefRegMap(@Self)^.clr := $00000080;
  37623. end;
  37624. procedure TUART2B_U6MODE.setWAKE(thebits : TBits_1); inline;
  37625. begin
  37626. if thebits = 0 then
  37627. pTDefRegMap(@Self)^.clr := $00000080
  37628. else
  37629. pTDefRegMap(@Self)^.&set := $00000080;
  37630. end;
  37631. function TUART2B_U6MODE.getWAKE : TBits_1; inline;
  37632. begin
  37633. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37634. end;
  37635. procedure TUART2B_U6MODE.setIREN; inline;
  37636. begin
  37637. pTDefRegMap(@Self)^.&set := $00001000;
  37638. end;
  37639. procedure TUART2B_U6MODE.clearIREN; inline;
  37640. begin
  37641. pTDefRegMap(@Self)^.clr := $00001000;
  37642. end;
  37643. procedure TUART2B_U6MODE.setIREN(thebits : TBits_1); inline;
  37644. begin
  37645. if thebits = 0 then
  37646. pTDefRegMap(@Self)^.clr := $00001000
  37647. else
  37648. pTDefRegMap(@Self)^.&set := $00001000;
  37649. end;
  37650. function TUART2B_U6MODE.getIREN : TBits_1; inline;
  37651. begin
  37652. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37653. end;
  37654. procedure TUART2B_U6MODE.setSIDL; inline;
  37655. begin
  37656. pTDefRegMap(@Self)^.&set := $00002000;
  37657. end;
  37658. procedure TUART2B_U6MODE.clearSIDL; inline;
  37659. begin
  37660. pTDefRegMap(@Self)^.clr := $00002000;
  37661. end;
  37662. procedure TUART2B_U6MODE.setSIDL(thebits : TBits_1); inline;
  37663. begin
  37664. if thebits = 0 then
  37665. pTDefRegMap(@Self)^.clr := $00002000
  37666. else
  37667. pTDefRegMap(@Self)^.&set := $00002000;
  37668. end;
  37669. function TUART2B_U6MODE.getSIDL : TBits_1; inline;
  37670. begin
  37671. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37672. end;
  37673. procedure TUART2B_U6MODE.setON; inline;
  37674. begin
  37675. pTDefRegMap(@Self)^.&set := $00008000;
  37676. end;
  37677. procedure TUART2B_U6MODE.clearON; inline;
  37678. begin
  37679. pTDefRegMap(@Self)^.clr := $00008000;
  37680. end;
  37681. procedure TUART2B_U6MODE.setON(thebits : TBits_1); inline;
  37682. begin
  37683. if thebits = 0 then
  37684. pTDefRegMap(@Self)^.clr := $00008000
  37685. else
  37686. pTDefRegMap(@Self)^.&set := $00008000;
  37687. end;
  37688. function TUART2B_U6MODE.getON : TBits_1; inline;
  37689. begin
  37690. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37691. end;
  37692. procedure TUART2B_U6MODE.setPDSEL0; inline;
  37693. begin
  37694. pTDefRegMap(@Self)^.&set := $00000002;
  37695. end;
  37696. procedure TUART2B_U6MODE.clearPDSEL0; inline;
  37697. begin
  37698. pTDefRegMap(@Self)^.clr := $00000002;
  37699. end;
  37700. procedure TUART2B_U6MODE.setPDSEL0(thebits : TBits_1); inline;
  37701. begin
  37702. if thebits = 0 then
  37703. pTDefRegMap(@Self)^.clr := $00000002
  37704. else
  37705. pTDefRegMap(@Self)^.&set := $00000002;
  37706. end;
  37707. function TUART2B_U6MODE.getPDSEL0 : TBits_1; inline;
  37708. begin
  37709. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37710. end;
  37711. procedure TUART2B_U6MODE.setPDSEL1; inline;
  37712. begin
  37713. pTDefRegMap(@Self)^.&set := $00000004;
  37714. end;
  37715. procedure TUART2B_U6MODE.clearPDSEL1; inline;
  37716. begin
  37717. pTDefRegMap(@Self)^.clr := $00000004;
  37718. end;
  37719. procedure TUART2B_U6MODE.setPDSEL1(thebits : TBits_1); inline;
  37720. begin
  37721. if thebits = 0 then
  37722. pTDefRegMap(@Self)^.clr := $00000004
  37723. else
  37724. pTDefRegMap(@Self)^.&set := $00000004;
  37725. end;
  37726. function TUART2B_U6MODE.getPDSEL1 : TBits_1; inline;
  37727. begin
  37728. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37729. end;
  37730. procedure TUART2B_U6MODE.setUSIDL; inline;
  37731. begin
  37732. pTDefRegMap(@Self)^.&set := $00002000;
  37733. end;
  37734. procedure TUART2B_U6MODE.clearUSIDL; inline;
  37735. begin
  37736. pTDefRegMap(@Self)^.clr := $00002000;
  37737. end;
  37738. procedure TUART2B_U6MODE.setUSIDL(thebits : TBits_1); inline;
  37739. begin
  37740. if thebits = 0 then
  37741. pTDefRegMap(@Self)^.clr := $00002000
  37742. else
  37743. pTDefRegMap(@Self)^.&set := $00002000;
  37744. end;
  37745. function TUART2B_U6MODE.getUSIDL : TBits_1; inline;
  37746. begin
  37747. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37748. end;
  37749. procedure TUART2B_U6MODE.setUARTEN; inline;
  37750. begin
  37751. pTDefRegMap(@Self)^.&set := $00008000;
  37752. end;
  37753. procedure TUART2B_U6MODE.clearUARTEN; inline;
  37754. begin
  37755. pTDefRegMap(@Self)^.clr := $00008000;
  37756. end;
  37757. procedure TUART2B_U6MODE.setUARTEN(thebits : TBits_1); inline;
  37758. begin
  37759. if thebits = 0 then
  37760. pTDefRegMap(@Self)^.clr := $00008000
  37761. else
  37762. pTDefRegMap(@Self)^.&set := $00008000;
  37763. end;
  37764. function TUART2B_U6MODE.getUARTEN : TBits_1; inline;
  37765. begin
  37766. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37767. end;
  37768. procedure TUART2B_U6MODE.setw(thebits : TBits_32); inline;
  37769. begin
  37770. pTDefRegMap(@Self)^.val := thebits;
  37771. end;
  37772. function TUART2B_U6MODE.getw : TBits_32; inline;
  37773. begin
  37774. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37775. end;
  37776. procedure TUART2B_U2BSTA.setURXDA; inline;
  37777. begin
  37778. pTDefRegMap(@Self)^.&set := $00000001;
  37779. end;
  37780. procedure TUART2B_U2BSTA.clearURXDA; inline;
  37781. begin
  37782. pTDefRegMap(@Self)^.clr := $00000001;
  37783. end;
  37784. procedure TUART2B_U2BSTA.setURXDA(thebits : TBits_1); inline;
  37785. begin
  37786. if thebits = 0 then
  37787. pTDefRegMap(@Self)^.clr := $00000001
  37788. else
  37789. pTDefRegMap(@Self)^.&set := $00000001;
  37790. end;
  37791. function TUART2B_U2BSTA.getURXDA : TBits_1; inline;
  37792. begin
  37793. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37794. end;
  37795. procedure TUART2B_U2BSTA.setOERR; inline;
  37796. begin
  37797. pTDefRegMap(@Self)^.&set := $00000002;
  37798. end;
  37799. procedure TUART2B_U2BSTA.clearOERR; inline;
  37800. begin
  37801. pTDefRegMap(@Self)^.clr := $00000002;
  37802. end;
  37803. procedure TUART2B_U2BSTA.setOERR(thebits : TBits_1); inline;
  37804. begin
  37805. if thebits = 0 then
  37806. pTDefRegMap(@Self)^.clr := $00000002
  37807. else
  37808. pTDefRegMap(@Self)^.&set := $00000002;
  37809. end;
  37810. function TUART2B_U2BSTA.getOERR : TBits_1; inline;
  37811. begin
  37812. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37813. end;
  37814. procedure TUART2B_U2BSTA.setFERR; inline;
  37815. begin
  37816. pTDefRegMap(@Self)^.&set := $00000004;
  37817. end;
  37818. procedure TUART2B_U2BSTA.clearFERR; inline;
  37819. begin
  37820. pTDefRegMap(@Self)^.clr := $00000004;
  37821. end;
  37822. procedure TUART2B_U2BSTA.setFERR(thebits : TBits_1); inline;
  37823. begin
  37824. if thebits = 0 then
  37825. pTDefRegMap(@Self)^.clr := $00000004
  37826. else
  37827. pTDefRegMap(@Self)^.&set := $00000004;
  37828. end;
  37829. function TUART2B_U2BSTA.getFERR : TBits_1; inline;
  37830. begin
  37831. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37832. end;
  37833. procedure TUART2B_U2BSTA.setPERR; inline;
  37834. begin
  37835. pTDefRegMap(@Self)^.&set := $00000008;
  37836. end;
  37837. procedure TUART2B_U2BSTA.clearPERR; inline;
  37838. begin
  37839. pTDefRegMap(@Self)^.clr := $00000008;
  37840. end;
  37841. procedure TUART2B_U2BSTA.setPERR(thebits : TBits_1); inline;
  37842. begin
  37843. if thebits = 0 then
  37844. pTDefRegMap(@Self)^.clr := $00000008
  37845. else
  37846. pTDefRegMap(@Self)^.&set := $00000008;
  37847. end;
  37848. function TUART2B_U2BSTA.getPERR : TBits_1; inline;
  37849. begin
  37850. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37851. end;
  37852. procedure TUART2B_U2BSTA.setRIDLE; inline;
  37853. begin
  37854. pTDefRegMap(@Self)^.&set := $00000010;
  37855. end;
  37856. procedure TUART2B_U2BSTA.clearRIDLE; inline;
  37857. begin
  37858. pTDefRegMap(@Self)^.clr := $00000010;
  37859. end;
  37860. procedure TUART2B_U2BSTA.setRIDLE(thebits : TBits_1); inline;
  37861. begin
  37862. if thebits = 0 then
  37863. pTDefRegMap(@Self)^.clr := $00000010
  37864. else
  37865. pTDefRegMap(@Self)^.&set := $00000010;
  37866. end;
  37867. function TUART2B_U2BSTA.getRIDLE : TBits_1; inline;
  37868. begin
  37869. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37870. end;
  37871. procedure TUART2B_U2BSTA.setADDEN; inline;
  37872. begin
  37873. pTDefRegMap(@Self)^.&set := $00000020;
  37874. end;
  37875. procedure TUART2B_U2BSTA.clearADDEN; inline;
  37876. begin
  37877. pTDefRegMap(@Self)^.clr := $00000020;
  37878. end;
  37879. procedure TUART2B_U2BSTA.setADDEN(thebits : TBits_1); inline;
  37880. begin
  37881. if thebits = 0 then
  37882. pTDefRegMap(@Self)^.clr := $00000020
  37883. else
  37884. pTDefRegMap(@Self)^.&set := $00000020;
  37885. end;
  37886. function TUART2B_U2BSTA.getADDEN : TBits_1; inline;
  37887. begin
  37888. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37889. end;
  37890. procedure TUART2B_U2BSTA.setURXISEL(thebits : TBits_2); inline;
  37891. begin
  37892. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  37893. end;
  37894. function TUART2B_U2BSTA.getURXISEL : TBits_2; inline;
  37895. begin
  37896. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  37897. end;
  37898. procedure TUART2B_U2BSTA.setTRMT; inline;
  37899. begin
  37900. pTDefRegMap(@Self)^.&set := $00000100;
  37901. end;
  37902. procedure TUART2B_U2BSTA.clearTRMT; inline;
  37903. begin
  37904. pTDefRegMap(@Self)^.clr := $00000100;
  37905. end;
  37906. procedure TUART2B_U2BSTA.setTRMT(thebits : TBits_1); inline;
  37907. begin
  37908. if thebits = 0 then
  37909. pTDefRegMap(@Self)^.clr := $00000100
  37910. else
  37911. pTDefRegMap(@Self)^.&set := $00000100;
  37912. end;
  37913. function TUART2B_U2BSTA.getTRMT : TBits_1; inline;
  37914. begin
  37915. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37916. end;
  37917. procedure TUART2B_U2BSTA.setUTXBF; inline;
  37918. begin
  37919. pTDefRegMap(@Self)^.&set := $00000200;
  37920. end;
  37921. procedure TUART2B_U2BSTA.clearUTXBF; inline;
  37922. begin
  37923. pTDefRegMap(@Self)^.clr := $00000200;
  37924. end;
  37925. procedure TUART2B_U2BSTA.setUTXBF(thebits : TBits_1); inline;
  37926. begin
  37927. if thebits = 0 then
  37928. pTDefRegMap(@Self)^.clr := $00000200
  37929. else
  37930. pTDefRegMap(@Self)^.&set := $00000200;
  37931. end;
  37932. function TUART2B_U2BSTA.getUTXBF : TBits_1; inline;
  37933. begin
  37934. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37935. end;
  37936. procedure TUART2B_U2BSTA.setUTXEN; inline;
  37937. begin
  37938. pTDefRegMap(@Self)^.&set := $00000400;
  37939. end;
  37940. procedure TUART2B_U2BSTA.clearUTXEN; inline;
  37941. begin
  37942. pTDefRegMap(@Self)^.clr := $00000400;
  37943. end;
  37944. procedure TUART2B_U2BSTA.setUTXEN(thebits : TBits_1); inline;
  37945. begin
  37946. if thebits = 0 then
  37947. pTDefRegMap(@Self)^.clr := $00000400
  37948. else
  37949. pTDefRegMap(@Self)^.&set := $00000400;
  37950. end;
  37951. function TUART2B_U2BSTA.getUTXEN : TBits_1; inline;
  37952. begin
  37953. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  37954. end;
  37955. procedure TUART2B_U2BSTA.setUTXBRK; inline;
  37956. begin
  37957. pTDefRegMap(@Self)^.&set := $00000800;
  37958. end;
  37959. procedure TUART2B_U2BSTA.clearUTXBRK; inline;
  37960. begin
  37961. pTDefRegMap(@Self)^.clr := $00000800;
  37962. end;
  37963. procedure TUART2B_U2BSTA.setUTXBRK(thebits : TBits_1); inline;
  37964. begin
  37965. if thebits = 0 then
  37966. pTDefRegMap(@Self)^.clr := $00000800
  37967. else
  37968. pTDefRegMap(@Self)^.&set := $00000800;
  37969. end;
  37970. function TUART2B_U2BSTA.getUTXBRK : TBits_1; inline;
  37971. begin
  37972. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37973. end;
  37974. procedure TUART2B_U2BSTA.setURXEN; inline;
  37975. begin
  37976. pTDefRegMap(@Self)^.&set := $00001000;
  37977. end;
  37978. procedure TUART2B_U2BSTA.clearURXEN; inline;
  37979. begin
  37980. pTDefRegMap(@Self)^.clr := $00001000;
  37981. end;
  37982. procedure TUART2B_U2BSTA.setURXEN(thebits : TBits_1); inline;
  37983. begin
  37984. if thebits = 0 then
  37985. pTDefRegMap(@Self)^.clr := $00001000
  37986. else
  37987. pTDefRegMap(@Self)^.&set := $00001000;
  37988. end;
  37989. function TUART2B_U2BSTA.getURXEN : TBits_1; inline;
  37990. begin
  37991. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37992. end;
  37993. procedure TUART2B_U2BSTA.setUTXINV; inline;
  37994. begin
  37995. pTDefRegMap(@Self)^.&set := $00002000;
  37996. end;
  37997. procedure TUART2B_U2BSTA.clearUTXINV; inline;
  37998. begin
  37999. pTDefRegMap(@Self)^.clr := $00002000;
  38000. end;
  38001. procedure TUART2B_U2BSTA.setUTXINV(thebits : TBits_1); inline;
  38002. begin
  38003. if thebits = 0 then
  38004. pTDefRegMap(@Self)^.clr := $00002000
  38005. else
  38006. pTDefRegMap(@Self)^.&set := $00002000;
  38007. end;
  38008. function TUART2B_U2BSTA.getUTXINV : TBits_1; inline;
  38009. begin
  38010. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38011. end;
  38012. procedure TUART2B_U2BSTA.setUTXISEL(thebits : TBits_2); inline;
  38013. begin
  38014. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  38015. end;
  38016. function TUART2B_U2BSTA.getUTXISEL : TBits_2; inline;
  38017. begin
  38018. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  38019. end;
  38020. procedure TUART2B_U2BSTA.setADDR(thebits : TBits_8); inline;
  38021. begin
  38022. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  38023. end;
  38024. function TUART2B_U2BSTA.getADDR : TBits_8; inline;
  38025. begin
  38026. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  38027. end;
  38028. procedure TUART2B_U2BSTA.setADM_EN; inline;
  38029. begin
  38030. pTDefRegMap(@Self)^.&set := $01000000;
  38031. end;
  38032. procedure TUART2B_U2BSTA.clearADM_EN; inline;
  38033. begin
  38034. pTDefRegMap(@Self)^.clr := $01000000;
  38035. end;
  38036. procedure TUART2B_U2BSTA.setADM_EN(thebits : TBits_1); inline;
  38037. begin
  38038. if thebits = 0 then
  38039. pTDefRegMap(@Self)^.clr := $01000000
  38040. else
  38041. pTDefRegMap(@Self)^.&set := $01000000;
  38042. end;
  38043. function TUART2B_U2BSTA.getADM_EN : TBits_1; inline;
  38044. begin
  38045. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  38046. end;
  38047. procedure TUART2B_U2BSTA.setURXISEL0; inline;
  38048. begin
  38049. pTDefRegMap(@Self)^.&set := $00000040;
  38050. end;
  38051. procedure TUART2B_U2BSTA.clearURXISEL0; inline;
  38052. begin
  38053. pTDefRegMap(@Self)^.clr := $00000040;
  38054. end;
  38055. procedure TUART2B_U2BSTA.setURXISEL0(thebits : TBits_1); inline;
  38056. begin
  38057. if thebits = 0 then
  38058. pTDefRegMap(@Self)^.clr := $00000040
  38059. else
  38060. pTDefRegMap(@Self)^.&set := $00000040;
  38061. end;
  38062. function TUART2B_U2BSTA.getURXISEL0 : TBits_1; inline;
  38063. begin
  38064. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38065. end;
  38066. procedure TUART2B_U2BSTA.setURXISEL1; inline;
  38067. begin
  38068. pTDefRegMap(@Self)^.&set := $00000080;
  38069. end;
  38070. procedure TUART2B_U2BSTA.clearURXISEL1; inline;
  38071. begin
  38072. pTDefRegMap(@Self)^.clr := $00000080;
  38073. end;
  38074. procedure TUART2B_U2BSTA.setURXISEL1(thebits : TBits_1); inline;
  38075. begin
  38076. if thebits = 0 then
  38077. pTDefRegMap(@Self)^.clr := $00000080
  38078. else
  38079. pTDefRegMap(@Self)^.&set := $00000080;
  38080. end;
  38081. function TUART2B_U2BSTA.getURXISEL1 : TBits_1; inline;
  38082. begin
  38083. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38084. end;
  38085. procedure TUART2B_U2BSTA.setUTXISEL0; inline;
  38086. begin
  38087. pTDefRegMap(@Self)^.&set := $00004000;
  38088. end;
  38089. procedure TUART2B_U2BSTA.clearUTXISEL0; inline;
  38090. begin
  38091. pTDefRegMap(@Self)^.clr := $00004000;
  38092. end;
  38093. procedure TUART2B_U2BSTA.setUTXISEL0(thebits : TBits_1); inline;
  38094. begin
  38095. if thebits = 0 then
  38096. pTDefRegMap(@Self)^.clr := $00004000
  38097. else
  38098. pTDefRegMap(@Self)^.&set := $00004000;
  38099. end;
  38100. function TUART2B_U2BSTA.getUTXISEL0 : TBits_1; inline;
  38101. begin
  38102. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  38103. end;
  38104. procedure TUART2B_U2BSTA.setUTXISEL1; inline;
  38105. begin
  38106. pTDefRegMap(@Self)^.&set := $00008000;
  38107. end;
  38108. procedure TUART2B_U2BSTA.clearUTXISEL1; inline;
  38109. begin
  38110. pTDefRegMap(@Self)^.clr := $00008000;
  38111. end;
  38112. procedure TUART2B_U2BSTA.setUTXISEL1(thebits : TBits_1); inline;
  38113. begin
  38114. if thebits = 0 then
  38115. pTDefRegMap(@Self)^.clr := $00008000
  38116. else
  38117. pTDefRegMap(@Self)^.&set := $00008000;
  38118. end;
  38119. function TUART2B_U2BSTA.getUTXISEL1 : TBits_1; inline;
  38120. begin
  38121. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38122. end;
  38123. procedure TUART2B_U2BSTA.setUTXSEL(thebits : TBits_2); inline;
  38124. begin
  38125. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  38126. end;
  38127. function TUART2B_U2BSTA.getUTXSEL : TBits_2; inline;
  38128. begin
  38129. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  38130. end;
  38131. procedure TUART2B_U2BSTA.setw(thebits : TBits_32); inline;
  38132. begin
  38133. pTDefRegMap(@Self)^.val := thebits;
  38134. end;
  38135. function TUART2B_U2BSTA.getw : TBits_32; inline;
  38136. begin
  38137. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38138. end;
  38139. procedure TUART2B_U6STA.setURXDA; inline;
  38140. begin
  38141. pTDefRegMap(@Self)^.&set := $00000001;
  38142. end;
  38143. procedure TUART2B_U6STA.clearURXDA; inline;
  38144. begin
  38145. pTDefRegMap(@Self)^.clr := $00000001;
  38146. end;
  38147. procedure TUART2B_U6STA.setURXDA(thebits : TBits_1); inline;
  38148. begin
  38149. if thebits = 0 then
  38150. pTDefRegMap(@Self)^.clr := $00000001
  38151. else
  38152. pTDefRegMap(@Self)^.&set := $00000001;
  38153. end;
  38154. function TUART2B_U6STA.getURXDA : TBits_1; inline;
  38155. begin
  38156. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38157. end;
  38158. procedure TUART2B_U6STA.setOERR; inline;
  38159. begin
  38160. pTDefRegMap(@Self)^.&set := $00000002;
  38161. end;
  38162. procedure TUART2B_U6STA.clearOERR; inline;
  38163. begin
  38164. pTDefRegMap(@Self)^.clr := $00000002;
  38165. end;
  38166. procedure TUART2B_U6STA.setOERR(thebits : TBits_1); inline;
  38167. begin
  38168. if thebits = 0 then
  38169. pTDefRegMap(@Self)^.clr := $00000002
  38170. else
  38171. pTDefRegMap(@Self)^.&set := $00000002;
  38172. end;
  38173. function TUART2B_U6STA.getOERR : TBits_1; inline;
  38174. begin
  38175. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38176. end;
  38177. procedure TUART2B_U6STA.setFERR; inline;
  38178. begin
  38179. pTDefRegMap(@Self)^.&set := $00000004;
  38180. end;
  38181. procedure TUART2B_U6STA.clearFERR; inline;
  38182. begin
  38183. pTDefRegMap(@Self)^.clr := $00000004;
  38184. end;
  38185. procedure TUART2B_U6STA.setFERR(thebits : TBits_1); inline;
  38186. begin
  38187. if thebits = 0 then
  38188. pTDefRegMap(@Self)^.clr := $00000004
  38189. else
  38190. pTDefRegMap(@Self)^.&set := $00000004;
  38191. end;
  38192. function TUART2B_U6STA.getFERR : TBits_1; inline;
  38193. begin
  38194. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38195. end;
  38196. procedure TUART2B_U6STA.setPERR; inline;
  38197. begin
  38198. pTDefRegMap(@Self)^.&set := $00000008;
  38199. end;
  38200. procedure TUART2B_U6STA.clearPERR; inline;
  38201. begin
  38202. pTDefRegMap(@Self)^.clr := $00000008;
  38203. end;
  38204. procedure TUART2B_U6STA.setPERR(thebits : TBits_1); inline;
  38205. begin
  38206. if thebits = 0 then
  38207. pTDefRegMap(@Self)^.clr := $00000008
  38208. else
  38209. pTDefRegMap(@Self)^.&set := $00000008;
  38210. end;
  38211. function TUART2B_U6STA.getPERR : TBits_1; inline;
  38212. begin
  38213. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38214. end;
  38215. procedure TUART2B_U6STA.setRIDLE; inline;
  38216. begin
  38217. pTDefRegMap(@Self)^.&set := $00000010;
  38218. end;
  38219. procedure TUART2B_U6STA.clearRIDLE; inline;
  38220. begin
  38221. pTDefRegMap(@Self)^.clr := $00000010;
  38222. end;
  38223. procedure TUART2B_U6STA.setRIDLE(thebits : TBits_1); inline;
  38224. begin
  38225. if thebits = 0 then
  38226. pTDefRegMap(@Self)^.clr := $00000010
  38227. else
  38228. pTDefRegMap(@Self)^.&set := $00000010;
  38229. end;
  38230. function TUART2B_U6STA.getRIDLE : TBits_1; inline;
  38231. begin
  38232. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38233. end;
  38234. procedure TUART2B_U6STA.setADDEN; inline;
  38235. begin
  38236. pTDefRegMap(@Self)^.&set := $00000020;
  38237. end;
  38238. procedure TUART2B_U6STA.clearADDEN; inline;
  38239. begin
  38240. pTDefRegMap(@Self)^.clr := $00000020;
  38241. end;
  38242. procedure TUART2B_U6STA.setADDEN(thebits : TBits_1); inline;
  38243. begin
  38244. if thebits = 0 then
  38245. pTDefRegMap(@Self)^.clr := $00000020
  38246. else
  38247. pTDefRegMap(@Self)^.&set := $00000020;
  38248. end;
  38249. function TUART2B_U6STA.getADDEN : TBits_1; inline;
  38250. begin
  38251. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38252. end;
  38253. procedure TUART2B_U6STA.setURXISEL(thebits : TBits_2); inline;
  38254. begin
  38255. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  38256. end;
  38257. function TUART2B_U6STA.getURXISEL : TBits_2; inline;
  38258. begin
  38259. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  38260. end;
  38261. procedure TUART2B_U6STA.setTRMT; inline;
  38262. begin
  38263. pTDefRegMap(@Self)^.&set := $00000100;
  38264. end;
  38265. procedure TUART2B_U6STA.clearTRMT; inline;
  38266. begin
  38267. pTDefRegMap(@Self)^.clr := $00000100;
  38268. end;
  38269. procedure TUART2B_U6STA.setTRMT(thebits : TBits_1); inline;
  38270. begin
  38271. if thebits = 0 then
  38272. pTDefRegMap(@Self)^.clr := $00000100
  38273. else
  38274. pTDefRegMap(@Self)^.&set := $00000100;
  38275. end;
  38276. function TUART2B_U6STA.getTRMT : TBits_1; inline;
  38277. begin
  38278. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38279. end;
  38280. procedure TUART2B_U6STA.setUTXBF; inline;
  38281. begin
  38282. pTDefRegMap(@Self)^.&set := $00000200;
  38283. end;
  38284. procedure TUART2B_U6STA.clearUTXBF; inline;
  38285. begin
  38286. pTDefRegMap(@Self)^.clr := $00000200;
  38287. end;
  38288. procedure TUART2B_U6STA.setUTXBF(thebits : TBits_1); inline;
  38289. begin
  38290. if thebits = 0 then
  38291. pTDefRegMap(@Self)^.clr := $00000200
  38292. else
  38293. pTDefRegMap(@Self)^.&set := $00000200;
  38294. end;
  38295. function TUART2B_U6STA.getUTXBF : TBits_1; inline;
  38296. begin
  38297. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38298. end;
  38299. procedure TUART2B_U6STA.setUTXEN; inline;
  38300. begin
  38301. pTDefRegMap(@Self)^.&set := $00000400;
  38302. end;
  38303. procedure TUART2B_U6STA.clearUTXEN; inline;
  38304. begin
  38305. pTDefRegMap(@Self)^.clr := $00000400;
  38306. end;
  38307. procedure TUART2B_U6STA.setUTXEN(thebits : TBits_1); inline;
  38308. begin
  38309. if thebits = 0 then
  38310. pTDefRegMap(@Self)^.clr := $00000400
  38311. else
  38312. pTDefRegMap(@Self)^.&set := $00000400;
  38313. end;
  38314. function TUART2B_U6STA.getUTXEN : TBits_1; inline;
  38315. begin
  38316. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38317. end;
  38318. procedure TUART2B_U6STA.setUTXBRK; inline;
  38319. begin
  38320. pTDefRegMap(@Self)^.&set := $00000800;
  38321. end;
  38322. procedure TUART2B_U6STA.clearUTXBRK; inline;
  38323. begin
  38324. pTDefRegMap(@Self)^.clr := $00000800;
  38325. end;
  38326. procedure TUART2B_U6STA.setUTXBRK(thebits : TBits_1); inline;
  38327. begin
  38328. if thebits = 0 then
  38329. pTDefRegMap(@Self)^.clr := $00000800
  38330. else
  38331. pTDefRegMap(@Self)^.&set := $00000800;
  38332. end;
  38333. function TUART2B_U6STA.getUTXBRK : TBits_1; inline;
  38334. begin
  38335. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38336. end;
  38337. procedure TUART2B_U6STA.setURXEN; inline;
  38338. begin
  38339. pTDefRegMap(@Self)^.&set := $00001000;
  38340. end;
  38341. procedure TUART2B_U6STA.clearURXEN; inline;
  38342. begin
  38343. pTDefRegMap(@Self)^.clr := $00001000;
  38344. end;
  38345. procedure TUART2B_U6STA.setURXEN(thebits : TBits_1); inline;
  38346. begin
  38347. if thebits = 0 then
  38348. pTDefRegMap(@Self)^.clr := $00001000
  38349. else
  38350. pTDefRegMap(@Self)^.&set := $00001000;
  38351. end;
  38352. function TUART2B_U6STA.getURXEN : TBits_1; inline;
  38353. begin
  38354. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38355. end;
  38356. procedure TUART2B_U6STA.setUTXINV; inline;
  38357. begin
  38358. pTDefRegMap(@Self)^.&set := $00002000;
  38359. end;
  38360. procedure TUART2B_U6STA.clearUTXINV; inline;
  38361. begin
  38362. pTDefRegMap(@Self)^.clr := $00002000;
  38363. end;
  38364. procedure TUART2B_U6STA.setUTXINV(thebits : TBits_1); inline;
  38365. begin
  38366. if thebits = 0 then
  38367. pTDefRegMap(@Self)^.clr := $00002000
  38368. else
  38369. pTDefRegMap(@Self)^.&set := $00002000;
  38370. end;
  38371. function TUART2B_U6STA.getUTXINV : TBits_1; inline;
  38372. begin
  38373. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38374. end;
  38375. procedure TUART2B_U6STA.setUTXISEL(thebits : TBits_2); inline;
  38376. begin
  38377. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  38378. end;
  38379. function TUART2B_U6STA.getUTXISEL : TBits_2; inline;
  38380. begin
  38381. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  38382. end;
  38383. procedure TUART2B_U6STA.setADDR(thebits : TBits_8); inline;
  38384. begin
  38385. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  38386. end;
  38387. function TUART2B_U6STA.getADDR : TBits_8; inline;
  38388. begin
  38389. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  38390. end;
  38391. procedure TUART2B_U6STA.setADM_EN; inline;
  38392. begin
  38393. pTDefRegMap(@Self)^.&set := $01000000;
  38394. end;
  38395. procedure TUART2B_U6STA.clearADM_EN; inline;
  38396. begin
  38397. pTDefRegMap(@Self)^.clr := $01000000;
  38398. end;
  38399. procedure TUART2B_U6STA.setADM_EN(thebits : TBits_1); inline;
  38400. begin
  38401. if thebits = 0 then
  38402. pTDefRegMap(@Self)^.clr := $01000000
  38403. else
  38404. pTDefRegMap(@Self)^.&set := $01000000;
  38405. end;
  38406. function TUART2B_U6STA.getADM_EN : TBits_1; inline;
  38407. begin
  38408. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  38409. end;
  38410. procedure TUART2B_U6STA.setURXISEL0; inline;
  38411. begin
  38412. pTDefRegMap(@Self)^.&set := $00000040;
  38413. end;
  38414. procedure TUART2B_U6STA.clearURXISEL0; inline;
  38415. begin
  38416. pTDefRegMap(@Self)^.clr := $00000040;
  38417. end;
  38418. procedure TUART2B_U6STA.setURXISEL0(thebits : TBits_1); inline;
  38419. begin
  38420. if thebits = 0 then
  38421. pTDefRegMap(@Self)^.clr := $00000040
  38422. else
  38423. pTDefRegMap(@Self)^.&set := $00000040;
  38424. end;
  38425. function TUART2B_U6STA.getURXISEL0 : TBits_1; inline;
  38426. begin
  38427. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38428. end;
  38429. procedure TUART2B_U6STA.setURXISEL1; inline;
  38430. begin
  38431. pTDefRegMap(@Self)^.&set := $00000080;
  38432. end;
  38433. procedure TUART2B_U6STA.clearURXISEL1; inline;
  38434. begin
  38435. pTDefRegMap(@Self)^.clr := $00000080;
  38436. end;
  38437. procedure TUART2B_U6STA.setURXISEL1(thebits : TBits_1); inline;
  38438. begin
  38439. if thebits = 0 then
  38440. pTDefRegMap(@Self)^.clr := $00000080
  38441. else
  38442. pTDefRegMap(@Self)^.&set := $00000080;
  38443. end;
  38444. function TUART2B_U6STA.getURXISEL1 : TBits_1; inline;
  38445. begin
  38446. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38447. end;
  38448. procedure TUART2B_U6STA.setUTXISEL0; inline;
  38449. begin
  38450. pTDefRegMap(@Self)^.&set := $00004000;
  38451. end;
  38452. procedure TUART2B_U6STA.clearUTXISEL0; inline;
  38453. begin
  38454. pTDefRegMap(@Self)^.clr := $00004000;
  38455. end;
  38456. procedure TUART2B_U6STA.setUTXISEL0(thebits : TBits_1); inline;
  38457. begin
  38458. if thebits = 0 then
  38459. pTDefRegMap(@Self)^.clr := $00004000
  38460. else
  38461. pTDefRegMap(@Self)^.&set := $00004000;
  38462. end;
  38463. function TUART2B_U6STA.getUTXISEL0 : TBits_1; inline;
  38464. begin
  38465. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  38466. end;
  38467. procedure TUART2B_U6STA.setUTXISEL1; inline;
  38468. begin
  38469. pTDefRegMap(@Self)^.&set := $00008000;
  38470. end;
  38471. procedure TUART2B_U6STA.clearUTXISEL1; inline;
  38472. begin
  38473. pTDefRegMap(@Self)^.clr := $00008000;
  38474. end;
  38475. procedure TUART2B_U6STA.setUTXISEL1(thebits : TBits_1); inline;
  38476. begin
  38477. if thebits = 0 then
  38478. pTDefRegMap(@Self)^.clr := $00008000
  38479. else
  38480. pTDefRegMap(@Self)^.&set := $00008000;
  38481. end;
  38482. function TUART2B_U6STA.getUTXISEL1 : TBits_1; inline;
  38483. begin
  38484. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38485. end;
  38486. procedure TUART2B_U6STA.setUTXSEL(thebits : TBits_2); inline;
  38487. begin
  38488. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  38489. end;
  38490. function TUART2B_U6STA.getUTXSEL : TBits_2; inline;
  38491. begin
  38492. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  38493. end;
  38494. procedure TUART2B_U6STA.setw(thebits : TBits_32); inline;
  38495. begin
  38496. pTDefRegMap(@Self)^.val := thebits;
  38497. end;
  38498. function TUART2B_U6STA.getw : TBits_32; inline;
  38499. begin
  38500. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38501. end;
  38502. procedure TUART3A_U2MODE.setSTSEL; inline;
  38503. begin
  38504. pTDefRegMap(@Self)^.&set := $00000001;
  38505. end;
  38506. procedure TUART3A_U2MODE.clearSTSEL; inline;
  38507. begin
  38508. pTDefRegMap(@Self)^.clr := $00000001;
  38509. end;
  38510. procedure TUART3A_U2MODE.setSTSEL(thebits : TBits_1); inline;
  38511. begin
  38512. if thebits = 0 then
  38513. pTDefRegMap(@Self)^.clr := $00000001
  38514. else
  38515. pTDefRegMap(@Self)^.&set := $00000001;
  38516. end;
  38517. function TUART3A_U2MODE.getSTSEL : TBits_1; inline;
  38518. begin
  38519. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38520. end;
  38521. procedure TUART3A_U2MODE.setPDSEL(thebits : TBits_2); inline;
  38522. begin
  38523. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  38524. end;
  38525. function TUART3A_U2MODE.getPDSEL : TBits_2; inline;
  38526. begin
  38527. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  38528. end;
  38529. procedure TUART3A_U2MODE.setBRGH; inline;
  38530. begin
  38531. pTDefRegMap(@Self)^.&set := $00000008;
  38532. end;
  38533. procedure TUART3A_U2MODE.clearBRGH; inline;
  38534. begin
  38535. pTDefRegMap(@Self)^.clr := $00000008;
  38536. end;
  38537. procedure TUART3A_U2MODE.setBRGH(thebits : TBits_1); inline;
  38538. begin
  38539. if thebits = 0 then
  38540. pTDefRegMap(@Self)^.clr := $00000008
  38541. else
  38542. pTDefRegMap(@Self)^.&set := $00000008;
  38543. end;
  38544. function TUART3A_U2MODE.getBRGH : TBits_1; inline;
  38545. begin
  38546. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38547. end;
  38548. procedure TUART3A_U2MODE.setRXINV; inline;
  38549. begin
  38550. pTDefRegMap(@Self)^.&set := $00000010;
  38551. end;
  38552. procedure TUART3A_U2MODE.clearRXINV; inline;
  38553. begin
  38554. pTDefRegMap(@Self)^.clr := $00000010;
  38555. end;
  38556. procedure TUART3A_U2MODE.setRXINV(thebits : TBits_1); inline;
  38557. begin
  38558. if thebits = 0 then
  38559. pTDefRegMap(@Self)^.clr := $00000010
  38560. else
  38561. pTDefRegMap(@Self)^.&set := $00000010;
  38562. end;
  38563. function TUART3A_U2MODE.getRXINV : TBits_1; inline;
  38564. begin
  38565. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38566. end;
  38567. procedure TUART3A_U2MODE.setABAUD; inline;
  38568. begin
  38569. pTDefRegMap(@Self)^.&set := $00000020;
  38570. end;
  38571. procedure TUART3A_U2MODE.clearABAUD; inline;
  38572. begin
  38573. pTDefRegMap(@Self)^.clr := $00000020;
  38574. end;
  38575. procedure TUART3A_U2MODE.setABAUD(thebits : TBits_1); inline;
  38576. begin
  38577. if thebits = 0 then
  38578. pTDefRegMap(@Self)^.clr := $00000020
  38579. else
  38580. pTDefRegMap(@Self)^.&set := $00000020;
  38581. end;
  38582. function TUART3A_U2MODE.getABAUD : TBits_1; inline;
  38583. begin
  38584. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38585. end;
  38586. procedure TUART3A_U2MODE.setLPBACK; inline;
  38587. begin
  38588. pTDefRegMap(@Self)^.&set := $00000040;
  38589. end;
  38590. procedure TUART3A_U2MODE.clearLPBACK; inline;
  38591. begin
  38592. pTDefRegMap(@Self)^.clr := $00000040;
  38593. end;
  38594. procedure TUART3A_U2MODE.setLPBACK(thebits : TBits_1); inline;
  38595. begin
  38596. if thebits = 0 then
  38597. pTDefRegMap(@Self)^.clr := $00000040
  38598. else
  38599. pTDefRegMap(@Self)^.&set := $00000040;
  38600. end;
  38601. function TUART3A_U2MODE.getLPBACK : TBits_1; inline;
  38602. begin
  38603. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38604. end;
  38605. procedure TUART3A_U2MODE.setWAKE; inline;
  38606. begin
  38607. pTDefRegMap(@Self)^.&set := $00000080;
  38608. end;
  38609. procedure TUART3A_U2MODE.clearWAKE; inline;
  38610. begin
  38611. pTDefRegMap(@Self)^.clr := $00000080;
  38612. end;
  38613. procedure TUART3A_U2MODE.setWAKE(thebits : TBits_1); inline;
  38614. begin
  38615. if thebits = 0 then
  38616. pTDefRegMap(@Self)^.clr := $00000080
  38617. else
  38618. pTDefRegMap(@Self)^.&set := $00000080;
  38619. end;
  38620. function TUART3A_U2MODE.getWAKE : TBits_1; inline;
  38621. begin
  38622. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38623. end;
  38624. procedure TUART3A_U2MODE.setUEN(thebits : TBits_2); inline;
  38625. begin
  38626. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  38627. end;
  38628. function TUART3A_U2MODE.getUEN : TBits_2; inline;
  38629. begin
  38630. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  38631. end;
  38632. procedure TUART3A_U2MODE.setRTSMD; inline;
  38633. begin
  38634. pTDefRegMap(@Self)^.&set := $00000800;
  38635. end;
  38636. procedure TUART3A_U2MODE.clearRTSMD; inline;
  38637. begin
  38638. pTDefRegMap(@Self)^.clr := $00000800;
  38639. end;
  38640. procedure TUART3A_U2MODE.setRTSMD(thebits : TBits_1); inline;
  38641. begin
  38642. if thebits = 0 then
  38643. pTDefRegMap(@Self)^.clr := $00000800
  38644. else
  38645. pTDefRegMap(@Self)^.&set := $00000800;
  38646. end;
  38647. function TUART3A_U2MODE.getRTSMD : TBits_1; inline;
  38648. begin
  38649. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38650. end;
  38651. procedure TUART3A_U2MODE.setIREN; inline;
  38652. begin
  38653. pTDefRegMap(@Self)^.&set := $00001000;
  38654. end;
  38655. procedure TUART3A_U2MODE.clearIREN; inline;
  38656. begin
  38657. pTDefRegMap(@Self)^.clr := $00001000;
  38658. end;
  38659. procedure TUART3A_U2MODE.setIREN(thebits : TBits_1); inline;
  38660. begin
  38661. if thebits = 0 then
  38662. pTDefRegMap(@Self)^.clr := $00001000
  38663. else
  38664. pTDefRegMap(@Self)^.&set := $00001000;
  38665. end;
  38666. function TUART3A_U2MODE.getIREN : TBits_1; inline;
  38667. begin
  38668. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38669. end;
  38670. procedure TUART3A_U2MODE.setSIDL; inline;
  38671. begin
  38672. pTDefRegMap(@Self)^.&set := $00002000;
  38673. end;
  38674. procedure TUART3A_U2MODE.clearSIDL; inline;
  38675. begin
  38676. pTDefRegMap(@Self)^.clr := $00002000;
  38677. end;
  38678. procedure TUART3A_U2MODE.setSIDL(thebits : TBits_1); inline;
  38679. begin
  38680. if thebits = 0 then
  38681. pTDefRegMap(@Self)^.clr := $00002000
  38682. else
  38683. pTDefRegMap(@Self)^.&set := $00002000;
  38684. end;
  38685. function TUART3A_U2MODE.getSIDL : TBits_1; inline;
  38686. begin
  38687. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38688. end;
  38689. procedure TUART3A_U2MODE.setON; inline;
  38690. begin
  38691. pTDefRegMap(@Self)^.&set := $00008000;
  38692. end;
  38693. procedure TUART3A_U2MODE.clearON; inline;
  38694. begin
  38695. pTDefRegMap(@Self)^.clr := $00008000;
  38696. end;
  38697. procedure TUART3A_U2MODE.setON(thebits : TBits_1); inline;
  38698. begin
  38699. if thebits = 0 then
  38700. pTDefRegMap(@Self)^.clr := $00008000
  38701. else
  38702. pTDefRegMap(@Self)^.&set := $00008000;
  38703. end;
  38704. function TUART3A_U2MODE.getON : TBits_1; inline;
  38705. begin
  38706. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38707. end;
  38708. procedure TUART3A_U2MODE.setPDSEL0; inline;
  38709. begin
  38710. pTDefRegMap(@Self)^.&set := $00000002;
  38711. end;
  38712. procedure TUART3A_U2MODE.clearPDSEL0; inline;
  38713. begin
  38714. pTDefRegMap(@Self)^.clr := $00000002;
  38715. end;
  38716. procedure TUART3A_U2MODE.setPDSEL0(thebits : TBits_1); inline;
  38717. begin
  38718. if thebits = 0 then
  38719. pTDefRegMap(@Self)^.clr := $00000002
  38720. else
  38721. pTDefRegMap(@Self)^.&set := $00000002;
  38722. end;
  38723. function TUART3A_U2MODE.getPDSEL0 : TBits_1; inline;
  38724. begin
  38725. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38726. end;
  38727. procedure TUART3A_U2MODE.setPDSEL1; inline;
  38728. begin
  38729. pTDefRegMap(@Self)^.&set := $00000004;
  38730. end;
  38731. procedure TUART3A_U2MODE.clearPDSEL1; inline;
  38732. begin
  38733. pTDefRegMap(@Self)^.clr := $00000004;
  38734. end;
  38735. procedure TUART3A_U2MODE.setPDSEL1(thebits : TBits_1); inline;
  38736. begin
  38737. if thebits = 0 then
  38738. pTDefRegMap(@Self)^.clr := $00000004
  38739. else
  38740. pTDefRegMap(@Self)^.&set := $00000004;
  38741. end;
  38742. function TUART3A_U2MODE.getPDSEL1 : TBits_1; inline;
  38743. begin
  38744. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38745. end;
  38746. procedure TUART3A_U2MODE.setUEN0; inline;
  38747. begin
  38748. pTDefRegMap(@Self)^.&set := $00000100;
  38749. end;
  38750. procedure TUART3A_U2MODE.clearUEN0; inline;
  38751. begin
  38752. pTDefRegMap(@Self)^.clr := $00000100;
  38753. end;
  38754. procedure TUART3A_U2MODE.setUEN0(thebits : TBits_1); inline;
  38755. begin
  38756. if thebits = 0 then
  38757. pTDefRegMap(@Self)^.clr := $00000100
  38758. else
  38759. pTDefRegMap(@Self)^.&set := $00000100;
  38760. end;
  38761. function TUART3A_U2MODE.getUEN0 : TBits_1; inline;
  38762. begin
  38763. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38764. end;
  38765. procedure TUART3A_U2MODE.setUEN1; inline;
  38766. begin
  38767. pTDefRegMap(@Self)^.&set := $00000200;
  38768. end;
  38769. procedure TUART3A_U2MODE.clearUEN1; inline;
  38770. begin
  38771. pTDefRegMap(@Self)^.clr := $00000200;
  38772. end;
  38773. procedure TUART3A_U2MODE.setUEN1(thebits : TBits_1); inline;
  38774. begin
  38775. if thebits = 0 then
  38776. pTDefRegMap(@Self)^.clr := $00000200
  38777. else
  38778. pTDefRegMap(@Self)^.&set := $00000200;
  38779. end;
  38780. function TUART3A_U2MODE.getUEN1 : TBits_1; inline;
  38781. begin
  38782. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38783. end;
  38784. procedure TUART3A_U2MODE.setUSIDL; inline;
  38785. begin
  38786. pTDefRegMap(@Self)^.&set := $00002000;
  38787. end;
  38788. procedure TUART3A_U2MODE.clearUSIDL; inline;
  38789. begin
  38790. pTDefRegMap(@Self)^.clr := $00002000;
  38791. end;
  38792. procedure TUART3A_U2MODE.setUSIDL(thebits : TBits_1); inline;
  38793. begin
  38794. if thebits = 0 then
  38795. pTDefRegMap(@Self)^.clr := $00002000
  38796. else
  38797. pTDefRegMap(@Self)^.&set := $00002000;
  38798. end;
  38799. function TUART3A_U2MODE.getUSIDL : TBits_1; inline;
  38800. begin
  38801. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38802. end;
  38803. procedure TUART3A_U2MODE.setUARTEN; inline;
  38804. begin
  38805. pTDefRegMap(@Self)^.&set := $00008000;
  38806. end;
  38807. procedure TUART3A_U2MODE.clearUARTEN; inline;
  38808. begin
  38809. pTDefRegMap(@Self)^.clr := $00008000;
  38810. end;
  38811. procedure TUART3A_U2MODE.setUARTEN(thebits : TBits_1); inline;
  38812. begin
  38813. if thebits = 0 then
  38814. pTDefRegMap(@Self)^.clr := $00008000
  38815. else
  38816. pTDefRegMap(@Self)^.&set := $00008000;
  38817. end;
  38818. function TUART3A_U2MODE.getUARTEN : TBits_1; inline;
  38819. begin
  38820. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38821. end;
  38822. procedure TUART3A_U2MODE.setw(thebits : TBits_32); inline;
  38823. begin
  38824. pTDefRegMap(@Self)^.val := thebits;
  38825. end;
  38826. function TUART3A_U2MODE.getw : TBits_32; inline;
  38827. begin
  38828. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38829. end;
  38830. procedure TUART3A_U3AMODE.setSTSEL; inline;
  38831. begin
  38832. pTDefRegMap(@Self)^.&set := $00000001;
  38833. end;
  38834. procedure TUART3A_U3AMODE.clearSTSEL; inline;
  38835. begin
  38836. pTDefRegMap(@Self)^.clr := $00000001;
  38837. end;
  38838. procedure TUART3A_U3AMODE.setSTSEL(thebits : TBits_1); inline;
  38839. begin
  38840. if thebits = 0 then
  38841. pTDefRegMap(@Self)^.clr := $00000001
  38842. else
  38843. pTDefRegMap(@Self)^.&set := $00000001;
  38844. end;
  38845. function TUART3A_U3AMODE.getSTSEL : TBits_1; inline;
  38846. begin
  38847. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38848. end;
  38849. procedure TUART3A_U3AMODE.setPDSEL(thebits : TBits_2); inline;
  38850. begin
  38851. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  38852. end;
  38853. function TUART3A_U3AMODE.getPDSEL : TBits_2; inline;
  38854. begin
  38855. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  38856. end;
  38857. procedure TUART3A_U3AMODE.setBRGH; inline;
  38858. begin
  38859. pTDefRegMap(@Self)^.&set := $00000008;
  38860. end;
  38861. procedure TUART3A_U3AMODE.clearBRGH; inline;
  38862. begin
  38863. pTDefRegMap(@Self)^.clr := $00000008;
  38864. end;
  38865. procedure TUART3A_U3AMODE.setBRGH(thebits : TBits_1); inline;
  38866. begin
  38867. if thebits = 0 then
  38868. pTDefRegMap(@Self)^.clr := $00000008
  38869. else
  38870. pTDefRegMap(@Self)^.&set := $00000008;
  38871. end;
  38872. function TUART3A_U3AMODE.getBRGH : TBits_1; inline;
  38873. begin
  38874. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38875. end;
  38876. procedure TUART3A_U3AMODE.setRXINV; inline;
  38877. begin
  38878. pTDefRegMap(@Self)^.&set := $00000010;
  38879. end;
  38880. procedure TUART3A_U3AMODE.clearRXINV; inline;
  38881. begin
  38882. pTDefRegMap(@Self)^.clr := $00000010;
  38883. end;
  38884. procedure TUART3A_U3AMODE.setRXINV(thebits : TBits_1); inline;
  38885. begin
  38886. if thebits = 0 then
  38887. pTDefRegMap(@Self)^.clr := $00000010
  38888. else
  38889. pTDefRegMap(@Self)^.&set := $00000010;
  38890. end;
  38891. function TUART3A_U3AMODE.getRXINV : TBits_1; inline;
  38892. begin
  38893. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38894. end;
  38895. procedure TUART3A_U3AMODE.setABAUD; inline;
  38896. begin
  38897. pTDefRegMap(@Self)^.&set := $00000020;
  38898. end;
  38899. procedure TUART3A_U3AMODE.clearABAUD; inline;
  38900. begin
  38901. pTDefRegMap(@Self)^.clr := $00000020;
  38902. end;
  38903. procedure TUART3A_U3AMODE.setABAUD(thebits : TBits_1); inline;
  38904. begin
  38905. if thebits = 0 then
  38906. pTDefRegMap(@Self)^.clr := $00000020
  38907. else
  38908. pTDefRegMap(@Self)^.&set := $00000020;
  38909. end;
  38910. function TUART3A_U3AMODE.getABAUD : TBits_1; inline;
  38911. begin
  38912. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38913. end;
  38914. procedure TUART3A_U3AMODE.setLPBACK; inline;
  38915. begin
  38916. pTDefRegMap(@Self)^.&set := $00000040;
  38917. end;
  38918. procedure TUART3A_U3AMODE.clearLPBACK; inline;
  38919. begin
  38920. pTDefRegMap(@Self)^.clr := $00000040;
  38921. end;
  38922. procedure TUART3A_U3AMODE.setLPBACK(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 TUART3A_U3AMODE.getLPBACK : TBits_1; inline;
  38930. begin
  38931. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38932. end;
  38933. procedure TUART3A_U3AMODE.setWAKE; inline;
  38934. begin
  38935. pTDefRegMap(@Self)^.&set := $00000080;
  38936. end;
  38937. procedure TUART3A_U3AMODE.clearWAKE; inline;
  38938. begin
  38939. pTDefRegMap(@Self)^.clr := $00000080;
  38940. end;
  38941. procedure TUART3A_U3AMODE.setWAKE(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 TUART3A_U3AMODE.getWAKE : TBits_1; inline;
  38949. begin
  38950. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38951. end;
  38952. procedure TUART3A_U3AMODE.setUEN(thebits : TBits_2); inline;
  38953. begin
  38954. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  38955. end;
  38956. function TUART3A_U3AMODE.getUEN : TBits_2; inline;
  38957. begin
  38958. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  38959. end;
  38960. procedure TUART3A_U3AMODE.setRTSMD; inline;
  38961. begin
  38962. pTDefRegMap(@Self)^.&set := $00000800;
  38963. end;
  38964. procedure TUART3A_U3AMODE.clearRTSMD; inline;
  38965. begin
  38966. pTDefRegMap(@Self)^.clr := $00000800;
  38967. end;
  38968. procedure TUART3A_U3AMODE.setRTSMD(thebits : TBits_1); inline;
  38969. begin
  38970. if thebits = 0 then
  38971. pTDefRegMap(@Self)^.clr := $00000800
  38972. else
  38973. pTDefRegMap(@Self)^.&set := $00000800;
  38974. end;
  38975. function TUART3A_U3AMODE.getRTSMD : TBits_1; inline;
  38976. begin
  38977. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38978. end;
  38979. procedure TUART3A_U3AMODE.setIREN; inline;
  38980. begin
  38981. pTDefRegMap(@Self)^.&set := $00001000;
  38982. end;
  38983. procedure TUART3A_U3AMODE.clearIREN; inline;
  38984. begin
  38985. pTDefRegMap(@Self)^.clr := $00001000;
  38986. end;
  38987. procedure TUART3A_U3AMODE.setIREN(thebits : TBits_1); inline;
  38988. begin
  38989. if thebits = 0 then
  38990. pTDefRegMap(@Self)^.clr := $00001000
  38991. else
  38992. pTDefRegMap(@Self)^.&set := $00001000;
  38993. end;
  38994. function TUART3A_U3AMODE.getIREN : TBits_1; inline;
  38995. begin
  38996. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38997. end;
  38998. procedure TUART3A_U3AMODE.setSIDL; inline;
  38999. begin
  39000. pTDefRegMap(@Self)^.&set := $00002000;
  39001. end;
  39002. procedure TUART3A_U3AMODE.clearSIDL; inline;
  39003. begin
  39004. pTDefRegMap(@Self)^.clr := $00002000;
  39005. end;
  39006. procedure TUART3A_U3AMODE.setSIDL(thebits : TBits_1); inline;
  39007. begin
  39008. if thebits = 0 then
  39009. pTDefRegMap(@Self)^.clr := $00002000
  39010. else
  39011. pTDefRegMap(@Self)^.&set := $00002000;
  39012. end;
  39013. function TUART3A_U3AMODE.getSIDL : TBits_1; inline;
  39014. begin
  39015. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39016. end;
  39017. procedure TUART3A_U3AMODE.setON; inline;
  39018. begin
  39019. pTDefRegMap(@Self)^.&set := $00008000;
  39020. end;
  39021. procedure TUART3A_U3AMODE.clearON; inline;
  39022. begin
  39023. pTDefRegMap(@Self)^.clr := $00008000;
  39024. end;
  39025. procedure TUART3A_U3AMODE.setON(thebits : TBits_1); inline;
  39026. begin
  39027. if thebits = 0 then
  39028. pTDefRegMap(@Self)^.clr := $00008000
  39029. else
  39030. pTDefRegMap(@Self)^.&set := $00008000;
  39031. end;
  39032. function TUART3A_U3AMODE.getON : TBits_1; inline;
  39033. begin
  39034. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39035. end;
  39036. procedure TUART3A_U3AMODE.setPDSEL0; inline;
  39037. begin
  39038. pTDefRegMap(@Self)^.&set := $00000002;
  39039. end;
  39040. procedure TUART3A_U3AMODE.clearPDSEL0; inline;
  39041. begin
  39042. pTDefRegMap(@Self)^.clr := $00000002;
  39043. end;
  39044. procedure TUART3A_U3AMODE.setPDSEL0(thebits : TBits_1); inline;
  39045. begin
  39046. if thebits = 0 then
  39047. pTDefRegMap(@Self)^.clr := $00000002
  39048. else
  39049. pTDefRegMap(@Self)^.&set := $00000002;
  39050. end;
  39051. function TUART3A_U3AMODE.getPDSEL0 : TBits_1; inline;
  39052. begin
  39053. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39054. end;
  39055. procedure TUART3A_U3AMODE.setPDSEL1; inline;
  39056. begin
  39057. pTDefRegMap(@Self)^.&set := $00000004;
  39058. end;
  39059. procedure TUART3A_U3AMODE.clearPDSEL1; inline;
  39060. begin
  39061. pTDefRegMap(@Self)^.clr := $00000004;
  39062. end;
  39063. procedure TUART3A_U3AMODE.setPDSEL1(thebits : TBits_1); inline;
  39064. begin
  39065. if thebits = 0 then
  39066. pTDefRegMap(@Self)^.clr := $00000004
  39067. else
  39068. pTDefRegMap(@Self)^.&set := $00000004;
  39069. end;
  39070. function TUART3A_U3AMODE.getPDSEL1 : TBits_1; inline;
  39071. begin
  39072. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39073. end;
  39074. procedure TUART3A_U3AMODE.setUEN0; inline;
  39075. begin
  39076. pTDefRegMap(@Self)^.&set := $00000100;
  39077. end;
  39078. procedure TUART3A_U3AMODE.clearUEN0; inline;
  39079. begin
  39080. pTDefRegMap(@Self)^.clr := $00000100;
  39081. end;
  39082. procedure TUART3A_U3AMODE.setUEN0(thebits : TBits_1); inline;
  39083. begin
  39084. if thebits = 0 then
  39085. pTDefRegMap(@Self)^.clr := $00000100
  39086. else
  39087. pTDefRegMap(@Self)^.&set := $00000100;
  39088. end;
  39089. function TUART3A_U3AMODE.getUEN0 : TBits_1; inline;
  39090. begin
  39091. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39092. end;
  39093. procedure TUART3A_U3AMODE.setUEN1; inline;
  39094. begin
  39095. pTDefRegMap(@Self)^.&set := $00000200;
  39096. end;
  39097. procedure TUART3A_U3AMODE.clearUEN1; inline;
  39098. begin
  39099. pTDefRegMap(@Self)^.clr := $00000200;
  39100. end;
  39101. procedure TUART3A_U3AMODE.setUEN1(thebits : TBits_1); inline;
  39102. begin
  39103. if thebits = 0 then
  39104. pTDefRegMap(@Self)^.clr := $00000200
  39105. else
  39106. pTDefRegMap(@Self)^.&set := $00000200;
  39107. end;
  39108. function TUART3A_U3AMODE.getUEN1 : TBits_1; inline;
  39109. begin
  39110. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39111. end;
  39112. procedure TUART3A_U3AMODE.setUSIDL; inline;
  39113. begin
  39114. pTDefRegMap(@Self)^.&set := $00002000;
  39115. end;
  39116. procedure TUART3A_U3AMODE.clearUSIDL; inline;
  39117. begin
  39118. pTDefRegMap(@Self)^.clr := $00002000;
  39119. end;
  39120. procedure TUART3A_U3AMODE.setUSIDL(thebits : TBits_1); inline;
  39121. begin
  39122. if thebits = 0 then
  39123. pTDefRegMap(@Self)^.clr := $00002000
  39124. else
  39125. pTDefRegMap(@Self)^.&set := $00002000;
  39126. end;
  39127. function TUART3A_U3AMODE.getUSIDL : TBits_1; inline;
  39128. begin
  39129. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39130. end;
  39131. procedure TUART3A_U3AMODE.setUARTEN; inline;
  39132. begin
  39133. pTDefRegMap(@Self)^.&set := $00008000;
  39134. end;
  39135. procedure TUART3A_U3AMODE.clearUARTEN; inline;
  39136. begin
  39137. pTDefRegMap(@Self)^.clr := $00008000;
  39138. end;
  39139. procedure TUART3A_U3AMODE.setUARTEN(thebits : TBits_1); inline;
  39140. begin
  39141. if thebits = 0 then
  39142. pTDefRegMap(@Self)^.clr := $00008000
  39143. else
  39144. pTDefRegMap(@Self)^.&set := $00008000;
  39145. end;
  39146. function TUART3A_U3AMODE.getUARTEN : TBits_1; inline;
  39147. begin
  39148. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39149. end;
  39150. procedure TUART3A_U3AMODE.setw(thebits : TBits_32); inline;
  39151. begin
  39152. pTDefRegMap(@Self)^.val := thebits;
  39153. end;
  39154. function TUART3A_U3AMODE.getw : TBits_32; inline;
  39155. begin
  39156. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39157. end;
  39158. procedure TUART3A_U2STA.setURXDA; inline;
  39159. begin
  39160. pTDefRegMap(@Self)^.&set := $00000001;
  39161. end;
  39162. procedure TUART3A_U2STA.clearURXDA; inline;
  39163. begin
  39164. pTDefRegMap(@Self)^.clr := $00000001;
  39165. end;
  39166. procedure TUART3A_U2STA.setURXDA(thebits : TBits_1); inline;
  39167. begin
  39168. if thebits = 0 then
  39169. pTDefRegMap(@Self)^.clr := $00000001
  39170. else
  39171. pTDefRegMap(@Self)^.&set := $00000001;
  39172. end;
  39173. function TUART3A_U2STA.getURXDA : TBits_1; inline;
  39174. begin
  39175. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39176. end;
  39177. procedure TUART3A_U2STA.setOERR; inline;
  39178. begin
  39179. pTDefRegMap(@Self)^.&set := $00000002;
  39180. end;
  39181. procedure TUART3A_U2STA.clearOERR; inline;
  39182. begin
  39183. pTDefRegMap(@Self)^.clr := $00000002;
  39184. end;
  39185. procedure TUART3A_U2STA.setOERR(thebits : TBits_1); inline;
  39186. begin
  39187. if thebits = 0 then
  39188. pTDefRegMap(@Self)^.clr := $00000002
  39189. else
  39190. pTDefRegMap(@Self)^.&set := $00000002;
  39191. end;
  39192. function TUART3A_U2STA.getOERR : TBits_1; inline;
  39193. begin
  39194. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39195. end;
  39196. procedure TUART3A_U2STA.setFERR; inline;
  39197. begin
  39198. pTDefRegMap(@Self)^.&set := $00000004;
  39199. end;
  39200. procedure TUART3A_U2STA.clearFERR; inline;
  39201. begin
  39202. pTDefRegMap(@Self)^.clr := $00000004;
  39203. end;
  39204. procedure TUART3A_U2STA.setFERR(thebits : TBits_1); inline;
  39205. begin
  39206. if thebits = 0 then
  39207. pTDefRegMap(@Self)^.clr := $00000004
  39208. else
  39209. pTDefRegMap(@Self)^.&set := $00000004;
  39210. end;
  39211. function TUART3A_U2STA.getFERR : TBits_1; inline;
  39212. begin
  39213. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39214. end;
  39215. procedure TUART3A_U2STA.setPERR; inline;
  39216. begin
  39217. pTDefRegMap(@Self)^.&set := $00000008;
  39218. end;
  39219. procedure TUART3A_U2STA.clearPERR; inline;
  39220. begin
  39221. pTDefRegMap(@Self)^.clr := $00000008;
  39222. end;
  39223. procedure TUART3A_U2STA.setPERR(thebits : TBits_1); inline;
  39224. begin
  39225. if thebits = 0 then
  39226. pTDefRegMap(@Self)^.clr := $00000008
  39227. else
  39228. pTDefRegMap(@Self)^.&set := $00000008;
  39229. end;
  39230. function TUART3A_U2STA.getPERR : TBits_1; inline;
  39231. begin
  39232. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39233. end;
  39234. procedure TUART3A_U2STA.setRIDLE; inline;
  39235. begin
  39236. pTDefRegMap(@Self)^.&set := $00000010;
  39237. end;
  39238. procedure TUART3A_U2STA.clearRIDLE; inline;
  39239. begin
  39240. pTDefRegMap(@Self)^.clr := $00000010;
  39241. end;
  39242. procedure TUART3A_U2STA.setRIDLE(thebits : TBits_1); inline;
  39243. begin
  39244. if thebits = 0 then
  39245. pTDefRegMap(@Self)^.clr := $00000010
  39246. else
  39247. pTDefRegMap(@Self)^.&set := $00000010;
  39248. end;
  39249. function TUART3A_U2STA.getRIDLE : TBits_1; inline;
  39250. begin
  39251. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  39252. end;
  39253. procedure TUART3A_U2STA.setADDEN; inline;
  39254. begin
  39255. pTDefRegMap(@Self)^.&set := $00000020;
  39256. end;
  39257. procedure TUART3A_U2STA.clearADDEN; inline;
  39258. begin
  39259. pTDefRegMap(@Self)^.clr := $00000020;
  39260. end;
  39261. procedure TUART3A_U2STA.setADDEN(thebits : TBits_1); inline;
  39262. begin
  39263. if thebits = 0 then
  39264. pTDefRegMap(@Self)^.clr := $00000020
  39265. else
  39266. pTDefRegMap(@Self)^.&set := $00000020;
  39267. end;
  39268. function TUART3A_U2STA.getADDEN : TBits_1; inline;
  39269. begin
  39270. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39271. end;
  39272. procedure TUART3A_U2STA.setURXISEL(thebits : TBits_2); inline;
  39273. begin
  39274. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  39275. end;
  39276. function TUART3A_U2STA.getURXISEL : TBits_2; inline;
  39277. begin
  39278. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  39279. end;
  39280. procedure TUART3A_U2STA.setTRMT; inline;
  39281. begin
  39282. pTDefRegMap(@Self)^.&set := $00000100;
  39283. end;
  39284. procedure TUART3A_U2STA.clearTRMT; inline;
  39285. begin
  39286. pTDefRegMap(@Self)^.clr := $00000100;
  39287. end;
  39288. procedure TUART3A_U2STA.setTRMT(thebits : TBits_1); inline;
  39289. begin
  39290. if thebits = 0 then
  39291. pTDefRegMap(@Self)^.clr := $00000100
  39292. else
  39293. pTDefRegMap(@Self)^.&set := $00000100;
  39294. end;
  39295. function TUART3A_U2STA.getTRMT : TBits_1; inline;
  39296. begin
  39297. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39298. end;
  39299. procedure TUART3A_U2STA.setUTXBF; inline;
  39300. begin
  39301. pTDefRegMap(@Self)^.&set := $00000200;
  39302. end;
  39303. procedure TUART3A_U2STA.clearUTXBF; inline;
  39304. begin
  39305. pTDefRegMap(@Self)^.clr := $00000200;
  39306. end;
  39307. procedure TUART3A_U2STA.setUTXBF(thebits : TBits_1); inline;
  39308. begin
  39309. if thebits = 0 then
  39310. pTDefRegMap(@Self)^.clr := $00000200
  39311. else
  39312. pTDefRegMap(@Self)^.&set := $00000200;
  39313. end;
  39314. function TUART3A_U2STA.getUTXBF : TBits_1; inline;
  39315. begin
  39316. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39317. end;
  39318. procedure TUART3A_U2STA.setUTXEN; inline;
  39319. begin
  39320. pTDefRegMap(@Self)^.&set := $00000400;
  39321. end;
  39322. procedure TUART3A_U2STA.clearUTXEN; inline;
  39323. begin
  39324. pTDefRegMap(@Self)^.clr := $00000400;
  39325. end;
  39326. procedure TUART3A_U2STA.setUTXEN(thebits : TBits_1); inline;
  39327. begin
  39328. if thebits = 0 then
  39329. pTDefRegMap(@Self)^.clr := $00000400
  39330. else
  39331. pTDefRegMap(@Self)^.&set := $00000400;
  39332. end;
  39333. function TUART3A_U2STA.getUTXEN : TBits_1; inline;
  39334. begin
  39335. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  39336. end;
  39337. procedure TUART3A_U2STA.setUTXBRK; inline;
  39338. begin
  39339. pTDefRegMap(@Self)^.&set := $00000800;
  39340. end;
  39341. procedure TUART3A_U2STA.clearUTXBRK; inline;
  39342. begin
  39343. pTDefRegMap(@Self)^.clr := $00000800;
  39344. end;
  39345. procedure TUART3A_U2STA.setUTXBRK(thebits : TBits_1); inline;
  39346. begin
  39347. if thebits = 0 then
  39348. pTDefRegMap(@Self)^.clr := $00000800
  39349. else
  39350. pTDefRegMap(@Self)^.&set := $00000800;
  39351. end;
  39352. function TUART3A_U2STA.getUTXBRK : TBits_1; inline;
  39353. begin
  39354. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  39355. end;
  39356. procedure TUART3A_U2STA.setURXEN; inline;
  39357. begin
  39358. pTDefRegMap(@Self)^.&set := $00001000;
  39359. end;
  39360. procedure TUART3A_U2STA.clearURXEN; inline;
  39361. begin
  39362. pTDefRegMap(@Self)^.clr := $00001000;
  39363. end;
  39364. procedure TUART3A_U2STA.setURXEN(thebits : TBits_1); inline;
  39365. begin
  39366. if thebits = 0 then
  39367. pTDefRegMap(@Self)^.clr := $00001000
  39368. else
  39369. pTDefRegMap(@Self)^.&set := $00001000;
  39370. end;
  39371. function TUART3A_U2STA.getURXEN : TBits_1; inline;
  39372. begin
  39373. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  39374. end;
  39375. procedure TUART3A_U2STA.setUTXINV; inline;
  39376. begin
  39377. pTDefRegMap(@Self)^.&set := $00002000;
  39378. end;
  39379. procedure TUART3A_U2STA.clearUTXINV; inline;
  39380. begin
  39381. pTDefRegMap(@Self)^.clr := $00002000;
  39382. end;
  39383. procedure TUART3A_U2STA.setUTXINV(thebits : TBits_1); inline;
  39384. begin
  39385. if thebits = 0 then
  39386. pTDefRegMap(@Self)^.clr := $00002000
  39387. else
  39388. pTDefRegMap(@Self)^.&set := $00002000;
  39389. end;
  39390. function TUART3A_U2STA.getUTXINV : TBits_1; inline;
  39391. begin
  39392. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39393. end;
  39394. procedure TUART3A_U2STA.setUTXISEL(thebits : TBits_2); inline;
  39395. begin
  39396. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  39397. end;
  39398. function TUART3A_U2STA.getUTXISEL : TBits_2; inline;
  39399. begin
  39400. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  39401. end;
  39402. procedure TUART3A_U2STA.setADDR(thebits : TBits_8); inline;
  39403. begin
  39404. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  39405. end;
  39406. function TUART3A_U2STA.getADDR : TBits_8; inline;
  39407. begin
  39408. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  39409. end;
  39410. procedure TUART3A_U2STA.setADM_EN; inline;
  39411. begin
  39412. pTDefRegMap(@Self)^.&set := $01000000;
  39413. end;
  39414. procedure TUART3A_U2STA.clearADM_EN; inline;
  39415. begin
  39416. pTDefRegMap(@Self)^.clr := $01000000;
  39417. end;
  39418. procedure TUART3A_U2STA.setADM_EN(thebits : TBits_1); inline;
  39419. begin
  39420. if thebits = 0 then
  39421. pTDefRegMap(@Self)^.clr := $01000000
  39422. else
  39423. pTDefRegMap(@Self)^.&set := $01000000;
  39424. end;
  39425. function TUART3A_U2STA.getADM_EN : TBits_1; inline;
  39426. begin
  39427. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  39428. end;
  39429. procedure TUART3A_U2STA.setURXISEL0; inline;
  39430. begin
  39431. pTDefRegMap(@Self)^.&set := $00000040;
  39432. end;
  39433. procedure TUART3A_U2STA.clearURXISEL0; inline;
  39434. begin
  39435. pTDefRegMap(@Self)^.clr := $00000040;
  39436. end;
  39437. procedure TUART3A_U2STA.setURXISEL0(thebits : TBits_1); inline;
  39438. begin
  39439. if thebits = 0 then
  39440. pTDefRegMap(@Self)^.clr := $00000040
  39441. else
  39442. pTDefRegMap(@Self)^.&set := $00000040;
  39443. end;
  39444. function TUART3A_U2STA.getURXISEL0 : TBits_1; inline;
  39445. begin
  39446. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39447. end;
  39448. procedure TUART3A_U2STA.setURXISEL1; inline;
  39449. begin
  39450. pTDefRegMap(@Self)^.&set := $00000080;
  39451. end;
  39452. procedure TUART3A_U2STA.clearURXISEL1; inline;
  39453. begin
  39454. pTDefRegMap(@Self)^.clr := $00000080;
  39455. end;
  39456. procedure TUART3A_U2STA.setURXISEL1(thebits : TBits_1); inline;
  39457. begin
  39458. if thebits = 0 then
  39459. pTDefRegMap(@Self)^.clr := $00000080
  39460. else
  39461. pTDefRegMap(@Self)^.&set := $00000080;
  39462. end;
  39463. function TUART3A_U2STA.getURXISEL1 : TBits_1; inline;
  39464. begin
  39465. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39466. end;
  39467. procedure TUART3A_U2STA.setUTXISEL0; inline;
  39468. begin
  39469. pTDefRegMap(@Self)^.&set := $00004000;
  39470. end;
  39471. procedure TUART3A_U2STA.clearUTXISEL0; inline;
  39472. begin
  39473. pTDefRegMap(@Self)^.clr := $00004000;
  39474. end;
  39475. procedure TUART3A_U2STA.setUTXISEL0(thebits : TBits_1); inline;
  39476. begin
  39477. if thebits = 0 then
  39478. pTDefRegMap(@Self)^.clr := $00004000
  39479. else
  39480. pTDefRegMap(@Self)^.&set := $00004000;
  39481. end;
  39482. function TUART3A_U2STA.getUTXISEL0 : TBits_1; inline;
  39483. begin
  39484. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  39485. end;
  39486. procedure TUART3A_U2STA.setUTXISEL1; inline;
  39487. begin
  39488. pTDefRegMap(@Self)^.&set := $00008000;
  39489. end;
  39490. procedure TUART3A_U2STA.clearUTXISEL1; inline;
  39491. begin
  39492. pTDefRegMap(@Self)^.clr := $00008000;
  39493. end;
  39494. procedure TUART3A_U2STA.setUTXISEL1(thebits : TBits_1); inline;
  39495. begin
  39496. if thebits = 0 then
  39497. pTDefRegMap(@Self)^.clr := $00008000
  39498. else
  39499. pTDefRegMap(@Self)^.&set := $00008000;
  39500. end;
  39501. function TUART3A_U2STA.getUTXISEL1 : TBits_1; inline;
  39502. begin
  39503. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39504. end;
  39505. procedure TUART3A_U2STA.setUTXSEL(thebits : TBits_2); inline;
  39506. begin
  39507. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  39508. end;
  39509. function TUART3A_U2STA.getUTXSEL : TBits_2; inline;
  39510. begin
  39511. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  39512. end;
  39513. procedure TUART3A_U2STA.setw(thebits : TBits_32); inline;
  39514. begin
  39515. pTDefRegMap(@Self)^.val := thebits;
  39516. end;
  39517. function TUART3A_U2STA.getw : TBits_32; inline;
  39518. begin
  39519. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39520. end;
  39521. procedure TUART3A_U3ASTA.setURXDA; inline;
  39522. begin
  39523. pTDefRegMap(@Self)^.&set := $00000001;
  39524. end;
  39525. procedure TUART3A_U3ASTA.clearURXDA; inline;
  39526. begin
  39527. pTDefRegMap(@Self)^.clr := $00000001;
  39528. end;
  39529. procedure TUART3A_U3ASTA.setURXDA(thebits : TBits_1); inline;
  39530. begin
  39531. if thebits = 0 then
  39532. pTDefRegMap(@Self)^.clr := $00000001
  39533. else
  39534. pTDefRegMap(@Self)^.&set := $00000001;
  39535. end;
  39536. function TUART3A_U3ASTA.getURXDA : TBits_1; inline;
  39537. begin
  39538. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39539. end;
  39540. procedure TUART3A_U3ASTA.setOERR; inline;
  39541. begin
  39542. pTDefRegMap(@Self)^.&set := $00000002;
  39543. end;
  39544. procedure TUART3A_U3ASTA.clearOERR; inline;
  39545. begin
  39546. pTDefRegMap(@Self)^.clr := $00000002;
  39547. end;
  39548. procedure TUART3A_U3ASTA.setOERR(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_U3ASTA.getOERR : TBits_1; inline;
  39556. begin
  39557. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39558. end;
  39559. procedure TUART3A_U3ASTA.setFERR; inline;
  39560. begin
  39561. pTDefRegMap(@Self)^.&set := $00000004;
  39562. end;
  39563. procedure TUART3A_U3ASTA.clearFERR; inline;
  39564. begin
  39565. pTDefRegMap(@Self)^.clr := $00000004;
  39566. end;
  39567. procedure TUART3A_U3ASTA.setFERR(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_U3ASTA.getFERR : TBits_1; inline;
  39575. begin
  39576. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39577. end;
  39578. procedure TUART3A_U3ASTA.setPERR; inline;
  39579. begin
  39580. pTDefRegMap(@Self)^.&set := $00000008;
  39581. end;
  39582. procedure TUART3A_U3ASTA.clearPERR; inline;
  39583. begin
  39584. pTDefRegMap(@Self)^.clr := $00000008;
  39585. end;
  39586. procedure TUART3A_U3ASTA.setPERR(thebits : TBits_1); inline;
  39587. begin
  39588. if thebits = 0 then
  39589. pTDefRegMap(@Self)^.clr := $00000008
  39590. else
  39591. pTDefRegMap(@Self)^.&set := $00000008;
  39592. end;
  39593. function TUART3A_U3ASTA.getPERR : TBits_1; inline;
  39594. begin
  39595. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39596. end;
  39597. procedure TUART3A_U3ASTA.setRIDLE; inline;
  39598. begin
  39599. pTDefRegMap(@Self)^.&set := $00000010;
  39600. end;
  39601. procedure TUART3A_U3ASTA.clearRIDLE; inline;
  39602. begin
  39603. pTDefRegMap(@Self)^.clr := $00000010;
  39604. end;
  39605. procedure TUART3A_U3ASTA.setRIDLE(thebits : TBits_1); inline;
  39606. begin
  39607. if thebits = 0 then
  39608. pTDefRegMap(@Self)^.clr := $00000010
  39609. else
  39610. pTDefRegMap(@Self)^.&set := $00000010;
  39611. end;
  39612. function TUART3A_U3ASTA.getRIDLE : TBits_1; inline;
  39613. begin
  39614. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  39615. end;
  39616. procedure TUART3A_U3ASTA.setADDEN; inline;
  39617. begin
  39618. pTDefRegMap(@Self)^.&set := $00000020;
  39619. end;
  39620. procedure TUART3A_U3ASTA.clearADDEN; inline;
  39621. begin
  39622. pTDefRegMap(@Self)^.clr := $00000020;
  39623. end;
  39624. procedure TUART3A_U3ASTA.setADDEN(thebits : TBits_1); inline;
  39625. begin
  39626. if thebits = 0 then
  39627. pTDefRegMap(@Self)^.clr := $00000020
  39628. else
  39629. pTDefRegMap(@Self)^.&set := $00000020;
  39630. end;
  39631. function TUART3A_U3ASTA.getADDEN : TBits_1; inline;
  39632. begin
  39633. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39634. end;
  39635. procedure TUART3A_U3ASTA.setURXISEL(thebits : TBits_2); inline;
  39636. begin
  39637. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  39638. end;
  39639. function TUART3A_U3ASTA.getURXISEL : TBits_2; inline;
  39640. begin
  39641. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  39642. end;
  39643. procedure TUART3A_U3ASTA.setTRMT; inline;
  39644. begin
  39645. pTDefRegMap(@Self)^.&set := $00000100;
  39646. end;
  39647. procedure TUART3A_U3ASTA.clearTRMT; inline;
  39648. begin
  39649. pTDefRegMap(@Self)^.clr := $00000100;
  39650. end;
  39651. procedure TUART3A_U3ASTA.setTRMT(thebits : TBits_1); inline;
  39652. begin
  39653. if thebits = 0 then
  39654. pTDefRegMap(@Self)^.clr := $00000100
  39655. else
  39656. pTDefRegMap(@Self)^.&set := $00000100;
  39657. end;
  39658. function TUART3A_U3ASTA.getTRMT : TBits_1; inline;
  39659. begin
  39660. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39661. end;
  39662. procedure TUART3A_U3ASTA.setUTXBF; inline;
  39663. begin
  39664. pTDefRegMap(@Self)^.&set := $00000200;
  39665. end;
  39666. procedure TUART3A_U3ASTA.clearUTXBF; inline;
  39667. begin
  39668. pTDefRegMap(@Self)^.clr := $00000200;
  39669. end;
  39670. procedure TUART3A_U3ASTA.setUTXBF(thebits : TBits_1); inline;
  39671. begin
  39672. if thebits = 0 then
  39673. pTDefRegMap(@Self)^.clr := $00000200
  39674. else
  39675. pTDefRegMap(@Self)^.&set := $00000200;
  39676. end;
  39677. function TUART3A_U3ASTA.getUTXBF : TBits_1; inline;
  39678. begin
  39679. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39680. end;
  39681. procedure TUART3A_U3ASTA.setUTXEN; inline;
  39682. begin
  39683. pTDefRegMap(@Self)^.&set := $00000400;
  39684. end;
  39685. procedure TUART3A_U3ASTA.clearUTXEN; inline;
  39686. begin
  39687. pTDefRegMap(@Self)^.clr := $00000400;
  39688. end;
  39689. procedure TUART3A_U3ASTA.setUTXEN(thebits : TBits_1); inline;
  39690. begin
  39691. if thebits = 0 then
  39692. pTDefRegMap(@Self)^.clr := $00000400
  39693. else
  39694. pTDefRegMap(@Self)^.&set := $00000400;
  39695. end;
  39696. function TUART3A_U3ASTA.getUTXEN : TBits_1; inline;
  39697. begin
  39698. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  39699. end;
  39700. procedure TUART3A_U3ASTA.setUTXBRK; inline;
  39701. begin
  39702. pTDefRegMap(@Self)^.&set := $00000800;
  39703. end;
  39704. procedure TUART3A_U3ASTA.clearUTXBRK; inline;
  39705. begin
  39706. pTDefRegMap(@Self)^.clr := $00000800;
  39707. end;
  39708. procedure TUART3A_U3ASTA.setUTXBRK(thebits : TBits_1); inline;
  39709. begin
  39710. if thebits = 0 then
  39711. pTDefRegMap(@Self)^.clr := $00000800
  39712. else
  39713. pTDefRegMap(@Self)^.&set := $00000800;
  39714. end;
  39715. function TUART3A_U3ASTA.getUTXBRK : TBits_1; inline;
  39716. begin
  39717. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  39718. end;
  39719. procedure TUART3A_U3ASTA.setURXEN; inline;
  39720. begin
  39721. pTDefRegMap(@Self)^.&set := $00001000;
  39722. end;
  39723. procedure TUART3A_U3ASTA.clearURXEN; inline;
  39724. begin
  39725. pTDefRegMap(@Self)^.clr := $00001000;
  39726. end;
  39727. procedure TUART3A_U3ASTA.setURXEN(thebits : TBits_1); inline;
  39728. begin
  39729. if thebits = 0 then
  39730. pTDefRegMap(@Self)^.clr := $00001000
  39731. else
  39732. pTDefRegMap(@Self)^.&set := $00001000;
  39733. end;
  39734. function TUART3A_U3ASTA.getURXEN : TBits_1; inline;
  39735. begin
  39736. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  39737. end;
  39738. procedure TUART3A_U3ASTA.setUTXINV; inline;
  39739. begin
  39740. pTDefRegMap(@Self)^.&set := $00002000;
  39741. end;
  39742. procedure TUART3A_U3ASTA.clearUTXINV; inline;
  39743. begin
  39744. pTDefRegMap(@Self)^.clr := $00002000;
  39745. end;
  39746. procedure TUART3A_U3ASTA.setUTXINV(thebits : TBits_1); inline;
  39747. begin
  39748. if thebits = 0 then
  39749. pTDefRegMap(@Self)^.clr := $00002000
  39750. else
  39751. pTDefRegMap(@Self)^.&set := $00002000;
  39752. end;
  39753. function TUART3A_U3ASTA.getUTXINV : TBits_1; inline;
  39754. begin
  39755. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39756. end;
  39757. procedure TUART3A_U3ASTA.setUTXISEL(thebits : TBits_2); inline;
  39758. begin
  39759. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  39760. end;
  39761. function TUART3A_U3ASTA.getUTXISEL : TBits_2; inline;
  39762. begin
  39763. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  39764. end;
  39765. procedure TUART3A_U3ASTA.setADDR(thebits : TBits_8); inline;
  39766. begin
  39767. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  39768. end;
  39769. function TUART3A_U3ASTA.getADDR : TBits_8; inline;
  39770. begin
  39771. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  39772. end;
  39773. procedure TUART3A_U3ASTA.setADM_EN; inline;
  39774. begin
  39775. pTDefRegMap(@Self)^.&set := $01000000;
  39776. end;
  39777. procedure TUART3A_U3ASTA.clearADM_EN; inline;
  39778. begin
  39779. pTDefRegMap(@Self)^.clr := $01000000;
  39780. end;
  39781. procedure TUART3A_U3ASTA.setADM_EN(thebits : TBits_1); inline;
  39782. begin
  39783. if thebits = 0 then
  39784. pTDefRegMap(@Self)^.clr := $01000000
  39785. else
  39786. pTDefRegMap(@Self)^.&set := $01000000;
  39787. end;
  39788. function TUART3A_U3ASTA.getADM_EN : TBits_1; inline;
  39789. begin
  39790. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  39791. end;
  39792. procedure TUART3A_U3ASTA.setURXISEL0; inline;
  39793. begin
  39794. pTDefRegMap(@Self)^.&set := $00000040;
  39795. end;
  39796. procedure TUART3A_U3ASTA.clearURXISEL0; inline;
  39797. begin
  39798. pTDefRegMap(@Self)^.clr := $00000040;
  39799. end;
  39800. procedure TUART3A_U3ASTA.setURXISEL0(thebits : TBits_1); inline;
  39801. begin
  39802. if thebits = 0 then
  39803. pTDefRegMap(@Self)^.clr := $00000040
  39804. else
  39805. pTDefRegMap(@Self)^.&set := $00000040;
  39806. end;
  39807. function TUART3A_U3ASTA.getURXISEL0 : TBits_1; inline;
  39808. begin
  39809. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39810. end;
  39811. procedure TUART3A_U3ASTA.setURXISEL1; inline;
  39812. begin
  39813. pTDefRegMap(@Self)^.&set := $00000080;
  39814. end;
  39815. procedure TUART3A_U3ASTA.clearURXISEL1; inline;
  39816. begin
  39817. pTDefRegMap(@Self)^.clr := $00000080;
  39818. end;
  39819. procedure TUART3A_U3ASTA.setURXISEL1(thebits : TBits_1); inline;
  39820. begin
  39821. if thebits = 0 then
  39822. pTDefRegMap(@Self)^.clr := $00000080
  39823. else
  39824. pTDefRegMap(@Self)^.&set := $00000080;
  39825. end;
  39826. function TUART3A_U3ASTA.getURXISEL1 : TBits_1; inline;
  39827. begin
  39828. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39829. end;
  39830. procedure TUART3A_U3ASTA.setUTXISEL0; inline;
  39831. begin
  39832. pTDefRegMap(@Self)^.&set := $00004000;
  39833. end;
  39834. procedure TUART3A_U3ASTA.clearUTXISEL0; inline;
  39835. begin
  39836. pTDefRegMap(@Self)^.clr := $00004000;
  39837. end;
  39838. procedure TUART3A_U3ASTA.setUTXISEL0(thebits : TBits_1); inline;
  39839. begin
  39840. if thebits = 0 then
  39841. pTDefRegMap(@Self)^.clr := $00004000
  39842. else
  39843. pTDefRegMap(@Self)^.&set := $00004000;
  39844. end;
  39845. function TUART3A_U3ASTA.getUTXISEL0 : TBits_1; inline;
  39846. begin
  39847. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  39848. end;
  39849. procedure TUART3A_U3ASTA.setUTXISEL1; inline;
  39850. begin
  39851. pTDefRegMap(@Self)^.&set := $00008000;
  39852. end;
  39853. procedure TUART3A_U3ASTA.clearUTXISEL1; inline;
  39854. begin
  39855. pTDefRegMap(@Self)^.clr := $00008000;
  39856. end;
  39857. procedure TUART3A_U3ASTA.setUTXISEL1(thebits : TBits_1); inline;
  39858. begin
  39859. if thebits = 0 then
  39860. pTDefRegMap(@Self)^.clr := $00008000
  39861. else
  39862. pTDefRegMap(@Self)^.&set := $00008000;
  39863. end;
  39864. function TUART3A_U3ASTA.getUTXISEL1 : TBits_1; inline;
  39865. begin
  39866. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39867. end;
  39868. procedure TUART3A_U3ASTA.setUTXSEL(thebits : TBits_2); inline;
  39869. begin
  39870. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  39871. end;
  39872. function TUART3A_U3ASTA.getUTXSEL : TBits_2; inline;
  39873. begin
  39874. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  39875. end;
  39876. procedure TUART3A_U3ASTA.setw(thebits : TBits_32); inline;
  39877. begin
  39878. pTDefRegMap(@Self)^.val := thebits;
  39879. end;
  39880. function TUART3A_U3ASTA.getw : TBits_32; inline;
  39881. begin
  39882. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39883. end;
  39884. procedure TUART5_U3BMODE.setSTSEL; inline;
  39885. begin
  39886. pTDefRegMap(@Self)^.&set := $00000001;
  39887. end;
  39888. procedure TUART5_U3BMODE.clearSTSEL; inline;
  39889. begin
  39890. pTDefRegMap(@Self)^.clr := $00000001;
  39891. end;
  39892. procedure TUART5_U3BMODE.setSTSEL(thebits : TBits_1); inline;
  39893. begin
  39894. if thebits = 0 then
  39895. pTDefRegMap(@Self)^.clr := $00000001
  39896. else
  39897. pTDefRegMap(@Self)^.&set := $00000001;
  39898. end;
  39899. function TUART5_U3BMODE.getSTSEL : TBits_1; inline;
  39900. begin
  39901. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39902. end;
  39903. procedure TUART5_U3BMODE.setPDSEL(thebits : TBits_2); inline;
  39904. begin
  39905. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  39906. end;
  39907. function TUART5_U3BMODE.getPDSEL : TBits_2; inline;
  39908. begin
  39909. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  39910. end;
  39911. procedure TUART5_U3BMODE.setBRGH; inline;
  39912. begin
  39913. pTDefRegMap(@Self)^.&set := $00000008;
  39914. end;
  39915. procedure TUART5_U3BMODE.clearBRGH; inline;
  39916. begin
  39917. pTDefRegMap(@Self)^.clr := $00000008;
  39918. end;
  39919. procedure TUART5_U3BMODE.setBRGH(thebits : TBits_1); inline;
  39920. begin
  39921. if thebits = 0 then
  39922. pTDefRegMap(@Self)^.clr := $00000008
  39923. else
  39924. pTDefRegMap(@Self)^.&set := $00000008;
  39925. end;
  39926. function TUART5_U3BMODE.getBRGH : TBits_1; inline;
  39927. begin
  39928. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39929. end;
  39930. procedure TUART5_U3BMODE.setRXINV; inline;
  39931. begin
  39932. pTDefRegMap(@Self)^.&set := $00000010;
  39933. end;
  39934. procedure TUART5_U3BMODE.clearRXINV; inline;
  39935. begin
  39936. pTDefRegMap(@Self)^.clr := $00000010;
  39937. end;
  39938. procedure TUART5_U3BMODE.setRXINV(thebits : TBits_1); inline;
  39939. begin
  39940. if thebits = 0 then
  39941. pTDefRegMap(@Self)^.clr := $00000010
  39942. else
  39943. pTDefRegMap(@Self)^.&set := $00000010;
  39944. end;
  39945. function TUART5_U3BMODE.getRXINV : TBits_1; inline;
  39946. begin
  39947. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  39948. end;
  39949. procedure TUART5_U3BMODE.setABAUD; inline;
  39950. begin
  39951. pTDefRegMap(@Self)^.&set := $00000020;
  39952. end;
  39953. procedure TUART5_U3BMODE.clearABAUD; inline;
  39954. begin
  39955. pTDefRegMap(@Self)^.clr := $00000020;
  39956. end;
  39957. procedure TUART5_U3BMODE.setABAUD(thebits : TBits_1); inline;
  39958. begin
  39959. if thebits = 0 then
  39960. pTDefRegMap(@Self)^.clr := $00000020
  39961. else
  39962. pTDefRegMap(@Self)^.&set := $00000020;
  39963. end;
  39964. function TUART5_U3BMODE.getABAUD : TBits_1; inline;
  39965. begin
  39966. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39967. end;
  39968. procedure TUART5_U3BMODE.setLPBACK; inline;
  39969. begin
  39970. pTDefRegMap(@Self)^.&set := $00000040;
  39971. end;
  39972. procedure TUART5_U3BMODE.clearLPBACK; inline;
  39973. begin
  39974. pTDefRegMap(@Self)^.clr := $00000040;
  39975. end;
  39976. procedure TUART5_U3BMODE.setLPBACK(thebits : TBits_1); inline;
  39977. begin
  39978. if thebits = 0 then
  39979. pTDefRegMap(@Self)^.clr := $00000040
  39980. else
  39981. pTDefRegMap(@Self)^.&set := $00000040;
  39982. end;
  39983. function TUART5_U3BMODE.getLPBACK : TBits_1; inline;
  39984. begin
  39985. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39986. end;
  39987. procedure TUART5_U3BMODE.setWAKE; inline;
  39988. begin
  39989. pTDefRegMap(@Self)^.&set := $00000080;
  39990. end;
  39991. procedure TUART5_U3BMODE.clearWAKE; inline;
  39992. begin
  39993. pTDefRegMap(@Self)^.clr := $00000080;
  39994. end;
  39995. procedure TUART5_U3BMODE.setWAKE(thebits : TBits_1); inline;
  39996. begin
  39997. if thebits = 0 then
  39998. pTDefRegMap(@Self)^.clr := $00000080
  39999. else
  40000. pTDefRegMap(@Self)^.&set := $00000080;
  40001. end;
  40002. function TUART5_U3BMODE.getWAKE : TBits_1; inline;
  40003. begin
  40004. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40005. end;
  40006. procedure TUART5_U3BMODE.setIREN; inline;
  40007. begin
  40008. pTDefRegMap(@Self)^.&set := $00001000;
  40009. end;
  40010. procedure TUART5_U3BMODE.clearIREN; inline;
  40011. begin
  40012. pTDefRegMap(@Self)^.clr := $00001000;
  40013. end;
  40014. procedure TUART5_U3BMODE.setIREN(thebits : TBits_1); inline;
  40015. begin
  40016. if thebits = 0 then
  40017. pTDefRegMap(@Self)^.clr := $00001000
  40018. else
  40019. pTDefRegMap(@Self)^.&set := $00001000;
  40020. end;
  40021. function TUART5_U3BMODE.getIREN : TBits_1; inline;
  40022. begin
  40023. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40024. end;
  40025. procedure TUART5_U3BMODE.setSIDL; inline;
  40026. begin
  40027. pTDefRegMap(@Self)^.&set := $00002000;
  40028. end;
  40029. procedure TUART5_U3BMODE.clearSIDL; inline;
  40030. begin
  40031. pTDefRegMap(@Self)^.clr := $00002000;
  40032. end;
  40033. procedure TUART5_U3BMODE.setSIDL(thebits : TBits_1); inline;
  40034. begin
  40035. if thebits = 0 then
  40036. pTDefRegMap(@Self)^.clr := $00002000
  40037. else
  40038. pTDefRegMap(@Self)^.&set := $00002000;
  40039. end;
  40040. function TUART5_U3BMODE.getSIDL : TBits_1; inline;
  40041. begin
  40042. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40043. end;
  40044. procedure TUART5_U3BMODE.setON; inline;
  40045. begin
  40046. pTDefRegMap(@Self)^.&set := $00008000;
  40047. end;
  40048. procedure TUART5_U3BMODE.clearON; inline;
  40049. begin
  40050. pTDefRegMap(@Self)^.clr := $00008000;
  40051. end;
  40052. procedure TUART5_U3BMODE.setON(thebits : TBits_1); inline;
  40053. begin
  40054. if thebits = 0 then
  40055. pTDefRegMap(@Self)^.clr := $00008000
  40056. else
  40057. pTDefRegMap(@Self)^.&set := $00008000;
  40058. end;
  40059. function TUART5_U3BMODE.getON : TBits_1; inline;
  40060. begin
  40061. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40062. end;
  40063. procedure TUART5_U3BMODE.setPDSEL0; inline;
  40064. begin
  40065. pTDefRegMap(@Self)^.&set := $00000002;
  40066. end;
  40067. procedure TUART5_U3BMODE.clearPDSEL0; inline;
  40068. begin
  40069. pTDefRegMap(@Self)^.clr := $00000002;
  40070. end;
  40071. procedure TUART5_U3BMODE.setPDSEL0(thebits : TBits_1); inline;
  40072. begin
  40073. if thebits = 0 then
  40074. pTDefRegMap(@Self)^.clr := $00000002
  40075. else
  40076. pTDefRegMap(@Self)^.&set := $00000002;
  40077. end;
  40078. function TUART5_U3BMODE.getPDSEL0 : TBits_1; inline;
  40079. begin
  40080. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40081. end;
  40082. procedure TUART5_U3BMODE.setPDSEL1; inline;
  40083. begin
  40084. pTDefRegMap(@Self)^.&set := $00000004;
  40085. end;
  40086. procedure TUART5_U3BMODE.clearPDSEL1; inline;
  40087. begin
  40088. pTDefRegMap(@Self)^.clr := $00000004;
  40089. end;
  40090. procedure TUART5_U3BMODE.setPDSEL1(thebits : TBits_1); inline;
  40091. begin
  40092. if thebits = 0 then
  40093. pTDefRegMap(@Self)^.clr := $00000004
  40094. else
  40095. pTDefRegMap(@Self)^.&set := $00000004;
  40096. end;
  40097. function TUART5_U3BMODE.getPDSEL1 : TBits_1; inline;
  40098. begin
  40099. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  40100. end;
  40101. procedure TUART5_U3BMODE.setUSIDL; inline;
  40102. begin
  40103. pTDefRegMap(@Self)^.&set := $00002000;
  40104. end;
  40105. procedure TUART5_U3BMODE.clearUSIDL; inline;
  40106. begin
  40107. pTDefRegMap(@Self)^.clr := $00002000;
  40108. end;
  40109. procedure TUART5_U3BMODE.setUSIDL(thebits : TBits_1); inline;
  40110. begin
  40111. if thebits = 0 then
  40112. pTDefRegMap(@Self)^.clr := $00002000
  40113. else
  40114. pTDefRegMap(@Self)^.&set := $00002000;
  40115. end;
  40116. function TUART5_U3BMODE.getUSIDL : TBits_1; inline;
  40117. begin
  40118. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40119. end;
  40120. procedure TUART5_U3BMODE.setUARTEN; inline;
  40121. begin
  40122. pTDefRegMap(@Self)^.&set := $00008000;
  40123. end;
  40124. procedure TUART5_U3BMODE.clearUARTEN; inline;
  40125. begin
  40126. pTDefRegMap(@Self)^.clr := $00008000;
  40127. end;
  40128. procedure TUART5_U3BMODE.setUARTEN(thebits : TBits_1); inline;
  40129. begin
  40130. if thebits = 0 then
  40131. pTDefRegMap(@Self)^.clr := $00008000
  40132. else
  40133. pTDefRegMap(@Self)^.&set := $00008000;
  40134. end;
  40135. function TUART5_U3BMODE.getUARTEN : TBits_1; inline;
  40136. begin
  40137. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40138. end;
  40139. procedure TUART5_U3BMODE.setw(thebits : TBits_32); inline;
  40140. begin
  40141. pTDefRegMap(@Self)^.val := thebits;
  40142. end;
  40143. function TUART5_U3BMODE.getw : TBits_32; inline;
  40144. begin
  40145. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40146. end;
  40147. procedure TUART5_U5MODE.setSTSEL; inline;
  40148. begin
  40149. pTDefRegMap(@Self)^.&set := $00000001;
  40150. end;
  40151. procedure TUART5_U5MODE.clearSTSEL; inline;
  40152. begin
  40153. pTDefRegMap(@Self)^.clr := $00000001;
  40154. end;
  40155. procedure TUART5_U5MODE.setSTSEL(thebits : TBits_1); inline;
  40156. begin
  40157. if thebits = 0 then
  40158. pTDefRegMap(@Self)^.clr := $00000001
  40159. else
  40160. pTDefRegMap(@Self)^.&set := $00000001;
  40161. end;
  40162. function TUART5_U5MODE.getSTSEL : TBits_1; inline;
  40163. begin
  40164. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40165. end;
  40166. procedure TUART5_U5MODE.setPDSEL(thebits : TBits_2); inline;
  40167. begin
  40168. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  40169. end;
  40170. function TUART5_U5MODE.getPDSEL : TBits_2; inline;
  40171. begin
  40172. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  40173. end;
  40174. procedure TUART5_U5MODE.setBRGH; inline;
  40175. begin
  40176. pTDefRegMap(@Self)^.&set := $00000008;
  40177. end;
  40178. procedure TUART5_U5MODE.clearBRGH; inline;
  40179. begin
  40180. pTDefRegMap(@Self)^.clr := $00000008;
  40181. end;
  40182. procedure TUART5_U5MODE.setBRGH(thebits : TBits_1); inline;
  40183. begin
  40184. if thebits = 0 then
  40185. pTDefRegMap(@Self)^.clr := $00000008
  40186. else
  40187. pTDefRegMap(@Self)^.&set := $00000008;
  40188. end;
  40189. function TUART5_U5MODE.getBRGH : TBits_1; inline;
  40190. begin
  40191. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40192. end;
  40193. procedure TUART5_U5MODE.setRXINV; inline;
  40194. begin
  40195. pTDefRegMap(@Self)^.&set := $00000010;
  40196. end;
  40197. procedure TUART5_U5MODE.clearRXINV; inline;
  40198. begin
  40199. pTDefRegMap(@Self)^.clr := $00000010;
  40200. end;
  40201. procedure TUART5_U5MODE.setRXINV(thebits : TBits_1); inline;
  40202. begin
  40203. if thebits = 0 then
  40204. pTDefRegMap(@Self)^.clr := $00000010
  40205. else
  40206. pTDefRegMap(@Self)^.&set := $00000010;
  40207. end;
  40208. function TUART5_U5MODE.getRXINV : TBits_1; inline;
  40209. begin
  40210. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  40211. end;
  40212. procedure TUART5_U5MODE.setABAUD; inline;
  40213. begin
  40214. pTDefRegMap(@Self)^.&set := $00000020;
  40215. end;
  40216. procedure TUART5_U5MODE.clearABAUD; inline;
  40217. begin
  40218. pTDefRegMap(@Self)^.clr := $00000020;
  40219. end;
  40220. procedure TUART5_U5MODE.setABAUD(thebits : TBits_1); inline;
  40221. begin
  40222. if thebits = 0 then
  40223. pTDefRegMap(@Self)^.clr := $00000020
  40224. else
  40225. pTDefRegMap(@Self)^.&set := $00000020;
  40226. end;
  40227. function TUART5_U5MODE.getABAUD : TBits_1; inline;
  40228. begin
  40229. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40230. end;
  40231. procedure TUART5_U5MODE.setLPBACK; inline;
  40232. begin
  40233. pTDefRegMap(@Self)^.&set := $00000040;
  40234. end;
  40235. procedure TUART5_U5MODE.clearLPBACK; inline;
  40236. begin
  40237. pTDefRegMap(@Self)^.clr := $00000040;
  40238. end;
  40239. procedure TUART5_U5MODE.setLPBACK(thebits : TBits_1); inline;
  40240. begin
  40241. if thebits = 0 then
  40242. pTDefRegMap(@Self)^.clr := $00000040
  40243. else
  40244. pTDefRegMap(@Self)^.&set := $00000040;
  40245. end;
  40246. function TUART5_U5MODE.getLPBACK : TBits_1; inline;
  40247. begin
  40248. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40249. end;
  40250. procedure TUART5_U5MODE.setWAKE; inline;
  40251. begin
  40252. pTDefRegMap(@Self)^.&set := $00000080;
  40253. end;
  40254. procedure TUART5_U5MODE.clearWAKE; inline;
  40255. begin
  40256. pTDefRegMap(@Self)^.clr := $00000080;
  40257. end;
  40258. procedure TUART5_U5MODE.setWAKE(thebits : TBits_1); inline;
  40259. begin
  40260. if thebits = 0 then
  40261. pTDefRegMap(@Self)^.clr := $00000080
  40262. else
  40263. pTDefRegMap(@Self)^.&set := $00000080;
  40264. end;
  40265. function TUART5_U5MODE.getWAKE : TBits_1; inline;
  40266. begin
  40267. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40268. end;
  40269. procedure TUART5_U5MODE.setIREN; inline;
  40270. begin
  40271. pTDefRegMap(@Self)^.&set := $00001000;
  40272. end;
  40273. procedure TUART5_U5MODE.clearIREN; inline;
  40274. begin
  40275. pTDefRegMap(@Self)^.clr := $00001000;
  40276. end;
  40277. procedure TUART5_U5MODE.setIREN(thebits : TBits_1); inline;
  40278. begin
  40279. if thebits = 0 then
  40280. pTDefRegMap(@Self)^.clr := $00001000
  40281. else
  40282. pTDefRegMap(@Self)^.&set := $00001000;
  40283. end;
  40284. function TUART5_U5MODE.getIREN : TBits_1; inline;
  40285. begin
  40286. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40287. end;
  40288. procedure TUART5_U5MODE.setSIDL; inline;
  40289. begin
  40290. pTDefRegMap(@Self)^.&set := $00002000;
  40291. end;
  40292. procedure TUART5_U5MODE.clearSIDL; inline;
  40293. begin
  40294. pTDefRegMap(@Self)^.clr := $00002000;
  40295. end;
  40296. procedure TUART5_U5MODE.setSIDL(thebits : TBits_1); inline;
  40297. begin
  40298. if thebits = 0 then
  40299. pTDefRegMap(@Self)^.clr := $00002000
  40300. else
  40301. pTDefRegMap(@Self)^.&set := $00002000;
  40302. end;
  40303. function TUART5_U5MODE.getSIDL : TBits_1; inline;
  40304. begin
  40305. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40306. end;
  40307. procedure TUART5_U5MODE.setON; inline;
  40308. begin
  40309. pTDefRegMap(@Self)^.&set := $00008000;
  40310. end;
  40311. procedure TUART5_U5MODE.clearON; inline;
  40312. begin
  40313. pTDefRegMap(@Self)^.clr := $00008000;
  40314. end;
  40315. procedure TUART5_U5MODE.setON(thebits : TBits_1); inline;
  40316. begin
  40317. if thebits = 0 then
  40318. pTDefRegMap(@Self)^.clr := $00008000
  40319. else
  40320. pTDefRegMap(@Self)^.&set := $00008000;
  40321. end;
  40322. function TUART5_U5MODE.getON : TBits_1; inline;
  40323. begin
  40324. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40325. end;
  40326. procedure TUART5_U5MODE.setPDSEL0; inline;
  40327. begin
  40328. pTDefRegMap(@Self)^.&set := $00000002;
  40329. end;
  40330. procedure TUART5_U5MODE.clearPDSEL0; inline;
  40331. begin
  40332. pTDefRegMap(@Self)^.clr := $00000002;
  40333. end;
  40334. procedure TUART5_U5MODE.setPDSEL0(thebits : TBits_1); inline;
  40335. begin
  40336. if thebits = 0 then
  40337. pTDefRegMap(@Self)^.clr := $00000002
  40338. else
  40339. pTDefRegMap(@Self)^.&set := $00000002;
  40340. end;
  40341. function TUART5_U5MODE.getPDSEL0 : TBits_1; inline;
  40342. begin
  40343. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40344. end;
  40345. procedure TUART5_U5MODE.setPDSEL1; inline;
  40346. begin
  40347. pTDefRegMap(@Self)^.&set := $00000004;
  40348. end;
  40349. procedure TUART5_U5MODE.clearPDSEL1; inline;
  40350. begin
  40351. pTDefRegMap(@Self)^.clr := $00000004;
  40352. end;
  40353. procedure TUART5_U5MODE.setPDSEL1(thebits : TBits_1); inline;
  40354. begin
  40355. if thebits = 0 then
  40356. pTDefRegMap(@Self)^.clr := $00000004
  40357. else
  40358. pTDefRegMap(@Self)^.&set := $00000004;
  40359. end;
  40360. function TUART5_U5MODE.getPDSEL1 : TBits_1; inline;
  40361. begin
  40362. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  40363. end;
  40364. procedure TUART5_U5MODE.setUSIDL; inline;
  40365. begin
  40366. pTDefRegMap(@Self)^.&set := $00002000;
  40367. end;
  40368. procedure TUART5_U5MODE.clearUSIDL; inline;
  40369. begin
  40370. pTDefRegMap(@Self)^.clr := $00002000;
  40371. end;
  40372. procedure TUART5_U5MODE.setUSIDL(thebits : TBits_1); inline;
  40373. begin
  40374. if thebits = 0 then
  40375. pTDefRegMap(@Self)^.clr := $00002000
  40376. else
  40377. pTDefRegMap(@Self)^.&set := $00002000;
  40378. end;
  40379. function TUART5_U5MODE.getUSIDL : TBits_1; inline;
  40380. begin
  40381. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40382. end;
  40383. procedure TUART5_U5MODE.setUARTEN; inline;
  40384. begin
  40385. pTDefRegMap(@Self)^.&set := $00008000;
  40386. end;
  40387. procedure TUART5_U5MODE.clearUARTEN; inline;
  40388. begin
  40389. pTDefRegMap(@Self)^.clr := $00008000;
  40390. end;
  40391. procedure TUART5_U5MODE.setUARTEN(thebits : TBits_1); inline;
  40392. begin
  40393. if thebits = 0 then
  40394. pTDefRegMap(@Self)^.clr := $00008000
  40395. else
  40396. pTDefRegMap(@Self)^.&set := $00008000;
  40397. end;
  40398. function TUART5_U5MODE.getUARTEN : TBits_1; inline;
  40399. begin
  40400. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40401. end;
  40402. procedure TUART5_U5MODE.setw(thebits : TBits_32); inline;
  40403. begin
  40404. pTDefRegMap(@Self)^.val := thebits;
  40405. end;
  40406. function TUART5_U5MODE.getw : TBits_32; inline;
  40407. begin
  40408. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40409. end;
  40410. procedure TUART5_U3BSTA.setURXDA; inline;
  40411. begin
  40412. pTDefRegMap(@Self)^.&set := $00000001;
  40413. end;
  40414. procedure TUART5_U3BSTA.clearURXDA; inline;
  40415. begin
  40416. pTDefRegMap(@Self)^.clr := $00000001;
  40417. end;
  40418. procedure TUART5_U3BSTA.setURXDA(thebits : TBits_1); inline;
  40419. begin
  40420. if thebits = 0 then
  40421. pTDefRegMap(@Self)^.clr := $00000001
  40422. else
  40423. pTDefRegMap(@Self)^.&set := $00000001;
  40424. end;
  40425. function TUART5_U3BSTA.getURXDA : TBits_1; inline;
  40426. begin
  40427. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40428. end;
  40429. procedure TUART5_U3BSTA.setOERR; inline;
  40430. begin
  40431. pTDefRegMap(@Self)^.&set := $00000002;
  40432. end;
  40433. procedure TUART5_U3BSTA.clearOERR; inline;
  40434. begin
  40435. pTDefRegMap(@Self)^.clr := $00000002;
  40436. end;
  40437. procedure TUART5_U3BSTA.setOERR(thebits : TBits_1); inline;
  40438. begin
  40439. if thebits = 0 then
  40440. pTDefRegMap(@Self)^.clr := $00000002
  40441. else
  40442. pTDefRegMap(@Self)^.&set := $00000002;
  40443. end;
  40444. function TUART5_U3BSTA.getOERR : TBits_1; inline;
  40445. begin
  40446. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40447. end;
  40448. procedure TUART5_U3BSTA.setFERR; inline;
  40449. begin
  40450. pTDefRegMap(@Self)^.&set := $00000004;
  40451. end;
  40452. procedure TUART5_U3BSTA.clearFERR; inline;
  40453. begin
  40454. pTDefRegMap(@Self)^.clr := $00000004;
  40455. end;
  40456. procedure TUART5_U3BSTA.setFERR(thebits : TBits_1); inline;
  40457. begin
  40458. if thebits = 0 then
  40459. pTDefRegMap(@Self)^.clr := $00000004
  40460. else
  40461. pTDefRegMap(@Self)^.&set := $00000004;
  40462. end;
  40463. function TUART5_U3BSTA.getFERR : TBits_1; inline;
  40464. begin
  40465. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  40466. end;
  40467. procedure TUART5_U3BSTA.setPERR; inline;
  40468. begin
  40469. pTDefRegMap(@Self)^.&set := $00000008;
  40470. end;
  40471. procedure TUART5_U3BSTA.clearPERR; inline;
  40472. begin
  40473. pTDefRegMap(@Self)^.clr := $00000008;
  40474. end;
  40475. procedure TUART5_U3BSTA.setPERR(thebits : TBits_1); inline;
  40476. begin
  40477. if thebits = 0 then
  40478. pTDefRegMap(@Self)^.clr := $00000008
  40479. else
  40480. pTDefRegMap(@Self)^.&set := $00000008;
  40481. end;
  40482. function TUART5_U3BSTA.getPERR : TBits_1; inline;
  40483. begin
  40484. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40485. end;
  40486. procedure TUART5_U3BSTA.setRIDLE; inline;
  40487. begin
  40488. pTDefRegMap(@Self)^.&set := $00000010;
  40489. end;
  40490. procedure TUART5_U3BSTA.clearRIDLE; inline;
  40491. begin
  40492. pTDefRegMap(@Self)^.clr := $00000010;
  40493. end;
  40494. procedure TUART5_U3BSTA.setRIDLE(thebits : TBits_1); inline;
  40495. begin
  40496. if thebits = 0 then
  40497. pTDefRegMap(@Self)^.clr := $00000010
  40498. else
  40499. pTDefRegMap(@Self)^.&set := $00000010;
  40500. end;
  40501. function TUART5_U3BSTA.getRIDLE : TBits_1; inline;
  40502. begin
  40503. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  40504. end;
  40505. procedure TUART5_U3BSTA.setADDEN; inline;
  40506. begin
  40507. pTDefRegMap(@Self)^.&set := $00000020;
  40508. end;
  40509. procedure TUART5_U3BSTA.clearADDEN; inline;
  40510. begin
  40511. pTDefRegMap(@Self)^.clr := $00000020;
  40512. end;
  40513. procedure TUART5_U3BSTA.setADDEN(thebits : TBits_1); inline;
  40514. begin
  40515. if thebits = 0 then
  40516. pTDefRegMap(@Self)^.clr := $00000020
  40517. else
  40518. pTDefRegMap(@Self)^.&set := $00000020;
  40519. end;
  40520. function TUART5_U3BSTA.getADDEN : TBits_1; inline;
  40521. begin
  40522. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40523. end;
  40524. procedure TUART5_U3BSTA.setURXISEL(thebits : TBits_2); inline;
  40525. begin
  40526. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  40527. end;
  40528. function TUART5_U3BSTA.getURXISEL : TBits_2; inline;
  40529. begin
  40530. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  40531. end;
  40532. procedure TUART5_U3BSTA.setTRMT; inline;
  40533. begin
  40534. pTDefRegMap(@Self)^.&set := $00000100;
  40535. end;
  40536. procedure TUART5_U3BSTA.clearTRMT; inline;
  40537. begin
  40538. pTDefRegMap(@Self)^.clr := $00000100;
  40539. end;
  40540. procedure TUART5_U3BSTA.setTRMT(thebits : TBits_1); inline;
  40541. begin
  40542. if thebits = 0 then
  40543. pTDefRegMap(@Self)^.clr := $00000100
  40544. else
  40545. pTDefRegMap(@Self)^.&set := $00000100;
  40546. end;
  40547. function TUART5_U3BSTA.getTRMT : TBits_1; inline;
  40548. begin
  40549. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  40550. end;
  40551. procedure TUART5_U3BSTA.setUTXBF; inline;
  40552. begin
  40553. pTDefRegMap(@Self)^.&set := $00000200;
  40554. end;
  40555. procedure TUART5_U3BSTA.clearUTXBF; inline;
  40556. begin
  40557. pTDefRegMap(@Self)^.clr := $00000200;
  40558. end;
  40559. procedure TUART5_U3BSTA.setUTXBF(thebits : TBits_1); inline;
  40560. begin
  40561. if thebits = 0 then
  40562. pTDefRegMap(@Self)^.clr := $00000200
  40563. else
  40564. pTDefRegMap(@Self)^.&set := $00000200;
  40565. end;
  40566. function TUART5_U3BSTA.getUTXBF : TBits_1; inline;
  40567. begin
  40568. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  40569. end;
  40570. procedure TUART5_U3BSTA.setUTXEN; inline;
  40571. begin
  40572. pTDefRegMap(@Self)^.&set := $00000400;
  40573. end;
  40574. procedure TUART5_U3BSTA.clearUTXEN; inline;
  40575. begin
  40576. pTDefRegMap(@Self)^.clr := $00000400;
  40577. end;
  40578. procedure TUART5_U3BSTA.setUTXEN(thebits : TBits_1); inline;
  40579. begin
  40580. if thebits = 0 then
  40581. pTDefRegMap(@Self)^.clr := $00000400
  40582. else
  40583. pTDefRegMap(@Self)^.&set := $00000400;
  40584. end;
  40585. function TUART5_U3BSTA.getUTXEN : TBits_1; inline;
  40586. begin
  40587. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  40588. end;
  40589. procedure TUART5_U3BSTA.setUTXBRK; inline;
  40590. begin
  40591. pTDefRegMap(@Self)^.&set := $00000800;
  40592. end;
  40593. procedure TUART5_U3BSTA.clearUTXBRK; inline;
  40594. begin
  40595. pTDefRegMap(@Self)^.clr := $00000800;
  40596. end;
  40597. procedure TUART5_U3BSTA.setUTXBRK(thebits : TBits_1); inline;
  40598. begin
  40599. if thebits = 0 then
  40600. pTDefRegMap(@Self)^.clr := $00000800
  40601. else
  40602. pTDefRegMap(@Self)^.&set := $00000800;
  40603. end;
  40604. function TUART5_U3BSTA.getUTXBRK : TBits_1; inline;
  40605. begin
  40606. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40607. end;
  40608. procedure TUART5_U3BSTA.setURXEN; inline;
  40609. begin
  40610. pTDefRegMap(@Self)^.&set := $00001000;
  40611. end;
  40612. procedure TUART5_U3BSTA.clearURXEN; inline;
  40613. begin
  40614. pTDefRegMap(@Self)^.clr := $00001000;
  40615. end;
  40616. procedure TUART5_U3BSTA.setURXEN(thebits : TBits_1); inline;
  40617. begin
  40618. if thebits = 0 then
  40619. pTDefRegMap(@Self)^.clr := $00001000
  40620. else
  40621. pTDefRegMap(@Self)^.&set := $00001000;
  40622. end;
  40623. function TUART5_U3BSTA.getURXEN : TBits_1; inline;
  40624. begin
  40625. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40626. end;
  40627. procedure TUART5_U3BSTA.setUTXINV; inline;
  40628. begin
  40629. pTDefRegMap(@Self)^.&set := $00002000;
  40630. end;
  40631. procedure TUART5_U3BSTA.clearUTXINV; inline;
  40632. begin
  40633. pTDefRegMap(@Self)^.clr := $00002000;
  40634. end;
  40635. procedure TUART5_U3BSTA.setUTXINV(thebits : TBits_1); inline;
  40636. begin
  40637. if thebits = 0 then
  40638. pTDefRegMap(@Self)^.clr := $00002000
  40639. else
  40640. pTDefRegMap(@Self)^.&set := $00002000;
  40641. end;
  40642. function TUART5_U3BSTA.getUTXINV : TBits_1; inline;
  40643. begin
  40644. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40645. end;
  40646. procedure TUART5_U3BSTA.setUTXISEL(thebits : TBits_2); inline;
  40647. begin
  40648. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  40649. end;
  40650. function TUART5_U3BSTA.getUTXISEL : TBits_2; inline;
  40651. begin
  40652. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  40653. end;
  40654. procedure TUART5_U3BSTA.setADDR(thebits : TBits_8); inline;
  40655. begin
  40656. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  40657. end;
  40658. function TUART5_U3BSTA.getADDR : TBits_8; inline;
  40659. begin
  40660. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  40661. end;
  40662. procedure TUART5_U3BSTA.setADM_EN; inline;
  40663. begin
  40664. pTDefRegMap(@Self)^.&set := $01000000;
  40665. end;
  40666. procedure TUART5_U3BSTA.clearADM_EN; inline;
  40667. begin
  40668. pTDefRegMap(@Self)^.clr := $01000000;
  40669. end;
  40670. procedure TUART5_U3BSTA.setADM_EN(thebits : TBits_1); inline;
  40671. begin
  40672. if thebits = 0 then
  40673. pTDefRegMap(@Self)^.clr := $01000000
  40674. else
  40675. pTDefRegMap(@Self)^.&set := $01000000;
  40676. end;
  40677. function TUART5_U3BSTA.getADM_EN : TBits_1; inline;
  40678. begin
  40679. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  40680. end;
  40681. procedure TUART5_U3BSTA.setURXISEL0; inline;
  40682. begin
  40683. pTDefRegMap(@Self)^.&set := $00000040;
  40684. end;
  40685. procedure TUART5_U3BSTA.clearURXISEL0; inline;
  40686. begin
  40687. pTDefRegMap(@Self)^.clr := $00000040;
  40688. end;
  40689. procedure TUART5_U3BSTA.setURXISEL0(thebits : TBits_1); inline;
  40690. begin
  40691. if thebits = 0 then
  40692. pTDefRegMap(@Self)^.clr := $00000040
  40693. else
  40694. pTDefRegMap(@Self)^.&set := $00000040;
  40695. end;
  40696. function TUART5_U3BSTA.getURXISEL0 : TBits_1; inline;
  40697. begin
  40698. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40699. end;
  40700. procedure TUART5_U3BSTA.setURXISEL1; inline;
  40701. begin
  40702. pTDefRegMap(@Self)^.&set := $00000080;
  40703. end;
  40704. procedure TUART5_U3BSTA.clearURXISEL1; inline;
  40705. begin
  40706. pTDefRegMap(@Self)^.clr := $00000080;
  40707. end;
  40708. procedure TUART5_U3BSTA.setURXISEL1(thebits : TBits_1); inline;
  40709. begin
  40710. if thebits = 0 then
  40711. pTDefRegMap(@Self)^.clr := $00000080
  40712. else
  40713. pTDefRegMap(@Self)^.&set := $00000080;
  40714. end;
  40715. function TUART5_U3BSTA.getURXISEL1 : TBits_1; inline;
  40716. begin
  40717. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40718. end;
  40719. procedure TUART5_U3BSTA.setUTXISEL0; inline;
  40720. begin
  40721. pTDefRegMap(@Self)^.&set := $00004000;
  40722. end;
  40723. procedure TUART5_U3BSTA.clearUTXISEL0; inline;
  40724. begin
  40725. pTDefRegMap(@Self)^.clr := $00004000;
  40726. end;
  40727. procedure TUART5_U3BSTA.setUTXISEL0(thebits : TBits_1); inline;
  40728. begin
  40729. if thebits = 0 then
  40730. pTDefRegMap(@Self)^.clr := $00004000
  40731. else
  40732. pTDefRegMap(@Self)^.&set := $00004000;
  40733. end;
  40734. function TUART5_U3BSTA.getUTXISEL0 : TBits_1; inline;
  40735. begin
  40736. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  40737. end;
  40738. procedure TUART5_U3BSTA.setUTXISEL1; inline;
  40739. begin
  40740. pTDefRegMap(@Self)^.&set := $00008000;
  40741. end;
  40742. procedure TUART5_U3BSTA.clearUTXISEL1; inline;
  40743. begin
  40744. pTDefRegMap(@Self)^.clr := $00008000;
  40745. end;
  40746. procedure TUART5_U3BSTA.setUTXISEL1(thebits : TBits_1); inline;
  40747. begin
  40748. if thebits = 0 then
  40749. pTDefRegMap(@Self)^.clr := $00008000
  40750. else
  40751. pTDefRegMap(@Self)^.&set := $00008000;
  40752. end;
  40753. function TUART5_U3BSTA.getUTXISEL1 : TBits_1; inline;
  40754. begin
  40755. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40756. end;
  40757. procedure TUART5_U3BSTA.setUTXSEL(thebits : TBits_2); inline;
  40758. begin
  40759. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  40760. end;
  40761. function TUART5_U3BSTA.getUTXSEL : TBits_2; inline;
  40762. begin
  40763. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  40764. end;
  40765. procedure TUART5_U3BSTA.setw(thebits : TBits_32); inline;
  40766. begin
  40767. pTDefRegMap(@Self)^.val := thebits;
  40768. end;
  40769. function TUART5_U3BSTA.getw : TBits_32; inline;
  40770. begin
  40771. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40772. end;
  40773. procedure TUART5_U5STA.setURXDA; inline;
  40774. begin
  40775. pTDefRegMap(@Self)^.&set := $00000001;
  40776. end;
  40777. procedure TUART5_U5STA.clearURXDA; inline;
  40778. begin
  40779. pTDefRegMap(@Self)^.clr := $00000001;
  40780. end;
  40781. procedure TUART5_U5STA.setURXDA(thebits : TBits_1); inline;
  40782. begin
  40783. if thebits = 0 then
  40784. pTDefRegMap(@Self)^.clr := $00000001
  40785. else
  40786. pTDefRegMap(@Self)^.&set := $00000001;
  40787. end;
  40788. function TUART5_U5STA.getURXDA : TBits_1; inline;
  40789. begin
  40790. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40791. end;
  40792. procedure TUART5_U5STA.setOERR; inline;
  40793. begin
  40794. pTDefRegMap(@Self)^.&set := $00000002;
  40795. end;
  40796. procedure TUART5_U5STA.clearOERR; inline;
  40797. begin
  40798. pTDefRegMap(@Self)^.clr := $00000002;
  40799. end;
  40800. procedure TUART5_U5STA.setOERR(thebits : TBits_1); inline;
  40801. begin
  40802. if thebits = 0 then
  40803. pTDefRegMap(@Self)^.clr := $00000002
  40804. else
  40805. pTDefRegMap(@Self)^.&set := $00000002;
  40806. end;
  40807. function TUART5_U5STA.getOERR : TBits_1; inline;
  40808. begin
  40809. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40810. end;
  40811. procedure TUART5_U5STA.setFERR; inline;
  40812. begin
  40813. pTDefRegMap(@Self)^.&set := $00000004;
  40814. end;
  40815. procedure TUART5_U5STA.clearFERR; inline;
  40816. begin
  40817. pTDefRegMap(@Self)^.clr := $00000004;
  40818. end;
  40819. procedure TUART5_U5STA.setFERR(thebits : TBits_1); inline;
  40820. begin
  40821. if thebits = 0 then
  40822. pTDefRegMap(@Self)^.clr := $00000004
  40823. else
  40824. pTDefRegMap(@Self)^.&set := $00000004;
  40825. end;
  40826. function TUART5_U5STA.getFERR : TBits_1; inline;
  40827. begin
  40828. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  40829. end;
  40830. procedure TUART5_U5STA.setPERR; inline;
  40831. begin
  40832. pTDefRegMap(@Self)^.&set := $00000008;
  40833. end;
  40834. procedure TUART5_U5STA.clearPERR; inline;
  40835. begin
  40836. pTDefRegMap(@Self)^.clr := $00000008;
  40837. end;
  40838. procedure TUART5_U5STA.setPERR(thebits : TBits_1); inline;
  40839. begin
  40840. if thebits = 0 then
  40841. pTDefRegMap(@Self)^.clr := $00000008
  40842. else
  40843. pTDefRegMap(@Self)^.&set := $00000008;
  40844. end;
  40845. function TUART5_U5STA.getPERR : TBits_1; inline;
  40846. begin
  40847. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40848. end;
  40849. procedure TUART5_U5STA.setRIDLE; inline;
  40850. begin
  40851. pTDefRegMap(@Self)^.&set := $00000010;
  40852. end;
  40853. procedure TUART5_U5STA.clearRIDLE; inline;
  40854. begin
  40855. pTDefRegMap(@Self)^.clr := $00000010;
  40856. end;
  40857. procedure TUART5_U5STA.setRIDLE(thebits : TBits_1); inline;
  40858. begin
  40859. if thebits = 0 then
  40860. pTDefRegMap(@Self)^.clr := $00000010
  40861. else
  40862. pTDefRegMap(@Self)^.&set := $00000010;
  40863. end;
  40864. function TUART5_U5STA.getRIDLE : TBits_1; inline;
  40865. begin
  40866. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  40867. end;
  40868. procedure TUART5_U5STA.setADDEN; inline;
  40869. begin
  40870. pTDefRegMap(@Self)^.&set := $00000020;
  40871. end;
  40872. procedure TUART5_U5STA.clearADDEN; inline;
  40873. begin
  40874. pTDefRegMap(@Self)^.clr := $00000020;
  40875. end;
  40876. procedure TUART5_U5STA.setADDEN(thebits : TBits_1); inline;
  40877. begin
  40878. if thebits = 0 then
  40879. pTDefRegMap(@Self)^.clr := $00000020
  40880. else
  40881. pTDefRegMap(@Self)^.&set := $00000020;
  40882. end;
  40883. function TUART5_U5STA.getADDEN : TBits_1; inline;
  40884. begin
  40885. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40886. end;
  40887. procedure TUART5_U5STA.setURXISEL(thebits : TBits_2); inline;
  40888. begin
  40889. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  40890. end;
  40891. function TUART5_U5STA.getURXISEL : TBits_2; inline;
  40892. begin
  40893. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  40894. end;
  40895. procedure TUART5_U5STA.setTRMT; inline;
  40896. begin
  40897. pTDefRegMap(@Self)^.&set := $00000100;
  40898. end;
  40899. procedure TUART5_U5STA.clearTRMT; inline;
  40900. begin
  40901. pTDefRegMap(@Self)^.clr := $00000100;
  40902. end;
  40903. procedure TUART5_U5STA.setTRMT(thebits : TBits_1); inline;
  40904. begin
  40905. if thebits = 0 then
  40906. pTDefRegMap(@Self)^.clr := $00000100
  40907. else
  40908. pTDefRegMap(@Self)^.&set := $00000100;
  40909. end;
  40910. function TUART5_U5STA.getTRMT : TBits_1; inline;
  40911. begin
  40912. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  40913. end;
  40914. procedure TUART5_U5STA.setUTXBF; inline;
  40915. begin
  40916. pTDefRegMap(@Self)^.&set := $00000200;
  40917. end;
  40918. procedure TUART5_U5STA.clearUTXBF; inline;
  40919. begin
  40920. pTDefRegMap(@Self)^.clr := $00000200;
  40921. end;
  40922. procedure TUART5_U5STA.setUTXBF(thebits : TBits_1); inline;
  40923. begin
  40924. if thebits = 0 then
  40925. pTDefRegMap(@Self)^.clr := $00000200
  40926. else
  40927. pTDefRegMap(@Self)^.&set := $00000200;
  40928. end;
  40929. function TUART5_U5STA.getUTXBF : TBits_1; inline;
  40930. begin
  40931. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  40932. end;
  40933. procedure TUART5_U5STA.setUTXEN; inline;
  40934. begin
  40935. pTDefRegMap(@Self)^.&set := $00000400;
  40936. end;
  40937. procedure TUART5_U5STA.clearUTXEN; inline;
  40938. begin
  40939. pTDefRegMap(@Self)^.clr := $00000400;
  40940. end;
  40941. procedure TUART5_U5STA.setUTXEN(thebits : TBits_1); inline;
  40942. begin
  40943. if thebits = 0 then
  40944. pTDefRegMap(@Self)^.clr := $00000400
  40945. else
  40946. pTDefRegMap(@Self)^.&set := $00000400;
  40947. end;
  40948. function TUART5_U5STA.getUTXEN : TBits_1; inline;
  40949. begin
  40950. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  40951. end;
  40952. procedure TUART5_U5STA.setUTXBRK; inline;
  40953. begin
  40954. pTDefRegMap(@Self)^.&set := $00000800;
  40955. end;
  40956. procedure TUART5_U5STA.clearUTXBRK; inline;
  40957. begin
  40958. pTDefRegMap(@Self)^.clr := $00000800;
  40959. end;
  40960. procedure TUART5_U5STA.setUTXBRK(thebits : TBits_1); inline;
  40961. begin
  40962. if thebits = 0 then
  40963. pTDefRegMap(@Self)^.clr := $00000800
  40964. else
  40965. pTDefRegMap(@Self)^.&set := $00000800;
  40966. end;
  40967. function TUART5_U5STA.getUTXBRK : TBits_1; inline;
  40968. begin
  40969. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40970. end;
  40971. procedure TUART5_U5STA.setURXEN; inline;
  40972. begin
  40973. pTDefRegMap(@Self)^.&set := $00001000;
  40974. end;
  40975. procedure TUART5_U5STA.clearURXEN; inline;
  40976. begin
  40977. pTDefRegMap(@Self)^.clr := $00001000;
  40978. end;
  40979. procedure TUART5_U5STA.setURXEN(thebits : TBits_1); inline;
  40980. begin
  40981. if thebits = 0 then
  40982. pTDefRegMap(@Self)^.clr := $00001000
  40983. else
  40984. pTDefRegMap(@Self)^.&set := $00001000;
  40985. end;
  40986. function TUART5_U5STA.getURXEN : TBits_1; inline;
  40987. begin
  40988. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40989. end;
  40990. procedure TUART5_U5STA.setUTXINV; inline;
  40991. begin
  40992. pTDefRegMap(@Self)^.&set := $00002000;
  40993. end;
  40994. procedure TUART5_U5STA.clearUTXINV; inline;
  40995. begin
  40996. pTDefRegMap(@Self)^.clr := $00002000;
  40997. end;
  40998. procedure TUART5_U5STA.setUTXINV(thebits : TBits_1); inline;
  40999. begin
  41000. if thebits = 0 then
  41001. pTDefRegMap(@Self)^.clr := $00002000
  41002. else
  41003. pTDefRegMap(@Self)^.&set := $00002000;
  41004. end;
  41005. function TUART5_U5STA.getUTXINV : TBits_1; inline;
  41006. begin
  41007. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41008. end;
  41009. procedure TUART5_U5STA.setUTXISEL(thebits : TBits_2); inline;
  41010. begin
  41011. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  41012. end;
  41013. function TUART5_U5STA.getUTXISEL : TBits_2; inline;
  41014. begin
  41015. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  41016. end;
  41017. procedure TUART5_U5STA.setADDR(thebits : TBits_8); inline;
  41018. begin
  41019. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  41020. end;
  41021. function TUART5_U5STA.getADDR : TBits_8; inline;
  41022. begin
  41023. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  41024. end;
  41025. procedure TUART5_U5STA.setADM_EN; inline;
  41026. begin
  41027. pTDefRegMap(@Self)^.&set := $01000000;
  41028. end;
  41029. procedure TUART5_U5STA.clearADM_EN; inline;
  41030. begin
  41031. pTDefRegMap(@Self)^.clr := $01000000;
  41032. end;
  41033. procedure TUART5_U5STA.setADM_EN(thebits : TBits_1); inline;
  41034. begin
  41035. if thebits = 0 then
  41036. pTDefRegMap(@Self)^.clr := $01000000
  41037. else
  41038. pTDefRegMap(@Self)^.&set := $01000000;
  41039. end;
  41040. function TUART5_U5STA.getADM_EN : TBits_1; inline;
  41041. begin
  41042. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  41043. end;
  41044. procedure TUART5_U5STA.setURXISEL0; inline;
  41045. begin
  41046. pTDefRegMap(@Self)^.&set := $00000040;
  41047. end;
  41048. procedure TUART5_U5STA.clearURXISEL0; inline;
  41049. begin
  41050. pTDefRegMap(@Self)^.clr := $00000040;
  41051. end;
  41052. procedure TUART5_U5STA.setURXISEL0(thebits : TBits_1); inline;
  41053. begin
  41054. if thebits = 0 then
  41055. pTDefRegMap(@Self)^.clr := $00000040
  41056. else
  41057. pTDefRegMap(@Self)^.&set := $00000040;
  41058. end;
  41059. function TUART5_U5STA.getURXISEL0 : TBits_1; inline;
  41060. begin
  41061. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41062. end;
  41063. procedure TUART5_U5STA.setURXISEL1; inline;
  41064. begin
  41065. pTDefRegMap(@Self)^.&set := $00000080;
  41066. end;
  41067. procedure TUART5_U5STA.clearURXISEL1; inline;
  41068. begin
  41069. pTDefRegMap(@Self)^.clr := $00000080;
  41070. end;
  41071. procedure TUART5_U5STA.setURXISEL1(thebits : TBits_1); inline;
  41072. begin
  41073. if thebits = 0 then
  41074. pTDefRegMap(@Self)^.clr := $00000080
  41075. else
  41076. pTDefRegMap(@Self)^.&set := $00000080;
  41077. end;
  41078. function TUART5_U5STA.getURXISEL1 : TBits_1; inline;
  41079. begin
  41080. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41081. end;
  41082. procedure TUART5_U5STA.setUTXISEL0; inline;
  41083. begin
  41084. pTDefRegMap(@Self)^.&set := $00004000;
  41085. end;
  41086. procedure TUART5_U5STA.clearUTXISEL0; inline;
  41087. begin
  41088. pTDefRegMap(@Self)^.clr := $00004000;
  41089. end;
  41090. procedure TUART5_U5STA.setUTXISEL0(thebits : TBits_1); inline;
  41091. begin
  41092. if thebits = 0 then
  41093. pTDefRegMap(@Self)^.clr := $00004000
  41094. else
  41095. pTDefRegMap(@Self)^.&set := $00004000;
  41096. end;
  41097. function TUART5_U5STA.getUTXISEL0 : TBits_1; inline;
  41098. begin
  41099. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  41100. end;
  41101. procedure TUART5_U5STA.setUTXISEL1; inline;
  41102. begin
  41103. pTDefRegMap(@Self)^.&set := $00008000;
  41104. end;
  41105. procedure TUART5_U5STA.clearUTXISEL1; inline;
  41106. begin
  41107. pTDefRegMap(@Self)^.clr := $00008000;
  41108. end;
  41109. procedure TUART5_U5STA.setUTXISEL1(thebits : TBits_1); inline;
  41110. begin
  41111. if thebits = 0 then
  41112. pTDefRegMap(@Self)^.clr := $00008000
  41113. else
  41114. pTDefRegMap(@Self)^.&set := $00008000;
  41115. end;
  41116. function TUART5_U5STA.getUTXISEL1 : TBits_1; inline;
  41117. begin
  41118. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41119. end;
  41120. procedure TUART5_U5STA.setUTXSEL(thebits : TBits_2); inline;
  41121. begin
  41122. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  41123. end;
  41124. function TUART5_U5STA.getUTXSEL : TBits_2; inline;
  41125. begin
  41126. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  41127. end;
  41128. procedure TUART5_U5STA.setw(thebits : TBits_32); inline;
  41129. begin
  41130. pTDefRegMap(@Self)^.val := thebits;
  41131. end;
  41132. function TUART5_U5STA.getw : TBits_32; inline;
  41133. begin
  41134. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41135. end;
  41136. procedure TPMP_PMCON.setRDSP; inline;
  41137. begin
  41138. pTDefRegMap(@Self)^.&set := $00000001;
  41139. end;
  41140. procedure TPMP_PMCON.clearRDSP; inline;
  41141. begin
  41142. pTDefRegMap(@Self)^.clr := $00000001;
  41143. end;
  41144. procedure TPMP_PMCON.setRDSP(thebits : TBits_1); inline;
  41145. begin
  41146. if thebits = 0 then
  41147. pTDefRegMap(@Self)^.clr := $00000001
  41148. else
  41149. pTDefRegMap(@Self)^.&set := $00000001;
  41150. end;
  41151. function TPMP_PMCON.getRDSP : TBits_1; inline;
  41152. begin
  41153. getRDSP := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41154. end;
  41155. procedure TPMP_PMCON.setWRSP; inline;
  41156. begin
  41157. pTDefRegMap(@Self)^.&set := $00000002;
  41158. end;
  41159. procedure TPMP_PMCON.clearWRSP; inline;
  41160. begin
  41161. pTDefRegMap(@Self)^.clr := $00000002;
  41162. end;
  41163. procedure TPMP_PMCON.setWRSP(thebits : TBits_1); inline;
  41164. begin
  41165. if thebits = 0 then
  41166. pTDefRegMap(@Self)^.clr := $00000002
  41167. else
  41168. pTDefRegMap(@Self)^.&set := $00000002;
  41169. end;
  41170. function TPMP_PMCON.getWRSP : TBits_1; inline;
  41171. begin
  41172. getWRSP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41173. end;
  41174. procedure TPMP_PMCON.setCS1P; inline;
  41175. begin
  41176. pTDefRegMap(@Self)^.&set := $00000008;
  41177. end;
  41178. procedure TPMP_PMCON.clearCS1P; inline;
  41179. begin
  41180. pTDefRegMap(@Self)^.clr := $00000008;
  41181. end;
  41182. procedure TPMP_PMCON.setCS1P(thebits : TBits_1); inline;
  41183. begin
  41184. if thebits = 0 then
  41185. pTDefRegMap(@Self)^.clr := $00000008
  41186. else
  41187. pTDefRegMap(@Self)^.&set := $00000008;
  41188. end;
  41189. function TPMP_PMCON.getCS1P : TBits_1; inline;
  41190. begin
  41191. getCS1P := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  41192. end;
  41193. procedure TPMP_PMCON.setCS2P; inline;
  41194. begin
  41195. pTDefRegMap(@Self)^.&set := $00000010;
  41196. end;
  41197. procedure TPMP_PMCON.clearCS2P; inline;
  41198. begin
  41199. pTDefRegMap(@Self)^.clr := $00000010;
  41200. end;
  41201. procedure TPMP_PMCON.setCS2P(thebits : TBits_1); inline;
  41202. begin
  41203. if thebits = 0 then
  41204. pTDefRegMap(@Self)^.clr := $00000010
  41205. else
  41206. pTDefRegMap(@Self)^.&set := $00000010;
  41207. end;
  41208. function TPMP_PMCON.getCS2P : TBits_1; inline;
  41209. begin
  41210. getCS2P := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  41211. end;
  41212. procedure TPMP_PMCON.setALP; inline;
  41213. begin
  41214. pTDefRegMap(@Self)^.&set := $00000020;
  41215. end;
  41216. procedure TPMP_PMCON.clearALP; inline;
  41217. begin
  41218. pTDefRegMap(@Self)^.clr := $00000020;
  41219. end;
  41220. procedure TPMP_PMCON.setALP(thebits : TBits_1); inline;
  41221. begin
  41222. if thebits = 0 then
  41223. pTDefRegMap(@Self)^.clr := $00000020
  41224. else
  41225. pTDefRegMap(@Self)^.&set := $00000020;
  41226. end;
  41227. function TPMP_PMCON.getALP : TBits_1; inline;
  41228. begin
  41229. getALP := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41230. end;
  41231. procedure TPMP_PMCON.setCSF(thebits : TBits_2); inline;
  41232. begin
  41233. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  41234. end;
  41235. function TPMP_PMCON.getCSF : TBits_2; inline;
  41236. begin
  41237. getCSF := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  41238. end;
  41239. procedure TPMP_PMCON.setPTRDEN; inline;
  41240. begin
  41241. pTDefRegMap(@Self)^.&set := $00000100;
  41242. end;
  41243. procedure TPMP_PMCON.clearPTRDEN; inline;
  41244. begin
  41245. pTDefRegMap(@Self)^.clr := $00000100;
  41246. end;
  41247. procedure TPMP_PMCON.setPTRDEN(thebits : TBits_1); inline;
  41248. begin
  41249. if thebits = 0 then
  41250. pTDefRegMap(@Self)^.clr := $00000100
  41251. else
  41252. pTDefRegMap(@Self)^.&set := $00000100;
  41253. end;
  41254. function TPMP_PMCON.getPTRDEN : TBits_1; inline;
  41255. begin
  41256. getPTRDEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41257. end;
  41258. procedure TPMP_PMCON.setPTWREN; inline;
  41259. begin
  41260. pTDefRegMap(@Self)^.&set := $00000200;
  41261. end;
  41262. procedure TPMP_PMCON.clearPTWREN; inline;
  41263. begin
  41264. pTDefRegMap(@Self)^.clr := $00000200;
  41265. end;
  41266. procedure TPMP_PMCON.setPTWREN(thebits : TBits_1); inline;
  41267. begin
  41268. if thebits = 0 then
  41269. pTDefRegMap(@Self)^.clr := $00000200
  41270. else
  41271. pTDefRegMap(@Self)^.&set := $00000200;
  41272. end;
  41273. function TPMP_PMCON.getPTWREN : TBits_1; inline;
  41274. begin
  41275. getPTWREN := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  41276. end;
  41277. procedure TPMP_PMCON.setPMPTTL; inline;
  41278. begin
  41279. pTDefRegMap(@Self)^.&set := $00000400;
  41280. end;
  41281. procedure TPMP_PMCON.clearPMPTTL; inline;
  41282. begin
  41283. pTDefRegMap(@Self)^.clr := $00000400;
  41284. end;
  41285. procedure TPMP_PMCON.setPMPTTL(thebits : TBits_1); inline;
  41286. begin
  41287. if thebits = 0 then
  41288. pTDefRegMap(@Self)^.clr := $00000400
  41289. else
  41290. pTDefRegMap(@Self)^.&set := $00000400;
  41291. end;
  41292. function TPMP_PMCON.getPMPTTL : TBits_1; inline;
  41293. begin
  41294. getPMPTTL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  41295. end;
  41296. procedure TPMP_PMCON.setADRMUX(thebits : TBits_2); inline;
  41297. begin
  41298. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE7FF or ( thebits shl 11 );
  41299. end;
  41300. function TPMP_PMCON.getADRMUX : TBits_2; inline;
  41301. begin
  41302. getADRMUX := (pTDefRegMap(@Self)^.val and $00001800) shr 11;
  41303. end;
  41304. procedure TPMP_PMCON.setSIDL; inline;
  41305. begin
  41306. pTDefRegMap(@Self)^.&set := $00002000;
  41307. end;
  41308. procedure TPMP_PMCON.clearSIDL; inline;
  41309. begin
  41310. pTDefRegMap(@Self)^.clr := $00002000;
  41311. end;
  41312. procedure TPMP_PMCON.setSIDL(thebits : TBits_1); inline;
  41313. begin
  41314. if thebits = 0 then
  41315. pTDefRegMap(@Self)^.clr := $00002000
  41316. else
  41317. pTDefRegMap(@Self)^.&set := $00002000;
  41318. end;
  41319. function TPMP_PMCON.getSIDL : TBits_1; inline;
  41320. begin
  41321. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41322. end;
  41323. procedure TPMP_PMCON.setON; inline;
  41324. begin
  41325. pTDefRegMap(@Self)^.&set := $00008000;
  41326. end;
  41327. procedure TPMP_PMCON.clearON; inline;
  41328. begin
  41329. pTDefRegMap(@Self)^.clr := $00008000;
  41330. end;
  41331. procedure TPMP_PMCON.setON(thebits : TBits_1); inline;
  41332. begin
  41333. if thebits = 0 then
  41334. pTDefRegMap(@Self)^.clr := $00008000
  41335. else
  41336. pTDefRegMap(@Self)^.&set := $00008000;
  41337. end;
  41338. function TPMP_PMCON.getON : TBits_1; inline;
  41339. begin
  41340. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41341. end;
  41342. procedure TPMP_PMCON.setCSF0; inline;
  41343. begin
  41344. pTDefRegMap(@Self)^.&set := $00000040;
  41345. end;
  41346. procedure TPMP_PMCON.clearCSF0; inline;
  41347. begin
  41348. pTDefRegMap(@Self)^.clr := $00000040;
  41349. end;
  41350. procedure TPMP_PMCON.setCSF0(thebits : TBits_1); inline;
  41351. begin
  41352. if thebits = 0 then
  41353. pTDefRegMap(@Self)^.clr := $00000040
  41354. else
  41355. pTDefRegMap(@Self)^.&set := $00000040;
  41356. end;
  41357. function TPMP_PMCON.getCSF0 : TBits_1; inline;
  41358. begin
  41359. getCSF0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41360. end;
  41361. procedure TPMP_PMCON.setCSF1; inline;
  41362. begin
  41363. pTDefRegMap(@Self)^.&set := $00000080;
  41364. end;
  41365. procedure TPMP_PMCON.clearCSF1; inline;
  41366. begin
  41367. pTDefRegMap(@Self)^.clr := $00000080;
  41368. end;
  41369. procedure TPMP_PMCON.setCSF1(thebits : TBits_1); inline;
  41370. begin
  41371. if thebits = 0 then
  41372. pTDefRegMap(@Self)^.clr := $00000080
  41373. else
  41374. pTDefRegMap(@Self)^.&set := $00000080;
  41375. end;
  41376. function TPMP_PMCON.getCSF1 : TBits_1; inline;
  41377. begin
  41378. getCSF1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41379. end;
  41380. procedure TPMP_PMCON.setADRMUX0; inline;
  41381. begin
  41382. pTDefRegMap(@Self)^.&set := $00000800;
  41383. end;
  41384. procedure TPMP_PMCON.clearADRMUX0; inline;
  41385. begin
  41386. pTDefRegMap(@Self)^.clr := $00000800;
  41387. end;
  41388. procedure TPMP_PMCON.setADRMUX0(thebits : TBits_1); inline;
  41389. begin
  41390. if thebits = 0 then
  41391. pTDefRegMap(@Self)^.clr := $00000800
  41392. else
  41393. pTDefRegMap(@Self)^.&set := $00000800;
  41394. end;
  41395. function TPMP_PMCON.getADRMUX0 : TBits_1; inline;
  41396. begin
  41397. getADRMUX0 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41398. end;
  41399. procedure TPMP_PMCON.setADRMUX1; inline;
  41400. begin
  41401. pTDefRegMap(@Self)^.&set := $00001000;
  41402. end;
  41403. procedure TPMP_PMCON.clearADRMUX1; inline;
  41404. begin
  41405. pTDefRegMap(@Self)^.clr := $00001000;
  41406. end;
  41407. procedure TPMP_PMCON.setADRMUX1(thebits : TBits_1); inline;
  41408. begin
  41409. if thebits = 0 then
  41410. pTDefRegMap(@Self)^.clr := $00001000
  41411. else
  41412. pTDefRegMap(@Self)^.&set := $00001000;
  41413. end;
  41414. function TPMP_PMCON.getADRMUX1 : TBits_1; inline;
  41415. begin
  41416. getADRMUX1 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  41417. end;
  41418. procedure TPMP_PMCON.setPSIDL; inline;
  41419. begin
  41420. pTDefRegMap(@Self)^.&set := $00002000;
  41421. end;
  41422. procedure TPMP_PMCON.clearPSIDL; inline;
  41423. begin
  41424. pTDefRegMap(@Self)^.clr := $00002000;
  41425. end;
  41426. procedure TPMP_PMCON.setPSIDL(thebits : TBits_1); inline;
  41427. begin
  41428. if thebits = 0 then
  41429. pTDefRegMap(@Self)^.clr := $00002000
  41430. else
  41431. pTDefRegMap(@Self)^.&set := $00002000;
  41432. end;
  41433. function TPMP_PMCON.getPSIDL : TBits_1; inline;
  41434. begin
  41435. getPSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41436. end;
  41437. procedure TPMP_PMCON.setPMPEN; inline;
  41438. begin
  41439. pTDefRegMap(@Self)^.&set := $00008000;
  41440. end;
  41441. procedure TPMP_PMCON.clearPMPEN; inline;
  41442. begin
  41443. pTDefRegMap(@Self)^.clr := $00008000;
  41444. end;
  41445. procedure TPMP_PMCON.setPMPEN(thebits : TBits_1); inline;
  41446. begin
  41447. if thebits = 0 then
  41448. pTDefRegMap(@Self)^.clr := $00008000
  41449. else
  41450. pTDefRegMap(@Self)^.&set := $00008000;
  41451. end;
  41452. function TPMP_PMCON.getPMPEN : TBits_1; inline;
  41453. begin
  41454. getPMPEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41455. end;
  41456. procedure TPMP_PMCON.setw(thebits : TBits_32); inline;
  41457. begin
  41458. pTDefRegMap(@Self)^.val := thebits;
  41459. end;
  41460. function TPMP_PMCON.getw : TBits_32; inline;
  41461. begin
  41462. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41463. end;
  41464. procedure TPMP_PMMODE.setWAITE(thebits : TBits_2); inline;
  41465. begin
  41466. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  41467. end;
  41468. function TPMP_PMMODE.getWAITE : TBits_2; inline;
  41469. begin
  41470. getWAITE := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  41471. end;
  41472. procedure TPMP_PMMODE.setWAITM(thebits : TBits_4); inline;
  41473. begin
  41474. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  41475. end;
  41476. function TPMP_PMMODE.getWAITM : TBits_4; inline;
  41477. begin
  41478. getWAITM := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  41479. end;
  41480. procedure TPMP_PMMODE.setWAITB(thebits : TBits_2); inline;
  41481. begin
  41482. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  41483. end;
  41484. function TPMP_PMMODE.getWAITB : TBits_2; inline;
  41485. begin
  41486. getWAITB := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  41487. end;
  41488. procedure TPMP_PMMODE.setMODE(thebits : TBits_2); inline;
  41489. begin
  41490. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  41491. end;
  41492. function TPMP_PMMODE.getMODE : TBits_2; inline;
  41493. begin
  41494. getMODE := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  41495. end;
  41496. procedure TPMP_PMMODE.setMODE16; inline;
  41497. begin
  41498. pTDefRegMap(@Self)^.&set := $00000400;
  41499. end;
  41500. procedure TPMP_PMMODE.clearMODE16; inline;
  41501. begin
  41502. pTDefRegMap(@Self)^.clr := $00000400;
  41503. end;
  41504. procedure TPMP_PMMODE.setMODE16(thebits : TBits_1); inline;
  41505. begin
  41506. if thebits = 0 then
  41507. pTDefRegMap(@Self)^.clr := $00000400
  41508. else
  41509. pTDefRegMap(@Self)^.&set := $00000400;
  41510. end;
  41511. function TPMP_PMMODE.getMODE16 : TBits_1; inline;
  41512. begin
  41513. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  41514. end;
  41515. procedure TPMP_PMMODE.setINCM(thebits : TBits_2); inline;
  41516. begin
  41517. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE7FF or ( thebits shl 11 );
  41518. end;
  41519. function TPMP_PMMODE.getINCM : TBits_2; inline;
  41520. begin
  41521. getINCM := (pTDefRegMap(@Self)^.val and $00001800) shr 11;
  41522. end;
  41523. procedure TPMP_PMMODE.setIRQM(thebits : TBits_2); inline;
  41524. begin
  41525. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  41526. end;
  41527. function TPMP_PMMODE.getIRQM : TBits_2; inline;
  41528. begin
  41529. getIRQM := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  41530. end;
  41531. procedure TPMP_PMMODE.setBUSY; inline;
  41532. begin
  41533. pTDefRegMap(@Self)^.&set := $00008000;
  41534. end;
  41535. procedure TPMP_PMMODE.clearBUSY; inline;
  41536. begin
  41537. pTDefRegMap(@Self)^.clr := $00008000;
  41538. end;
  41539. procedure TPMP_PMMODE.setBUSY(thebits : TBits_1); inline;
  41540. begin
  41541. if thebits = 0 then
  41542. pTDefRegMap(@Self)^.clr := $00008000
  41543. else
  41544. pTDefRegMap(@Self)^.&set := $00008000;
  41545. end;
  41546. function TPMP_PMMODE.getBUSY : TBits_1; inline;
  41547. begin
  41548. getBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41549. end;
  41550. procedure TPMP_PMMODE.setWAITE0; inline;
  41551. begin
  41552. pTDefRegMap(@Self)^.&set := $00000001;
  41553. end;
  41554. procedure TPMP_PMMODE.clearWAITE0; inline;
  41555. begin
  41556. pTDefRegMap(@Self)^.clr := $00000001;
  41557. end;
  41558. procedure TPMP_PMMODE.setWAITE0(thebits : TBits_1); inline;
  41559. begin
  41560. if thebits = 0 then
  41561. pTDefRegMap(@Self)^.clr := $00000001
  41562. else
  41563. pTDefRegMap(@Self)^.&set := $00000001;
  41564. end;
  41565. function TPMP_PMMODE.getWAITE0 : TBits_1; inline;
  41566. begin
  41567. getWAITE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41568. end;
  41569. procedure TPMP_PMMODE.setWAITE1; inline;
  41570. begin
  41571. pTDefRegMap(@Self)^.&set := $00000002;
  41572. end;
  41573. procedure TPMP_PMMODE.clearWAITE1; inline;
  41574. begin
  41575. pTDefRegMap(@Self)^.clr := $00000002;
  41576. end;
  41577. procedure TPMP_PMMODE.setWAITE1(thebits : TBits_1); inline;
  41578. begin
  41579. if thebits = 0 then
  41580. pTDefRegMap(@Self)^.clr := $00000002
  41581. else
  41582. pTDefRegMap(@Self)^.&set := $00000002;
  41583. end;
  41584. function TPMP_PMMODE.getWAITE1 : TBits_1; inline;
  41585. begin
  41586. getWAITE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41587. end;
  41588. procedure TPMP_PMMODE.setWAITM0; inline;
  41589. begin
  41590. pTDefRegMap(@Self)^.&set := $00000004;
  41591. end;
  41592. procedure TPMP_PMMODE.clearWAITM0; inline;
  41593. begin
  41594. pTDefRegMap(@Self)^.clr := $00000004;
  41595. end;
  41596. procedure TPMP_PMMODE.setWAITM0(thebits : TBits_1); inline;
  41597. begin
  41598. if thebits = 0 then
  41599. pTDefRegMap(@Self)^.clr := $00000004
  41600. else
  41601. pTDefRegMap(@Self)^.&set := $00000004;
  41602. end;
  41603. function TPMP_PMMODE.getWAITM0 : TBits_1; inline;
  41604. begin
  41605. getWAITM0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  41606. end;
  41607. procedure TPMP_PMMODE.setWAITM1; inline;
  41608. begin
  41609. pTDefRegMap(@Self)^.&set := $00000008;
  41610. end;
  41611. procedure TPMP_PMMODE.clearWAITM1; inline;
  41612. begin
  41613. pTDefRegMap(@Self)^.clr := $00000008;
  41614. end;
  41615. procedure TPMP_PMMODE.setWAITM1(thebits : TBits_1); inline;
  41616. begin
  41617. if thebits = 0 then
  41618. pTDefRegMap(@Self)^.clr := $00000008
  41619. else
  41620. pTDefRegMap(@Self)^.&set := $00000008;
  41621. end;
  41622. function TPMP_PMMODE.getWAITM1 : TBits_1; inline;
  41623. begin
  41624. getWAITM1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  41625. end;
  41626. procedure TPMP_PMMODE.setWAITM2; inline;
  41627. begin
  41628. pTDefRegMap(@Self)^.&set := $00000010;
  41629. end;
  41630. procedure TPMP_PMMODE.clearWAITM2; inline;
  41631. begin
  41632. pTDefRegMap(@Self)^.clr := $00000010;
  41633. end;
  41634. procedure TPMP_PMMODE.setWAITM2(thebits : TBits_1); inline;
  41635. begin
  41636. if thebits = 0 then
  41637. pTDefRegMap(@Self)^.clr := $00000010
  41638. else
  41639. pTDefRegMap(@Self)^.&set := $00000010;
  41640. end;
  41641. function TPMP_PMMODE.getWAITM2 : TBits_1; inline;
  41642. begin
  41643. getWAITM2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  41644. end;
  41645. procedure TPMP_PMMODE.setWAITM3; inline;
  41646. begin
  41647. pTDefRegMap(@Self)^.&set := $00000020;
  41648. end;
  41649. procedure TPMP_PMMODE.clearWAITM3; inline;
  41650. begin
  41651. pTDefRegMap(@Self)^.clr := $00000020;
  41652. end;
  41653. procedure TPMP_PMMODE.setWAITM3(thebits : TBits_1); inline;
  41654. begin
  41655. if thebits = 0 then
  41656. pTDefRegMap(@Self)^.clr := $00000020
  41657. else
  41658. pTDefRegMap(@Self)^.&set := $00000020;
  41659. end;
  41660. function TPMP_PMMODE.getWAITM3 : TBits_1; inline;
  41661. begin
  41662. getWAITM3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41663. end;
  41664. procedure TPMP_PMMODE.setWAITB0; inline;
  41665. begin
  41666. pTDefRegMap(@Self)^.&set := $00000040;
  41667. end;
  41668. procedure TPMP_PMMODE.clearWAITB0; inline;
  41669. begin
  41670. pTDefRegMap(@Self)^.clr := $00000040;
  41671. end;
  41672. procedure TPMP_PMMODE.setWAITB0(thebits : TBits_1); inline;
  41673. begin
  41674. if thebits = 0 then
  41675. pTDefRegMap(@Self)^.clr := $00000040
  41676. else
  41677. pTDefRegMap(@Self)^.&set := $00000040;
  41678. end;
  41679. function TPMP_PMMODE.getWAITB0 : TBits_1; inline;
  41680. begin
  41681. getWAITB0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41682. end;
  41683. procedure TPMP_PMMODE.setWAITB1; inline;
  41684. begin
  41685. pTDefRegMap(@Self)^.&set := $00000080;
  41686. end;
  41687. procedure TPMP_PMMODE.clearWAITB1; inline;
  41688. begin
  41689. pTDefRegMap(@Self)^.clr := $00000080;
  41690. end;
  41691. procedure TPMP_PMMODE.setWAITB1(thebits : TBits_1); inline;
  41692. begin
  41693. if thebits = 0 then
  41694. pTDefRegMap(@Self)^.clr := $00000080
  41695. else
  41696. pTDefRegMap(@Self)^.&set := $00000080;
  41697. end;
  41698. function TPMP_PMMODE.getWAITB1 : TBits_1; inline;
  41699. begin
  41700. getWAITB1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41701. end;
  41702. procedure TPMP_PMMODE.setMODE0; inline;
  41703. begin
  41704. pTDefRegMap(@Self)^.&set := $00000100;
  41705. end;
  41706. procedure TPMP_PMMODE.clearMODE0; inline;
  41707. begin
  41708. pTDefRegMap(@Self)^.clr := $00000100;
  41709. end;
  41710. procedure TPMP_PMMODE.setMODE0(thebits : TBits_1); inline;
  41711. begin
  41712. if thebits = 0 then
  41713. pTDefRegMap(@Self)^.clr := $00000100
  41714. else
  41715. pTDefRegMap(@Self)^.&set := $00000100;
  41716. end;
  41717. function TPMP_PMMODE.getMODE0 : TBits_1; inline;
  41718. begin
  41719. getMODE0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41720. end;
  41721. procedure TPMP_PMMODE.setMODE1; inline;
  41722. begin
  41723. pTDefRegMap(@Self)^.&set := $00000200;
  41724. end;
  41725. procedure TPMP_PMMODE.clearMODE1; inline;
  41726. begin
  41727. pTDefRegMap(@Self)^.clr := $00000200;
  41728. end;
  41729. procedure TPMP_PMMODE.setMODE1(thebits : TBits_1); inline;
  41730. begin
  41731. if thebits = 0 then
  41732. pTDefRegMap(@Self)^.clr := $00000200
  41733. else
  41734. pTDefRegMap(@Self)^.&set := $00000200;
  41735. end;
  41736. function TPMP_PMMODE.getMODE1 : TBits_1; inline;
  41737. begin
  41738. getMODE1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  41739. end;
  41740. procedure TPMP_PMMODE.setINCM0; inline;
  41741. begin
  41742. pTDefRegMap(@Self)^.&set := $00000800;
  41743. end;
  41744. procedure TPMP_PMMODE.clearINCM0; inline;
  41745. begin
  41746. pTDefRegMap(@Self)^.clr := $00000800;
  41747. end;
  41748. procedure TPMP_PMMODE.setINCM0(thebits : TBits_1); inline;
  41749. begin
  41750. if thebits = 0 then
  41751. pTDefRegMap(@Self)^.clr := $00000800
  41752. else
  41753. pTDefRegMap(@Self)^.&set := $00000800;
  41754. end;
  41755. function TPMP_PMMODE.getINCM0 : TBits_1; inline;
  41756. begin
  41757. getINCM0 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41758. end;
  41759. procedure TPMP_PMMODE.setINCM1; inline;
  41760. begin
  41761. pTDefRegMap(@Self)^.&set := $00001000;
  41762. end;
  41763. procedure TPMP_PMMODE.clearINCM1; inline;
  41764. begin
  41765. pTDefRegMap(@Self)^.clr := $00001000;
  41766. end;
  41767. procedure TPMP_PMMODE.setINCM1(thebits : TBits_1); inline;
  41768. begin
  41769. if thebits = 0 then
  41770. pTDefRegMap(@Self)^.clr := $00001000
  41771. else
  41772. pTDefRegMap(@Self)^.&set := $00001000;
  41773. end;
  41774. function TPMP_PMMODE.getINCM1 : TBits_1; inline;
  41775. begin
  41776. getINCM1 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  41777. end;
  41778. procedure TPMP_PMMODE.setIRQM0; inline;
  41779. begin
  41780. pTDefRegMap(@Self)^.&set := $00002000;
  41781. end;
  41782. procedure TPMP_PMMODE.clearIRQM0; inline;
  41783. begin
  41784. pTDefRegMap(@Self)^.clr := $00002000;
  41785. end;
  41786. procedure TPMP_PMMODE.setIRQM0(thebits : TBits_1); inline;
  41787. begin
  41788. if thebits = 0 then
  41789. pTDefRegMap(@Self)^.clr := $00002000
  41790. else
  41791. pTDefRegMap(@Self)^.&set := $00002000;
  41792. end;
  41793. function TPMP_PMMODE.getIRQM0 : TBits_1; inline;
  41794. begin
  41795. getIRQM0 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41796. end;
  41797. procedure TPMP_PMMODE.setIRQM1; inline;
  41798. begin
  41799. pTDefRegMap(@Self)^.&set := $00004000;
  41800. end;
  41801. procedure TPMP_PMMODE.clearIRQM1; inline;
  41802. begin
  41803. pTDefRegMap(@Self)^.clr := $00004000;
  41804. end;
  41805. procedure TPMP_PMMODE.setIRQM1(thebits : TBits_1); inline;
  41806. begin
  41807. if thebits = 0 then
  41808. pTDefRegMap(@Self)^.clr := $00004000
  41809. else
  41810. pTDefRegMap(@Self)^.&set := $00004000;
  41811. end;
  41812. function TPMP_PMMODE.getIRQM1 : TBits_1; inline;
  41813. begin
  41814. getIRQM1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  41815. end;
  41816. procedure TPMP_PMMODE.setw(thebits : TBits_32); inline;
  41817. begin
  41818. pTDefRegMap(@Self)^.val := thebits;
  41819. end;
  41820. function TPMP_PMMODE.getw : TBits_32; inline;
  41821. begin
  41822. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41823. end;
  41824. procedure TPMP_PMADDR.setADDR(thebits : TBits_14); inline;
  41825. begin
  41826. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC000 or ( thebits shl 0 );
  41827. end;
  41828. function TPMP_PMADDR.getADDR : TBits_14; inline;
  41829. begin
  41830. getADDR := (pTDefRegMap(@Self)^.val and $00003FFF) shr 0;
  41831. end;
  41832. procedure TPMP_PMADDR.setCS(thebits : TBits_2); inline;
  41833. begin
  41834. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  41835. end;
  41836. function TPMP_PMADDR.getCS : TBits_2; inline;
  41837. begin
  41838. getCS := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  41839. end;
  41840. procedure TPMP_PMADDR.setPADDR(thebits : TBits_14); inline;
  41841. begin
  41842. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC000 or ( thebits shl 0 );
  41843. end;
  41844. function TPMP_PMADDR.getPADDR : TBits_14; inline;
  41845. begin
  41846. getPADDR := (pTDefRegMap(@Self)^.val and $00003FFF) shr 0;
  41847. end;
  41848. procedure TPMP_PMADDR.setCS1; inline;
  41849. begin
  41850. pTDefRegMap(@Self)^.&set := $00004000;
  41851. end;
  41852. procedure TPMP_PMADDR.clearCS1; inline;
  41853. begin
  41854. pTDefRegMap(@Self)^.clr := $00004000;
  41855. end;
  41856. procedure TPMP_PMADDR.setCS1(thebits : TBits_1); inline;
  41857. begin
  41858. if thebits = 0 then
  41859. pTDefRegMap(@Self)^.clr := $00004000
  41860. else
  41861. pTDefRegMap(@Self)^.&set := $00004000;
  41862. end;
  41863. function TPMP_PMADDR.getCS1 : TBits_1; inline;
  41864. begin
  41865. getCS1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  41866. end;
  41867. procedure TPMP_PMADDR.setCS2; inline;
  41868. begin
  41869. pTDefRegMap(@Self)^.&set := $00008000;
  41870. end;
  41871. procedure TPMP_PMADDR.clearCS2; inline;
  41872. begin
  41873. pTDefRegMap(@Self)^.clr := $00008000;
  41874. end;
  41875. procedure TPMP_PMADDR.setCS2(thebits : TBits_1); inline;
  41876. begin
  41877. if thebits = 0 then
  41878. pTDefRegMap(@Self)^.clr := $00008000
  41879. else
  41880. pTDefRegMap(@Self)^.&set := $00008000;
  41881. end;
  41882. function TPMP_PMADDR.getCS2 : TBits_1; inline;
  41883. begin
  41884. getCS2 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41885. end;
  41886. procedure TPMP_PMADDR.setw(thebits : TBits_32); inline;
  41887. begin
  41888. pTDefRegMap(@Self)^.val := thebits;
  41889. end;
  41890. function TPMP_PMADDR.getw : TBits_32; inline;
  41891. begin
  41892. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41893. end;
  41894. procedure TPMP_PMDOUT.setDATAOUT(thebits : TBits_32); inline;
  41895. begin
  41896. pTDefRegMap(@Self)^.val := thebits;
  41897. end;
  41898. function TPMP_PMDOUT.getDATAOUT : TBits_32; inline;
  41899. begin
  41900. getDATAOUT := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41901. end;
  41902. procedure TPMP_PMDOUT.setw(thebits : TBits_32); inline;
  41903. begin
  41904. pTDefRegMap(@Self)^.val := thebits;
  41905. end;
  41906. function TPMP_PMDOUT.getw : TBits_32; inline;
  41907. begin
  41908. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41909. end;
  41910. procedure TPMP_PMDIN.setDATAIN(thebits : TBits_32); inline;
  41911. begin
  41912. pTDefRegMap(@Self)^.val := thebits;
  41913. end;
  41914. function TPMP_PMDIN.getDATAIN : TBits_32; inline;
  41915. begin
  41916. getDATAIN := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41917. end;
  41918. procedure TPMP_PMDIN.setw(thebits : TBits_32); inline;
  41919. begin
  41920. pTDefRegMap(@Self)^.val := thebits;
  41921. end;
  41922. function TPMP_PMDIN.getw : TBits_32; inline;
  41923. begin
  41924. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41925. end;
  41926. procedure TPMP_PMAEN.setPTEN(thebits : TBits_16); inline;
  41927. begin
  41928. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  41929. end;
  41930. function TPMP_PMAEN.getPTEN : TBits_16; inline;
  41931. begin
  41932. getPTEN := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  41933. end;
  41934. procedure TPMP_PMAEN.setPTEN0; inline;
  41935. begin
  41936. pTDefRegMap(@Self)^.&set := $00000001;
  41937. end;
  41938. procedure TPMP_PMAEN.clearPTEN0; inline;
  41939. begin
  41940. pTDefRegMap(@Self)^.clr := $00000001;
  41941. end;
  41942. procedure TPMP_PMAEN.setPTEN0(thebits : TBits_1); inline;
  41943. begin
  41944. if thebits = 0 then
  41945. pTDefRegMap(@Self)^.clr := $00000001
  41946. else
  41947. pTDefRegMap(@Self)^.&set := $00000001;
  41948. end;
  41949. function TPMP_PMAEN.getPTEN0 : TBits_1; inline;
  41950. begin
  41951. getPTEN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41952. end;
  41953. procedure TPMP_PMAEN.setPTEN1; inline;
  41954. begin
  41955. pTDefRegMap(@Self)^.&set := $00000002;
  41956. end;
  41957. procedure TPMP_PMAEN.clearPTEN1; inline;
  41958. begin
  41959. pTDefRegMap(@Self)^.clr := $00000002;
  41960. end;
  41961. procedure TPMP_PMAEN.setPTEN1(thebits : TBits_1); inline;
  41962. begin
  41963. if thebits = 0 then
  41964. pTDefRegMap(@Self)^.clr := $00000002
  41965. else
  41966. pTDefRegMap(@Self)^.&set := $00000002;
  41967. end;
  41968. function TPMP_PMAEN.getPTEN1 : TBits_1; inline;
  41969. begin
  41970. getPTEN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41971. end;
  41972. procedure TPMP_PMAEN.setPTEN2; inline;
  41973. begin
  41974. pTDefRegMap(@Self)^.&set := $00000004;
  41975. end;
  41976. procedure TPMP_PMAEN.clearPTEN2; inline;
  41977. begin
  41978. pTDefRegMap(@Self)^.clr := $00000004;
  41979. end;
  41980. procedure TPMP_PMAEN.setPTEN2(thebits : TBits_1); inline;
  41981. begin
  41982. if thebits = 0 then
  41983. pTDefRegMap(@Self)^.clr := $00000004
  41984. else
  41985. pTDefRegMap(@Self)^.&set := $00000004;
  41986. end;
  41987. function TPMP_PMAEN.getPTEN2 : TBits_1; inline;
  41988. begin
  41989. getPTEN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  41990. end;
  41991. procedure TPMP_PMAEN.setPTEN3; inline;
  41992. begin
  41993. pTDefRegMap(@Self)^.&set := $00000008;
  41994. end;
  41995. procedure TPMP_PMAEN.clearPTEN3; inline;
  41996. begin
  41997. pTDefRegMap(@Self)^.clr := $00000008;
  41998. end;
  41999. procedure TPMP_PMAEN.setPTEN3(thebits : TBits_1); inline;
  42000. begin
  42001. if thebits = 0 then
  42002. pTDefRegMap(@Self)^.clr := $00000008
  42003. else
  42004. pTDefRegMap(@Self)^.&set := $00000008;
  42005. end;
  42006. function TPMP_PMAEN.getPTEN3 : TBits_1; inline;
  42007. begin
  42008. getPTEN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42009. end;
  42010. procedure TPMP_PMAEN.setPTEN4; inline;
  42011. begin
  42012. pTDefRegMap(@Self)^.&set := $00000010;
  42013. end;
  42014. procedure TPMP_PMAEN.clearPTEN4; inline;
  42015. begin
  42016. pTDefRegMap(@Self)^.clr := $00000010;
  42017. end;
  42018. procedure TPMP_PMAEN.setPTEN4(thebits : TBits_1); inline;
  42019. begin
  42020. if thebits = 0 then
  42021. pTDefRegMap(@Self)^.clr := $00000010
  42022. else
  42023. pTDefRegMap(@Self)^.&set := $00000010;
  42024. end;
  42025. function TPMP_PMAEN.getPTEN4 : TBits_1; inline;
  42026. begin
  42027. getPTEN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  42028. end;
  42029. procedure TPMP_PMAEN.setPTEN5; inline;
  42030. begin
  42031. pTDefRegMap(@Self)^.&set := $00000020;
  42032. end;
  42033. procedure TPMP_PMAEN.clearPTEN5; inline;
  42034. begin
  42035. pTDefRegMap(@Self)^.clr := $00000020;
  42036. end;
  42037. procedure TPMP_PMAEN.setPTEN5(thebits : TBits_1); inline;
  42038. begin
  42039. if thebits = 0 then
  42040. pTDefRegMap(@Self)^.clr := $00000020
  42041. else
  42042. pTDefRegMap(@Self)^.&set := $00000020;
  42043. end;
  42044. function TPMP_PMAEN.getPTEN5 : TBits_1; inline;
  42045. begin
  42046. getPTEN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42047. end;
  42048. procedure TPMP_PMAEN.setPTEN6; inline;
  42049. begin
  42050. pTDefRegMap(@Self)^.&set := $00000040;
  42051. end;
  42052. procedure TPMP_PMAEN.clearPTEN6; inline;
  42053. begin
  42054. pTDefRegMap(@Self)^.clr := $00000040;
  42055. end;
  42056. procedure TPMP_PMAEN.setPTEN6(thebits : TBits_1); inline;
  42057. begin
  42058. if thebits = 0 then
  42059. pTDefRegMap(@Self)^.clr := $00000040
  42060. else
  42061. pTDefRegMap(@Self)^.&set := $00000040;
  42062. end;
  42063. function TPMP_PMAEN.getPTEN6 : TBits_1; inline;
  42064. begin
  42065. getPTEN6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42066. end;
  42067. procedure TPMP_PMAEN.setPTEN7; inline;
  42068. begin
  42069. pTDefRegMap(@Self)^.&set := $00000080;
  42070. end;
  42071. procedure TPMP_PMAEN.clearPTEN7; inline;
  42072. begin
  42073. pTDefRegMap(@Self)^.clr := $00000080;
  42074. end;
  42075. procedure TPMP_PMAEN.setPTEN7(thebits : TBits_1); inline;
  42076. begin
  42077. if thebits = 0 then
  42078. pTDefRegMap(@Self)^.clr := $00000080
  42079. else
  42080. pTDefRegMap(@Self)^.&set := $00000080;
  42081. end;
  42082. function TPMP_PMAEN.getPTEN7 : TBits_1; inline;
  42083. begin
  42084. getPTEN7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42085. end;
  42086. procedure TPMP_PMAEN.setPTEN8; inline;
  42087. begin
  42088. pTDefRegMap(@Self)^.&set := $00000100;
  42089. end;
  42090. procedure TPMP_PMAEN.clearPTEN8; inline;
  42091. begin
  42092. pTDefRegMap(@Self)^.clr := $00000100;
  42093. end;
  42094. procedure TPMP_PMAEN.setPTEN8(thebits : TBits_1); inline;
  42095. begin
  42096. if thebits = 0 then
  42097. pTDefRegMap(@Self)^.clr := $00000100
  42098. else
  42099. pTDefRegMap(@Self)^.&set := $00000100;
  42100. end;
  42101. function TPMP_PMAEN.getPTEN8 : TBits_1; inline;
  42102. begin
  42103. getPTEN8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42104. end;
  42105. procedure TPMP_PMAEN.setPTEN9; inline;
  42106. begin
  42107. pTDefRegMap(@Self)^.&set := $00000200;
  42108. end;
  42109. procedure TPMP_PMAEN.clearPTEN9; inline;
  42110. begin
  42111. pTDefRegMap(@Self)^.clr := $00000200;
  42112. end;
  42113. procedure TPMP_PMAEN.setPTEN9(thebits : TBits_1); inline;
  42114. begin
  42115. if thebits = 0 then
  42116. pTDefRegMap(@Self)^.clr := $00000200
  42117. else
  42118. pTDefRegMap(@Self)^.&set := $00000200;
  42119. end;
  42120. function TPMP_PMAEN.getPTEN9 : TBits_1; inline;
  42121. begin
  42122. getPTEN9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42123. end;
  42124. procedure TPMP_PMAEN.setPTEN10; inline;
  42125. begin
  42126. pTDefRegMap(@Self)^.&set := $00000400;
  42127. end;
  42128. procedure TPMP_PMAEN.clearPTEN10; inline;
  42129. begin
  42130. pTDefRegMap(@Self)^.clr := $00000400;
  42131. end;
  42132. procedure TPMP_PMAEN.setPTEN10(thebits : TBits_1); inline;
  42133. begin
  42134. if thebits = 0 then
  42135. pTDefRegMap(@Self)^.clr := $00000400
  42136. else
  42137. pTDefRegMap(@Self)^.&set := $00000400;
  42138. end;
  42139. function TPMP_PMAEN.getPTEN10 : TBits_1; inline;
  42140. begin
  42141. getPTEN10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  42142. end;
  42143. procedure TPMP_PMAEN.setPTEN11; inline;
  42144. begin
  42145. pTDefRegMap(@Self)^.&set := $00000800;
  42146. end;
  42147. procedure TPMP_PMAEN.clearPTEN11; inline;
  42148. begin
  42149. pTDefRegMap(@Self)^.clr := $00000800;
  42150. end;
  42151. procedure TPMP_PMAEN.setPTEN11(thebits : TBits_1); inline;
  42152. begin
  42153. if thebits = 0 then
  42154. pTDefRegMap(@Self)^.clr := $00000800
  42155. else
  42156. pTDefRegMap(@Self)^.&set := $00000800;
  42157. end;
  42158. function TPMP_PMAEN.getPTEN11 : TBits_1; inline;
  42159. begin
  42160. getPTEN11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42161. end;
  42162. procedure TPMP_PMAEN.setPTEN12; inline;
  42163. begin
  42164. pTDefRegMap(@Self)^.&set := $00001000;
  42165. end;
  42166. procedure TPMP_PMAEN.clearPTEN12; inline;
  42167. begin
  42168. pTDefRegMap(@Self)^.clr := $00001000;
  42169. end;
  42170. procedure TPMP_PMAEN.setPTEN12(thebits : TBits_1); inline;
  42171. begin
  42172. if thebits = 0 then
  42173. pTDefRegMap(@Self)^.clr := $00001000
  42174. else
  42175. pTDefRegMap(@Self)^.&set := $00001000;
  42176. end;
  42177. function TPMP_PMAEN.getPTEN12 : TBits_1; inline;
  42178. begin
  42179. getPTEN12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  42180. end;
  42181. procedure TPMP_PMAEN.setPTEN13; inline;
  42182. begin
  42183. pTDefRegMap(@Self)^.&set := $00002000;
  42184. end;
  42185. procedure TPMP_PMAEN.clearPTEN13; inline;
  42186. begin
  42187. pTDefRegMap(@Self)^.clr := $00002000;
  42188. end;
  42189. procedure TPMP_PMAEN.setPTEN13(thebits : TBits_1); inline;
  42190. begin
  42191. if thebits = 0 then
  42192. pTDefRegMap(@Self)^.clr := $00002000
  42193. else
  42194. pTDefRegMap(@Self)^.&set := $00002000;
  42195. end;
  42196. function TPMP_PMAEN.getPTEN13 : TBits_1; inline;
  42197. begin
  42198. getPTEN13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42199. end;
  42200. procedure TPMP_PMAEN.setPTEN14; inline;
  42201. begin
  42202. pTDefRegMap(@Self)^.&set := $00004000;
  42203. end;
  42204. procedure TPMP_PMAEN.clearPTEN14; inline;
  42205. begin
  42206. pTDefRegMap(@Self)^.clr := $00004000;
  42207. end;
  42208. procedure TPMP_PMAEN.setPTEN14(thebits : TBits_1); inline;
  42209. begin
  42210. if thebits = 0 then
  42211. pTDefRegMap(@Self)^.clr := $00004000
  42212. else
  42213. pTDefRegMap(@Self)^.&set := $00004000;
  42214. end;
  42215. function TPMP_PMAEN.getPTEN14 : TBits_1; inline;
  42216. begin
  42217. getPTEN14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  42218. end;
  42219. procedure TPMP_PMAEN.setPTEN15; inline;
  42220. begin
  42221. pTDefRegMap(@Self)^.&set := $00008000;
  42222. end;
  42223. procedure TPMP_PMAEN.clearPTEN15; inline;
  42224. begin
  42225. pTDefRegMap(@Self)^.clr := $00008000;
  42226. end;
  42227. procedure TPMP_PMAEN.setPTEN15(thebits : TBits_1); inline;
  42228. begin
  42229. if thebits = 0 then
  42230. pTDefRegMap(@Self)^.clr := $00008000
  42231. else
  42232. pTDefRegMap(@Self)^.&set := $00008000;
  42233. end;
  42234. function TPMP_PMAEN.getPTEN15 : TBits_1; inline;
  42235. begin
  42236. getPTEN15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42237. end;
  42238. procedure TPMP_PMAEN.setw(thebits : TBits_32); inline;
  42239. begin
  42240. pTDefRegMap(@Self)^.val := thebits;
  42241. end;
  42242. function TPMP_PMAEN.getw : TBits_32; inline;
  42243. begin
  42244. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42245. end;
  42246. procedure TPMP_PMSTAT.setOB0E; inline;
  42247. begin
  42248. pTDefRegMap(@Self)^.&set := $00000001;
  42249. end;
  42250. procedure TPMP_PMSTAT.clearOB0E; inline;
  42251. begin
  42252. pTDefRegMap(@Self)^.clr := $00000001;
  42253. end;
  42254. procedure TPMP_PMSTAT.setOB0E(thebits : TBits_1); inline;
  42255. begin
  42256. if thebits = 0 then
  42257. pTDefRegMap(@Self)^.clr := $00000001
  42258. else
  42259. pTDefRegMap(@Self)^.&set := $00000001;
  42260. end;
  42261. function TPMP_PMSTAT.getOB0E : TBits_1; inline;
  42262. begin
  42263. getOB0E := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42264. end;
  42265. procedure TPMP_PMSTAT.setOB1E; inline;
  42266. begin
  42267. pTDefRegMap(@Self)^.&set := $00000002;
  42268. end;
  42269. procedure TPMP_PMSTAT.clearOB1E; inline;
  42270. begin
  42271. pTDefRegMap(@Self)^.clr := $00000002;
  42272. end;
  42273. procedure TPMP_PMSTAT.setOB1E(thebits : TBits_1); inline;
  42274. begin
  42275. if thebits = 0 then
  42276. pTDefRegMap(@Self)^.clr := $00000002
  42277. else
  42278. pTDefRegMap(@Self)^.&set := $00000002;
  42279. end;
  42280. function TPMP_PMSTAT.getOB1E : TBits_1; inline;
  42281. begin
  42282. getOB1E := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42283. end;
  42284. procedure TPMP_PMSTAT.setOB2E; inline;
  42285. begin
  42286. pTDefRegMap(@Self)^.&set := $00000004;
  42287. end;
  42288. procedure TPMP_PMSTAT.clearOB2E; inline;
  42289. begin
  42290. pTDefRegMap(@Self)^.clr := $00000004;
  42291. end;
  42292. procedure TPMP_PMSTAT.setOB2E(thebits : TBits_1); inline;
  42293. begin
  42294. if thebits = 0 then
  42295. pTDefRegMap(@Self)^.clr := $00000004
  42296. else
  42297. pTDefRegMap(@Self)^.&set := $00000004;
  42298. end;
  42299. function TPMP_PMSTAT.getOB2E : TBits_1; inline;
  42300. begin
  42301. getOB2E := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42302. end;
  42303. procedure TPMP_PMSTAT.setOB3E; inline;
  42304. begin
  42305. pTDefRegMap(@Self)^.&set := $00000008;
  42306. end;
  42307. procedure TPMP_PMSTAT.clearOB3E; inline;
  42308. begin
  42309. pTDefRegMap(@Self)^.clr := $00000008;
  42310. end;
  42311. procedure TPMP_PMSTAT.setOB3E(thebits : TBits_1); inline;
  42312. begin
  42313. if thebits = 0 then
  42314. pTDefRegMap(@Self)^.clr := $00000008
  42315. else
  42316. pTDefRegMap(@Self)^.&set := $00000008;
  42317. end;
  42318. function TPMP_PMSTAT.getOB3E : TBits_1; inline;
  42319. begin
  42320. getOB3E := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42321. end;
  42322. procedure TPMP_PMSTAT.setOBUF; inline;
  42323. begin
  42324. pTDefRegMap(@Self)^.&set := $00000040;
  42325. end;
  42326. procedure TPMP_PMSTAT.clearOBUF; inline;
  42327. begin
  42328. pTDefRegMap(@Self)^.clr := $00000040;
  42329. end;
  42330. procedure TPMP_PMSTAT.setOBUF(thebits : TBits_1); inline;
  42331. begin
  42332. if thebits = 0 then
  42333. pTDefRegMap(@Self)^.clr := $00000040
  42334. else
  42335. pTDefRegMap(@Self)^.&set := $00000040;
  42336. end;
  42337. function TPMP_PMSTAT.getOBUF : TBits_1; inline;
  42338. begin
  42339. getOBUF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42340. end;
  42341. procedure TPMP_PMSTAT.setOBE; inline;
  42342. begin
  42343. pTDefRegMap(@Self)^.&set := $00000080;
  42344. end;
  42345. procedure TPMP_PMSTAT.clearOBE; inline;
  42346. begin
  42347. pTDefRegMap(@Self)^.clr := $00000080;
  42348. end;
  42349. procedure TPMP_PMSTAT.setOBE(thebits : TBits_1); inline;
  42350. begin
  42351. if thebits = 0 then
  42352. pTDefRegMap(@Self)^.clr := $00000080
  42353. else
  42354. pTDefRegMap(@Self)^.&set := $00000080;
  42355. end;
  42356. function TPMP_PMSTAT.getOBE : TBits_1; inline;
  42357. begin
  42358. getOBE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42359. end;
  42360. procedure TPMP_PMSTAT.setIB0F; inline;
  42361. begin
  42362. pTDefRegMap(@Self)^.&set := $00000100;
  42363. end;
  42364. procedure TPMP_PMSTAT.clearIB0F; inline;
  42365. begin
  42366. pTDefRegMap(@Self)^.clr := $00000100;
  42367. end;
  42368. procedure TPMP_PMSTAT.setIB0F(thebits : TBits_1); inline;
  42369. begin
  42370. if thebits = 0 then
  42371. pTDefRegMap(@Self)^.clr := $00000100
  42372. else
  42373. pTDefRegMap(@Self)^.&set := $00000100;
  42374. end;
  42375. function TPMP_PMSTAT.getIB0F : TBits_1; inline;
  42376. begin
  42377. getIB0F := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42378. end;
  42379. procedure TPMP_PMSTAT.setIB1F; inline;
  42380. begin
  42381. pTDefRegMap(@Self)^.&set := $00000200;
  42382. end;
  42383. procedure TPMP_PMSTAT.clearIB1F; inline;
  42384. begin
  42385. pTDefRegMap(@Self)^.clr := $00000200;
  42386. end;
  42387. procedure TPMP_PMSTAT.setIB1F(thebits : TBits_1); inline;
  42388. begin
  42389. if thebits = 0 then
  42390. pTDefRegMap(@Self)^.clr := $00000200
  42391. else
  42392. pTDefRegMap(@Self)^.&set := $00000200;
  42393. end;
  42394. function TPMP_PMSTAT.getIB1F : TBits_1; inline;
  42395. begin
  42396. getIB1F := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42397. end;
  42398. procedure TPMP_PMSTAT.setIB2F; inline;
  42399. begin
  42400. pTDefRegMap(@Self)^.&set := $00000400;
  42401. end;
  42402. procedure TPMP_PMSTAT.clearIB2F; inline;
  42403. begin
  42404. pTDefRegMap(@Self)^.clr := $00000400;
  42405. end;
  42406. procedure TPMP_PMSTAT.setIB2F(thebits : TBits_1); inline;
  42407. begin
  42408. if thebits = 0 then
  42409. pTDefRegMap(@Self)^.clr := $00000400
  42410. else
  42411. pTDefRegMap(@Self)^.&set := $00000400;
  42412. end;
  42413. function TPMP_PMSTAT.getIB2F : TBits_1; inline;
  42414. begin
  42415. getIB2F := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  42416. end;
  42417. procedure TPMP_PMSTAT.setIB3F; inline;
  42418. begin
  42419. pTDefRegMap(@Self)^.&set := $00000800;
  42420. end;
  42421. procedure TPMP_PMSTAT.clearIB3F; inline;
  42422. begin
  42423. pTDefRegMap(@Self)^.clr := $00000800;
  42424. end;
  42425. procedure TPMP_PMSTAT.setIB3F(thebits : TBits_1); inline;
  42426. begin
  42427. if thebits = 0 then
  42428. pTDefRegMap(@Self)^.clr := $00000800
  42429. else
  42430. pTDefRegMap(@Self)^.&set := $00000800;
  42431. end;
  42432. function TPMP_PMSTAT.getIB3F : TBits_1; inline;
  42433. begin
  42434. getIB3F := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42435. end;
  42436. procedure TPMP_PMSTAT.setIBOV; inline;
  42437. begin
  42438. pTDefRegMap(@Self)^.&set := $00004000;
  42439. end;
  42440. procedure TPMP_PMSTAT.clearIBOV; inline;
  42441. begin
  42442. pTDefRegMap(@Self)^.clr := $00004000;
  42443. end;
  42444. procedure TPMP_PMSTAT.setIBOV(thebits : TBits_1); inline;
  42445. begin
  42446. if thebits = 0 then
  42447. pTDefRegMap(@Self)^.clr := $00004000
  42448. else
  42449. pTDefRegMap(@Self)^.&set := $00004000;
  42450. end;
  42451. function TPMP_PMSTAT.getIBOV : TBits_1; inline;
  42452. begin
  42453. getIBOV := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  42454. end;
  42455. procedure TPMP_PMSTAT.setIBF; inline;
  42456. begin
  42457. pTDefRegMap(@Self)^.&set := $00008000;
  42458. end;
  42459. procedure TPMP_PMSTAT.clearIBF; inline;
  42460. begin
  42461. pTDefRegMap(@Self)^.clr := $00008000;
  42462. end;
  42463. procedure TPMP_PMSTAT.setIBF(thebits : TBits_1); inline;
  42464. begin
  42465. if thebits = 0 then
  42466. pTDefRegMap(@Self)^.clr := $00008000
  42467. else
  42468. pTDefRegMap(@Self)^.&set := $00008000;
  42469. end;
  42470. function TPMP_PMSTAT.getIBF : TBits_1; inline;
  42471. begin
  42472. getIBF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42473. end;
  42474. procedure TPMP_PMSTAT.setw(thebits : TBits_32); inline;
  42475. begin
  42476. pTDefRegMap(@Self)^.val := thebits;
  42477. end;
  42478. function TPMP_PMSTAT.getw : TBits_32; inline;
  42479. begin
  42480. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42481. end;
  42482. procedure TADC10_AD1CON1.setDONE; inline;
  42483. begin
  42484. pTDefRegMap(@Self)^.&set := $00000001;
  42485. end;
  42486. procedure TADC10_AD1CON1.clearDONE; inline;
  42487. begin
  42488. pTDefRegMap(@Self)^.clr := $00000001;
  42489. end;
  42490. procedure TADC10_AD1CON1.setDONE(thebits : TBits_1); inline;
  42491. begin
  42492. if thebits = 0 then
  42493. pTDefRegMap(@Self)^.clr := $00000001
  42494. else
  42495. pTDefRegMap(@Self)^.&set := $00000001;
  42496. end;
  42497. function TADC10_AD1CON1.getDONE : TBits_1; inline;
  42498. begin
  42499. getDONE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42500. end;
  42501. procedure TADC10_AD1CON1.setSAMP; inline;
  42502. begin
  42503. pTDefRegMap(@Self)^.&set := $00000002;
  42504. end;
  42505. procedure TADC10_AD1CON1.clearSAMP; inline;
  42506. begin
  42507. pTDefRegMap(@Self)^.clr := $00000002;
  42508. end;
  42509. procedure TADC10_AD1CON1.setSAMP(thebits : TBits_1); inline;
  42510. begin
  42511. if thebits = 0 then
  42512. pTDefRegMap(@Self)^.clr := $00000002
  42513. else
  42514. pTDefRegMap(@Self)^.&set := $00000002;
  42515. end;
  42516. function TADC10_AD1CON1.getSAMP : TBits_1; inline;
  42517. begin
  42518. getSAMP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42519. end;
  42520. procedure TADC10_AD1CON1.setASAM; inline;
  42521. begin
  42522. pTDefRegMap(@Self)^.&set := $00000004;
  42523. end;
  42524. procedure TADC10_AD1CON1.clearASAM; inline;
  42525. begin
  42526. pTDefRegMap(@Self)^.clr := $00000004;
  42527. end;
  42528. procedure TADC10_AD1CON1.setASAM(thebits : TBits_1); inline;
  42529. begin
  42530. if thebits = 0 then
  42531. pTDefRegMap(@Self)^.clr := $00000004
  42532. else
  42533. pTDefRegMap(@Self)^.&set := $00000004;
  42534. end;
  42535. function TADC10_AD1CON1.getASAM : TBits_1; inline;
  42536. begin
  42537. getASAM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42538. end;
  42539. procedure TADC10_AD1CON1.setCLRASAM; inline;
  42540. begin
  42541. pTDefRegMap(@Self)^.&set := $00000010;
  42542. end;
  42543. procedure TADC10_AD1CON1.clearCLRASAM; inline;
  42544. begin
  42545. pTDefRegMap(@Self)^.clr := $00000010;
  42546. end;
  42547. procedure TADC10_AD1CON1.setCLRASAM(thebits : TBits_1); inline;
  42548. begin
  42549. if thebits = 0 then
  42550. pTDefRegMap(@Self)^.clr := $00000010
  42551. else
  42552. pTDefRegMap(@Self)^.&set := $00000010;
  42553. end;
  42554. function TADC10_AD1CON1.getCLRASAM : TBits_1; inline;
  42555. begin
  42556. getCLRASAM := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  42557. end;
  42558. procedure TADC10_AD1CON1.setSSRC(thebits : TBits_3); inline;
  42559. begin
  42560. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF1F or ( thebits shl 5 );
  42561. end;
  42562. function TADC10_AD1CON1.getSSRC : TBits_3; inline;
  42563. begin
  42564. getSSRC := (pTDefRegMap(@Self)^.val and $000000E0) shr 5;
  42565. end;
  42566. procedure TADC10_AD1CON1.setFORM(thebits : TBits_3); inline;
  42567. begin
  42568. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  42569. end;
  42570. function TADC10_AD1CON1.getFORM : TBits_3; inline;
  42571. begin
  42572. getFORM := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  42573. end;
  42574. procedure TADC10_AD1CON1.setSIDL; inline;
  42575. begin
  42576. pTDefRegMap(@Self)^.&set := $00002000;
  42577. end;
  42578. procedure TADC10_AD1CON1.clearSIDL; inline;
  42579. begin
  42580. pTDefRegMap(@Self)^.clr := $00002000;
  42581. end;
  42582. procedure TADC10_AD1CON1.setSIDL(thebits : TBits_1); inline;
  42583. begin
  42584. if thebits = 0 then
  42585. pTDefRegMap(@Self)^.clr := $00002000
  42586. else
  42587. pTDefRegMap(@Self)^.&set := $00002000;
  42588. end;
  42589. function TADC10_AD1CON1.getSIDL : TBits_1; inline;
  42590. begin
  42591. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42592. end;
  42593. procedure TADC10_AD1CON1.setON; inline;
  42594. begin
  42595. pTDefRegMap(@Self)^.&set := $00008000;
  42596. end;
  42597. procedure TADC10_AD1CON1.clearON; inline;
  42598. begin
  42599. pTDefRegMap(@Self)^.clr := $00008000;
  42600. end;
  42601. procedure TADC10_AD1CON1.setON(thebits : TBits_1); inline;
  42602. begin
  42603. if thebits = 0 then
  42604. pTDefRegMap(@Self)^.clr := $00008000
  42605. else
  42606. pTDefRegMap(@Self)^.&set := $00008000;
  42607. end;
  42608. function TADC10_AD1CON1.getON : TBits_1; inline;
  42609. begin
  42610. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42611. end;
  42612. procedure TADC10_AD1CON1.setSSRC0; inline;
  42613. begin
  42614. pTDefRegMap(@Self)^.&set := $00000020;
  42615. end;
  42616. procedure TADC10_AD1CON1.clearSSRC0; inline;
  42617. begin
  42618. pTDefRegMap(@Self)^.clr := $00000020;
  42619. end;
  42620. procedure TADC10_AD1CON1.setSSRC0(thebits : TBits_1); inline;
  42621. begin
  42622. if thebits = 0 then
  42623. pTDefRegMap(@Self)^.clr := $00000020
  42624. else
  42625. pTDefRegMap(@Self)^.&set := $00000020;
  42626. end;
  42627. function TADC10_AD1CON1.getSSRC0 : TBits_1; inline;
  42628. begin
  42629. getSSRC0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42630. end;
  42631. procedure TADC10_AD1CON1.setSSRC1; inline;
  42632. begin
  42633. pTDefRegMap(@Self)^.&set := $00000040;
  42634. end;
  42635. procedure TADC10_AD1CON1.clearSSRC1; inline;
  42636. begin
  42637. pTDefRegMap(@Self)^.clr := $00000040;
  42638. end;
  42639. procedure TADC10_AD1CON1.setSSRC1(thebits : TBits_1); inline;
  42640. begin
  42641. if thebits = 0 then
  42642. pTDefRegMap(@Self)^.clr := $00000040
  42643. else
  42644. pTDefRegMap(@Self)^.&set := $00000040;
  42645. end;
  42646. function TADC10_AD1CON1.getSSRC1 : TBits_1; inline;
  42647. begin
  42648. getSSRC1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42649. end;
  42650. procedure TADC10_AD1CON1.setSSRC2; inline;
  42651. begin
  42652. pTDefRegMap(@Self)^.&set := $00000080;
  42653. end;
  42654. procedure TADC10_AD1CON1.clearSSRC2; inline;
  42655. begin
  42656. pTDefRegMap(@Self)^.clr := $00000080;
  42657. end;
  42658. procedure TADC10_AD1CON1.setSSRC2(thebits : TBits_1); inline;
  42659. begin
  42660. if thebits = 0 then
  42661. pTDefRegMap(@Self)^.clr := $00000080
  42662. else
  42663. pTDefRegMap(@Self)^.&set := $00000080;
  42664. end;
  42665. function TADC10_AD1CON1.getSSRC2 : TBits_1; inline;
  42666. begin
  42667. getSSRC2 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42668. end;
  42669. procedure TADC10_AD1CON1.setFORM0; inline;
  42670. begin
  42671. pTDefRegMap(@Self)^.&set := $00000100;
  42672. end;
  42673. procedure TADC10_AD1CON1.clearFORM0; inline;
  42674. begin
  42675. pTDefRegMap(@Self)^.clr := $00000100;
  42676. end;
  42677. procedure TADC10_AD1CON1.setFORM0(thebits : TBits_1); inline;
  42678. begin
  42679. if thebits = 0 then
  42680. pTDefRegMap(@Self)^.clr := $00000100
  42681. else
  42682. pTDefRegMap(@Self)^.&set := $00000100;
  42683. end;
  42684. function TADC10_AD1CON1.getFORM0 : TBits_1; inline;
  42685. begin
  42686. getFORM0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42687. end;
  42688. procedure TADC10_AD1CON1.setFORM1; inline;
  42689. begin
  42690. pTDefRegMap(@Self)^.&set := $00000200;
  42691. end;
  42692. procedure TADC10_AD1CON1.clearFORM1; inline;
  42693. begin
  42694. pTDefRegMap(@Self)^.clr := $00000200;
  42695. end;
  42696. procedure TADC10_AD1CON1.setFORM1(thebits : TBits_1); inline;
  42697. begin
  42698. if thebits = 0 then
  42699. pTDefRegMap(@Self)^.clr := $00000200
  42700. else
  42701. pTDefRegMap(@Self)^.&set := $00000200;
  42702. end;
  42703. function TADC10_AD1CON1.getFORM1 : TBits_1; inline;
  42704. begin
  42705. getFORM1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42706. end;
  42707. procedure TADC10_AD1CON1.setFORM2; inline;
  42708. begin
  42709. pTDefRegMap(@Self)^.&set := $00000400;
  42710. end;
  42711. procedure TADC10_AD1CON1.clearFORM2; inline;
  42712. begin
  42713. pTDefRegMap(@Self)^.clr := $00000400;
  42714. end;
  42715. procedure TADC10_AD1CON1.setFORM2(thebits : TBits_1); inline;
  42716. begin
  42717. if thebits = 0 then
  42718. pTDefRegMap(@Self)^.clr := $00000400
  42719. else
  42720. pTDefRegMap(@Self)^.&set := $00000400;
  42721. end;
  42722. function TADC10_AD1CON1.getFORM2 : TBits_1; inline;
  42723. begin
  42724. getFORM2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  42725. end;
  42726. procedure TADC10_AD1CON1.setADSIDL; inline;
  42727. begin
  42728. pTDefRegMap(@Self)^.&set := $00002000;
  42729. end;
  42730. procedure TADC10_AD1CON1.clearADSIDL; inline;
  42731. begin
  42732. pTDefRegMap(@Self)^.clr := $00002000;
  42733. end;
  42734. procedure TADC10_AD1CON1.setADSIDL(thebits : TBits_1); inline;
  42735. begin
  42736. if thebits = 0 then
  42737. pTDefRegMap(@Self)^.clr := $00002000
  42738. else
  42739. pTDefRegMap(@Self)^.&set := $00002000;
  42740. end;
  42741. function TADC10_AD1CON1.getADSIDL : TBits_1; inline;
  42742. begin
  42743. getADSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42744. end;
  42745. procedure TADC10_AD1CON1.setADON; inline;
  42746. begin
  42747. pTDefRegMap(@Self)^.&set := $00008000;
  42748. end;
  42749. procedure TADC10_AD1CON1.clearADON; inline;
  42750. begin
  42751. pTDefRegMap(@Self)^.clr := $00008000;
  42752. end;
  42753. procedure TADC10_AD1CON1.setADON(thebits : TBits_1); inline;
  42754. begin
  42755. if thebits = 0 then
  42756. pTDefRegMap(@Self)^.clr := $00008000
  42757. else
  42758. pTDefRegMap(@Self)^.&set := $00008000;
  42759. end;
  42760. function TADC10_AD1CON1.getADON : TBits_1; inline;
  42761. begin
  42762. getADON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42763. end;
  42764. procedure TADC10_AD1CON1.setw(thebits : TBits_32); inline;
  42765. begin
  42766. pTDefRegMap(@Self)^.val := thebits;
  42767. end;
  42768. function TADC10_AD1CON1.getw : TBits_32; inline;
  42769. begin
  42770. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42771. end;
  42772. procedure TADC10_AD1CON2.setALTS; inline;
  42773. begin
  42774. pTDefRegMap(@Self)^.&set := $00000001;
  42775. end;
  42776. procedure TADC10_AD1CON2.clearALTS; inline;
  42777. begin
  42778. pTDefRegMap(@Self)^.clr := $00000001;
  42779. end;
  42780. procedure TADC10_AD1CON2.setALTS(thebits : TBits_1); inline;
  42781. begin
  42782. if thebits = 0 then
  42783. pTDefRegMap(@Self)^.clr := $00000001
  42784. else
  42785. pTDefRegMap(@Self)^.&set := $00000001;
  42786. end;
  42787. function TADC10_AD1CON2.getALTS : TBits_1; inline;
  42788. begin
  42789. getALTS := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42790. end;
  42791. procedure TADC10_AD1CON2.setBUFM; inline;
  42792. begin
  42793. pTDefRegMap(@Self)^.&set := $00000002;
  42794. end;
  42795. procedure TADC10_AD1CON2.clearBUFM; inline;
  42796. begin
  42797. pTDefRegMap(@Self)^.clr := $00000002;
  42798. end;
  42799. procedure TADC10_AD1CON2.setBUFM(thebits : TBits_1); inline;
  42800. begin
  42801. if thebits = 0 then
  42802. pTDefRegMap(@Self)^.clr := $00000002
  42803. else
  42804. pTDefRegMap(@Self)^.&set := $00000002;
  42805. end;
  42806. function TADC10_AD1CON2.getBUFM : TBits_1; inline;
  42807. begin
  42808. getBUFM := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42809. end;
  42810. procedure TADC10_AD1CON2.setSMPI(thebits : TBits_4); inline;
  42811. begin
  42812. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  42813. end;
  42814. function TADC10_AD1CON2.getSMPI : TBits_4; inline;
  42815. begin
  42816. getSMPI := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  42817. end;
  42818. procedure TADC10_AD1CON2.setBUFS; inline;
  42819. begin
  42820. pTDefRegMap(@Self)^.&set := $00000080;
  42821. end;
  42822. procedure TADC10_AD1CON2.clearBUFS; inline;
  42823. begin
  42824. pTDefRegMap(@Self)^.clr := $00000080;
  42825. end;
  42826. procedure TADC10_AD1CON2.setBUFS(thebits : TBits_1); inline;
  42827. begin
  42828. if thebits = 0 then
  42829. pTDefRegMap(@Self)^.clr := $00000080
  42830. else
  42831. pTDefRegMap(@Self)^.&set := $00000080;
  42832. end;
  42833. function TADC10_AD1CON2.getBUFS : TBits_1; inline;
  42834. begin
  42835. getBUFS := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42836. end;
  42837. procedure TADC10_AD1CON2.setCSCNA; inline;
  42838. begin
  42839. pTDefRegMap(@Self)^.&set := $00000400;
  42840. end;
  42841. procedure TADC10_AD1CON2.clearCSCNA; inline;
  42842. begin
  42843. pTDefRegMap(@Self)^.clr := $00000400;
  42844. end;
  42845. procedure TADC10_AD1CON2.setCSCNA(thebits : TBits_1); inline;
  42846. begin
  42847. if thebits = 0 then
  42848. pTDefRegMap(@Self)^.clr := $00000400
  42849. else
  42850. pTDefRegMap(@Self)^.&set := $00000400;
  42851. end;
  42852. function TADC10_AD1CON2.getCSCNA : TBits_1; inline;
  42853. begin
  42854. getCSCNA := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  42855. end;
  42856. procedure TADC10_AD1CON2.setOFFCAL; inline;
  42857. begin
  42858. pTDefRegMap(@Self)^.&set := $00001000;
  42859. end;
  42860. procedure TADC10_AD1CON2.clearOFFCAL; inline;
  42861. begin
  42862. pTDefRegMap(@Self)^.clr := $00001000;
  42863. end;
  42864. procedure TADC10_AD1CON2.setOFFCAL(thebits : TBits_1); inline;
  42865. begin
  42866. if thebits = 0 then
  42867. pTDefRegMap(@Self)^.clr := $00001000
  42868. else
  42869. pTDefRegMap(@Self)^.&set := $00001000;
  42870. end;
  42871. function TADC10_AD1CON2.getOFFCAL : TBits_1; inline;
  42872. begin
  42873. getOFFCAL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  42874. end;
  42875. procedure TADC10_AD1CON2.setVCFG(thebits : TBits_3); inline;
  42876. begin
  42877. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF1FFF or ( thebits shl 13 );
  42878. end;
  42879. function TADC10_AD1CON2.getVCFG : TBits_3; inline;
  42880. begin
  42881. getVCFG := (pTDefRegMap(@Self)^.val and $0000E000) shr 13;
  42882. end;
  42883. procedure TADC10_AD1CON2.setSMPI0; inline;
  42884. begin
  42885. pTDefRegMap(@Self)^.&set := $00000004;
  42886. end;
  42887. procedure TADC10_AD1CON2.clearSMPI0; inline;
  42888. begin
  42889. pTDefRegMap(@Self)^.clr := $00000004;
  42890. end;
  42891. procedure TADC10_AD1CON2.setSMPI0(thebits : TBits_1); inline;
  42892. begin
  42893. if thebits = 0 then
  42894. pTDefRegMap(@Self)^.clr := $00000004
  42895. else
  42896. pTDefRegMap(@Self)^.&set := $00000004;
  42897. end;
  42898. function TADC10_AD1CON2.getSMPI0 : TBits_1; inline;
  42899. begin
  42900. getSMPI0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42901. end;
  42902. procedure TADC10_AD1CON2.setSMPI1; inline;
  42903. begin
  42904. pTDefRegMap(@Self)^.&set := $00000008;
  42905. end;
  42906. procedure TADC10_AD1CON2.clearSMPI1; inline;
  42907. begin
  42908. pTDefRegMap(@Self)^.clr := $00000008;
  42909. end;
  42910. procedure TADC10_AD1CON2.setSMPI1(thebits : TBits_1); inline;
  42911. begin
  42912. if thebits = 0 then
  42913. pTDefRegMap(@Self)^.clr := $00000008
  42914. else
  42915. pTDefRegMap(@Self)^.&set := $00000008;
  42916. end;
  42917. function TADC10_AD1CON2.getSMPI1 : TBits_1; inline;
  42918. begin
  42919. getSMPI1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42920. end;
  42921. procedure TADC10_AD1CON2.setSMPI2; inline;
  42922. begin
  42923. pTDefRegMap(@Self)^.&set := $00000010;
  42924. end;
  42925. procedure TADC10_AD1CON2.clearSMPI2; inline;
  42926. begin
  42927. pTDefRegMap(@Self)^.clr := $00000010;
  42928. end;
  42929. procedure TADC10_AD1CON2.setSMPI2(thebits : TBits_1); inline;
  42930. begin
  42931. if thebits = 0 then
  42932. pTDefRegMap(@Self)^.clr := $00000010
  42933. else
  42934. pTDefRegMap(@Self)^.&set := $00000010;
  42935. end;
  42936. function TADC10_AD1CON2.getSMPI2 : TBits_1; inline;
  42937. begin
  42938. getSMPI2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  42939. end;
  42940. procedure TADC10_AD1CON2.setSMPI3; inline;
  42941. begin
  42942. pTDefRegMap(@Self)^.&set := $00000020;
  42943. end;
  42944. procedure TADC10_AD1CON2.clearSMPI3; inline;
  42945. begin
  42946. pTDefRegMap(@Self)^.clr := $00000020;
  42947. end;
  42948. procedure TADC10_AD1CON2.setSMPI3(thebits : TBits_1); inline;
  42949. begin
  42950. if thebits = 0 then
  42951. pTDefRegMap(@Self)^.clr := $00000020
  42952. else
  42953. pTDefRegMap(@Self)^.&set := $00000020;
  42954. end;
  42955. function TADC10_AD1CON2.getSMPI3 : TBits_1; inline;
  42956. begin
  42957. getSMPI3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42958. end;
  42959. procedure TADC10_AD1CON2.setVCFG0; inline;
  42960. begin
  42961. pTDefRegMap(@Self)^.&set := $00002000;
  42962. end;
  42963. procedure TADC10_AD1CON2.clearVCFG0; inline;
  42964. begin
  42965. pTDefRegMap(@Self)^.clr := $00002000;
  42966. end;
  42967. procedure TADC10_AD1CON2.setVCFG0(thebits : TBits_1); inline;
  42968. begin
  42969. if thebits = 0 then
  42970. pTDefRegMap(@Self)^.clr := $00002000
  42971. else
  42972. pTDefRegMap(@Self)^.&set := $00002000;
  42973. end;
  42974. function TADC10_AD1CON2.getVCFG0 : TBits_1; inline;
  42975. begin
  42976. getVCFG0 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42977. end;
  42978. procedure TADC10_AD1CON2.setVCFG1; inline;
  42979. begin
  42980. pTDefRegMap(@Self)^.&set := $00004000;
  42981. end;
  42982. procedure TADC10_AD1CON2.clearVCFG1; inline;
  42983. begin
  42984. pTDefRegMap(@Self)^.clr := $00004000;
  42985. end;
  42986. procedure TADC10_AD1CON2.setVCFG1(thebits : TBits_1); inline;
  42987. begin
  42988. if thebits = 0 then
  42989. pTDefRegMap(@Self)^.clr := $00004000
  42990. else
  42991. pTDefRegMap(@Self)^.&set := $00004000;
  42992. end;
  42993. function TADC10_AD1CON2.getVCFG1 : TBits_1; inline;
  42994. begin
  42995. getVCFG1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  42996. end;
  42997. procedure TADC10_AD1CON2.setVCFG2; inline;
  42998. begin
  42999. pTDefRegMap(@Self)^.&set := $00008000;
  43000. end;
  43001. procedure TADC10_AD1CON2.clearVCFG2; inline;
  43002. begin
  43003. pTDefRegMap(@Self)^.clr := $00008000;
  43004. end;
  43005. procedure TADC10_AD1CON2.setVCFG2(thebits : TBits_1); inline;
  43006. begin
  43007. if thebits = 0 then
  43008. pTDefRegMap(@Self)^.clr := $00008000
  43009. else
  43010. pTDefRegMap(@Self)^.&set := $00008000;
  43011. end;
  43012. function TADC10_AD1CON2.getVCFG2 : TBits_1; inline;
  43013. begin
  43014. getVCFG2 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43015. end;
  43016. procedure TADC10_AD1CON2.setw(thebits : TBits_32); inline;
  43017. begin
  43018. pTDefRegMap(@Self)^.val := thebits;
  43019. end;
  43020. function TADC10_AD1CON2.getw : TBits_32; inline;
  43021. begin
  43022. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43023. end;
  43024. procedure TADC10_AD1CON3.setADCS(thebits : TBits_8); inline;
  43025. begin
  43026. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  43027. end;
  43028. function TADC10_AD1CON3.getADCS : TBits_8; inline;
  43029. begin
  43030. getADCS := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  43031. end;
  43032. procedure TADC10_AD1CON3.setSAMC(thebits : TBits_5); inline;
  43033. begin
  43034. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  43035. end;
  43036. function TADC10_AD1CON3.getSAMC : TBits_5; inline;
  43037. begin
  43038. getSAMC := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  43039. end;
  43040. procedure TADC10_AD1CON3.setADRC; inline;
  43041. begin
  43042. pTDefRegMap(@Self)^.&set := $00008000;
  43043. end;
  43044. procedure TADC10_AD1CON3.clearADRC; inline;
  43045. begin
  43046. pTDefRegMap(@Self)^.clr := $00008000;
  43047. end;
  43048. procedure TADC10_AD1CON3.setADRC(thebits : TBits_1); inline;
  43049. begin
  43050. if thebits = 0 then
  43051. pTDefRegMap(@Self)^.clr := $00008000
  43052. else
  43053. pTDefRegMap(@Self)^.&set := $00008000;
  43054. end;
  43055. function TADC10_AD1CON3.getADRC : TBits_1; inline;
  43056. begin
  43057. getADRC := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43058. end;
  43059. procedure TADC10_AD1CON3.setADCS0; inline;
  43060. begin
  43061. pTDefRegMap(@Self)^.&set := $00000001;
  43062. end;
  43063. procedure TADC10_AD1CON3.clearADCS0; inline;
  43064. begin
  43065. pTDefRegMap(@Self)^.clr := $00000001;
  43066. end;
  43067. procedure TADC10_AD1CON3.setADCS0(thebits : TBits_1); inline;
  43068. begin
  43069. if thebits = 0 then
  43070. pTDefRegMap(@Self)^.clr := $00000001
  43071. else
  43072. pTDefRegMap(@Self)^.&set := $00000001;
  43073. end;
  43074. function TADC10_AD1CON3.getADCS0 : TBits_1; inline;
  43075. begin
  43076. getADCS0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43077. end;
  43078. procedure TADC10_AD1CON3.setADCS1; inline;
  43079. begin
  43080. pTDefRegMap(@Self)^.&set := $00000002;
  43081. end;
  43082. procedure TADC10_AD1CON3.clearADCS1; inline;
  43083. begin
  43084. pTDefRegMap(@Self)^.clr := $00000002;
  43085. end;
  43086. procedure TADC10_AD1CON3.setADCS1(thebits : TBits_1); inline;
  43087. begin
  43088. if thebits = 0 then
  43089. pTDefRegMap(@Self)^.clr := $00000002
  43090. else
  43091. pTDefRegMap(@Self)^.&set := $00000002;
  43092. end;
  43093. function TADC10_AD1CON3.getADCS1 : TBits_1; inline;
  43094. begin
  43095. getADCS1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43096. end;
  43097. procedure TADC10_AD1CON3.setADCS2; inline;
  43098. begin
  43099. pTDefRegMap(@Self)^.&set := $00000004;
  43100. end;
  43101. procedure TADC10_AD1CON3.clearADCS2; inline;
  43102. begin
  43103. pTDefRegMap(@Self)^.clr := $00000004;
  43104. end;
  43105. procedure TADC10_AD1CON3.setADCS2(thebits : TBits_1); inline;
  43106. begin
  43107. if thebits = 0 then
  43108. pTDefRegMap(@Self)^.clr := $00000004
  43109. else
  43110. pTDefRegMap(@Self)^.&set := $00000004;
  43111. end;
  43112. function TADC10_AD1CON3.getADCS2 : TBits_1; inline;
  43113. begin
  43114. getADCS2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  43115. end;
  43116. procedure TADC10_AD1CON3.setADCS3; inline;
  43117. begin
  43118. pTDefRegMap(@Self)^.&set := $00000008;
  43119. end;
  43120. procedure TADC10_AD1CON3.clearADCS3; inline;
  43121. begin
  43122. pTDefRegMap(@Self)^.clr := $00000008;
  43123. end;
  43124. procedure TADC10_AD1CON3.setADCS3(thebits : TBits_1); inline;
  43125. begin
  43126. if thebits = 0 then
  43127. pTDefRegMap(@Self)^.clr := $00000008
  43128. else
  43129. pTDefRegMap(@Self)^.&set := $00000008;
  43130. end;
  43131. function TADC10_AD1CON3.getADCS3 : TBits_1; inline;
  43132. begin
  43133. getADCS3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  43134. end;
  43135. procedure TADC10_AD1CON3.setADCS4; inline;
  43136. begin
  43137. pTDefRegMap(@Self)^.&set := $00000010;
  43138. end;
  43139. procedure TADC10_AD1CON3.clearADCS4; inline;
  43140. begin
  43141. pTDefRegMap(@Self)^.clr := $00000010;
  43142. end;
  43143. procedure TADC10_AD1CON3.setADCS4(thebits : TBits_1); inline;
  43144. begin
  43145. if thebits = 0 then
  43146. pTDefRegMap(@Self)^.clr := $00000010
  43147. else
  43148. pTDefRegMap(@Self)^.&set := $00000010;
  43149. end;
  43150. function TADC10_AD1CON3.getADCS4 : TBits_1; inline;
  43151. begin
  43152. getADCS4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43153. end;
  43154. procedure TADC10_AD1CON3.setADCS5; inline;
  43155. begin
  43156. pTDefRegMap(@Self)^.&set := $00000020;
  43157. end;
  43158. procedure TADC10_AD1CON3.clearADCS5; inline;
  43159. begin
  43160. pTDefRegMap(@Self)^.clr := $00000020;
  43161. end;
  43162. procedure TADC10_AD1CON3.setADCS5(thebits : TBits_1); inline;
  43163. begin
  43164. if thebits = 0 then
  43165. pTDefRegMap(@Self)^.clr := $00000020
  43166. else
  43167. pTDefRegMap(@Self)^.&set := $00000020;
  43168. end;
  43169. function TADC10_AD1CON3.getADCS5 : TBits_1; inline;
  43170. begin
  43171. getADCS5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43172. end;
  43173. procedure TADC10_AD1CON3.setADCS6; inline;
  43174. begin
  43175. pTDefRegMap(@Self)^.&set := $00000040;
  43176. end;
  43177. procedure TADC10_AD1CON3.clearADCS6; inline;
  43178. begin
  43179. pTDefRegMap(@Self)^.clr := $00000040;
  43180. end;
  43181. procedure TADC10_AD1CON3.setADCS6(thebits : TBits_1); inline;
  43182. begin
  43183. if thebits = 0 then
  43184. pTDefRegMap(@Self)^.clr := $00000040
  43185. else
  43186. pTDefRegMap(@Self)^.&set := $00000040;
  43187. end;
  43188. function TADC10_AD1CON3.getADCS6 : TBits_1; inline;
  43189. begin
  43190. getADCS6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43191. end;
  43192. procedure TADC10_AD1CON3.setADCS7; inline;
  43193. begin
  43194. pTDefRegMap(@Self)^.&set := $00000080;
  43195. end;
  43196. procedure TADC10_AD1CON3.clearADCS7; inline;
  43197. begin
  43198. pTDefRegMap(@Self)^.clr := $00000080;
  43199. end;
  43200. procedure TADC10_AD1CON3.setADCS7(thebits : TBits_1); inline;
  43201. begin
  43202. if thebits = 0 then
  43203. pTDefRegMap(@Self)^.clr := $00000080
  43204. else
  43205. pTDefRegMap(@Self)^.&set := $00000080;
  43206. end;
  43207. function TADC10_AD1CON3.getADCS7 : TBits_1; inline;
  43208. begin
  43209. getADCS7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43210. end;
  43211. procedure TADC10_AD1CON3.setSAMC0; inline;
  43212. begin
  43213. pTDefRegMap(@Self)^.&set := $00000100;
  43214. end;
  43215. procedure TADC10_AD1CON3.clearSAMC0; inline;
  43216. begin
  43217. pTDefRegMap(@Self)^.clr := $00000100;
  43218. end;
  43219. procedure TADC10_AD1CON3.setSAMC0(thebits : TBits_1); inline;
  43220. begin
  43221. if thebits = 0 then
  43222. pTDefRegMap(@Self)^.clr := $00000100
  43223. else
  43224. pTDefRegMap(@Self)^.&set := $00000100;
  43225. end;
  43226. function TADC10_AD1CON3.getSAMC0 : TBits_1; inline;
  43227. begin
  43228. getSAMC0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43229. end;
  43230. procedure TADC10_AD1CON3.setSAMC1; inline;
  43231. begin
  43232. pTDefRegMap(@Self)^.&set := $00000200;
  43233. end;
  43234. procedure TADC10_AD1CON3.clearSAMC1; inline;
  43235. begin
  43236. pTDefRegMap(@Self)^.clr := $00000200;
  43237. end;
  43238. procedure TADC10_AD1CON3.setSAMC1(thebits : TBits_1); inline;
  43239. begin
  43240. if thebits = 0 then
  43241. pTDefRegMap(@Self)^.clr := $00000200
  43242. else
  43243. pTDefRegMap(@Self)^.&set := $00000200;
  43244. end;
  43245. function TADC10_AD1CON3.getSAMC1 : TBits_1; inline;
  43246. begin
  43247. getSAMC1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  43248. end;
  43249. procedure TADC10_AD1CON3.setSAMC2; inline;
  43250. begin
  43251. pTDefRegMap(@Self)^.&set := $00000400;
  43252. end;
  43253. procedure TADC10_AD1CON3.clearSAMC2; inline;
  43254. begin
  43255. pTDefRegMap(@Self)^.clr := $00000400;
  43256. end;
  43257. procedure TADC10_AD1CON3.setSAMC2(thebits : TBits_1); inline;
  43258. begin
  43259. if thebits = 0 then
  43260. pTDefRegMap(@Self)^.clr := $00000400
  43261. else
  43262. pTDefRegMap(@Self)^.&set := $00000400;
  43263. end;
  43264. function TADC10_AD1CON3.getSAMC2 : TBits_1; inline;
  43265. begin
  43266. getSAMC2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  43267. end;
  43268. procedure TADC10_AD1CON3.setSAMC3; inline;
  43269. begin
  43270. pTDefRegMap(@Self)^.&set := $00000800;
  43271. end;
  43272. procedure TADC10_AD1CON3.clearSAMC3; inline;
  43273. begin
  43274. pTDefRegMap(@Self)^.clr := $00000800;
  43275. end;
  43276. procedure TADC10_AD1CON3.setSAMC3(thebits : TBits_1); inline;
  43277. begin
  43278. if thebits = 0 then
  43279. pTDefRegMap(@Self)^.clr := $00000800
  43280. else
  43281. pTDefRegMap(@Self)^.&set := $00000800;
  43282. end;
  43283. function TADC10_AD1CON3.getSAMC3 : TBits_1; inline;
  43284. begin
  43285. getSAMC3 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  43286. end;
  43287. procedure TADC10_AD1CON3.setSAMC4; inline;
  43288. begin
  43289. pTDefRegMap(@Self)^.&set := $00001000;
  43290. end;
  43291. procedure TADC10_AD1CON3.clearSAMC4; inline;
  43292. begin
  43293. pTDefRegMap(@Self)^.clr := $00001000;
  43294. end;
  43295. procedure TADC10_AD1CON3.setSAMC4(thebits : TBits_1); inline;
  43296. begin
  43297. if thebits = 0 then
  43298. pTDefRegMap(@Self)^.clr := $00001000
  43299. else
  43300. pTDefRegMap(@Self)^.&set := $00001000;
  43301. end;
  43302. function TADC10_AD1CON3.getSAMC4 : TBits_1; inline;
  43303. begin
  43304. getSAMC4 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  43305. end;
  43306. procedure TADC10_AD1CON3.setw(thebits : TBits_32); inline;
  43307. begin
  43308. pTDefRegMap(@Self)^.val := thebits;
  43309. end;
  43310. function TADC10_AD1CON3.getw : TBits_32; inline;
  43311. begin
  43312. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43313. end;
  43314. procedure TADC10_AD1CHS.setCH0SA(thebits : TBits_4); inline;
  43315. begin
  43316. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  43317. end;
  43318. function TADC10_AD1CHS.getCH0SA : TBits_4; inline;
  43319. begin
  43320. getCH0SA := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  43321. end;
  43322. procedure TADC10_AD1CHS.setCH0NA; inline;
  43323. begin
  43324. pTDefRegMap(@Self)^.&set := $00800000;
  43325. end;
  43326. procedure TADC10_AD1CHS.clearCH0NA; inline;
  43327. begin
  43328. pTDefRegMap(@Self)^.clr := $00800000;
  43329. end;
  43330. procedure TADC10_AD1CHS.setCH0NA(thebits : TBits_1); inline;
  43331. begin
  43332. if thebits = 0 then
  43333. pTDefRegMap(@Self)^.clr := $00800000
  43334. else
  43335. pTDefRegMap(@Self)^.&set := $00800000;
  43336. end;
  43337. function TADC10_AD1CHS.getCH0NA : TBits_1; inline;
  43338. begin
  43339. getCH0NA := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  43340. end;
  43341. procedure TADC10_AD1CHS.setCH0SB(thebits : TBits_4); inline;
  43342. begin
  43343. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  43344. end;
  43345. function TADC10_AD1CHS.getCH0SB : TBits_4; inline;
  43346. begin
  43347. getCH0SB := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  43348. end;
  43349. procedure TADC10_AD1CHS.setCH0NB; inline;
  43350. begin
  43351. pTDefRegMap(@Self)^.&set := $80000000;
  43352. end;
  43353. procedure TADC10_AD1CHS.clearCH0NB; inline;
  43354. begin
  43355. pTDefRegMap(@Self)^.clr := $80000000;
  43356. end;
  43357. procedure TADC10_AD1CHS.setCH0NB(thebits : TBits_1); inline;
  43358. begin
  43359. if thebits = 0 then
  43360. pTDefRegMap(@Self)^.clr := $80000000
  43361. else
  43362. pTDefRegMap(@Self)^.&set := $80000000;
  43363. end;
  43364. function TADC10_AD1CHS.getCH0NB : TBits_1; inline;
  43365. begin
  43366. getCH0NB := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  43367. end;
  43368. procedure TADC10_AD1CHS.setCH0SA0; inline;
  43369. begin
  43370. pTDefRegMap(@Self)^.&set := $00010000;
  43371. end;
  43372. procedure TADC10_AD1CHS.clearCH0SA0; inline;
  43373. begin
  43374. pTDefRegMap(@Self)^.clr := $00010000;
  43375. end;
  43376. procedure TADC10_AD1CHS.setCH0SA0(thebits : TBits_1); inline;
  43377. begin
  43378. if thebits = 0 then
  43379. pTDefRegMap(@Self)^.clr := $00010000
  43380. else
  43381. pTDefRegMap(@Self)^.&set := $00010000;
  43382. end;
  43383. function TADC10_AD1CHS.getCH0SA0 : TBits_1; inline;
  43384. begin
  43385. getCH0SA0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  43386. end;
  43387. procedure TADC10_AD1CHS.setCH0SA1; inline;
  43388. begin
  43389. pTDefRegMap(@Self)^.&set := $00020000;
  43390. end;
  43391. procedure TADC10_AD1CHS.clearCH0SA1; inline;
  43392. begin
  43393. pTDefRegMap(@Self)^.clr := $00020000;
  43394. end;
  43395. procedure TADC10_AD1CHS.setCH0SA1(thebits : TBits_1); inline;
  43396. begin
  43397. if thebits = 0 then
  43398. pTDefRegMap(@Self)^.clr := $00020000
  43399. else
  43400. pTDefRegMap(@Self)^.&set := $00020000;
  43401. end;
  43402. function TADC10_AD1CHS.getCH0SA1 : TBits_1; inline;
  43403. begin
  43404. getCH0SA1 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  43405. end;
  43406. procedure TADC10_AD1CHS.setCH0SA2; inline;
  43407. begin
  43408. pTDefRegMap(@Self)^.&set := $00040000;
  43409. end;
  43410. procedure TADC10_AD1CHS.clearCH0SA2; inline;
  43411. begin
  43412. pTDefRegMap(@Self)^.clr := $00040000;
  43413. end;
  43414. procedure TADC10_AD1CHS.setCH0SA2(thebits : TBits_1); inline;
  43415. begin
  43416. if thebits = 0 then
  43417. pTDefRegMap(@Self)^.clr := $00040000
  43418. else
  43419. pTDefRegMap(@Self)^.&set := $00040000;
  43420. end;
  43421. function TADC10_AD1CHS.getCH0SA2 : TBits_1; inline;
  43422. begin
  43423. getCH0SA2 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  43424. end;
  43425. procedure TADC10_AD1CHS.setCH0SA3; inline;
  43426. begin
  43427. pTDefRegMap(@Self)^.&set := $00080000;
  43428. end;
  43429. procedure TADC10_AD1CHS.clearCH0SA3; inline;
  43430. begin
  43431. pTDefRegMap(@Self)^.clr := $00080000;
  43432. end;
  43433. procedure TADC10_AD1CHS.setCH0SA3(thebits : TBits_1); inline;
  43434. begin
  43435. if thebits = 0 then
  43436. pTDefRegMap(@Self)^.clr := $00080000
  43437. else
  43438. pTDefRegMap(@Self)^.&set := $00080000;
  43439. end;
  43440. function TADC10_AD1CHS.getCH0SA3 : TBits_1; inline;
  43441. begin
  43442. getCH0SA3 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  43443. end;
  43444. procedure TADC10_AD1CHS.setCH0SB0; inline;
  43445. begin
  43446. pTDefRegMap(@Self)^.&set := $01000000;
  43447. end;
  43448. procedure TADC10_AD1CHS.clearCH0SB0; inline;
  43449. begin
  43450. pTDefRegMap(@Self)^.clr := $01000000;
  43451. end;
  43452. procedure TADC10_AD1CHS.setCH0SB0(thebits : TBits_1); inline;
  43453. begin
  43454. if thebits = 0 then
  43455. pTDefRegMap(@Self)^.clr := $01000000
  43456. else
  43457. pTDefRegMap(@Self)^.&set := $01000000;
  43458. end;
  43459. function TADC10_AD1CHS.getCH0SB0 : TBits_1; inline;
  43460. begin
  43461. getCH0SB0 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  43462. end;
  43463. procedure TADC10_AD1CHS.setCH0SB1; inline;
  43464. begin
  43465. pTDefRegMap(@Self)^.&set := $02000000;
  43466. end;
  43467. procedure TADC10_AD1CHS.clearCH0SB1; inline;
  43468. begin
  43469. pTDefRegMap(@Self)^.clr := $02000000;
  43470. end;
  43471. procedure TADC10_AD1CHS.setCH0SB1(thebits : TBits_1); inline;
  43472. begin
  43473. if thebits = 0 then
  43474. pTDefRegMap(@Self)^.clr := $02000000
  43475. else
  43476. pTDefRegMap(@Self)^.&set := $02000000;
  43477. end;
  43478. function TADC10_AD1CHS.getCH0SB1 : TBits_1; inline;
  43479. begin
  43480. getCH0SB1 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  43481. end;
  43482. procedure TADC10_AD1CHS.setCH0SB2; inline;
  43483. begin
  43484. pTDefRegMap(@Self)^.&set := $04000000;
  43485. end;
  43486. procedure TADC10_AD1CHS.clearCH0SB2; inline;
  43487. begin
  43488. pTDefRegMap(@Self)^.clr := $04000000;
  43489. end;
  43490. procedure TADC10_AD1CHS.setCH0SB2(thebits : TBits_1); inline;
  43491. begin
  43492. if thebits = 0 then
  43493. pTDefRegMap(@Self)^.clr := $04000000
  43494. else
  43495. pTDefRegMap(@Self)^.&set := $04000000;
  43496. end;
  43497. function TADC10_AD1CHS.getCH0SB2 : TBits_1; inline;
  43498. begin
  43499. getCH0SB2 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  43500. end;
  43501. procedure TADC10_AD1CHS.setCH0SB3; inline;
  43502. begin
  43503. pTDefRegMap(@Self)^.&set := $08000000;
  43504. end;
  43505. procedure TADC10_AD1CHS.clearCH0SB3; inline;
  43506. begin
  43507. pTDefRegMap(@Self)^.clr := $08000000;
  43508. end;
  43509. procedure TADC10_AD1CHS.setCH0SB3(thebits : TBits_1); inline;
  43510. begin
  43511. if thebits = 0 then
  43512. pTDefRegMap(@Self)^.clr := $08000000
  43513. else
  43514. pTDefRegMap(@Self)^.&set := $08000000;
  43515. end;
  43516. function TADC10_AD1CHS.getCH0SB3 : TBits_1; inline;
  43517. begin
  43518. getCH0SB3 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  43519. end;
  43520. procedure TADC10_AD1CHS.setw(thebits : TBits_32); inline;
  43521. begin
  43522. pTDefRegMap(@Self)^.val := thebits;
  43523. end;
  43524. function TADC10_AD1CHS.getw : TBits_32; inline;
  43525. begin
  43526. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43527. end;
  43528. procedure TADC10_AD1CSSL.setCSSL(thebits : TBits_16); inline;
  43529. begin
  43530. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  43531. end;
  43532. function TADC10_AD1CSSL.getCSSL : TBits_16; inline;
  43533. begin
  43534. getCSSL := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  43535. end;
  43536. procedure TADC10_AD1CSSL.setCSSL0; inline;
  43537. begin
  43538. pTDefRegMap(@Self)^.&set := $00000001;
  43539. end;
  43540. procedure TADC10_AD1CSSL.clearCSSL0; inline;
  43541. begin
  43542. pTDefRegMap(@Self)^.clr := $00000001;
  43543. end;
  43544. procedure TADC10_AD1CSSL.setCSSL0(thebits : TBits_1); inline;
  43545. begin
  43546. if thebits = 0 then
  43547. pTDefRegMap(@Self)^.clr := $00000001
  43548. else
  43549. pTDefRegMap(@Self)^.&set := $00000001;
  43550. end;
  43551. function TADC10_AD1CSSL.getCSSL0 : TBits_1; inline;
  43552. begin
  43553. getCSSL0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43554. end;
  43555. procedure TADC10_AD1CSSL.setCSSL1; inline;
  43556. begin
  43557. pTDefRegMap(@Self)^.&set := $00000002;
  43558. end;
  43559. procedure TADC10_AD1CSSL.clearCSSL1; inline;
  43560. begin
  43561. pTDefRegMap(@Self)^.clr := $00000002;
  43562. end;
  43563. procedure TADC10_AD1CSSL.setCSSL1(thebits : TBits_1); inline;
  43564. begin
  43565. if thebits = 0 then
  43566. pTDefRegMap(@Self)^.clr := $00000002
  43567. else
  43568. pTDefRegMap(@Self)^.&set := $00000002;
  43569. end;
  43570. function TADC10_AD1CSSL.getCSSL1 : TBits_1; inline;
  43571. begin
  43572. getCSSL1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43573. end;
  43574. procedure TADC10_AD1CSSL.setCSSL2; inline;
  43575. begin
  43576. pTDefRegMap(@Self)^.&set := $00000004;
  43577. end;
  43578. procedure TADC10_AD1CSSL.clearCSSL2; inline;
  43579. begin
  43580. pTDefRegMap(@Self)^.clr := $00000004;
  43581. end;
  43582. procedure TADC10_AD1CSSL.setCSSL2(thebits : TBits_1); inline;
  43583. begin
  43584. if thebits = 0 then
  43585. pTDefRegMap(@Self)^.clr := $00000004
  43586. else
  43587. pTDefRegMap(@Self)^.&set := $00000004;
  43588. end;
  43589. function TADC10_AD1CSSL.getCSSL2 : TBits_1; inline;
  43590. begin
  43591. getCSSL2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  43592. end;
  43593. procedure TADC10_AD1CSSL.setCSSL3; inline;
  43594. begin
  43595. pTDefRegMap(@Self)^.&set := $00000008;
  43596. end;
  43597. procedure TADC10_AD1CSSL.clearCSSL3; inline;
  43598. begin
  43599. pTDefRegMap(@Self)^.clr := $00000008;
  43600. end;
  43601. procedure TADC10_AD1CSSL.setCSSL3(thebits : TBits_1); inline;
  43602. begin
  43603. if thebits = 0 then
  43604. pTDefRegMap(@Self)^.clr := $00000008
  43605. else
  43606. pTDefRegMap(@Self)^.&set := $00000008;
  43607. end;
  43608. function TADC10_AD1CSSL.getCSSL3 : TBits_1; inline;
  43609. begin
  43610. getCSSL3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  43611. end;
  43612. procedure TADC10_AD1CSSL.setCSSL4; inline;
  43613. begin
  43614. pTDefRegMap(@Self)^.&set := $00000010;
  43615. end;
  43616. procedure TADC10_AD1CSSL.clearCSSL4; inline;
  43617. begin
  43618. pTDefRegMap(@Self)^.clr := $00000010;
  43619. end;
  43620. procedure TADC10_AD1CSSL.setCSSL4(thebits : TBits_1); inline;
  43621. begin
  43622. if thebits = 0 then
  43623. pTDefRegMap(@Self)^.clr := $00000010
  43624. else
  43625. pTDefRegMap(@Self)^.&set := $00000010;
  43626. end;
  43627. function TADC10_AD1CSSL.getCSSL4 : TBits_1; inline;
  43628. begin
  43629. getCSSL4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43630. end;
  43631. procedure TADC10_AD1CSSL.setCSSL5; inline;
  43632. begin
  43633. pTDefRegMap(@Self)^.&set := $00000020;
  43634. end;
  43635. procedure TADC10_AD1CSSL.clearCSSL5; inline;
  43636. begin
  43637. pTDefRegMap(@Self)^.clr := $00000020;
  43638. end;
  43639. procedure TADC10_AD1CSSL.setCSSL5(thebits : TBits_1); inline;
  43640. begin
  43641. if thebits = 0 then
  43642. pTDefRegMap(@Self)^.clr := $00000020
  43643. else
  43644. pTDefRegMap(@Self)^.&set := $00000020;
  43645. end;
  43646. function TADC10_AD1CSSL.getCSSL5 : TBits_1; inline;
  43647. begin
  43648. getCSSL5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43649. end;
  43650. procedure TADC10_AD1CSSL.setCSSL6; inline;
  43651. begin
  43652. pTDefRegMap(@Self)^.&set := $00000040;
  43653. end;
  43654. procedure TADC10_AD1CSSL.clearCSSL6; inline;
  43655. begin
  43656. pTDefRegMap(@Self)^.clr := $00000040;
  43657. end;
  43658. procedure TADC10_AD1CSSL.setCSSL6(thebits : TBits_1); inline;
  43659. begin
  43660. if thebits = 0 then
  43661. pTDefRegMap(@Self)^.clr := $00000040
  43662. else
  43663. pTDefRegMap(@Self)^.&set := $00000040;
  43664. end;
  43665. function TADC10_AD1CSSL.getCSSL6 : TBits_1; inline;
  43666. begin
  43667. getCSSL6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43668. end;
  43669. procedure TADC10_AD1CSSL.setCSSL7; inline;
  43670. begin
  43671. pTDefRegMap(@Self)^.&set := $00000080;
  43672. end;
  43673. procedure TADC10_AD1CSSL.clearCSSL7; inline;
  43674. begin
  43675. pTDefRegMap(@Self)^.clr := $00000080;
  43676. end;
  43677. procedure TADC10_AD1CSSL.setCSSL7(thebits : TBits_1); inline;
  43678. begin
  43679. if thebits = 0 then
  43680. pTDefRegMap(@Self)^.clr := $00000080
  43681. else
  43682. pTDefRegMap(@Self)^.&set := $00000080;
  43683. end;
  43684. function TADC10_AD1CSSL.getCSSL7 : TBits_1; inline;
  43685. begin
  43686. getCSSL7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43687. end;
  43688. procedure TADC10_AD1CSSL.setCSSL8; inline;
  43689. begin
  43690. pTDefRegMap(@Self)^.&set := $00000100;
  43691. end;
  43692. procedure TADC10_AD1CSSL.clearCSSL8; inline;
  43693. begin
  43694. pTDefRegMap(@Self)^.clr := $00000100;
  43695. end;
  43696. procedure TADC10_AD1CSSL.setCSSL8(thebits : TBits_1); inline;
  43697. begin
  43698. if thebits = 0 then
  43699. pTDefRegMap(@Self)^.clr := $00000100
  43700. else
  43701. pTDefRegMap(@Self)^.&set := $00000100;
  43702. end;
  43703. function TADC10_AD1CSSL.getCSSL8 : TBits_1; inline;
  43704. begin
  43705. getCSSL8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43706. end;
  43707. procedure TADC10_AD1CSSL.setCSSL9; inline;
  43708. begin
  43709. pTDefRegMap(@Self)^.&set := $00000200;
  43710. end;
  43711. procedure TADC10_AD1CSSL.clearCSSL9; inline;
  43712. begin
  43713. pTDefRegMap(@Self)^.clr := $00000200;
  43714. end;
  43715. procedure TADC10_AD1CSSL.setCSSL9(thebits : TBits_1); inline;
  43716. begin
  43717. if thebits = 0 then
  43718. pTDefRegMap(@Self)^.clr := $00000200
  43719. else
  43720. pTDefRegMap(@Self)^.&set := $00000200;
  43721. end;
  43722. function TADC10_AD1CSSL.getCSSL9 : TBits_1; inline;
  43723. begin
  43724. getCSSL9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  43725. end;
  43726. procedure TADC10_AD1CSSL.setCSSL10; inline;
  43727. begin
  43728. pTDefRegMap(@Self)^.&set := $00000400;
  43729. end;
  43730. procedure TADC10_AD1CSSL.clearCSSL10; inline;
  43731. begin
  43732. pTDefRegMap(@Self)^.clr := $00000400;
  43733. end;
  43734. procedure TADC10_AD1CSSL.setCSSL10(thebits : TBits_1); inline;
  43735. begin
  43736. if thebits = 0 then
  43737. pTDefRegMap(@Self)^.clr := $00000400
  43738. else
  43739. pTDefRegMap(@Self)^.&set := $00000400;
  43740. end;
  43741. function TADC10_AD1CSSL.getCSSL10 : TBits_1; inline;
  43742. begin
  43743. getCSSL10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  43744. end;
  43745. procedure TADC10_AD1CSSL.setCSSL11; inline;
  43746. begin
  43747. pTDefRegMap(@Self)^.&set := $00000800;
  43748. end;
  43749. procedure TADC10_AD1CSSL.clearCSSL11; inline;
  43750. begin
  43751. pTDefRegMap(@Self)^.clr := $00000800;
  43752. end;
  43753. procedure TADC10_AD1CSSL.setCSSL11(thebits : TBits_1); inline;
  43754. begin
  43755. if thebits = 0 then
  43756. pTDefRegMap(@Self)^.clr := $00000800
  43757. else
  43758. pTDefRegMap(@Self)^.&set := $00000800;
  43759. end;
  43760. function TADC10_AD1CSSL.getCSSL11 : TBits_1; inline;
  43761. begin
  43762. getCSSL11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  43763. end;
  43764. procedure TADC10_AD1CSSL.setCSSL12; inline;
  43765. begin
  43766. pTDefRegMap(@Self)^.&set := $00001000;
  43767. end;
  43768. procedure TADC10_AD1CSSL.clearCSSL12; inline;
  43769. begin
  43770. pTDefRegMap(@Self)^.clr := $00001000;
  43771. end;
  43772. procedure TADC10_AD1CSSL.setCSSL12(thebits : TBits_1); inline;
  43773. begin
  43774. if thebits = 0 then
  43775. pTDefRegMap(@Self)^.clr := $00001000
  43776. else
  43777. pTDefRegMap(@Self)^.&set := $00001000;
  43778. end;
  43779. function TADC10_AD1CSSL.getCSSL12 : TBits_1; inline;
  43780. begin
  43781. getCSSL12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  43782. end;
  43783. procedure TADC10_AD1CSSL.setCSSL13; inline;
  43784. begin
  43785. pTDefRegMap(@Self)^.&set := $00002000;
  43786. end;
  43787. procedure TADC10_AD1CSSL.clearCSSL13; inline;
  43788. begin
  43789. pTDefRegMap(@Self)^.clr := $00002000;
  43790. end;
  43791. procedure TADC10_AD1CSSL.setCSSL13(thebits : TBits_1); inline;
  43792. begin
  43793. if thebits = 0 then
  43794. pTDefRegMap(@Self)^.clr := $00002000
  43795. else
  43796. pTDefRegMap(@Self)^.&set := $00002000;
  43797. end;
  43798. function TADC10_AD1CSSL.getCSSL13 : TBits_1; inline;
  43799. begin
  43800. getCSSL13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43801. end;
  43802. procedure TADC10_AD1CSSL.setCSSL14; inline;
  43803. begin
  43804. pTDefRegMap(@Self)^.&set := $00004000;
  43805. end;
  43806. procedure TADC10_AD1CSSL.clearCSSL14; inline;
  43807. begin
  43808. pTDefRegMap(@Self)^.clr := $00004000;
  43809. end;
  43810. procedure TADC10_AD1CSSL.setCSSL14(thebits : TBits_1); inline;
  43811. begin
  43812. if thebits = 0 then
  43813. pTDefRegMap(@Self)^.clr := $00004000
  43814. else
  43815. pTDefRegMap(@Self)^.&set := $00004000;
  43816. end;
  43817. function TADC10_AD1CSSL.getCSSL14 : TBits_1; inline;
  43818. begin
  43819. getCSSL14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  43820. end;
  43821. procedure TADC10_AD1CSSL.setCSSL15; inline;
  43822. begin
  43823. pTDefRegMap(@Self)^.&set := $00008000;
  43824. end;
  43825. procedure TADC10_AD1CSSL.clearCSSL15; inline;
  43826. begin
  43827. pTDefRegMap(@Self)^.clr := $00008000;
  43828. end;
  43829. procedure TADC10_AD1CSSL.setCSSL15(thebits : TBits_1); inline;
  43830. begin
  43831. if thebits = 0 then
  43832. pTDefRegMap(@Self)^.clr := $00008000
  43833. else
  43834. pTDefRegMap(@Self)^.&set := $00008000;
  43835. end;
  43836. function TADC10_AD1CSSL.getCSSL15 : TBits_1; inline;
  43837. begin
  43838. getCSSL15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43839. end;
  43840. procedure TADC10_AD1CSSL.setw(thebits : TBits_32); inline;
  43841. begin
  43842. pTDefRegMap(@Self)^.val := thebits;
  43843. end;
  43844. function TADC10_AD1CSSL.getw : TBits_32; inline;
  43845. begin
  43846. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43847. end;
  43848. procedure TADC10_AD1PCFG.setPCFG(thebits : TBits_16); inline;
  43849. begin
  43850. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  43851. end;
  43852. function TADC10_AD1PCFG.getPCFG : TBits_16; inline;
  43853. begin
  43854. getPCFG := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  43855. end;
  43856. procedure TADC10_AD1PCFG.setPCFG0; inline;
  43857. begin
  43858. pTDefRegMap(@Self)^.&set := $00000001;
  43859. end;
  43860. procedure TADC10_AD1PCFG.clearPCFG0; inline;
  43861. begin
  43862. pTDefRegMap(@Self)^.clr := $00000001;
  43863. end;
  43864. procedure TADC10_AD1PCFG.setPCFG0(thebits : TBits_1); inline;
  43865. begin
  43866. if thebits = 0 then
  43867. pTDefRegMap(@Self)^.clr := $00000001
  43868. else
  43869. pTDefRegMap(@Self)^.&set := $00000001;
  43870. end;
  43871. function TADC10_AD1PCFG.getPCFG0 : TBits_1; inline;
  43872. begin
  43873. getPCFG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43874. end;
  43875. procedure TADC10_AD1PCFG.setPCFG1; inline;
  43876. begin
  43877. pTDefRegMap(@Self)^.&set := $00000002;
  43878. end;
  43879. procedure TADC10_AD1PCFG.clearPCFG1; inline;
  43880. begin
  43881. pTDefRegMap(@Self)^.clr := $00000002;
  43882. end;
  43883. procedure TADC10_AD1PCFG.setPCFG1(thebits : TBits_1); inline;
  43884. begin
  43885. if thebits = 0 then
  43886. pTDefRegMap(@Self)^.clr := $00000002
  43887. else
  43888. pTDefRegMap(@Self)^.&set := $00000002;
  43889. end;
  43890. function TADC10_AD1PCFG.getPCFG1 : TBits_1; inline;
  43891. begin
  43892. getPCFG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43893. end;
  43894. procedure TADC10_AD1PCFG.setPCFG2; inline;
  43895. begin
  43896. pTDefRegMap(@Self)^.&set := $00000004;
  43897. end;
  43898. procedure TADC10_AD1PCFG.clearPCFG2; inline;
  43899. begin
  43900. pTDefRegMap(@Self)^.clr := $00000004;
  43901. end;
  43902. procedure TADC10_AD1PCFG.setPCFG2(thebits : TBits_1); inline;
  43903. begin
  43904. if thebits = 0 then
  43905. pTDefRegMap(@Self)^.clr := $00000004
  43906. else
  43907. pTDefRegMap(@Self)^.&set := $00000004;
  43908. end;
  43909. function TADC10_AD1PCFG.getPCFG2 : TBits_1; inline;
  43910. begin
  43911. getPCFG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  43912. end;
  43913. procedure TADC10_AD1PCFG.setPCFG3; inline;
  43914. begin
  43915. pTDefRegMap(@Self)^.&set := $00000008;
  43916. end;
  43917. procedure TADC10_AD1PCFG.clearPCFG3; inline;
  43918. begin
  43919. pTDefRegMap(@Self)^.clr := $00000008;
  43920. end;
  43921. procedure TADC10_AD1PCFG.setPCFG3(thebits : TBits_1); inline;
  43922. begin
  43923. if thebits = 0 then
  43924. pTDefRegMap(@Self)^.clr := $00000008
  43925. else
  43926. pTDefRegMap(@Self)^.&set := $00000008;
  43927. end;
  43928. function TADC10_AD1PCFG.getPCFG3 : TBits_1; inline;
  43929. begin
  43930. getPCFG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  43931. end;
  43932. procedure TADC10_AD1PCFG.setPCFG4; inline;
  43933. begin
  43934. pTDefRegMap(@Self)^.&set := $00000010;
  43935. end;
  43936. procedure TADC10_AD1PCFG.clearPCFG4; inline;
  43937. begin
  43938. pTDefRegMap(@Self)^.clr := $00000010;
  43939. end;
  43940. procedure TADC10_AD1PCFG.setPCFG4(thebits : TBits_1); inline;
  43941. begin
  43942. if thebits = 0 then
  43943. pTDefRegMap(@Self)^.clr := $00000010
  43944. else
  43945. pTDefRegMap(@Self)^.&set := $00000010;
  43946. end;
  43947. function TADC10_AD1PCFG.getPCFG4 : TBits_1; inline;
  43948. begin
  43949. getPCFG4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43950. end;
  43951. procedure TADC10_AD1PCFG.setPCFG5; inline;
  43952. begin
  43953. pTDefRegMap(@Self)^.&set := $00000020;
  43954. end;
  43955. procedure TADC10_AD1PCFG.clearPCFG5; inline;
  43956. begin
  43957. pTDefRegMap(@Self)^.clr := $00000020;
  43958. end;
  43959. procedure TADC10_AD1PCFG.setPCFG5(thebits : TBits_1); inline;
  43960. begin
  43961. if thebits = 0 then
  43962. pTDefRegMap(@Self)^.clr := $00000020
  43963. else
  43964. pTDefRegMap(@Self)^.&set := $00000020;
  43965. end;
  43966. function TADC10_AD1PCFG.getPCFG5 : TBits_1; inline;
  43967. begin
  43968. getPCFG5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43969. end;
  43970. procedure TADC10_AD1PCFG.setPCFG6; inline;
  43971. begin
  43972. pTDefRegMap(@Self)^.&set := $00000040;
  43973. end;
  43974. procedure TADC10_AD1PCFG.clearPCFG6; inline;
  43975. begin
  43976. pTDefRegMap(@Self)^.clr := $00000040;
  43977. end;
  43978. procedure TADC10_AD1PCFG.setPCFG6(thebits : TBits_1); inline;
  43979. begin
  43980. if thebits = 0 then
  43981. pTDefRegMap(@Self)^.clr := $00000040
  43982. else
  43983. pTDefRegMap(@Self)^.&set := $00000040;
  43984. end;
  43985. function TADC10_AD1PCFG.getPCFG6 : TBits_1; inline;
  43986. begin
  43987. getPCFG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43988. end;
  43989. procedure TADC10_AD1PCFG.setPCFG7; inline;
  43990. begin
  43991. pTDefRegMap(@Self)^.&set := $00000080;
  43992. end;
  43993. procedure TADC10_AD1PCFG.clearPCFG7; inline;
  43994. begin
  43995. pTDefRegMap(@Self)^.clr := $00000080;
  43996. end;
  43997. procedure TADC10_AD1PCFG.setPCFG7(thebits : TBits_1); inline;
  43998. begin
  43999. if thebits = 0 then
  44000. pTDefRegMap(@Self)^.clr := $00000080
  44001. else
  44002. pTDefRegMap(@Self)^.&set := $00000080;
  44003. end;
  44004. function TADC10_AD1PCFG.getPCFG7 : TBits_1; inline;
  44005. begin
  44006. getPCFG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44007. end;
  44008. procedure TADC10_AD1PCFG.setPCFG8; inline;
  44009. begin
  44010. pTDefRegMap(@Self)^.&set := $00000100;
  44011. end;
  44012. procedure TADC10_AD1PCFG.clearPCFG8; inline;
  44013. begin
  44014. pTDefRegMap(@Self)^.clr := $00000100;
  44015. end;
  44016. procedure TADC10_AD1PCFG.setPCFG8(thebits : TBits_1); inline;
  44017. begin
  44018. if thebits = 0 then
  44019. pTDefRegMap(@Self)^.clr := $00000100
  44020. else
  44021. pTDefRegMap(@Self)^.&set := $00000100;
  44022. end;
  44023. function TADC10_AD1PCFG.getPCFG8 : TBits_1; inline;
  44024. begin
  44025. getPCFG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44026. end;
  44027. procedure TADC10_AD1PCFG.setPCFG9; inline;
  44028. begin
  44029. pTDefRegMap(@Self)^.&set := $00000200;
  44030. end;
  44031. procedure TADC10_AD1PCFG.clearPCFG9; inline;
  44032. begin
  44033. pTDefRegMap(@Self)^.clr := $00000200;
  44034. end;
  44035. procedure TADC10_AD1PCFG.setPCFG9(thebits : TBits_1); inline;
  44036. begin
  44037. if thebits = 0 then
  44038. pTDefRegMap(@Self)^.clr := $00000200
  44039. else
  44040. pTDefRegMap(@Self)^.&set := $00000200;
  44041. end;
  44042. function TADC10_AD1PCFG.getPCFG9 : TBits_1; inline;
  44043. begin
  44044. getPCFG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  44045. end;
  44046. procedure TADC10_AD1PCFG.setPCFG10; inline;
  44047. begin
  44048. pTDefRegMap(@Self)^.&set := $00000400;
  44049. end;
  44050. procedure TADC10_AD1PCFG.clearPCFG10; inline;
  44051. begin
  44052. pTDefRegMap(@Self)^.clr := $00000400;
  44053. end;
  44054. procedure TADC10_AD1PCFG.setPCFG10(thebits : TBits_1); inline;
  44055. begin
  44056. if thebits = 0 then
  44057. pTDefRegMap(@Self)^.clr := $00000400
  44058. else
  44059. pTDefRegMap(@Self)^.&set := $00000400;
  44060. end;
  44061. function TADC10_AD1PCFG.getPCFG10 : TBits_1; inline;
  44062. begin
  44063. getPCFG10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  44064. end;
  44065. procedure TADC10_AD1PCFG.setPCFG11; inline;
  44066. begin
  44067. pTDefRegMap(@Self)^.&set := $00000800;
  44068. end;
  44069. procedure TADC10_AD1PCFG.clearPCFG11; inline;
  44070. begin
  44071. pTDefRegMap(@Self)^.clr := $00000800;
  44072. end;
  44073. procedure TADC10_AD1PCFG.setPCFG11(thebits : TBits_1); inline;
  44074. begin
  44075. if thebits = 0 then
  44076. pTDefRegMap(@Self)^.clr := $00000800
  44077. else
  44078. pTDefRegMap(@Self)^.&set := $00000800;
  44079. end;
  44080. function TADC10_AD1PCFG.getPCFG11 : TBits_1; inline;
  44081. begin
  44082. getPCFG11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  44083. end;
  44084. procedure TADC10_AD1PCFG.setPCFG12; inline;
  44085. begin
  44086. pTDefRegMap(@Self)^.&set := $00001000;
  44087. end;
  44088. procedure TADC10_AD1PCFG.clearPCFG12; inline;
  44089. begin
  44090. pTDefRegMap(@Self)^.clr := $00001000;
  44091. end;
  44092. procedure TADC10_AD1PCFG.setPCFG12(thebits : TBits_1); inline;
  44093. begin
  44094. if thebits = 0 then
  44095. pTDefRegMap(@Self)^.clr := $00001000
  44096. else
  44097. pTDefRegMap(@Self)^.&set := $00001000;
  44098. end;
  44099. function TADC10_AD1PCFG.getPCFG12 : TBits_1; inline;
  44100. begin
  44101. getPCFG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  44102. end;
  44103. procedure TADC10_AD1PCFG.setPCFG13; inline;
  44104. begin
  44105. pTDefRegMap(@Self)^.&set := $00002000;
  44106. end;
  44107. procedure TADC10_AD1PCFG.clearPCFG13; inline;
  44108. begin
  44109. pTDefRegMap(@Self)^.clr := $00002000;
  44110. end;
  44111. procedure TADC10_AD1PCFG.setPCFG13(thebits : TBits_1); inline;
  44112. begin
  44113. if thebits = 0 then
  44114. pTDefRegMap(@Self)^.clr := $00002000
  44115. else
  44116. pTDefRegMap(@Self)^.&set := $00002000;
  44117. end;
  44118. function TADC10_AD1PCFG.getPCFG13 : TBits_1; inline;
  44119. begin
  44120. getPCFG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44121. end;
  44122. procedure TADC10_AD1PCFG.setPCFG14; inline;
  44123. begin
  44124. pTDefRegMap(@Self)^.&set := $00004000;
  44125. end;
  44126. procedure TADC10_AD1PCFG.clearPCFG14; inline;
  44127. begin
  44128. pTDefRegMap(@Self)^.clr := $00004000;
  44129. end;
  44130. procedure TADC10_AD1PCFG.setPCFG14(thebits : TBits_1); inline;
  44131. begin
  44132. if thebits = 0 then
  44133. pTDefRegMap(@Self)^.clr := $00004000
  44134. else
  44135. pTDefRegMap(@Self)^.&set := $00004000;
  44136. end;
  44137. function TADC10_AD1PCFG.getPCFG14 : TBits_1; inline;
  44138. begin
  44139. getPCFG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  44140. end;
  44141. procedure TADC10_AD1PCFG.setPCFG15; inline;
  44142. begin
  44143. pTDefRegMap(@Self)^.&set := $00008000;
  44144. end;
  44145. procedure TADC10_AD1PCFG.clearPCFG15; inline;
  44146. begin
  44147. pTDefRegMap(@Self)^.clr := $00008000;
  44148. end;
  44149. procedure TADC10_AD1PCFG.setPCFG15(thebits : TBits_1); inline;
  44150. begin
  44151. if thebits = 0 then
  44152. pTDefRegMap(@Self)^.clr := $00008000
  44153. else
  44154. pTDefRegMap(@Self)^.&set := $00008000;
  44155. end;
  44156. function TADC10_AD1PCFG.getPCFG15 : TBits_1; inline;
  44157. begin
  44158. getPCFG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44159. end;
  44160. procedure TADC10_AD1PCFG.setw(thebits : TBits_32); inline;
  44161. begin
  44162. pTDefRegMap(@Self)^.val := thebits;
  44163. end;
  44164. function TADC10_AD1PCFG.getw : TBits_32; inline;
  44165. begin
  44166. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44167. end;
  44168. procedure TCVR_CVRCON.setCVR(thebits : TBits_4); inline;
  44169. begin
  44170. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  44171. end;
  44172. function TCVR_CVRCON.getCVR : TBits_4; inline;
  44173. begin
  44174. getCVR := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  44175. end;
  44176. procedure TCVR_CVRCON.setCVRSS; inline;
  44177. begin
  44178. pTDefRegMap(@Self)^.&set := $00000010;
  44179. end;
  44180. procedure TCVR_CVRCON.clearCVRSS; inline;
  44181. begin
  44182. pTDefRegMap(@Self)^.clr := $00000010;
  44183. end;
  44184. procedure TCVR_CVRCON.setCVRSS(thebits : TBits_1); inline;
  44185. begin
  44186. if thebits = 0 then
  44187. pTDefRegMap(@Self)^.clr := $00000010
  44188. else
  44189. pTDefRegMap(@Self)^.&set := $00000010;
  44190. end;
  44191. function TCVR_CVRCON.getCVRSS : TBits_1; inline;
  44192. begin
  44193. getCVRSS := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44194. end;
  44195. procedure TCVR_CVRCON.setCVRR; inline;
  44196. begin
  44197. pTDefRegMap(@Self)^.&set := $00000020;
  44198. end;
  44199. procedure TCVR_CVRCON.clearCVRR; inline;
  44200. begin
  44201. pTDefRegMap(@Self)^.clr := $00000020;
  44202. end;
  44203. procedure TCVR_CVRCON.setCVRR(thebits : TBits_1); inline;
  44204. begin
  44205. if thebits = 0 then
  44206. pTDefRegMap(@Self)^.clr := $00000020
  44207. else
  44208. pTDefRegMap(@Self)^.&set := $00000020;
  44209. end;
  44210. function TCVR_CVRCON.getCVRR : TBits_1; inline;
  44211. begin
  44212. getCVRR := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  44213. end;
  44214. procedure TCVR_CVRCON.setCVROE; inline;
  44215. begin
  44216. pTDefRegMap(@Self)^.&set := $00000040;
  44217. end;
  44218. procedure TCVR_CVRCON.clearCVROE; inline;
  44219. begin
  44220. pTDefRegMap(@Self)^.clr := $00000040;
  44221. end;
  44222. procedure TCVR_CVRCON.setCVROE(thebits : TBits_1); inline;
  44223. begin
  44224. if thebits = 0 then
  44225. pTDefRegMap(@Self)^.clr := $00000040
  44226. else
  44227. pTDefRegMap(@Self)^.&set := $00000040;
  44228. end;
  44229. function TCVR_CVRCON.getCVROE : TBits_1; inline;
  44230. begin
  44231. getCVROE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44232. end;
  44233. procedure TCVR_CVRCON.setON; inline;
  44234. begin
  44235. pTDefRegMap(@Self)^.&set := $00008000;
  44236. end;
  44237. procedure TCVR_CVRCON.clearON; inline;
  44238. begin
  44239. pTDefRegMap(@Self)^.clr := $00008000;
  44240. end;
  44241. procedure TCVR_CVRCON.setON(thebits : TBits_1); inline;
  44242. begin
  44243. if thebits = 0 then
  44244. pTDefRegMap(@Self)^.clr := $00008000
  44245. else
  44246. pTDefRegMap(@Self)^.&set := $00008000;
  44247. end;
  44248. function TCVR_CVRCON.getON : TBits_1; inline;
  44249. begin
  44250. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44251. end;
  44252. procedure TCVR_CVRCON.setCVR0; inline;
  44253. begin
  44254. pTDefRegMap(@Self)^.&set := $00000001;
  44255. end;
  44256. procedure TCVR_CVRCON.clearCVR0; inline;
  44257. begin
  44258. pTDefRegMap(@Self)^.clr := $00000001;
  44259. end;
  44260. procedure TCVR_CVRCON.setCVR0(thebits : TBits_1); inline;
  44261. begin
  44262. if thebits = 0 then
  44263. pTDefRegMap(@Self)^.clr := $00000001
  44264. else
  44265. pTDefRegMap(@Self)^.&set := $00000001;
  44266. end;
  44267. function TCVR_CVRCON.getCVR0 : TBits_1; inline;
  44268. begin
  44269. getCVR0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44270. end;
  44271. procedure TCVR_CVRCON.setCVR1; inline;
  44272. begin
  44273. pTDefRegMap(@Self)^.&set := $00000002;
  44274. end;
  44275. procedure TCVR_CVRCON.clearCVR1; inline;
  44276. begin
  44277. pTDefRegMap(@Self)^.clr := $00000002;
  44278. end;
  44279. procedure TCVR_CVRCON.setCVR1(thebits : TBits_1); inline;
  44280. begin
  44281. if thebits = 0 then
  44282. pTDefRegMap(@Self)^.clr := $00000002
  44283. else
  44284. pTDefRegMap(@Self)^.&set := $00000002;
  44285. end;
  44286. function TCVR_CVRCON.getCVR1 : TBits_1; inline;
  44287. begin
  44288. getCVR1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44289. end;
  44290. procedure TCVR_CVRCON.setCVR2; inline;
  44291. begin
  44292. pTDefRegMap(@Self)^.&set := $00000004;
  44293. end;
  44294. procedure TCVR_CVRCON.clearCVR2; inline;
  44295. begin
  44296. pTDefRegMap(@Self)^.clr := $00000004;
  44297. end;
  44298. procedure TCVR_CVRCON.setCVR2(thebits : TBits_1); inline;
  44299. begin
  44300. if thebits = 0 then
  44301. pTDefRegMap(@Self)^.clr := $00000004
  44302. else
  44303. pTDefRegMap(@Self)^.&set := $00000004;
  44304. end;
  44305. function TCVR_CVRCON.getCVR2 : TBits_1; inline;
  44306. begin
  44307. getCVR2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44308. end;
  44309. procedure TCVR_CVRCON.setCVR3; inline;
  44310. begin
  44311. pTDefRegMap(@Self)^.&set := $00000008;
  44312. end;
  44313. procedure TCVR_CVRCON.clearCVR3; inline;
  44314. begin
  44315. pTDefRegMap(@Self)^.clr := $00000008;
  44316. end;
  44317. procedure TCVR_CVRCON.setCVR3(thebits : TBits_1); inline;
  44318. begin
  44319. if thebits = 0 then
  44320. pTDefRegMap(@Self)^.clr := $00000008
  44321. else
  44322. pTDefRegMap(@Self)^.&set := $00000008;
  44323. end;
  44324. function TCVR_CVRCON.getCVR3 : TBits_1; inline;
  44325. begin
  44326. getCVR3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44327. end;
  44328. procedure TCVR_CVRCON.setw(thebits : TBits_32); inline;
  44329. begin
  44330. pTDefRegMap(@Self)^.val := thebits;
  44331. end;
  44332. function TCVR_CVRCON.getw : TBits_32; inline;
  44333. begin
  44334. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44335. end;
  44336. procedure TCMP_CM1CON.setCCH(thebits : TBits_2); inline;
  44337. begin
  44338. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  44339. end;
  44340. function TCMP_CM1CON.getCCH : TBits_2; inline;
  44341. begin
  44342. getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  44343. end;
  44344. procedure TCMP_CM1CON.setCREF; inline;
  44345. begin
  44346. pTDefRegMap(@Self)^.&set := $00000010;
  44347. end;
  44348. procedure TCMP_CM1CON.clearCREF; inline;
  44349. begin
  44350. pTDefRegMap(@Self)^.clr := $00000010;
  44351. end;
  44352. procedure TCMP_CM1CON.setCREF(thebits : TBits_1); inline;
  44353. begin
  44354. if thebits = 0 then
  44355. pTDefRegMap(@Self)^.clr := $00000010
  44356. else
  44357. pTDefRegMap(@Self)^.&set := $00000010;
  44358. end;
  44359. function TCMP_CM1CON.getCREF : TBits_1; inline;
  44360. begin
  44361. getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44362. end;
  44363. procedure TCMP_CM1CON.setEVPOL(thebits : TBits_2); inline;
  44364. begin
  44365. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  44366. end;
  44367. function TCMP_CM1CON.getEVPOL : TBits_2; inline;
  44368. begin
  44369. getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  44370. end;
  44371. procedure TCMP_CM1CON.setCOUT; inline;
  44372. begin
  44373. pTDefRegMap(@Self)^.&set := $00000100;
  44374. end;
  44375. procedure TCMP_CM1CON.clearCOUT; inline;
  44376. begin
  44377. pTDefRegMap(@Self)^.clr := $00000100;
  44378. end;
  44379. procedure TCMP_CM1CON.setCOUT(thebits : TBits_1); inline;
  44380. begin
  44381. if thebits = 0 then
  44382. pTDefRegMap(@Self)^.clr := $00000100
  44383. else
  44384. pTDefRegMap(@Self)^.&set := $00000100;
  44385. end;
  44386. function TCMP_CM1CON.getCOUT : TBits_1; inline;
  44387. begin
  44388. getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44389. end;
  44390. procedure TCMP_CM1CON.setCPOL; inline;
  44391. begin
  44392. pTDefRegMap(@Self)^.&set := $00002000;
  44393. end;
  44394. procedure TCMP_CM1CON.clearCPOL; inline;
  44395. begin
  44396. pTDefRegMap(@Self)^.clr := $00002000;
  44397. end;
  44398. procedure TCMP_CM1CON.setCPOL(thebits : TBits_1); inline;
  44399. begin
  44400. if thebits = 0 then
  44401. pTDefRegMap(@Self)^.clr := $00002000
  44402. else
  44403. pTDefRegMap(@Self)^.&set := $00002000;
  44404. end;
  44405. function TCMP_CM1CON.getCPOL : TBits_1; inline;
  44406. begin
  44407. getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44408. end;
  44409. procedure TCMP_CM1CON.setCOE; inline;
  44410. begin
  44411. pTDefRegMap(@Self)^.&set := $00004000;
  44412. end;
  44413. procedure TCMP_CM1CON.clearCOE; inline;
  44414. begin
  44415. pTDefRegMap(@Self)^.clr := $00004000;
  44416. end;
  44417. procedure TCMP_CM1CON.setCOE(thebits : TBits_1); inline;
  44418. begin
  44419. if thebits = 0 then
  44420. pTDefRegMap(@Self)^.clr := $00004000
  44421. else
  44422. pTDefRegMap(@Self)^.&set := $00004000;
  44423. end;
  44424. function TCMP_CM1CON.getCOE : TBits_1; inline;
  44425. begin
  44426. getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  44427. end;
  44428. procedure TCMP_CM1CON.setON; inline;
  44429. begin
  44430. pTDefRegMap(@Self)^.&set := $00008000;
  44431. end;
  44432. procedure TCMP_CM1CON.clearON; inline;
  44433. begin
  44434. pTDefRegMap(@Self)^.clr := $00008000;
  44435. end;
  44436. procedure TCMP_CM1CON.setON(thebits : TBits_1); inline;
  44437. begin
  44438. if thebits = 0 then
  44439. pTDefRegMap(@Self)^.clr := $00008000
  44440. else
  44441. pTDefRegMap(@Self)^.&set := $00008000;
  44442. end;
  44443. function TCMP_CM1CON.getON : TBits_1; inline;
  44444. begin
  44445. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44446. end;
  44447. procedure TCMP_CM1CON.setCCH0; inline;
  44448. begin
  44449. pTDefRegMap(@Self)^.&set := $00000001;
  44450. end;
  44451. procedure TCMP_CM1CON.clearCCH0; inline;
  44452. begin
  44453. pTDefRegMap(@Self)^.clr := $00000001;
  44454. end;
  44455. procedure TCMP_CM1CON.setCCH0(thebits : TBits_1); inline;
  44456. begin
  44457. if thebits = 0 then
  44458. pTDefRegMap(@Self)^.clr := $00000001
  44459. else
  44460. pTDefRegMap(@Self)^.&set := $00000001;
  44461. end;
  44462. function TCMP_CM1CON.getCCH0 : TBits_1; inline;
  44463. begin
  44464. getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44465. end;
  44466. procedure TCMP_CM1CON.setCCH1; inline;
  44467. begin
  44468. pTDefRegMap(@Self)^.&set := $00000002;
  44469. end;
  44470. procedure TCMP_CM1CON.clearCCH1; inline;
  44471. begin
  44472. pTDefRegMap(@Self)^.clr := $00000002;
  44473. end;
  44474. procedure TCMP_CM1CON.setCCH1(thebits : TBits_1); inline;
  44475. begin
  44476. if thebits = 0 then
  44477. pTDefRegMap(@Self)^.clr := $00000002
  44478. else
  44479. pTDefRegMap(@Self)^.&set := $00000002;
  44480. end;
  44481. function TCMP_CM1CON.getCCH1 : TBits_1; inline;
  44482. begin
  44483. getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44484. end;
  44485. procedure TCMP_CM1CON.setEVPOL0; inline;
  44486. begin
  44487. pTDefRegMap(@Self)^.&set := $00000040;
  44488. end;
  44489. procedure TCMP_CM1CON.clearEVPOL0; inline;
  44490. begin
  44491. pTDefRegMap(@Self)^.clr := $00000040;
  44492. end;
  44493. procedure TCMP_CM1CON.setEVPOL0(thebits : TBits_1); inline;
  44494. begin
  44495. if thebits = 0 then
  44496. pTDefRegMap(@Self)^.clr := $00000040
  44497. else
  44498. pTDefRegMap(@Self)^.&set := $00000040;
  44499. end;
  44500. function TCMP_CM1CON.getEVPOL0 : TBits_1; inline;
  44501. begin
  44502. getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44503. end;
  44504. procedure TCMP_CM1CON.setEVPOL1; inline;
  44505. begin
  44506. pTDefRegMap(@Self)^.&set := $00000080;
  44507. end;
  44508. procedure TCMP_CM1CON.clearEVPOL1; inline;
  44509. begin
  44510. pTDefRegMap(@Self)^.clr := $00000080;
  44511. end;
  44512. procedure TCMP_CM1CON.setEVPOL1(thebits : TBits_1); inline;
  44513. begin
  44514. if thebits = 0 then
  44515. pTDefRegMap(@Self)^.clr := $00000080
  44516. else
  44517. pTDefRegMap(@Self)^.&set := $00000080;
  44518. end;
  44519. function TCMP_CM1CON.getEVPOL1 : TBits_1; inline;
  44520. begin
  44521. getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44522. end;
  44523. procedure TCMP_CM1CON.setw(thebits : TBits_32); inline;
  44524. begin
  44525. pTDefRegMap(@Self)^.val := thebits;
  44526. end;
  44527. function TCMP_CM1CON.getw : TBits_32; inline;
  44528. begin
  44529. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44530. end;
  44531. procedure TCMP_CM2CON.setCCH(thebits : TBits_2); inline;
  44532. begin
  44533. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  44534. end;
  44535. function TCMP_CM2CON.getCCH : TBits_2; inline;
  44536. begin
  44537. getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  44538. end;
  44539. procedure TCMP_CM2CON.setCREF; inline;
  44540. begin
  44541. pTDefRegMap(@Self)^.&set := $00000010;
  44542. end;
  44543. procedure TCMP_CM2CON.clearCREF; inline;
  44544. begin
  44545. pTDefRegMap(@Self)^.clr := $00000010;
  44546. end;
  44547. procedure TCMP_CM2CON.setCREF(thebits : TBits_1); inline;
  44548. begin
  44549. if thebits = 0 then
  44550. pTDefRegMap(@Self)^.clr := $00000010
  44551. else
  44552. pTDefRegMap(@Self)^.&set := $00000010;
  44553. end;
  44554. function TCMP_CM2CON.getCREF : TBits_1; inline;
  44555. begin
  44556. getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44557. end;
  44558. procedure TCMP_CM2CON.setEVPOL(thebits : TBits_2); inline;
  44559. begin
  44560. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  44561. end;
  44562. function TCMP_CM2CON.getEVPOL : TBits_2; inline;
  44563. begin
  44564. getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  44565. end;
  44566. procedure TCMP_CM2CON.setCOUT; inline;
  44567. begin
  44568. pTDefRegMap(@Self)^.&set := $00000100;
  44569. end;
  44570. procedure TCMP_CM2CON.clearCOUT; inline;
  44571. begin
  44572. pTDefRegMap(@Self)^.clr := $00000100;
  44573. end;
  44574. procedure TCMP_CM2CON.setCOUT(thebits : TBits_1); inline;
  44575. begin
  44576. if thebits = 0 then
  44577. pTDefRegMap(@Self)^.clr := $00000100
  44578. else
  44579. pTDefRegMap(@Self)^.&set := $00000100;
  44580. end;
  44581. function TCMP_CM2CON.getCOUT : TBits_1; inline;
  44582. begin
  44583. getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44584. end;
  44585. procedure TCMP_CM2CON.setCPOL; inline;
  44586. begin
  44587. pTDefRegMap(@Self)^.&set := $00002000;
  44588. end;
  44589. procedure TCMP_CM2CON.clearCPOL; inline;
  44590. begin
  44591. pTDefRegMap(@Self)^.clr := $00002000;
  44592. end;
  44593. procedure TCMP_CM2CON.setCPOL(thebits : TBits_1); inline;
  44594. begin
  44595. if thebits = 0 then
  44596. pTDefRegMap(@Self)^.clr := $00002000
  44597. else
  44598. pTDefRegMap(@Self)^.&set := $00002000;
  44599. end;
  44600. function TCMP_CM2CON.getCPOL : TBits_1; inline;
  44601. begin
  44602. getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44603. end;
  44604. procedure TCMP_CM2CON.setCOE; inline;
  44605. begin
  44606. pTDefRegMap(@Self)^.&set := $00004000;
  44607. end;
  44608. procedure TCMP_CM2CON.clearCOE; inline;
  44609. begin
  44610. pTDefRegMap(@Self)^.clr := $00004000;
  44611. end;
  44612. procedure TCMP_CM2CON.setCOE(thebits : TBits_1); inline;
  44613. begin
  44614. if thebits = 0 then
  44615. pTDefRegMap(@Self)^.clr := $00004000
  44616. else
  44617. pTDefRegMap(@Self)^.&set := $00004000;
  44618. end;
  44619. function TCMP_CM2CON.getCOE : TBits_1; inline;
  44620. begin
  44621. getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  44622. end;
  44623. procedure TCMP_CM2CON.setON; inline;
  44624. begin
  44625. pTDefRegMap(@Self)^.&set := $00008000;
  44626. end;
  44627. procedure TCMP_CM2CON.clearON; inline;
  44628. begin
  44629. pTDefRegMap(@Self)^.clr := $00008000;
  44630. end;
  44631. procedure TCMP_CM2CON.setON(thebits : TBits_1); inline;
  44632. begin
  44633. if thebits = 0 then
  44634. pTDefRegMap(@Self)^.clr := $00008000
  44635. else
  44636. pTDefRegMap(@Self)^.&set := $00008000;
  44637. end;
  44638. function TCMP_CM2CON.getON : TBits_1; inline;
  44639. begin
  44640. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44641. end;
  44642. procedure TCMP_CM2CON.setCCH0; inline;
  44643. begin
  44644. pTDefRegMap(@Self)^.&set := $00000001;
  44645. end;
  44646. procedure TCMP_CM2CON.clearCCH0; inline;
  44647. begin
  44648. pTDefRegMap(@Self)^.clr := $00000001;
  44649. end;
  44650. procedure TCMP_CM2CON.setCCH0(thebits : TBits_1); inline;
  44651. begin
  44652. if thebits = 0 then
  44653. pTDefRegMap(@Self)^.clr := $00000001
  44654. else
  44655. pTDefRegMap(@Self)^.&set := $00000001;
  44656. end;
  44657. function TCMP_CM2CON.getCCH0 : TBits_1; inline;
  44658. begin
  44659. getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44660. end;
  44661. procedure TCMP_CM2CON.setCCH1; inline;
  44662. begin
  44663. pTDefRegMap(@Self)^.&set := $00000002;
  44664. end;
  44665. procedure TCMP_CM2CON.clearCCH1; inline;
  44666. begin
  44667. pTDefRegMap(@Self)^.clr := $00000002;
  44668. end;
  44669. procedure TCMP_CM2CON.setCCH1(thebits : TBits_1); inline;
  44670. begin
  44671. if thebits = 0 then
  44672. pTDefRegMap(@Self)^.clr := $00000002
  44673. else
  44674. pTDefRegMap(@Self)^.&set := $00000002;
  44675. end;
  44676. function TCMP_CM2CON.getCCH1 : TBits_1; inline;
  44677. begin
  44678. getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44679. end;
  44680. procedure TCMP_CM2CON.setEVPOL0; inline;
  44681. begin
  44682. pTDefRegMap(@Self)^.&set := $00000040;
  44683. end;
  44684. procedure TCMP_CM2CON.clearEVPOL0; inline;
  44685. begin
  44686. pTDefRegMap(@Self)^.clr := $00000040;
  44687. end;
  44688. procedure TCMP_CM2CON.setEVPOL0(thebits : TBits_1); inline;
  44689. begin
  44690. if thebits = 0 then
  44691. pTDefRegMap(@Self)^.clr := $00000040
  44692. else
  44693. pTDefRegMap(@Self)^.&set := $00000040;
  44694. end;
  44695. function TCMP_CM2CON.getEVPOL0 : TBits_1; inline;
  44696. begin
  44697. getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44698. end;
  44699. procedure TCMP_CM2CON.setEVPOL1; inline;
  44700. begin
  44701. pTDefRegMap(@Self)^.&set := $00000080;
  44702. end;
  44703. procedure TCMP_CM2CON.clearEVPOL1; inline;
  44704. begin
  44705. pTDefRegMap(@Self)^.clr := $00000080;
  44706. end;
  44707. procedure TCMP_CM2CON.setEVPOL1(thebits : TBits_1); inline;
  44708. begin
  44709. if thebits = 0 then
  44710. pTDefRegMap(@Self)^.clr := $00000080
  44711. else
  44712. pTDefRegMap(@Self)^.&set := $00000080;
  44713. end;
  44714. function TCMP_CM2CON.getEVPOL1 : TBits_1; inline;
  44715. begin
  44716. getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44717. end;
  44718. procedure TCMP_CM2CON.setw(thebits : TBits_32); inline;
  44719. begin
  44720. pTDefRegMap(@Self)^.val := thebits;
  44721. end;
  44722. function TCMP_CM2CON.getw : TBits_32; inline;
  44723. begin
  44724. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44725. end;
  44726. procedure TCMP_CMSTAT.setC1OUT; inline;
  44727. begin
  44728. pTDefRegMap(@Self)^.&set := $00000001;
  44729. end;
  44730. procedure TCMP_CMSTAT.clearC1OUT; inline;
  44731. begin
  44732. pTDefRegMap(@Self)^.clr := $00000001;
  44733. end;
  44734. procedure TCMP_CMSTAT.setC1OUT(thebits : TBits_1); inline;
  44735. begin
  44736. if thebits = 0 then
  44737. pTDefRegMap(@Self)^.clr := $00000001
  44738. else
  44739. pTDefRegMap(@Self)^.&set := $00000001;
  44740. end;
  44741. function TCMP_CMSTAT.getC1OUT : TBits_1; inline;
  44742. begin
  44743. getC1OUT := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44744. end;
  44745. procedure TCMP_CMSTAT.setC2OUT; inline;
  44746. begin
  44747. pTDefRegMap(@Self)^.&set := $00000002;
  44748. end;
  44749. procedure TCMP_CMSTAT.clearC2OUT; inline;
  44750. begin
  44751. pTDefRegMap(@Self)^.clr := $00000002;
  44752. end;
  44753. procedure TCMP_CMSTAT.setC2OUT(thebits : TBits_1); inline;
  44754. begin
  44755. if thebits = 0 then
  44756. pTDefRegMap(@Self)^.clr := $00000002
  44757. else
  44758. pTDefRegMap(@Self)^.&set := $00000002;
  44759. end;
  44760. function TCMP_CMSTAT.getC2OUT : TBits_1; inline;
  44761. begin
  44762. getC2OUT := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44763. end;
  44764. procedure TCMP_CMSTAT.setSIDL; inline;
  44765. begin
  44766. pTDefRegMap(@Self)^.&set := $00002000;
  44767. end;
  44768. procedure TCMP_CMSTAT.clearSIDL; inline;
  44769. begin
  44770. pTDefRegMap(@Self)^.clr := $00002000;
  44771. end;
  44772. procedure TCMP_CMSTAT.setSIDL(thebits : TBits_1); inline;
  44773. begin
  44774. if thebits = 0 then
  44775. pTDefRegMap(@Self)^.clr := $00002000
  44776. else
  44777. pTDefRegMap(@Self)^.&set := $00002000;
  44778. end;
  44779. function TCMP_CMSTAT.getSIDL : TBits_1; inline;
  44780. begin
  44781. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44782. end;
  44783. procedure TCMP_CMSTAT.setw(thebits : TBits_32); inline;
  44784. begin
  44785. pTDefRegMap(@Self)^.val := thebits;
  44786. end;
  44787. function TCMP_CMSTAT.getw : TBits_32; inline;
  44788. begin
  44789. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44790. end;
  44791. procedure TOSC_OSCCON.setOSWEN; inline;
  44792. begin
  44793. pTDefRegMap(@Self)^.&set := $00000001;
  44794. end;
  44795. procedure TOSC_OSCCON.clearOSWEN; inline;
  44796. begin
  44797. pTDefRegMap(@Self)^.clr := $00000001;
  44798. end;
  44799. procedure TOSC_OSCCON.setOSWEN(thebits : TBits_1); inline;
  44800. begin
  44801. if thebits = 0 then
  44802. pTDefRegMap(@Self)^.clr := $00000001
  44803. else
  44804. pTDefRegMap(@Self)^.&set := $00000001;
  44805. end;
  44806. function TOSC_OSCCON.getOSWEN : TBits_1; inline;
  44807. begin
  44808. getOSWEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44809. end;
  44810. procedure TOSC_OSCCON.setSOSCEN; inline;
  44811. begin
  44812. pTDefRegMap(@Self)^.&set := $00000002;
  44813. end;
  44814. procedure TOSC_OSCCON.clearSOSCEN; inline;
  44815. begin
  44816. pTDefRegMap(@Self)^.clr := $00000002;
  44817. end;
  44818. procedure TOSC_OSCCON.setSOSCEN(thebits : TBits_1); inline;
  44819. begin
  44820. if thebits = 0 then
  44821. pTDefRegMap(@Self)^.clr := $00000002
  44822. else
  44823. pTDefRegMap(@Self)^.&set := $00000002;
  44824. end;
  44825. function TOSC_OSCCON.getSOSCEN : TBits_1; inline;
  44826. begin
  44827. getSOSCEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44828. end;
  44829. procedure TOSC_OSCCON.setUFRCEN; inline;
  44830. begin
  44831. pTDefRegMap(@Self)^.&set := $00000004;
  44832. end;
  44833. procedure TOSC_OSCCON.clearUFRCEN; inline;
  44834. begin
  44835. pTDefRegMap(@Self)^.clr := $00000004;
  44836. end;
  44837. procedure TOSC_OSCCON.setUFRCEN(thebits : TBits_1); inline;
  44838. begin
  44839. if thebits = 0 then
  44840. pTDefRegMap(@Self)^.clr := $00000004
  44841. else
  44842. pTDefRegMap(@Self)^.&set := $00000004;
  44843. end;
  44844. function TOSC_OSCCON.getUFRCEN : TBits_1; inline;
  44845. begin
  44846. getUFRCEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44847. end;
  44848. procedure TOSC_OSCCON.setCF; inline;
  44849. begin
  44850. pTDefRegMap(@Self)^.&set := $00000008;
  44851. end;
  44852. procedure TOSC_OSCCON.clearCF; inline;
  44853. begin
  44854. pTDefRegMap(@Self)^.clr := $00000008;
  44855. end;
  44856. procedure TOSC_OSCCON.setCF(thebits : TBits_1); inline;
  44857. begin
  44858. if thebits = 0 then
  44859. pTDefRegMap(@Self)^.clr := $00000008
  44860. else
  44861. pTDefRegMap(@Self)^.&set := $00000008;
  44862. end;
  44863. function TOSC_OSCCON.getCF : TBits_1; inline;
  44864. begin
  44865. getCF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44866. end;
  44867. procedure TOSC_OSCCON.setSLPEN; inline;
  44868. begin
  44869. pTDefRegMap(@Self)^.&set := $00000010;
  44870. end;
  44871. procedure TOSC_OSCCON.clearSLPEN; inline;
  44872. begin
  44873. pTDefRegMap(@Self)^.clr := $00000010;
  44874. end;
  44875. procedure TOSC_OSCCON.setSLPEN(thebits : TBits_1); inline;
  44876. begin
  44877. if thebits = 0 then
  44878. pTDefRegMap(@Self)^.clr := $00000010
  44879. else
  44880. pTDefRegMap(@Self)^.&set := $00000010;
  44881. end;
  44882. function TOSC_OSCCON.getSLPEN : TBits_1; inline;
  44883. begin
  44884. getSLPEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44885. end;
  44886. procedure TOSC_OSCCON.setSLOCK; inline;
  44887. begin
  44888. pTDefRegMap(@Self)^.&set := $00000020;
  44889. end;
  44890. procedure TOSC_OSCCON.clearSLOCK; inline;
  44891. begin
  44892. pTDefRegMap(@Self)^.clr := $00000020;
  44893. end;
  44894. procedure TOSC_OSCCON.setSLOCK(thebits : TBits_1); inline;
  44895. begin
  44896. if thebits = 0 then
  44897. pTDefRegMap(@Self)^.clr := $00000020
  44898. else
  44899. pTDefRegMap(@Self)^.&set := $00000020;
  44900. end;
  44901. function TOSC_OSCCON.getSLOCK : TBits_1; inline;
  44902. begin
  44903. getSLOCK := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  44904. end;
  44905. procedure TOSC_OSCCON.setULOCK; inline;
  44906. begin
  44907. pTDefRegMap(@Self)^.&set := $00000040;
  44908. end;
  44909. procedure TOSC_OSCCON.clearULOCK; inline;
  44910. begin
  44911. pTDefRegMap(@Self)^.clr := $00000040;
  44912. end;
  44913. procedure TOSC_OSCCON.setULOCK(thebits : TBits_1); inline;
  44914. begin
  44915. if thebits = 0 then
  44916. pTDefRegMap(@Self)^.clr := $00000040
  44917. else
  44918. pTDefRegMap(@Self)^.&set := $00000040;
  44919. end;
  44920. function TOSC_OSCCON.getULOCK : TBits_1; inline;
  44921. begin
  44922. getULOCK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44923. end;
  44924. procedure TOSC_OSCCON.setCLKLOCK; inline;
  44925. begin
  44926. pTDefRegMap(@Self)^.&set := $00000080;
  44927. end;
  44928. procedure TOSC_OSCCON.clearCLKLOCK; inline;
  44929. begin
  44930. pTDefRegMap(@Self)^.clr := $00000080;
  44931. end;
  44932. procedure TOSC_OSCCON.setCLKLOCK(thebits : TBits_1); inline;
  44933. begin
  44934. if thebits = 0 then
  44935. pTDefRegMap(@Self)^.clr := $00000080
  44936. else
  44937. pTDefRegMap(@Self)^.&set := $00000080;
  44938. end;
  44939. function TOSC_OSCCON.getCLKLOCK : TBits_1; inline;
  44940. begin
  44941. getCLKLOCK := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44942. end;
  44943. procedure TOSC_OSCCON.setNOSC(thebits : TBits_3); inline;
  44944. begin
  44945. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  44946. end;
  44947. function TOSC_OSCCON.getNOSC : TBits_3; inline;
  44948. begin
  44949. getNOSC := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  44950. end;
  44951. procedure TOSC_OSCCON.setCOSC(thebits : TBits_3); inline;
  44952. begin
  44953. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF8FFF or ( thebits shl 12 );
  44954. end;
  44955. function TOSC_OSCCON.getCOSC : TBits_3; inline;
  44956. begin
  44957. getCOSC := (pTDefRegMap(@Self)^.val and $00007000) shr 12;
  44958. end;
  44959. procedure TOSC_OSCCON.setPLLMULT(thebits : TBits_3); inline;
  44960. begin
  44961. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  44962. end;
  44963. function TOSC_OSCCON.getPLLMULT : TBits_3; inline;
  44964. begin
  44965. getPLLMULT := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  44966. end;
  44967. procedure TOSC_OSCCON.setPBDIV(thebits : TBits_2); inline;
  44968. begin
  44969. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE7FFFF or ( thebits shl 19 );
  44970. end;
  44971. function TOSC_OSCCON.getPBDIV : TBits_2; inline;
  44972. begin
  44973. getPBDIV := (pTDefRegMap(@Self)^.val and $00180000) shr 19;
  44974. end;
  44975. procedure TOSC_OSCCON.setSOSCRDY; inline;
  44976. begin
  44977. pTDefRegMap(@Self)^.&set := $00400000;
  44978. end;
  44979. procedure TOSC_OSCCON.clearSOSCRDY; inline;
  44980. begin
  44981. pTDefRegMap(@Self)^.clr := $00400000;
  44982. end;
  44983. procedure TOSC_OSCCON.setSOSCRDY(thebits : TBits_1); inline;
  44984. begin
  44985. if thebits = 0 then
  44986. pTDefRegMap(@Self)^.clr := $00400000
  44987. else
  44988. pTDefRegMap(@Self)^.&set := $00400000;
  44989. end;
  44990. function TOSC_OSCCON.getSOSCRDY : TBits_1; inline;
  44991. begin
  44992. getSOSCRDY := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  44993. end;
  44994. procedure TOSC_OSCCON.setFRCDIV(thebits : TBits_3); inline;
  44995. begin
  44996. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  44997. end;
  44998. function TOSC_OSCCON.getFRCDIV : TBits_3; inline;
  44999. begin
  45000. getFRCDIV := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  45001. end;
  45002. procedure TOSC_OSCCON.setPLLODIV(thebits : TBits_3); inline;
  45003. begin
  45004. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $C7FFFFFF or ( thebits shl 27 );
  45005. end;
  45006. function TOSC_OSCCON.getPLLODIV : TBits_3; inline;
  45007. begin
  45008. getPLLODIV := (pTDefRegMap(@Self)^.val and $38000000) shr 27;
  45009. end;
  45010. procedure TOSC_OSCCON.setNOSC0; inline;
  45011. begin
  45012. pTDefRegMap(@Self)^.&set := $00000100;
  45013. end;
  45014. procedure TOSC_OSCCON.clearNOSC0; inline;
  45015. begin
  45016. pTDefRegMap(@Self)^.clr := $00000100;
  45017. end;
  45018. procedure TOSC_OSCCON.setNOSC0(thebits : TBits_1); inline;
  45019. begin
  45020. if thebits = 0 then
  45021. pTDefRegMap(@Self)^.clr := $00000100
  45022. else
  45023. pTDefRegMap(@Self)^.&set := $00000100;
  45024. end;
  45025. function TOSC_OSCCON.getNOSC0 : TBits_1; inline;
  45026. begin
  45027. getNOSC0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  45028. end;
  45029. procedure TOSC_OSCCON.setNOSC1; inline;
  45030. begin
  45031. pTDefRegMap(@Self)^.&set := $00000200;
  45032. end;
  45033. procedure TOSC_OSCCON.clearNOSC1; inline;
  45034. begin
  45035. pTDefRegMap(@Self)^.clr := $00000200;
  45036. end;
  45037. procedure TOSC_OSCCON.setNOSC1(thebits : TBits_1); inline;
  45038. begin
  45039. if thebits = 0 then
  45040. pTDefRegMap(@Self)^.clr := $00000200
  45041. else
  45042. pTDefRegMap(@Self)^.&set := $00000200;
  45043. end;
  45044. function TOSC_OSCCON.getNOSC1 : TBits_1; inline;
  45045. begin
  45046. getNOSC1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  45047. end;
  45048. procedure TOSC_OSCCON.setNOSC2; inline;
  45049. begin
  45050. pTDefRegMap(@Self)^.&set := $00000400;
  45051. end;
  45052. procedure TOSC_OSCCON.clearNOSC2; inline;
  45053. begin
  45054. pTDefRegMap(@Self)^.clr := $00000400;
  45055. end;
  45056. procedure TOSC_OSCCON.setNOSC2(thebits : TBits_1); inline;
  45057. begin
  45058. if thebits = 0 then
  45059. pTDefRegMap(@Self)^.clr := $00000400
  45060. else
  45061. pTDefRegMap(@Self)^.&set := $00000400;
  45062. end;
  45063. function TOSC_OSCCON.getNOSC2 : TBits_1; inline;
  45064. begin
  45065. getNOSC2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  45066. end;
  45067. procedure TOSC_OSCCON.setCOSC0; inline;
  45068. begin
  45069. pTDefRegMap(@Self)^.&set := $00001000;
  45070. end;
  45071. procedure TOSC_OSCCON.clearCOSC0; inline;
  45072. begin
  45073. pTDefRegMap(@Self)^.clr := $00001000;
  45074. end;
  45075. procedure TOSC_OSCCON.setCOSC0(thebits : TBits_1); inline;
  45076. begin
  45077. if thebits = 0 then
  45078. pTDefRegMap(@Self)^.clr := $00001000
  45079. else
  45080. pTDefRegMap(@Self)^.&set := $00001000;
  45081. end;
  45082. function TOSC_OSCCON.getCOSC0 : TBits_1; inline;
  45083. begin
  45084. getCOSC0 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  45085. end;
  45086. procedure TOSC_OSCCON.setCOSC1; inline;
  45087. begin
  45088. pTDefRegMap(@Self)^.&set := $00002000;
  45089. end;
  45090. procedure TOSC_OSCCON.clearCOSC1; inline;
  45091. begin
  45092. pTDefRegMap(@Self)^.clr := $00002000;
  45093. end;
  45094. procedure TOSC_OSCCON.setCOSC1(thebits : TBits_1); inline;
  45095. begin
  45096. if thebits = 0 then
  45097. pTDefRegMap(@Self)^.clr := $00002000
  45098. else
  45099. pTDefRegMap(@Self)^.&set := $00002000;
  45100. end;
  45101. function TOSC_OSCCON.getCOSC1 : TBits_1; inline;
  45102. begin
  45103. getCOSC1 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45104. end;
  45105. procedure TOSC_OSCCON.setCOSC2; inline;
  45106. begin
  45107. pTDefRegMap(@Self)^.&set := $00004000;
  45108. end;
  45109. procedure TOSC_OSCCON.clearCOSC2; inline;
  45110. begin
  45111. pTDefRegMap(@Self)^.clr := $00004000;
  45112. end;
  45113. procedure TOSC_OSCCON.setCOSC2(thebits : TBits_1); inline;
  45114. begin
  45115. if thebits = 0 then
  45116. pTDefRegMap(@Self)^.clr := $00004000
  45117. else
  45118. pTDefRegMap(@Self)^.&set := $00004000;
  45119. end;
  45120. function TOSC_OSCCON.getCOSC2 : TBits_1; inline;
  45121. begin
  45122. getCOSC2 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  45123. end;
  45124. procedure TOSC_OSCCON.setPLLMULT0; inline;
  45125. begin
  45126. pTDefRegMap(@Self)^.&set := $00010000;
  45127. end;
  45128. procedure TOSC_OSCCON.clearPLLMULT0; inline;
  45129. begin
  45130. pTDefRegMap(@Self)^.clr := $00010000;
  45131. end;
  45132. procedure TOSC_OSCCON.setPLLMULT0(thebits : TBits_1); inline;
  45133. begin
  45134. if thebits = 0 then
  45135. pTDefRegMap(@Self)^.clr := $00010000
  45136. else
  45137. pTDefRegMap(@Self)^.&set := $00010000;
  45138. end;
  45139. function TOSC_OSCCON.getPLLMULT0 : TBits_1; inline;
  45140. begin
  45141. getPLLMULT0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  45142. end;
  45143. procedure TOSC_OSCCON.setPLLMULT1; inline;
  45144. begin
  45145. pTDefRegMap(@Self)^.&set := $00020000;
  45146. end;
  45147. procedure TOSC_OSCCON.clearPLLMULT1; inline;
  45148. begin
  45149. pTDefRegMap(@Self)^.clr := $00020000;
  45150. end;
  45151. procedure TOSC_OSCCON.setPLLMULT1(thebits : TBits_1); inline;
  45152. begin
  45153. if thebits = 0 then
  45154. pTDefRegMap(@Self)^.clr := $00020000
  45155. else
  45156. pTDefRegMap(@Self)^.&set := $00020000;
  45157. end;
  45158. function TOSC_OSCCON.getPLLMULT1 : TBits_1; inline;
  45159. begin
  45160. getPLLMULT1 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  45161. end;
  45162. procedure TOSC_OSCCON.setPLLMULT2; inline;
  45163. begin
  45164. pTDefRegMap(@Self)^.&set := $00040000;
  45165. end;
  45166. procedure TOSC_OSCCON.clearPLLMULT2; inline;
  45167. begin
  45168. pTDefRegMap(@Self)^.clr := $00040000;
  45169. end;
  45170. procedure TOSC_OSCCON.setPLLMULT2(thebits : TBits_1); inline;
  45171. begin
  45172. if thebits = 0 then
  45173. pTDefRegMap(@Self)^.clr := $00040000
  45174. else
  45175. pTDefRegMap(@Self)^.&set := $00040000;
  45176. end;
  45177. function TOSC_OSCCON.getPLLMULT2 : TBits_1; inline;
  45178. begin
  45179. getPLLMULT2 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  45180. end;
  45181. procedure TOSC_OSCCON.setPBDIV0; inline;
  45182. begin
  45183. pTDefRegMap(@Self)^.&set := $00080000;
  45184. end;
  45185. procedure TOSC_OSCCON.clearPBDIV0; inline;
  45186. begin
  45187. pTDefRegMap(@Self)^.clr := $00080000;
  45188. end;
  45189. procedure TOSC_OSCCON.setPBDIV0(thebits : TBits_1); inline;
  45190. begin
  45191. if thebits = 0 then
  45192. pTDefRegMap(@Self)^.clr := $00080000
  45193. else
  45194. pTDefRegMap(@Self)^.&set := $00080000;
  45195. end;
  45196. function TOSC_OSCCON.getPBDIV0 : TBits_1; inline;
  45197. begin
  45198. getPBDIV0 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  45199. end;
  45200. procedure TOSC_OSCCON.setPBDIV1; inline;
  45201. begin
  45202. pTDefRegMap(@Self)^.&set := $00100000;
  45203. end;
  45204. procedure TOSC_OSCCON.clearPBDIV1; inline;
  45205. begin
  45206. pTDefRegMap(@Self)^.clr := $00100000;
  45207. end;
  45208. procedure TOSC_OSCCON.setPBDIV1(thebits : TBits_1); inline;
  45209. begin
  45210. if thebits = 0 then
  45211. pTDefRegMap(@Self)^.clr := $00100000
  45212. else
  45213. pTDefRegMap(@Self)^.&set := $00100000;
  45214. end;
  45215. function TOSC_OSCCON.getPBDIV1 : TBits_1; inline;
  45216. begin
  45217. getPBDIV1 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  45218. end;
  45219. procedure TOSC_OSCCON.setFRCDIV0; inline;
  45220. begin
  45221. pTDefRegMap(@Self)^.&set := $01000000;
  45222. end;
  45223. procedure TOSC_OSCCON.clearFRCDIV0; inline;
  45224. begin
  45225. pTDefRegMap(@Self)^.clr := $01000000;
  45226. end;
  45227. procedure TOSC_OSCCON.setFRCDIV0(thebits : TBits_1); inline;
  45228. begin
  45229. if thebits = 0 then
  45230. pTDefRegMap(@Self)^.clr := $01000000
  45231. else
  45232. pTDefRegMap(@Self)^.&set := $01000000;
  45233. end;
  45234. function TOSC_OSCCON.getFRCDIV0 : TBits_1; inline;
  45235. begin
  45236. getFRCDIV0 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  45237. end;
  45238. procedure TOSC_OSCCON.setFRCDIV1; inline;
  45239. begin
  45240. pTDefRegMap(@Self)^.&set := $02000000;
  45241. end;
  45242. procedure TOSC_OSCCON.clearFRCDIV1; inline;
  45243. begin
  45244. pTDefRegMap(@Self)^.clr := $02000000;
  45245. end;
  45246. procedure TOSC_OSCCON.setFRCDIV1(thebits : TBits_1); inline;
  45247. begin
  45248. if thebits = 0 then
  45249. pTDefRegMap(@Self)^.clr := $02000000
  45250. else
  45251. pTDefRegMap(@Self)^.&set := $02000000;
  45252. end;
  45253. function TOSC_OSCCON.getFRCDIV1 : TBits_1; inline;
  45254. begin
  45255. getFRCDIV1 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  45256. end;
  45257. procedure TOSC_OSCCON.setFRCDIV2; inline;
  45258. begin
  45259. pTDefRegMap(@Self)^.&set := $04000000;
  45260. end;
  45261. procedure TOSC_OSCCON.clearFRCDIV2; inline;
  45262. begin
  45263. pTDefRegMap(@Self)^.clr := $04000000;
  45264. end;
  45265. procedure TOSC_OSCCON.setFRCDIV2(thebits : TBits_1); inline;
  45266. begin
  45267. if thebits = 0 then
  45268. pTDefRegMap(@Self)^.clr := $04000000
  45269. else
  45270. pTDefRegMap(@Self)^.&set := $04000000;
  45271. end;
  45272. function TOSC_OSCCON.getFRCDIV2 : TBits_1; inline;
  45273. begin
  45274. getFRCDIV2 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  45275. end;
  45276. procedure TOSC_OSCCON.setPLLODIV0; inline;
  45277. begin
  45278. pTDefRegMap(@Self)^.&set := $08000000;
  45279. end;
  45280. procedure TOSC_OSCCON.clearPLLODIV0; inline;
  45281. begin
  45282. pTDefRegMap(@Self)^.clr := $08000000;
  45283. end;
  45284. procedure TOSC_OSCCON.setPLLODIV0(thebits : TBits_1); inline;
  45285. begin
  45286. if thebits = 0 then
  45287. pTDefRegMap(@Self)^.clr := $08000000
  45288. else
  45289. pTDefRegMap(@Self)^.&set := $08000000;
  45290. end;
  45291. function TOSC_OSCCON.getPLLODIV0 : TBits_1; inline;
  45292. begin
  45293. getPLLODIV0 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  45294. end;
  45295. procedure TOSC_OSCCON.setPLLODIV1; inline;
  45296. begin
  45297. pTDefRegMap(@Self)^.&set := $10000000;
  45298. end;
  45299. procedure TOSC_OSCCON.clearPLLODIV1; inline;
  45300. begin
  45301. pTDefRegMap(@Self)^.clr := $10000000;
  45302. end;
  45303. procedure TOSC_OSCCON.setPLLODIV1(thebits : TBits_1); inline;
  45304. begin
  45305. if thebits = 0 then
  45306. pTDefRegMap(@Self)^.clr := $10000000
  45307. else
  45308. pTDefRegMap(@Self)^.&set := $10000000;
  45309. end;
  45310. function TOSC_OSCCON.getPLLODIV1 : TBits_1; inline;
  45311. begin
  45312. getPLLODIV1 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  45313. end;
  45314. procedure TOSC_OSCCON.setPLLODIV2; inline;
  45315. begin
  45316. pTDefRegMap(@Self)^.&set := $20000000;
  45317. end;
  45318. procedure TOSC_OSCCON.clearPLLODIV2; inline;
  45319. begin
  45320. pTDefRegMap(@Self)^.clr := $20000000;
  45321. end;
  45322. procedure TOSC_OSCCON.setPLLODIV2(thebits : TBits_1); inline;
  45323. begin
  45324. if thebits = 0 then
  45325. pTDefRegMap(@Self)^.clr := $20000000
  45326. else
  45327. pTDefRegMap(@Self)^.&set := $20000000;
  45328. end;
  45329. function TOSC_OSCCON.getPLLODIV2 : TBits_1; inline;
  45330. begin
  45331. getPLLODIV2 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  45332. end;
  45333. procedure TOSC_OSCCON.setw(thebits : TBits_32); inline;
  45334. begin
  45335. pTDefRegMap(@Self)^.val := thebits;
  45336. end;
  45337. function TOSC_OSCCON.getw : TBits_32; inline;
  45338. begin
  45339. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45340. end;
  45341. procedure TOSC_OSCTUN.setTUN(thebits : TBits_6); inline;
  45342. begin
  45343. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
  45344. end;
  45345. function TOSC_OSCTUN.getTUN : TBits_6; inline;
  45346. begin
  45347. getTUN := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
  45348. end;
  45349. procedure TOSC_OSCTUN.setTUN0; inline;
  45350. begin
  45351. pTDefRegMap(@Self)^.&set := $00000001;
  45352. end;
  45353. procedure TOSC_OSCTUN.clearTUN0; inline;
  45354. begin
  45355. pTDefRegMap(@Self)^.clr := $00000001;
  45356. end;
  45357. procedure TOSC_OSCTUN.setTUN0(thebits : TBits_1); inline;
  45358. begin
  45359. if thebits = 0 then
  45360. pTDefRegMap(@Self)^.clr := $00000001
  45361. else
  45362. pTDefRegMap(@Self)^.&set := $00000001;
  45363. end;
  45364. function TOSC_OSCTUN.getTUN0 : TBits_1; inline;
  45365. begin
  45366. getTUN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45367. end;
  45368. procedure TOSC_OSCTUN.setTUN1; inline;
  45369. begin
  45370. pTDefRegMap(@Self)^.&set := $00000002;
  45371. end;
  45372. procedure TOSC_OSCTUN.clearTUN1; inline;
  45373. begin
  45374. pTDefRegMap(@Self)^.clr := $00000002;
  45375. end;
  45376. procedure TOSC_OSCTUN.setTUN1(thebits : TBits_1); inline;
  45377. begin
  45378. if thebits = 0 then
  45379. pTDefRegMap(@Self)^.clr := $00000002
  45380. else
  45381. pTDefRegMap(@Self)^.&set := $00000002;
  45382. end;
  45383. function TOSC_OSCTUN.getTUN1 : TBits_1; inline;
  45384. begin
  45385. getTUN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45386. end;
  45387. procedure TOSC_OSCTUN.setTUN2; inline;
  45388. begin
  45389. pTDefRegMap(@Self)^.&set := $00000004;
  45390. end;
  45391. procedure TOSC_OSCTUN.clearTUN2; inline;
  45392. begin
  45393. pTDefRegMap(@Self)^.clr := $00000004;
  45394. end;
  45395. procedure TOSC_OSCTUN.setTUN2(thebits : TBits_1); inline;
  45396. begin
  45397. if thebits = 0 then
  45398. pTDefRegMap(@Self)^.clr := $00000004
  45399. else
  45400. pTDefRegMap(@Self)^.&set := $00000004;
  45401. end;
  45402. function TOSC_OSCTUN.getTUN2 : TBits_1; inline;
  45403. begin
  45404. getTUN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45405. end;
  45406. procedure TOSC_OSCTUN.setTUN3; inline;
  45407. begin
  45408. pTDefRegMap(@Self)^.&set := $00000008;
  45409. end;
  45410. procedure TOSC_OSCTUN.clearTUN3; inline;
  45411. begin
  45412. pTDefRegMap(@Self)^.clr := $00000008;
  45413. end;
  45414. procedure TOSC_OSCTUN.setTUN3(thebits : TBits_1); inline;
  45415. begin
  45416. if thebits = 0 then
  45417. pTDefRegMap(@Self)^.clr := $00000008
  45418. else
  45419. pTDefRegMap(@Self)^.&set := $00000008;
  45420. end;
  45421. function TOSC_OSCTUN.getTUN3 : TBits_1; inline;
  45422. begin
  45423. getTUN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45424. end;
  45425. procedure TOSC_OSCTUN.setTUN4; inline;
  45426. begin
  45427. pTDefRegMap(@Self)^.&set := $00000010;
  45428. end;
  45429. procedure TOSC_OSCTUN.clearTUN4; inline;
  45430. begin
  45431. pTDefRegMap(@Self)^.clr := $00000010;
  45432. end;
  45433. procedure TOSC_OSCTUN.setTUN4(thebits : TBits_1); inline;
  45434. begin
  45435. if thebits = 0 then
  45436. pTDefRegMap(@Self)^.clr := $00000010
  45437. else
  45438. pTDefRegMap(@Self)^.&set := $00000010;
  45439. end;
  45440. function TOSC_OSCTUN.getTUN4 : TBits_1; inline;
  45441. begin
  45442. getTUN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  45443. end;
  45444. procedure TOSC_OSCTUN.setTUN5; inline;
  45445. begin
  45446. pTDefRegMap(@Self)^.&set := $00000020;
  45447. end;
  45448. procedure TOSC_OSCTUN.clearTUN5; inline;
  45449. begin
  45450. pTDefRegMap(@Self)^.clr := $00000020;
  45451. end;
  45452. procedure TOSC_OSCTUN.setTUN5(thebits : TBits_1); inline;
  45453. begin
  45454. if thebits = 0 then
  45455. pTDefRegMap(@Self)^.clr := $00000020
  45456. else
  45457. pTDefRegMap(@Self)^.&set := $00000020;
  45458. end;
  45459. function TOSC_OSCTUN.getTUN5 : TBits_1; inline;
  45460. begin
  45461. getTUN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  45462. end;
  45463. procedure TOSC_OSCTUN.setw(thebits : TBits_32); inline;
  45464. begin
  45465. pTDefRegMap(@Self)^.val := thebits;
  45466. end;
  45467. function TOSC_OSCTUN.getw : TBits_32; inline;
  45468. begin
  45469. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45470. end;
  45471. procedure TNVM_NVMCON.setNVMOP(thebits : TBits_4); inline;
  45472. begin
  45473. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  45474. end;
  45475. function TNVM_NVMCON.getNVMOP : TBits_4; inline;
  45476. begin
  45477. getNVMOP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  45478. end;
  45479. procedure TNVM_NVMCON.setLVDSTAT; inline;
  45480. begin
  45481. pTDefRegMap(@Self)^.&set := $00000800;
  45482. end;
  45483. procedure TNVM_NVMCON.clearLVDSTAT; inline;
  45484. begin
  45485. pTDefRegMap(@Self)^.clr := $00000800;
  45486. end;
  45487. procedure TNVM_NVMCON.setLVDSTAT(thebits : TBits_1); inline;
  45488. begin
  45489. if thebits = 0 then
  45490. pTDefRegMap(@Self)^.clr := $00000800
  45491. else
  45492. pTDefRegMap(@Self)^.&set := $00000800;
  45493. end;
  45494. function TNVM_NVMCON.getLVDSTAT : TBits_1; inline;
  45495. begin
  45496. getLVDSTAT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  45497. end;
  45498. procedure TNVM_NVMCON.setLVDERR; inline;
  45499. begin
  45500. pTDefRegMap(@Self)^.&set := $00001000;
  45501. end;
  45502. procedure TNVM_NVMCON.clearLVDERR; inline;
  45503. begin
  45504. pTDefRegMap(@Self)^.clr := $00001000;
  45505. end;
  45506. procedure TNVM_NVMCON.setLVDERR(thebits : TBits_1); inline;
  45507. begin
  45508. if thebits = 0 then
  45509. pTDefRegMap(@Self)^.clr := $00001000
  45510. else
  45511. pTDefRegMap(@Self)^.&set := $00001000;
  45512. end;
  45513. function TNVM_NVMCON.getLVDERR : TBits_1; inline;
  45514. begin
  45515. getLVDERR := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  45516. end;
  45517. procedure TNVM_NVMCON.setWRERR; inline;
  45518. begin
  45519. pTDefRegMap(@Self)^.&set := $00002000;
  45520. end;
  45521. procedure TNVM_NVMCON.clearWRERR; inline;
  45522. begin
  45523. pTDefRegMap(@Self)^.clr := $00002000;
  45524. end;
  45525. procedure TNVM_NVMCON.setWRERR(thebits : TBits_1); inline;
  45526. begin
  45527. if thebits = 0 then
  45528. pTDefRegMap(@Self)^.clr := $00002000
  45529. else
  45530. pTDefRegMap(@Self)^.&set := $00002000;
  45531. end;
  45532. function TNVM_NVMCON.getWRERR : TBits_1; inline;
  45533. begin
  45534. getWRERR := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45535. end;
  45536. procedure TNVM_NVMCON.setWREN; inline;
  45537. begin
  45538. pTDefRegMap(@Self)^.&set := $00004000;
  45539. end;
  45540. procedure TNVM_NVMCON.clearWREN; inline;
  45541. begin
  45542. pTDefRegMap(@Self)^.clr := $00004000;
  45543. end;
  45544. procedure TNVM_NVMCON.setWREN(thebits : TBits_1); inline;
  45545. begin
  45546. if thebits = 0 then
  45547. pTDefRegMap(@Self)^.clr := $00004000
  45548. else
  45549. pTDefRegMap(@Self)^.&set := $00004000;
  45550. end;
  45551. function TNVM_NVMCON.getWREN : TBits_1; inline;
  45552. begin
  45553. getWREN := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  45554. end;
  45555. procedure TNVM_NVMCON.setWR; inline;
  45556. begin
  45557. pTDefRegMap(@Self)^.&set := $00008000;
  45558. end;
  45559. procedure TNVM_NVMCON.clearWR; inline;
  45560. begin
  45561. pTDefRegMap(@Self)^.clr := $00008000;
  45562. end;
  45563. procedure TNVM_NVMCON.setWR(thebits : TBits_1); inline;
  45564. begin
  45565. if thebits = 0 then
  45566. pTDefRegMap(@Self)^.clr := $00008000
  45567. else
  45568. pTDefRegMap(@Self)^.&set := $00008000;
  45569. end;
  45570. function TNVM_NVMCON.getWR : TBits_1; inline;
  45571. begin
  45572. getWR := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  45573. end;
  45574. procedure TNVM_NVMCON.setNVMOP0; inline;
  45575. begin
  45576. pTDefRegMap(@Self)^.&set := $00000001;
  45577. end;
  45578. procedure TNVM_NVMCON.clearNVMOP0; inline;
  45579. begin
  45580. pTDefRegMap(@Self)^.clr := $00000001;
  45581. end;
  45582. procedure TNVM_NVMCON.setNVMOP0(thebits : TBits_1); inline;
  45583. begin
  45584. if thebits = 0 then
  45585. pTDefRegMap(@Self)^.clr := $00000001
  45586. else
  45587. pTDefRegMap(@Self)^.&set := $00000001;
  45588. end;
  45589. function TNVM_NVMCON.getNVMOP0 : TBits_1; inline;
  45590. begin
  45591. getNVMOP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45592. end;
  45593. procedure TNVM_NVMCON.setNVMOP1; inline;
  45594. begin
  45595. pTDefRegMap(@Self)^.&set := $00000002;
  45596. end;
  45597. procedure TNVM_NVMCON.clearNVMOP1; inline;
  45598. begin
  45599. pTDefRegMap(@Self)^.clr := $00000002;
  45600. end;
  45601. procedure TNVM_NVMCON.setNVMOP1(thebits : TBits_1); inline;
  45602. begin
  45603. if thebits = 0 then
  45604. pTDefRegMap(@Self)^.clr := $00000002
  45605. else
  45606. pTDefRegMap(@Self)^.&set := $00000002;
  45607. end;
  45608. function TNVM_NVMCON.getNVMOP1 : TBits_1; inline;
  45609. begin
  45610. getNVMOP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45611. end;
  45612. procedure TNVM_NVMCON.setNVMOP2; inline;
  45613. begin
  45614. pTDefRegMap(@Self)^.&set := $00000004;
  45615. end;
  45616. procedure TNVM_NVMCON.clearNVMOP2; inline;
  45617. begin
  45618. pTDefRegMap(@Self)^.clr := $00000004;
  45619. end;
  45620. procedure TNVM_NVMCON.setNVMOP2(thebits : TBits_1); inline;
  45621. begin
  45622. if thebits = 0 then
  45623. pTDefRegMap(@Self)^.clr := $00000004
  45624. else
  45625. pTDefRegMap(@Self)^.&set := $00000004;
  45626. end;
  45627. function TNVM_NVMCON.getNVMOP2 : TBits_1; inline;
  45628. begin
  45629. getNVMOP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45630. end;
  45631. procedure TNVM_NVMCON.setNVMOP3; inline;
  45632. begin
  45633. pTDefRegMap(@Self)^.&set := $00000008;
  45634. end;
  45635. procedure TNVM_NVMCON.clearNVMOP3; inline;
  45636. begin
  45637. pTDefRegMap(@Self)^.clr := $00000008;
  45638. end;
  45639. procedure TNVM_NVMCON.setNVMOP3(thebits : TBits_1); inline;
  45640. begin
  45641. if thebits = 0 then
  45642. pTDefRegMap(@Self)^.clr := $00000008
  45643. else
  45644. pTDefRegMap(@Self)^.&set := $00000008;
  45645. end;
  45646. function TNVM_NVMCON.getNVMOP3 : TBits_1; inline;
  45647. begin
  45648. getNVMOP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45649. end;
  45650. procedure TNVM_NVMCON.setPROGOP(thebits : TBits_4); inline;
  45651. begin
  45652. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  45653. end;
  45654. function TNVM_NVMCON.getPROGOP : TBits_4; inline;
  45655. begin
  45656. getPROGOP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  45657. end;
  45658. procedure TNVM_NVMCON.setPROGOP0; inline;
  45659. begin
  45660. pTDefRegMap(@Self)^.&set := $00000001;
  45661. end;
  45662. procedure TNVM_NVMCON.clearPROGOP0; inline;
  45663. begin
  45664. pTDefRegMap(@Self)^.clr := $00000001;
  45665. end;
  45666. procedure TNVM_NVMCON.setPROGOP0(thebits : TBits_1); inline;
  45667. begin
  45668. if thebits = 0 then
  45669. pTDefRegMap(@Self)^.clr := $00000001
  45670. else
  45671. pTDefRegMap(@Self)^.&set := $00000001;
  45672. end;
  45673. function TNVM_NVMCON.getPROGOP0 : TBits_1; inline;
  45674. begin
  45675. getPROGOP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45676. end;
  45677. procedure TNVM_NVMCON.setPROGOP1; inline;
  45678. begin
  45679. pTDefRegMap(@Self)^.&set := $00000002;
  45680. end;
  45681. procedure TNVM_NVMCON.clearPROGOP1; inline;
  45682. begin
  45683. pTDefRegMap(@Self)^.clr := $00000002;
  45684. end;
  45685. procedure TNVM_NVMCON.setPROGOP1(thebits : TBits_1); inline;
  45686. begin
  45687. if thebits = 0 then
  45688. pTDefRegMap(@Self)^.clr := $00000002
  45689. else
  45690. pTDefRegMap(@Self)^.&set := $00000002;
  45691. end;
  45692. function TNVM_NVMCON.getPROGOP1 : TBits_1; inline;
  45693. begin
  45694. getPROGOP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45695. end;
  45696. procedure TNVM_NVMCON.setPROGOP2; inline;
  45697. begin
  45698. pTDefRegMap(@Self)^.&set := $00000004;
  45699. end;
  45700. procedure TNVM_NVMCON.clearPROGOP2; inline;
  45701. begin
  45702. pTDefRegMap(@Self)^.clr := $00000004;
  45703. end;
  45704. procedure TNVM_NVMCON.setPROGOP2(thebits : TBits_1); inline;
  45705. begin
  45706. if thebits = 0 then
  45707. pTDefRegMap(@Self)^.clr := $00000004
  45708. else
  45709. pTDefRegMap(@Self)^.&set := $00000004;
  45710. end;
  45711. function TNVM_NVMCON.getPROGOP2 : TBits_1; inline;
  45712. begin
  45713. getPROGOP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45714. end;
  45715. procedure TNVM_NVMCON.setPROGOP3; inline;
  45716. begin
  45717. pTDefRegMap(@Self)^.&set := $00000008;
  45718. end;
  45719. procedure TNVM_NVMCON.clearPROGOP3; inline;
  45720. begin
  45721. pTDefRegMap(@Self)^.clr := $00000008;
  45722. end;
  45723. procedure TNVM_NVMCON.setPROGOP3(thebits : TBits_1); inline;
  45724. begin
  45725. if thebits = 0 then
  45726. pTDefRegMap(@Self)^.clr := $00000008
  45727. else
  45728. pTDefRegMap(@Self)^.&set := $00000008;
  45729. end;
  45730. function TNVM_NVMCON.getPROGOP3 : TBits_1; inline;
  45731. begin
  45732. getPROGOP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45733. end;
  45734. procedure TNVM_NVMCON.setw(thebits : TBits_32); inline;
  45735. begin
  45736. pTDefRegMap(@Self)^.val := thebits;
  45737. end;
  45738. function TNVM_NVMCON.getw : TBits_32; inline;
  45739. begin
  45740. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45741. end;
  45742. procedure TRCON_RCON.setPOR; inline;
  45743. begin
  45744. pTDefRegMap(@Self)^.&set := $00000001;
  45745. end;
  45746. procedure TRCON_RCON.clearPOR; inline;
  45747. begin
  45748. pTDefRegMap(@Self)^.clr := $00000001;
  45749. end;
  45750. procedure TRCON_RCON.setPOR(thebits : TBits_1); inline;
  45751. begin
  45752. if thebits = 0 then
  45753. pTDefRegMap(@Self)^.clr := $00000001
  45754. else
  45755. pTDefRegMap(@Self)^.&set := $00000001;
  45756. end;
  45757. function TRCON_RCON.getPOR : TBits_1; inline;
  45758. begin
  45759. getPOR := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45760. end;
  45761. procedure TRCON_RCON.setBOR; inline;
  45762. begin
  45763. pTDefRegMap(@Self)^.&set := $00000002;
  45764. end;
  45765. procedure TRCON_RCON.clearBOR; inline;
  45766. begin
  45767. pTDefRegMap(@Self)^.clr := $00000002;
  45768. end;
  45769. procedure TRCON_RCON.setBOR(thebits : TBits_1); inline;
  45770. begin
  45771. if thebits = 0 then
  45772. pTDefRegMap(@Self)^.clr := $00000002
  45773. else
  45774. pTDefRegMap(@Self)^.&set := $00000002;
  45775. end;
  45776. function TRCON_RCON.getBOR : TBits_1; inline;
  45777. begin
  45778. getBOR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45779. end;
  45780. procedure TRCON_RCON.setIDLE; inline;
  45781. begin
  45782. pTDefRegMap(@Self)^.&set := $00000004;
  45783. end;
  45784. procedure TRCON_RCON.clearIDLE; inline;
  45785. begin
  45786. pTDefRegMap(@Self)^.clr := $00000004;
  45787. end;
  45788. procedure TRCON_RCON.setIDLE(thebits : TBits_1); inline;
  45789. begin
  45790. if thebits = 0 then
  45791. pTDefRegMap(@Self)^.clr := $00000004
  45792. else
  45793. pTDefRegMap(@Self)^.&set := $00000004;
  45794. end;
  45795. function TRCON_RCON.getIDLE : TBits_1; inline;
  45796. begin
  45797. getIDLE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45798. end;
  45799. procedure TRCON_RCON.setSLEEP; inline;
  45800. begin
  45801. pTDefRegMap(@Self)^.&set := $00000008;
  45802. end;
  45803. procedure TRCON_RCON.clearSLEEP; inline;
  45804. begin
  45805. pTDefRegMap(@Self)^.clr := $00000008;
  45806. end;
  45807. procedure TRCON_RCON.setSLEEP(thebits : TBits_1); inline;
  45808. begin
  45809. if thebits = 0 then
  45810. pTDefRegMap(@Self)^.clr := $00000008
  45811. else
  45812. pTDefRegMap(@Self)^.&set := $00000008;
  45813. end;
  45814. function TRCON_RCON.getSLEEP : TBits_1; inline;
  45815. begin
  45816. getSLEEP := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45817. end;
  45818. procedure TRCON_RCON.setWDTO; inline;
  45819. begin
  45820. pTDefRegMap(@Self)^.&set := $00000010;
  45821. end;
  45822. procedure TRCON_RCON.clearWDTO; inline;
  45823. begin
  45824. pTDefRegMap(@Self)^.clr := $00000010;
  45825. end;
  45826. procedure TRCON_RCON.setWDTO(thebits : TBits_1); inline;
  45827. begin
  45828. if thebits = 0 then
  45829. pTDefRegMap(@Self)^.clr := $00000010
  45830. else
  45831. pTDefRegMap(@Self)^.&set := $00000010;
  45832. end;
  45833. function TRCON_RCON.getWDTO : TBits_1; inline;
  45834. begin
  45835. getWDTO := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  45836. end;
  45837. procedure TRCON_RCON.setSWR; inline;
  45838. begin
  45839. pTDefRegMap(@Self)^.&set := $00000040;
  45840. end;
  45841. procedure TRCON_RCON.clearSWR; inline;
  45842. begin
  45843. pTDefRegMap(@Self)^.clr := $00000040;
  45844. end;
  45845. procedure TRCON_RCON.setSWR(thebits : TBits_1); inline;
  45846. begin
  45847. if thebits = 0 then
  45848. pTDefRegMap(@Self)^.clr := $00000040
  45849. else
  45850. pTDefRegMap(@Self)^.&set := $00000040;
  45851. end;
  45852. function TRCON_RCON.getSWR : TBits_1; inline;
  45853. begin
  45854. getSWR := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  45855. end;
  45856. procedure TRCON_RCON.setEXTR; inline;
  45857. begin
  45858. pTDefRegMap(@Self)^.&set := $00000080;
  45859. end;
  45860. procedure TRCON_RCON.clearEXTR; inline;
  45861. begin
  45862. pTDefRegMap(@Self)^.clr := $00000080;
  45863. end;
  45864. procedure TRCON_RCON.setEXTR(thebits : TBits_1); inline;
  45865. begin
  45866. if thebits = 0 then
  45867. pTDefRegMap(@Self)^.clr := $00000080
  45868. else
  45869. pTDefRegMap(@Self)^.&set := $00000080;
  45870. end;
  45871. function TRCON_RCON.getEXTR : TBits_1; inline;
  45872. begin
  45873. getEXTR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  45874. end;
  45875. procedure TRCON_RCON.setVREGS; inline;
  45876. begin
  45877. pTDefRegMap(@Self)^.&set := $00000100;
  45878. end;
  45879. procedure TRCON_RCON.clearVREGS; inline;
  45880. begin
  45881. pTDefRegMap(@Self)^.clr := $00000100;
  45882. end;
  45883. procedure TRCON_RCON.setVREGS(thebits : TBits_1); inline;
  45884. begin
  45885. if thebits = 0 then
  45886. pTDefRegMap(@Self)^.clr := $00000100
  45887. else
  45888. pTDefRegMap(@Self)^.&set := $00000100;
  45889. end;
  45890. function TRCON_RCON.getVREGS : TBits_1; inline;
  45891. begin
  45892. getVREGS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  45893. end;
  45894. procedure TRCON_RCON.setCMR; inline;
  45895. begin
  45896. pTDefRegMap(@Self)^.&set := $00000200;
  45897. end;
  45898. procedure TRCON_RCON.clearCMR; inline;
  45899. begin
  45900. pTDefRegMap(@Self)^.clr := $00000200;
  45901. end;
  45902. procedure TRCON_RCON.setCMR(thebits : TBits_1); inline;
  45903. begin
  45904. if thebits = 0 then
  45905. pTDefRegMap(@Self)^.clr := $00000200
  45906. else
  45907. pTDefRegMap(@Self)^.&set := $00000200;
  45908. end;
  45909. function TRCON_RCON.getCMR : TBits_1; inline;
  45910. begin
  45911. getCMR := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  45912. end;
  45913. procedure TRCON_RCON.setw(thebits : TBits_32); inline;
  45914. begin
  45915. pTDefRegMap(@Self)^.val := thebits;
  45916. end;
  45917. function TRCON_RCON.getw : TBits_32; inline;
  45918. begin
  45919. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45920. end;
  45921. procedure TRCON_RSWRST.setSWRST; inline;
  45922. begin
  45923. pTDefRegMap(@Self)^.&set := $00000001;
  45924. end;
  45925. procedure TRCON_RSWRST.clearSWRST; inline;
  45926. begin
  45927. pTDefRegMap(@Self)^.clr := $00000001;
  45928. end;
  45929. procedure TRCON_RSWRST.setSWRST(thebits : TBits_1); inline;
  45930. begin
  45931. if thebits = 0 then
  45932. pTDefRegMap(@Self)^.clr := $00000001
  45933. else
  45934. pTDefRegMap(@Self)^.&set := $00000001;
  45935. end;
  45936. function TRCON_RSWRST.getSWRST : TBits_1; inline;
  45937. begin
  45938. getSWRST := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45939. end;
  45940. procedure TRCON_RSWRST.setw(thebits : TBits_32); inline;
  45941. begin
  45942. pTDefRegMap(@Self)^.val := thebits;
  45943. end;
  45944. function TRCON_RSWRST.getw : TBits_32; inline;
  45945. begin
  45946. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45947. end;
  45948. procedure TINT_INTCON.setINT0EP; inline;
  45949. begin
  45950. pTDefRegMap(@Self)^.&set := $00000001;
  45951. end;
  45952. procedure TINT_INTCON.clearINT0EP; inline;
  45953. begin
  45954. pTDefRegMap(@Self)^.clr := $00000001;
  45955. end;
  45956. procedure TINT_INTCON.setINT0EP(thebits : TBits_1); inline;
  45957. begin
  45958. if thebits = 0 then
  45959. pTDefRegMap(@Self)^.clr := $00000001
  45960. else
  45961. pTDefRegMap(@Self)^.&set := $00000001;
  45962. end;
  45963. function TINT_INTCON.getINT0EP : TBits_1; inline;
  45964. begin
  45965. getINT0EP := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45966. end;
  45967. procedure TINT_INTCON.setINT1EP; inline;
  45968. begin
  45969. pTDefRegMap(@Self)^.&set := $00000002;
  45970. end;
  45971. procedure TINT_INTCON.clearINT1EP; inline;
  45972. begin
  45973. pTDefRegMap(@Self)^.clr := $00000002;
  45974. end;
  45975. procedure TINT_INTCON.setINT1EP(thebits : TBits_1); inline;
  45976. begin
  45977. if thebits = 0 then
  45978. pTDefRegMap(@Self)^.clr := $00000002
  45979. else
  45980. pTDefRegMap(@Self)^.&set := $00000002;
  45981. end;
  45982. function TINT_INTCON.getINT1EP : TBits_1; inline;
  45983. begin
  45984. getINT1EP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45985. end;
  45986. procedure TINT_INTCON.setINT2EP; inline;
  45987. begin
  45988. pTDefRegMap(@Self)^.&set := $00000004;
  45989. end;
  45990. procedure TINT_INTCON.clearINT2EP; inline;
  45991. begin
  45992. pTDefRegMap(@Self)^.clr := $00000004;
  45993. end;
  45994. procedure TINT_INTCON.setINT2EP(thebits : TBits_1); inline;
  45995. begin
  45996. if thebits = 0 then
  45997. pTDefRegMap(@Self)^.clr := $00000004
  45998. else
  45999. pTDefRegMap(@Self)^.&set := $00000004;
  46000. end;
  46001. function TINT_INTCON.getINT2EP : TBits_1; inline;
  46002. begin
  46003. getINT2EP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46004. end;
  46005. procedure TINT_INTCON.setINT3EP; inline;
  46006. begin
  46007. pTDefRegMap(@Self)^.&set := $00000008;
  46008. end;
  46009. procedure TINT_INTCON.clearINT3EP; inline;
  46010. begin
  46011. pTDefRegMap(@Self)^.clr := $00000008;
  46012. end;
  46013. procedure TINT_INTCON.setINT3EP(thebits : TBits_1); inline;
  46014. begin
  46015. if thebits = 0 then
  46016. pTDefRegMap(@Self)^.clr := $00000008
  46017. else
  46018. pTDefRegMap(@Self)^.&set := $00000008;
  46019. end;
  46020. function TINT_INTCON.getINT3EP : TBits_1; inline;
  46021. begin
  46022. getINT3EP := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46023. end;
  46024. procedure TINT_INTCON.setINT4EP; inline;
  46025. begin
  46026. pTDefRegMap(@Self)^.&set := $00000010;
  46027. end;
  46028. procedure TINT_INTCON.clearINT4EP; inline;
  46029. begin
  46030. pTDefRegMap(@Self)^.clr := $00000010;
  46031. end;
  46032. procedure TINT_INTCON.setINT4EP(thebits : TBits_1); inline;
  46033. begin
  46034. if thebits = 0 then
  46035. pTDefRegMap(@Self)^.clr := $00000010
  46036. else
  46037. pTDefRegMap(@Self)^.&set := $00000010;
  46038. end;
  46039. function TINT_INTCON.getINT4EP : TBits_1; inline;
  46040. begin
  46041. getINT4EP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46042. end;
  46043. procedure TINT_INTCON.setTPC(thebits : TBits_3); inline;
  46044. begin
  46045. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  46046. end;
  46047. function TINT_INTCON.getTPC : TBits_3; inline;
  46048. begin
  46049. getTPC := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  46050. end;
  46051. procedure TINT_INTCON.setMVEC; inline;
  46052. begin
  46053. pTDefRegMap(@Self)^.&set := $00001000;
  46054. end;
  46055. procedure TINT_INTCON.clearMVEC; inline;
  46056. begin
  46057. pTDefRegMap(@Self)^.clr := $00001000;
  46058. end;
  46059. procedure TINT_INTCON.setMVEC(thebits : TBits_1); inline;
  46060. begin
  46061. if thebits = 0 then
  46062. pTDefRegMap(@Self)^.clr := $00001000
  46063. else
  46064. pTDefRegMap(@Self)^.&set := $00001000;
  46065. end;
  46066. function TINT_INTCON.getMVEC : TBits_1; inline;
  46067. begin
  46068. getMVEC := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  46069. end;
  46070. procedure TINT_INTCON.setFRZ; inline;
  46071. begin
  46072. pTDefRegMap(@Self)^.&set := $00004000;
  46073. end;
  46074. procedure TINT_INTCON.clearFRZ; inline;
  46075. begin
  46076. pTDefRegMap(@Self)^.clr := $00004000;
  46077. end;
  46078. procedure TINT_INTCON.setFRZ(thebits : TBits_1); inline;
  46079. begin
  46080. if thebits = 0 then
  46081. pTDefRegMap(@Self)^.clr := $00004000
  46082. else
  46083. pTDefRegMap(@Self)^.&set := $00004000;
  46084. end;
  46085. function TINT_INTCON.getFRZ : TBits_1; inline;
  46086. begin
  46087. getFRZ := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  46088. end;
  46089. procedure TINT_INTCON.setSS0; inline;
  46090. begin
  46091. pTDefRegMap(@Self)^.&set := $00010000;
  46092. end;
  46093. procedure TINT_INTCON.clearSS0; inline;
  46094. begin
  46095. pTDefRegMap(@Self)^.clr := $00010000;
  46096. end;
  46097. procedure TINT_INTCON.setSS0(thebits : TBits_1); inline;
  46098. begin
  46099. if thebits = 0 then
  46100. pTDefRegMap(@Self)^.clr := $00010000
  46101. else
  46102. pTDefRegMap(@Self)^.&set := $00010000;
  46103. end;
  46104. function TINT_INTCON.getSS0 : TBits_1; inline;
  46105. begin
  46106. getSS0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  46107. end;
  46108. procedure TINT_INTCON.setw(thebits : TBits_32); inline;
  46109. begin
  46110. pTDefRegMap(@Self)^.val := thebits;
  46111. end;
  46112. function TINT_INTCON.getw : TBits_32; inline;
  46113. begin
  46114. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46115. end;
  46116. procedure TINT_IFS0.setCTIF; inline;
  46117. begin
  46118. pTDefRegMap(@Self)^.&set := $00000001;
  46119. end;
  46120. procedure TINT_IFS0.clearCTIF; inline;
  46121. begin
  46122. pTDefRegMap(@Self)^.clr := $00000001;
  46123. end;
  46124. procedure TINT_IFS0.setCTIF(thebits : TBits_1); inline;
  46125. begin
  46126. if thebits = 0 then
  46127. pTDefRegMap(@Self)^.clr := $00000001
  46128. else
  46129. pTDefRegMap(@Self)^.&set := $00000001;
  46130. end;
  46131. function TINT_IFS0.getCTIF : TBits_1; inline;
  46132. begin
  46133. getCTIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46134. end;
  46135. procedure TINT_IFS0.setCS0IF; inline;
  46136. begin
  46137. pTDefRegMap(@Self)^.&set := $00000002;
  46138. end;
  46139. procedure TINT_IFS0.clearCS0IF; inline;
  46140. begin
  46141. pTDefRegMap(@Self)^.clr := $00000002;
  46142. end;
  46143. procedure TINT_IFS0.setCS0IF(thebits : TBits_1); inline;
  46144. begin
  46145. if thebits = 0 then
  46146. pTDefRegMap(@Self)^.clr := $00000002
  46147. else
  46148. pTDefRegMap(@Self)^.&set := $00000002;
  46149. end;
  46150. function TINT_IFS0.getCS0IF : TBits_1; inline;
  46151. begin
  46152. getCS0IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46153. end;
  46154. procedure TINT_IFS0.setCS1IF; inline;
  46155. begin
  46156. pTDefRegMap(@Self)^.&set := $00000004;
  46157. end;
  46158. procedure TINT_IFS0.clearCS1IF; inline;
  46159. begin
  46160. pTDefRegMap(@Self)^.clr := $00000004;
  46161. end;
  46162. procedure TINT_IFS0.setCS1IF(thebits : TBits_1); inline;
  46163. begin
  46164. if thebits = 0 then
  46165. pTDefRegMap(@Self)^.clr := $00000004
  46166. else
  46167. pTDefRegMap(@Self)^.&set := $00000004;
  46168. end;
  46169. function TINT_IFS0.getCS1IF : TBits_1; inline;
  46170. begin
  46171. getCS1IF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46172. end;
  46173. procedure TINT_IFS0.setINT0IF; inline;
  46174. begin
  46175. pTDefRegMap(@Self)^.&set := $00000008;
  46176. end;
  46177. procedure TINT_IFS0.clearINT0IF; inline;
  46178. begin
  46179. pTDefRegMap(@Self)^.clr := $00000008;
  46180. end;
  46181. procedure TINT_IFS0.setINT0IF(thebits : TBits_1); inline;
  46182. begin
  46183. if thebits = 0 then
  46184. pTDefRegMap(@Self)^.clr := $00000008
  46185. else
  46186. pTDefRegMap(@Self)^.&set := $00000008;
  46187. end;
  46188. function TINT_IFS0.getINT0IF : TBits_1; inline;
  46189. begin
  46190. getINT0IF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46191. end;
  46192. procedure TINT_IFS0.setT1IF; inline;
  46193. begin
  46194. pTDefRegMap(@Self)^.&set := $00000010;
  46195. end;
  46196. procedure TINT_IFS0.clearT1IF; inline;
  46197. begin
  46198. pTDefRegMap(@Self)^.clr := $00000010;
  46199. end;
  46200. procedure TINT_IFS0.setT1IF(thebits : TBits_1); inline;
  46201. begin
  46202. if thebits = 0 then
  46203. pTDefRegMap(@Self)^.clr := $00000010
  46204. else
  46205. pTDefRegMap(@Self)^.&set := $00000010;
  46206. end;
  46207. function TINT_IFS0.getT1IF : TBits_1; inline;
  46208. begin
  46209. getT1IF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46210. end;
  46211. procedure TINT_IFS0.setIC1IF; inline;
  46212. begin
  46213. pTDefRegMap(@Self)^.&set := $00000020;
  46214. end;
  46215. procedure TINT_IFS0.clearIC1IF; inline;
  46216. begin
  46217. pTDefRegMap(@Self)^.clr := $00000020;
  46218. end;
  46219. procedure TINT_IFS0.setIC1IF(thebits : TBits_1); inline;
  46220. begin
  46221. if thebits = 0 then
  46222. pTDefRegMap(@Self)^.clr := $00000020
  46223. else
  46224. pTDefRegMap(@Self)^.&set := $00000020;
  46225. end;
  46226. function TINT_IFS0.getIC1IF : TBits_1; inline;
  46227. begin
  46228. getIC1IF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46229. end;
  46230. procedure TINT_IFS0.setOC1IF; inline;
  46231. begin
  46232. pTDefRegMap(@Self)^.&set := $00000040;
  46233. end;
  46234. procedure TINT_IFS0.clearOC1IF; inline;
  46235. begin
  46236. pTDefRegMap(@Self)^.clr := $00000040;
  46237. end;
  46238. procedure TINT_IFS0.setOC1IF(thebits : TBits_1); inline;
  46239. begin
  46240. if thebits = 0 then
  46241. pTDefRegMap(@Self)^.clr := $00000040
  46242. else
  46243. pTDefRegMap(@Self)^.&set := $00000040;
  46244. end;
  46245. function TINT_IFS0.getOC1IF : TBits_1; inline;
  46246. begin
  46247. getOC1IF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46248. end;
  46249. procedure TINT_IFS0.setINT1IF; inline;
  46250. begin
  46251. pTDefRegMap(@Self)^.&set := $00000080;
  46252. end;
  46253. procedure TINT_IFS0.clearINT1IF; inline;
  46254. begin
  46255. pTDefRegMap(@Self)^.clr := $00000080;
  46256. end;
  46257. procedure TINT_IFS0.setINT1IF(thebits : TBits_1); inline;
  46258. begin
  46259. if thebits = 0 then
  46260. pTDefRegMap(@Self)^.clr := $00000080
  46261. else
  46262. pTDefRegMap(@Self)^.&set := $00000080;
  46263. end;
  46264. function TINT_IFS0.getINT1IF : TBits_1; inline;
  46265. begin
  46266. getINT1IF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46267. end;
  46268. procedure TINT_IFS0.setT2IF; inline;
  46269. begin
  46270. pTDefRegMap(@Self)^.&set := $00000100;
  46271. end;
  46272. procedure TINT_IFS0.clearT2IF; inline;
  46273. begin
  46274. pTDefRegMap(@Self)^.clr := $00000100;
  46275. end;
  46276. procedure TINT_IFS0.setT2IF(thebits : TBits_1); inline;
  46277. begin
  46278. if thebits = 0 then
  46279. pTDefRegMap(@Self)^.clr := $00000100
  46280. else
  46281. pTDefRegMap(@Self)^.&set := $00000100;
  46282. end;
  46283. function TINT_IFS0.getT2IF : TBits_1; inline;
  46284. begin
  46285. getT2IF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  46286. end;
  46287. procedure TINT_IFS0.setIC2IF; inline;
  46288. begin
  46289. pTDefRegMap(@Self)^.&set := $00000200;
  46290. end;
  46291. procedure TINT_IFS0.clearIC2IF; inline;
  46292. begin
  46293. pTDefRegMap(@Self)^.clr := $00000200;
  46294. end;
  46295. procedure TINT_IFS0.setIC2IF(thebits : TBits_1); inline;
  46296. begin
  46297. if thebits = 0 then
  46298. pTDefRegMap(@Self)^.clr := $00000200
  46299. else
  46300. pTDefRegMap(@Self)^.&set := $00000200;
  46301. end;
  46302. function TINT_IFS0.getIC2IF : TBits_1; inline;
  46303. begin
  46304. getIC2IF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  46305. end;
  46306. procedure TINT_IFS0.setOC2IF; inline;
  46307. begin
  46308. pTDefRegMap(@Self)^.&set := $00000400;
  46309. end;
  46310. procedure TINT_IFS0.clearOC2IF; inline;
  46311. begin
  46312. pTDefRegMap(@Self)^.clr := $00000400;
  46313. end;
  46314. procedure TINT_IFS0.setOC2IF(thebits : TBits_1); inline;
  46315. begin
  46316. if thebits = 0 then
  46317. pTDefRegMap(@Self)^.clr := $00000400
  46318. else
  46319. pTDefRegMap(@Self)^.&set := $00000400;
  46320. end;
  46321. function TINT_IFS0.getOC2IF : TBits_1; inline;
  46322. begin
  46323. getOC2IF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  46324. end;
  46325. procedure TINT_IFS0.setINT2IF; inline;
  46326. begin
  46327. pTDefRegMap(@Self)^.&set := $00000800;
  46328. end;
  46329. procedure TINT_IFS0.clearINT2IF; inline;
  46330. begin
  46331. pTDefRegMap(@Self)^.clr := $00000800;
  46332. end;
  46333. procedure TINT_IFS0.setINT2IF(thebits : TBits_1); inline;
  46334. begin
  46335. if thebits = 0 then
  46336. pTDefRegMap(@Self)^.clr := $00000800
  46337. else
  46338. pTDefRegMap(@Self)^.&set := $00000800;
  46339. end;
  46340. function TINT_IFS0.getINT2IF : TBits_1; inline;
  46341. begin
  46342. getINT2IF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  46343. end;
  46344. procedure TINT_IFS0.setT3IF; inline;
  46345. begin
  46346. pTDefRegMap(@Self)^.&set := $00001000;
  46347. end;
  46348. procedure TINT_IFS0.clearT3IF; inline;
  46349. begin
  46350. pTDefRegMap(@Self)^.clr := $00001000;
  46351. end;
  46352. procedure TINT_IFS0.setT3IF(thebits : TBits_1); inline;
  46353. begin
  46354. if thebits = 0 then
  46355. pTDefRegMap(@Self)^.clr := $00001000
  46356. else
  46357. pTDefRegMap(@Self)^.&set := $00001000;
  46358. end;
  46359. function TINT_IFS0.getT3IF : TBits_1; inline;
  46360. begin
  46361. getT3IF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  46362. end;
  46363. procedure TINT_IFS0.setIC3IF; inline;
  46364. begin
  46365. pTDefRegMap(@Self)^.&set := $00002000;
  46366. end;
  46367. procedure TINT_IFS0.clearIC3IF; inline;
  46368. begin
  46369. pTDefRegMap(@Self)^.clr := $00002000;
  46370. end;
  46371. procedure TINT_IFS0.setIC3IF(thebits : TBits_1); inline;
  46372. begin
  46373. if thebits = 0 then
  46374. pTDefRegMap(@Self)^.clr := $00002000
  46375. else
  46376. pTDefRegMap(@Self)^.&set := $00002000;
  46377. end;
  46378. function TINT_IFS0.getIC3IF : TBits_1; inline;
  46379. begin
  46380. getIC3IF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  46381. end;
  46382. procedure TINT_IFS0.setOC3IF; inline;
  46383. begin
  46384. pTDefRegMap(@Self)^.&set := $00004000;
  46385. end;
  46386. procedure TINT_IFS0.clearOC3IF; inline;
  46387. begin
  46388. pTDefRegMap(@Self)^.clr := $00004000;
  46389. end;
  46390. procedure TINT_IFS0.setOC3IF(thebits : TBits_1); inline;
  46391. begin
  46392. if thebits = 0 then
  46393. pTDefRegMap(@Self)^.clr := $00004000
  46394. else
  46395. pTDefRegMap(@Self)^.&set := $00004000;
  46396. end;
  46397. function TINT_IFS0.getOC3IF : TBits_1; inline;
  46398. begin
  46399. getOC3IF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  46400. end;
  46401. procedure TINT_IFS0.setINT3IF; inline;
  46402. begin
  46403. pTDefRegMap(@Self)^.&set := $00008000;
  46404. end;
  46405. procedure TINT_IFS0.clearINT3IF; inline;
  46406. begin
  46407. pTDefRegMap(@Self)^.clr := $00008000;
  46408. end;
  46409. procedure TINT_IFS0.setINT3IF(thebits : TBits_1); inline;
  46410. begin
  46411. if thebits = 0 then
  46412. pTDefRegMap(@Self)^.clr := $00008000
  46413. else
  46414. pTDefRegMap(@Self)^.&set := $00008000;
  46415. end;
  46416. function TINT_IFS0.getINT3IF : TBits_1; inline;
  46417. begin
  46418. getINT3IF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46419. end;
  46420. procedure TINT_IFS0.setT4IF; inline;
  46421. begin
  46422. pTDefRegMap(@Self)^.&set := $00010000;
  46423. end;
  46424. procedure TINT_IFS0.clearT4IF; inline;
  46425. begin
  46426. pTDefRegMap(@Self)^.clr := $00010000;
  46427. end;
  46428. procedure TINT_IFS0.setT4IF(thebits : TBits_1); inline;
  46429. begin
  46430. if thebits = 0 then
  46431. pTDefRegMap(@Self)^.clr := $00010000
  46432. else
  46433. pTDefRegMap(@Self)^.&set := $00010000;
  46434. end;
  46435. function TINT_IFS0.getT4IF : TBits_1; inline;
  46436. begin
  46437. getT4IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  46438. end;
  46439. procedure TINT_IFS0.setIC4IF; inline;
  46440. begin
  46441. pTDefRegMap(@Self)^.&set := $00020000;
  46442. end;
  46443. procedure TINT_IFS0.clearIC4IF; inline;
  46444. begin
  46445. pTDefRegMap(@Self)^.clr := $00020000;
  46446. end;
  46447. procedure TINT_IFS0.setIC4IF(thebits : TBits_1); inline;
  46448. begin
  46449. if thebits = 0 then
  46450. pTDefRegMap(@Self)^.clr := $00020000
  46451. else
  46452. pTDefRegMap(@Self)^.&set := $00020000;
  46453. end;
  46454. function TINT_IFS0.getIC4IF : TBits_1; inline;
  46455. begin
  46456. getIC4IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  46457. end;
  46458. procedure TINT_IFS0.setOC4IF; inline;
  46459. begin
  46460. pTDefRegMap(@Self)^.&set := $00040000;
  46461. end;
  46462. procedure TINT_IFS0.clearOC4IF; inline;
  46463. begin
  46464. pTDefRegMap(@Self)^.clr := $00040000;
  46465. end;
  46466. procedure TINT_IFS0.setOC4IF(thebits : TBits_1); inline;
  46467. begin
  46468. if thebits = 0 then
  46469. pTDefRegMap(@Self)^.clr := $00040000
  46470. else
  46471. pTDefRegMap(@Self)^.&set := $00040000;
  46472. end;
  46473. function TINT_IFS0.getOC4IF : TBits_1; inline;
  46474. begin
  46475. getOC4IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  46476. end;
  46477. procedure TINT_IFS0.setINT4IF; inline;
  46478. begin
  46479. pTDefRegMap(@Self)^.&set := $00080000;
  46480. end;
  46481. procedure TINT_IFS0.clearINT4IF; inline;
  46482. begin
  46483. pTDefRegMap(@Self)^.clr := $00080000;
  46484. end;
  46485. procedure TINT_IFS0.setINT4IF(thebits : TBits_1); inline;
  46486. begin
  46487. if thebits = 0 then
  46488. pTDefRegMap(@Self)^.clr := $00080000
  46489. else
  46490. pTDefRegMap(@Self)^.&set := $00080000;
  46491. end;
  46492. function TINT_IFS0.getINT4IF : TBits_1; inline;
  46493. begin
  46494. getINT4IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  46495. end;
  46496. procedure TINT_IFS0.setT5IF; inline;
  46497. begin
  46498. pTDefRegMap(@Self)^.&set := $00100000;
  46499. end;
  46500. procedure TINT_IFS0.clearT5IF; inline;
  46501. begin
  46502. pTDefRegMap(@Self)^.clr := $00100000;
  46503. end;
  46504. procedure TINT_IFS0.setT5IF(thebits : TBits_1); inline;
  46505. begin
  46506. if thebits = 0 then
  46507. pTDefRegMap(@Self)^.clr := $00100000
  46508. else
  46509. pTDefRegMap(@Self)^.&set := $00100000;
  46510. end;
  46511. function TINT_IFS0.getT5IF : TBits_1; inline;
  46512. begin
  46513. getT5IF := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  46514. end;
  46515. procedure TINT_IFS0.setIC5IF; inline;
  46516. begin
  46517. pTDefRegMap(@Self)^.&set := $00200000;
  46518. end;
  46519. procedure TINT_IFS0.clearIC5IF; inline;
  46520. begin
  46521. pTDefRegMap(@Self)^.clr := $00200000;
  46522. end;
  46523. procedure TINT_IFS0.setIC5IF(thebits : TBits_1); inline;
  46524. begin
  46525. if thebits = 0 then
  46526. pTDefRegMap(@Self)^.clr := $00200000
  46527. else
  46528. pTDefRegMap(@Self)^.&set := $00200000;
  46529. end;
  46530. function TINT_IFS0.getIC5IF : TBits_1; inline;
  46531. begin
  46532. getIC5IF := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  46533. end;
  46534. procedure TINT_IFS0.setOC5IF; inline;
  46535. begin
  46536. pTDefRegMap(@Self)^.&set := $00400000;
  46537. end;
  46538. procedure TINT_IFS0.clearOC5IF; inline;
  46539. begin
  46540. pTDefRegMap(@Self)^.clr := $00400000;
  46541. end;
  46542. procedure TINT_IFS0.setOC5IF(thebits : TBits_1); inline;
  46543. begin
  46544. if thebits = 0 then
  46545. pTDefRegMap(@Self)^.clr := $00400000
  46546. else
  46547. pTDefRegMap(@Self)^.&set := $00400000;
  46548. end;
  46549. function TINT_IFS0.getOC5IF : TBits_1; inline;
  46550. begin
  46551. getOC5IF := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  46552. end;
  46553. procedure TINT_IFS0.setU1EIF; inline;
  46554. begin
  46555. pTDefRegMap(@Self)^.&set := $04000000;
  46556. end;
  46557. procedure TINT_IFS0.clearU1EIF; inline;
  46558. begin
  46559. pTDefRegMap(@Self)^.clr := $04000000;
  46560. end;
  46561. procedure TINT_IFS0.setU1EIF(thebits : TBits_1); inline;
  46562. begin
  46563. if thebits = 0 then
  46564. pTDefRegMap(@Self)^.clr := $04000000
  46565. else
  46566. pTDefRegMap(@Self)^.&set := $04000000;
  46567. end;
  46568. function TINT_IFS0.getU1EIF : TBits_1; inline;
  46569. begin
  46570. getU1EIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  46571. end;
  46572. procedure TINT_IFS0.setU1RXIF; inline;
  46573. begin
  46574. pTDefRegMap(@Self)^.&set := $08000000;
  46575. end;
  46576. procedure TINT_IFS0.clearU1RXIF; inline;
  46577. begin
  46578. pTDefRegMap(@Self)^.clr := $08000000;
  46579. end;
  46580. procedure TINT_IFS0.setU1RXIF(thebits : TBits_1); inline;
  46581. begin
  46582. if thebits = 0 then
  46583. pTDefRegMap(@Self)^.clr := $08000000
  46584. else
  46585. pTDefRegMap(@Self)^.&set := $08000000;
  46586. end;
  46587. function TINT_IFS0.getU1RXIF : TBits_1; inline;
  46588. begin
  46589. getU1RXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  46590. end;
  46591. procedure TINT_IFS0.setU1TXIF; inline;
  46592. begin
  46593. pTDefRegMap(@Self)^.&set := $10000000;
  46594. end;
  46595. procedure TINT_IFS0.clearU1TXIF; inline;
  46596. begin
  46597. pTDefRegMap(@Self)^.clr := $10000000;
  46598. end;
  46599. procedure TINT_IFS0.setU1TXIF(thebits : TBits_1); inline;
  46600. begin
  46601. if thebits = 0 then
  46602. pTDefRegMap(@Self)^.clr := $10000000
  46603. else
  46604. pTDefRegMap(@Self)^.&set := $10000000;
  46605. end;
  46606. function TINT_IFS0.getU1TXIF : TBits_1; inline;
  46607. begin
  46608. getU1TXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  46609. end;
  46610. procedure TINT_IFS0.setI2C1BIF; inline;
  46611. begin
  46612. pTDefRegMap(@Self)^.&set := $20000000;
  46613. end;
  46614. procedure TINT_IFS0.clearI2C1BIF; inline;
  46615. begin
  46616. pTDefRegMap(@Self)^.clr := $20000000;
  46617. end;
  46618. procedure TINT_IFS0.setI2C1BIF(thebits : TBits_1); inline;
  46619. begin
  46620. if thebits = 0 then
  46621. pTDefRegMap(@Self)^.clr := $20000000
  46622. else
  46623. pTDefRegMap(@Self)^.&set := $20000000;
  46624. end;
  46625. function TINT_IFS0.getI2C1BIF : TBits_1; inline;
  46626. begin
  46627. getI2C1BIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  46628. end;
  46629. procedure TINT_IFS0.setI2C1SIF; inline;
  46630. begin
  46631. pTDefRegMap(@Self)^.&set := $40000000;
  46632. end;
  46633. procedure TINT_IFS0.clearI2C1SIF; inline;
  46634. begin
  46635. pTDefRegMap(@Self)^.clr := $40000000;
  46636. end;
  46637. procedure TINT_IFS0.setI2C1SIF(thebits : TBits_1); inline;
  46638. begin
  46639. if thebits = 0 then
  46640. pTDefRegMap(@Self)^.clr := $40000000
  46641. else
  46642. pTDefRegMap(@Self)^.&set := $40000000;
  46643. end;
  46644. function TINT_IFS0.getI2C1SIF : TBits_1; inline;
  46645. begin
  46646. getI2C1SIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  46647. end;
  46648. procedure TINT_IFS0.setI2C1MIF; inline;
  46649. begin
  46650. pTDefRegMap(@Self)^.&set := $80000000;
  46651. end;
  46652. procedure TINT_IFS0.clearI2C1MIF; inline;
  46653. begin
  46654. pTDefRegMap(@Self)^.clr := $80000000;
  46655. end;
  46656. procedure TINT_IFS0.setI2C1MIF(thebits : TBits_1); inline;
  46657. begin
  46658. if thebits = 0 then
  46659. pTDefRegMap(@Self)^.clr := $80000000
  46660. else
  46661. pTDefRegMap(@Self)^.&set := $80000000;
  46662. end;
  46663. function TINT_IFS0.getI2C1MIF : TBits_1; inline;
  46664. begin
  46665. getI2C1MIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  46666. end;
  46667. procedure TINT_IFS0.setU1AEIF; inline;
  46668. begin
  46669. pTDefRegMap(@Self)^.&set := $04000000;
  46670. end;
  46671. procedure TINT_IFS0.clearU1AEIF; inline;
  46672. begin
  46673. pTDefRegMap(@Self)^.clr := $04000000;
  46674. end;
  46675. procedure TINT_IFS0.setU1AEIF(thebits : TBits_1); inline;
  46676. begin
  46677. if thebits = 0 then
  46678. pTDefRegMap(@Self)^.clr := $04000000
  46679. else
  46680. pTDefRegMap(@Self)^.&set := $04000000;
  46681. end;
  46682. function TINT_IFS0.getU1AEIF : TBits_1; inline;
  46683. begin
  46684. getU1AEIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  46685. end;
  46686. procedure TINT_IFS0.setU1ARXIF; inline;
  46687. begin
  46688. pTDefRegMap(@Self)^.&set := $08000000;
  46689. end;
  46690. procedure TINT_IFS0.clearU1ARXIF; inline;
  46691. begin
  46692. pTDefRegMap(@Self)^.clr := $08000000;
  46693. end;
  46694. procedure TINT_IFS0.setU1ARXIF(thebits : TBits_1); inline;
  46695. begin
  46696. if thebits = 0 then
  46697. pTDefRegMap(@Self)^.clr := $08000000
  46698. else
  46699. pTDefRegMap(@Self)^.&set := $08000000;
  46700. end;
  46701. function TINT_IFS0.getU1ARXIF : TBits_1; inline;
  46702. begin
  46703. getU1ARXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  46704. end;
  46705. procedure TINT_IFS0.setU1ATXIF; inline;
  46706. begin
  46707. pTDefRegMap(@Self)^.&set := $10000000;
  46708. end;
  46709. procedure TINT_IFS0.clearU1ATXIF; inline;
  46710. begin
  46711. pTDefRegMap(@Self)^.clr := $10000000;
  46712. end;
  46713. procedure TINT_IFS0.setU1ATXIF(thebits : TBits_1); inline;
  46714. begin
  46715. if thebits = 0 then
  46716. pTDefRegMap(@Self)^.clr := $10000000
  46717. else
  46718. pTDefRegMap(@Self)^.&set := $10000000;
  46719. end;
  46720. function TINT_IFS0.getU1ATXIF : TBits_1; inline;
  46721. begin
  46722. getU1ATXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  46723. end;
  46724. procedure TINT_IFS0.setSPI3EIF; inline;
  46725. begin
  46726. pTDefRegMap(@Self)^.&set := $04000000;
  46727. end;
  46728. procedure TINT_IFS0.clearSPI3EIF; inline;
  46729. begin
  46730. pTDefRegMap(@Self)^.clr := $04000000;
  46731. end;
  46732. procedure TINT_IFS0.setSPI3EIF(thebits : TBits_1); inline;
  46733. begin
  46734. if thebits = 0 then
  46735. pTDefRegMap(@Self)^.clr := $04000000
  46736. else
  46737. pTDefRegMap(@Self)^.&set := $04000000;
  46738. end;
  46739. function TINT_IFS0.getSPI3EIF : TBits_1; inline;
  46740. begin
  46741. getSPI3EIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  46742. end;
  46743. procedure TINT_IFS0.setSPI3RXIF; inline;
  46744. begin
  46745. pTDefRegMap(@Self)^.&set := $08000000;
  46746. end;
  46747. procedure TINT_IFS0.clearSPI3RXIF; inline;
  46748. begin
  46749. pTDefRegMap(@Self)^.clr := $08000000;
  46750. end;
  46751. procedure TINT_IFS0.setSPI3RXIF(thebits : TBits_1); inline;
  46752. begin
  46753. if thebits = 0 then
  46754. pTDefRegMap(@Self)^.clr := $08000000
  46755. else
  46756. pTDefRegMap(@Self)^.&set := $08000000;
  46757. end;
  46758. function TINT_IFS0.getSPI3RXIF : TBits_1; inline;
  46759. begin
  46760. getSPI3RXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  46761. end;
  46762. procedure TINT_IFS0.setSPI3TXIF; inline;
  46763. begin
  46764. pTDefRegMap(@Self)^.&set := $10000000;
  46765. end;
  46766. procedure TINT_IFS0.clearSPI3TXIF; inline;
  46767. begin
  46768. pTDefRegMap(@Self)^.clr := $10000000;
  46769. end;
  46770. procedure TINT_IFS0.setSPI3TXIF(thebits : TBits_1); inline;
  46771. begin
  46772. if thebits = 0 then
  46773. pTDefRegMap(@Self)^.clr := $10000000
  46774. else
  46775. pTDefRegMap(@Self)^.&set := $10000000;
  46776. end;
  46777. function TINT_IFS0.getSPI3TXIF : TBits_1; inline;
  46778. begin
  46779. getSPI3TXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  46780. end;
  46781. procedure TINT_IFS0.setSPI1AEIF; inline;
  46782. begin
  46783. pTDefRegMap(@Self)^.&set := $04000000;
  46784. end;
  46785. procedure TINT_IFS0.clearSPI1AEIF; inline;
  46786. begin
  46787. pTDefRegMap(@Self)^.clr := $04000000;
  46788. end;
  46789. procedure TINT_IFS0.setSPI1AEIF(thebits : TBits_1); inline;
  46790. begin
  46791. if thebits = 0 then
  46792. pTDefRegMap(@Self)^.clr := $04000000
  46793. else
  46794. pTDefRegMap(@Self)^.&set := $04000000;
  46795. end;
  46796. function TINT_IFS0.getSPI1AEIF : TBits_1; inline;
  46797. begin
  46798. getSPI1AEIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  46799. end;
  46800. procedure TINT_IFS0.setSPI1ARXIF; inline;
  46801. begin
  46802. pTDefRegMap(@Self)^.&set := $08000000;
  46803. end;
  46804. procedure TINT_IFS0.clearSPI1ARXIF; inline;
  46805. begin
  46806. pTDefRegMap(@Self)^.clr := $08000000;
  46807. end;
  46808. procedure TINT_IFS0.setSPI1ARXIF(thebits : TBits_1); inline;
  46809. begin
  46810. if thebits = 0 then
  46811. pTDefRegMap(@Self)^.clr := $08000000
  46812. else
  46813. pTDefRegMap(@Self)^.&set := $08000000;
  46814. end;
  46815. function TINT_IFS0.getSPI1ARXIF : TBits_1; inline;
  46816. begin
  46817. getSPI1ARXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  46818. end;
  46819. procedure TINT_IFS0.setSPI1ATXIF; inline;
  46820. begin
  46821. pTDefRegMap(@Self)^.&set := $10000000;
  46822. end;
  46823. procedure TINT_IFS0.clearSPI1ATXIF; inline;
  46824. begin
  46825. pTDefRegMap(@Self)^.clr := $10000000;
  46826. end;
  46827. procedure TINT_IFS0.setSPI1ATXIF(thebits : TBits_1); inline;
  46828. begin
  46829. if thebits = 0 then
  46830. pTDefRegMap(@Self)^.clr := $10000000
  46831. else
  46832. pTDefRegMap(@Self)^.&set := $10000000;
  46833. end;
  46834. function TINT_IFS0.getSPI1ATXIF : TBits_1; inline;
  46835. begin
  46836. getSPI1ATXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  46837. end;
  46838. procedure TINT_IFS0.setI2C3BIF; inline;
  46839. begin
  46840. pTDefRegMap(@Self)^.&set := $04000000;
  46841. end;
  46842. procedure TINT_IFS0.clearI2C3BIF; inline;
  46843. begin
  46844. pTDefRegMap(@Self)^.clr := $04000000;
  46845. end;
  46846. procedure TINT_IFS0.setI2C3BIF(thebits : TBits_1); inline;
  46847. begin
  46848. if thebits = 0 then
  46849. pTDefRegMap(@Self)^.clr := $04000000
  46850. else
  46851. pTDefRegMap(@Self)^.&set := $04000000;
  46852. end;
  46853. function TINT_IFS0.getI2C3BIF : TBits_1; inline;
  46854. begin
  46855. getI2C3BIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  46856. end;
  46857. procedure TINT_IFS0.setI2C3SIF; inline;
  46858. begin
  46859. pTDefRegMap(@Self)^.&set := $08000000;
  46860. end;
  46861. procedure TINT_IFS0.clearI2C3SIF; inline;
  46862. begin
  46863. pTDefRegMap(@Self)^.clr := $08000000;
  46864. end;
  46865. procedure TINT_IFS0.setI2C3SIF(thebits : TBits_1); inline;
  46866. begin
  46867. if thebits = 0 then
  46868. pTDefRegMap(@Self)^.clr := $08000000
  46869. else
  46870. pTDefRegMap(@Self)^.&set := $08000000;
  46871. end;
  46872. function TINT_IFS0.getI2C3SIF : TBits_1; inline;
  46873. begin
  46874. getI2C3SIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  46875. end;
  46876. procedure TINT_IFS0.setI2C3MIF; inline;
  46877. begin
  46878. pTDefRegMap(@Self)^.&set := $10000000;
  46879. end;
  46880. procedure TINT_IFS0.clearI2C3MIF; inline;
  46881. begin
  46882. pTDefRegMap(@Self)^.clr := $10000000;
  46883. end;
  46884. procedure TINT_IFS0.setI2C3MIF(thebits : TBits_1); inline;
  46885. begin
  46886. if thebits = 0 then
  46887. pTDefRegMap(@Self)^.clr := $10000000
  46888. else
  46889. pTDefRegMap(@Self)^.&set := $10000000;
  46890. end;
  46891. function TINT_IFS0.getI2C3MIF : TBits_1; inline;
  46892. begin
  46893. getI2C3MIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  46894. end;
  46895. procedure TINT_IFS0.setI2C1ABIF; inline;
  46896. begin
  46897. pTDefRegMap(@Self)^.&set := $04000000;
  46898. end;
  46899. procedure TINT_IFS0.clearI2C1ABIF; inline;
  46900. begin
  46901. pTDefRegMap(@Self)^.clr := $04000000;
  46902. end;
  46903. procedure TINT_IFS0.setI2C1ABIF(thebits : TBits_1); inline;
  46904. begin
  46905. if thebits = 0 then
  46906. pTDefRegMap(@Self)^.clr := $04000000
  46907. else
  46908. pTDefRegMap(@Self)^.&set := $04000000;
  46909. end;
  46910. function TINT_IFS0.getI2C1ABIF : TBits_1; inline;
  46911. begin
  46912. getI2C1ABIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  46913. end;
  46914. procedure TINT_IFS0.setI2C1ASIF; inline;
  46915. begin
  46916. pTDefRegMap(@Self)^.&set := $08000000;
  46917. end;
  46918. procedure TINT_IFS0.clearI2C1ASIF; inline;
  46919. begin
  46920. pTDefRegMap(@Self)^.clr := $08000000;
  46921. end;
  46922. procedure TINT_IFS0.setI2C1ASIF(thebits : TBits_1); inline;
  46923. begin
  46924. if thebits = 0 then
  46925. pTDefRegMap(@Self)^.clr := $08000000
  46926. else
  46927. pTDefRegMap(@Self)^.&set := $08000000;
  46928. end;
  46929. function TINT_IFS0.getI2C1ASIF : TBits_1; inline;
  46930. begin
  46931. getI2C1ASIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  46932. end;
  46933. procedure TINT_IFS0.setI2C1AMIF; inline;
  46934. begin
  46935. pTDefRegMap(@Self)^.&set := $10000000;
  46936. end;
  46937. procedure TINT_IFS0.clearI2C1AMIF; inline;
  46938. begin
  46939. pTDefRegMap(@Self)^.clr := $10000000;
  46940. end;
  46941. procedure TINT_IFS0.setI2C1AMIF(thebits : TBits_1); inline;
  46942. begin
  46943. if thebits = 0 then
  46944. pTDefRegMap(@Self)^.clr := $10000000
  46945. else
  46946. pTDefRegMap(@Self)^.&set := $10000000;
  46947. end;
  46948. function TINT_IFS0.getI2C1AMIF : TBits_1; inline;
  46949. begin
  46950. getI2C1AMIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  46951. end;
  46952. procedure TINT_IFS0.setw(thebits : TBits_32); inline;
  46953. begin
  46954. pTDefRegMap(@Self)^.val := thebits;
  46955. end;
  46956. function TINT_IFS0.getw : TBits_32; inline;
  46957. begin
  46958. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46959. end;
  46960. procedure TINT_IFS1.setCNIF; inline;
  46961. begin
  46962. pTDefRegMap(@Self)^.&set := $00000001;
  46963. end;
  46964. procedure TINT_IFS1.clearCNIF; inline;
  46965. begin
  46966. pTDefRegMap(@Self)^.clr := $00000001;
  46967. end;
  46968. procedure TINT_IFS1.setCNIF(thebits : TBits_1); inline;
  46969. begin
  46970. if thebits = 0 then
  46971. pTDefRegMap(@Self)^.clr := $00000001
  46972. else
  46973. pTDefRegMap(@Self)^.&set := $00000001;
  46974. end;
  46975. function TINT_IFS1.getCNIF : TBits_1; inline;
  46976. begin
  46977. getCNIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46978. end;
  46979. procedure TINT_IFS1.setAD1IF; inline;
  46980. begin
  46981. pTDefRegMap(@Self)^.&set := $00000002;
  46982. end;
  46983. procedure TINT_IFS1.clearAD1IF; inline;
  46984. begin
  46985. pTDefRegMap(@Self)^.clr := $00000002;
  46986. end;
  46987. procedure TINT_IFS1.setAD1IF(thebits : TBits_1); inline;
  46988. begin
  46989. if thebits = 0 then
  46990. pTDefRegMap(@Self)^.clr := $00000002
  46991. else
  46992. pTDefRegMap(@Self)^.&set := $00000002;
  46993. end;
  46994. function TINT_IFS1.getAD1IF : TBits_1; inline;
  46995. begin
  46996. getAD1IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46997. end;
  46998. procedure TINT_IFS1.setPMPIF; inline;
  46999. begin
  47000. pTDefRegMap(@Self)^.&set := $00000004;
  47001. end;
  47002. procedure TINT_IFS1.clearPMPIF; inline;
  47003. begin
  47004. pTDefRegMap(@Self)^.clr := $00000004;
  47005. end;
  47006. procedure TINT_IFS1.setPMPIF(thebits : TBits_1); inline;
  47007. begin
  47008. if thebits = 0 then
  47009. pTDefRegMap(@Self)^.clr := $00000004
  47010. else
  47011. pTDefRegMap(@Self)^.&set := $00000004;
  47012. end;
  47013. function TINT_IFS1.getPMPIF : TBits_1; inline;
  47014. begin
  47015. getPMPIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  47016. end;
  47017. procedure TINT_IFS1.setCMP1IF; inline;
  47018. begin
  47019. pTDefRegMap(@Self)^.&set := $00000008;
  47020. end;
  47021. procedure TINT_IFS1.clearCMP1IF; inline;
  47022. begin
  47023. pTDefRegMap(@Self)^.clr := $00000008;
  47024. end;
  47025. procedure TINT_IFS1.setCMP1IF(thebits : TBits_1); inline;
  47026. begin
  47027. if thebits = 0 then
  47028. pTDefRegMap(@Self)^.clr := $00000008
  47029. else
  47030. pTDefRegMap(@Self)^.&set := $00000008;
  47031. end;
  47032. function TINT_IFS1.getCMP1IF : TBits_1; inline;
  47033. begin
  47034. getCMP1IF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  47035. end;
  47036. procedure TINT_IFS1.setCMP2IF; inline;
  47037. begin
  47038. pTDefRegMap(@Self)^.&set := $00000010;
  47039. end;
  47040. procedure TINT_IFS1.clearCMP2IF; inline;
  47041. begin
  47042. pTDefRegMap(@Self)^.clr := $00000010;
  47043. end;
  47044. procedure TINT_IFS1.setCMP2IF(thebits : TBits_1); inline;
  47045. begin
  47046. if thebits = 0 then
  47047. pTDefRegMap(@Self)^.clr := $00000010
  47048. else
  47049. pTDefRegMap(@Self)^.&set := $00000010;
  47050. end;
  47051. function TINT_IFS1.getCMP2IF : TBits_1; inline;
  47052. begin
  47053. getCMP2IF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  47054. end;
  47055. procedure TINT_IFS1.setU3EIF; inline;
  47056. begin
  47057. pTDefRegMap(@Self)^.&set := $00000020;
  47058. end;
  47059. procedure TINT_IFS1.clearU3EIF; inline;
  47060. begin
  47061. pTDefRegMap(@Self)^.clr := $00000020;
  47062. end;
  47063. procedure TINT_IFS1.setU3EIF(thebits : TBits_1); inline;
  47064. begin
  47065. if thebits = 0 then
  47066. pTDefRegMap(@Self)^.clr := $00000020
  47067. else
  47068. pTDefRegMap(@Self)^.&set := $00000020;
  47069. end;
  47070. function TINT_IFS1.getU3EIF : TBits_1; inline;
  47071. begin
  47072. getU3EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47073. end;
  47074. procedure TINT_IFS1.setU3RXIF; inline;
  47075. begin
  47076. pTDefRegMap(@Self)^.&set := $00000040;
  47077. end;
  47078. procedure TINT_IFS1.clearU3RXIF; inline;
  47079. begin
  47080. pTDefRegMap(@Self)^.clr := $00000040;
  47081. end;
  47082. procedure TINT_IFS1.setU3RXIF(thebits : TBits_1); inline;
  47083. begin
  47084. if thebits = 0 then
  47085. pTDefRegMap(@Self)^.clr := $00000040
  47086. else
  47087. pTDefRegMap(@Self)^.&set := $00000040;
  47088. end;
  47089. function TINT_IFS1.getU3RXIF : TBits_1; inline;
  47090. begin
  47091. getU3RXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47092. end;
  47093. procedure TINT_IFS1.setU3TXIF; inline;
  47094. begin
  47095. pTDefRegMap(@Self)^.&set := $00000080;
  47096. end;
  47097. procedure TINT_IFS1.clearU3TXIF; inline;
  47098. begin
  47099. pTDefRegMap(@Self)^.clr := $00000080;
  47100. end;
  47101. procedure TINT_IFS1.setU3TXIF(thebits : TBits_1); inline;
  47102. begin
  47103. if thebits = 0 then
  47104. pTDefRegMap(@Self)^.clr := $00000080
  47105. else
  47106. pTDefRegMap(@Self)^.&set := $00000080;
  47107. end;
  47108. function TINT_IFS1.getU3TXIF : TBits_1; inline;
  47109. begin
  47110. getU3TXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47111. end;
  47112. procedure TINT_IFS1.setU2EIF; inline;
  47113. begin
  47114. pTDefRegMap(@Self)^.&set := $00000100;
  47115. end;
  47116. procedure TINT_IFS1.clearU2EIF; inline;
  47117. begin
  47118. pTDefRegMap(@Self)^.clr := $00000100;
  47119. end;
  47120. procedure TINT_IFS1.setU2EIF(thebits : TBits_1); inline;
  47121. begin
  47122. if thebits = 0 then
  47123. pTDefRegMap(@Self)^.clr := $00000100
  47124. else
  47125. pTDefRegMap(@Self)^.&set := $00000100;
  47126. end;
  47127. function TINT_IFS1.getU2EIF : TBits_1; inline;
  47128. begin
  47129. getU2EIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47130. end;
  47131. procedure TINT_IFS1.setU2RXIF; inline;
  47132. begin
  47133. pTDefRegMap(@Self)^.&set := $00000200;
  47134. end;
  47135. procedure TINT_IFS1.clearU2RXIF; inline;
  47136. begin
  47137. pTDefRegMap(@Self)^.clr := $00000200;
  47138. end;
  47139. procedure TINT_IFS1.setU2RXIF(thebits : TBits_1); inline;
  47140. begin
  47141. if thebits = 0 then
  47142. pTDefRegMap(@Self)^.clr := $00000200
  47143. else
  47144. pTDefRegMap(@Self)^.&set := $00000200;
  47145. end;
  47146. function TINT_IFS1.getU2RXIF : TBits_1; inline;
  47147. begin
  47148. getU2RXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47149. end;
  47150. procedure TINT_IFS1.setU2TXIF; inline;
  47151. begin
  47152. pTDefRegMap(@Self)^.&set := $00000400;
  47153. end;
  47154. procedure TINT_IFS1.clearU2TXIF; inline;
  47155. begin
  47156. pTDefRegMap(@Self)^.clr := $00000400;
  47157. end;
  47158. procedure TINT_IFS1.setU2TXIF(thebits : TBits_1); inline;
  47159. begin
  47160. if thebits = 0 then
  47161. pTDefRegMap(@Self)^.clr := $00000400
  47162. else
  47163. pTDefRegMap(@Self)^.&set := $00000400;
  47164. end;
  47165. function TINT_IFS1.getU2TXIF : TBits_1; inline;
  47166. begin
  47167. getU2TXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  47168. end;
  47169. procedure TINT_IFS1.setFSCMIF; inline;
  47170. begin
  47171. pTDefRegMap(@Self)^.&set := $00004000;
  47172. end;
  47173. procedure TINT_IFS1.clearFSCMIF; inline;
  47174. begin
  47175. pTDefRegMap(@Self)^.clr := $00004000;
  47176. end;
  47177. procedure TINT_IFS1.setFSCMIF(thebits : TBits_1); inline;
  47178. begin
  47179. if thebits = 0 then
  47180. pTDefRegMap(@Self)^.clr := $00004000
  47181. else
  47182. pTDefRegMap(@Self)^.&set := $00004000;
  47183. end;
  47184. function TINT_IFS1.getFSCMIF : TBits_1; inline;
  47185. begin
  47186. getFSCMIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  47187. end;
  47188. procedure TINT_IFS1.setRTCCIF; inline;
  47189. begin
  47190. pTDefRegMap(@Self)^.&set := $00008000;
  47191. end;
  47192. procedure TINT_IFS1.clearRTCCIF; inline;
  47193. begin
  47194. pTDefRegMap(@Self)^.clr := $00008000;
  47195. end;
  47196. procedure TINT_IFS1.setRTCCIF(thebits : TBits_1); inline;
  47197. begin
  47198. if thebits = 0 then
  47199. pTDefRegMap(@Self)^.clr := $00008000
  47200. else
  47201. pTDefRegMap(@Self)^.&set := $00008000;
  47202. end;
  47203. function TINT_IFS1.getRTCCIF : TBits_1; inline;
  47204. begin
  47205. getRTCCIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47206. end;
  47207. procedure TINT_IFS1.setDMA0IF; inline;
  47208. begin
  47209. pTDefRegMap(@Self)^.&set := $00010000;
  47210. end;
  47211. procedure TINT_IFS1.clearDMA0IF; inline;
  47212. begin
  47213. pTDefRegMap(@Self)^.clr := $00010000;
  47214. end;
  47215. procedure TINT_IFS1.setDMA0IF(thebits : TBits_1); inline;
  47216. begin
  47217. if thebits = 0 then
  47218. pTDefRegMap(@Self)^.clr := $00010000
  47219. else
  47220. pTDefRegMap(@Self)^.&set := $00010000;
  47221. end;
  47222. function TINT_IFS1.getDMA0IF : TBits_1; inline;
  47223. begin
  47224. getDMA0IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  47225. end;
  47226. procedure TINT_IFS1.setDMA1IF; inline;
  47227. begin
  47228. pTDefRegMap(@Self)^.&set := $00020000;
  47229. end;
  47230. procedure TINT_IFS1.clearDMA1IF; inline;
  47231. begin
  47232. pTDefRegMap(@Self)^.clr := $00020000;
  47233. end;
  47234. procedure TINT_IFS1.setDMA1IF(thebits : TBits_1); inline;
  47235. begin
  47236. if thebits = 0 then
  47237. pTDefRegMap(@Self)^.clr := $00020000
  47238. else
  47239. pTDefRegMap(@Self)^.&set := $00020000;
  47240. end;
  47241. function TINT_IFS1.getDMA1IF : TBits_1; inline;
  47242. begin
  47243. getDMA1IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  47244. end;
  47245. procedure TINT_IFS1.setDMA2IF; inline;
  47246. begin
  47247. pTDefRegMap(@Self)^.&set := $00040000;
  47248. end;
  47249. procedure TINT_IFS1.clearDMA2IF; inline;
  47250. begin
  47251. pTDefRegMap(@Self)^.clr := $00040000;
  47252. end;
  47253. procedure TINT_IFS1.setDMA2IF(thebits : TBits_1); inline;
  47254. begin
  47255. if thebits = 0 then
  47256. pTDefRegMap(@Self)^.clr := $00040000
  47257. else
  47258. pTDefRegMap(@Self)^.&set := $00040000;
  47259. end;
  47260. function TINT_IFS1.getDMA2IF : TBits_1; inline;
  47261. begin
  47262. getDMA2IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  47263. end;
  47264. procedure TINT_IFS1.setDMA3IF; inline;
  47265. begin
  47266. pTDefRegMap(@Self)^.&set := $00080000;
  47267. end;
  47268. procedure TINT_IFS1.clearDMA3IF; inline;
  47269. begin
  47270. pTDefRegMap(@Self)^.clr := $00080000;
  47271. end;
  47272. procedure TINT_IFS1.setDMA3IF(thebits : TBits_1); inline;
  47273. begin
  47274. if thebits = 0 then
  47275. pTDefRegMap(@Self)^.clr := $00080000
  47276. else
  47277. pTDefRegMap(@Self)^.&set := $00080000;
  47278. end;
  47279. function TINT_IFS1.getDMA3IF : TBits_1; inline;
  47280. begin
  47281. getDMA3IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  47282. end;
  47283. procedure TINT_IFS1.setDMA4IF; inline;
  47284. begin
  47285. pTDefRegMap(@Self)^.&set := $00100000;
  47286. end;
  47287. procedure TINT_IFS1.clearDMA4IF; inline;
  47288. begin
  47289. pTDefRegMap(@Self)^.clr := $00100000;
  47290. end;
  47291. procedure TINT_IFS1.setDMA4IF(thebits : TBits_1); inline;
  47292. begin
  47293. if thebits = 0 then
  47294. pTDefRegMap(@Self)^.clr := $00100000
  47295. else
  47296. pTDefRegMap(@Self)^.&set := $00100000;
  47297. end;
  47298. function TINT_IFS1.getDMA4IF : TBits_1; inline;
  47299. begin
  47300. getDMA4IF := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  47301. end;
  47302. procedure TINT_IFS1.setDMA5IF; inline;
  47303. begin
  47304. pTDefRegMap(@Self)^.&set := $00200000;
  47305. end;
  47306. procedure TINT_IFS1.clearDMA5IF; inline;
  47307. begin
  47308. pTDefRegMap(@Self)^.clr := $00200000;
  47309. end;
  47310. procedure TINT_IFS1.setDMA5IF(thebits : TBits_1); inline;
  47311. begin
  47312. if thebits = 0 then
  47313. pTDefRegMap(@Self)^.clr := $00200000
  47314. else
  47315. pTDefRegMap(@Self)^.&set := $00200000;
  47316. end;
  47317. function TINT_IFS1.getDMA5IF : TBits_1; inline;
  47318. begin
  47319. getDMA5IF := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  47320. end;
  47321. procedure TINT_IFS1.setDMA6IF; inline;
  47322. begin
  47323. pTDefRegMap(@Self)^.&set := $00400000;
  47324. end;
  47325. procedure TINT_IFS1.clearDMA6IF; inline;
  47326. begin
  47327. pTDefRegMap(@Self)^.clr := $00400000;
  47328. end;
  47329. procedure TINT_IFS1.setDMA6IF(thebits : TBits_1); inline;
  47330. begin
  47331. if thebits = 0 then
  47332. pTDefRegMap(@Self)^.clr := $00400000
  47333. else
  47334. pTDefRegMap(@Self)^.&set := $00400000;
  47335. end;
  47336. function TINT_IFS1.getDMA6IF : TBits_1; inline;
  47337. begin
  47338. getDMA6IF := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  47339. end;
  47340. procedure TINT_IFS1.setDMA7IF; inline;
  47341. begin
  47342. pTDefRegMap(@Self)^.&set := $00800000;
  47343. end;
  47344. procedure TINT_IFS1.clearDMA7IF; inline;
  47345. begin
  47346. pTDefRegMap(@Self)^.clr := $00800000;
  47347. end;
  47348. procedure TINT_IFS1.setDMA7IF(thebits : TBits_1); inline;
  47349. begin
  47350. if thebits = 0 then
  47351. pTDefRegMap(@Self)^.clr := $00800000
  47352. else
  47353. pTDefRegMap(@Self)^.&set := $00800000;
  47354. end;
  47355. function TINT_IFS1.getDMA7IF : TBits_1; inline;
  47356. begin
  47357. getDMA7IF := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  47358. end;
  47359. procedure TINT_IFS1.setFCEIF; inline;
  47360. begin
  47361. pTDefRegMap(@Self)^.&set := $01000000;
  47362. end;
  47363. procedure TINT_IFS1.clearFCEIF; inline;
  47364. begin
  47365. pTDefRegMap(@Self)^.clr := $01000000;
  47366. end;
  47367. procedure TINT_IFS1.setFCEIF(thebits : TBits_1); inline;
  47368. begin
  47369. if thebits = 0 then
  47370. pTDefRegMap(@Self)^.clr := $01000000
  47371. else
  47372. pTDefRegMap(@Self)^.&set := $01000000;
  47373. end;
  47374. function TINT_IFS1.getFCEIF : TBits_1; inline;
  47375. begin
  47376. getFCEIF := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  47377. end;
  47378. procedure TINT_IFS1.setUSBIF; inline;
  47379. begin
  47380. pTDefRegMap(@Self)^.&set := $02000000;
  47381. end;
  47382. procedure TINT_IFS1.clearUSBIF; inline;
  47383. begin
  47384. pTDefRegMap(@Self)^.clr := $02000000;
  47385. end;
  47386. procedure TINT_IFS1.setUSBIF(thebits : TBits_1); inline;
  47387. begin
  47388. if thebits = 0 then
  47389. pTDefRegMap(@Self)^.clr := $02000000
  47390. else
  47391. pTDefRegMap(@Self)^.&set := $02000000;
  47392. end;
  47393. function TINT_IFS1.getUSBIF : TBits_1; inline;
  47394. begin
  47395. getUSBIF := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  47396. end;
  47397. procedure TINT_IFS1.setCAN1IF; inline;
  47398. begin
  47399. pTDefRegMap(@Self)^.&set := $04000000;
  47400. end;
  47401. procedure TINT_IFS1.clearCAN1IF; inline;
  47402. begin
  47403. pTDefRegMap(@Self)^.clr := $04000000;
  47404. end;
  47405. procedure TINT_IFS1.setCAN1IF(thebits : TBits_1); inline;
  47406. begin
  47407. if thebits = 0 then
  47408. pTDefRegMap(@Self)^.clr := $04000000
  47409. else
  47410. pTDefRegMap(@Self)^.&set := $04000000;
  47411. end;
  47412. function TINT_IFS1.getCAN1IF : TBits_1; inline;
  47413. begin
  47414. getCAN1IF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  47415. end;
  47416. procedure TINT_IFS1.setIC1EIF; inline;
  47417. begin
  47418. pTDefRegMap(@Self)^.&set := $20000000;
  47419. end;
  47420. procedure TINT_IFS1.clearIC1EIF; inline;
  47421. begin
  47422. pTDefRegMap(@Self)^.clr := $20000000;
  47423. end;
  47424. procedure TINT_IFS1.setIC1EIF(thebits : TBits_1); inline;
  47425. begin
  47426. if thebits = 0 then
  47427. pTDefRegMap(@Self)^.clr := $20000000
  47428. else
  47429. pTDefRegMap(@Self)^.&set := $20000000;
  47430. end;
  47431. function TINT_IFS1.getIC1EIF : TBits_1; inline;
  47432. begin
  47433. getIC1EIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  47434. end;
  47435. procedure TINT_IFS1.setIC2EIF; inline;
  47436. begin
  47437. pTDefRegMap(@Self)^.&set := $40000000;
  47438. end;
  47439. procedure TINT_IFS1.clearIC2EIF; inline;
  47440. begin
  47441. pTDefRegMap(@Self)^.clr := $40000000;
  47442. end;
  47443. procedure TINT_IFS1.setIC2EIF(thebits : TBits_1); inline;
  47444. begin
  47445. if thebits = 0 then
  47446. pTDefRegMap(@Self)^.clr := $40000000
  47447. else
  47448. pTDefRegMap(@Self)^.&set := $40000000;
  47449. end;
  47450. function TINT_IFS1.getIC2EIF : TBits_1; inline;
  47451. begin
  47452. getIC2EIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  47453. end;
  47454. procedure TINT_IFS1.setIC3EIF; inline;
  47455. begin
  47456. pTDefRegMap(@Self)^.&set := $80000000;
  47457. end;
  47458. procedure TINT_IFS1.clearIC3EIF; inline;
  47459. begin
  47460. pTDefRegMap(@Self)^.clr := $80000000;
  47461. end;
  47462. procedure TINT_IFS1.setIC3EIF(thebits : TBits_1); inline;
  47463. begin
  47464. if thebits = 0 then
  47465. pTDefRegMap(@Self)^.clr := $80000000
  47466. else
  47467. pTDefRegMap(@Self)^.&set := $80000000;
  47468. end;
  47469. function TINT_IFS1.getIC3EIF : TBits_1; inline;
  47470. begin
  47471. getIC3EIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  47472. end;
  47473. procedure TINT_IFS1.setU2AEIF; inline;
  47474. begin
  47475. pTDefRegMap(@Self)^.&set := $00000020;
  47476. end;
  47477. procedure TINT_IFS1.clearU2AEIF; inline;
  47478. begin
  47479. pTDefRegMap(@Self)^.clr := $00000020;
  47480. end;
  47481. procedure TINT_IFS1.setU2AEIF(thebits : TBits_1); inline;
  47482. begin
  47483. if thebits = 0 then
  47484. pTDefRegMap(@Self)^.clr := $00000020
  47485. else
  47486. pTDefRegMap(@Self)^.&set := $00000020;
  47487. end;
  47488. function TINT_IFS1.getU2AEIF : TBits_1; inline;
  47489. begin
  47490. getU2AEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47491. end;
  47492. procedure TINT_IFS1.setU2ARXIF; inline;
  47493. begin
  47494. pTDefRegMap(@Self)^.&set := $00000040;
  47495. end;
  47496. procedure TINT_IFS1.clearU2ARXIF; inline;
  47497. begin
  47498. pTDefRegMap(@Self)^.clr := $00000040;
  47499. end;
  47500. procedure TINT_IFS1.setU2ARXIF(thebits : TBits_1); inline;
  47501. begin
  47502. if thebits = 0 then
  47503. pTDefRegMap(@Self)^.clr := $00000040
  47504. else
  47505. pTDefRegMap(@Self)^.&set := $00000040;
  47506. end;
  47507. function TINT_IFS1.getU2ARXIF : TBits_1; inline;
  47508. begin
  47509. getU2ARXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47510. end;
  47511. procedure TINT_IFS1.setU2ATXIF; inline;
  47512. begin
  47513. pTDefRegMap(@Self)^.&set := $00000080;
  47514. end;
  47515. procedure TINT_IFS1.clearU2ATXIF; inline;
  47516. begin
  47517. pTDefRegMap(@Self)^.clr := $00000080;
  47518. end;
  47519. procedure TINT_IFS1.setU2ATXIF(thebits : TBits_1); inline;
  47520. begin
  47521. if thebits = 0 then
  47522. pTDefRegMap(@Self)^.clr := $00000080
  47523. else
  47524. pTDefRegMap(@Self)^.&set := $00000080;
  47525. end;
  47526. function TINT_IFS1.getU2ATXIF : TBits_1; inline;
  47527. begin
  47528. getU2ATXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47529. end;
  47530. procedure TINT_IFS1.setU3AEIF; inline;
  47531. begin
  47532. pTDefRegMap(@Self)^.&set := $00000100;
  47533. end;
  47534. procedure TINT_IFS1.clearU3AEIF; inline;
  47535. begin
  47536. pTDefRegMap(@Self)^.clr := $00000100;
  47537. end;
  47538. procedure TINT_IFS1.setU3AEIF(thebits : TBits_1); inline;
  47539. begin
  47540. if thebits = 0 then
  47541. pTDefRegMap(@Self)^.clr := $00000100
  47542. else
  47543. pTDefRegMap(@Self)^.&set := $00000100;
  47544. end;
  47545. function TINT_IFS1.getU3AEIF : TBits_1; inline;
  47546. begin
  47547. getU3AEIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47548. end;
  47549. procedure TINT_IFS1.setU3ARXIF; inline;
  47550. begin
  47551. pTDefRegMap(@Self)^.&set := $00000200;
  47552. end;
  47553. procedure TINT_IFS1.clearU3ARXIF; inline;
  47554. begin
  47555. pTDefRegMap(@Self)^.clr := $00000200;
  47556. end;
  47557. procedure TINT_IFS1.setU3ARXIF(thebits : TBits_1); inline;
  47558. begin
  47559. if thebits = 0 then
  47560. pTDefRegMap(@Self)^.clr := $00000200
  47561. else
  47562. pTDefRegMap(@Self)^.&set := $00000200;
  47563. end;
  47564. function TINT_IFS1.getU3ARXIF : TBits_1; inline;
  47565. begin
  47566. getU3ARXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47567. end;
  47568. procedure TINT_IFS1.setU3ATXIF; inline;
  47569. begin
  47570. pTDefRegMap(@Self)^.&set := $00000400;
  47571. end;
  47572. procedure TINT_IFS1.clearU3ATXIF; inline;
  47573. begin
  47574. pTDefRegMap(@Self)^.clr := $00000400;
  47575. end;
  47576. procedure TINT_IFS1.setU3ATXIF(thebits : TBits_1); inline;
  47577. begin
  47578. if thebits = 0 then
  47579. pTDefRegMap(@Self)^.clr := $00000400
  47580. else
  47581. pTDefRegMap(@Self)^.&set := $00000400;
  47582. end;
  47583. function TINT_IFS1.getU3ATXIF : TBits_1; inline;
  47584. begin
  47585. getU3ATXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  47586. end;
  47587. procedure TINT_IFS1.setSPI2EIF; inline;
  47588. begin
  47589. pTDefRegMap(@Self)^.&set := $00000020;
  47590. end;
  47591. procedure TINT_IFS1.clearSPI2EIF; inline;
  47592. begin
  47593. pTDefRegMap(@Self)^.clr := $00000020;
  47594. end;
  47595. procedure TINT_IFS1.setSPI2EIF(thebits : TBits_1); inline;
  47596. begin
  47597. if thebits = 0 then
  47598. pTDefRegMap(@Self)^.clr := $00000020
  47599. else
  47600. pTDefRegMap(@Self)^.&set := $00000020;
  47601. end;
  47602. function TINT_IFS1.getSPI2EIF : TBits_1; inline;
  47603. begin
  47604. getSPI2EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47605. end;
  47606. procedure TINT_IFS1.setSPI2RXIF; inline;
  47607. begin
  47608. pTDefRegMap(@Self)^.&set := $00000040;
  47609. end;
  47610. procedure TINT_IFS1.clearSPI2RXIF; inline;
  47611. begin
  47612. pTDefRegMap(@Self)^.clr := $00000040;
  47613. end;
  47614. procedure TINT_IFS1.setSPI2RXIF(thebits : TBits_1); inline;
  47615. begin
  47616. if thebits = 0 then
  47617. pTDefRegMap(@Self)^.clr := $00000040
  47618. else
  47619. pTDefRegMap(@Self)^.&set := $00000040;
  47620. end;
  47621. function TINT_IFS1.getSPI2RXIF : TBits_1; inline;
  47622. begin
  47623. getSPI2RXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47624. end;
  47625. procedure TINT_IFS1.setSPI2TXIF; inline;
  47626. begin
  47627. pTDefRegMap(@Self)^.&set := $00000080;
  47628. end;
  47629. procedure TINT_IFS1.clearSPI2TXIF; inline;
  47630. begin
  47631. pTDefRegMap(@Self)^.clr := $00000080;
  47632. end;
  47633. procedure TINT_IFS1.setSPI2TXIF(thebits : TBits_1); inline;
  47634. begin
  47635. if thebits = 0 then
  47636. pTDefRegMap(@Self)^.clr := $00000080
  47637. else
  47638. pTDefRegMap(@Self)^.&set := $00000080;
  47639. end;
  47640. function TINT_IFS1.getSPI2TXIF : TBits_1; inline;
  47641. begin
  47642. getSPI2TXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47643. end;
  47644. procedure TINT_IFS1.setSPI4EIF; inline;
  47645. begin
  47646. pTDefRegMap(@Self)^.&set := $00000100;
  47647. end;
  47648. procedure TINT_IFS1.clearSPI4EIF; inline;
  47649. begin
  47650. pTDefRegMap(@Self)^.clr := $00000100;
  47651. end;
  47652. procedure TINT_IFS1.setSPI4EIF(thebits : TBits_1); inline;
  47653. begin
  47654. if thebits = 0 then
  47655. pTDefRegMap(@Self)^.clr := $00000100
  47656. else
  47657. pTDefRegMap(@Self)^.&set := $00000100;
  47658. end;
  47659. function TINT_IFS1.getSPI4EIF : TBits_1; inline;
  47660. begin
  47661. getSPI4EIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47662. end;
  47663. procedure TINT_IFS1.setSPI4RXIF; inline;
  47664. begin
  47665. pTDefRegMap(@Self)^.&set := $00000200;
  47666. end;
  47667. procedure TINT_IFS1.clearSPI4RXIF; inline;
  47668. begin
  47669. pTDefRegMap(@Self)^.clr := $00000200;
  47670. end;
  47671. procedure TINT_IFS1.setSPI4RXIF(thebits : TBits_1); inline;
  47672. begin
  47673. if thebits = 0 then
  47674. pTDefRegMap(@Self)^.clr := $00000200
  47675. else
  47676. pTDefRegMap(@Self)^.&set := $00000200;
  47677. end;
  47678. function TINT_IFS1.getSPI4RXIF : TBits_1; inline;
  47679. begin
  47680. getSPI4RXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47681. end;
  47682. procedure TINT_IFS1.setSPI4TXIF; inline;
  47683. begin
  47684. pTDefRegMap(@Self)^.&set := $00000400;
  47685. end;
  47686. procedure TINT_IFS1.clearSPI4TXIF; inline;
  47687. begin
  47688. pTDefRegMap(@Self)^.clr := $00000400;
  47689. end;
  47690. procedure TINT_IFS1.setSPI4TXIF(thebits : TBits_1); inline;
  47691. begin
  47692. if thebits = 0 then
  47693. pTDefRegMap(@Self)^.clr := $00000400
  47694. else
  47695. pTDefRegMap(@Self)^.&set := $00000400;
  47696. end;
  47697. function TINT_IFS1.getSPI4TXIF : TBits_1; inline;
  47698. begin
  47699. getSPI4TXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  47700. end;
  47701. procedure TINT_IFS1.setSPI2AEIF; inline;
  47702. begin
  47703. pTDefRegMap(@Self)^.&set := $00000020;
  47704. end;
  47705. procedure TINT_IFS1.clearSPI2AEIF; inline;
  47706. begin
  47707. pTDefRegMap(@Self)^.clr := $00000020;
  47708. end;
  47709. procedure TINT_IFS1.setSPI2AEIF(thebits : TBits_1); inline;
  47710. begin
  47711. if thebits = 0 then
  47712. pTDefRegMap(@Self)^.clr := $00000020
  47713. else
  47714. pTDefRegMap(@Self)^.&set := $00000020;
  47715. end;
  47716. function TINT_IFS1.getSPI2AEIF : TBits_1; inline;
  47717. begin
  47718. getSPI2AEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47719. end;
  47720. procedure TINT_IFS1.setSPI2ARXIF; inline;
  47721. begin
  47722. pTDefRegMap(@Self)^.&set := $00000040;
  47723. end;
  47724. procedure TINT_IFS1.clearSPI2ARXIF; inline;
  47725. begin
  47726. pTDefRegMap(@Self)^.clr := $00000040;
  47727. end;
  47728. procedure TINT_IFS1.setSPI2ARXIF(thebits : TBits_1); inline;
  47729. begin
  47730. if thebits = 0 then
  47731. pTDefRegMap(@Self)^.clr := $00000040
  47732. else
  47733. pTDefRegMap(@Self)^.&set := $00000040;
  47734. end;
  47735. function TINT_IFS1.getSPI2ARXIF : TBits_1; inline;
  47736. begin
  47737. getSPI2ARXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47738. end;
  47739. procedure TINT_IFS1.setSPI2ATXIF; inline;
  47740. begin
  47741. pTDefRegMap(@Self)^.&set := $00000080;
  47742. end;
  47743. procedure TINT_IFS1.clearSPI2ATXIF; inline;
  47744. begin
  47745. pTDefRegMap(@Self)^.clr := $00000080;
  47746. end;
  47747. procedure TINT_IFS1.setSPI2ATXIF(thebits : TBits_1); inline;
  47748. begin
  47749. if thebits = 0 then
  47750. pTDefRegMap(@Self)^.clr := $00000080
  47751. else
  47752. pTDefRegMap(@Self)^.&set := $00000080;
  47753. end;
  47754. function TINT_IFS1.getSPI2ATXIF : TBits_1; inline;
  47755. begin
  47756. getSPI2ATXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47757. end;
  47758. procedure TINT_IFS1.setSPI3AEIF; inline;
  47759. begin
  47760. pTDefRegMap(@Self)^.&set := $00000100;
  47761. end;
  47762. procedure TINT_IFS1.clearSPI3AEIF; inline;
  47763. begin
  47764. pTDefRegMap(@Self)^.clr := $00000100;
  47765. end;
  47766. procedure TINT_IFS1.setSPI3AEIF(thebits : TBits_1); inline;
  47767. begin
  47768. if thebits = 0 then
  47769. pTDefRegMap(@Self)^.clr := $00000100
  47770. else
  47771. pTDefRegMap(@Self)^.&set := $00000100;
  47772. end;
  47773. function TINT_IFS1.getSPI3AEIF : TBits_1; inline;
  47774. begin
  47775. getSPI3AEIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47776. end;
  47777. procedure TINT_IFS1.setSPI3ARXIF; inline;
  47778. begin
  47779. pTDefRegMap(@Self)^.&set := $00000200;
  47780. end;
  47781. procedure TINT_IFS1.clearSPI3ARXIF; inline;
  47782. begin
  47783. pTDefRegMap(@Self)^.clr := $00000200;
  47784. end;
  47785. procedure TINT_IFS1.setSPI3ARXIF(thebits : TBits_1); inline;
  47786. begin
  47787. if thebits = 0 then
  47788. pTDefRegMap(@Self)^.clr := $00000200
  47789. else
  47790. pTDefRegMap(@Self)^.&set := $00000200;
  47791. end;
  47792. function TINT_IFS1.getSPI3ARXIF : TBits_1; inline;
  47793. begin
  47794. getSPI3ARXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47795. end;
  47796. procedure TINT_IFS1.setSPI3ATXIF; inline;
  47797. begin
  47798. pTDefRegMap(@Self)^.&set := $00000400;
  47799. end;
  47800. procedure TINT_IFS1.clearSPI3ATXIF; inline;
  47801. begin
  47802. pTDefRegMap(@Self)^.clr := $00000400;
  47803. end;
  47804. procedure TINT_IFS1.setSPI3ATXIF(thebits : TBits_1); inline;
  47805. begin
  47806. if thebits = 0 then
  47807. pTDefRegMap(@Self)^.clr := $00000400
  47808. else
  47809. pTDefRegMap(@Self)^.&set := $00000400;
  47810. end;
  47811. function TINT_IFS1.getSPI3ATXIF : TBits_1; inline;
  47812. begin
  47813. getSPI3ATXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  47814. end;
  47815. procedure TINT_IFS1.setI2C4BIF; inline;
  47816. begin
  47817. pTDefRegMap(@Self)^.&set := $00000020;
  47818. end;
  47819. procedure TINT_IFS1.clearI2C4BIF; inline;
  47820. begin
  47821. pTDefRegMap(@Self)^.clr := $00000020;
  47822. end;
  47823. procedure TINT_IFS1.setI2C4BIF(thebits : TBits_1); inline;
  47824. begin
  47825. if thebits = 0 then
  47826. pTDefRegMap(@Self)^.clr := $00000020
  47827. else
  47828. pTDefRegMap(@Self)^.&set := $00000020;
  47829. end;
  47830. function TINT_IFS1.getI2C4BIF : TBits_1; inline;
  47831. begin
  47832. getI2C4BIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47833. end;
  47834. procedure TINT_IFS1.setI2C4SIF; inline;
  47835. begin
  47836. pTDefRegMap(@Self)^.&set := $00000040;
  47837. end;
  47838. procedure TINT_IFS1.clearI2C4SIF; inline;
  47839. begin
  47840. pTDefRegMap(@Self)^.clr := $00000040;
  47841. end;
  47842. procedure TINT_IFS1.setI2C4SIF(thebits : TBits_1); inline;
  47843. begin
  47844. if thebits = 0 then
  47845. pTDefRegMap(@Self)^.clr := $00000040
  47846. else
  47847. pTDefRegMap(@Self)^.&set := $00000040;
  47848. end;
  47849. function TINT_IFS1.getI2C4SIF : TBits_1; inline;
  47850. begin
  47851. getI2C4SIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47852. end;
  47853. procedure TINT_IFS1.setI2C4MIF; inline;
  47854. begin
  47855. pTDefRegMap(@Self)^.&set := $00000080;
  47856. end;
  47857. procedure TINT_IFS1.clearI2C4MIF; inline;
  47858. begin
  47859. pTDefRegMap(@Self)^.clr := $00000080;
  47860. end;
  47861. procedure TINT_IFS1.setI2C4MIF(thebits : TBits_1); inline;
  47862. begin
  47863. if thebits = 0 then
  47864. pTDefRegMap(@Self)^.clr := $00000080
  47865. else
  47866. pTDefRegMap(@Self)^.&set := $00000080;
  47867. end;
  47868. function TINT_IFS1.getI2C4MIF : TBits_1; inline;
  47869. begin
  47870. getI2C4MIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47871. end;
  47872. procedure TINT_IFS1.setI2C5BIF; inline;
  47873. begin
  47874. pTDefRegMap(@Self)^.&set := $00000100;
  47875. end;
  47876. procedure TINT_IFS1.clearI2C5BIF; inline;
  47877. begin
  47878. pTDefRegMap(@Self)^.clr := $00000100;
  47879. end;
  47880. procedure TINT_IFS1.setI2C5BIF(thebits : TBits_1); inline;
  47881. begin
  47882. if thebits = 0 then
  47883. pTDefRegMap(@Self)^.clr := $00000100
  47884. else
  47885. pTDefRegMap(@Self)^.&set := $00000100;
  47886. end;
  47887. function TINT_IFS1.getI2C5BIF : TBits_1; inline;
  47888. begin
  47889. getI2C5BIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47890. end;
  47891. procedure TINT_IFS1.setI2C5SIF; inline;
  47892. begin
  47893. pTDefRegMap(@Self)^.&set := $00000200;
  47894. end;
  47895. procedure TINT_IFS1.clearI2C5SIF; inline;
  47896. begin
  47897. pTDefRegMap(@Self)^.clr := $00000200;
  47898. end;
  47899. procedure TINT_IFS1.setI2C5SIF(thebits : TBits_1); inline;
  47900. begin
  47901. if thebits = 0 then
  47902. pTDefRegMap(@Self)^.clr := $00000200
  47903. else
  47904. pTDefRegMap(@Self)^.&set := $00000200;
  47905. end;
  47906. function TINT_IFS1.getI2C5SIF : TBits_1; inline;
  47907. begin
  47908. getI2C5SIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47909. end;
  47910. procedure TINT_IFS1.setI2C5MIF; inline;
  47911. begin
  47912. pTDefRegMap(@Self)^.&set := $00000400;
  47913. end;
  47914. procedure TINT_IFS1.clearI2C5MIF; inline;
  47915. begin
  47916. pTDefRegMap(@Self)^.clr := $00000400;
  47917. end;
  47918. procedure TINT_IFS1.setI2C5MIF(thebits : TBits_1); inline;
  47919. begin
  47920. if thebits = 0 then
  47921. pTDefRegMap(@Self)^.clr := $00000400
  47922. else
  47923. pTDefRegMap(@Self)^.&set := $00000400;
  47924. end;
  47925. function TINT_IFS1.getI2C5MIF : TBits_1; inline;
  47926. begin
  47927. getI2C5MIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  47928. end;
  47929. procedure TINT_IFS1.setI2C2ABIF; inline;
  47930. begin
  47931. pTDefRegMap(@Self)^.&set := $00000020;
  47932. end;
  47933. procedure TINT_IFS1.clearI2C2ABIF; inline;
  47934. begin
  47935. pTDefRegMap(@Self)^.clr := $00000020;
  47936. end;
  47937. procedure TINT_IFS1.setI2C2ABIF(thebits : TBits_1); inline;
  47938. begin
  47939. if thebits = 0 then
  47940. pTDefRegMap(@Self)^.clr := $00000020
  47941. else
  47942. pTDefRegMap(@Self)^.&set := $00000020;
  47943. end;
  47944. function TINT_IFS1.getI2C2ABIF : TBits_1; inline;
  47945. begin
  47946. getI2C2ABIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47947. end;
  47948. procedure TINT_IFS1.setI2C2ASIF; inline;
  47949. begin
  47950. pTDefRegMap(@Self)^.&set := $00000040;
  47951. end;
  47952. procedure TINT_IFS1.clearI2C2ASIF; inline;
  47953. begin
  47954. pTDefRegMap(@Self)^.clr := $00000040;
  47955. end;
  47956. procedure TINT_IFS1.setI2C2ASIF(thebits : TBits_1); inline;
  47957. begin
  47958. if thebits = 0 then
  47959. pTDefRegMap(@Self)^.clr := $00000040
  47960. else
  47961. pTDefRegMap(@Self)^.&set := $00000040;
  47962. end;
  47963. function TINT_IFS1.getI2C2ASIF : TBits_1; inline;
  47964. begin
  47965. getI2C2ASIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47966. end;
  47967. procedure TINT_IFS1.setI2C2AMIF; inline;
  47968. begin
  47969. pTDefRegMap(@Self)^.&set := $00000080;
  47970. end;
  47971. procedure TINT_IFS1.clearI2C2AMIF; inline;
  47972. begin
  47973. pTDefRegMap(@Self)^.clr := $00000080;
  47974. end;
  47975. procedure TINT_IFS1.setI2C2AMIF(thebits : TBits_1); inline;
  47976. begin
  47977. if thebits = 0 then
  47978. pTDefRegMap(@Self)^.clr := $00000080
  47979. else
  47980. pTDefRegMap(@Self)^.&set := $00000080;
  47981. end;
  47982. function TINT_IFS1.getI2C2AMIF : TBits_1; inline;
  47983. begin
  47984. getI2C2AMIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47985. end;
  47986. procedure TINT_IFS1.setI2C3ABIF; inline;
  47987. begin
  47988. pTDefRegMap(@Self)^.&set := $00000100;
  47989. end;
  47990. procedure TINT_IFS1.clearI2C3ABIF; inline;
  47991. begin
  47992. pTDefRegMap(@Self)^.clr := $00000100;
  47993. end;
  47994. procedure TINT_IFS1.setI2C3ABIF(thebits : TBits_1); inline;
  47995. begin
  47996. if thebits = 0 then
  47997. pTDefRegMap(@Self)^.clr := $00000100
  47998. else
  47999. pTDefRegMap(@Self)^.&set := $00000100;
  48000. end;
  48001. function TINT_IFS1.getI2C3ABIF : TBits_1; inline;
  48002. begin
  48003. getI2C3ABIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48004. end;
  48005. procedure TINT_IFS1.setI2C3ASIF; inline;
  48006. begin
  48007. pTDefRegMap(@Self)^.&set := $00000200;
  48008. end;
  48009. procedure TINT_IFS1.clearI2C3ASIF; inline;
  48010. begin
  48011. pTDefRegMap(@Self)^.clr := $00000200;
  48012. end;
  48013. procedure TINT_IFS1.setI2C3ASIF(thebits : TBits_1); inline;
  48014. begin
  48015. if thebits = 0 then
  48016. pTDefRegMap(@Self)^.clr := $00000200
  48017. else
  48018. pTDefRegMap(@Self)^.&set := $00000200;
  48019. end;
  48020. function TINT_IFS1.getI2C3ASIF : TBits_1; inline;
  48021. begin
  48022. getI2C3ASIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48023. end;
  48024. procedure TINT_IFS1.setI2C3AMIF; inline;
  48025. begin
  48026. pTDefRegMap(@Self)^.&set := $00000400;
  48027. end;
  48028. procedure TINT_IFS1.clearI2C3AMIF; inline;
  48029. begin
  48030. pTDefRegMap(@Self)^.clr := $00000400;
  48031. end;
  48032. procedure TINT_IFS1.setI2C3AMIF(thebits : TBits_1); inline;
  48033. begin
  48034. if thebits = 0 then
  48035. pTDefRegMap(@Self)^.clr := $00000400
  48036. else
  48037. pTDefRegMap(@Self)^.&set := $00000400;
  48038. end;
  48039. function TINT_IFS1.getI2C3AMIF : TBits_1; inline;
  48040. begin
  48041. getI2C3AMIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48042. end;
  48043. procedure TINT_IFS1.setw(thebits : TBits_32); inline;
  48044. begin
  48045. pTDefRegMap(@Self)^.val := thebits;
  48046. end;
  48047. function TINT_IFS1.getw : TBits_32; inline;
  48048. begin
  48049. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  48050. end;
  48051. procedure TINT_IFS2.setIC4EIF; inline;
  48052. begin
  48053. pTDefRegMap(@Self)^.&set := $00000001;
  48054. end;
  48055. procedure TINT_IFS2.clearIC4EIF; inline;
  48056. begin
  48057. pTDefRegMap(@Self)^.clr := $00000001;
  48058. end;
  48059. procedure TINT_IFS2.setIC4EIF(thebits : TBits_1); inline;
  48060. begin
  48061. if thebits = 0 then
  48062. pTDefRegMap(@Self)^.clr := $00000001
  48063. else
  48064. pTDefRegMap(@Self)^.&set := $00000001;
  48065. end;
  48066. function TINT_IFS2.getIC4EIF : TBits_1; inline;
  48067. begin
  48068. getIC4EIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  48069. end;
  48070. procedure TINT_IFS2.setIC5EIF; inline;
  48071. begin
  48072. pTDefRegMap(@Self)^.&set := $00000002;
  48073. end;
  48074. procedure TINT_IFS2.clearIC5EIF; inline;
  48075. begin
  48076. pTDefRegMap(@Self)^.clr := $00000002;
  48077. end;
  48078. procedure TINT_IFS2.setIC5EIF(thebits : TBits_1); inline;
  48079. begin
  48080. if thebits = 0 then
  48081. pTDefRegMap(@Self)^.clr := $00000002
  48082. else
  48083. pTDefRegMap(@Self)^.&set := $00000002;
  48084. end;
  48085. function TINT_IFS2.getIC5EIF : TBits_1; inline;
  48086. begin
  48087. getIC5EIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  48088. end;
  48089. procedure TINT_IFS2.setPMPEIF; inline;
  48090. begin
  48091. pTDefRegMap(@Self)^.&set := $00000004;
  48092. end;
  48093. procedure TINT_IFS2.clearPMPEIF; inline;
  48094. begin
  48095. pTDefRegMap(@Self)^.clr := $00000004;
  48096. end;
  48097. procedure TINT_IFS2.setPMPEIF(thebits : TBits_1); inline;
  48098. begin
  48099. if thebits = 0 then
  48100. pTDefRegMap(@Self)^.clr := $00000004
  48101. else
  48102. pTDefRegMap(@Self)^.&set := $00000004;
  48103. end;
  48104. function TINT_IFS2.getPMPEIF : TBits_1; inline;
  48105. begin
  48106. getPMPEIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  48107. end;
  48108. procedure TINT_IFS2.setU1BEIF; inline;
  48109. begin
  48110. pTDefRegMap(@Self)^.&set := $00000008;
  48111. end;
  48112. procedure TINT_IFS2.clearU1BEIF; inline;
  48113. begin
  48114. pTDefRegMap(@Self)^.clr := $00000008;
  48115. end;
  48116. procedure TINT_IFS2.setU1BEIF(thebits : TBits_1); inline;
  48117. begin
  48118. if thebits = 0 then
  48119. pTDefRegMap(@Self)^.clr := $00000008
  48120. else
  48121. pTDefRegMap(@Self)^.&set := $00000008;
  48122. end;
  48123. function TINT_IFS2.getU1BEIF : TBits_1; inline;
  48124. begin
  48125. getU1BEIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48126. end;
  48127. procedure TINT_IFS2.setU1BRXIF; inline;
  48128. begin
  48129. pTDefRegMap(@Self)^.&set := $00000010;
  48130. end;
  48131. procedure TINT_IFS2.clearU1BRXIF; inline;
  48132. begin
  48133. pTDefRegMap(@Self)^.clr := $00000010;
  48134. end;
  48135. procedure TINT_IFS2.setU1BRXIF(thebits : TBits_1); inline;
  48136. begin
  48137. if thebits = 0 then
  48138. pTDefRegMap(@Self)^.clr := $00000010
  48139. else
  48140. pTDefRegMap(@Self)^.&set := $00000010;
  48141. end;
  48142. function TINT_IFS2.getU1BRXIF : TBits_1; inline;
  48143. begin
  48144. getU1BRXIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48145. end;
  48146. procedure TINT_IFS2.setU1BTXIF; inline;
  48147. begin
  48148. pTDefRegMap(@Self)^.&set := $00000020;
  48149. end;
  48150. procedure TINT_IFS2.clearU1BTXIF; inline;
  48151. begin
  48152. pTDefRegMap(@Self)^.clr := $00000020;
  48153. end;
  48154. procedure TINT_IFS2.setU1BTXIF(thebits : TBits_1); inline;
  48155. begin
  48156. if thebits = 0 then
  48157. pTDefRegMap(@Self)^.clr := $00000020
  48158. else
  48159. pTDefRegMap(@Self)^.&set := $00000020;
  48160. end;
  48161. function TINT_IFS2.getU1BTXIF : TBits_1; inline;
  48162. begin
  48163. getU1BTXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48164. end;
  48165. procedure TINT_IFS2.setU2BEIF; inline;
  48166. begin
  48167. pTDefRegMap(@Self)^.&set := $00000040;
  48168. end;
  48169. procedure TINT_IFS2.clearU2BEIF; inline;
  48170. begin
  48171. pTDefRegMap(@Self)^.clr := $00000040;
  48172. end;
  48173. procedure TINT_IFS2.setU2BEIF(thebits : TBits_1); inline;
  48174. begin
  48175. if thebits = 0 then
  48176. pTDefRegMap(@Self)^.clr := $00000040
  48177. else
  48178. pTDefRegMap(@Self)^.&set := $00000040;
  48179. end;
  48180. function TINT_IFS2.getU2BEIF : TBits_1; inline;
  48181. begin
  48182. getU2BEIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48183. end;
  48184. procedure TINT_IFS2.setU2BRXIF; inline;
  48185. begin
  48186. pTDefRegMap(@Self)^.&set := $00000080;
  48187. end;
  48188. procedure TINT_IFS2.clearU2BRXIF; inline;
  48189. begin
  48190. pTDefRegMap(@Self)^.clr := $00000080;
  48191. end;
  48192. procedure TINT_IFS2.setU2BRXIF(thebits : TBits_1); inline;
  48193. begin
  48194. if thebits = 0 then
  48195. pTDefRegMap(@Self)^.clr := $00000080
  48196. else
  48197. pTDefRegMap(@Self)^.&set := $00000080;
  48198. end;
  48199. function TINT_IFS2.getU2BRXIF : TBits_1; inline;
  48200. begin
  48201. getU2BRXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48202. end;
  48203. procedure TINT_IFS2.setU2BTXIF; inline;
  48204. begin
  48205. pTDefRegMap(@Self)^.&set := $00000100;
  48206. end;
  48207. procedure TINT_IFS2.clearU2BTXIF; inline;
  48208. begin
  48209. pTDefRegMap(@Self)^.clr := $00000100;
  48210. end;
  48211. procedure TINT_IFS2.setU2BTXIF(thebits : TBits_1); inline;
  48212. begin
  48213. if thebits = 0 then
  48214. pTDefRegMap(@Self)^.clr := $00000100
  48215. else
  48216. pTDefRegMap(@Self)^.&set := $00000100;
  48217. end;
  48218. function TINT_IFS2.getU2BTXIF : TBits_1; inline;
  48219. begin
  48220. getU2BTXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48221. end;
  48222. procedure TINT_IFS2.setU3BEIF; inline;
  48223. begin
  48224. pTDefRegMap(@Self)^.&set := $00000200;
  48225. end;
  48226. procedure TINT_IFS2.clearU3BEIF; inline;
  48227. begin
  48228. pTDefRegMap(@Self)^.clr := $00000200;
  48229. end;
  48230. procedure TINT_IFS2.setU3BEIF(thebits : TBits_1); inline;
  48231. begin
  48232. if thebits = 0 then
  48233. pTDefRegMap(@Self)^.clr := $00000200
  48234. else
  48235. pTDefRegMap(@Self)^.&set := $00000200;
  48236. end;
  48237. function TINT_IFS2.getU3BEIF : TBits_1; inline;
  48238. begin
  48239. getU3BEIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48240. end;
  48241. procedure TINT_IFS2.setU3BRXIF; inline;
  48242. begin
  48243. pTDefRegMap(@Self)^.&set := $00000400;
  48244. end;
  48245. procedure TINT_IFS2.clearU3BRXIF; inline;
  48246. begin
  48247. pTDefRegMap(@Self)^.clr := $00000400;
  48248. end;
  48249. procedure TINT_IFS2.setU3BRXIF(thebits : TBits_1); inline;
  48250. begin
  48251. if thebits = 0 then
  48252. pTDefRegMap(@Self)^.clr := $00000400
  48253. else
  48254. pTDefRegMap(@Self)^.&set := $00000400;
  48255. end;
  48256. function TINT_IFS2.getU3BRXIF : TBits_1; inline;
  48257. begin
  48258. getU3BRXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48259. end;
  48260. procedure TINT_IFS2.setU3BTXIF; inline;
  48261. begin
  48262. pTDefRegMap(@Self)^.&set := $00000800;
  48263. end;
  48264. procedure TINT_IFS2.clearU3BTXIF; inline;
  48265. begin
  48266. pTDefRegMap(@Self)^.clr := $00000800;
  48267. end;
  48268. procedure TINT_IFS2.setU3BTXIF(thebits : TBits_1); inline;
  48269. begin
  48270. if thebits = 0 then
  48271. pTDefRegMap(@Self)^.clr := $00000800
  48272. else
  48273. pTDefRegMap(@Self)^.&set := $00000800;
  48274. end;
  48275. function TINT_IFS2.getU3BTXIF : TBits_1; inline;
  48276. begin
  48277. getU3BTXIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  48278. end;
  48279. procedure TINT_IFS2.setU4EIF; inline;
  48280. begin
  48281. pTDefRegMap(@Self)^.&set := $00000008;
  48282. end;
  48283. procedure TINT_IFS2.clearU4EIF; inline;
  48284. begin
  48285. pTDefRegMap(@Self)^.clr := $00000008;
  48286. end;
  48287. procedure TINT_IFS2.setU4EIF(thebits : TBits_1); inline;
  48288. begin
  48289. if thebits = 0 then
  48290. pTDefRegMap(@Self)^.clr := $00000008
  48291. else
  48292. pTDefRegMap(@Self)^.&set := $00000008;
  48293. end;
  48294. function TINT_IFS2.getU4EIF : TBits_1; inline;
  48295. begin
  48296. getU4EIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48297. end;
  48298. procedure TINT_IFS2.setU4RXIF; inline;
  48299. begin
  48300. pTDefRegMap(@Self)^.&set := $00000010;
  48301. end;
  48302. procedure TINT_IFS2.clearU4RXIF; inline;
  48303. begin
  48304. pTDefRegMap(@Self)^.clr := $00000010;
  48305. end;
  48306. procedure TINT_IFS2.setU4RXIF(thebits : TBits_1); inline;
  48307. begin
  48308. if thebits = 0 then
  48309. pTDefRegMap(@Self)^.clr := $00000010
  48310. else
  48311. pTDefRegMap(@Self)^.&set := $00000010;
  48312. end;
  48313. function TINT_IFS2.getU4RXIF : TBits_1; inline;
  48314. begin
  48315. getU4RXIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48316. end;
  48317. procedure TINT_IFS2.setU4TXIF; inline;
  48318. begin
  48319. pTDefRegMap(@Self)^.&set := $00000020;
  48320. end;
  48321. procedure TINT_IFS2.clearU4TXIF; inline;
  48322. begin
  48323. pTDefRegMap(@Self)^.clr := $00000020;
  48324. end;
  48325. procedure TINT_IFS2.setU4TXIF(thebits : TBits_1); inline;
  48326. begin
  48327. if thebits = 0 then
  48328. pTDefRegMap(@Self)^.clr := $00000020
  48329. else
  48330. pTDefRegMap(@Self)^.&set := $00000020;
  48331. end;
  48332. function TINT_IFS2.getU4TXIF : TBits_1; inline;
  48333. begin
  48334. getU4TXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48335. end;
  48336. procedure TINT_IFS2.setU6EIF; inline;
  48337. begin
  48338. pTDefRegMap(@Self)^.&set := $00000040;
  48339. end;
  48340. procedure TINT_IFS2.clearU6EIF; inline;
  48341. begin
  48342. pTDefRegMap(@Self)^.clr := $00000040;
  48343. end;
  48344. procedure TINT_IFS2.setU6EIF(thebits : TBits_1); inline;
  48345. begin
  48346. if thebits = 0 then
  48347. pTDefRegMap(@Self)^.clr := $00000040
  48348. else
  48349. pTDefRegMap(@Self)^.&set := $00000040;
  48350. end;
  48351. function TINT_IFS2.getU6EIF : TBits_1; inline;
  48352. begin
  48353. getU6EIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48354. end;
  48355. procedure TINT_IFS2.setU6RXIF; inline;
  48356. begin
  48357. pTDefRegMap(@Self)^.&set := $00000080;
  48358. end;
  48359. procedure TINT_IFS2.clearU6RXIF; inline;
  48360. begin
  48361. pTDefRegMap(@Self)^.clr := $00000080;
  48362. end;
  48363. procedure TINT_IFS2.setU6RXIF(thebits : TBits_1); inline;
  48364. begin
  48365. if thebits = 0 then
  48366. pTDefRegMap(@Self)^.clr := $00000080
  48367. else
  48368. pTDefRegMap(@Self)^.&set := $00000080;
  48369. end;
  48370. function TINT_IFS2.getU6RXIF : TBits_1; inline;
  48371. begin
  48372. getU6RXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48373. end;
  48374. procedure TINT_IFS2.setU6TXIF; inline;
  48375. begin
  48376. pTDefRegMap(@Self)^.&set := $00000100;
  48377. end;
  48378. procedure TINT_IFS2.clearU6TXIF; inline;
  48379. begin
  48380. pTDefRegMap(@Self)^.clr := $00000100;
  48381. end;
  48382. procedure TINT_IFS2.setU6TXIF(thebits : TBits_1); inline;
  48383. begin
  48384. if thebits = 0 then
  48385. pTDefRegMap(@Self)^.clr := $00000100
  48386. else
  48387. pTDefRegMap(@Self)^.&set := $00000100;
  48388. end;
  48389. function TINT_IFS2.getU6TXIF : TBits_1; inline;
  48390. begin
  48391. getU6TXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48392. end;
  48393. procedure TINT_IFS2.setU5EIF; inline;
  48394. begin
  48395. pTDefRegMap(@Self)^.&set := $00000200;
  48396. end;
  48397. procedure TINT_IFS2.clearU5EIF; inline;
  48398. begin
  48399. pTDefRegMap(@Self)^.clr := $00000200;
  48400. end;
  48401. procedure TINT_IFS2.setU5EIF(thebits : TBits_1); inline;
  48402. begin
  48403. if thebits = 0 then
  48404. pTDefRegMap(@Self)^.clr := $00000200
  48405. else
  48406. pTDefRegMap(@Self)^.&set := $00000200;
  48407. end;
  48408. function TINT_IFS2.getU5EIF : TBits_1; inline;
  48409. begin
  48410. getU5EIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48411. end;
  48412. procedure TINT_IFS2.setU5RXIF; inline;
  48413. begin
  48414. pTDefRegMap(@Self)^.&set := $00000400;
  48415. end;
  48416. procedure TINT_IFS2.clearU5RXIF; inline;
  48417. begin
  48418. pTDefRegMap(@Self)^.clr := $00000400;
  48419. end;
  48420. procedure TINT_IFS2.setU5RXIF(thebits : TBits_1); inline;
  48421. begin
  48422. if thebits = 0 then
  48423. pTDefRegMap(@Self)^.clr := $00000400
  48424. else
  48425. pTDefRegMap(@Self)^.&set := $00000400;
  48426. end;
  48427. function TINT_IFS2.getU5RXIF : TBits_1; inline;
  48428. begin
  48429. getU5RXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48430. end;
  48431. procedure TINT_IFS2.setU5TXIF; inline;
  48432. begin
  48433. pTDefRegMap(@Self)^.&set := $00000800;
  48434. end;
  48435. procedure TINT_IFS2.clearU5TXIF; inline;
  48436. begin
  48437. pTDefRegMap(@Self)^.clr := $00000800;
  48438. end;
  48439. procedure TINT_IFS2.setU5TXIF(thebits : TBits_1); inline;
  48440. begin
  48441. if thebits = 0 then
  48442. pTDefRegMap(@Self)^.clr := $00000800
  48443. else
  48444. pTDefRegMap(@Self)^.&set := $00000800;
  48445. end;
  48446. function TINT_IFS2.getU5TXIF : TBits_1; inline;
  48447. begin
  48448. getU5TXIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  48449. end;
  48450. procedure TINT_IFS2.setw(thebits : TBits_32); inline;
  48451. begin
  48452. pTDefRegMap(@Self)^.val := thebits;
  48453. end;
  48454. function TINT_IFS2.getw : TBits_32; inline;
  48455. begin
  48456. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  48457. end;
  48458. procedure TINT_IEC0.setCTIE; inline;
  48459. begin
  48460. pTDefRegMap(@Self)^.&set := $00000001;
  48461. end;
  48462. procedure TINT_IEC0.clearCTIE; inline;
  48463. begin
  48464. pTDefRegMap(@Self)^.clr := $00000001;
  48465. end;
  48466. procedure TINT_IEC0.setCTIE(thebits : TBits_1); inline;
  48467. begin
  48468. if thebits = 0 then
  48469. pTDefRegMap(@Self)^.clr := $00000001
  48470. else
  48471. pTDefRegMap(@Self)^.&set := $00000001;
  48472. end;
  48473. function TINT_IEC0.getCTIE : TBits_1; inline;
  48474. begin
  48475. getCTIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  48476. end;
  48477. procedure TINT_IEC0.setCS0IE; inline;
  48478. begin
  48479. pTDefRegMap(@Self)^.&set := $00000002;
  48480. end;
  48481. procedure TINT_IEC0.clearCS0IE; inline;
  48482. begin
  48483. pTDefRegMap(@Self)^.clr := $00000002;
  48484. end;
  48485. procedure TINT_IEC0.setCS0IE(thebits : TBits_1); inline;
  48486. begin
  48487. if thebits = 0 then
  48488. pTDefRegMap(@Self)^.clr := $00000002
  48489. else
  48490. pTDefRegMap(@Self)^.&set := $00000002;
  48491. end;
  48492. function TINT_IEC0.getCS0IE : TBits_1; inline;
  48493. begin
  48494. getCS0IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  48495. end;
  48496. procedure TINT_IEC0.setCS1IE; inline;
  48497. begin
  48498. pTDefRegMap(@Self)^.&set := $00000004;
  48499. end;
  48500. procedure TINT_IEC0.clearCS1IE; inline;
  48501. begin
  48502. pTDefRegMap(@Self)^.clr := $00000004;
  48503. end;
  48504. procedure TINT_IEC0.setCS1IE(thebits : TBits_1); inline;
  48505. begin
  48506. if thebits = 0 then
  48507. pTDefRegMap(@Self)^.clr := $00000004
  48508. else
  48509. pTDefRegMap(@Self)^.&set := $00000004;
  48510. end;
  48511. function TINT_IEC0.getCS1IE : TBits_1; inline;
  48512. begin
  48513. getCS1IE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  48514. end;
  48515. procedure TINT_IEC0.setINT0IE; inline;
  48516. begin
  48517. pTDefRegMap(@Self)^.&set := $00000008;
  48518. end;
  48519. procedure TINT_IEC0.clearINT0IE; inline;
  48520. begin
  48521. pTDefRegMap(@Self)^.clr := $00000008;
  48522. end;
  48523. procedure TINT_IEC0.setINT0IE(thebits : TBits_1); inline;
  48524. begin
  48525. if thebits = 0 then
  48526. pTDefRegMap(@Self)^.clr := $00000008
  48527. else
  48528. pTDefRegMap(@Self)^.&set := $00000008;
  48529. end;
  48530. function TINT_IEC0.getINT0IE : TBits_1; inline;
  48531. begin
  48532. getINT0IE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48533. end;
  48534. procedure TINT_IEC0.setT1IE; inline;
  48535. begin
  48536. pTDefRegMap(@Self)^.&set := $00000010;
  48537. end;
  48538. procedure TINT_IEC0.clearT1IE; inline;
  48539. begin
  48540. pTDefRegMap(@Self)^.clr := $00000010;
  48541. end;
  48542. procedure TINT_IEC0.setT1IE(thebits : TBits_1); inline;
  48543. begin
  48544. if thebits = 0 then
  48545. pTDefRegMap(@Self)^.clr := $00000010
  48546. else
  48547. pTDefRegMap(@Self)^.&set := $00000010;
  48548. end;
  48549. function TINT_IEC0.getT1IE : TBits_1; inline;
  48550. begin
  48551. getT1IE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48552. end;
  48553. procedure TINT_IEC0.setIC1IE; inline;
  48554. begin
  48555. pTDefRegMap(@Self)^.&set := $00000020;
  48556. end;
  48557. procedure TINT_IEC0.clearIC1IE; inline;
  48558. begin
  48559. pTDefRegMap(@Self)^.clr := $00000020;
  48560. end;
  48561. procedure TINT_IEC0.setIC1IE(thebits : TBits_1); inline;
  48562. begin
  48563. if thebits = 0 then
  48564. pTDefRegMap(@Self)^.clr := $00000020
  48565. else
  48566. pTDefRegMap(@Self)^.&set := $00000020;
  48567. end;
  48568. function TINT_IEC0.getIC1IE : TBits_1; inline;
  48569. begin
  48570. getIC1IE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48571. end;
  48572. procedure TINT_IEC0.setOC1IE; inline;
  48573. begin
  48574. pTDefRegMap(@Self)^.&set := $00000040;
  48575. end;
  48576. procedure TINT_IEC0.clearOC1IE; inline;
  48577. begin
  48578. pTDefRegMap(@Self)^.clr := $00000040;
  48579. end;
  48580. procedure TINT_IEC0.setOC1IE(thebits : TBits_1); inline;
  48581. begin
  48582. if thebits = 0 then
  48583. pTDefRegMap(@Self)^.clr := $00000040
  48584. else
  48585. pTDefRegMap(@Self)^.&set := $00000040;
  48586. end;
  48587. function TINT_IEC0.getOC1IE : TBits_1; inline;
  48588. begin
  48589. getOC1IE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48590. end;
  48591. procedure TINT_IEC0.setINT1IE; inline;
  48592. begin
  48593. pTDefRegMap(@Self)^.&set := $00000080;
  48594. end;
  48595. procedure TINT_IEC0.clearINT1IE; inline;
  48596. begin
  48597. pTDefRegMap(@Self)^.clr := $00000080;
  48598. end;
  48599. procedure TINT_IEC0.setINT1IE(thebits : TBits_1); inline;
  48600. begin
  48601. if thebits = 0 then
  48602. pTDefRegMap(@Self)^.clr := $00000080
  48603. else
  48604. pTDefRegMap(@Self)^.&set := $00000080;
  48605. end;
  48606. function TINT_IEC0.getINT1IE : TBits_1; inline;
  48607. begin
  48608. getINT1IE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48609. end;
  48610. procedure TINT_IEC0.setT2IE; inline;
  48611. begin
  48612. pTDefRegMap(@Self)^.&set := $00000100;
  48613. end;
  48614. procedure TINT_IEC0.clearT2IE; inline;
  48615. begin
  48616. pTDefRegMap(@Self)^.clr := $00000100;
  48617. end;
  48618. procedure TINT_IEC0.setT2IE(thebits : TBits_1); inline;
  48619. begin
  48620. if thebits = 0 then
  48621. pTDefRegMap(@Self)^.clr := $00000100
  48622. else
  48623. pTDefRegMap(@Self)^.&set := $00000100;
  48624. end;
  48625. function TINT_IEC0.getT2IE : TBits_1; inline;
  48626. begin
  48627. getT2IE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48628. end;
  48629. procedure TINT_IEC0.setIC2IE; inline;
  48630. begin
  48631. pTDefRegMap(@Self)^.&set := $00000200;
  48632. end;
  48633. procedure TINT_IEC0.clearIC2IE; inline;
  48634. begin
  48635. pTDefRegMap(@Self)^.clr := $00000200;
  48636. end;
  48637. procedure TINT_IEC0.setIC2IE(thebits : TBits_1); inline;
  48638. begin
  48639. if thebits = 0 then
  48640. pTDefRegMap(@Self)^.clr := $00000200
  48641. else
  48642. pTDefRegMap(@Self)^.&set := $00000200;
  48643. end;
  48644. function TINT_IEC0.getIC2IE : TBits_1; inline;
  48645. begin
  48646. getIC2IE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48647. end;
  48648. procedure TINT_IEC0.setOC2IE; inline;
  48649. begin
  48650. pTDefRegMap(@Self)^.&set := $00000400;
  48651. end;
  48652. procedure TINT_IEC0.clearOC2IE; inline;
  48653. begin
  48654. pTDefRegMap(@Self)^.clr := $00000400;
  48655. end;
  48656. procedure TINT_IEC0.setOC2IE(thebits : TBits_1); inline;
  48657. begin
  48658. if thebits = 0 then
  48659. pTDefRegMap(@Self)^.clr := $00000400
  48660. else
  48661. pTDefRegMap(@Self)^.&set := $00000400;
  48662. end;
  48663. function TINT_IEC0.getOC2IE : TBits_1; inline;
  48664. begin
  48665. getOC2IE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48666. end;
  48667. procedure TINT_IEC0.setINT2IE; inline;
  48668. begin
  48669. pTDefRegMap(@Self)^.&set := $00000800;
  48670. end;
  48671. procedure TINT_IEC0.clearINT2IE; inline;
  48672. begin
  48673. pTDefRegMap(@Self)^.clr := $00000800;
  48674. end;
  48675. procedure TINT_IEC0.setINT2IE(thebits : TBits_1); inline;
  48676. begin
  48677. if thebits = 0 then
  48678. pTDefRegMap(@Self)^.clr := $00000800
  48679. else
  48680. pTDefRegMap(@Self)^.&set := $00000800;
  48681. end;
  48682. function TINT_IEC0.getINT2IE : TBits_1; inline;
  48683. begin
  48684. getINT2IE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  48685. end;
  48686. procedure TINT_IEC0.setT3IE; inline;
  48687. begin
  48688. pTDefRegMap(@Self)^.&set := $00001000;
  48689. end;
  48690. procedure TINT_IEC0.clearT3IE; inline;
  48691. begin
  48692. pTDefRegMap(@Self)^.clr := $00001000;
  48693. end;
  48694. procedure TINT_IEC0.setT3IE(thebits : TBits_1); inline;
  48695. begin
  48696. if thebits = 0 then
  48697. pTDefRegMap(@Self)^.clr := $00001000
  48698. else
  48699. pTDefRegMap(@Self)^.&set := $00001000;
  48700. end;
  48701. function TINT_IEC0.getT3IE : TBits_1; inline;
  48702. begin
  48703. getT3IE := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  48704. end;
  48705. procedure TINT_IEC0.setIC3IE; inline;
  48706. begin
  48707. pTDefRegMap(@Self)^.&set := $00002000;
  48708. end;
  48709. procedure TINT_IEC0.clearIC3IE; inline;
  48710. begin
  48711. pTDefRegMap(@Self)^.clr := $00002000;
  48712. end;
  48713. procedure TINT_IEC0.setIC3IE(thebits : TBits_1); inline;
  48714. begin
  48715. if thebits = 0 then
  48716. pTDefRegMap(@Self)^.clr := $00002000
  48717. else
  48718. pTDefRegMap(@Self)^.&set := $00002000;
  48719. end;
  48720. function TINT_IEC0.getIC3IE : TBits_1; inline;
  48721. begin
  48722. getIC3IE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  48723. end;
  48724. procedure TINT_IEC0.setOC3IE; inline;
  48725. begin
  48726. pTDefRegMap(@Self)^.&set := $00004000;
  48727. end;
  48728. procedure TINT_IEC0.clearOC3IE; inline;
  48729. begin
  48730. pTDefRegMap(@Self)^.clr := $00004000;
  48731. end;
  48732. procedure TINT_IEC0.setOC3IE(thebits : TBits_1); inline;
  48733. begin
  48734. if thebits = 0 then
  48735. pTDefRegMap(@Self)^.clr := $00004000
  48736. else
  48737. pTDefRegMap(@Self)^.&set := $00004000;
  48738. end;
  48739. function TINT_IEC0.getOC3IE : TBits_1; inline;
  48740. begin
  48741. getOC3IE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  48742. end;
  48743. procedure TINT_IEC0.setINT3IE; inline;
  48744. begin
  48745. pTDefRegMap(@Self)^.&set := $00008000;
  48746. end;
  48747. procedure TINT_IEC0.clearINT3IE; inline;
  48748. begin
  48749. pTDefRegMap(@Self)^.clr := $00008000;
  48750. end;
  48751. procedure TINT_IEC0.setINT3IE(thebits : TBits_1); inline;
  48752. begin
  48753. if thebits = 0 then
  48754. pTDefRegMap(@Self)^.clr := $00008000
  48755. else
  48756. pTDefRegMap(@Self)^.&set := $00008000;
  48757. end;
  48758. function TINT_IEC0.getINT3IE : TBits_1; inline;
  48759. begin
  48760. getINT3IE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  48761. end;
  48762. procedure TINT_IEC0.setT4IE; inline;
  48763. begin
  48764. pTDefRegMap(@Self)^.&set := $00010000;
  48765. end;
  48766. procedure TINT_IEC0.clearT4IE; inline;
  48767. begin
  48768. pTDefRegMap(@Self)^.clr := $00010000;
  48769. end;
  48770. procedure TINT_IEC0.setT4IE(thebits : TBits_1); inline;
  48771. begin
  48772. if thebits = 0 then
  48773. pTDefRegMap(@Self)^.clr := $00010000
  48774. else
  48775. pTDefRegMap(@Self)^.&set := $00010000;
  48776. end;
  48777. function TINT_IEC0.getT4IE : TBits_1; inline;
  48778. begin
  48779. getT4IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  48780. end;
  48781. procedure TINT_IEC0.setIC4IE; inline;
  48782. begin
  48783. pTDefRegMap(@Self)^.&set := $00020000;
  48784. end;
  48785. procedure TINT_IEC0.clearIC4IE; inline;
  48786. begin
  48787. pTDefRegMap(@Self)^.clr := $00020000;
  48788. end;
  48789. procedure TINT_IEC0.setIC4IE(thebits : TBits_1); inline;
  48790. begin
  48791. if thebits = 0 then
  48792. pTDefRegMap(@Self)^.clr := $00020000
  48793. else
  48794. pTDefRegMap(@Self)^.&set := $00020000;
  48795. end;
  48796. function TINT_IEC0.getIC4IE : TBits_1; inline;
  48797. begin
  48798. getIC4IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  48799. end;
  48800. procedure TINT_IEC0.setOC4IE; inline;
  48801. begin
  48802. pTDefRegMap(@Self)^.&set := $00040000;
  48803. end;
  48804. procedure TINT_IEC0.clearOC4IE; inline;
  48805. begin
  48806. pTDefRegMap(@Self)^.clr := $00040000;
  48807. end;
  48808. procedure TINT_IEC0.setOC4IE(thebits : TBits_1); inline;
  48809. begin
  48810. if thebits = 0 then
  48811. pTDefRegMap(@Self)^.clr := $00040000
  48812. else
  48813. pTDefRegMap(@Self)^.&set := $00040000;
  48814. end;
  48815. function TINT_IEC0.getOC4IE : TBits_1; inline;
  48816. begin
  48817. getOC4IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  48818. end;
  48819. procedure TINT_IEC0.setINT4IE; inline;
  48820. begin
  48821. pTDefRegMap(@Self)^.&set := $00080000;
  48822. end;
  48823. procedure TINT_IEC0.clearINT4IE; inline;
  48824. begin
  48825. pTDefRegMap(@Self)^.clr := $00080000;
  48826. end;
  48827. procedure TINT_IEC0.setINT4IE(thebits : TBits_1); inline;
  48828. begin
  48829. if thebits = 0 then
  48830. pTDefRegMap(@Self)^.clr := $00080000
  48831. else
  48832. pTDefRegMap(@Self)^.&set := $00080000;
  48833. end;
  48834. function TINT_IEC0.getINT4IE : TBits_1; inline;
  48835. begin
  48836. getINT4IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  48837. end;
  48838. procedure TINT_IEC0.setT5IE; inline;
  48839. begin
  48840. pTDefRegMap(@Self)^.&set := $00100000;
  48841. end;
  48842. procedure TINT_IEC0.clearT5IE; inline;
  48843. begin
  48844. pTDefRegMap(@Self)^.clr := $00100000;
  48845. end;
  48846. procedure TINT_IEC0.setT5IE(thebits : TBits_1); inline;
  48847. begin
  48848. if thebits = 0 then
  48849. pTDefRegMap(@Self)^.clr := $00100000
  48850. else
  48851. pTDefRegMap(@Self)^.&set := $00100000;
  48852. end;
  48853. function TINT_IEC0.getT5IE : TBits_1; inline;
  48854. begin
  48855. getT5IE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  48856. end;
  48857. procedure TINT_IEC0.setIC5IE; inline;
  48858. begin
  48859. pTDefRegMap(@Self)^.&set := $00200000;
  48860. end;
  48861. procedure TINT_IEC0.clearIC5IE; inline;
  48862. begin
  48863. pTDefRegMap(@Self)^.clr := $00200000;
  48864. end;
  48865. procedure TINT_IEC0.setIC5IE(thebits : TBits_1); inline;
  48866. begin
  48867. if thebits = 0 then
  48868. pTDefRegMap(@Self)^.clr := $00200000
  48869. else
  48870. pTDefRegMap(@Self)^.&set := $00200000;
  48871. end;
  48872. function TINT_IEC0.getIC5IE : TBits_1; inline;
  48873. begin
  48874. getIC5IE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  48875. end;
  48876. procedure TINT_IEC0.setOC5IE; inline;
  48877. begin
  48878. pTDefRegMap(@Self)^.&set := $00400000;
  48879. end;
  48880. procedure TINT_IEC0.clearOC5IE; inline;
  48881. begin
  48882. pTDefRegMap(@Self)^.clr := $00400000;
  48883. end;
  48884. procedure TINT_IEC0.setOC5IE(thebits : TBits_1); inline;
  48885. begin
  48886. if thebits = 0 then
  48887. pTDefRegMap(@Self)^.clr := $00400000
  48888. else
  48889. pTDefRegMap(@Self)^.&set := $00400000;
  48890. end;
  48891. function TINT_IEC0.getOC5IE : TBits_1; inline;
  48892. begin
  48893. getOC5IE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  48894. end;
  48895. procedure TINT_IEC0.setU1EIE; inline;
  48896. begin
  48897. pTDefRegMap(@Self)^.&set := $04000000;
  48898. end;
  48899. procedure TINT_IEC0.clearU1EIE; inline;
  48900. begin
  48901. pTDefRegMap(@Self)^.clr := $04000000;
  48902. end;
  48903. procedure TINT_IEC0.setU1EIE(thebits : TBits_1); inline;
  48904. begin
  48905. if thebits = 0 then
  48906. pTDefRegMap(@Self)^.clr := $04000000
  48907. else
  48908. pTDefRegMap(@Self)^.&set := $04000000;
  48909. end;
  48910. function TINT_IEC0.getU1EIE : TBits_1; inline;
  48911. begin
  48912. getU1EIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  48913. end;
  48914. procedure TINT_IEC0.setU1RXIE; inline;
  48915. begin
  48916. pTDefRegMap(@Self)^.&set := $08000000;
  48917. end;
  48918. procedure TINT_IEC0.clearU1RXIE; inline;
  48919. begin
  48920. pTDefRegMap(@Self)^.clr := $08000000;
  48921. end;
  48922. procedure TINT_IEC0.setU1RXIE(thebits : TBits_1); inline;
  48923. begin
  48924. if thebits = 0 then
  48925. pTDefRegMap(@Self)^.clr := $08000000
  48926. else
  48927. pTDefRegMap(@Self)^.&set := $08000000;
  48928. end;
  48929. function TINT_IEC0.getU1RXIE : TBits_1; inline;
  48930. begin
  48931. getU1RXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  48932. end;
  48933. procedure TINT_IEC0.setU1TXIE; inline;
  48934. begin
  48935. pTDefRegMap(@Self)^.&set := $10000000;
  48936. end;
  48937. procedure TINT_IEC0.clearU1TXIE; inline;
  48938. begin
  48939. pTDefRegMap(@Self)^.clr := $10000000;
  48940. end;
  48941. procedure TINT_IEC0.setU1TXIE(thebits : TBits_1); inline;
  48942. begin
  48943. if thebits = 0 then
  48944. pTDefRegMap(@Self)^.clr := $10000000
  48945. else
  48946. pTDefRegMap(@Self)^.&set := $10000000;
  48947. end;
  48948. function TINT_IEC0.getU1TXIE : TBits_1; inline;
  48949. begin
  48950. getU1TXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  48951. end;
  48952. procedure TINT_IEC0.setI2C1BIE; inline;
  48953. begin
  48954. pTDefRegMap(@Self)^.&set := $20000000;
  48955. end;
  48956. procedure TINT_IEC0.clearI2C1BIE; inline;
  48957. begin
  48958. pTDefRegMap(@Self)^.clr := $20000000;
  48959. end;
  48960. procedure TINT_IEC0.setI2C1BIE(thebits : TBits_1); inline;
  48961. begin
  48962. if thebits = 0 then
  48963. pTDefRegMap(@Self)^.clr := $20000000
  48964. else
  48965. pTDefRegMap(@Self)^.&set := $20000000;
  48966. end;
  48967. function TINT_IEC0.getI2C1BIE : TBits_1; inline;
  48968. begin
  48969. getI2C1BIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  48970. end;
  48971. procedure TINT_IEC0.setI2C1SIE; inline;
  48972. begin
  48973. pTDefRegMap(@Self)^.&set := $40000000;
  48974. end;
  48975. procedure TINT_IEC0.clearI2C1SIE; inline;
  48976. begin
  48977. pTDefRegMap(@Self)^.clr := $40000000;
  48978. end;
  48979. procedure TINT_IEC0.setI2C1SIE(thebits : TBits_1); inline;
  48980. begin
  48981. if thebits = 0 then
  48982. pTDefRegMap(@Self)^.clr := $40000000
  48983. else
  48984. pTDefRegMap(@Self)^.&set := $40000000;
  48985. end;
  48986. function TINT_IEC0.getI2C1SIE : TBits_1; inline;
  48987. begin
  48988. getI2C1SIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  48989. end;
  48990. procedure TINT_IEC0.setI2C1MIE; inline;
  48991. begin
  48992. pTDefRegMap(@Self)^.&set := $80000000;
  48993. end;
  48994. procedure TINT_IEC0.clearI2C1MIE; inline;
  48995. begin
  48996. pTDefRegMap(@Self)^.clr := $80000000;
  48997. end;
  48998. procedure TINT_IEC0.setI2C1MIE(thebits : TBits_1); inline;
  48999. begin
  49000. if thebits = 0 then
  49001. pTDefRegMap(@Self)^.clr := $80000000
  49002. else
  49003. pTDefRegMap(@Self)^.&set := $80000000;
  49004. end;
  49005. function TINT_IEC0.getI2C1MIE : TBits_1; inline;
  49006. begin
  49007. getI2C1MIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  49008. end;
  49009. procedure TINT_IEC0.setU1AEIE; inline;
  49010. begin
  49011. pTDefRegMap(@Self)^.&set := $04000000;
  49012. end;
  49013. procedure TINT_IEC0.clearU1AEIE; inline;
  49014. begin
  49015. pTDefRegMap(@Self)^.clr := $04000000;
  49016. end;
  49017. procedure TINT_IEC0.setU1AEIE(thebits : TBits_1); inline;
  49018. begin
  49019. if thebits = 0 then
  49020. pTDefRegMap(@Self)^.clr := $04000000
  49021. else
  49022. pTDefRegMap(@Self)^.&set := $04000000;
  49023. end;
  49024. function TINT_IEC0.getU1AEIE : TBits_1; inline;
  49025. begin
  49026. getU1AEIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  49027. end;
  49028. procedure TINT_IEC0.setU1ARXIE; inline;
  49029. begin
  49030. pTDefRegMap(@Self)^.&set := $08000000;
  49031. end;
  49032. procedure TINT_IEC0.clearU1ARXIE; inline;
  49033. begin
  49034. pTDefRegMap(@Self)^.clr := $08000000;
  49035. end;
  49036. procedure TINT_IEC0.setU1ARXIE(thebits : TBits_1); inline;
  49037. begin
  49038. if thebits = 0 then
  49039. pTDefRegMap(@Self)^.clr := $08000000
  49040. else
  49041. pTDefRegMap(@Self)^.&set := $08000000;
  49042. end;
  49043. function TINT_IEC0.getU1ARXIE : TBits_1; inline;
  49044. begin
  49045. getU1ARXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  49046. end;
  49047. procedure TINT_IEC0.setU1ATXIE; inline;
  49048. begin
  49049. pTDefRegMap(@Self)^.&set := $10000000;
  49050. end;
  49051. procedure TINT_IEC0.clearU1ATXIE; inline;
  49052. begin
  49053. pTDefRegMap(@Self)^.clr := $10000000;
  49054. end;
  49055. procedure TINT_IEC0.setU1ATXIE(thebits : TBits_1); inline;
  49056. begin
  49057. if thebits = 0 then
  49058. pTDefRegMap(@Self)^.clr := $10000000
  49059. else
  49060. pTDefRegMap(@Self)^.&set := $10000000;
  49061. end;
  49062. function TINT_IEC0.getU1ATXIE : TBits_1; inline;
  49063. begin
  49064. getU1ATXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  49065. end;
  49066. procedure TINT_IEC0.setSPI3EIE; inline;
  49067. begin
  49068. pTDefRegMap(@Self)^.&set := $04000000;
  49069. end;
  49070. procedure TINT_IEC0.clearSPI3EIE; inline;
  49071. begin
  49072. pTDefRegMap(@Self)^.clr := $04000000;
  49073. end;
  49074. procedure TINT_IEC0.setSPI3EIE(thebits : TBits_1); inline;
  49075. begin
  49076. if thebits = 0 then
  49077. pTDefRegMap(@Self)^.clr := $04000000
  49078. else
  49079. pTDefRegMap(@Self)^.&set := $04000000;
  49080. end;
  49081. function TINT_IEC0.getSPI3EIE : TBits_1; inline;
  49082. begin
  49083. getSPI3EIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  49084. end;
  49085. procedure TINT_IEC0.setSPI3RXIE; inline;
  49086. begin
  49087. pTDefRegMap(@Self)^.&set := $08000000;
  49088. end;
  49089. procedure TINT_IEC0.clearSPI3RXIE; inline;
  49090. begin
  49091. pTDefRegMap(@Self)^.clr := $08000000;
  49092. end;
  49093. procedure TINT_IEC0.setSPI3RXIE(thebits : TBits_1); inline;
  49094. begin
  49095. if thebits = 0 then
  49096. pTDefRegMap(@Self)^.clr := $08000000
  49097. else
  49098. pTDefRegMap(@Self)^.&set := $08000000;
  49099. end;
  49100. function TINT_IEC0.getSPI3RXIE : TBits_1; inline;
  49101. begin
  49102. getSPI3RXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  49103. end;
  49104. procedure TINT_IEC0.setSPI3TXIE; inline;
  49105. begin
  49106. pTDefRegMap(@Self)^.&set := $10000000;
  49107. end;
  49108. procedure TINT_IEC0.clearSPI3TXIE; inline;
  49109. begin
  49110. pTDefRegMap(@Self)^.clr := $10000000;
  49111. end;
  49112. procedure TINT_IEC0.setSPI3TXIE(thebits : TBits_1); inline;
  49113. begin
  49114. if thebits = 0 then
  49115. pTDefRegMap(@Self)^.clr := $10000000
  49116. else
  49117. pTDefRegMap(@Self)^.&set := $10000000;
  49118. end;
  49119. function TINT_IEC0.getSPI3TXIE : TBits_1; inline;
  49120. begin
  49121. getSPI3TXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  49122. end;
  49123. procedure TINT_IEC0.setSPI1AEIE; inline;
  49124. begin
  49125. pTDefRegMap(@Self)^.&set := $04000000;
  49126. end;
  49127. procedure TINT_IEC0.clearSPI1AEIE; inline;
  49128. begin
  49129. pTDefRegMap(@Self)^.clr := $04000000;
  49130. end;
  49131. procedure TINT_IEC0.setSPI1AEIE(thebits : TBits_1); inline;
  49132. begin
  49133. if thebits = 0 then
  49134. pTDefRegMap(@Self)^.clr := $04000000
  49135. else
  49136. pTDefRegMap(@Self)^.&set := $04000000;
  49137. end;
  49138. function TINT_IEC0.getSPI1AEIE : TBits_1; inline;
  49139. begin
  49140. getSPI1AEIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  49141. end;
  49142. procedure TINT_IEC0.setSPI1ARXIE; inline;
  49143. begin
  49144. pTDefRegMap(@Self)^.&set := $08000000;
  49145. end;
  49146. procedure TINT_IEC0.clearSPI1ARXIE; inline;
  49147. begin
  49148. pTDefRegMap(@Self)^.clr := $08000000;
  49149. end;
  49150. procedure TINT_IEC0.setSPI1ARXIE(thebits : TBits_1); inline;
  49151. begin
  49152. if thebits = 0 then
  49153. pTDefRegMap(@Self)^.clr := $08000000
  49154. else
  49155. pTDefRegMap(@Self)^.&set := $08000000;
  49156. end;
  49157. function TINT_IEC0.getSPI1ARXIE : TBits_1; inline;
  49158. begin
  49159. getSPI1ARXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  49160. end;
  49161. procedure TINT_IEC0.setSPI1ATXIE; inline;
  49162. begin
  49163. pTDefRegMap(@Self)^.&set := $10000000;
  49164. end;
  49165. procedure TINT_IEC0.clearSPI1ATXIE; inline;
  49166. begin
  49167. pTDefRegMap(@Self)^.clr := $10000000;
  49168. end;
  49169. procedure TINT_IEC0.setSPI1ATXIE(thebits : TBits_1); inline;
  49170. begin
  49171. if thebits = 0 then
  49172. pTDefRegMap(@Self)^.clr := $10000000
  49173. else
  49174. pTDefRegMap(@Self)^.&set := $10000000;
  49175. end;
  49176. function TINT_IEC0.getSPI1ATXIE : TBits_1; inline;
  49177. begin
  49178. getSPI1ATXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  49179. end;
  49180. procedure TINT_IEC0.setI2C3BIE; inline;
  49181. begin
  49182. pTDefRegMap(@Self)^.&set := $04000000;
  49183. end;
  49184. procedure TINT_IEC0.clearI2C3BIE; inline;
  49185. begin
  49186. pTDefRegMap(@Self)^.clr := $04000000;
  49187. end;
  49188. procedure TINT_IEC0.setI2C3BIE(thebits : TBits_1); inline;
  49189. begin
  49190. if thebits = 0 then
  49191. pTDefRegMap(@Self)^.clr := $04000000
  49192. else
  49193. pTDefRegMap(@Self)^.&set := $04000000;
  49194. end;
  49195. function TINT_IEC0.getI2C3BIE : TBits_1; inline;
  49196. begin
  49197. getI2C3BIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  49198. end;
  49199. procedure TINT_IEC0.setI2C3SIE; inline;
  49200. begin
  49201. pTDefRegMap(@Self)^.&set := $08000000;
  49202. end;
  49203. procedure TINT_IEC0.clearI2C3SIE; inline;
  49204. begin
  49205. pTDefRegMap(@Self)^.clr := $08000000;
  49206. end;
  49207. procedure TINT_IEC0.setI2C3SIE(thebits : TBits_1); inline;
  49208. begin
  49209. if thebits = 0 then
  49210. pTDefRegMap(@Self)^.clr := $08000000
  49211. else
  49212. pTDefRegMap(@Self)^.&set := $08000000;
  49213. end;
  49214. function TINT_IEC0.getI2C3SIE : TBits_1; inline;
  49215. begin
  49216. getI2C3SIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  49217. end;
  49218. procedure TINT_IEC0.setI2C3MIE; inline;
  49219. begin
  49220. pTDefRegMap(@Self)^.&set := $10000000;
  49221. end;
  49222. procedure TINT_IEC0.clearI2C3MIE; inline;
  49223. begin
  49224. pTDefRegMap(@Self)^.clr := $10000000;
  49225. end;
  49226. procedure TINT_IEC0.setI2C3MIE(thebits : TBits_1); inline;
  49227. begin
  49228. if thebits = 0 then
  49229. pTDefRegMap(@Self)^.clr := $10000000
  49230. else
  49231. pTDefRegMap(@Self)^.&set := $10000000;
  49232. end;
  49233. function TINT_IEC0.getI2C3MIE : TBits_1; inline;
  49234. begin
  49235. getI2C3MIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  49236. end;
  49237. procedure TINT_IEC0.setI2C1ABIE; inline;
  49238. begin
  49239. pTDefRegMap(@Self)^.&set := $04000000;
  49240. end;
  49241. procedure TINT_IEC0.clearI2C1ABIE; inline;
  49242. begin
  49243. pTDefRegMap(@Self)^.clr := $04000000;
  49244. end;
  49245. procedure TINT_IEC0.setI2C1ABIE(thebits : TBits_1); inline;
  49246. begin
  49247. if thebits = 0 then
  49248. pTDefRegMap(@Self)^.clr := $04000000
  49249. else
  49250. pTDefRegMap(@Self)^.&set := $04000000;
  49251. end;
  49252. function TINT_IEC0.getI2C1ABIE : TBits_1; inline;
  49253. begin
  49254. getI2C1ABIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  49255. end;
  49256. procedure TINT_IEC0.setI2C1ASIE; inline;
  49257. begin
  49258. pTDefRegMap(@Self)^.&set := $08000000;
  49259. end;
  49260. procedure TINT_IEC0.clearI2C1ASIE; inline;
  49261. begin
  49262. pTDefRegMap(@Self)^.clr := $08000000;
  49263. end;
  49264. procedure TINT_IEC0.setI2C1ASIE(thebits : TBits_1); inline;
  49265. begin
  49266. if thebits = 0 then
  49267. pTDefRegMap(@Self)^.clr := $08000000
  49268. else
  49269. pTDefRegMap(@Self)^.&set := $08000000;
  49270. end;
  49271. function TINT_IEC0.getI2C1ASIE : TBits_1; inline;
  49272. begin
  49273. getI2C1ASIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  49274. end;
  49275. procedure TINT_IEC0.setI2C1AMIE; inline;
  49276. begin
  49277. pTDefRegMap(@Self)^.&set := $10000000;
  49278. end;
  49279. procedure TINT_IEC0.clearI2C1AMIE; inline;
  49280. begin
  49281. pTDefRegMap(@Self)^.clr := $10000000;
  49282. end;
  49283. procedure TINT_IEC0.setI2C1AMIE(thebits : TBits_1); inline;
  49284. begin
  49285. if thebits = 0 then
  49286. pTDefRegMap(@Self)^.clr := $10000000
  49287. else
  49288. pTDefRegMap(@Self)^.&set := $10000000;
  49289. end;
  49290. function TINT_IEC0.getI2C1AMIE : TBits_1; inline;
  49291. begin
  49292. getI2C1AMIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  49293. end;
  49294. procedure TINT_IEC0.setw(thebits : TBits_32); inline;
  49295. begin
  49296. pTDefRegMap(@Self)^.val := thebits;
  49297. end;
  49298. function TINT_IEC0.getw : TBits_32; inline;
  49299. begin
  49300. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49301. end;
  49302. procedure TINT_IEC1.setCNIE; inline;
  49303. begin
  49304. pTDefRegMap(@Self)^.&set := $00000001;
  49305. end;
  49306. procedure TINT_IEC1.clearCNIE; inline;
  49307. begin
  49308. pTDefRegMap(@Self)^.clr := $00000001;
  49309. end;
  49310. procedure TINT_IEC1.setCNIE(thebits : TBits_1); inline;
  49311. begin
  49312. if thebits = 0 then
  49313. pTDefRegMap(@Self)^.clr := $00000001
  49314. else
  49315. pTDefRegMap(@Self)^.&set := $00000001;
  49316. end;
  49317. function TINT_IEC1.getCNIE : TBits_1; inline;
  49318. begin
  49319. getCNIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  49320. end;
  49321. procedure TINT_IEC1.setAD1IE; inline;
  49322. begin
  49323. pTDefRegMap(@Self)^.&set := $00000002;
  49324. end;
  49325. procedure TINT_IEC1.clearAD1IE; inline;
  49326. begin
  49327. pTDefRegMap(@Self)^.clr := $00000002;
  49328. end;
  49329. procedure TINT_IEC1.setAD1IE(thebits : TBits_1); inline;
  49330. begin
  49331. if thebits = 0 then
  49332. pTDefRegMap(@Self)^.clr := $00000002
  49333. else
  49334. pTDefRegMap(@Self)^.&set := $00000002;
  49335. end;
  49336. function TINT_IEC1.getAD1IE : TBits_1; inline;
  49337. begin
  49338. getAD1IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  49339. end;
  49340. procedure TINT_IEC1.setPMPIE; inline;
  49341. begin
  49342. pTDefRegMap(@Self)^.&set := $00000004;
  49343. end;
  49344. procedure TINT_IEC1.clearPMPIE; inline;
  49345. begin
  49346. pTDefRegMap(@Self)^.clr := $00000004;
  49347. end;
  49348. procedure TINT_IEC1.setPMPIE(thebits : TBits_1); inline;
  49349. begin
  49350. if thebits = 0 then
  49351. pTDefRegMap(@Self)^.clr := $00000004
  49352. else
  49353. pTDefRegMap(@Self)^.&set := $00000004;
  49354. end;
  49355. function TINT_IEC1.getPMPIE : TBits_1; inline;
  49356. begin
  49357. getPMPIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  49358. end;
  49359. procedure TINT_IEC1.setCMP1IE; inline;
  49360. begin
  49361. pTDefRegMap(@Self)^.&set := $00000008;
  49362. end;
  49363. procedure TINT_IEC1.clearCMP1IE; inline;
  49364. begin
  49365. pTDefRegMap(@Self)^.clr := $00000008;
  49366. end;
  49367. procedure TINT_IEC1.setCMP1IE(thebits : TBits_1); inline;
  49368. begin
  49369. if thebits = 0 then
  49370. pTDefRegMap(@Self)^.clr := $00000008
  49371. else
  49372. pTDefRegMap(@Self)^.&set := $00000008;
  49373. end;
  49374. function TINT_IEC1.getCMP1IE : TBits_1; inline;
  49375. begin
  49376. getCMP1IE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  49377. end;
  49378. procedure TINT_IEC1.setCMP2IE; inline;
  49379. begin
  49380. pTDefRegMap(@Self)^.&set := $00000010;
  49381. end;
  49382. procedure TINT_IEC1.clearCMP2IE; inline;
  49383. begin
  49384. pTDefRegMap(@Self)^.clr := $00000010;
  49385. end;
  49386. procedure TINT_IEC1.setCMP2IE(thebits : TBits_1); inline;
  49387. begin
  49388. if thebits = 0 then
  49389. pTDefRegMap(@Self)^.clr := $00000010
  49390. else
  49391. pTDefRegMap(@Self)^.&set := $00000010;
  49392. end;
  49393. function TINT_IEC1.getCMP2IE : TBits_1; inline;
  49394. begin
  49395. getCMP2IE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  49396. end;
  49397. procedure TINT_IEC1.setU3EIE; inline;
  49398. begin
  49399. pTDefRegMap(@Self)^.&set := $00000020;
  49400. end;
  49401. procedure TINT_IEC1.clearU3EIE; inline;
  49402. begin
  49403. pTDefRegMap(@Self)^.clr := $00000020;
  49404. end;
  49405. procedure TINT_IEC1.setU3EIE(thebits : TBits_1); inline;
  49406. begin
  49407. if thebits = 0 then
  49408. pTDefRegMap(@Self)^.clr := $00000020
  49409. else
  49410. pTDefRegMap(@Self)^.&set := $00000020;
  49411. end;
  49412. function TINT_IEC1.getU3EIE : TBits_1; inline;
  49413. begin
  49414. getU3EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49415. end;
  49416. procedure TINT_IEC1.setU3RXIE; inline;
  49417. begin
  49418. pTDefRegMap(@Self)^.&set := $00000040;
  49419. end;
  49420. procedure TINT_IEC1.clearU3RXIE; inline;
  49421. begin
  49422. pTDefRegMap(@Self)^.clr := $00000040;
  49423. end;
  49424. procedure TINT_IEC1.setU3RXIE(thebits : TBits_1); inline;
  49425. begin
  49426. if thebits = 0 then
  49427. pTDefRegMap(@Self)^.clr := $00000040
  49428. else
  49429. pTDefRegMap(@Self)^.&set := $00000040;
  49430. end;
  49431. function TINT_IEC1.getU3RXIE : TBits_1; inline;
  49432. begin
  49433. getU3RXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49434. end;
  49435. procedure TINT_IEC1.setU3TXIE; inline;
  49436. begin
  49437. pTDefRegMap(@Self)^.&set := $00000080;
  49438. end;
  49439. procedure TINT_IEC1.clearU3TXIE; inline;
  49440. begin
  49441. pTDefRegMap(@Self)^.clr := $00000080;
  49442. end;
  49443. procedure TINT_IEC1.setU3TXIE(thebits : TBits_1); inline;
  49444. begin
  49445. if thebits = 0 then
  49446. pTDefRegMap(@Self)^.clr := $00000080
  49447. else
  49448. pTDefRegMap(@Self)^.&set := $00000080;
  49449. end;
  49450. function TINT_IEC1.getU3TXIE : TBits_1; inline;
  49451. begin
  49452. getU3TXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49453. end;
  49454. procedure TINT_IEC1.setU2EIE; inline;
  49455. begin
  49456. pTDefRegMap(@Self)^.&set := $00000100;
  49457. end;
  49458. procedure TINT_IEC1.clearU2EIE; inline;
  49459. begin
  49460. pTDefRegMap(@Self)^.clr := $00000100;
  49461. end;
  49462. procedure TINT_IEC1.setU2EIE(thebits : TBits_1); inline;
  49463. begin
  49464. if thebits = 0 then
  49465. pTDefRegMap(@Self)^.clr := $00000100
  49466. else
  49467. pTDefRegMap(@Self)^.&set := $00000100;
  49468. end;
  49469. function TINT_IEC1.getU2EIE : TBits_1; inline;
  49470. begin
  49471. getU2EIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49472. end;
  49473. procedure TINT_IEC1.setU2RXIE; inline;
  49474. begin
  49475. pTDefRegMap(@Self)^.&set := $00000200;
  49476. end;
  49477. procedure TINT_IEC1.clearU2RXIE; inline;
  49478. begin
  49479. pTDefRegMap(@Self)^.clr := $00000200;
  49480. end;
  49481. procedure TINT_IEC1.setU2RXIE(thebits : TBits_1); inline;
  49482. begin
  49483. if thebits = 0 then
  49484. pTDefRegMap(@Self)^.clr := $00000200
  49485. else
  49486. pTDefRegMap(@Self)^.&set := $00000200;
  49487. end;
  49488. function TINT_IEC1.getU2RXIE : TBits_1; inline;
  49489. begin
  49490. getU2RXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49491. end;
  49492. procedure TINT_IEC1.setU2TXIE; inline;
  49493. begin
  49494. pTDefRegMap(@Self)^.&set := $00000400;
  49495. end;
  49496. procedure TINT_IEC1.clearU2TXIE; inline;
  49497. begin
  49498. pTDefRegMap(@Self)^.clr := $00000400;
  49499. end;
  49500. procedure TINT_IEC1.setU2TXIE(thebits : TBits_1); inline;
  49501. begin
  49502. if thebits = 0 then
  49503. pTDefRegMap(@Self)^.clr := $00000400
  49504. else
  49505. pTDefRegMap(@Self)^.&set := $00000400;
  49506. end;
  49507. function TINT_IEC1.getU2TXIE : TBits_1; inline;
  49508. begin
  49509. getU2TXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49510. end;
  49511. procedure TINT_IEC1.setFSCMIE; inline;
  49512. begin
  49513. pTDefRegMap(@Self)^.&set := $00004000;
  49514. end;
  49515. procedure TINT_IEC1.clearFSCMIE; inline;
  49516. begin
  49517. pTDefRegMap(@Self)^.clr := $00004000;
  49518. end;
  49519. procedure TINT_IEC1.setFSCMIE(thebits : TBits_1); inline;
  49520. begin
  49521. if thebits = 0 then
  49522. pTDefRegMap(@Self)^.clr := $00004000
  49523. else
  49524. pTDefRegMap(@Self)^.&set := $00004000;
  49525. end;
  49526. function TINT_IEC1.getFSCMIE : TBits_1; inline;
  49527. begin
  49528. getFSCMIE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  49529. end;
  49530. procedure TINT_IEC1.setRTCCIE; inline;
  49531. begin
  49532. pTDefRegMap(@Self)^.&set := $00008000;
  49533. end;
  49534. procedure TINT_IEC1.clearRTCCIE; inline;
  49535. begin
  49536. pTDefRegMap(@Self)^.clr := $00008000;
  49537. end;
  49538. procedure TINT_IEC1.setRTCCIE(thebits : TBits_1); inline;
  49539. begin
  49540. if thebits = 0 then
  49541. pTDefRegMap(@Self)^.clr := $00008000
  49542. else
  49543. pTDefRegMap(@Self)^.&set := $00008000;
  49544. end;
  49545. function TINT_IEC1.getRTCCIE : TBits_1; inline;
  49546. begin
  49547. getRTCCIE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  49548. end;
  49549. procedure TINT_IEC1.setDMA0IE; inline;
  49550. begin
  49551. pTDefRegMap(@Self)^.&set := $00010000;
  49552. end;
  49553. procedure TINT_IEC1.clearDMA0IE; inline;
  49554. begin
  49555. pTDefRegMap(@Self)^.clr := $00010000;
  49556. end;
  49557. procedure TINT_IEC1.setDMA0IE(thebits : TBits_1); inline;
  49558. begin
  49559. if thebits = 0 then
  49560. pTDefRegMap(@Self)^.clr := $00010000
  49561. else
  49562. pTDefRegMap(@Self)^.&set := $00010000;
  49563. end;
  49564. function TINT_IEC1.getDMA0IE : TBits_1; inline;
  49565. begin
  49566. getDMA0IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  49567. end;
  49568. procedure TINT_IEC1.setDMA1IE; inline;
  49569. begin
  49570. pTDefRegMap(@Self)^.&set := $00020000;
  49571. end;
  49572. procedure TINT_IEC1.clearDMA1IE; inline;
  49573. begin
  49574. pTDefRegMap(@Self)^.clr := $00020000;
  49575. end;
  49576. procedure TINT_IEC1.setDMA1IE(thebits : TBits_1); inline;
  49577. begin
  49578. if thebits = 0 then
  49579. pTDefRegMap(@Self)^.clr := $00020000
  49580. else
  49581. pTDefRegMap(@Self)^.&set := $00020000;
  49582. end;
  49583. function TINT_IEC1.getDMA1IE : TBits_1; inline;
  49584. begin
  49585. getDMA1IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  49586. end;
  49587. procedure TINT_IEC1.setDMA2IE; inline;
  49588. begin
  49589. pTDefRegMap(@Self)^.&set := $00040000;
  49590. end;
  49591. procedure TINT_IEC1.clearDMA2IE; inline;
  49592. begin
  49593. pTDefRegMap(@Self)^.clr := $00040000;
  49594. end;
  49595. procedure TINT_IEC1.setDMA2IE(thebits : TBits_1); inline;
  49596. begin
  49597. if thebits = 0 then
  49598. pTDefRegMap(@Self)^.clr := $00040000
  49599. else
  49600. pTDefRegMap(@Self)^.&set := $00040000;
  49601. end;
  49602. function TINT_IEC1.getDMA2IE : TBits_1; inline;
  49603. begin
  49604. getDMA2IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  49605. end;
  49606. procedure TINT_IEC1.setDMA3IE; inline;
  49607. begin
  49608. pTDefRegMap(@Self)^.&set := $00080000;
  49609. end;
  49610. procedure TINT_IEC1.clearDMA3IE; inline;
  49611. begin
  49612. pTDefRegMap(@Self)^.clr := $00080000;
  49613. end;
  49614. procedure TINT_IEC1.setDMA3IE(thebits : TBits_1); inline;
  49615. begin
  49616. if thebits = 0 then
  49617. pTDefRegMap(@Self)^.clr := $00080000
  49618. else
  49619. pTDefRegMap(@Self)^.&set := $00080000;
  49620. end;
  49621. function TINT_IEC1.getDMA3IE : TBits_1; inline;
  49622. begin
  49623. getDMA3IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  49624. end;
  49625. procedure TINT_IEC1.setDMA4IE; inline;
  49626. begin
  49627. pTDefRegMap(@Self)^.&set := $00100000;
  49628. end;
  49629. procedure TINT_IEC1.clearDMA4IE; inline;
  49630. begin
  49631. pTDefRegMap(@Self)^.clr := $00100000;
  49632. end;
  49633. procedure TINT_IEC1.setDMA4IE(thebits : TBits_1); inline;
  49634. begin
  49635. if thebits = 0 then
  49636. pTDefRegMap(@Self)^.clr := $00100000
  49637. else
  49638. pTDefRegMap(@Self)^.&set := $00100000;
  49639. end;
  49640. function TINT_IEC1.getDMA4IE : TBits_1; inline;
  49641. begin
  49642. getDMA4IE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  49643. end;
  49644. procedure TINT_IEC1.setDMA5IE; inline;
  49645. begin
  49646. pTDefRegMap(@Self)^.&set := $00200000;
  49647. end;
  49648. procedure TINT_IEC1.clearDMA5IE; inline;
  49649. begin
  49650. pTDefRegMap(@Self)^.clr := $00200000;
  49651. end;
  49652. procedure TINT_IEC1.setDMA5IE(thebits : TBits_1); inline;
  49653. begin
  49654. if thebits = 0 then
  49655. pTDefRegMap(@Self)^.clr := $00200000
  49656. else
  49657. pTDefRegMap(@Self)^.&set := $00200000;
  49658. end;
  49659. function TINT_IEC1.getDMA5IE : TBits_1; inline;
  49660. begin
  49661. getDMA5IE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  49662. end;
  49663. procedure TINT_IEC1.setDMA6IE; inline;
  49664. begin
  49665. pTDefRegMap(@Self)^.&set := $00400000;
  49666. end;
  49667. procedure TINT_IEC1.clearDMA6IE; inline;
  49668. begin
  49669. pTDefRegMap(@Self)^.clr := $00400000;
  49670. end;
  49671. procedure TINT_IEC1.setDMA6IE(thebits : TBits_1); inline;
  49672. begin
  49673. if thebits = 0 then
  49674. pTDefRegMap(@Self)^.clr := $00400000
  49675. else
  49676. pTDefRegMap(@Self)^.&set := $00400000;
  49677. end;
  49678. function TINT_IEC1.getDMA6IE : TBits_1; inline;
  49679. begin
  49680. getDMA6IE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  49681. end;
  49682. procedure TINT_IEC1.setDMA7IE; inline;
  49683. begin
  49684. pTDefRegMap(@Self)^.&set := $00800000;
  49685. end;
  49686. procedure TINT_IEC1.clearDMA7IE; inline;
  49687. begin
  49688. pTDefRegMap(@Self)^.clr := $00800000;
  49689. end;
  49690. procedure TINT_IEC1.setDMA7IE(thebits : TBits_1); inline;
  49691. begin
  49692. if thebits = 0 then
  49693. pTDefRegMap(@Self)^.clr := $00800000
  49694. else
  49695. pTDefRegMap(@Self)^.&set := $00800000;
  49696. end;
  49697. function TINT_IEC1.getDMA7IE : TBits_1; inline;
  49698. begin
  49699. getDMA7IE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  49700. end;
  49701. procedure TINT_IEC1.setFCEIE; inline;
  49702. begin
  49703. pTDefRegMap(@Self)^.&set := $01000000;
  49704. end;
  49705. procedure TINT_IEC1.clearFCEIE; inline;
  49706. begin
  49707. pTDefRegMap(@Self)^.clr := $01000000;
  49708. end;
  49709. procedure TINT_IEC1.setFCEIE(thebits : TBits_1); inline;
  49710. begin
  49711. if thebits = 0 then
  49712. pTDefRegMap(@Self)^.clr := $01000000
  49713. else
  49714. pTDefRegMap(@Self)^.&set := $01000000;
  49715. end;
  49716. function TINT_IEC1.getFCEIE : TBits_1; inline;
  49717. begin
  49718. getFCEIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  49719. end;
  49720. procedure TINT_IEC1.setUSBIE; inline;
  49721. begin
  49722. pTDefRegMap(@Self)^.&set := $02000000;
  49723. end;
  49724. procedure TINT_IEC1.clearUSBIE; inline;
  49725. begin
  49726. pTDefRegMap(@Self)^.clr := $02000000;
  49727. end;
  49728. procedure TINT_IEC1.setUSBIE(thebits : TBits_1); inline;
  49729. begin
  49730. if thebits = 0 then
  49731. pTDefRegMap(@Self)^.clr := $02000000
  49732. else
  49733. pTDefRegMap(@Self)^.&set := $02000000;
  49734. end;
  49735. function TINT_IEC1.getUSBIE : TBits_1; inline;
  49736. begin
  49737. getUSBIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  49738. end;
  49739. procedure TINT_IEC1.setCAN1IE; inline;
  49740. begin
  49741. pTDefRegMap(@Self)^.&set := $04000000;
  49742. end;
  49743. procedure TINT_IEC1.clearCAN1IE; inline;
  49744. begin
  49745. pTDefRegMap(@Self)^.clr := $04000000;
  49746. end;
  49747. procedure TINT_IEC1.setCAN1IE(thebits : TBits_1); inline;
  49748. begin
  49749. if thebits = 0 then
  49750. pTDefRegMap(@Self)^.clr := $04000000
  49751. else
  49752. pTDefRegMap(@Self)^.&set := $04000000;
  49753. end;
  49754. function TINT_IEC1.getCAN1IE : TBits_1; inline;
  49755. begin
  49756. getCAN1IE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  49757. end;
  49758. procedure TINT_IEC1.setIC1EIE; inline;
  49759. begin
  49760. pTDefRegMap(@Self)^.&set := $20000000;
  49761. end;
  49762. procedure TINT_IEC1.clearIC1EIE; inline;
  49763. begin
  49764. pTDefRegMap(@Self)^.clr := $20000000;
  49765. end;
  49766. procedure TINT_IEC1.setIC1EIE(thebits : TBits_1); inline;
  49767. begin
  49768. if thebits = 0 then
  49769. pTDefRegMap(@Self)^.clr := $20000000
  49770. else
  49771. pTDefRegMap(@Self)^.&set := $20000000;
  49772. end;
  49773. function TINT_IEC1.getIC1EIE : TBits_1; inline;
  49774. begin
  49775. getIC1EIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  49776. end;
  49777. procedure TINT_IEC1.setIC2EIE; inline;
  49778. begin
  49779. pTDefRegMap(@Self)^.&set := $40000000;
  49780. end;
  49781. procedure TINT_IEC1.clearIC2EIE; inline;
  49782. begin
  49783. pTDefRegMap(@Self)^.clr := $40000000;
  49784. end;
  49785. procedure TINT_IEC1.setIC2EIE(thebits : TBits_1); inline;
  49786. begin
  49787. if thebits = 0 then
  49788. pTDefRegMap(@Self)^.clr := $40000000
  49789. else
  49790. pTDefRegMap(@Self)^.&set := $40000000;
  49791. end;
  49792. function TINT_IEC1.getIC2EIE : TBits_1; inline;
  49793. begin
  49794. getIC2EIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  49795. end;
  49796. procedure TINT_IEC1.setIC3EIE; inline;
  49797. begin
  49798. pTDefRegMap(@Self)^.&set := $80000000;
  49799. end;
  49800. procedure TINT_IEC1.clearIC3EIE; inline;
  49801. begin
  49802. pTDefRegMap(@Self)^.clr := $80000000;
  49803. end;
  49804. procedure TINT_IEC1.setIC3EIE(thebits : TBits_1); inline;
  49805. begin
  49806. if thebits = 0 then
  49807. pTDefRegMap(@Self)^.clr := $80000000
  49808. else
  49809. pTDefRegMap(@Self)^.&set := $80000000;
  49810. end;
  49811. function TINT_IEC1.getIC3EIE : TBits_1; inline;
  49812. begin
  49813. getIC3EIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  49814. end;
  49815. procedure TINT_IEC1.setU2AEIE; inline;
  49816. begin
  49817. pTDefRegMap(@Self)^.&set := $00000020;
  49818. end;
  49819. procedure TINT_IEC1.clearU2AEIE; inline;
  49820. begin
  49821. pTDefRegMap(@Self)^.clr := $00000020;
  49822. end;
  49823. procedure TINT_IEC1.setU2AEIE(thebits : TBits_1); inline;
  49824. begin
  49825. if thebits = 0 then
  49826. pTDefRegMap(@Self)^.clr := $00000020
  49827. else
  49828. pTDefRegMap(@Self)^.&set := $00000020;
  49829. end;
  49830. function TINT_IEC1.getU2AEIE : TBits_1; inline;
  49831. begin
  49832. getU2AEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49833. end;
  49834. procedure TINT_IEC1.setU2ARXIE; inline;
  49835. begin
  49836. pTDefRegMap(@Self)^.&set := $00000040;
  49837. end;
  49838. procedure TINT_IEC1.clearU2ARXIE; inline;
  49839. begin
  49840. pTDefRegMap(@Self)^.clr := $00000040;
  49841. end;
  49842. procedure TINT_IEC1.setU2ARXIE(thebits : TBits_1); inline;
  49843. begin
  49844. if thebits = 0 then
  49845. pTDefRegMap(@Self)^.clr := $00000040
  49846. else
  49847. pTDefRegMap(@Self)^.&set := $00000040;
  49848. end;
  49849. function TINT_IEC1.getU2ARXIE : TBits_1; inline;
  49850. begin
  49851. getU2ARXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49852. end;
  49853. procedure TINT_IEC1.setU2ATXIE; inline;
  49854. begin
  49855. pTDefRegMap(@Self)^.&set := $00000080;
  49856. end;
  49857. procedure TINT_IEC1.clearU2ATXIE; inline;
  49858. begin
  49859. pTDefRegMap(@Self)^.clr := $00000080;
  49860. end;
  49861. procedure TINT_IEC1.setU2ATXIE(thebits : TBits_1); inline;
  49862. begin
  49863. if thebits = 0 then
  49864. pTDefRegMap(@Self)^.clr := $00000080
  49865. else
  49866. pTDefRegMap(@Self)^.&set := $00000080;
  49867. end;
  49868. function TINT_IEC1.getU2ATXIE : TBits_1; inline;
  49869. begin
  49870. getU2ATXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49871. end;
  49872. procedure TINT_IEC1.setU3AEIE; inline;
  49873. begin
  49874. pTDefRegMap(@Self)^.&set := $00000100;
  49875. end;
  49876. procedure TINT_IEC1.clearU3AEIE; inline;
  49877. begin
  49878. pTDefRegMap(@Self)^.clr := $00000100;
  49879. end;
  49880. procedure TINT_IEC1.setU3AEIE(thebits : TBits_1); inline;
  49881. begin
  49882. if thebits = 0 then
  49883. pTDefRegMap(@Self)^.clr := $00000100
  49884. else
  49885. pTDefRegMap(@Self)^.&set := $00000100;
  49886. end;
  49887. function TINT_IEC1.getU3AEIE : TBits_1; inline;
  49888. begin
  49889. getU3AEIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49890. end;
  49891. procedure TINT_IEC1.setU3ARXIE; inline;
  49892. begin
  49893. pTDefRegMap(@Self)^.&set := $00000200;
  49894. end;
  49895. procedure TINT_IEC1.clearU3ARXIE; inline;
  49896. begin
  49897. pTDefRegMap(@Self)^.clr := $00000200;
  49898. end;
  49899. procedure TINT_IEC1.setU3ARXIE(thebits : TBits_1); inline;
  49900. begin
  49901. if thebits = 0 then
  49902. pTDefRegMap(@Self)^.clr := $00000200
  49903. else
  49904. pTDefRegMap(@Self)^.&set := $00000200;
  49905. end;
  49906. function TINT_IEC1.getU3ARXIE : TBits_1; inline;
  49907. begin
  49908. getU3ARXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49909. end;
  49910. procedure TINT_IEC1.setU3ATXIE; inline;
  49911. begin
  49912. pTDefRegMap(@Self)^.&set := $00000400;
  49913. end;
  49914. procedure TINT_IEC1.clearU3ATXIE; inline;
  49915. begin
  49916. pTDefRegMap(@Self)^.clr := $00000400;
  49917. end;
  49918. procedure TINT_IEC1.setU3ATXIE(thebits : TBits_1); inline;
  49919. begin
  49920. if thebits = 0 then
  49921. pTDefRegMap(@Self)^.clr := $00000400
  49922. else
  49923. pTDefRegMap(@Self)^.&set := $00000400;
  49924. end;
  49925. function TINT_IEC1.getU3ATXIE : TBits_1; inline;
  49926. begin
  49927. getU3ATXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49928. end;
  49929. procedure TINT_IEC1.setSPI2EIE; inline;
  49930. begin
  49931. pTDefRegMap(@Self)^.&set := $00000020;
  49932. end;
  49933. procedure TINT_IEC1.clearSPI2EIE; inline;
  49934. begin
  49935. pTDefRegMap(@Self)^.clr := $00000020;
  49936. end;
  49937. procedure TINT_IEC1.setSPI2EIE(thebits : TBits_1); inline;
  49938. begin
  49939. if thebits = 0 then
  49940. pTDefRegMap(@Self)^.clr := $00000020
  49941. else
  49942. pTDefRegMap(@Self)^.&set := $00000020;
  49943. end;
  49944. function TINT_IEC1.getSPI2EIE : TBits_1; inline;
  49945. begin
  49946. getSPI2EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49947. end;
  49948. procedure TINT_IEC1.setSPI2RXIE; inline;
  49949. begin
  49950. pTDefRegMap(@Self)^.&set := $00000040;
  49951. end;
  49952. procedure TINT_IEC1.clearSPI2RXIE; inline;
  49953. begin
  49954. pTDefRegMap(@Self)^.clr := $00000040;
  49955. end;
  49956. procedure TINT_IEC1.setSPI2RXIE(thebits : TBits_1); inline;
  49957. begin
  49958. if thebits = 0 then
  49959. pTDefRegMap(@Self)^.clr := $00000040
  49960. else
  49961. pTDefRegMap(@Self)^.&set := $00000040;
  49962. end;
  49963. function TINT_IEC1.getSPI2RXIE : TBits_1; inline;
  49964. begin
  49965. getSPI2RXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49966. end;
  49967. procedure TINT_IEC1.setSPI2TXIE; inline;
  49968. begin
  49969. pTDefRegMap(@Self)^.&set := $00000080;
  49970. end;
  49971. procedure TINT_IEC1.clearSPI2TXIE; inline;
  49972. begin
  49973. pTDefRegMap(@Self)^.clr := $00000080;
  49974. end;
  49975. procedure TINT_IEC1.setSPI2TXIE(thebits : TBits_1); inline;
  49976. begin
  49977. if thebits = 0 then
  49978. pTDefRegMap(@Self)^.clr := $00000080
  49979. else
  49980. pTDefRegMap(@Self)^.&set := $00000080;
  49981. end;
  49982. function TINT_IEC1.getSPI2TXIE : TBits_1; inline;
  49983. begin
  49984. getSPI2TXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49985. end;
  49986. procedure TINT_IEC1.setSPI4EIE; inline;
  49987. begin
  49988. pTDefRegMap(@Self)^.&set := $00000100;
  49989. end;
  49990. procedure TINT_IEC1.clearSPI4EIE; inline;
  49991. begin
  49992. pTDefRegMap(@Self)^.clr := $00000100;
  49993. end;
  49994. procedure TINT_IEC1.setSPI4EIE(thebits : TBits_1); inline;
  49995. begin
  49996. if thebits = 0 then
  49997. pTDefRegMap(@Self)^.clr := $00000100
  49998. else
  49999. pTDefRegMap(@Self)^.&set := $00000100;
  50000. end;
  50001. function TINT_IEC1.getSPI4EIE : TBits_1; inline;
  50002. begin
  50003. getSPI4EIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50004. end;
  50005. procedure TINT_IEC1.setSPI4RXIE; inline;
  50006. begin
  50007. pTDefRegMap(@Self)^.&set := $00000200;
  50008. end;
  50009. procedure TINT_IEC1.clearSPI4RXIE; inline;
  50010. begin
  50011. pTDefRegMap(@Self)^.clr := $00000200;
  50012. end;
  50013. procedure TINT_IEC1.setSPI4RXIE(thebits : TBits_1); inline;
  50014. begin
  50015. if thebits = 0 then
  50016. pTDefRegMap(@Self)^.clr := $00000200
  50017. else
  50018. pTDefRegMap(@Self)^.&set := $00000200;
  50019. end;
  50020. function TINT_IEC1.getSPI4RXIE : TBits_1; inline;
  50021. begin
  50022. getSPI4RXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50023. end;
  50024. procedure TINT_IEC1.setSPI4TXIE; inline;
  50025. begin
  50026. pTDefRegMap(@Self)^.&set := $00000400;
  50027. end;
  50028. procedure TINT_IEC1.clearSPI4TXIE; inline;
  50029. begin
  50030. pTDefRegMap(@Self)^.clr := $00000400;
  50031. end;
  50032. procedure TINT_IEC1.setSPI4TXIE(thebits : TBits_1); inline;
  50033. begin
  50034. if thebits = 0 then
  50035. pTDefRegMap(@Self)^.clr := $00000400
  50036. else
  50037. pTDefRegMap(@Self)^.&set := $00000400;
  50038. end;
  50039. function TINT_IEC1.getSPI4TXIE : TBits_1; inline;
  50040. begin
  50041. getSPI4TXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50042. end;
  50043. procedure TINT_IEC1.setSPI2AEIE; inline;
  50044. begin
  50045. pTDefRegMap(@Self)^.&set := $00000020;
  50046. end;
  50047. procedure TINT_IEC1.clearSPI2AEIE; inline;
  50048. begin
  50049. pTDefRegMap(@Self)^.clr := $00000020;
  50050. end;
  50051. procedure TINT_IEC1.setSPI2AEIE(thebits : TBits_1); inline;
  50052. begin
  50053. if thebits = 0 then
  50054. pTDefRegMap(@Self)^.clr := $00000020
  50055. else
  50056. pTDefRegMap(@Self)^.&set := $00000020;
  50057. end;
  50058. function TINT_IEC1.getSPI2AEIE : TBits_1; inline;
  50059. begin
  50060. getSPI2AEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50061. end;
  50062. procedure TINT_IEC1.setSPI2ARXIE; inline;
  50063. begin
  50064. pTDefRegMap(@Self)^.&set := $00000040;
  50065. end;
  50066. procedure TINT_IEC1.clearSPI2ARXIE; inline;
  50067. begin
  50068. pTDefRegMap(@Self)^.clr := $00000040;
  50069. end;
  50070. procedure TINT_IEC1.setSPI2ARXIE(thebits : TBits_1); inline;
  50071. begin
  50072. if thebits = 0 then
  50073. pTDefRegMap(@Self)^.clr := $00000040
  50074. else
  50075. pTDefRegMap(@Self)^.&set := $00000040;
  50076. end;
  50077. function TINT_IEC1.getSPI2ARXIE : TBits_1; inline;
  50078. begin
  50079. getSPI2ARXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50080. end;
  50081. procedure TINT_IEC1.setSPI2ATXIE; inline;
  50082. begin
  50083. pTDefRegMap(@Self)^.&set := $00000080;
  50084. end;
  50085. procedure TINT_IEC1.clearSPI2ATXIE; inline;
  50086. begin
  50087. pTDefRegMap(@Self)^.clr := $00000080;
  50088. end;
  50089. procedure TINT_IEC1.setSPI2ATXIE(thebits : TBits_1); inline;
  50090. begin
  50091. if thebits = 0 then
  50092. pTDefRegMap(@Self)^.clr := $00000080
  50093. else
  50094. pTDefRegMap(@Self)^.&set := $00000080;
  50095. end;
  50096. function TINT_IEC1.getSPI2ATXIE : TBits_1; inline;
  50097. begin
  50098. getSPI2ATXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50099. end;
  50100. procedure TINT_IEC1.setSPI3AEIE; inline;
  50101. begin
  50102. pTDefRegMap(@Self)^.&set := $00000100;
  50103. end;
  50104. procedure TINT_IEC1.clearSPI3AEIE; inline;
  50105. begin
  50106. pTDefRegMap(@Self)^.clr := $00000100;
  50107. end;
  50108. procedure TINT_IEC1.setSPI3AEIE(thebits : TBits_1); inline;
  50109. begin
  50110. if thebits = 0 then
  50111. pTDefRegMap(@Self)^.clr := $00000100
  50112. else
  50113. pTDefRegMap(@Self)^.&set := $00000100;
  50114. end;
  50115. function TINT_IEC1.getSPI3AEIE : TBits_1; inline;
  50116. begin
  50117. getSPI3AEIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50118. end;
  50119. procedure TINT_IEC1.setSPI3ARXIE; inline;
  50120. begin
  50121. pTDefRegMap(@Self)^.&set := $00000200;
  50122. end;
  50123. procedure TINT_IEC1.clearSPI3ARXIE; inline;
  50124. begin
  50125. pTDefRegMap(@Self)^.clr := $00000200;
  50126. end;
  50127. procedure TINT_IEC1.setSPI3ARXIE(thebits : TBits_1); inline;
  50128. begin
  50129. if thebits = 0 then
  50130. pTDefRegMap(@Self)^.clr := $00000200
  50131. else
  50132. pTDefRegMap(@Self)^.&set := $00000200;
  50133. end;
  50134. function TINT_IEC1.getSPI3ARXIE : TBits_1; inline;
  50135. begin
  50136. getSPI3ARXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50137. end;
  50138. procedure TINT_IEC1.setSPI3ATXIE; inline;
  50139. begin
  50140. pTDefRegMap(@Self)^.&set := $00000400;
  50141. end;
  50142. procedure TINT_IEC1.clearSPI3ATXIE; inline;
  50143. begin
  50144. pTDefRegMap(@Self)^.clr := $00000400;
  50145. end;
  50146. procedure TINT_IEC1.setSPI3ATXIE(thebits : TBits_1); inline;
  50147. begin
  50148. if thebits = 0 then
  50149. pTDefRegMap(@Self)^.clr := $00000400
  50150. else
  50151. pTDefRegMap(@Self)^.&set := $00000400;
  50152. end;
  50153. function TINT_IEC1.getSPI3ATXIE : TBits_1; inline;
  50154. begin
  50155. getSPI3ATXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50156. end;
  50157. procedure TINT_IEC1.setI2C4BIE; inline;
  50158. begin
  50159. pTDefRegMap(@Self)^.&set := $00000020;
  50160. end;
  50161. procedure TINT_IEC1.clearI2C4BIE; inline;
  50162. begin
  50163. pTDefRegMap(@Self)^.clr := $00000020;
  50164. end;
  50165. procedure TINT_IEC1.setI2C4BIE(thebits : TBits_1); inline;
  50166. begin
  50167. if thebits = 0 then
  50168. pTDefRegMap(@Self)^.clr := $00000020
  50169. else
  50170. pTDefRegMap(@Self)^.&set := $00000020;
  50171. end;
  50172. function TINT_IEC1.getI2C4BIE : TBits_1; inline;
  50173. begin
  50174. getI2C4BIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50175. end;
  50176. procedure TINT_IEC1.setI2C4SIE; inline;
  50177. begin
  50178. pTDefRegMap(@Self)^.&set := $00000040;
  50179. end;
  50180. procedure TINT_IEC1.clearI2C4SIE; inline;
  50181. begin
  50182. pTDefRegMap(@Self)^.clr := $00000040;
  50183. end;
  50184. procedure TINT_IEC1.setI2C4SIE(thebits : TBits_1); inline;
  50185. begin
  50186. if thebits = 0 then
  50187. pTDefRegMap(@Self)^.clr := $00000040
  50188. else
  50189. pTDefRegMap(@Self)^.&set := $00000040;
  50190. end;
  50191. function TINT_IEC1.getI2C4SIE : TBits_1; inline;
  50192. begin
  50193. getI2C4SIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50194. end;
  50195. procedure TINT_IEC1.setI2C4MIE; inline;
  50196. begin
  50197. pTDefRegMap(@Self)^.&set := $00000080;
  50198. end;
  50199. procedure TINT_IEC1.clearI2C4MIE; inline;
  50200. begin
  50201. pTDefRegMap(@Self)^.clr := $00000080;
  50202. end;
  50203. procedure TINT_IEC1.setI2C4MIE(thebits : TBits_1); inline;
  50204. begin
  50205. if thebits = 0 then
  50206. pTDefRegMap(@Self)^.clr := $00000080
  50207. else
  50208. pTDefRegMap(@Self)^.&set := $00000080;
  50209. end;
  50210. function TINT_IEC1.getI2C4MIE : TBits_1; inline;
  50211. begin
  50212. getI2C4MIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50213. end;
  50214. procedure TINT_IEC1.setI2C5BIE; inline;
  50215. begin
  50216. pTDefRegMap(@Self)^.&set := $00000100;
  50217. end;
  50218. procedure TINT_IEC1.clearI2C5BIE; inline;
  50219. begin
  50220. pTDefRegMap(@Self)^.clr := $00000100;
  50221. end;
  50222. procedure TINT_IEC1.setI2C5BIE(thebits : TBits_1); inline;
  50223. begin
  50224. if thebits = 0 then
  50225. pTDefRegMap(@Self)^.clr := $00000100
  50226. else
  50227. pTDefRegMap(@Self)^.&set := $00000100;
  50228. end;
  50229. function TINT_IEC1.getI2C5BIE : TBits_1; inline;
  50230. begin
  50231. getI2C5BIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50232. end;
  50233. procedure TINT_IEC1.setI2C5SIE; inline;
  50234. begin
  50235. pTDefRegMap(@Self)^.&set := $00000200;
  50236. end;
  50237. procedure TINT_IEC1.clearI2C5SIE; inline;
  50238. begin
  50239. pTDefRegMap(@Self)^.clr := $00000200;
  50240. end;
  50241. procedure TINT_IEC1.setI2C5SIE(thebits : TBits_1); inline;
  50242. begin
  50243. if thebits = 0 then
  50244. pTDefRegMap(@Self)^.clr := $00000200
  50245. else
  50246. pTDefRegMap(@Self)^.&set := $00000200;
  50247. end;
  50248. function TINT_IEC1.getI2C5SIE : TBits_1; inline;
  50249. begin
  50250. getI2C5SIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50251. end;
  50252. procedure TINT_IEC1.setI2C5MIE; inline;
  50253. begin
  50254. pTDefRegMap(@Self)^.&set := $00000400;
  50255. end;
  50256. procedure TINT_IEC1.clearI2C5MIE; inline;
  50257. begin
  50258. pTDefRegMap(@Self)^.clr := $00000400;
  50259. end;
  50260. procedure TINT_IEC1.setI2C5MIE(thebits : TBits_1); inline;
  50261. begin
  50262. if thebits = 0 then
  50263. pTDefRegMap(@Self)^.clr := $00000400
  50264. else
  50265. pTDefRegMap(@Self)^.&set := $00000400;
  50266. end;
  50267. function TINT_IEC1.getI2C5MIE : TBits_1; inline;
  50268. begin
  50269. getI2C5MIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50270. end;
  50271. procedure TINT_IEC1.setI2C2ABIE; inline;
  50272. begin
  50273. pTDefRegMap(@Self)^.&set := $00000020;
  50274. end;
  50275. procedure TINT_IEC1.clearI2C2ABIE; inline;
  50276. begin
  50277. pTDefRegMap(@Self)^.clr := $00000020;
  50278. end;
  50279. procedure TINT_IEC1.setI2C2ABIE(thebits : TBits_1); inline;
  50280. begin
  50281. if thebits = 0 then
  50282. pTDefRegMap(@Self)^.clr := $00000020
  50283. else
  50284. pTDefRegMap(@Self)^.&set := $00000020;
  50285. end;
  50286. function TINT_IEC1.getI2C2ABIE : TBits_1; inline;
  50287. begin
  50288. getI2C2ABIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50289. end;
  50290. procedure TINT_IEC1.setI2C2ASIE; inline;
  50291. begin
  50292. pTDefRegMap(@Self)^.&set := $00000040;
  50293. end;
  50294. procedure TINT_IEC1.clearI2C2ASIE; inline;
  50295. begin
  50296. pTDefRegMap(@Self)^.clr := $00000040;
  50297. end;
  50298. procedure TINT_IEC1.setI2C2ASIE(thebits : TBits_1); inline;
  50299. begin
  50300. if thebits = 0 then
  50301. pTDefRegMap(@Self)^.clr := $00000040
  50302. else
  50303. pTDefRegMap(@Self)^.&set := $00000040;
  50304. end;
  50305. function TINT_IEC1.getI2C2ASIE : TBits_1; inline;
  50306. begin
  50307. getI2C2ASIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50308. end;
  50309. procedure TINT_IEC1.setI2C2AMIE; inline;
  50310. begin
  50311. pTDefRegMap(@Self)^.&set := $00000080;
  50312. end;
  50313. procedure TINT_IEC1.clearI2C2AMIE; inline;
  50314. begin
  50315. pTDefRegMap(@Self)^.clr := $00000080;
  50316. end;
  50317. procedure TINT_IEC1.setI2C2AMIE(thebits : TBits_1); inline;
  50318. begin
  50319. if thebits = 0 then
  50320. pTDefRegMap(@Self)^.clr := $00000080
  50321. else
  50322. pTDefRegMap(@Self)^.&set := $00000080;
  50323. end;
  50324. function TINT_IEC1.getI2C2AMIE : TBits_1; inline;
  50325. begin
  50326. getI2C2AMIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50327. end;
  50328. procedure TINT_IEC1.setI2C3ABIE; inline;
  50329. begin
  50330. pTDefRegMap(@Self)^.&set := $00000100;
  50331. end;
  50332. procedure TINT_IEC1.clearI2C3ABIE; inline;
  50333. begin
  50334. pTDefRegMap(@Self)^.clr := $00000100;
  50335. end;
  50336. procedure TINT_IEC1.setI2C3ABIE(thebits : TBits_1); inline;
  50337. begin
  50338. if thebits = 0 then
  50339. pTDefRegMap(@Self)^.clr := $00000100
  50340. else
  50341. pTDefRegMap(@Self)^.&set := $00000100;
  50342. end;
  50343. function TINT_IEC1.getI2C3ABIE : TBits_1; inline;
  50344. begin
  50345. getI2C3ABIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50346. end;
  50347. procedure TINT_IEC1.setI2C3ASIE; inline;
  50348. begin
  50349. pTDefRegMap(@Self)^.&set := $00000200;
  50350. end;
  50351. procedure TINT_IEC1.clearI2C3ASIE; inline;
  50352. begin
  50353. pTDefRegMap(@Self)^.clr := $00000200;
  50354. end;
  50355. procedure TINT_IEC1.setI2C3ASIE(thebits : TBits_1); inline;
  50356. begin
  50357. if thebits = 0 then
  50358. pTDefRegMap(@Self)^.clr := $00000200
  50359. else
  50360. pTDefRegMap(@Self)^.&set := $00000200;
  50361. end;
  50362. function TINT_IEC1.getI2C3ASIE : TBits_1; inline;
  50363. begin
  50364. getI2C3ASIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50365. end;
  50366. procedure TINT_IEC1.setI2C3AMIE; inline;
  50367. begin
  50368. pTDefRegMap(@Self)^.&set := $00000400;
  50369. end;
  50370. procedure TINT_IEC1.clearI2C3AMIE; inline;
  50371. begin
  50372. pTDefRegMap(@Self)^.clr := $00000400;
  50373. end;
  50374. procedure TINT_IEC1.setI2C3AMIE(thebits : TBits_1); inline;
  50375. begin
  50376. if thebits = 0 then
  50377. pTDefRegMap(@Self)^.clr := $00000400
  50378. else
  50379. pTDefRegMap(@Self)^.&set := $00000400;
  50380. end;
  50381. function TINT_IEC1.getI2C3AMIE : TBits_1; inline;
  50382. begin
  50383. getI2C3AMIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50384. end;
  50385. procedure TINT_IEC1.setw(thebits : TBits_32); inline;
  50386. begin
  50387. pTDefRegMap(@Self)^.val := thebits;
  50388. end;
  50389. function TINT_IEC1.getw : TBits_32; inline;
  50390. begin
  50391. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50392. end;
  50393. procedure TINT_IEC2.setIC4EIE; inline;
  50394. begin
  50395. pTDefRegMap(@Self)^.&set := $00000001;
  50396. end;
  50397. procedure TINT_IEC2.clearIC4EIE; inline;
  50398. begin
  50399. pTDefRegMap(@Self)^.clr := $00000001;
  50400. end;
  50401. procedure TINT_IEC2.setIC4EIE(thebits : TBits_1); inline;
  50402. begin
  50403. if thebits = 0 then
  50404. pTDefRegMap(@Self)^.clr := $00000001
  50405. else
  50406. pTDefRegMap(@Self)^.&set := $00000001;
  50407. end;
  50408. function TINT_IEC2.getIC4EIE : TBits_1; inline;
  50409. begin
  50410. getIC4EIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  50411. end;
  50412. procedure TINT_IEC2.setIC5EIE; inline;
  50413. begin
  50414. pTDefRegMap(@Self)^.&set := $00000002;
  50415. end;
  50416. procedure TINT_IEC2.clearIC5EIE; inline;
  50417. begin
  50418. pTDefRegMap(@Self)^.clr := $00000002;
  50419. end;
  50420. procedure TINT_IEC2.setIC5EIE(thebits : TBits_1); inline;
  50421. begin
  50422. if thebits = 0 then
  50423. pTDefRegMap(@Self)^.clr := $00000002
  50424. else
  50425. pTDefRegMap(@Self)^.&set := $00000002;
  50426. end;
  50427. function TINT_IEC2.getIC5EIE : TBits_1; inline;
  50428. begin
  50429. getIC5EIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  50430. end;
  50431. procedure TINT_IEC2.setPMPEIE; inline;
  50432. begin
  50433. pTDefRegMap(@Self)^.&set := $00000004;
  50434. end;
  50435. procedure TINT_IEC2.clearPMPEIE; inline;
  50436. begin
  50437. pTDefRegMap(@Self)^.clr := $00000004;
  50438. end;
  50439. procedure TINT_IEC2.setPMPEIE(thebits : TBits_1); inline;
  50440. begin
  50441. if thebits = 0 then
  50442. pTDefRegMap(@Self)^.clr := $00000004
  50443. else
  50444. pTDefRegMap(@Self)^.&set := $00000004;
  50445. end;
  50446. function TINT_IEC2.getPMPEIE : TBits_1; inline;
  50447. begin
  50448. getPMPEIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  50449. end;
  50450. procedure TINT_IEC2.setU1BEIE; inline;
  50451. begin
  50452. pTDefRegMap(@Self)^.&set := $00000008;
  50453. end;
  50454. procedure TINT_IEC2.clearU1BEIE; inline;
  50455. begin
  50456. pTDefRegMap(@Self)^.clr := $00000008;
  50457. end;
  50458. procedure TINT_IEC2.setU1BEIE(thebits : TBits_1); inline;
  50459. begin
  50460. if thebits = 0 then
  50461. pTDefRegMap(@Self)^.clr := $00000008
  50462. else
  50463. pTDefRegMap(@Self)^.&set := $00000008;
  50464. end;
  50465. function TINT_IEC2.getU1BEIE : TBits_1; inline;
  50466. begin
  50467. getU1BEIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  50468. end;
  50469. procedure TINT_IEC2.setU1BRXIE; inline;
  50470. begin
  50471. pTDefRegMap(@Self)^.&set := $00000010;
  50472. end;
  50473. procedure TINT_IEC2.clearU1BRXIE; inline;
  50474. begin
  50475. pTDefRegMap(@Self)^.clr := $00000010;
  50476. end;
  50477. procedure TINT_IEC2.setU1BRXIE(thebits : TBits_1); inline;
  50478. begin
  50479. if thebits = 0 then
  50480. pTDefRegMap(@Self)^.clr := $00000010
  50481. else
  50482. pTDefRegMap(@Self)^.&set := $00000010;
  50483. end;
  50484. function TINT_IEC2.getU1BRXIE : TBits_1; inline;
  50485. begin
  50486. getU1BRXIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  50487. end;
  50488. procedure TINT_IEC2.setU1BTXIE; inline;
  50489. begin
  50490. pTDefRegMap(@Self)^.&set := $00000020;
  50491. end;
  50492. procedure TINT_IEC2.clearU1BTXIE; inline;
  50493. begin
  50494. pTDefRegMap(@Self)^.clr := $00000020;
  50495. end;
  50496. procedure TINT_IEC2.setU1BTXIE(thebits : TBits_1); inline;
  50497. begin
  50498. if thebits = 0 then
  50499. pTDefRegMap(@Self)^.clr := $00000020
  50500. else
  50501. pTDefRegMap(@Self)^.&set := $00000020;
  50502. end;
  50503. function TINT_IEC2.getU1BTXIE : TBits_1; inline;
  50504. begin
  50505. getU1BTXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50506. end;
  50507. procedure TINT_IEC2.setU2BEIE; inline;
  50508. begin
  50509. pTDefRegMap(@Self)^.&set := $00000040;
  50510. end;
  50511. procedure TINT_IEC2.clearU2BEIE; inline;
  50512. begin
  50513. pTDefRegMap(@Self)^.clr := $00000040;
  50514. end;
  50515. procedure TINT_IEC2.setU2BEIE(thebits : TBits_1); inline;
  50516. begin
  50517. if thebits = 0 then
  50518. pTDefRegMap(@Self)^.clr := $00000040
  50519. else
  50520. pTDefRegMap(@Self)^.&set := $00000040;
  50521. end;
  50522. function TINT_IEC2.getU2BEIE : TBits_1; inline;
  50523. begin
  50524. getU2BEIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50525. end;
  50526. procedure TINT_IEC2.setU2BRXIE; inline;
  50527. begin
  50528. pTDefRegMap(@Self)^.&set := $00000080;
  50529. end;
  50530. procedure TINT_IEC2.clearU2BRXIE; inline;
  50531. begin
  50532. pTDefRegMap(@Self)^.clr := $00000080;
  50533. end;
  50534. procedure TINT_IEC2.setU2BRXIE(thebits : TBits_1); inline;
  50535. begin
  50536. if thebits = 0 then
  50537. pTDefRegMap(@Self)^.clr := $00000080
  50538. else
  50539. pTDefRegMap(@Self)^.&set := $00000080;
  50540. end;
  50541. function TINT_IEC2.getU2BRXIE : TBits_1; inline;
  50542. begin
  50543. getU2BRXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50544. end;
  50545. procedure TINT_IEC2.setU2BTXIE; inline;
  50546. begin
  50547. pTDefRegMap(@Self)^.&set := $00000100;
  50548. end;
  50549. procedure TINT_IEC2.clearU2BTXIE; inline;
  50550. begin
  50551. pTDefRegMap(@Self)^.clr := $00000100;
  50552. end;
  50553. procedure TINT_IEC2.setU2BTXIE(thebits : TBits_1); inline;
  50554. begin
  50555. if thebits = 0 then
  50556. pTDefRegMap(@Self)^.clr := $00000100
  50557. else
  50558. pTDefRegMap(@Self)^.&set := $00000100;
  50559. end;
  50560. function TINT_IEC2.getU2BTXIE : TBits_1; inline;
  50561. begin
  50562. getU2BTXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50563. end;
  50564. procedure TINT_IEC2.setU3BEIE; inline;
  50565. begin
  50566. pTDefRegMap(@Self)^.&set := $00000200;
  50567. end;
  50568. procedure TINT_IEC2.clearU3BEIE; inline;
  50569. begin
  50570. pTDefRegMap(@Self)^.clr := $00000200;
  50571. end;
  50572. procedure TINT_IEC2.setU3BEIE(thebits : TBits_1); inline;
  50573. begin
  50574. if thebits = 0 then
  50575. pTDefRegMap(@Self)^.clr := $00000200
  50576. else
  50577. pTDefRegMap(@Self)^.&set := $00000200;
  50578. end;
  50579. function TINT_IEC2.getU3BEIE : TBits_1; inline;
  50580. begin
  50581. getU3BEIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50582. end;
  50583. procedure TINT_IEC2.setU3BRXIE; inline;
  50584. begin
  50585. pTDefRegMap(@Self)^.&set := $00000400;
  50586. end;
  50587. procedure TINT_IEC2.clearU3BRXIE; inline;
  50588. begin
  50589. pTDefRegMap(@Self)^.clr := $00000400;
  50590. end;
  50591. procedure TINT_IEC2.setU3BRXIE(thebits : TBits_1); inline;
  50592. begin
  50593. if thebits = 0 then
  50594. pTDefRegMap(@Self)^.clr := $00000400
  50595. else
  50596. pTDefRegMap(@Self)^.&set := $00000400;
  50597. end;
  50598. function TINT_IEC2.getU3BRXIE : TBits_1; inline;
  50599. begin
  50600. getU3BRXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50601. end;
  50602. procedure TINT_IEC2.setU3BTXIE; inline;
  50603. begin
  50604. pTDefRegMap(@Self)^.&set := $00000800;
  50605. end;
  50606. procedure TINT_IEC2.clearU3BTXIE; inline;
  50607. begin
  50608. pTDefRegMap(@Self)^.clr := $00000800;
  50609. end;
  50610. procedure TINT_IEC2.setU3BTXIE(thebits : TBits_1); inline;
  50611. begin
  50612. if thebits = 0 then
  50613. pTDefRegMap(@Self)^.clr := $00000800
  50614. else
  50615. pTDefRegMap(@Self)^.&set := $00000800;
  50616. end;
  50617. function TINT_IEC2.getU3BTXIE : TBits_1; inline;
  50618. begin
  50619. getU3BTXIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  50620. end;
  50621. procedure TINT_IEC2.setU4EIE; inline;
  50622. begin
  50623. pTDefRegMap(@Self)^.&set := $00000008;
  50624. end;
  50625. procedure TINT_IEC2.clearU4EIE; inline;
  50626. begin
  50627. pTDefRegMap(@Self)^.clr := $00000008;
  50628. end;
  50629. procedure TINT_IEC2.setU4EIE(thebits : TBits_1); inline;
  50630. begin
  50631. if thebits = 0 then
  50632. pTDefRegMap(@Self)^.clr := $00000008
  50633. else
  50634. pTDefRegMap(@Self)^.&set := $00000008;
  50635. end;
  50636. function TINT_IEC2.getU4EIE : TBits_1; inline;
  50637. begin
  50638. getU4EIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  50639. end;
  50640. procedure TINT_IEC2.setU4RXIE; inline;
  50641. begin
  50642. pTDefRegMap(@Self)^.&set := $00000010;
  50643. end;
  50644. procedure TINT_IEC2.clearU4RXIE; inline;
  50645. begin
  50646. pTDefRegMap(@Self)^.clr := $00000010;
  50647. end;
  50648. procedure TINT_IEC2.setU4RXIE(thebits : TBits_1); inline;
  50649. begin
  50650. if thebits = 0 then
  50651. pTDefRegMap(@Self)^.clr := $00000010
  50652. else
  50653. pTDefRegMap(@Self)^.&set := $00000010;
  50654. end;
  50655. function TINT_IEC2.getU4RXIE : TBits_1; inline;
  50656. begin
  50657. getU4RXIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  50658. end;
  50659. procedure TINT_IEC2.setU4TXIE; inline;
  50660. begin
  50661. pTDefRegMap(@Self)^.&set := $00000020;
  50662. end;
  50663. procedure TINT_IEC2.clearU4TXIE; inline;
  50664. begin
  50665. pTDefRegMap(@Self)^.clr := $00000020;
  50666. end;
  50667. procedure TINT_IEC2.setU4TXIE(thebits : TBits_1); inline;
  50668. begin
  50669. if thebits = 0 then
  50670. pTDefRegMap(@Self)^.clr := $00000020
  50671. else
  50672. pTDefRegMap(@Self)^.&set := $00000020;
  50673. end;
  50674. function TINT_IEC2.getU4TXIE : TBits_1; inline;
  50675. begin
  50676. getU4TXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50677. end;
  50678. procedure TINT_IEC2.setU6EIE; inline;
  50679. begin
  50680. pTDefRegMap(@Self)^.&set := $00000040;
  50681. end;
  50682. procedure TINT_IEC2.clearU6EIE; inline;
  50683. begin
  50684. pTDefRegMap(@Self)^.clr := $00000040;
  50685. end;
  50686. procedure TINT_IEC2.setU6EIE(thebits : TBits_1); inline;
  50687. begin
  50688. if thebits = 0 then
  50689. pTDefRegMap(@Self)^.clr := $00000040
  50690. else
  50691. pTDefRegMap(@Self)^.&set := $00000040;
  50692. end;
  50693. function TINT_IEC2.getU6EIE : TBits_1; inline;
  50694. begin
  50695. getU6EIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50696. end;
  50697. procedure TINT_IEC2.setU6RXIE; inline;
  50698. begin
  50699. pTDefRegMap(@Self)^.&set := $00000080;
  50700. end;
  50701. procedure TINT_IEC2.clearU6RXIE; inline;
  50702. begin
  50703. pTDefRegMap(@Self)^.clr := $00000080;
  50704. end;
  50705. procedure TINT_IEC2.setU6RXIE(thebits : TBits_1); inline;
  50706. begin
  50707. if thebits = 0 then
  50708. pTDefRegMap(@Self)^.clr := $00000080
  50709. else
  50710. pTDefRegMap(@Self)^.&set := $00000080;
  50711. end;
  50712. function TINT_IEC2.getU6RXIE : TBits_1; inline;
  50713. begin
  50714. getU6RXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50715. end;
  50716. procedure TINT_IEC2.setU6TXIE; inline;
  50717. begin
  50718. pTDefRegMap(@Self)^.&set := $00000100;
  50719. end;
  50720. procedure TINT_IEC2.clearU6TXIE; inline;
  50721. begin
  50722. pTDefRegMap(@Self)^.clr := $00000100;
  50723. end;
  50724. procedure TINT_IEC2.setU6TXIE(thebits : TBits_1); inline;
  50725. begin
  50726. if thebits = 0 then
  50727. pTDefRegMap(@Self)^.clr := $00000100
  50728. else
  50729. pTDefRegMap(@Self)^.&set := $00000100;
  50730. end;
  50731. function TINT_IEC2.getU6TXIE : TBits_1; inline;
  50732. begin
  50733. getU6TXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50734. end;
  50735. procedure TINT_IEC2.setU5EIE; inline;
  50736. begin
  50737. pTDefRegMap(@Self)^.&set := $00000200;
  50738. end;
  50739. procedure TINT_IEC2.clearU5EIE; inline;
  50740. begin
  50741. pTDefRegMap(@Self)^.clr := $00000200;
  50742. end;
  50743. procedure TINT_IEC2.setU5EIE(thebits : TBits_1); inline;
  50744. begin
  50745. if thebits = 0 then
  50746. pTDefRegMap(@Self)^.clr := $00000200
  50747. else
  50748. pTDefRegMap(@Self)^.&set := $00000200;
  50749. end;
  50750. function TINT_IEC2.getU5EIE : TBits_1; inline;
  50751. begin
  50752. getU5EIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50753. end;
  50754. procedure TINT_IEC2.setU5RXIE; inline;
  50755. begin
  50756. pTDefRegMap(@Self)^.&set := $00000400;
  50757. end;
  50758. procedure TINT_IEC2.clearU5RXIE; inline;
  50759. begin
  50760. pTDefRegMap(@Self)^.clr := $00000400;
  50761. end;
  50762. procedure TINT_IEC2.setU5RXIE(thebits : TBits_1); inline;
  50763. begin
  50764. if thebits = 0 then
  50765. pTDefRegMap(@Self)^.clr := $00000400
  50766. else
  50767. pTDefRegMap(@Self)^.&set := $00000400;
  50768. end;
  50769. function TINT_IEC2.getU5RXIE : TBits_1; inline;
  50770. begin
  50771. getU5RXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50772. end;
  50773. procedure TINT_IEC2.setU5TXIE; inline;
  50774. begin
  50775. pTDefRegMap(@Self)^.&set := $00000800;
  50776. end;
  50777. procedure TINT_IEC2.clearU5TXIE; inline;
  50778. begin
  50779. pTDefRegMap(@Self)^.clr := $00000800;
  50780. end;
  50781. procedure TINT_IEC2.setU5TXIE(thebits : TBits_1); inline;
  50782. begin
  50783. if thebits = 0 then
  50784. pTDefRegMap(@Self)^.clr := $00000800
  50785. else
  50786. pTDefRegMap(@Self)^.&set := $00000800;
  50787. end;
  50788. function TINT_IEC2.getU5TXIE : TBits_1; inline;
  50789. begin
  50790. getU5TXIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  50791. end;
  50792. procedure TINT_IEC2.setw(thebits : TBits_32); inline;
  50793. begin
  50794. pTDefRegMap(@Self)^.val := thebits;
  50795. end;
  50796. function TINT_IEC2.getw : TBits_32; inline;
  50797. begin
  50798. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50799. end;
  50800. procedure TINT_IPC0.setCTIS(thebits : TBits_2); inline;
  50801. begin
  50802. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50803. end;
  50804. function TINT_IPC0.getCTIS : TBits_2; inline;
  50805. begin
  50806. getCTIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50807. end;
  50808. procedure TINT_IPC0.setCTIP(thebits : TBits_3); inline;
  50809. begin
  50810. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50811. end;
  50812. function TINT_IPC0.getCTIP : TBits_3; inline;
  50813. begin
  50814. getCTIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50815. end;
  50816. procedure TINT_IPC0.setCS0IS(thebits : TBits_2); inline;
  50817. begin
  50818. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50819. end;
  50820. function TINT_IPC0.getCS0IS : TBits_2; inline;
  50821. begin
  50822. getCS0IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50823. end;
  50824. procedure TINT_IPC0.setCS0IP(thebits : TBits_3); inline;
  50825. begin
  50826. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  50827. end;
  50828. function TINT_IPC0.getCS0IP : TBits_3; inline;
  50829. begin
  50830. getCS0IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  50831. end;
  50832. procedure TINT_IPC0.setCS1IS(thebits : TBits_2); inline;
  50833. begin
  50834. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  50835. end;
  50836. function TINT_IPC0.getCS1IS : TBits_2; inline;
  50837. begin
  50838. getCS1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  50839. end;
  50840. procedure TINT_IPC0.setCS1IP(thebits : TBits_3); inline;
  50841. begin
  50842. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50843. end;
  50844. function TINT_IPC0.getCS1IP : TBits_3; inline;
  50845. begin
  50846. getCS1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50847. end;
  50848. procedure TINT_IPC0.setINT0IS(thebits : TBits_2); inline;
  50849. begin
  50850. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50851. end;
  50852. function TINT_IPC0.getINT0IS : TBits_2; inline;
  50853. begin
  50854. getINT0IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50855. end;
  50856. procedure TINT_IPC0.setINT0IP(thebits : TBits_3); inline;
  50857. begin
  50858. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50859. end;
  50860. function TINT_IPC0.getINT0IP : TBits_3; inline;
  50861. begin
  50862. getINT0IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50863. end;
  50864. procedure TINT_IPC0.setw(thebits : TBits_32); inline;
  50865. begin
  50866. pTDefRegMap(@Self)^.val := thebits;
  50867. end;
  50868. function TINT_IPC0.getw : TBits_32; inline;
  50869. begin
  50870. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50871. end;
  50872. procedure TINT_IPC1.setT1IS(thebits : TBits_2); inline;
  50873. begin
  50874. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50875. end;
  50876. function TINT_IPC1.getT1IS : TBits_2; inline;
  50877. begin
  50878. getT1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50879. end;
  50880. procedure TINT_IPC1.setT1IP(thebits : TBits_3); inline;
  50881. begin
  50882. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50883. end;
  50884. function TINT_IPC1.getT1IP : TBits_3; inline;
  50885. begin
  50886. getT1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50887. end;
  50888. procedure TINT_IPC1.setIC1IS(thebits : TBits_2); inline;
  50889. begin
  50890. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50891. end;
  50892. function TINT_IPC1.getIC1IS : TBits_2; inline;
  50893. begin
  50894. getIC1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50895. end;
  50896. procedure TINT_IPC1.setIC1IP(thebits : TBits_3); inline;
  50897. begin
  50898. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  50899. end;
  50900. function TINT_IPC1.getIC1IP : TBits_3; inline;
  50901. begin
  50902. getIC1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  50903. end;
  50904. procedure TINT_IPC1.setOC1IS(thebits : TBits_2); inline;
  50905. begin
  50906. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  50907. end;
  50908. function TINT_IPC1.getOC1IS : TBits_2; inline;
  50909. begin
  50910. getOC1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  50911. end;
  50912. procedure TINT_IPC1.setOC1IP(thebits : TBits_3); inline;
  50913. begin
  50914. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50915. end;
  50916. function TINT_IPC1.getOC1IP : TBits_3; inline;
  50917. begin
  50918. getOC1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50919. end;
  50920. procedure TINT_IPC1.setINT1IS(thebits : TBits_2); inline;
  50921. begin
  50922. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50923. end;
  50924. function TINT_IPC1.getINT1IS : TBits_2; inline;
  50925. begin
  50926. getINT1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50927. end;
  50928. procedure TINT_IPC1.setINT1IP(thebits : TBits_3); inline;
  50929. begin
  50930. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50931. end;
  50932. function TINT_IPC1.getINT1IP : TBits_3; inline;
  50933. begin
  50934. getINT1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50935. end;
  50936. procedure TINT_IPC1.setw(thebits : TBits_32); inline;
  50937. begin
  50938. pTDefRegMap(@Self)^.val := thebits;
  50939. end;
  50940. function TINT_IPC1.getw : TBits_32; inline;
  50941. begin
  50942. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50943. end;
  50944. procedure TINT_IPC2.setT2IS(thebits : TBits_2); inline;
  50945. begin
  50946. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50947. end;
  50948. function TINT_IPC2.getT2IS : TBits_2; inline;
  50949. begin
  50950. getT2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50951. end;
  50952. procedure TINT_IPC2.setT2IP(thebits : TBits_3); inline;
  50953. begin
  50954. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50955. end;
  50956. function TINT_IPC2.getT2IP : TBits_3; inline;
  50957. begin
  50958. getT2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50959. end;
  50960. procedure TINT_IPC2.setIC2IS(thebits : TBits_2); inline;
  50961. begin
  50962. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50963. end;
  50964. function TINT_IPC2.getIC2IS : TBits_2; inline;
  50965. begin
  50966. getIC2IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50967. end;
  50968. procedure TINT_IPC2.setIC2IP(thebits : TBits_3); inline;
  50969. begin
  50970. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  50971. end;
  50972. function TINT_IPC2.getIC2IP : TBits_3; inline;
  50973. begin
  50974. getIC2IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  50975. end;
  50976. procedure TINT_IPC2.setOC2IS(thebits : TBits_2); inline;
  50977. begin
  50978. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  50979. end;
  50980. function TINT_IPC2.getOC2IS : TBits_2; inline;
  50981. begin
  50982. getOC2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  50983. end;
  50984. procedure TINT_IPC2.setOC2IP(thebits : TBits_3); inline;
  50985. begin
  50986. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50987. end;
  50988. function TINT_IPC2.getOC2IP : TBits_3; inline;
  50989. begin
  50990. getOC2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50991. end;
  50992. procedure TINT_IPC2.setINT2IS(thebits : TBits_2); inline;
  50993. begin
  50994. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50995. end;
  50996. function TINT_IPC2.getINT2IS : TBits_2; inline;
  50997. begin
  50998. getINT2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50999. end;
  51000. procedure TINT_IPC2.setINT2IP(thebits : TBits_3); inline;
  51001. begin
  51002. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51003. end;
  51004. function TINT_IPC2.getINT2IP : TBits_3; inline;
  51005. begin
  51006. getINT2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51007. end;
  51008. procedure TINT_IPC2.setw(thebits : TBits_32); inline;
  51009. begin
  51010. pTDefRegMap(@Self)^.val := thebits;
  51011. end;
  51012. function TINT_IPC2.getw : TBits_32; inline;
  51013. begin
  51014. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51015. end;
  51016. procedure TINT_IPC3.setT3IS(thebits : TBits_2); inline;
  51017. begin
  51018. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51019. end;
  51020. function TINT_IPC3.getT3IS : TBits_2; inline;
  51021. begin
  51022. getT3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51023. end;
  51024. procedure TINT_IPC3.setT3IP(thebits : TBits_3); inline;
  51025. begin
  51026. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51027. end;
  51028. function TINT_IPC3.getT3IP : TBits_3; inline;
  51029. begin
  51030. getT3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51031. end;
  51032. procedure TINT_IPC3.setIC3IS(thebits : TBits_2); inline;
  51033. begin
  51034. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51035. end;
  51036. function TINT_IPC3.getIC3IS : TBits_2; inline;
  51037. begin
  51038. getIC3IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51039. end;
  51040. procedure TINT_IPC3.setIC3IP(thebits : TBits_3); inline;
  51041. begin
  51042. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51043. end;
  51044. function TINT_IPC3.getIC3IP : TBits_3; inline;
  51045. begin
  51046. getIC3IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51047. end;
  51048. procedure TINT_IPC3.setOC3IS(thebits : TBits_2); inline;
  51049. begin
  51050. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51051. end;
  51052. function TINT_IPC3.getOC3IS : TBits_2; inline;
  51053. begin
  51054. getOC3IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51055. end;
  51056. procedure TINT_IPC3.setOC3IP(thebits : TBits_3); inline;
  51057. begin
  51058. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51059. end;
  51060. function TINT_IPC3.getOC3IP : TBits_3; inline;
  51061. begin
  51062. getOC3IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51063. end;
  51064. procedure TINT_IPC3.setINT3IS(thebits : TBits_2); inline;
  51065. begin
  51066. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51067. end;
  51068. function TINT_IPC3.getINT3IS : TBits_2; inline;
  51069. begin
  51070. getINT3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51071. end;
  51072. procedure TINT_IPC3.setINT3IP(thebits : TBits_3); inline;
  51073. begin
  51074. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51075. end;
  51076. function TINT_IPC3.getINT3IP : TBits_3; inline;
  51077. begin
  51078. getINT3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51079. end;
  51080. procedure TINT_IPC3.setw(thebits : TBits_32); inline;
  51081. begin
  51082. pTDefRegMap(@Self)^.val := thebits;
  51083. end;
  51084. function TINT_IPC3.getw : TBits_32; inline;
  51085. begin
  51086. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51087. end;
  51088. procedure TINT_IPC4.setT4IS(thebits : TBits_2); inline;
  51089. begin
  51090. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51091. end;
  51092. function TINT_IPC4.getT4IS : TBits_2; inline;
  51093. begin
  51094. getT4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51095. end;
  51096. procedure TINT_IPC4.setT4IP(thebits : TBits_3); inline;
  51097. begin
  51098. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51099. end;
  51100. function TINT_IPC4.getT4IP : TBits_3; inline;
  51101. begin
  51102. getT4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51103. end;
  51104. procedure TINT_IPC4.setIC4IS(thebits : TBits_2); inline;
  51105. begin
  51106. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51107. end;
  51108. function TINT_IPC4.getIC4IS : TBits_2; inline;
  51109. begin
  51110. getIC4IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51111. end;
  51112. procedure TINT_IPC4.setIC4IP(thebits : TBits_3); inline;
  51113. begin
  51114. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51115. end;
  51116. function TINT_IPC4.getIC4IP : TBits_3; inline;
  51117. begin
  51118. getIC4IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51119. end;
  51120. procedure TINT_IPC4.setOC4IS(thebits : TBits_2); inline;
  51121. begin
  51122. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51123. end;
  51124. function TINT_IPC4.getOC4IS : TBits_2; inline;
  51125. begin
  51126. getOC4IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51127. end;
  51128. procedure TINT_IPC4.setOC4IP(thebits : TBits_3); inline;
  51129. begin
  51130. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51131. end;
  51132. function TINT_IPC4.getOC4IP : TBits_3; inline;
  51133. begin
  51134. getOC4IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51135. end;
  51136. procedure TINT_IPC4.setINT4IS(thebits : TBits_2); inline;
  51137. begin
  51138. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51139. end;
  51140. function TINT_IPC4.getINT4IS : TBits_2; inline;
  51141. begin
  51142. getINT4IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51143. end;
  51144. procedure TINT_IPC4.setINT4IP(thebits : TBits_3); inline;
  51145. begin
  51146. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51147. end;
  51148. function TINT_IPC4.getINT4IP : TBits_3; inline;
  51149. begin
  51150. getINT4IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51151. end;
  51152. procedure TINT_IPC4.setw(thebits : TBits_32); inline;
  51153. begin
  51154. pTDefRegMap(@Self)^.val := thebits;
  51155. end;
  51156. function TINT_IPC4.getw : TBits_32; inline;
  51157. begin
  51158. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51159. end;
  51160. procedure TINT_IPC5.setT5IS(thebits : TBits_2); inline;
  51161. begin
  51162. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51163. end;
  51164. function TINT_IPC5.getT5IS : TBits_2; inline;
  51165. begin
  51166. getT5IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51167. end;
  51168. procedure TINT_IPC5.setT5IP(thebits : TBits_3); inline;
  51169. begin
  51170. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51171. end;
  51172. function TINT_IPC5.getT5IP : TBits_3; inline;
  51173. begin
  51174. getT5IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51175. end;
  51176. procedure TINT_IPC5.setIC5IS(thebits : TBits_2); inline;
  51177. begin
  51178. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51179. end;
  51180. function TINT_IPC5.getIC5IS : TBits_2; inline;
  51181. begin
  51182. getIC5IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51183. end;
  51184. procedure TINT_IPC5.setIC5IP(thebits : TBits_3); inline;
  51185. begin
  51186. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51187. end;
  51188. function TINT_IPC5.getIC5IP : TBits_3; inline;
  51189. begin
  51190. getIC5IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51191. end;
  51192. procedure TINT_IPC5.setOC5IS(thebits : TBits_2); inline;
  51193. begin
  51194. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51195. end;
  51196. function TINT_IPC5.getOC5IS : TBits_2; inline;
  51197. begin
  51198. getOC5IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51199. end;
  51200. procedure TINT_IPC5.setOC5IP(thebits : TBits_3); inline;
  51201. begin
  51202. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51203. end;
  51204. function TINT_IPC5.getOC5IP : TBits_3; inline;
  51205. begin
  51206. getOC5IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51207. end;
  51208. procedure TINT_IPC5.setw(thebits : TBits_32); inline;
  51209. begin
  51210. pTDefRegMap(@Self)^.val := thebits;
  51211. end;
  51212. function TINT_IPC5.getw : TBits_32; inline;
  51213. begin
  51214. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51215. end;
  51216. procedure TINT_IPC6.setU1IS(thebits : TBits_2); inline;
  51217. begin
  51218. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51219. end;
  51220. function TINT_IPC6.getU1IS : TBits_2; inline;
  51221. begin
  51222. getU1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51223. end;
  51224. procedure TINT_IPC6.setU1IP(thebits : TBits_3); inline;
  51225. begin
  51226. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51227. end;
  51228. function TINT_IPC6.getU1IP : TBits_3; inline;
  51229. begin
  51230. getU1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51231. end;
  51232. procedure TINT_IPC6.setI2C1IS(thebits : TBits_2); inline;
  51233. begin
  51234. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51235. end;
  51236. function TINT_IPC6.getI2C1IS : TBits_2; inline;
  51237. begin
  51238. getI2C1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51239. end;
  51240. procedure TINT_IPC6.setI2C1IP(thebits : TBits_3); inline;
  51241. begin
  51242. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51243. end;
  51244. function TINT_IPC6.getI2C1IP : TBits_3; inline;
  51245. begin
  51246. getI2C1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51247. end;
  51248. procedure TINT_IPC6.setCNIS(thebits : TBits_2); inline;
  51249. begin
  51250. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51251. end;
  51252. function TINT_IPC6.getCNIS : TBits_2; inline;
  51253. begin
  51254. getCNIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51255. end;
  51256. procedure TINT_IPC6.setCNIP(thebits : TBits_3); inline;
  51257. begin
  51258. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51259. end;
  51260. function TINT_IPC6.getCNIP : TBits_3; inline;
  51261. begin
  51262. getCNIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51263. end;
  51264. procedure TINT_IPC6.setAD1IS(thebits : TBits_2); inline;
  51265. begin
  51266. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51267. end;
  51268. function TINT_IPC6.getAD1IS : TBits_2; inline;
  51269. begin
  51270. getAD1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51271. end;
  51272. procedure TINT_IPC6.setAD1IP(thebits : TBits_3); inline;
  51273. begin
  51274. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51275. end;
  51276. function TINT_IPC6.getAD1IP : TBits_3; inline;
  51277. begin
  51278. getAD1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51279. end;
  51280. procedure TINT_IPC6.setU1AIS(thebits : TBits_2); inline;
  51281. begin
  51282. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51283. end;
  51284. function TINT_IPC6.getU1AIS : TBits_2; inline;
  51285. begin
  51286. getU1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51287. end;
  51288. procedure TINT_IPC6.setU1AIP(thebits : TBits_3); inline;
  51289. begin
  51290. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51291. end;
  51292. function TINT_IPC6.getU1AIP : TBits_3; inline;
  51293. begin
  51294. getU1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51295. end;
  51296. procedure TINT_IPC6.setSPI3IS(thebits : TBits_2); inline;
  51297. begin
  51298. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51299. end;
  51300. function TINT_IPC6.getSPI3IS : TBits_2; inline;
  51301. begin
  51302. getSPI3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51303. end;
  51304. procedure TINT_IPC6.setSPI3IP(thebits : TBits_3); inline;
  51305. begin
  51306. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51307. end;
  51308. function TINT_IPC6.getSPI3IP : TBits_3; inline;
  51309. begin
  51310. getSPI3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51311. end;
  51312. procedure TINT_IPC6.setSPI1AIS(thebits : TBits_2); inline;
  51313. begin
  51314. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51315. end;
  51316. function TINT_IPC6.getSPI1AIS : TBits_2; inline;
  51317. begin
  51318. getSPI1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51319. end;
  51320. procedure TINT_IPC6.setSPI1AIP(thebits : TBits_3); inline;
  51321. begin
  51322. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51323. end;
  51324. function TINT_IPC6.getSPI1AIP : TBits_3; inline;
  51325. begin
  51326. getSPI1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51327. end;
  51328. procedure TINT_IPC6.setI2C3IS(thebits : TBits_2); inline;
  51329. begin
  51330. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51331. end;
  51332. function TINT_IPC6.getI2C3IS : TBits_2; inline;
  51333. begin
  51334. getI2C3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51335. end;
  51336. procedure TINT_IPC6.setI2C3IP(thebits : TBits_3); inline;
  51337. begin
  51338. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51339. end;
  51340. function TINT_IPC6.getI2C3IP : TBits_3; inline;
  51341. begin
  51342. getI2C3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51343. end;
  51344. procedure TINT_IPC6.setI2C1AIS(thebits : TBits_2); inline;
  51345. begin
  51346. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51347. end;
  51348. function TINT_IPC6.getI2C1AIS : TBits_2; inline;
  51349. begin
  51350. getI2C1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51351. end;
  51352. procedure TINT_IPC6.setI2C1AIP(thebits : TBits_3); inline;
  51353. begin
  51354. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51355. end;
  51356. function TINT_IPC6.getI2C1AIP : TBits_3; inline;
  51357. begin
  51358. getI2C1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51359. end;
  51360. procedure TINT_IPC6.setw(thebits : TBits_32); inline;
  51361. begin
  51362. pTDefRegMap(@Self)^.val := thebits;
  51363. end;
  51364. function TINT_IPC6.getw : TBits_32; inline;
  51365. begin
  51366. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51367. end;
  51368. procedure TINT_IPC7.setPMPIS(thebits : TBits_2); inline;
  51369. begin
  51370. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51371. end;
  51372. function TINT_IPC7.getPMPIS : TBits_2; inline;
  51373. begin
  51374. getPMPIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51375. end;
  51376. procedure TINT_IPC7.setPMPIP(thebits : TBits_3); inline;
  51377. begin
  51378. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51379. end;
  51380. function TINT_IPC7.getPMPIP : TBits_3; inline;
  51381. begin
  51382. getPMPIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51383. end;
  51384. procedure TINT_IPC7.setCMP1IS(thebits : TBits_2); inline;
  51385. begin
  51386. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51387. end;
  51388. function TINT_IPC7.getCMP1IS : TBits_2; inline;
  51389. begin
  51390. getCMP1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51391. end;
  51392. procedure TINT_IPC7.setCMP1IP(thebits : TBits_3); inline;
  51393. begin
  51394. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51395. end;
  51396. function TINT_IPC7.getCMP1IP : TBits_3; inline;
  51397. begin
  51398. getCMP1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51399. end;
  51400. procedure TINT_IPC7.setCMP2IS(thebits : TBits_2); inline;
  51401. begin
  51402. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51403. end;
  51404. function TINT_IPC7.getCMP2IS : TBits_2; inline;
  51405. begin
  51406. getCMP2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51407. end;
  51408. procedure TINT_IPC7.setCMP2IP(thebits : TBits_3); inline;
  51409. begin
  51410. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51411. end;
  51412. function TINT_IPC7.getCMP2IP : TBits_3; inline;
  51413. begin
  51414. getCMP2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51415. end;
  51416. procedure TINT_IPC7.setU3IS(thebits : TBits_2); inline;
  51417. begin
  51418. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51419. end;
  51420. function TINT_IPC7.getU3IS : TBits_2; inline;
  51421. begin
  51422. getU3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51423. end;
  51424. procedure TINT_IPC7.setU3IP(thebits : TBits_3); inline;
  51425. begin
  51426. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51427. end;
  51428. function TINT_IPC7.getU3IP : TBits_3; inline;
  51429. begin
  51430. getU3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51431. end;
  51432. procedure TINT_IPC7.setU2AIS(thebits : TBits_2); inline;
  51433. begin
  51434. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51435. end;
  51436. function TINT_IPC7.getU2AIS : TBits_2; inline;
  51437. begin
  51438. getU2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51439. end;
  51440. procedure TINT_IPC7.setU2AIP(thebits : TBits_3); inline;
  51441. begin
  51442. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51443. end;
  51444. function TINT_IPC7.getU2AIP : TBits_3; inline;
  51445. begin
  51446. getU2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51447. end;
  51448. procedure TINT_IPC7.setSPI2IS(thebits : TBits_2); inline;
  51449. begin
  51450. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51451. end;
  51452. function TINT_IPC7.getSPI2IS : TBits_2; inline;
  51453. begin
  51454. getSPI2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51455. end;
  51456. procedure TINT_IPC7.setSPI2IP(thebits : TBits_3); inline;
  51457. begin
  51458. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51459. end;
  51460. function TINT_IPC7.getSPI2IP : TBits_3; inline;
  51461. begin
  51462. getSPI2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51463. end;
  51464. procedure TINT_IPC7.setSPI2AIS(thebits : TBits_2); inline;
  51465. begin
  51466. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51467. end;
  51468. function TINT_IPC7.getSPI2AIS : TBits_2; inline;
  51469. begin
  51470. getSPI2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51471. end;
  51472. procedure TINT_IPC7.setSPI2AIP(thebits : TBits_3); inline;
  51473. begin
  51474. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51475. end;
  51476. function TINT_IPC7.getSPI2AIP : TBits_3; inline;
  51477. begin
  51478. getSPI2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51479. end;
  51480. procedure TINT_IPC7.setI2C4IS(thebits : TBits_2); inline;
  51481. begin
  51482. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51483. end;
  51484. function TINT_IPC7.getI2C4IS : TBits_2; inline;
  51485. begin
  51486. getI2C4IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51487. end;
  51488. procedure TINT_IPC7.setI2C4IP(thebits : TBits_3); inline;
  51489. begin
  51490. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51491. end;
  51492. function TINT_IPC7.getI2C4IP : TBits_3; inline;
  51493. begin
  51494. getI2C4IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51495. end;
  51496. procedure TINT_IPC7.setI2C2AIS(thebits : TBits_2); inline;
  51497. begin
  51498. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51499. end;
  51500. function TINT_IPC7.getI2C2AIS : TBits_2; inline;
  51501. begin
  51502. getI2C2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51503. end;
  51504. procedure TINT_IPC7.setI2C2AIP(thebits : TBits_3); inline;
  51505. begin
  51506. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51507. end;
  51508. function TINT_IPC7.getI2C2AIP : TBits_3; inline;
  51509. begin
  51510. getI2C2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51511. end;
  51512. procedure TINT_IPC7.setw(thebits : TBits_32); inline;
  51513. begin
  51514. pTDefRegMap(@Self)^.val := thebits;
  51515. end;
  51516. function TINT_IPC7.getw : TBits_32; inline;
  51517. begin
  51518. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51519. end;
  51520. procedure TINT_IPC8.setU2IS(thebits : TBits_2); inline;
  51521. begin
  51522. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51523. end;
  51524. function TINT_IPC8.getU2IS : TBits_2; inline;
  51525. begin
  51526. getU2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51527. end;
  51528. procedure TINT_IPC8.setU2IP(thebits : TBits_3); inline;
  51529. begin
  51530. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51531. end;
  51532. function TINT_IPC8.getU2IP : TBits_3; inline;
  51533. begin
  51534. getU2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51535. end;
  51536. procedure TINT_IPC8.setFSCMIS(thebits : TBits_2); inline;
  51537. begin
  51538. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51539. end;
  51540. function TINT_IPC8.getFSCMIS : TBits_2; inline;
  51541. begin
  51542. getFSCMIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51543. end;
  51544. procedure TINT_IPC8.setFSCMIP(thebits : TBits_3); inline;
  51545. begin
  51546. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51547. end;
  51548. function TINT_IPC8.getFSCMIP : TBits_3; inline;
  51549. begin
  51550. getFSCMIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51551. end;
  51552. procedure TINT_IPC8.setRTCCIS(thebits : TBits_2); inline;
  51553. begin
  51554. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51555. end;
  51556. function TINT_IPC8.getRTCCIS : TBits_2; inline;
  51557. begin
  51558. getRTCCIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51559. end;
  51560. procedure TINT_IPC8.setRTCCIP(thebits : TBits_3); inline;
  51561. begin
  51562. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51563. end;
  51564. function TINT_IPC8.getRTCCIP : TBits_3; inline;
  51565. begin
  51566. getRTCCIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51567. end;
  51568. procedure TINT_IPC8.setU3AIS(thebits : TBits_2); inline;
  51569. begin
  51570. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51571. end;
  51572. function TINT_IPC8.getU3AIS : TBits_2; inline;
  51573. begin
  51574. getU3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51575. end;
  51576. procedure TINT_IPC8.setU3AIP(thebits : TBits_3); inline;
  51577. begin
  51578. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51579. end;
  51580. function TINT_IPC8.getU3AIP : TBits_3; inline;
  51581. begin
  51582. getU3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51583. end;
  51584. procedure TINT_IPC8.setSPI4IS(thebits : TBits_2); inline;
  51585. begin
  51586. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51587. end;
  51588. function TINT_IPC8.getSPI4IS : TBits_2; inline;
  51589. begin
  51590. getSPI4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51591. end;
  51592. procedure TINT_IPC8.setSPI4IP(thebits : TBits_3); inline;
  51593. begin
  51594. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51595. end;
  51596. function TINT_IPC8.getSPI4IP : TBits_3; inline;
  51597. begin
  51598. getSPI4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51599. end;
  51600. procedure TINT_IPC8.setSPI3AIS(thebits : TBits_2); inline;
  51601. begin
  51602. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51603. end;
  51604. function TINT_IPC8.getSPI3AIS : TBits_2; inline;
  51605. begin
  51606. getSPI3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51607. end;
  51608. procedure TINT_IPC8.setSPI3AIP(thebits : TBits_3); inline;
  51609. begin
  51610. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51611. end;
  51612. function TINT_IPC8.getSPI3AIP : TBits_3; inline;
  51613. begin
  51614. getSPI3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51615. end;
  51616. procedure TINT_IPC8.setI2C5IS(thebits : TBits_2); inline;
  51617. begin
  51618. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51619. end;
  51620. function TINT_IPC8.getI2C5IS : TBits_2; inline;
  51621. begin
  51622. getI2C5IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51623. end;
  51624. procedure TINT_IPC8.setI2C5IP(thebits : TBits_3); inline;
  51625. begin
  51626. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51627. end;
  51628. function TINT_IPC8.getI2C5IP : TBits_3; inline;
  51629. begin
  51630. getI2C5IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51631. end;
  51632. procedure TINT_IPC8.setI2C3AIS(thebits : TBits_2); inline;
  51633. begin
  51634. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51635. end;
  51636. function TINT_IPC8.getI2C3AIS : TBits_2; inline;
  51637. begin
  51638. getI2C3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51639. end;
  51640. procedure TINT_IPC8.setI2C3AIP(thebits : TBits_3); inline;
  51641. begin
  51642. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51643. end;
  51644. function TINT_IPC8.getI2C3AIP : TBits_3; inline;
  51645. begin
  51646. getI2C3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51647. end;
  51648. procedure TINT_IPC8.setw(thebits : TBits_32); inline;
  51649. begin
  51650. pTDefRegMap(@Self)^.val := thebits;
  51651. end;
  51652. function TINT_IPC8.getw : TBits_32; inline;
  51653. begin
  51654. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51655. end;
  51656. procedure TINT_IPC9.setDMA0IS(thebits : TBits_2); inline;
  51657. begin
  51658. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51659. end;
  51660. function TINT_IPC9.getDMA0IS : TBits_2; inline;
  51661. begin
  51662. getDMA0IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51663. end;
  51664. procedure TINT_IPC9.setDMA0IP(thebits : TBits_3); inline;
  51665. begin
  51666. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51667. end;
  51668. function TINT_IPC9.getDMA0IP : TBits_3; inline;
  51669. begin
  51670. getDMA0IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51671. end;
  51672. procedure TINT_IPC9.setDMA1IS(thebits : TBits_2); inline;
  51673. begin
  51674. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51675. end;
  51676. function TINT_IPC9.getDMA1IS : TBits_2; inline;
  51677. begin
  51678. getDMA1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51679. end;
  51680. procedure TINT_IPC9.setDMA1IP(thebits : TBits_3); inline;
  51681. begin
  51682. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51683. end;
  51684. function TINT_IPC9.getDMA1IP : TBits_3; inline;
  51685. begin
  51686. getDMA1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51687. end;
  51688. procedure TINT_IPC9.setDMA2IS(thebits : TBits_2); inline;
  51689. begin
  51690. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51691. end;
  51692. function TINT_IPC9.getDMA2IS : TBits_2; inline;
  51693. begin
  51694. getDMA2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51695. end;
  51696. procedure TINT_IPC9.setDMA2IP(thebits : TBits_3); inline;
  51697. begin
  51698. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51699. end;
  51700. function TINT_IPC9.getDMA2IP : TBits_3; inline;
  51701. begin
  51702. getDMA2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51703. end;
  51704. procedure TINT_IPC9.setDMA3IS(thebits : TBits_2); inline;
  51705. begin
  51706. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51707. end;
  51708. function TINT_IPC9.getDMA3IS : TBits_2; inline;
  51709. begin
  51710. getDMA3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51711. end;
  51712. procedure TINT_IPC9.setDMA3IP(thebits : TBits_3); inline;
  51713. begin
  51714. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51715. end;
  51716. function TINT_IPC9.getDMA3IP : TBits_3; inline;
  51717. begin
  51718. getDMA3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51719. end;
  51720. procedure TINT_IPC9.setw(thebits : TBits_32); inline;
  51721. begin
  51722. pTDefRegMap(@Self)^.val := thebits;
  51723. end;
  51724. function TINT_IPC9.getw : TBits_32; inline;
  51725. begin
  51726. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51727. end;
  51728. procedure TINT_IPC10.setDMA4IS(thebits : TBits_2); inline;
  51729. begin
  51730. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51731. end;
  51732. function TINT_IPC10.getDMA4IS : TBits_2; inline;
  51733. begin
  51734. getDMA4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51735. end;
  51736. procedure TINT_IPC10.setDMA4IP(thebits : TBits_3); inline;
  51737. begin
  51738. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51739. end;
  51740. function TINT_IPC10.getDMA4IP : TBits_3; inline;
  51741. begin
  51742. getDMA4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51743. end;
  51744. procedure TINT_IPC10.setDMA5IS(thebits : TBits_2); inline;
  51745. begin
  51746. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51747. end;
  51748. function TINT_IPC10.getDMA5IS : TBits_2; inline;
  51749. begin
  51750. getDMA5IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51751. end;
  51752. procedure TINT_IPC10.setDMA5IP(thebits : TBits_3); inline;
  51753. begin
  51754. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51755. end;
  51756. function TINT_IPC10.getDMA5IP : TBits_3; inline;
  51757. begin
  51758. getDMA5IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51759. end;
  51760. procedure TINT_IPC10.setDMA6IS(thebits : TBits_2); inline;
  51761. begin
  51762. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51763. end;
  51764. function TINT_IPC10.getDMA6IS : TBits_2; inline;
  51765. begin
  51766. getDMA6IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51767. end;
  51768. procedure TINT_IPC10.setDMA6IP(thebits : TBits_3); inline;
  51769. begin
  51770. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51771. end;
  51772. function TINT_IPC10.getDMA6IP : TBits_3; inline;
  51773. begin
  51774. getDMA6IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51775. end;
  51776. procedure TINT_IPC10.setDMA7IS(thebits : TBits_2); inline;
  51777. begin
  51778. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51779. end;
  51780. function TINT_IPC10.getDMA7IS : TBits_2; inline;
  51781. begin
  51782. getDMA7IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51783. end;
  51784. procedure TINT_IPC10.setDMA7IP(thebits : TBits_3); inline;
  51785. begin
  51786. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51787. end;
  51788. function TINT_IPC10.getDMA7IP : TBits_3; inline;
  51789. begin
  51790. getDMA7IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51791. end;
  51792. procedure TINT_IPC10.setw(thebits : TBits_32); inline;
  51793. begin
  51794. pTDefRegMap(@Self)^.val := thebits;
  51795. end;
  51796. function TINT_IPC10.getw : TBits_32; inline;
  51797. begin
  51798. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51799. end;
  51800. procedure TINT_IPC11.setFCEIS(thebits : TBits_2); inline;
  51801. begin
  51802. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51803. end;
  51804. function TINT_IPC11.getFCEIS : TBits_2; inline;
  51805. begin
  51806. getFCEIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51807. end;
  51808. procedure TINT_IPC11.setFCEIP(thebits : TBits_3); inline;
  51809. begin
  51810. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  51811. end;
  51812. function TINT_IPC11.getFCEIP : TBits_3; inline;
  51813. begin
  51814. getFCEIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  51815. end;
  51816. procedure TINT_IPC11.setUSBIS(thebits : TBits_2); inline;
  51817. begin
  51818. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51819. end;
  51820. function TINT_IPC11.getUSBIS : TBits_2; inline;
  51821. begin
  51822. getUSBIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51823. end;
  51824. procedure TINT_IPC11.setUSBIP(thebits : TBits_3); inline;
  51825. begin
  51826. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51827. end;
  51828. function TINT_IPC11.getUSBIP : TBits_3; inline;
  51829. begin
  51830. getUSBIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51831. end;
  51832. procedure TINT_IPC11.setCAN1IS(thebits : TBits_2); inline;
  51833. begin
  51834. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51835. end;
  51836. function TINT_IPC11.getCAN1IS : TBits_2; inline;
  51837. begin
  51838. getCAN1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51839. end;
  51840. procedure TINT_IPC11.setCAN1IP(thebits : TBits_3); inline;
  51841. begin
  51842. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51843. end;
  51844. function TINT_IPC11.getCAN1IP : TBits_3; inline;
  51845. begin
  51846. getCAN1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51847. end;
  51848. procedure TINT_IPC11.setw(thebits : TBits_32); inline;
  51849. begin
  51850. pTDefRegMap(@Self)^.val := thebits;
  51851. end;
  51852. function TINT_IPC11.getw : TBits_32; inline;
  51853. begin
  51854. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51855. end;
  51856. procedure TINT_IPC12.setU4IS(thebits : TBits_2); inline;
  51857. begin
  51858. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51859. end;
  51860. function TINT_IPC12.getU4IS : TBits_2; inline;
  51861. begin
  51862. getU4IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51863. end;
  51864. procedure TINT_IPC12.setU4IP(thebits : TBits_3); inline;
  51865. begin
  51866. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51867. end;
  51868. function TINT_IPC12.getU4IP : TBits_3; inline;
  51869. begin
  51870. getU4IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51871. end;
  51872. procedure TINT_IPC12.setU6IS(thebits : TBits_2); inline;
  51873. begin
  51874. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51875. end;
  51876. function TINT_IPC12.getU6IS : TBits_2; inline;
  51877. begin
  51878. getU6IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51879. end;
  51880. procedure TINT_IPC12.setU6IP(thebits : TBits_3); inline;
  51881. begin
  51882. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51883. end;
  51884. function TINT_IPC12.getU6IP : TBits_3; inline;
  51885. begin
  51886. getU6IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51887. end;
  51888. procedure TINT_IPC12.setU5IS(thebits : TBits_2); inline;
  51889. begin
  51890. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51891. end;
  51892. function TINT_IPC12.getU5IS : TBits_2; inline;
  51893. begin
  51894. getU5IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51895. end;
  51896. procedure TINT_IPC12.setU5IP(thebits : TBits_3); inline;
  51897. begin
  51898. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51899. end;
  51900. function TINT_IPC12.getU5IP : TBits_3; inline;
  51901. begin
  51902. getU5IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51903. end;
  51904. procedure TINT_IPC12.setU1BIS(thebits : TBits_2); inline;
  51905. begin
  51906. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  51907. end;
  51908. function TINT_IPC12.getU1BIS : TBits_2; inline;
  51909. begin
  51910. getU1BIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  51911. end;
  51912. procedure TINT_IPC12.setU1BIP(thebits : TBits_3); inline;
  51913. begin
  51914. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  51915. end;
  51916. function TINT_IPC12.getU1BIP : TBits_3; inline;
  51917. begin
  51918. getU1BIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  51919. end;
  51920. procedure TINT_IPC12.setU2BIS(thebits : TBits_2); inline;
  51921. begin
  51922. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  51923. end;
  51924. function TINT_IPC12.getU2BIS : TBits_2; inline;
  51925. begin
  51926. getU2BIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  51927. end;
  51928. procedure TINT_IPC12.setU2BIP(thebits : TBits_3); inline;
  51929. begin
  51930. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  51931. end;
  51932. function TINT_IPC12.getU2BIP : TBits_3; inline;
  51933. begin
  51934. getU2BIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  51935. end;
  51936. procedure TINT_IPC12.setU3BIS(thebits : TBits_2); inline;
  51937. begin
  51938. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  51939. end;
  51940. function TINT_IPC12.getU3BIS : TBits_2; inline;
  51941. begin
  51942. getU3BIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  51943. end;
  51944. procedure TINT_IPC12.setU3BIP(thebits : TBits_3); inline;
  51945. begin
  51946. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  51947. end;
  51948. function TINT_IPC12.getU3BIP : TBits_3; inline;
  51949. begin
  51950. getU3BIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  51951. end;
  51952. procedure TINT_IPC12.setw(thebits : TBits_32); inline;
  51953. begin
  51954. pTDefRegMap(@Self)^.val := thebits;
  51955. end;
  51956. function TINT_IPC12.getw : TBits_32; inline;
  51957. begin
  51958. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51959. end;
  51960. procedure TBMX_BMXCON.setBMXARB(thebits : TBits_3); inline;
  51961. begin
  51962. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  51963. end;
  51964. function TBMX_BMXCON.getBMXARB : TBits_3; inline;
  51965. begin
  51966. getBMXARB := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  51967. end;
  51968. procedure TBMX_BMXCON.setBMXWSDRM; inline;
  51969. begin
  51970. pTDefRegMap(@Self)^.&set := $00000040;
  51971. end;
  51972. procedure TBMX_BMXCON.clearBMXWSDRM; inline;
  51973. begin
  51974. pTDefRegMap(@Self)^.clr := $00000040;
  51975. end;
  51976. procedure TBMX_BMXCON.setBMXWSDRM(thebits : TBits_1); inline;
  51977. begin
  51978. if thebits = 0 then
  51979. pTDefRegMap(@Self)^.clr := $00000040
  51980. else
  51981. pTDefRegMap(@Self)^.&set := $00000040;
  51982. end;
  51983. function TBMX_BMXCON.getBMXWSDRM : TBits_1; inline;
  51984. begin
  51985. getBMXWSDRM := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  51986. end;
  51987. procedure TBMX_BMXCON.setBMXERRIS; inline;
  51988. begin
  51989. pTDefRegMap(@Self)^.&set := $00010000;
  51990. end;
  51991. procedure TBMX_BMXCON.clearBMXERRIS; inline;
  51992. begin
  51993. pTDefRegMap(@Self)^.clr := $00010000;
  51994. end;
  51995. procedure TBMX_BMXCON.setBMXERRIS(thebits : TBits_1); inline;
  51996. begin
  51997. if thebits = 0 then
  51998. pTDefRegMap(@Self)^.clr := $00010000
  51999. else
  52000. pTDefRegMap(@Self)^.&set := $00010000;
  52001. end;
  52002. function TBMX_BMXCON.getBMXERRIS : TBits_1; inline;
  52003. begin
  52004. getBMXERRIS := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  52005. end;
  52006. procedure TBMX_BMXCON.setBMXERRDS; inline;
  52007. begin
  52008. pTDefRegMap(@Self)^.&set := $00020000;
  52009. end;
  52010. procedure TBMX_BMXCON.clearBMXERRDS; inline;
  52011. begin
  52012. pTDefRegMap(@Self)^.clr := $00020000;
  52013. end;
  52014. procedure TBMX_BMXCON.setBMXERRDS(thebits : TBits_1); inline;
  52015. begin
  52016. if thebits = 0 then
  52017. pTDefRegMap(@Self)^.clr := $00020000
  52018. else
  52019. pTDefRegMap(@Self)^.&set := $00020000;
  52020. end;
  52021. function TBMX_BMXCON.getBMXERRDS : TBits_1; inline;
  52022. begin
  52023. getBMXERRDS := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  52024. end;
  52025. procedure TBMX_BMXCON.setBMXERRDMA; inline;
  52026. begin
  52027. pTDefRegMap(@Self)^.&set := $00040000;
  52028. end;
  52029. procedure TBMX_BMXCON.clearBMXERRDMA; inline;
  52030. begin
  52031. pTDefRegMap(@Self)^.clr := $00040000;
  52032. end;
  52033. procedure TBMX_BMXCON.setBMXERRDMA(thebits : TBits_1); inline;
  52034. begin
  52035. if thebits = 0 then
  52036. pTDefRegMap(@Self)^.clr := $00040000
  52037. else
  52038. pTDefRegMap(@Self)^.&set := $00040000;
  52039. end;
  52040. function TBMX_BMXCON.getBMXERRDMA : TBits_1; inline;
  52041. begin
  52042. getBMXERRDMA := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  52043. end;
  52044. procedure TBMX_BMXCON.setBMXERRICD; inline;
  52045. begin
  52046. pTDefRegMap(@Self)^.&set := $00080000;
  52047. end;
  52048. procedure TBMX_BMXCON.clearBMXERRICD; inline;
  52049. begin
  52050. pTDefRegMap(@Self)^.clr := $00080000;
  52051. end;
  52052. procedure TBMX_BMXCON.setBMXERRICD(thebits : TBits_1); inline;
  52053. begin
  52054. if thebits = 0 then
  52055. pTDefRegMap(@Self)^.clr := $00080000
  52056. else
  52057. pTDefRegMap(@Self)^.&set := $00080000;
  52058. end;
  52059. function TBMX_BMXCON.getBMXERRICD : TBits_1; inline;
  52060. begin
  52061. getBMXERRICD := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  52062. end;
  52063. procedure TBMX_BMXCON.setBMXERRIXI; inline;
  52064. begin
  52065. pTDefRegMap(@Self)^.&set := $00100000;
  52066. end;
  52067. procedure TBMX_BMXCON.clearBMXERRIXI; inline;
  52068. begin
  52069. pTDefRegMap(@Self)^.clr := $00100000;
  52070. end;
  52071. procedure TBMX_BMXCON.setBMXERRIXI(thebits : TBits_1); inline;
  52072. begin
  52073. if thebits = 0 then
  52074. pTDefRegMap(@Self)^.clr := $00100000
  52075. else
  52076. pTDefRegMap(@Self)^.&set := $00100000;
  52077. end;
  52078. function TBMX_BMXCON.getBMXERRIXI : TBits_1; inline;
  52079. begin
  52080. getBMXERRIXI := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  52081. end;
  52082. procedure TBMX_BMXCON.setBMXCHEDMA; inline;
  52083. begin
  52084. pTDefRegMap(@Self)^.&set := $04000000;
  52085. end;
  52086. procedure TBMX_BMXCON.clearBMXCHEDMA; inline;
  52087. begin
  52088. pTDefRegMap(@Self)^.clr := $04000000;
  52089. end;
  52090. procedure TBMX_BMXCON.setBMXCHEDMA(thebits : TBits_1); inline;
  52091. begin
  52092. if thebits = 0 then
  52093. pTDefRegMap(@Self)^.clr := $04000000
  52094. else
  52095. pTDefRegMap(@Self)^.&set := $04000000;
  52096. end;
  52097. function TBMX_BMXCON.getBMXCHEDMA : TBits_1; inline;
  52098. begin
  52099. getBMXCHEDMA := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  52100. end;
  52101. procedure TBMX_BMXCON.setw(thebits : TBits_32); inline;
  52102. begin
  52103. pTDefRegMap(@Self)^.val := thebits;
  52104. end;
  52105. function TBMX_BMXCON.getw : TBits_32; inline;
  52106. begin
  52107. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52108. end;
  52109. procedure TDMAC_DMACON.setDMABUSY; inline;
  52110. begin
  52111. pTDefRegMap(@Self)^.&set := $00000800;
  52112. end;
  52113. procedure TDMAC_DMACON.clearDMABUSY; inline;
  52114. begin
  52115. pTDefRegMap(@Self)^.clr := $00000800;
  52116. end;
  52117. procedure TDMAC_DMACON.setDMABUSY(thebits : TBits_1); inline;
  52118. begin
  52119. if thebits = 0 then
  52120. pTDefRegMap(@Self)^.clr := $00000800
  52121. else
  52122. pTDefRegMap(@Self)^.&set := $00000800;
  52123. end;
  52124. function TDMAC_DMACON.getDMABUSY : TBits_1; inline;
  52125. begin
  52126. getDMABUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  52127. end;
  52128. procedure TDMAC_DMACON.setSUSPEND; inline;
  52129. begin
  52130. pTDefRegMap(@Self)^.&set := $00001000;
  52131. end;
  52132. procedure TDMAC_DMACON.clearSUSPEND; inline;
  52133. begin
  52134. pTDefRegMap(@Self)^.clr := $00001000;
  52135. end;
  52136. procedure TDMAC_DMACON.setSUSPEND(thebits : TBits_1); inline;
  52137. begin
  52138. if thebits = 0 then
  52139. pTDefRegMap(@Self)^.clr := $00001000
  52140. else
  52141. pTDefRegMap(@Self)^.&set := $00001000;
  52142. end;
  52143. function TDMAC_DMACON.getSUSPEND : TBits_1; inline;
  52144. begin
  52145. getSUSPEND := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  52146. end;
  52147. procedure TDMAC_DMACON.setON; inline;
  52148. begin
  52149. pTDefRegMap(@Self)^.&set := $00008000;
  52150. end;
  52151. procedure TDMAC_DMACON.clearON; inline;
  52152. begin
  52153. pTDefRegMap(@Self)^.clr := $00008000;
  52154. end;
  52155. procedure TDMAC_DMACON.setON(thebits : TBits_1); inline;
  52156. begin
  52157. if thebits = 0 then
  52158. pTDefRegMap(@Self)^.clr := $00008000
  52159. else
  52160. pTDefRegMap(@Self)^.&set := $00008000;
  52161. end;
  52162. function TDMAC_DMACON.getON : TBits_1; inline;
  52163. begin
  52164. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52165. end;
  52166. procedure TDMAC_DMACON.setw(thebits : TBits_32); inline;
  52167. begin
  52168. pTDefRegMap(@Self)^.val := thebits;
  52169. end;
  52170. function TDMAC_DMACON.getw : TBits_32; inline;
  52171. begin
  52172. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52173. end;
  52174. procedure TDMAC_DMASTAT.setDMACH(thebits : TBits_3); inline;
  52175. begin
  52176. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  52177. end;
  52178. function TDMAC_DMASTAT.getDMACH : TBits_3; inline;
  52179. begin
  52180. getDMACH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  52181. end;
  52182. procedure TDMAC_DMASTAT.setRDWR; inline;
  52183. begin
  52184. pTDefRegMap(@Self)^.&set := $00000008;
  52185. end;
  52186. procedure TDMAC_DMASTAT.clearRDWR; inline;
  52187. begin
  52188. pTDefRegMap(@Self)^.clr := $00000008;
  52189. end;
  52190. procedure TDMAC_DMASTAT.setRDWR(thebits : TBits_1); inline;
  52191. begin
  52192. if thebits = 0 then
  52193. pTDefRegMap(@Self)^.clr := $00000008
  52194. else
  52195. pTDefRegMap(@Self)^.&set := $00000008;
  52196. end;
  52197. function TDMAC_DMASTAT.getRDWR : TBits_1; inline;
  52198. begin
  52199. getRDWR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52200. end;
  52201. procedure TDMAC_DMASTAT.setw(thebits : TBits_32); inline;
  52202. begin
  52203. pTDefRegMap(@Self)^.val := thebits;
  52204. end;
  52205. function TDMAC_DMASTAT.getw : TBits_32; inline;
  52206. begin
  52207. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52208. end;
  52209. procedure TDMAC_DCRCCON.setCRCCH(thebits : TBits_3); inline;
  52210. begin
  52211. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  52212. end;
  52213. function TDMAC_DCRCCON.getCRCCH : TBits_3; inline;
  52214. begin
  52215. getCRCCH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  52216. end;
  52217. procedure TDMAC_DCRCCON.setCRCTYP; inline;
  52218. begin
  52219. pTDefRegMap(@Self)^.&set := $00000020;
  52220. end;
  52221. procedure TDMAC_DCRCCON.clearCRCTYP; inline;
  52222. begin
  52223. pTDefRegMap(@Self)^.clr := $00000020;
  52224. end;
  52225. procedure TDMAC_DCRCCON.setCRCTYP(thebits : TBits_1); inline;
  52226. begin
  52227. if thebits = 0 then
  52228. pTDefRegMap(@Self)^.clr := $00000020
  52229. else
  52230. pTDefRegMap(@Self)^.&set := $00000020;
  52231. end;
  52232. function TDMAC_DCRCCON.getCRCTYP : TBits_1; inline;
  52233. begin
  52234. getCRCTYP := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52235. end;
  52236. procedure TDMAC_DCRCCON.setCRCAPP; inline;
  52237. begin
  52238. pTDefRegMap(@Self)^.&set := $00000040;
  52239. end;
  52240. procedure TDMAC_DCRCCON.clearCRCAPP; inline;
  52241. begin
  52242. pTDefRegMap(@Self)^.clr := $00000040;
  52243. end;
  52244. procedure TDMAC_DCRCCON.setCRCAPP(thebits : TBits_1); inline;
  52245. begin
  52246. if thebits = 0 then
  52247. pTDefRegMap(@Self)^.clr := $00000040
  52248. else
  52249. pTDefRegMap(@Self)^.&set := $00000040;
  52250. end;
  52251. function TDMAC_DCRCCON.getCRCAPP : TBits_1; inline;
  52252. begin
  52253. getCRCAPP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52254. end;
  52255. procedure TDMAC_DCRCCON.setCRCEN; inline;
  52256. begin
  52257. pTDefRegMap(@Self)^.&set := $00000080;
  52258. end;
  52259. procedure TDMAC_DCRCCON.clearCRCEN; inline;
  52260. begin
  52261. pTDefRegMap(@Self)^.clr := $00000080;
  52262. end;
  52263. procedure TDMAC_DCRCCON.setCRCEN(thebits : TBits_1); inline;
  52264. begin
  52265. if thebits = 0 then
  52266. pTDefRegMap(@Self)^.clr := $00000080
  52267. else
  52268. pTDefRegMap(@Self)^.&set := $00000080;
  52269. end;
  52270. function TDMAC_DCRCCON.getCRCEN : TBits_1; inline;
  52271. begin
  52272. getCRCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52273. end;
  52274. procedure TDMAC_DCRCCON.setPLEN(thebits : TBits_5); inline;
  52275. begin
  52276. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  52277. end;
  52278. function TDMAC_DCRCCON.getPLEN : TBits_5; inline;
  52279. begin
  52280. getPLEN := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  52281. end;
  52282. procedure TDMAC_DCRCCON.setBITO; inline;
  52283. begin
  52284. pTDefRegMap(@Self)^.&set := $01000000;
  52285. end;
  52286. procedure TDMAC_DCRCCON.clearBITO; inline;
  52287. begin
  52288. pTDefRegMap(@Self)^.clr := $01000000;
  52289. end;
  52290. procedure TDMAC_DCRCCON.setBITO(thebits : TBits_1); inline;
  52291. begin
  52292. if thebits = 0 then
  52293. pTDefRegMap(@Self)^.clr := $01000000
  52294. else
  52295. pTDefRegMap(@Self)^.&set := $01000000;
  52296. end;
  52297. function TDMAC_DCRCCON.getBITO : TBits_1; inline;
  52298. begin
  52299. getBITO := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  52300. end;
  52301. procedure TDMAC_DCRCCON.setWBO; inline;
  52302. begin
  52303. pTDefRegMap(@Self)^.&set := $08000000;
  52304. end;
  52305. procedure TDMAC_DCRCCON.clearWBO; inline;
  52306. begin
  52307. pTDefRegMap(@Self)^.clr := $08000000;
  52308. end;
  52309. procedure TDMAC_DCRCCON.setWBO(thebits : TBits_1); inline;
  52310. begin
  52311. if thebits = 0 then
  52312. pTDefRegMap(@Self)^.clr := $08000000
  52313. else
  52314. pTDefRegMap(@Self)^.&set := $08000000;
  52315. end;
  52316. function TDMAC_DCRCCON.getWBO : TBits_1; inline;
  52317. begin
  52318. getWBO := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  52319. end;
  52320. procedure TDMAC_DCRCCON.setBYTO(thebits : TBits_2); inline;
  52321. begin
  52322. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $CFFFFFFF or ( thebits shl 28 );
  52323. end;
  52324. function TDMAC_DCRCCON.getBYTO : TBits_2; inline;
  52325. begin
  52326. getBYTO := (pTDefRegMap(@Self)^.val and $30000000) shr 28;
  52327. end;
  52328. procedure TDMAC_DCRCCON.setw(thebits : TBits_32); inline;
  52329. begin
  52330. pTDefRegMap(@Self)^.val := thebits;
  52331. end;
  52332. function TDMAC_DCRCCON.getw : TBits_32; inline;
  52333. begin
  52334. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52335. end;
  52336. procedure TDMAC0_DCH0CON.setCHPRI(thebits : TBits_2); inline;
  52337. begin
  52338. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52339. end;
  52340. function TDMAC0_DCH0CON.getCHPRI : TBits_2; inline;
  52341. begin
  52342. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52343. end;
  52344. procedure TDMAC0_DCH0CON.setCHEDET; inline;
  52345. begin
  52346. pTDefRegMap(@Self)^.&set := $00000004;
  52347. end;
  52348. procedure TDMAC0_DCH0CON.clearCHEDET; inline;
  52349. begin
  52350. pTDefRegMap(@Self)^.clr := $00000004;
  52351. end;
  52352. procedure TDMAC0_DCH0CON.setCHEDET(thebits : TBits_1); inline;
  52353. begin
  52354. if thebits = 0 then
  52355. pTDefRegMap(@Self)^.clr := $00000004
  52356. else
  52357. pTDefRegMap(@Self)^.&set := $00000004;
  52358. end;
  52359. function TDMAC0_DCH0CON.getCHEDET : TBits_1; inline;
  52360. begin
  52361. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  52362. end;
  52363. procedure TDMAC0_DCH0CON.setCHAEN; inline;
  52364. begin
  52365. pTDefRegMap(@Self)^.&set := $00000010;
  52366. end;
  52367. procedure TDMAC0_DCH0CON.clearCHAEN; inline;
  52368. begin
  52369. pTDefRegMap(@Self)^.clr := $00000010;
  52370. end;
  52371. procedure TDMAC0_DCH0CON.setCHAEN(thebits : TBits_1); inline;
  52372. begin
  52373. if thebits = 0 then
  52374. pTDefRegMap(@Self)^.clr := $00000010
  52375. else
  52376. pTDefRegMap(@Self)^.&set := $00000010;
  52377. end;
  52378. function TDMAC0_DCH0CON.getCHAEN : TBits_1; inline;
  52379. begin
  52380. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52381. end;
  52382. procedure TDMAC0_DCH0CON.setCHCHN; inline;
  52383. begin
  52384. pTDefRegMap(@Self)^.&set := $00000020;
  52385. end;
  52386. procedure TDMAC0_DCH0CON.clearCHCHN; inline;
  52387. begin
  52388. pTDefRegMap(@Self)^.clr := $00000020;
  52389. end;
  52390. procedure TDMAC0_DCH0CON.setCHCHN(thebits : TBits_1); inline;
  52391. begin
  52392. if thebits = 0 then
  52393. pTDefRegMap(@Self)^.clr := $00000020
  52394. else
  52395. pTDefRegMap(@Self)^.&set := $00000020;
  52396. end;
  52397. function TDMAC0_DCH0CON.getCHCHN : TBits_1; inline;
  52398. begin
  52399. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52400. end;
  52401. procedure TDMAC0_DCH0CON.setCHAED; inline;
  52402. begin
  52403. pTDefRegMap(@Self)^.&set := $00000040;
  52404. end;
  52405. procedure TDMAC0_DCH0CON.clearCHAED; inline;
  52406. begin
  52407. pTDefRegMap(@Self)^.clr := $00000040;
  52408. end;
  52409. procedure TDMAC0_DCH0CON.setCHAED(thebits : TBits_1); inline;
  52410. begin
  52411. if thebits = 0 then
  52412. pTDefRegMap(@Self)^.clr := $00000040
  52413. else
  52414. pTDefRegMap(@Self)^.&set := $00000040;
  52415. end;
  52416. function TDMAC0_DCH0CON.getCHAED : TBits_1; inline;
  52417. begin
  52418. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52419. end;
  52420. procedure TDMAC0_DCH0CON.setCHEN; inline;
  52421. begin
  52422. pTDefRegMap(@Self)^.&set := $00000080;
  52423. end;
  52424. procedure TDMAC0_DCH0CON.clearCHEN; inline;
  52425. begin
  52426. pTDefRegMap(@Self)^.clr := $00000080;
  52427. end;
  52428. procedure TDMAC0_DCH0CON.setCHEN(thebits : TBits_1); inline;
  52429. begin
  52430. if thebits = 0 then
  52431. pTDefRegMap(@Self)^.clr := $00000080
  52432. else
  52433. pTDefRegMap(@Self)^.&set := $00000080;
  52434. end;
  52435. function TDMAC0_DCH0CON.getCHEN : TBits_1; inline;
  52436. begin
  52437. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52438. end;
  52439. procedure TDMAC0_DCH0CON.setCHCHNS; inline;
  52440. begin
  52441. pTDefRegMap(@Self)^.&set := $00000100;
  52442. end;
  52443. procedure TDMAC0_DCH0CON.clearCHCHNS; inline;
  52444. begin
  52445. pTDefRegMap(@Self)^.clr := $00000100;
  52446. end;
  52447. procedure TDMAC0_DCH0CON.setCHCHNS(thebits : TBits_1); inline;
  52448. begin
  52449. if thebits = 0 then
  52450. pTDefRegMap(@Self)^.clr := $00000100
  52451. else
  52452. pTDefRegMap(@Self)^.&set := $00000100;
  52453. end;
  52454. function TDMAC0_DCH0CON.getCHCHNS : TBits_1; inline;
  52455. begin
  52456. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  52457. end;
  52458. procedure TDMAC0_DCH0CON.setCHBUSY; inline;
  52459. begin
  52460. pTDefRegMap(@Self)^.&set := $00008000;
  52461. end;
  52462. procedure TDMAC0_DCH0CON.clearCHBUSY; inline;
  52463. begin
  52464. pTDefRegMap(@Self)^.clr := $00008000;
  52465. end;
  52466. procedure TDMAC0_DCH0CON.setCHBUSY(thebits : TBits_1); inline;
  52467. begin
  52468. if thebits = 0 then
  52469. pTDefRegMap(@Self)^.clr := $00008000
  52470. else
  52471. pTDefRegMap(@Self)^.&set := $00008000;
  52472. end;
  52473. function TDMAC0_DCH0CON.getCHBUSY : TBits_1; inline;
  52474. begin
  52475. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52476. end;
  52477. procedure TDMAC0_DCH0CON.setw(thebits : TBits_32); inline;
  52478. begin
  52479. pTDefRegMap(@Self)^.val := thebits;
  52480. end;
  52481. function TDMAC0_DCH0CON.getw : TBits_32; inline;
  52482. begin
  52483. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52484. end;
  52485. procedure TDMAC0_DCH0ECON.setAIRQEN; inline;
  52486. begin
  52487. pTDefRegMap(@Self)^.&set := $00000008;
  52488. end;
  52489. procedure TDMAC0_DCH0ECON.clearAIRQEN; inline;
  52490. begin
  52491. pTDefRegMap(@Self)^.clr := $00000008;
  52492. end;
  52493. procedure TDMAC0_DCH0ECON.setAIRQEN(thebits : TBits_1); inline;
  52494. begin
  52495. if thebits = 0 then
  52496. pTDefRegMap(@Self)^.clr := $00000008
  52497. else
  52498. pTDefRegMap(@Self)^.&set := $00000008;
  52499. end;
  52500. function TDMAC0_DCH0ECON.getAIRQEN : TBits_1; inline;
  52501. begin
  52502. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52503. end;
  52504. procedure TDMAC0_DCH0ECON.setSIRQEN; inline;
  52505. begin
  52506. pTDefRegMap(@Self)^.&set := $00000010;
  52507. end;
  52508. procedure TDMAC0_DCH0ECON.clearSIRQEN; inline;
  52509. begin
  52510. pTDefRegMap(@Self)^.clr := $00000010;
  52511. end;
  52512. procedure TDMAC0_DCH0ECON.setSIRQEN(thebits : TBits_1); inline;
  52513. begin
  52514. if thebits = 0 then
  52515. pTDefRegMap(@Self)^.clr := $00000010
  52516. else
  52517. pTDefRegMap(@Self)^.&set := $00000010;
  52518. end;
  52519. function TDMAC0_DCH0ECON.getSIRQEN : TBits_1; inline;
  52520. begin
  52521. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52522. end;
  52523. procedure TDMAC0_DCH0ECON.setPATEN; inline;
  52524. begin
  52525. pTDefRegMap(@Self)^.&set := $00000020;
  52526. end;
  52527. procedure TDMAC0_DCH0ECON.clearPATEN; inline;
  52528. begin
  52529. pTDefRegMap(@Self)^.clr := $00000020;
  52530. end;
  52531. procedure TDMAC0_DCH0ECON.setPATEN(thebits : TBits_1); inline;
  52532. begin
  52533. if thebits = 0 then
  52534. pTDefRegMap(@Self)^.clr := $00000020
  52535. else
  52536. pTDefRegMap(@Self)^.&set := $00000020;
  52537. end;
  52538. function TDMAC0_DCH0ECON.getPATEN : TBits_1; inline;
  52539. begin
  52540. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52541. end;
  52542. procedure TDMAC0_DCH0ECON.setCABORT; inline;
  52543. begin
  52544. pTDefRegMap(@Self)^.&set := $00000040;
  52545. end;
  52546. procedure TDMAC0_DCH0ECON.clearCABORT; inline;
  52547. begin
  52548. pTDefRegMap(@Self)^.clr := $00000040;
  52549. end;
  52550. procedure TDMAC0_DCH0ECON.setCABORT(thebits : TBits_1); inline;
  52551. begin
  52552. if thebits = 0 then
  52553. pTDefRegMap(@Self)^.clr := $00000040
  52554. else
  52555. pTDefRegMap(@Self)^.&set := $00000040;
  52556. end;
  52557. function TDMAC0_DCH0ECON.getCABORT : TBits_1; inline;
  52558. begin
  52559. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52560. end;
  52561. procedure TDMAC0_DCH0ECON.setCFORCE; inline;
  52562. begin
  52563. pTDefRegMap(@Self)^.&set := $00000080;
  52564. end;
  52565. procedure TDMAC0_DCH0ECON.clearCFORCE; inline;
  52566. begin
  52567. pTDefRegMap(@Self)^.clr := $00000080;
  52568. end;
  52569. procedure TDMAC0_DCH0ECON.setCFORCE(thebits : TBits_1); inline;
  52570. begin
  52571. if thebits = 0 then
  52572. pTDefRegMap(@Self)^.clr := $00000080
  52573. else
  52574. pTDefRegMap(@Self)^.&set := $00000080;
  52575. end;
  52576. function TDMAC0_DCH0ECON.getCFORCE : TBits_1; inline;
  52577. begin
  52578. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52579. end;
  52580. procedure TDMAC0_DCH0ECON.setCHSIRQ(thebits : TBits_8); inline;
  52581. begin
  52582. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  52583. end;
  52584. function TDMAC0_DCH0ECON.getCHSIRQ : TBits_8; inline;
  52585. begin
  52586. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  52587. end;
  52588. procedure TDMAC0_DCH0ECON.setCHAIRQ(thebits : TBits_8); inline;
  52589. begin
  52590. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  52591. end;
  52592. function TDMAC0_DCH0ECON.getCHAIRQ : TBits_8; inline;
  52593. begin
  52594. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  52595. end;
  52596. procedure TDMAC0_DCH0ECON.setw(thebits : TBits_32); inline;
  52597. begin
  52598. pTDefRegMap(@Self)^.val := thebits;
  52599. end;
  52600. function TDMAC0_DCH0ECON.getw : TBits_32; inline;
  52601. begin
  52602. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52603. end;
  52604. procedure TDMAC0_DCH0INT.setCHERIF; inline;
  52605. begin
  52606. pTDefRegMap(@Self)^.&set := $00000001;
  52607. end;
  52608. procedure TDMAC0_DCH0INT.clearCHERIF; inline;
  52609. begin
  52610. pTDefRegMap(@Self)^.clr := $00000001;
  52611. end;
  52612. procedure TDMAC0_DCH0INT.setCHERIF(thebits : TBits_1); inline;
  52613. begin
  52614. if thebits = 0 then
  52615. pTDefRegMap(@Self)^.clr := $00000001
  52616. else
  52617. pTDefRegMap(@Self)^.&set := $00000001;
  52618. end;
  52619. function TDMAC0_DCH0INT.getCHERIF : TBits_1; inline;
  52620. begin
  52621. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  52622. end;
  52623. procedure TDMAC0_DCH0INT.setCHTAIF; inline;
  52624. begin
  52625. pTDefRegMap(@Self)^.&set := $00000002;
  52626. end;
  52627. procedure TDMAC0_DCH0INT.clearCHTAIF; inline;
  52628. begin
  52629. pTDefRegMap(@Self)^.clr := $00000002;
  52630. end;
  52631. procedure TDMAC0_DCH0INT.setCHTAIF(thebits : TBits_1); inline;
  52632. begin
  52633. if thebits = 0 then
  52634. pTDefRegMap(@Self)^.clr := $00000002
  52635. else
  52636. pTDefRegMap(@Self)^.&set := $00000002;
  52637. end;
  52638. function TDMAC0_DCH0INT.getCHTAIF : TBits_1; inline;
  52639. begin
  52640. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  52641. end;
  52642. procedure TDMAC0_DCH0INT.setCHCCIF; inline;
  52643. begin
  52644. pTDefRegMap(@Self)^.&set := $00000004;
  52645. end;
  52646. procedure TDMAC0_DCH0INT.clearCHCCIF; inline;
  52647. begin
  52648. pTDefRegMap(@Self)^.clr := $00000004;
  52649. end;
  52650. procedure TDMAC0_DCH0INT.setCHCCIF(thebits : TBits_1); inline;
  52651. begin
  52652. if thebits = 0 then
  52653. pTDefRegMap(@Self)^.clr := $00000004
  52654. else
  52655. pTDefRegMap(@Self)^.&set := $00000004;
  52656. end;
  52657. function TDMAC0_DCH0INT.getCHCCIF : TBits_1; inline;
  52658. begin
  52659. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  52660. end;
  52661. procedure TDMAC0_DCH0INT.setCHBCIF; inline;
  52662. begin
  52663. pTDefRegMap(@Self)^.&set := $00000008;
  52664. end;
  52665. procedure TDMAC0_DCH0INT.clearCHBCIF; inline;
  52666. begin
  52667. pTDefRegMap(@Self)^.clr := $00000008;
  52668. end;
  52669. procedure TDMAC0_DCH0INT.setCHBCIF(thebits : TBits_1); inline;
  52670. begin
  52671. if thebits = 0 then
  52672. pTDefRegMap(@Self)^.clr := $00000008
  52673. else
  52674. pTDefRegMap(@Self)^.&set := $00000008;
  52675. end;
  52676. function TDMAC0_DCH0INT.getCHBCIF : TBits_1; inline;
  52677. begin
  52678. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52679. end;
  52680. procedure TDMAC0_DCH0INT.setCHDHIF; inline;
  52681. begin
  52682. pTDefRegMap(@Self)^.&set := $00000010;
  52683. end;
  52684. procedure TDMAC0_DCH0INT.clearCHDHIF; inline;
  52685. begin
  52686. pTDefRegMap(@Self)^.clr := $00000010;
  52687. end;
  52688. procedure TDMAC0_DCH0INT.setCHDHIF(thebits : TBits_1); inline;
  52689. begin
  52690. if thebits = 0 then
  52691. pTDefRegMap(@Self)^.clr := $00000010
  52692. else
  52693. pTDefRegMap(@Self)^.&set := $00000010;
  52694. end;
  52695. function TDMAC0_DCH0INT.getCHDHIF : TBits_1; inline;
  52696. begin
  52697. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52698. end;
  52699. procedure TDMAC0_DCH0INT.setCHDDIF; inline;
  52700. begin
  52701. pTDefRegMap(@Self)^.&set := $00000020;
  52702. end;
  52703. procedure TDMAC0_DCH0INT.clearCHDDIF; inline;
  52704. begin
  52705. pTDefRegMap(@Self)^.clr := $00000020;
  52706. end;
  52707. procedure TDMAC0_DCH0INT.setCHDDIF(thebits : TBits_1); inline;
  52708. begin
  52709. if thebits = 0 then
  52710. pTDefRegMap(@Self)^.clr := $00000020
  52711. else
  52712. pTDefRegMap(@Self)^.&set := $00000020;
  52713. end;
  52714. function TDMAC0_DCH0INT.getCHDDIF : TBits_1; inline;
  52715. begin
  52716. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52717. end;
  52718. procedure TDMAC0_DCH0INT.setCHSHIF; inline;
  52719. begin
  52720. pTDefRegMap(@Self)^.&set := $00000040;
  52721. end;
  52722. procedure TDMAC0_DCH0INT.clearCHSHIF; inline;
  52723. begin
  52724. pTDefRegMap(@Self)^.clr := $00000040;
  52725. end;
  52726. procedure TDMAC0_DCH0INT.setCHSHIF(thebits : TBits_1); inline;
  52727. begin
  52728. if thebits = 0 then
  52729. pTDefRegMap(@Self)^.clr := $00000040
  52730. else
  52731. pTDefRegMap(@Self)^.&set := $00000040;
  52732. end;
  52733. function TDMAC0_DCH0INT.getCHSHIF : TBits_1; inline;
  52734. begin
  52735. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52736. end;
  52737. procedure TDMAC0_DCH0INT.setCHSDIF; inline;
  52738. begin
  52739. pTDefRegMap(@Self)^.&set := $00000080;
  52740. end;
  52741. procedure TDMAC0_DCH0INT.clearCHSDIF; inline;
  52742. begin
  52743. pTDefRegMap(@Self)^.clr := $00000080;
  52744. end;
  52745. procedure TDMAC0_DCH0INT.setCHSDIF(thebits : TBits_1); inline;
  52746. begin
  52747. if thebits = 0 then
  52748. pTDefRegMap(@Self)^.clr := $00000080
  52749. else
  52750. pTDefRegMap(@Self)^.&set := $00000080;
  52751. end;
  52752. function TDMAC0_DCH0INT.getCHSDIF : TBits_1; inline;
  52753. begin
  52754. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52755. end;
  52756. procedure TDMAC0_DCH0INT.setCHERIE; inline;
  52757. begin
  52758. pTDefRegMap(@Self)^.&set := $00010000;
  52759. end;
  52760. procedure TDMAC0_DCH0INT.clearCHERIE; inline;
  52761. begin
  52762. pTDefRegMap(@Self)^.clr := $00010000;
  52763. end;
  52764. procedure TDMAC0_DCH0INT.setCHERIE(thebits : TBits_1); inline;
  52765. begin
  52766. if thebits = 0 then
  52767. pTDefRegMap(@Self)^.clr := $00010000
  52768. else
  52769. pTDefRegMap(@Self)^.&set := $00010000;
  52770. end;
  52771. function TDMAC0_DCH0INT.getCHERIE : TBits_1; inline;
  52772. begin
  52773. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  52774. end;
  52775. procedure TDMAC0_DCH0INT.setCHTAIE; inline;
  52776. begin
  52777. pTDefRegMap(@Self)^.&set := $00020000;
  52778. end;
  52779. procedure TDMAC0_DCH0INT.clearCHTAIE; inline;
  52780. begin
  52781. pTDefRegMap(@Self)^.clr := $00020000;
  52782. end;
  52783. procedure TDMAC0_DCH0INT.setCHTAIE(thebits : TBits_1); inline;
  52784. begin
  52785. if thebits = 0 then
  52786. pTDefRegMap(@Self)^.clr := $00020000
  52787. else
  52788. pTDefRegMap(@Self)^.&set := $00020000;
  52789. end;
  52790. function TDMAC0_DCH0INT.getCHTAIE : TBits_1; inline;
  52791. begin
  52792. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  52793. end;
  52794. procedure TDMAC0_DCH0INT.setCHCCIE; inline;
  52795. begin
  52796. pTDefRegMap(@Self)^.&set := $00040000;
  52797. end;
  52798. procedure TDMAC0_DCH0INT.clearCHCCIE; inline;
  52799. begin
  52800. pTDefRegMap(@Self)^.clr := $00040000;
  52801. end;
  52802. procedure TDMAC0_DCH0INT.setCHCCIE(thebits : TBits_1); inline;
  52803. begin
  52804. if thebits = 0 then
  52805. pTDefRegMap(@Self)^.clr := $00040000
  52806. else
  52807. pTDefRegMap(@Self)^.&set := $00040000;
  52808. end;
  52809. function TDMAC0_DCH0INT.getCHCCIE : TBits_1; inline;
  52810. begin
  52811. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  52812. end;
  52813. procedure TDMAC0_DCH0INT.setCHBCIE; inline;
  52814. begin
  52815. pTDefRegMap(@Self)^.&set := $00080000;
  52816. end;
  52817. procedure TDMAC0_DCH0INT.clearCHBCIE; inline;
  52818. begin
  52819. pTDefRegMap(@Self)^.clr := $00080000;
  52820. end;
  52821. procedure TDMAC0_DCH0INT.setCHBCIE(thebits : TBits_1); inline;
  52822. begin
  52823. if thebits = 0 then
  52824. pTDefRegMap(@Self)^.clr := $00080000
  52825. else
  52826. pTDefRegMap(@Self)^.&set := $00080000;
  52827. end;
  52828. function TDMAC0_DCH0INT.getCHBCIE : TBits_1; inline;
  52829. begin
  52830. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  52831. end;
  52832. procedure TDMAC0_DCH0INT.setCHDHIE; inline;
  52833. begin
  52834. pTDefRegMap(@Self)^.&set := $00100000;
  52835. end;
  52836. procedure TDMAC0_DCH0INT.clearCHDHIE; inline;
  52837. begin
  52838. pTDefRegMap(@Self)^.clr := $00100000;
  52839. end;
  52840. procedure TDMAC0_DCH0INT.setCHDHIE(thebits : TBits_1); inline;
  52841. begin
  52842. if thebits = 0 then
  52843. pTDefRegMap(@Self)^.clr := $00100000
  52844. else
  52845. pTDefRegMap(@Self)^.&set := $00100000;
  52846. end;
  52847. function TDMAC0_DCH0INT.getCHDHIE : TBits_1; inline;
  52848. begin
  52849. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  52850. end;
  52851. procedure TDMAC0_DCH0INT.setCHDDIE; inline;
  52852. begin
  52853. pTDefRegMap(@Self)^.&set := $00200000;
  52854. end;
  52855. procedure TDMAC0_DCH0INT.clearCHDDIE; inline;
  52856. begin
  52857. pTDefRegMap(@Self)^.clr := $00200000;
  52858. end;
  52859. procedure TDMAC0_DCH0INT.setCHDDIE(thebits : TBits_1); inline;
  52860. begin
  52861. if thebits = 0 then
  52862. pTDefRegMap(@Self)^.clr := $00200000
  52863. else
  52864. pTDefRegMap(@Self)^.&set := $00200000;
  52865. end;
  52866. function TDMAC0_DCH0INT.getCHDDIE : TBits_1; inline;
  52867. begin
  52868. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  52869. end;
  52870. procedure TDMAC0_DCH0INT.setCHSHIE; inline;
  52871. begin
  52872. pTDefRegMap(@Self)^.&set := $00400000;
  52873. end;
  52874. procedure TDMAC0_DCH0INT.clearCHSHIE; inline;
  52875. begin
  52876. pTDefRegMap(@Self)^.clr := $00400000;
  52877. end;
  52878. procedure TDMAC0_DCH0INT.setCHSHIE(thebits : TBits_1); inline;
  52879. begin
  52880. if thebits = 0 then
  52881. pTDefRegMap(@Self)^.clr := $00400000
  52882. else
  52883. pTDefRegMap(@Self)^.&set := $00400000;
  52884. end;
  52885. function TDMAC0_DCH0INT.getCHSHIE : TBits_1; inline;
  52886. begin
  52887. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  52888. end;
  52889. procedure TDMAC0_DCH0INT.setCHSDIE; inline;
  52890. begin
  52891. pTDefRegMap(@Self)^.&set := $00800000;
  52892. end;
  52893. procedure TDMAC0_DCH0INT.clearCHSDIE; inline;
  52894. begin
  52895. pTDefRegMap(@Self)^.clr := $00800000;
  52896. end;
  52897. procedure TDMAC0_DCH0INT.setCHSDIE(thebits : TBits_1); inline;
  52898. begin
  52899. if thebits = 0 then
  52900. pTDefRegMap(@Self)^.clr := $00800000
  52901. else
  52902. pTDefRegMap(@Self)^.&set := $00800000;
  52903. end;
  52904. function TDMAC0_DCH0INT.getCHSDIE : TBits_1; inline;
  52905. begin
  52906. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  52907. end;
  52908. procedure TDMAC0_DCH0INT.setw(thebits : TBits_32); inline;
  52909. begin
  52910. pTDefRegMap(@Self)^.val := thebits;
  52911. end;
  52912. function TDMAC0_DCH0INT.getw : TBits_32; inline;
  52913. begin
  52914. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52915. end;
  52916. procedure TDMAC1_DCH1CON.setCHPRI(thebits : TBits_2); inline;
  52917. begin
  52918. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52919. end;
  52920. function TDMAC1_DCH1CON.getCHPRI : TBits_2; inline;
  52921. begin
  52922. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52923. end;
  52924. procedure TDMAC1_DCH1CON.setCHEDET; inline;
  52925. begin
  52926. pTDefRegMap(@Self)^.&set := $00000004;
  52927. end;
  52928. procedure TDMAC1_DCH1CON.clearCHEDET; inline;
  52929. begin
  52930. pTDefRegMap(@Self)^.clr := $00000004;
  52931. end;
  52932. procedure TDMAC1_DCH1CON.setCHEDET(thebits : TBits_1); inline;
  52933. begin
  52934. if thebits = 0 then
  52935. pTDefRegMap(@Self)^.clr := $00000004
  52936. else
  52937. pTDefRegMap(@Self)^.&set := $00000004;
  52938. end;
  52939. function TDMAC1_DCH1CON.getCHEDET : TBits_1; inline;
  52940. begin
  52941. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  52942. end;
  52943. procedure TDMAC1_DCH1CON.setCHAEN; inline;
  52944. begin
  52945. pTDefRegMap(@Self)^.&set := $00000010;
  52946. end;
  52947. procedure TDMAC1_DCH1CON.clearCHAEN; inline;
  52948. begin
  52949. pTDefRegMap(@Self)^.clr := $00000010;
  52950. end;
  52951. procedure TDMAC1_DCH1CON.setCHAEN(thebits : TBits_1); inline;
  52952. begin
  52953. if thebits = 0 then
  52954. pTDefRegMap(@Self)^.clr := $00000010
  52955. else
  52956. pTDefRegMap(@Self)^.&set := $00000010;
  52957. end;
  52958. function TDMAC1_DCH1CON.getCHAEN : TBits_1; inline;
  52959. begin
  52960. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52961. end;
  52962. procedure TDMAC1_DCH1CON.setCHCHN; inline;
  52963. begin
  52964. pTDefRegMap(@Self)^.&set := $00000020;
  52965. end;
  52966. procedure TDMAC1_DCH1CON.clearCHCHN; inline;
  52967. begin
  52968. pTDefRegMap(@Self)^.clr := $00000020;
  52969. end;
  52970. procedure TDMAC1_DCH1CON.setCHCHN(thebits : TBits_1); inline;
  52971. begin
  52972. if thebits = 0 then
  52973. pTDefRegMap(@Self)^.clr := $00000020
  52974. else
  52975. pTDefRegMap(@Self)^.&set := $00000020;
  52976. end;
  52977. function TDMAC1_DCH1CON.getCHCHN : TBits_1; inline;
  52978. begin
  52979. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52980. end;
  52981. procedure TDMAC1_DCH1CON.setCHAED; inline;
  52982. begin
  52983. pTDefRegMap(@Self)^.&set := $00000040;
  52984. end;
  52985. procedure TDMAC1_DCH1CON.clearCHAED; inline;
  52986. begin
  52987. pTDefRegMap(@Self)^.clr := $00000040;
  52988. end;
  52989. procedure TDMAC1_DCH1CON.setCHAED(thebits : TBits_1); inline;
  52990. begin
  52991. if thebits = 0 then
  52992. pTDefRegMap(@Self)^.clr := $00000040
  52993. else
  52994. pTDefRegMap(@Self)^.&set := $00000040;
  52995. end;
  52996. function TDMAC1_DCH1CON.getCHAED : TBits_1; inline;
  52997. begin
  52998. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52999. end;
  53000. procedure TDMAC1_DCH1CON.setCHEN; inline;
  53001. begin
  53002. pTDefRegMap(@Self)^.&set := $00000080;
  53003. end;
  53004. procedure TDMAC1_DCH1CON.clearCHEN; inline;
  53005. begin
  53006. pTDefRegMap(@Self)^.clr := $00000080;
  53007. end;
  53008. procedure TDMAC1_DCH1CON.setCHEN(thebits : TBits_1); inline;
  53009. begin
  53010. if thebits = 0 then
  53011. pTDefRegMap(@Self)^.clr := $00000080
  53012. else
  53013. pTDefRegMap(@Self)^.&set := $00000080;
  53014. end;
  53015. function TDMAC1_DCH1CON.getCHEN : TBits_1; inline;
  53016. begin
  53017. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53018. end;
  53019. procedure TDMAC1_DCH1CON.setCHCHNS; inline;
  53020. begin
  53021. pTDefRegMap(@Self)^.&set := $00000100;
  53022. end;
  53023. procedure TDMAC1_DCH1CON.clearCHCHNS; inline;
  53024. begin
  53025. pTDefRegMap(@Self)^.clr := $00000100;
  53026. end;
  53027. procedure TDMAC1_DCH1CON.setCHCHNS(thebits : TBits_1); inline;
  53028. begin
  53029. if thebits = 0 then
  53030. pTDefRegMap(@Self)^.clr := $00000100
  53031. else
  53032. pTDefRegMap(@Self)^.&set := $00000100;
  53033. end;
  53034. function TDMAC1_DCH1CON.getCHCHNS : TBits_1; inline;
  53035. begin
  53036. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  53037. end;
  53038. procedure TDMAC1_DCH1CON.setCHBUSY; inline;
  53039. begin
  53040. pTDefRegMap(@Self)^.&set := $00008000;
  53041. end;
  53042. procedure TDMAC1_DCH1CON.clearCHBUSY; inline;
  53043. begin
  53044. pTDefRegMap(@Self)^.clr := $00008000;
  53045. end;
  53046. procedure TDMAC1_DCH1CON.setCHBUSY(thebits : TBits_1); inline;
  53047. begin
  53048. if thebits = 0 then
  53049. pTDefRegMap(@Self)^.clr := $00008000
  53050. else
  53051. pTDefRegMap(@Self)^.&set := $00008000;
  53052. end;
  53053. function TDMAC1_DCH1CON.getCHBUSY : TBits_1; inline;
  53054. begin
  53055. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  53056. end;
  53057. procedure TDMAC1_DCH1CON.setw(thebits : TBits_32); inline;
  53058. begin
  53059. pTDefRegMap(@Self)^.val := thebits;
  53060. end;
  53061. function TDMAC1_DCH1CON.getw : TBits_32; inline;
  53062. begin
  53063. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53064. end;
  53065. procedure TDMAC1_DCH1ECON.setAIRQEN; inline;
  53066. begin
  53067. pTDefRegMap(@Self)^.&set := $00000008;
  53068. end;
  53069. procedure TDMAC1_DCH1ECON.clearAIRQEN; inline;
  53070. begin
  53071. pTDefRegMap(@Self)^.clr := $00000008;
  53072. end;
  53073. procedure TDMAC1_DCH1ECON.setAIRQEN(thebits : TBits_1); inline;
  53074. begin
  53075. if thebits = 0 then
  53076. pTDefRegMap(@Self)^.clr := $00000008
  53077. else
  53078. pTDefRegMap(@Self)^.&set := $00000008;
  53079. end;
  53080. function TDMAC1_DCH1ECON.getAIRQEN : TBits_1; inline;
  53081. begin
  53082. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53083. end;
  53084. procedure TDMAC1_DCH1ECON.setSIRQEN; inline;
  53085. begin
  53086. pTDefRegMap(@Self)^.&set := $00000010;
  53087. end;
  53088. procedure TDMAC1_DCH1ECON.clearSIRQEN; inline;
  53089. begin
  53090. pTDefRegMap(@Self)^.clr := $00000010;
  53091. end;
  53092. procedure TDMAC1_DCH1ECON.setSIRQEN(thebits : TBits_1); inline;
  53093. begin
  53094. if thebits = 0 then
  53095. pTDefRegMap(@Self)^.clr := $00000010
  53096. else
  53097. pTDefRegMap(@Self)^.&set := $00000010;
  53098. end;
  53099. function TDMAC1_DCH1ECON.getSIRQEN : TBits_1; inline;
  53100. begin
  53101. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53102. end;
  53103. procedure TDMAC1_DCH1ECON.setPATEN; inline;
  53104. begin
  53105. pTDefRegMap(@Self)^.&set := $00000020;
  53106. end;
  53107. procedure TDMAC1_DCH1ECON.clearPATEN; inline;
  53108. begin
  53109. pTDefRegMap(@Self)^.clr := $00000020;
  53110. end;
  53111. procedure TDMAC1_DCH1ECON.setPATEN(thebits : TBits_1); inline;
  53112. begin
  53113. if thebits = 0 then
  53114. pTDefRegMap(@Self)^.clr := $00000020
  53115. else
  53116. pTDefRegMap(@Self)^.&set := $00000020;
  53117. end;
  53118. function TDMAC1_DCH1ECON.getPATEN : TBits_1; inline;
  53119. begin
  53120. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53121. end;
  53122. procedure TDMAC1_DCH1ECON.setCABORT; inline;
  53123. begin
  53124. pTDefRegMap(@Self)^.&set := $00000040;
  53125. end;
  53126. procedure TDMAC1_DCH1ECON.clearCABORT; inline;
  53127. begin
  53128. pTDefRegMap(@Self)^.clr := $00000040;
  53129. end;
  53130. procedure TDMAC1_DCH1ECON.setCABORT(thebits : TBits_1); inline;
  53131. begin
  53132. if thebits = 0 then
  53133. pTDefRegMap(@Self)^.clr := $00000040
  53134. else
  53135. pTDefRegMap(@Self)^.&set := $00000040;
  53136. end;
  53137. function TDMAC1_DCH1ECON.getCABORT : TBits_1; inline;
  53138. begin
  53139. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53140. end;
  53141. procedure TDMAC1_DCH1ECON.setCFORCE; inline;
  53142. begin
  53143. pTDefRegMap(@Self)^.&set := $00000080;
  53144. end;
  53145. procedure TDMAC1_DCH1ECON.clearCFORCE; inline;
  53146. begin
  53147. pTDefRegMap(@Self)^.clr := $00000080;
  53148. end;
  53149. procedure TDMAC1_DCH1ECON.setCFORCE(thebits : TBits_1); inline;
  53150. begin
  53151. if thebits = 0 then
  53152. pTDefRegMap(@Self)^.clr := $00000080
  53153. else
  53154. pTDefRegMap(@Self)^.&set := $00000080;
  53155. end;
  53156. function TDMAC1_DCH1ECON.getCFORCE : TBits_1; inline;
  53157. begin
  53158. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53159. end;
  53160. procedure TDMAC1_DCH1ECON.setCHSIRQ(thebits : TBits_8); inline;
  53161. begin
  53162. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  53163. end;
  53164. function TDMAC1_DCH1ECON.getCHSIRQ : TBits_8; inline;
  53165. begin
  53166. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  53167. end;
  53168. procedure TDMAC1_DCH1ECON.setCHAIRQ(thebits : TBits_8); inline;
  53169. begin
  53170. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  53171. end;
  53172. function TDMAC1_DCH1ECON.getCHAIRQ : TBits_8; inline;
  53173. begin
  53174. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  53175. end;
  53176. procedure TDMAC1_DCH1ECON.setw(thebits : TBits_32); inline;
  53177. begin
  53178. pTDefRegMap(@Self)^.val := thebits;
  53179. end;
  53180. function TDMAC1_DCH1ECON.getw : TBits_32; inline;
  53181. begin
  53182. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53183. end;
  53184. procedure TDMAC1_DCH1INT.setCHERIF; inline;
  53185. begin
  53186. pTDefRegMap(@Self)^.&set := $00000001;
  53187. end;
  53188. procedure TDMAC1_DCH1INT.clearCHERIF; inline;
  53189. begin
  53190. pTDefRegMap(@Self)^.clr := $00000001;
  53191. end;
  53192. procedure TDMAC1_DCH1INT.setCHERIF(thebits : TBits_1); inline;
  53193. begin
  53194. if thebits = 0 then
  53195. pTDefRegMap(@Self)^.clr := $00000001
  53196. else
  53197. pTDefRegMap(@Self)^.&set := $00000001;
  53198. end;
  53199. function TDMAC1_DCH1INT.getCHERIF : TBits_1; inline;
  53200. begin
  53201. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53202. end;
  53203. procedure TDMAC1_DCH1INT.setCHTAIF; inline;
  53204. begin
  53205. pTDefRegMap(@Self)^.&set := $00000002;
  53206. end;
  53207. procedure TDMAC1_DCH1INT.clearCHTAIF; inline;
  53208. begin
  53209. pTDefRegMap(@Self)^.clr := $00000002;
  53210. end;
  53211. procedure TDMAC1_DCH1INT.setCHTAIF(thebits : TBits_1); inline;
  53212. begin
  53213. if thebits = 0 then
  53214. pTDefRegMap(@Self)^.clr := $00000002
  53215. else
  53216. pTDefRegMap(@Self)^.&set := $00000002;
  53217. end;
  53218. function TDMAC1_DCH1INT.getCHTAIF : TBits_1; inline;
  53219. begin
  53220. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53221. end;
  53222. procedure TDMAC1_DCH1INT.setCHCCIF; inline;
  53223. begin
  53224. pTDefRegMap(@Self)^.&set := $00000004;
  53225. end;
  53226. procedure TDMAC1_DCH1INT.clearCHCCIF; inline;
  53227. begin
  53228. pTDefRegMap(@Self)^.clr := $00000004;
  53229. end;
  53230. procedure TDMAC1_DCH1INT.setCHCCIF(thebits : TBits_1); inline;
  53231. begin
  53232. if thebits = 0 then
  53233. pTDefRegMap(@Self)^.clr := $00000004
  53234. else
  53235. pTDefRegMap(@Self)^.&set := $00000004;
  53236. end;
  53237. function TDMAC1_DCH1INT.getCHCCIF : TBits_1; inline;
  53238. begin
  53239. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53240. end;
  53241. procedure TDMAC1_DCH1INT.setCHBCIF; inline;
  53242. begin
  53243. pTDefRegMap(@Self)^.&set := $00000008;
  53244. end;
  53245. procedure TDMAC1_DCH1INT.clearCHBCIF; inline;
  53246. begin
  53247. pTDefRegMap(@Self)^.clr := $00000008;
  53248. end;
  53249. procedure TDMAC1_DCH1INT.setCHBCIF(thebits : TBits_1); inline;
  53250. begin
  53251. if thebits = 0 then
  53252. pTDefRegMap(@Self)^.clr := $00000008
  53253. else
  53254. pTDefRegMap(@Self)^.&set := $00000008;
  53255. end;
  53256. function TDMAC1_DCH1INT.getCHBCIF : TBits_1; inline;
  53257. begin
  53258. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53259. end;
  53260. procedure TDMAC1_DCH1INT.setCHDHIF; inline;
  53261. begin
  53262. pTDefRegMap(@Self)^.&set := $00000010;
  53263. end;
  53264. procedure TDMAC1_DCH1INT.clearCHDHIF; inline;
  53265. begin
  53266. pTDefRegMap(@Self)^.clr := $00000010;
  53267. end;
  53268. procedure TDMAC1_DCH1INT.setCHDHIF(thebits : TBits_1); inline;
  53269. begin
  53270. if thebits = 0 then
  53271. pTDefRegMap(@Self)^.clr := $00000010
  53272. else
  53273. pTDefRegMap(@Self)^.&set := $00000010;
  53274. end;
  53275. function TDMAC1_DCH1INT.getCHDHIF : TBits_1; inline;
  53276. begin
  53277. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53278. end;
  53279. procedure TDMAC1_DCH1INT.setCHDDIF; inline;
  53280. begin
  53281. pTDefRegMap(@Self)^.&set := $00000020;
  53282. end;
  53283. procedure TDMAC1_DCH1INT.clearCHDDIF; inline;
  53284. begin
  53285. pTDefRegMap(@Self)^.clr := $00000020;
  53286. end;
  53287. procedure TDMAC1_DCH1INT.setCHDDIF(thebits : TBits_1); inline;
  53288. begin
  53289. if thebits = 0 then
  53290. pTDefRegMap(@Self)^.clr := $00000020
  53291. else
  53292. pTDefRegMap(@Self)^.&set := $00000020;
  53293. end;
  53294. function TDMAC1_DCH1INT.getCHDDIF : TBits_1; inline;
  53295. begin
  53296. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53297. end;
  53298. procedure TDMAC1_DCH1INT.setCHSHIF; inline;
  53299. begin
  53300. pTDefRegMap(@Self)^.&set := $00000040;
  53301. end;
  53302. procedure TDMAC1_DCH1INT.clearCHSHIF; inline;
  53303. begin
  53304. pTDefRegMap(@Self)^.clr := $00000040;
  53305. end;
  53306. procedure TDMAC1_DCH1INT.setCHSHIF(thebits : TBits_1); inline;
  53307. begin
  53308. if thebits = 0 then
  53309. pTDefRegMap(@Self)^.clr := $00000040
  53310. else
  53311. pTDefRegMap(@Self)^.&set := $00000040;
  53312. end;
  53313. function TDMAC1_DCH1INT.getCHSHIF : TBits_1; inline;
  53314. begin
  53315. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53316. end;
  53317. procedure TDMAC1_DCH1INT.setCHSDIF; inline;
  53318. begin
  53319. pTDefRegMap(@Self)^.&set := $00000080;
  53320. end;
  53321. procedure TDMAC1_DCH1INT.clearCHSDIF; inline;
  53322. begin
  53323. pTDefRegMap(@Self)^.clr := $00000080;
  53324. end;
  53325. procedure TDMAC1_DCH1INT.setCHSDIF(thebits : TBits_1); inline;
  53326. begin
  53327. if thebits = 0 then
  53328. pTDefRegMap(@Self)^.clr := $00000080
  53329. else
  53330. pTDefRegMap(@Self)^.&set := $00000080;
  53331. end;
  53332. function TDMAC1_DCH1INT.getCHSDIF : TBits_1; inline;
  53333. begin
  53334. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53335. end;
  53336. procedure TDMAC1_DCH1INT.setCHERIE; inline;
  53337. begin
  53338. pTDefRegMap(@Self)^.&set := $00010000;
  53339. end;
  53340. procedure TDMAC1_DCH1INT.clearCHERIE; inline;
  53341. begin
  53342. pTDefRegMap(@Self)^.clr := $00010000;
  53343. end;
  53344. procedure TDMAC1_DCH1INT.setCHERIE(thebits : TBits_1); inline;
  53345. begin
  53346. if thebits = 0 then
  53347. pTDefRegMap(@Self)^.clr := $00010000
  53348. else
  53349. pTDefRegMap(@Self)^.&set := $00010000;
  53350. end;
  53351. function TDMAC1_DCH1INT.getCHERIE : TBits_1; inline;
  53352. begin
  53353. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  53354. end;
  53355. procedure TDMAC1_DCH1INT.setCHTAIE; inline;
  53356. begin
  53357. pTDefRegMap(@Self)^.&set := $00020000;
  53358. end;
  53359. procedure TDMAC1_DCH1INT.clearCHTAIE; inline;
  53360. begin
  53361. pTDefRegMap(@Self)^.clr := $00020000;
  53362. end;
  53363. procedure TDMAC1_DCH1INT.setCHTAIE(thebits : TBits_1); inline;
  53364. begin
  53365. if thebits = 0 then
  53366. pTDefRegMap(@Self)^.clr := $00020000
  53367. else
  53368. pTDefRegMap(@Self)^.&set := $00020000;
  53369. end;
  53370. function TDMAC1_DCH1INT.getCHTAIE : TBits_1; inline;
  53371. begin
  53372. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  53373. end;
  53374. procedure TDMAC1_DCH1INT.setCHCCIE; inline;
  53375. begin
  53376. pTDefRegMap(@Self)^.&set := $00040000;
  53377. end;
  53378. procedure TDMAC1_DCH1INT.clearCHCCIE; inline;
  53379. begin
  53380. pTDefRegMap(@Self)^.clr := $00040000;
  53381. end;
  53382. procedure TDMAC1_DCH1INT.setCHCCIE(thebits : TBits_1); inline;
  53383. begin
  53384. if thebits = 0 then
  53385. pTDefRegMap(@Self)^.clr := $00040000
  53386. else
  53387. pTDefRegMap(@Self)^.&set := $00040000;
  53388. end;
  53389. function TDMAC1_DCH1INT.getCHCCIE : TBits_1; inline;
  53390. begin
  53391. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  53392. end;
  53393. procedure TDMAC1_DCH1INT.setCHBCIE; inline;
  53394. begin
  53395. pTDefRegMap(@Self)^.&set := $00080000;
  53396. end;
  53397. procedure TDMAC1_DCH1INT.clearCHBCIE; inline;
  53398. begin
  53399. pTDefRegMap(@Self)^.clr := $00080000;
  53400. end;
  53401. procedure TDMAC1_DCH1INT.setCHBCIE(thebits : TBits_1); inline;
  53402. begin
  53403. if thebits = 0 then
  53404. pTDefRegMap(@Self)^.clr := $00080000
  53405. else
  53406. pTDefRegMap(@Self)^.&set := $00080000;
  53407. end;
  53408. function TDMAC1_DCH1INT.getCHBCIE : TBits_1; inline;
  53409. begin
  53410. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  53411. end;
  53412. procedure TDMAC1_DCH1INT.setCHDHIE; inline;
  53413. begin
  53414. pTDefRegMap(@Self)^.&set := $00100000;
  53415. end;
  53416. procedure TDMAC1_DCH1INT.clearCHDHIE; inline;
  53417. begin
  53418. pTDefRegMap(@Self)^.clr := $00100000;
  53419. end;
  53420. procedure TDMAC1_DCH1INT.setCHDHIE(thebits : TBits_1); inline;
  53421. begin
  53422. if thebits = 0 then
  53423. pTDefRegMap(@Self)^.clr := $00100000
  53424. else
  53425. pTDefRegMap(@Self)^.&set := $00100000;
  53426. end;
  53427. function TDMAC1_DCH1INT.getCHDHIE : TBits_1; inline;
  53428. begin
  53429. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  53430. end;
  53431. procedure TDMAC1_DCH1INT.setCHDDIE; inline;
  53432. begin
  53433. pTDefRegMap(@Self)^.&set := $00200000;
  53434. end;
  53435. procedure TDMAC1_DCH1INT.clearCHDDIE; inline;
  53436. begin
  53437. pTDefRegMap(@Self)^.clr := $00200000;
  53438. end;
  53439. procedure TDMAC1_DCH1INT.setCHDDIE(thebits : TBits_1); inline;
  53440. begin
  53441. if thebits = 0 then
  53442. pTDefRegMap(@Self)^.clr := $00200000
  53443. else
  53444. pTDefRegMap(@Self)^.&set := $00200000;
  53445. end;
  53446. function TDMAC1_DCH1INT.getCHDDIE : TBits_1; inline;
  53447. begin
  53448. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  53449. end;
  53450. procedure TDMAC1_DCH1INT.setCHSHIE; inline;
  53451. begin
  53452. pTDefRegMap(@Self)^.&set := $00400000;
  53453. end;
  53454. procedure TDMAC1_DCH1INT.clearCHSHIE; inline;
  53455. begin
  53456. pTDefRegMap(@Self)^.clr := $00400000;
  53457. end;
  53458. procedure TDMAC1_DCH1INT.setCHSHIE(thebits : TBits_1); inline;
  53459. begin
  53460. if thebits = 0 then
  53461. pTDefRegMap(@Self)^.clr := $00400000
  53462. else
  53463. pTDefRegMap(@Self)^.&set := $00400000;
  53464. end;
  53465. function TDMAC1_DCH1INT.getCHSHIE : TBits_1; inline;
  53466. begin
  53467. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  53468. end;
  53469. procedure TDMAC1_DCH1INT.setCHSDIE; inline;
  53470. begin
  53471. pTDefRegMap(@Self)^.&set := $00800000;
  53472. end;
  53473. procedure TDMAC1_DCH1INT.clearCHSDIE; inline;
  53474. begin
  53475. pTDefRegMap(@Self)^.clr := $00800000;
  53476. end;
  53477. procedure TDMAC1_DCH1INT.setCHSDIE(thebits : TBits_1); inline;
  53478. begin
  53479. if thebits = 0 then
  53480. pTDefRegMap(@Self)^.clr := $00800000
  53481. else
  53482. pTDefRegMap(@Self)^.&set := $00800000;
  53483. end;
  53484. function TDMAC1_DCH1INT.getCHSDIE : TBits_1; inline;
  53485. begin
  53486. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  53487. end;
  53488. procedure TDMAC1_DCH1INT.setw(thebits : TBits_32); inline;
  53489. begin
  53490. pTDefRegMap(@Self)^.val := thebits;
  53491. end;
  53492. function TDMAC1_DCH1INT.getw : TBits_32; inline;
  53493. begin
  53494. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53495. end;
  53496. procedure TDMAC2_DCH2CON.setCHPRI(thebits : TBits_2); inline;
  53497. begin
  53498. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  53499. end;
  53500. function TDMAC2_DCH2CON.getCHPRI : TBits_2; inline;
  53501. begin
  53502. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  53503. end;
  53504. procedure TDMAC2_DCH2CON.setCHEDET; inline;
  53505. begin
  53506. pTDefRegMap(@Self)^.&set := $00000004;
  53507. end;
  53508. procedure TDMAC2_DCH2CON.clearCHEDET; inline;
  53509. begin
  53510. pTDefRegMap(@Self)^.clr := $00000004;
  53511. end;
  53512. procedure TDMAC2_DCH2CON.setCHEDET(thebits : TBits_1); inline;
  53513. begin
  53514. if thebits = 0 then
  53515. pTDefRegMap(@Self)^.clr := $00000004
  53516. else
  53517. pTDefRegMap(@Self)^.&set := $00000004;
  53518. end;
  53519. function TDMAC2_DCH2CON.getCHEDET : TBits_1; inline;
  53520. begin
  53521. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53522. end;
  53523. procedure TDMAC2_DCH2CON.setCHAEN; inline;
  53524. begin
  53525. pTDefRegMap(@Self)^.&set := $00000010;
  53526. end;
  53527. procedure TDMAC2_DCH2CON.clearCHAEN; inline;
  53528. begin
  53529. pTDefRegMap(@Self)^.clr := $00000010;
  53530. end;
  53531. procedure TDMAC2_DCH2CON.setCHAEN(thebits : TBits_1); inline;
  53532. begin
  53533. if thebits = 0 then
  53534. pTDefRegMap(@Self)^.clr := $00000010
  53535. else
  53536. pTDefRegMap(@Self)^.&set := $00000010;
  53537. end;
  53538. function TDMAC2_DCH2CON.getCHAEN : TBits_1; inline;
  53539. begin
  53540. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53541. end;
  53542. procedure TDMAC2_DCH2CON.setCHCHN; inline;
  53543. begin
  53544. pTDefRegMap(@Self)^.&set := $00000020;
  53545. end;
  53546. procedure TDMAC2_DCH2CON.clearCHCHN; inline;
  53547. begin
  53548. pTDefRegMap(@Self)^.clr := $00000020;
  53549. end;
  53550. procedure TDMAC2_DCH2CON.setCHCHN(thebits : TBits_1); inline;
  53551. begin
  53552. if thebits = 0 then
  53553. pTDefRegMap(@Self)^.clr := $00000020
  53554. else
  53555. pTDefRegMap(@Self)^.&set := $00000020;
  53556. end;
  53557. function TDMAC2_DCH2CON.getCHCHN : TBits_1; inline;
  53558. begin
  53559. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53560. end;
  53561. procedure TDMAC2_DCH2CON.setCHAED; inline;
  53562. begin
  53563. pTDefRegMap(@Self)^.&set := $00000040;
  53564. end;
  53565. procedure TDMAC2_DCH2CON.clearCHAED; inline;
  53566. begin
  53567. pTDefRegMap(@Self)^.clr := $00000040;
  53568. end;
  53569. procedure TDMAC2_DCH2CON.setCHAED(thebits : TBits_1); inline;
  53570. begin
  53571. if thebits = 0 then
  53572. pTDefRegMap(@Self)^.clr := $00000040
  53573. else
  53574. pTDefRegMap(@Self)^.&set := $00000040;
  53575. end;
  53576. function TDMAC2_DCH2CON.getCHAED : TBits_1; inline;
  53577. begin
  53578. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53579. end;
  53580. procedure TDMAC2_DCH2CON.setCHEN; inline;
  53581. begin
  53582. pTDefRegMap(@Self)^.&set := $00000080;
  53583. end;
  53584. procedure TDMAC2_DCH2CON.clearCHEN; inline;
  53585. begin
  53586. pTDefRegMap(@Self)^.clr := $00000080;
  53587. end;
  53588. procedure TDMAC2_DCH2CON.setCHEN(thebits : TBits_1); inline;
  53589. begin
  53590. if thebits = 0 then
  53591. pTDefRegMap(@Self)^.clr := $00000080
  53592. else
  53593. pTDefRegMap(@Self)^.&set := $00000080;
  53594. end;
  53595. function TDMAC2_DCH2CON.getCHEN : TBits_1; inline;
  53596. begin
  53597. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53598. end;
  53599. procedure TDMAC2_DCH2CON.setCHCHNS; inline;
  53600. begin
  53601. pTDefRegMap(@Self)^.&set := $00000100;
  53602. end;
  53603. procedure TDMAC2_DCH2CON.clearCHCHNS; inline;
  53604. begin
  53605. pTDefRegMap(@Self)^.clr := $00000100;
  53606. end;
  53607. procedure TDMAC2_DCH2CON.setCHCHNS(thebits : TBits_1); inline;
  53608. begin
  53609. if thebits = 0 then
  53610. pTDefRegMap(@Self)^.clr := $00000100
  53611. else
  53612. pTDefRegMap(@Self)^.&set := $00000100;
  53613. end;
  53614. function TDMAC2_DCH2CON.getCHCHNS : TBits_1; inline;
  53615. begin
  53616. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  53617. end;
  53618. procedure TDMAC2_DCH2CON.setCHBUSY; inline;
  53619. begin
  53620. pTDefRegMap(@Self)^.&set := $00008000;
  53621. end;
  53622. procedure TDMAC2_DCH2CON.clearCHBUSY; inline;
  53623. begin
  53624. pTDefRegMap(@Self)^.clr := $00008000;
  53625. end;
  53626. procedure TDMAC2_DCH2CON.setCHBUSY(thebits : TBits_1); inline;
  53627. begin
  53628. if thebits = 0 then
  53629. pTDefRegMap(@Self)^.clr := $00008000
  53630. else
  53631. pTDefRegMap(@Self)^.&set := $00008000;
  53632. end;
  53633. function TDMAC2_DCH2CON.getCHBUSY : TBits_1; inline;
  53634. begin
  53635. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  53636. end;
  53637. procedure TDMAC2_DCH2CON.setw(thebits : TBits_32); inline;
  53638. begin
  53639. pTDefRegMap(@Self)^.val := thebits;
  53640. end;
  53641. function TDMAC2_DCH2CON.getw : TBits_32; inline;
  53642. begin
  53643. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53644. end;
  53645. procedure TDMAC2_DCH2ECON.setAIRQEN; inline;
  53646. begin
  53647. pTDefRegMap(@Self)^.&set := $00000008;
  53648. end;
  53649. procedure TDMAC2_DCH2ECON.clearAIRQEN; inline;
  53650. begin
  53651. pTDefRegMap(@Self)^.clr := $00000008;
  53652. end;
  53653. procedure TDMAC2_DCH2ECON.setAIRQEN(thebits : TBits_1); inline;
  53654. begin
  53655. if thebits = 0 then
  53656. pTDefRegMap(@Self)^.clr := $00000008
  53657. else
  53658. pTDefRegMap(@Self)^.&set := $00000008;
  53659. end;
  53660. function TDMAC2_DCH2ECON.getAIRQEN : TBits_1; inline;
  53661. begin
  53662. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53663. end;
  53664. procedure TDMAC2_DCH2ECON.setSIRQEN; inline;
  53665. begin
  53666. pTDefRegMap(@Self)^.&set := $00000010;
  53667. end;
  53668. procedure TDMAC2_DCH2ECON.clearSIRQEN; inline;
  53669. begin
  53670. pTDefRegMap(@Self)^.clr := $00000010;
  53671. end;
  53672. procedure TDMAC2_DCH2ECON.setSIRQEN(thebits : TBits_1); inline;
  53673. begin
  53674. if thebits = 0 then
  53675. pTDefRegMap(@Self)^.clr := $00000010
  53676. else
  53677. pTDefRegMap(@Self)^.&set := $00000010;
  53678. end;
  53679. function TDMAC2_DCH2ECON.getSIRQEN : TBits_1; inline;
  53680. begin
  53681. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53682. end;
  53683. procedure TDMAC2_DCH2ECON.setPATEN; inline;
  53684. begin
  53685. pTDefRegMap(@Self)^.&set := $00000020;
  53686. end;
  53687. procedure TDMAC2_DCH2ECON.clearPATEN; inline;
  53688. begin
  53689. pTDefRegMap(@Self)^.clr := $00000020;
  53690. end;
  53691. procedure TDMAC2_DCH2ECON.setPATEN(thebits : TBits_1); inline;
  53692. begin
  53693. if thebits = 0 then
  53694. pTDefRegMap(@Self)^.clr := $00000020
  53695. else
  53696. pTDefRegMap(@Self)^.&set := $00000020;
  53697. end;
  53698. function TDMAC2_DCH2ECON.getPATEN : TBits_1; inline;
  53699. begin
  53700. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53701. end;
  53702. procedure TDMAC2_DCH2ECON.setCABORT; inline;
  53703. begin
  53704. pTDefRegMap(@Self)^.&set := $00000040;
  53705. end;
  53706. procedure TDMAC2_DCH2ECON.clearCABORT; inline;
  53707. begin
  53708. pTDefRegMap(@Self)^.clr := $00000040;
  53709. end;
  53710. procedure TDMAC2_DCH2ECON.setCABORT(thebits : TBits_1); inline;
  53711. begin
  53712. if thebits = 0 then
  53713. pTDefRegMap(@Self)^.clr := $00000040
  53714. else
  53715. pTDefRegMap(@Self)^.&set := $00000040;
  53716. end;
  53717. function TDMAC2_DCH2ECON.getCABORT : TBits_1; inline;
  53718. begin
  53719. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53720. end;
  53721. procedure TDMAC2_DCH2ECON.setCFORCE; inline;
  53722. begin
  53723. pTDefRegMap(@Self)^.&set := $00000080;
  53724. end;
  53725. procedure TDMAC2_DCH2ECON.clearCFORCE; inline;
  53726. begin
  53727. pTDefRegMap(@Self)^.clr := $00000080;
  53728. end;
  53729. procedure TDMAC2_DCH2ECON.setCFORCE(thebits : TBits_1); inline;
  53730. begin
  53731. if thebits = 0 then
  53732. pTDefRegMap(@Self)^.clr := $00000080
  53733. else
  53734. pTDefRegMap(@Self)^.&set := $00000080;
  53735. end;
  53736. function TDMAC2_DCH2ECON.getCFORCE : TBits_1; inline;
  53737. begin
  53738. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53739. end;
  53740. procedure TDMAC2_DCH2ECON.setCHSIRQ(thebits : TBits_8); inline;
  53741. begin
  53742. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  53743. end;
  53744. function TDMAC2_DCH2ECON.getCHSIRQ : TBits_8; inline;
  53745. begin
  53746. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  53747. end;
  53748. procedure TDMAC2_DCH2ECON.setCHAIRQ(thebits : TBits_8); inline;
  53749. begin
  53750. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  53751. end;
  53752. function TDMAC2_DCH2ECON.getCHAIRQ : TBits_8; inline;
  53753. begin
  53754. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  53755. end;
  53756. procedure TDMAC2_DCH2ECON.setw(thebits : TBits_32); inline;
  53757. begin
  53758. pTDefRegMap(@Self)^.val := thebits;
  53759. end;
  53760. function TDMAC2_DCH2ECON.getw : TBits_32; inline;
  53761. begin
  53762. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53763. end;
  53764. procedure TDMAC2_DCH2INT.setCHERIF; inline;
  53765. begin
  53766. pTDefRegMap(@Self)^.&set := $00000001;
  53767. end;
  53768. procedure TDMAC2_DCH2INT.clearCHERIF; inline;
  53769. begin
  53770. pTDefRegMap(@Self)^.clr := $00000001;
  53771. end;
  53772. procedure TDMAC2_DCH2INT.setCHERIF(thebits : TBits_1); inline;
  53773. begin
  53774. if thebits = 0 then
  53775. pTDefRegMap(@Self)^.clr := $00000001
  53776. else
  53777. pTDefRegMap(@Self)^.&set := $00000001;
  53778. end;
  53779. function TDMAC2_DCH2INT.getCHERIF : TBits_1; inline;
  53780. begin
  53781. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53782. end;
  53783. procedure TDMAC2_DCH2INT.setCHTAIF; inline;
  53784. begin
  53785. pTDefRegMap(@Self)^.&set := $00000002;
  53786. end;
  53787. procedure TDMAC2_DCH2INT.clearCHTAIF; inline;
  53788. begin
  53789. pTDefRegMap(@Self)^.clr := $00000002;
  53790. end;
  53791. procedure TDMAC2_DCH2INT.setCHTAIF(thebits : TBits_1); inline;
  53792. begin
  53793. if thebits = 0 then
  53794. pTDefRegMap(@Self)^.clr := $00000002
  53795. else
  53796. pTDefRegMap(@Self)^.&set := $00000002;
  53797. end;
  53798. function TDMAC2_DCH2INT.getCHTAIF : TBits_1; inline;
  53799. begin
  53800. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53801. end;
  53802. procedure TDMAC2_DCH2INT.setCHCCIF; inline;
  53803. begin
  53804. pTDefRegMap(@Self)^.&set := $00000004;
  53805. end;
  53806. procedure TDMAC2_DCH2INT.clearCHCCIF; inline;
  53807. begin
  53808. pTDefRegMap(@Self)^.clr := $00000004;
  53809. end;
  53810. procedure TDMAC2_DCH2INT.setCHCCIF(thebits : TBits_1); inline;
  53811. begin
  53812. if thebits = 0 then
  53813. pTDefRegMap(@Self)^.clr := $00000004
  53814. else
  53815. pTDefRegMap(@Self)^.&set := $00000004;
  53816. end;
  53817. function TDMAC2_DCH2INT.getCHCCIF : TBits_1; inline;
  53818. begin
  53819. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53820. end;
  53821. procedure TDMAC2_DCH2INT.setCHBCIF; inline;
  53822. begin
  53823. pTDefRegMap(@Self)^.&set := $00000008;
  53824. end;
  53825. procedure TDMAC2_DCH2INT.clearCHBCIF; inline;
  53826. begin
  53827. pTDefRegMap(@Self)^.clr := $00000008;
  53828. end;
  53829. procedure TDMAC2_DCH2INT.setCHBCIF(thebits : TBits_1); inline;
  53830. begin
  53831. if thebits = 0 then
  53832. pTDefRegMap(@Self)^.clr := $00000008
  53833. else
  53834. pTDefRegMap(@Self)^.&set := $00000008;
  53835. end;
  53836. function TDMAC2_DCH2INT.getCHBCIF : TBits_1; inline;
  53837. begin
  53838. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53839. end;
  53840. procedure TDMAC2_DCH2INT.setCHDHIF; inline;
  53841. begin
  53842. pTDefRegMap(@Self)^.&set := $00000010;
  53843. end;
  53844. procedure TDMAC2_DCH2INT.clearCHDHIF; inline;
  53845. begin
  53846. pTDefRegMap(@Self)^.clr := $00000010;
  53847. end;
  53848. procedure TDMAC2_DCH2INT.setCHDHIF(thebits : TBits_1); inline;
  53849. begin
  53850. if thebits = 0 then
  53851. pTDefRegMap(@Self)^.clr := $00000010
  53852. else
  53853. pTDefRegMap(@Self)^.&set := $00000010;
  53854. end;
  53855. function TDMAC2_DCH2INT.getCHDHIF : TBits_1; inline;
  53856. begin
  53857. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53858. end;
  53859. procedure TDMAC2_DCH2INT.setCHDDIF; inline;
  53860. begin
  53861. pTDefRegMap(@Self)^.&set := $00000020;
  53862. end;
  53863. procedure TDMAC2_DCH2INT.clearCHDDIF; inline;
  53864. begin
  53865. pTDefRegMap(@Self)^.clr := $00000020;
  53866. end;
  53867. procedure TDMAC2_DCH2INT.setCHDDIF(thebits : TBits_1); inline;
  53868. begin
  53869. if thebits = 0 then
  53870. pTDefRegMap(@Self)^.clr := $00000020
  53871. else
  53872. pTDefRegMap(@Self)^.&set := $00000020;
  53873. end;
  53874. function TDMAC2_DCH2INT.getCHDDIF : TBits_1; inline;
  53875. begin
  53876. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53877. end;
  53878. procedure TDMAC2_DCH2INT.setCHSHIF; inline;
  53879. begin
  53880. pTDefRegMap(@Self)^.&set := $00000040;
  53881. end;
  53882. procedure TDMAC2_DCH2INT.clearCHSHIF; inline;
  53883. begin
  53884. pTDefRegMap(@Self)^.clr := $00000040;
  53885. end;
  53886. procedure TDMAC2_DCH2INT.setCHSHIF(thebits : TBits_1); inline;
  53887. begin
  53888. if thebits = 0 then
  53889. pTDefRegMap(@Self)^.clr := $00000040
  53890. else
  53891. pTDefRegMap(@Self)^.&set := $00000040;
  53892. end;
  53893. function TDMAC2_DCH2INT.getCHSHIF : TBits_1; inline;
  53894. begin
  53895. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53896. end;
  53897. procedure TDMAC2_DCH2INT.setCHSDIF; inline;
  53898. begin
  53899. pTDefRegMap(@Self)^.&set := $00000080;
  53900. end;
  53901. procedure TDMAC2_DCH2INT.clearCHSDIF; inline;
  53902. begin
  53903. pTDefRegMap(@Self)^.clr := $00000080;
  53904. end;
  53905. procedure TDMAC2_DCH2INT.setCHSDIF(thebits : TBits_1); inline;
  53906. begin
  53907. if thebits = 0 then
  53908. pTDefRegMap(@Self)^.clr := $00000080
  53909. else
  53910. pTDefRegMap(@Self)^.&set := $00000080;
  53911. end;
  53912. function TDMAC2_DCH2INT.getCHSDIF : TBits_1; inline;
  53913. begin
  53914. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53915. end;
  53916. procedure TDMAC2_DCH2INT.setCHERIE; inline;
  53917. begin
  53918. pTDefRegMap(@Self)^.&set := $00010000;
  53919. end;
  53920. procedure TDMAC2_DCH2INT.clearCHERIE; inline;
  53921. begin
  53922. pTDefRegMap(@Self)^.clr := $00010000;
  53923. end;
  53924. procedure TDMAC2_DCH2INT.setCHERIE(thebits : TBits_1); inline;
  53925. begin
  53926. if thebits = 0 then
  53927. pTDefRegMap(@Self)^.clr := $00010000
  53928. else
  53929. pTDefRegMap(@Self)^.&set := $00010000;
  53930. end;
  53931. function TDMAC2_DCH2INT.getCHERIE : TBits_1; inline;
  53932. begin
  53933. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  53934. end;
  53935. procedure TDMAC2_DCH2INT.setCHTAIE; inline;
  53936. begin
  53937. pTDefRegMap(@Self)^.&set := $00020000;
  53938. end;
  53939. procedure TDMAC2_DCH2INT.clearCHTAIE; inline;
  53940. begin
  53941. pTDefRegMap(@Self)^.clr := $00020000;
  53942. end;
  53943. procedure TDMAC2_DCH2INT.setCHTAIE(thebits : TBits_1); inline;
  53944. begin
  53945. if thebits = 0 then
  53946. pTDefRegMap(@Self)^.clr := $00020000
  53947. else
  53948. pTDefRegMap(@Self)^.&set := $00020000;
  53949. end;
  53950. function TDMAC2_DCH2INT.getCHTAIE : TBits_1; inline;
  53951. begin
  53952. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  53953. end;
  53954. procedure TDMAC2_DCH2INT.setCHCCIE; inline;
  53955. begin
  53956. pTDefRegMap(@Self)^.&set := $00040000;
  53957. end;
  53958. procedure TDMAC2_DCH2INT.clearCHCCIE; inline;
  53959. begin
  53960. pTDefRegMap(@Self)^.clr := $00040000;
  53961. end;
  53962. procedure TDMAC2_DCH2INT.setCHCCIE(thebits : TBits_1); inline;
  53963. begin
  53964. if thebits = 0 then
  53965. pTDefRegMap(@Self)^.clr := $00040000
  53966. else
  53967. pTDefRegMap(@Self)^.&set := $00040000;
  53968. end;
  53969. function TDMAC2_DCH2INT.getCHCCIE : TBits_1; inline;
  53970. begin
  53971. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  53972. end;
  53973. procedure TDMAC2_DCH2INT.setCHBCIE; inline;
  53974. begin
  53975. pTDefRegMap(@Self)^.&set := $00080000;
  53976. end;
  53977. procedure TDMAC2_DCH2INT.clearCHBCIE; inline;
  53978. begin
  53979. pTDefRegMap(@Self)^.clr := $00080000;
  53980. end;
  53981. procedure TDMAC2_DCH2INT.setCHBCIE(thebits : TBits_1); inline;
  53982. begin
  53983. if thebits = 0 then
  53984. pTDefRegMap(@Self)^.clr := $00080000
  53985. else
  53986. pTDefRegMap(@Self)^.&set := $00080000;
  53987. end;
  53988. function TDMAC2_DCH2INT.getCHBCIE : TBits_1; inline;
  53989. begin
  53990. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  53991. end;
  53992. procedure TDMAC2_DCH2INT.setCHDHIE; inline;
  53993. begin
  53994. pTDefRegMap(@Self)^.&set := $00100000;
  53995. end;
  53996. procedure TDMAC2_DCH2INT.clearCHDHIE; inline;
  53997. begin
  53998. pTDefRegMap(@Self)^.clr := $00100000;
  53999. end;
  54000. procedure TDMAC2_DCH2INT.setCHDHIE(thebits : TBits_1); inline;
  54001. begin
  54002. if thebits = 0 then
  54003. pTDefRegMap(@Self)^.clr := $00100000
  54004. else
  54005. pTDefRegMap(@Self)^.&set := $00100000;
  54006. end;
  54007. function TDMAC2_DCH2INT.getCHDHIE : TBits_1; inline;
  54008. begin
  54009. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  54010. end;
  54011. procedure TDMAC2_DCH2INT.setCHDDIE; inline;
  54012. begin
  54013. pTDefRegMap(@Self)^.&set := $00200000;
  54014. end;
  54015. procedure TDMAC2_DCH2INT.clearCHDDIE; inline;
  54016. begin
  54017. pTDefRegMap(@Self)^.clr := $00200000;
  54018. end;
  54019. procedure TDMAC2_DCH2INT.setCHDDIE(thebits : TBits_1); inline;
  54020. begin
  54021. if thebits = 0 then
  54022. pTDefRegMap(@Self)^.clr := $00200000
  54023. else
  54024. pTDefRegMap(@Self)^.&set := $00200000;
  54025. end;
  54026. function TDMAC2_DCH2INT.getCHDDIE : TBits_1; inline;
  54027. begin
  54028. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  54029. end;
  54030. procedure TDMAC2_DCH2INT.setCHSHIE; inline;
  54031. begin
  54032. pTDefRegMap(@Self)^.&set := $00400000;
  54033. end;
  54034. procedure TDMAC2_DCH2INT.clearCHSHIE; inline;
  54035. begin
  54036. pTDefRegMap(@Self)^.clr := $00400000;
  54037. end;
  54038. procedure TDMAC2_DCH2INT.setCHSHIE(thebits : TBits_1); inline;
  54039. begin
  54040. if thebits = 0 then
  54041. pTDefRegMap(@Self)^.clr := $00400000
  54042. else
  54043. pTDefRegMap(@Self)^.&set := $00400000;
  54044. end;
  54045. function TDMAC2_DCH2INT.getCHSHIE : TBits_1; inline;
  54046. begin
  54047. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  54048. end;
  54049. procedure TDMAC2_DCH2INT.setCHSDIE; inline;
  54050. begin
  54051. pTDefRegMap(@Self)^.&set := $00800000;
  54052. end;
  54053. procedure TDMAC2_DCH2INT.clearCHSDIE; inline;
  54054. begin
  54055. pTDefRegMap(@Self)^.clr := $00800000;
  54056. end;
  54057. procedure TDMAC2_DCH2INT.setCHSDIE(thebits : TBits_1); inline;
  54058. begin
  54059. if thebits = 0 then
  54060. pTDefRegMap(@Self)^.clr := $00800000
  54061. else
  54062. pTDefRegMap(@Self)^.&set := $00800000;
  54063. end;
  54064. function TDMAC2_DCH2INT.getCHSDIE : TBits_1; inline;
  54065. begin
  54066. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  54067. end;
  54068. procedure TDMAC2_DCH2INT.setw(thebits : TBits_32); inline;
  54069. begin
  54070. pTDefRegMap(@Self)^.val := thebits;
  54071. end;
  54072. function TDMAC2_DCH2INT.getw : TBits_32; inline;
  54073. begin
  54074. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54075. end;
  54076. procedure TDMAC3_DCH3CON.setCHPRI(thebits : TBits_2); inline;
  54077. begin
  54078. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  54079. end;
  54080. function TDMAC3_DCH3CON.getCHPRI : TBits_2; inline;
  54081. begin
  54082. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  54083. end;
  54084. procedure TDMAC3_DCH3CON.setCHEDET; inline;
  54085. begin
  54086. pTDefRegMap(@Self)^.&set := $00000004;
  54087. end;
  54088. procedure TDMAC3_DCH3CON.clearCHEDET; inline;
  54089. begin
  54090. pTDefRegMap(@Self)^.clr := $00000004;
  54091. end;
  54092. procedure TDMAC3_DCH3CON.setCHEDET(thebits : TBits_1); inline;
  54093. begin
  54094. if thebits = 0 then
  54095. pTDefRegMap(@Self)^.clr := $00000004
  54096. else
  54097. pTDefRegMap(@Self)^.&set := $00000004;
  54098. end;
  54099. function TDMAC3_DCH3CON.getCHEDET : TBits_1; inline;
  54100. begin
  54101. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54102. end;
  54103. procedure TDMAC3_DCH3CON.setCHAEN; inline;
  54104. begin
  54105. pTDefRegMap(@Self)^.&set := $00000010;
  54106. end;
  54107. procedure TDMAC3_DCH3CON.clearCHAEN; inline;
  54108. begin
  54109. pTDefRegMap(@Self)^.clr := $00000010;
  54110. end;
  54111. procedure TDMAC3_DCH3CON.setCHAEN(thebits : TBits_1); inline;
  54112. begin
  54113. if thebits = 0 then
  54114. pTDefRegMap(@Self)^.clr := $00000010
  54115. else
  54116. pTDefRegMap(@Self)^.&set := $00000010;
  54117. end;
  54118. function TDMAC3_DCH3CON.getCHAEN : TBits_1; inline;
  54119. begin
  54120. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54121. end;
  54122. procedure TDMAC3_DCH3CON.setCHCHN; inline;
  54123. begin
  54124. pTDefRegMap(@Self)^.&set := $00000020;
  54125. end;
  54126. procedure TDMAC3_DCH3CON.clearCHCHN; inline;
  54127. begin
  54128. pTDefRegMap(@Self)^.clr := $00000020;
  54129. end;
  54130. procedure TDMAC3_DCH3CON.setCHCHN(thebits : TBits_1); inline;
  54131. begin
  54132. if thebits = 0 then
  54133. pTDefRegMap(@Self)^.clr := $00000020
  54134. else
  54135. pTDefRegMap(@Self)^.&set := $00000020;
  54136. end;
  54137. function TDMAC3_DCH3CON.getCHCHN : TBits_1; inline;
  54138. begin
  54139. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54140. end;
  54141. procedure TDMAC3_DCH3CON.setCHAED; inline;
  54142. begin
  54143. pTDefRegMap(@Self)^.&set := $00000040;
  54144. end;
  54145. procedure TDMAC3_DCH3CON.clearCHAED; inline;
  54146. begin
  54147. pTDefRegMap(@Self)^.clr := $00000040;
  54148. end;
  54149. procedure TDMAC3_DCH3CON.setCHAED(thebits : TBits_1); inline;
  54150. begin
  54151. if thebits = 0 then
  54152. pTDefRegMap(@Self)^.clr := $00000040
  54153. else
  54154. pTDefRegMap(@Self)^.&set := $00000040;
  54155. end;
  54156. function TDMAC3_DCH3CON.getCHAED : TBits_1; inline;
  54157. begin
  54158. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54159. end;
  54160. procedure TDMAC3_DCH3CON.setCHEN; inline;
  54161. begin
  54162. pTDefRegMap(@Self)^.&set := $00000080;
  54163. end;
  54164. procedure TDMAC3_DCH3CON.clearCHEN; inline;
  54165. begin
  54166. pTDefRegMap(@Self)^.clr := $00000080;
  54167. end;
  54168. procedure TDMAC3_DCH3CON.setCHEN(thebits : TBits_1); inline;
  54169. begin
  54170. if thebits = 0 then
  54171. pTDefRegMap(@Self)^.clr := $00000080
  54172. else
  54173. pTDefRegMap(@Self)^.&set := $00000080;
  54174. end;
  54175. function TDMAC3_DCH3CON.getCHEN : TBits_1; inline;
  54176. begin
  54177. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54178. end;
  54179. procedure TDMAC3_DCH3CON.setCHCHNS; inline;
  54180. begin
  54181. pTDefRegMap(@Self)^.&set := $00000100;
  54182. end;
  54183. procedure TDMAC3_DCH3CON.clearCHCHNS; inline;
  54184. begin
  54185. pTDefRegMap(@Self)^.clr := $00000100;
  54186. end;
  54187. procedure TDMAC3_DCH3CON.setCHCHNS(thebits : TBits_1); inline;
  54188. begin
  54189. if thebits = 0 then
  54190. pTDefRegMap(@Self)^.clr := $00000100
  54191. else
  54192. pTDefRegMap(@Self)^.&set := $00000100;
  54193. end;
  54194. function TDMAC3_DCH3CON.getCHCHNS : TBits_1; inline;
  54195. begin
  54196. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  54197. end;
  54198. procedure TDMAC3_DCH3CON.setCHBUSY; inline;
  54199. begin
  54200. pTDefRegMap(@Self)^.&set := $00008000;
  54201. end;
  54202. procedure TDMAC3_DCH3CON.clearCHBUSY; inline;
  54203. begin
  54204. pTDefRegMap(@Self)^.clr := $00008000;
  54205. end;
  54206. procedure TDMAC3_DCH3CON.setCHBUSY(thebits : TBits_1); inline;
  54207. begin
  54208. if thebits = 0 then
  54209. pTDefRegMap(@Self)^.clr := $00008000
  54210. else
  54211. pTDefRegMap(@Self)^.&set := $00008000;
  54212. end;
  54213. function TDMAC3_DCH3CON.getCHBUSY : TBits_1; inline;
  54214. begin
  54215. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  54216. end;
  54217. procedure TDMAC3_DCH3CON.setw(thebits : TBits_32); inline;
  54218. begin
  54219. pTDefRegMap(@Self)^.val := thebits;
  54220. end;
  54221. function TDMAC3_DCH3CON.getw : TBits_32; inline;
  54222. begin
  54223. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54224. end;
  54225. procedure TDMAC3_DCH3ECON.setAIRQEN; inline;
  54226. begin
  54227. pTDefRegMap(@Self)^.&set := $00000008;
  54228. end;
  54229. procedure TDMAC3_DCH3ECON.clearAIRQEN; inline;
  54230. begin
  54231. pTDefRegMap(@Self)^.clr := $00000008;
  54232. end;
  54233. procedure TDMAC3_DCH3ECON.setAIRQEN(thebits : TBits_1); inline;
  54234. begin
  54235. if thebits = 0 then
  54236. pTDefRegMap(@Self)^.clr := $00000008
  54237. else
  54238. pTDefRegMap(@Self)^.&set := $00000008;
  54239. end;
  54240. function TDMAC3_DCH3ECON.getAIRQEN : TBits_1; inline;
  54241. begin
  54242. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54243. end;
  54244. procedure TDMAC3_DCH3ECON.setSIRQEN; inline;
  54245. begin
  54246. pTDefRegMap(@Self)^.&set := $00000010;
  54247. end;
  54248. procedure TDMAC3_DCH3ECON.clearSIRQEN; inline;
  54249. begin
  54250. pTDefRegMap(@Self)^.clr := $00000010;
  54251. end;
  54252. procedure TDMAC3_DCH3ECON.setSIRQEN(thebits : TBits_1); inline;
  54253. begin
  54254. if thebits = 0 then
  54255. pTDefRegMap(@Self)^.clr := $00000010
  54256. else
  54257. pTDefRegMap(@Self)^.&set := $00000010;
  54258. end;
  54259. function TDMAC3_DCH3ECON.getSIRQEN : TBits_1; inline;
  54260. begin
  54261. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54262. end;
  54263. procedure TDMAC3_DCH3ECON.setPATEN; inline;
  54264. begin
  54265. pTDefRegMap(@Self)^.&set := $00000020;
  54266. end;
  54267. procedure TDMAC3_DCH3ECON.clearPATEN; inline;
  54268. begin
  54269. pTDefRegMap(@Self)^.clr := $00000020;
  54270. end;
  54271. procedure TDMAC3_DCH3ECON.setPATEN(thebits : TBits_1); inline;
  54272. begin
  54273. if thebits = 0 then
  54274. pTDefRegMap(@Self)^.clr := $00000020
  54275. else
  54276. pTDefRegMap(@Self)^.&set := $00000020;
  54277. end;
  54278. function TDMAC3_DCH3ECON.getPATEN : TBits_1; inline;
  54279. begin
  54280. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54281. end;
  54282. procedure TDMAC3_DCH3ECON.setCABORT; inline;
  54283. begin
  54284. pTDefRegMap(@Self)^.&set := $00000040;
  54285. end;
  54286. procedure TDMAC3_DCH3ECON.clearCABORT; inline;
  54287. begin
  54288. pTDefRegMap(@Self)^.clr := $00000040;
  54289. end;
  54290. procedure TDMAC3_DCH3ECON.setCABORT(thebits : TBits_1); inline;
  54291. begin
  54292. if thebits = 0 then
  54293. pTDefRegMap(@Self)^.clr := $00000040
  54294. else
  54295. pTDefRegMap(@Self)^.&set := $00000040;
  54296. end;
  54297. function TDMAC3_DCH3ECON.getCABORT : TBits_1; inline;
  54298. begin
  54299. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54300. end;
  54301. procedure TDMAC3_DCH3ECON.setCFORCE; inline;
  54302. begin
  54303. pTDefRegMap(@Self)^.&set := $00000080;
  54304. end;
  54305. procedure TDMAC3_DCH3ECON.clearCFORCE; inline;
  54306. begin
  54307. pTDefRegMap(@Self)^.clr := $00000080;
  54308. end;
  54309. procedure TDMAC3_DCH3ECON.setCFORCE(thebits : TBits_1); inline;
  54310. begin
  54311. if thebits = 0 then
  54312. pTDefRegMap(@Self)^.clr := $00000080
  54313. else
  54314. pTDefRegMap(@Self)^.&set := $00000080;
  54315. end;
  54316. function TDMAC3_DCH3ECON.getCFORCE : TBits_1; inline;
  54317. begin
  54318. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54319. end;
  54320. procedure TDMAC3_DCH3ECON.setCHSIRQ(thebits : TBits_8); inline;
  54321. begin
  54322. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  54323. end;
  54324. function TDMAC3_DCH3ECON.getCHSIRQ : TBits_8; inline;
  54325. begin
  54326. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  54327. end;
  54328. procedure TDMAC3_DCH3ECON.setCHAIRQ(thebits : TBits_8); inline;
  54329. begin
  54330. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  54331. end;
  54332. function TDMAC3_DCH3ECON.getCHAIRQ : TBits_8; inline;
  54333. begin
  54334. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  54335. end;
  54336. procedure TDMAC3_DCH3ECON.setw(thebits : TBits_32); inline;
  54337. begin
  54338. pTDefRegMap(@Self)^.val := thebits;
  54339. end;
  54340. function TDMAC3_DCH3ECON.getw : TBits_32; inline;
  54341. begin
  54342. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54343. end;
  54344. procedure TDMAC3_DCH3INT.setCHERIF; inline;
  54345. begin
  54346. pTDefRegMap(@Self)^.&set := $00000001;
  54347. end;
  54348. procedure TDMAC3_DCH3INT.clearCHERIF; inline;
  54349. begin
  54350. pTDefRegMap(@Self)^.clr := $00000001;
  54351. end;
  54352. procedure TDMAC3_DCH3INT.setCHERIF(thebits : TBits_1); inline;
  54353. begin
  54354. if thebits = 0 then
  54355. pTDefRegMap(@Self)^.clr := $00000001
  54356. else
  54357. pTDefRegMap(@Self)^.&set := $00000001;
  54358. end;
  54359. function TDMAC3_DCH3INT.getCHERIF : TBits_1; inline;
  54360. begin
  54361. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54362. end;
  54363. procedure TDMAC3_DCH3INT.setCHTAIF; inline;
  54364. begin
  54365. pTDefRegMap(@Self)^.&set := $00000002;
  54366. end;
  54367. procedure TDMAC3_DCH3INT.clearCHTAIF; inline;
  54368. begin
  54369. pTDefRegMap(@Self)^.clr := $00000002;
  54370. end;
  54371. procedure TDMAC3_DCH3INT.setCHTAIF(thebits : TBits_1); inline;
  54372. begin
  54373. if thebits = 0 then
  54374. pTDefRegMap(@Self)^.clr := $00000002
  54375. else
  54376. pTDefRegMap(@Self)^.&set := $00000002;
  54377. end;
  54378. function TDMAC3_DCH3INT.getCHTAIF : TBits_1; inline;
  54379. begin
  54380. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54381. end;
  54382. procedure TDMAC3_DCH3INT.setCHCCIF; inline;
  54383. begin
  54384. pTDefRegMap(@Self)^.&set := $00000004;
  54385. end;
  54386. procedure TDMAC3_DCH3INT.clearCHCCIF; inline;
  54387. begin
  54388. pTDefRegMap(@Self)^.clr := $00000004;
  54389. end;
  54390. procedure TDMAC3_DCH3INT.setCHCCIF(thebits : TBits_1); inline;
  54391. begin
  54392. if thebits = 0 then
  54393. pTDefRegMap(@Self)^.clr := $00000004
  54394. else
  54395. pTDefRegMap(@Self)^.&set := $00000004;
  54396. end;
  54397. function TDMAC3_DCH3INT.getCHCCIF : TBits_1; inline;
  54398. begin
  54399. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54400. end;
  54401. procedure TDMAC3_DCH3INT.setCHBCIF; inline;
  54402. begin
  54403. pTDefRegMap(@Self)^.&set := $00000008;
  54404. end;
  54405. procedure TDMAC3_DCH3INT.clearCHBCIF; inline;
  54406. begin
  54407. pTDefRegMap(@Self)^.clr := $00000008;
  54408. end;
  54409. procedure TDMAC3_DCH3INT.setCHBCIF(thebits : TBits_1); inline;
  54410. begin
  54411. if thebits = 0 then
  54412. pTDefRegMap(@Self)^.clr := $00000008
  54413. else
  54414. pTDefRegMap(@Self)^.&set := $00000008;
  54415. end;
  54416. function TDMAC3_DCH3INT.getCHBCIF : TBits_1; inline;
  54417. begin
  54418. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54419. end;
  54420. procedure TDMAC3_DCH3INT.setCHDHIF; inline;
  54421. begin
  54422. pTDefRegMap(@Self)^.&set := $00000010;
  54423. end;
  54424. procedure TDMAC3_DCH3INT.clearCHDHIF; inline;
  54425. begin
  54426. pTDefRegMap(@Self)^.clr := $00000010;
  54427. end;
  54428. procedure TDMAC3_DCH3INT.setCHDHIF(thebits : TBits_1); inline;
  54429. begin
  54430. if thebits = 0 then
  54431. pTDefRegMap(@Self)^.clr := $00000010
  54432. else
  54433. pTDefRegMap(@Self)^.&set := $00000010;
  54434. end;
  54435. function TDMAC3_DCH3INT.getCHDHIF : TBits_1; inline;
  54436. begin
  54437. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54438. end;
  54439. procedure TDMAC3_DCH3INT.setCHDDIF; inline;
  54440. begin
  54441. pTDefRegMap(@Self)^.&set := $00000020;
  54442. end;
  54443. procedure TDMAC3_DCH3INT.clearCHDDIF; inline;
  54444. begin
  54445. pTDefRegMap(@Self)^.clr := $00000020;
  54446. end;
  54447. procedure TDMAC3_DCH3INT.setCHDDIF(thebits : TBits_1); inline;
  54448. begin
  54449. if thebits = 0 then
  54450. pTDefRegMap(@Self)^.clr := $00000020
  54451. else
  54452. pTDefRegMap(@Self)^.&set := $00000020;
  54453. end;
  54454. function TDMAC3_DCH3INT.getCHDDIF : TBits_1; inline;
  54455. begin
  54456. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54457. end;
  54458. procedure TDMAC3_DCH3INT.setCHSHIF; inline;
  54459. begin
  54460. pTDefRegMap(@Self)^.&set := $00000040;
  54461. end;
  54462. procedure TDMAC3_DCH3INT.clearCHSHIF; inline;
  54463. begin
  54464. pTDefRegMap(@Self)^.clr := $00000040;
  54465. end;
  54466. procedure TDMAC3_DCH3INT.setCHSHIF(thebits : TBits_1); inline;
  54467. begin
  54468. if thebits = 0 then
  54469. pTDefRegMap(@Self)^.clr := $00000040
  54470. else
  54471. pTDefRegMap(@Self)^.&set := $00000040;
  54472. end;
  54473. function TDMAC3_DCH3INT.getCHSHIF : TBits_1; inline;
  54474. begin
  54475. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54476. end;
  54477. procedure TDMAC3_DCH3INT.setCHSDIF; inline;
  54478. begin
  54479. pTDefRegMap(@Self)^.&set := $00000080;
  54480. end;
  54481. procedure TDMAC3_DCH3INT.clearCHSDIF; inline;
  54482. begin
  54483. pTDefRegMap(@Self)^.clr := $00000080;
  54484. end;
  54485. procedure TDMAC3_DCH3INT.setCHSDIF(thebits : TBits_1); inline;
  54486. begin
  54487. if thebits = 0 then
  54488. pTDefRegMap(@Self)^.clr := $00000080
  54489. else
  54490. pTDefRegMap(@Self)^.&set := $00000080;
  54491. end;
  54492. function TDMAC3_DCH3INT.getCHSDIF : TBits_1; inline;
  54493. begin
  54494. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54495. end;
  54496. procedure TDMAC3_DCH3INT.setCHERIE; inline;
  54497. begin
  54498. pTDefRegMap(@Self)^.&set := $00010000;
  54499. end;
  54500. procedure TDMAC3_DCH3INT.clearCHERIE; inline;
  54501. begin
  54502. pTDefRegMap(@Self)^.clr := $00010000;
  54503. end;
  54504. procedure TDMAC3_DCH3INT.setCHERIE(thebits : TBits_1); inline;
  54505. begin
  54506. if thebits = 0 then
  54507. pTDefRegMap(@Self)^.clr := $00010000
  54508. else
  54509. pTDefRegMap(@Self)^.&set := $00010000;
  54510. end;
  54511. function TDMAC3_DCH3INT.getCHERIE : TBits_1; inline;
  54512. begin
  54513. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  54514. end;
  54515. procedure TDMAC3_DCH3INT.setCHTAIE; inline;
  54516. begin
  54517. pTDefRegMap(@Self)^.&set := $00020000;
  54518. end;
  54519. procedure TDMAC3_DCH3INT.clearCHTAIE; inline;
  54520. begin
  54521. pTDefRegMap(@Self)^.clr := $00020000;
  54522. end;
  54523. procedure TDMAC3_DCH3INT.setCHTAIE(thebits : TBits_1); inline;
  54524. begin
  54525. if thebits = 0 then
  54526. pTDefRegMap(@Self)^.clr := $00020000
  54527. else
  54528. pTDefRegMap(@Self)^.&set := $00020000;
  54529. end;
  54530. function TDMAC3_DCH3INT.getCHTAIE : TBits_1; inline;
  54531. begin
  54532. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  54533. end;
  54534. procedure TDMAC3_DCH3INT.setCHCCIE; inline;
  54535. begin
  54536. pTDefRegMap(@Self)^.&set := $00040000;
  54537. end;
  54538. procedure TDMAC3_DCH3INT.clearCHCCIE; inline;
  54539. begin
  54540. pTDefRegMap(@Self)^.clr := $00040000;
  54541. end;
  54542. procedure TDMAC3_DCH3INT.setCHCCIE(thebits : TBits_1); inline;
  54543. begin
  54544. if thebits = 0 then
  54545. pTDefRegMap(@Self)^.clr := $00040000
  54546. else
  54547. pTDefRegMap(@Self)^.&set := $00040000;
  54548. end;
  54549. function TDMAC3_DCH3INT.getCHCCIE : TBits_1; inline;
  54550. begin
  54551. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  54552. end;
  54553. procedure TDMAC3_DCH3INT.setCHBCIE; inline;
  54554. begin
  54555. pTDefRegMap(@Self)^.&set := $00080000;
  54556. end;
  54557. procedure TDMAC3_DCH3INT.clearCHBCIE; inline;
  54558. begin
  54559. pTDefRegMap(@Self)^.clr := $00080000;
  54560. end;
  54561. procedure TDMAC3_DCH3INT.setCHBCIE(thebits : TBits_1); inline;
  54562. begin
  54563. if thebits = 0 then
  54564. pTDefRegMap(@Self)^.clr := $00080000
  54565. else
  54566. pTDefRegMap(@Self)^.&set := $00080000;
  54567. end;
  54568. function TDMAC3_DCH3INT.getCHBCIE : TBits_1; inline;
  54569. begin
  54570. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  54571. end;
  54572. procedure TDMAC3_DCH3INT.setCHDHIE; inline;
  54573. begin
  54574. pTDefRegMap(@Self)^.&set := $00100000;
  54575. end;
  54576. procedure TDMAC3_DCH3INT.clearCHDHIE; inline;
  54577. begin
  54578. pTDefRegMap(@Self)^.clr := $00100000;
  54579. end;
  54580. procedure TDMAC3_DCH3INT.setCHDHIE(thebits : TBits_1); inline;
  54581. begin
  54582. if thebits = 0 then
  54583. pTDefRegMap(@Self)^.clr := $00100000
  54584. else
  54585. pTDefRegMap(@Self)^.&set := $00100000;
  54586. end;
  54587. function TDMAC3_DCH3INT.getCHDHIE : TBits_1; inline;
  54588. begin
  54589. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  54590. end;
  54591. procedure TDMAC3_DCH3INT.setCHDDIE; inline;
  54592. begin
  54593. pTDefRegMap(@Self)^.&set := $00200000;
  54594. end;
  54595. procedure TDMAC3_DCH3INT.clearCHDDIE; inline;
  54596. begin
  54597. pTDefRegMap(@Self)^.clr := $00200000;
  54598. end;
  54599. procedure TDMAC3_DCH3INT.setCHDDIE(thebits : TBits_1); inline;
  54600. begin
  54601. if thebits = 0 then
  54602. pTDefRegMap(@Self)^.clr := $00200000
  54603. else
  54604. pTDefRegMap(@Self)^.&set := $00200000;
  54605. end;
  54606. function TDMAC3_DCH3INT.getCHDDIE : TBits_1; inline;
  54607. begin
  54608. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  54609. end;
  54610. procedure TDMAC3_DCH3INT.setCHSHIE; inline;
  54611. begin
  54612. pTDefRegMap(@Self)^.&set := $00400000;
  54613. end;
  54614. procedure TDMAC3_DCH3INT.clearCHSHIE; inline;
  54615. begin
  54616. pTDefRegMap(@Self)^.clr := $00400000;
  54617. end;
  54618. procedure TDMAC3_DCH3INT.setCHSHIE(thebits : TBits_1); inline;
  54619. begin
  54620. if thebits = 0 then
  54621. pTDefRegMap(@Self)^.clr := $00400000
  54622. else
  54623. pTDefRegMap(@Self)^.&set := $00400000;
  54624. end;
  54625. function TDMAC3_DCH3INT.getCHSHIE : TBits_1; inline;
  54626. begin
  54627. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  54628. end;
  54629. procedure TDMAC3_DCH3INT.setCHSDIE; inline;
  54630. begin
  54631. pTDefRegMap(@Self)^.&set := $00800000;
  54632. end;
  54633. procedure TDMAC3_DCH3INT.clearCHSDIE; inline;
  54634. begin
  54635. pTDefRegMap(@Self)^.clr := $00800000;
  54636. end;
  54637. procedure TDMAC3_DCH3INT.setCHSDIE(thebits : TBits_1); inline;
  54638. begin
  54639. if thebits = 0 then
  54640. pTDefRegMap(@Self)^.clr := $00800000
  54641. else
  54642. pTDefRegMap(@Self)^.&set := $00800000;
  54643. end;
  54644. function TDMAC3_DCH3INT.getCHSDIE : TBits_1; inline;
  54645. begin
  54646. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  54647. end;
  54648. procedure TDMAC3_DCH3INT.setw(thebits : TBits_32); inline;
  54649. begin
  54650. pTDefRegMap(@Self)^.val := thebits;
  54651. end;
  54652. function TDMAC3_DCH3INT.getw : TBits_32; inline;
  54653. begin
  54654. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54655. end;
  54656. procedure TDMAC4_DCH4CON.setCHPRI(thebits : TBits_2); inline;
  54657. begin
  54658. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  54659. end;
  54660. function TDMAC4_DCH4CON.getCHPRI : TBits_2; inline;
  54661. begin
  54662. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  54663. end;
  54664. procedure TDMAC4_DCH4CON.setCHEDET; inline;
  54665. begin
  54666. pTDefRegMap(@Self)^.&set := $00000004;
  54667. end;
  54668. procedure TDMAC4_DCH4CON.clearCHEDET; inline;
  54669. begin
  54670. pTDefRegMap(@Self)^.clr := $00000004;
  54671. end;
  54672. procedure TDMAC4_DCH4CON.setCHEDET(thebits : TBits_1); inline;
  54673. begin
  54674. if thebits = 0 then
  54675. pTDefRegMap(@Self)^.clr := $00000004
  54676. else
  54677. pTDefRegMap(@Self)^.&set := $00000004;
  54678. end;
  54679. function TDMAC4_DCH4CON.getCHEDET : TBits_1; inline;
  54680. begin
  54681. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54682. end;
  54683. procedure TDMAC4_DCH4CON.setCHAEN; inline;
  54684. begin
  54685. pTDefRegMap(@Self)^.&set := $00000010;
  54686. end;
  54687. procedure TDMAC4_DCH4CON.clearCHAEN; inline;
  54688. begin
  54689. pTDefRegMap(@Self)^.clr := $00000010;
  54690. end;
  54691. procedure TDMAC4_DCH4CON.setCHAEN(thebits : TBits_1); inline;
  54692. begin
  54693. if thebits = 0 then
  54694. pTDefRegMap(@Self)^.clr := $00000010
  54695. else
  54696. pTDefRegMap(@Self)^.&set := $00000010;
  54697. end;
  54698. function TDMAC4_DCH4CON.getCHAEN : TBits_1; inline;
  54699. begin
  54700. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54701. end;
  54702. procedure TDMAC4_DCH4CON.setCHCHN; inline;
  54703. begin
  54704. pTDefRegMap(@Self)^.&set := $00000020;
  54705. end;
  54706. procedure TDMAC4_DCH4CON.clearCHCHN; inline;
  54707. begin
  54708. pTDefRegMap(@Self)^.clr := $00000020;
  54709. end;
  54710. procedure TDMAC4_DCH4CON.setCHCHN(thebits : TBits_1); inline;
  54711. begin
  54712. if thebits = 0 then
  54713. pTDefRegMap(@Self)^.clr := $00000020
  54714. else
  54715. pTDefRegMap(@Self)^.&set := $00000020;
  54716. end;
  54717. function TDMAC4_DCH4CON.getCHCHN : TBits_1; inline;
  54718. begin
  54719. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54720. end;
  54721. procedure TDMAC4_DCH4CON.setCHAED; inline;
  54722. begin
  54723. pTDefRegMap(@Self)^.&set := $00000040;
  54724. end;
  54725. procedure TDMAC4_DCH4CON.clearCHAED; inline;
  54726. begin
  54727. pTDefRegMap(@Self)^.clr := $00000040;
  54728. end;
  54729. procedure TDMAC4_DCH4CON.setCHAED(thebits : TBits_1); inline;
  54730. begin
  54731. if thebits = 0 then
  54732. pTDefRegMap(@Self)^.clr := $00000040
  54733. else
  54734. pTDefRegMap(@Self)^.&set := $00000040;
  54735. end;
  54736. function TDMAC4_DCH4CON.getCHAED : TBits_1; inline;
  54737. begin
  54738. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54739. end;
  54740. procedure TDMAC4_DCH4CON.setCHEN; inline;
  54741. begin
  54742. pTDefRegMap(@Self)^.&set := $00000080;
  54743. end;
  54744. procedure TDMAC4_DCH4CON.clearCHEN; inline;
  54745. begin
  54746. pTDefRegMap(@Self)^.clr := $00000080;
  54747. end;
  54748. procedure TDMAC4_DCH4CON.setCHEN(thebits : TBits_1); inline;
  54749. begin
  54750. if thebits = 0 then
  54751. pTDefRegMap(@Self)^.clr := $00000080
  54752. else
  54753. pTDefRegMap(@Self)^.&set := $00000080;
  54754. end;
  54755. function TDMAC4_DCH4CON.getCHEN : TBits_1; inline;
  54756. begin
  54757. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54758. end;
  54759. procedure TDMAC4_DCH4CON.setCHCHNS; inline;
  54760. begin
  54761. pTDefRegMap(@Self)^.&set := $00000100;
  54762. end;
  54763. procedure TDMAC4_DCH4CON.clearCHCHNS; inline;
  54764. begin
  54765. pTDefRegMap(@Self)^.clr := $00000100;
  54766. end;
  54767. procedure TDMAC4_DCH4CON.setCHCHNS(thebits : TBits_1); inline;
  54768. begin
  54769. if thebits = 0 then
  54770. pTDefRegMap(@Self)^.clr := $00000100
  54771. else
  54772. pTDefRegMap(@Self)^.&set := $00000100;
  54773. end;
  54774. function TDMAC4_DCH4CON.getCHCHNS : TBits_1; inline;
  54775. begin
  54776. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  54777. end;
  54778. procedure TDMAC4_DCH4CON.setCHBUSY; inline;
  54779. begin
  54780. pTDefRegMap(@Self)^.&set := $00008000;
  54781. end;
  54782. procedure TDMAC4_DCH4CON.clearCHBUSY; inline;
  54783. begin
  54784. pTDefRegMap(@Self)^.clr := $00008000;
  54785. end;
  54786. procedure TDMAC4_DCH4CON.setCHBUSY(thebits : TBits_1); inline;
  54787. begin
  54788. if thebits = 0 then
  54789. pTDefRegMap(@Self)^.clr := $00008000
  54790. else
  54791. pTDefRegMap(@Self)^.&set := $00008000;
  54792. end;
  54793. function TDMAC4_DCH4CON.getCHBUSY : TBits_1; inline;
  54794. begin
  54795. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  54796. end;
  54797. procedure TDMAC4_DCH4CON.setw(thebits : TBits_32); inline;
  54798. begin
  54799. pTDefRegMap(@Self)^.val := thebits;
  54800. end;
  54801. function TDMAC4_DCH4CON.getw : TBits_32; inline;
  54802. begin
  54803. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54804. end;
  54805. procedure TDMAC4_DCH4ECON.setAIRQEN; inline;
  54806. begin
  54807. pTDefRegMap(@Self)^.&set := $00000008;
  54808. end;
  54809. procedure TDMAC4_DCH4ECON.clearAIRQEN; inline;
  54810. begin
  54811. pTDefRegMap(@Self)^.clr := $00000008;
  54812. end;
  54813. procedure TDMAC4_DCH4ECON.setAIRQEN(thebits : TBits_1); inline;
  54814. begin
  54815. if thebits = 0 then
  54816. pTDefRegMap(@Self)^.clr := $00000008
  54817. else
  54818. pTDefRegMap(@Self)^.&set := $00000008;
  54819. end;
  54820. function TDMAC4_DCH4ECON.getAIRQEN : TBits_1; inline;
  54821. begin
  54822. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54823. end;
  54824. procedure TDMAC4_DCH4ECON.setSIRQEN; inline;
  54825. begin
  54826. pTDefRegMap(@Self)^.&set := $00000010;
  54827. end;
  54828. procedure TDMAC4_DCH4ECON.clearSIRQEN; inline;
  54829. begin
  54830. pTDefRegMap(@Self)^.clr := $00000010;
  54831. end;
  54832. procedure TDMAC4_DCH4ECON.setSIRQEN(thebits : TBits_1); inline;
  54833. begin
  54834. if thebits = 0 then
  54835. pTDefRegMap(@Self)^.clr := $00000010
  54836. else
  54837. pTDefRegMap(@Self)^.&set := $00000010;
  54838. end;
  54839. function TDMAC4_DCH4ECON.getSIRQEN : TBits_1; inline;
  54840. begin
  54841. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54842. end;
  54843. procedure TDMAC4_DCH4ECON.setPATEN; inline;
  54844. begin
  54845. pTDefRegMap(@Self)^.&set := $00000020;
  54846. end;
  54847. procedure TDMAC4_DCH4ECON.clearPATEN; inline;
  54848. begin
  54849. pTDefRegMap(@Self)^.clr := $00000020;
  54850. end;
  54851. procedure TDMAC4_DCH4ECON.setPATEN(thebits : TBits_1); inline;
  54852. begin
  54853. if thebits = 0 then
  54854. pTDefRegMap(@Self)^.clr := $00000020
  54855. else
  54856. pTDefRegMap(@Self)^.&set := $00000020;
  54857. end;
  54858. function TDMAC4_DCH4ECON.getPATEN : TBits_1; inline;
  54859. begin
  54860. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54861. end;
  54862. procedure TDMAC4_DCH4ECON.setCABORT; inline;
  54863. begin
  54864. pTDefRegMap(@Self)^.&set := $00000040;
  54865. end;
  54866. procedure TDMAC4_DCH4ECON.clearCABORT; inline;
  54867. begin
  54868. pTDefRegMap(@Self)^.clr := $00000040;
  54869. end;
  54870. procedure TDMAC4_DCH4ECON.setCABORT(thebits : TBits_1); inline;
  54871. begin
  54872. if thebits = 0 then
  54873. pTDefRegMap(@Self)^.clr := $00000040
  54874. else
  54875. pTDefRegMap(@Self)^.&set := $00000040;
  54876. end;
  54877. function TDMAC4_DCH4ECON.getCABORT : TBits_1; inline;
  54878. begin
  54879. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54880. end;
  54881. procedure TDMAC4_DCH4ECON.setCFORCE; inline;
  54882. begin
  54883. pTDefRegMap(@Self)^.&set := $00000080;
  54884. end;
  54885. procedure TDMAC4_DCH4ECON.clearCFORCE; inline;
  54886. begin
  54887. pTDefRegMap(@Self)^.clr := $00000080;
  54888. end;
  54889. procedure TDMAC4_DCH4ECON.setCFORCE(thebits : TBits_1); inline;
  54890. begin
  54891. if thebits = 0 then
  54892. pTDefRegMap(@Self)^.clr := $00000080
  54893. else
  54894. pTDefRegMap(@Self)^.&set := $00000080;
  54895. end;
  54896. function TDMAC4_DCH4ECON.getCFORCE : TBits_1; inline;
  54897. begin
  54898. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54899. end;
  54900. procedure TDMAC4_DCH4ECON.setCHSIRQ(thebits : TBits_8); inline;
  54901. begin
  54902. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  54903. end;
  54904. function TDMAC4_DCH4ECON.getCHSIRQ : TBits_8; inline;
  54905. begin
  54906. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  54907. end;
  54908. procedure TDMAC4_DCH4ECON.setCHAIRQ(thebits : TBits_8); inline;
  54909. begin
  54910. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  54911. end;
  54912. function TDMAC4_DCH4ECON.getCHAIRQ : TBits_8; inline;
  54913. begin
  54914. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  54915. end;
  54916. procedure TDMAC4_DCH4ECON.setw(thebits : TBits_32); inline;
  54917. begin
  54918. pTDefRegMap(@Self)^.val := thebits;
  54919. end;
  54920. function TDMAC4_DCH4ECON.getw : TBits_32; inline;
  54921. begin
  54922. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54923. end;
  54924. procedure TDMAC4_DCH4INT.setCHERIF; inline;
  54925. begin
  54926. pTDefRegMap(@Self)^.&set := $00000001;
  54927. end;
  54928. procedure TDMAC4_DCH4INT.clearCHERIF; inline;
  54929. begin
  54930. pTDefRegMap(@Self)^.clr := $00000001;
  54931. end;
  54932. procedure TDMAC4_DCH4INT.setCHERIF(thebits : TBits_1); inline;
  54933. begin
  54934. if thebits = 0 then
  54935. pTDefRegMap(@Self)^.clr := $00000001
  54936. else
  54937. pTDefRegMap(@Self)^.&set := $00000001;
  54938. end;
  54939. function TDMAC4_DCH4INT.getCHERIF : TBits_1; inline;
  54940. begin
  54941. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54942. end;
  54943. procedure TDMAC4_DCH4INT.setCHTAIF; inline;
  54944. begin
  54945. pTDefRegMap(@Self)^.&set := $00000002;
  54946. end;
  54947. procedure TDMAC4_DCH4INT.clearCHTAIF; inline;
  54948. begin
  54949. pTDefRegMap(@Self)^.clr := $00000002;
  54950. end;
  54951. procedure TDMAC4_DCH4INT.setCHTAIF(thebits : TBits_1); inline;
  54952. begin
  54953. if thebits = 0 then
  54954. pTDefRegMap(@Self)^.clr := $00000002
  54955. else
  54956. pTDefRegMap(@Self)^.&set := $00000002;
  54957. end;
  54958. function TDMAC4_DCH4INT.getCHTAIF : TBits_1; inline;
  54959. begin
  54960. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54961. end;
  54962. procedure TDMAC4_DCH4INT.setCHCCIF; inline;
  54963. begin
  54964. pTDefRegMap(@Self)^.&set := $00000004;
  54965. end;
  54966. procedure TDMAC4_DCH4INT.clearCHCCIF; inline;
  54967. begin
  54968. pTDefRegMap(@Self)^.clr := $00000004;
  54969. end;
  54970. procedure TDMAC4_DCH4INT.setCHCCIF(thebits : TBits_1); inline;
  54971. begin
  54972. if thebits = 0 then
  54973. pTDefRegMap(@Self)^.clr := $00000004
  54974. else
  54975. pTDefRegMap(@Self)^.&set := $00000004;
  54976. end;
  54977. function TDMAC4_DCH4INT.getCHCCIF : TBits_1; inline;
  54978. begin
  54979. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54980. end;
  54981. procedure TDMAC4_DCH4INT.setCHBCIF; inline;
  54982. begin
  54983. pTDefRegMap(@Self)^.&set := $00000008;
  54984. end;
  54985. procedure TDMAC4_DCH4INT.clearCHBCIF; inline;
  54986. begin
  54987. pTDefRegMap(@Self)^.clr := $00000008;
  54988. end;
  54989. procedure TDMAC4_DCH4INT.setCHBCIF(thebits : TBits_1); inline;
  54990. begin
  54991. if thebits = 0 then
  54992. pTDefRegMap(@Self)^.clr := $00000008
  54993. else
  54994. pTDefRegMap(@Self)^.&set := $00000008;
  54995. end;
  54996. function TDMAC4_DCH4INT.getCHBCIF : TBits_1; inline;
  54997. begin
  54998. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54999. end;
  55000. procedure TDMAC4_DCH4INT.setCHDHIF; inline;
  55001. begin
  55002. pTDefRegMap(@Self)^.&set := $00000010;
  55003. end;
  55004. procedure TDMAC4_DCH4INT.clearCHDHIF; inline;
  55005. begin
  55006. pTDefRegMap(@Self)^.clr := $00000010;
  55007. end;
  55008. procedure TDMAC4_DCH4INT.setCHDHIF(thebits : TBits_1); inline;
  55009. begin
  55010. if thebits = 0 then
  55011. pTDefRegMap(@Self)^.clr := $00000010
  55012. else
  55013. pTDefRegMap(@Self)^.&set := $00000010;
  55014. end;
  55015. function TDMAC4_DCH4INT.getCHDHIF : TBits_1; inline;
  55016. begin
  55017. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55018. end;
  55019. procedure TDMAC4_DCH4INT.setCHDDIF; inline;
  55020. begin
  55021. pTDefRegMap(@Self)^.&set := $00000020;
  55022. end;
  55023. procedure TDMAC4_DCH4INT.clearCHDDIF; inline;
  55024. begin
  55025. pTDefRegMap(@Self)^.clr := $00000020;
  55026. end;
  55027. procedure TDMAC4_DCH4INT.setCHDDIF(thebits : TBits_1); inline;
  55028. begin
  55029. if thebits = 0 then
  55030. pTDefRegMap(@Self)^.clr := $00000020
  55031. else
  55032. pTDefRegMap(@Self)^.&set := $00000020;
  55033. end;
  55034. function TDMAC4_DCH4INT.getCHDDIF : TBits_1; inline;
  55035. begin
  55036. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55037. end;
  55038. procedure TDMAC4_DCH4INT.setCHSHIF; inline;
  55039. begin
  55040. pTDefRegMap(@Self)^.&set := $00000040;
  55041. end;
  55042. procedure TDMAC4_DCH4INT.clearCHSHIF; inline;
  55043. begin
  55044. pTDefRegMap(@Self)^.clr := $00000040;
  55045. end;
  55046. procedure TDMAC4_DCH4INT.setCHSHIF(thebits : TBits_1); inline;
  55047. begin
  55048. if thebits = 0 then
  55049. pTDefRegMap(@Self)^.clr := $00000040
  55050. else
  55051. pTDefRegMap(@Self)^.&set := $00000040;
  55052. end;
  55053. function TDMAC4_DCH4INT.getCHSHIF : TBits_1; inline;
  55054. begin
  55055. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55056. end;
  55057. procedure TDMAC4_DCH4INT.setCHSDIF; inline;
  55058. begin
  55059. pTDefRegMap(@Self)^.&set := $00000080;
  55060. end;
  55061. procedure TDMAC4_DCH4INT.clearCHSDIF; inline;
  55062. begin
  55063. pTDefRegMap(@Self)^.clr := $00000080;
  55064. end;
  55065. procedure TDMAC4_DCH4INT.setCHSDIF(thebits : TBits_1); inline;
  55066. begin
  55067. if thebits = 0 then
  55068. pTDefRegMap(@Self)^.clr := $00000080
  55069. else
  55070. pTDefRegMap(@Self)^.&set := $00000080;
  55071. end;
  55072. function TDMAC4_DCH4INT.getCHSDIF : TBits_1; inline;
  55073. begin
  55074. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55075. end;
  55076. procedure TDMAC4_DCH4INT.setCHERIE; inline;
  55077. begin
  55078. pTDefRegMap(@Self)^.&set := $00010000;
  55079. end;
  55080. procedure TDMAC4_DCH4INT.clearCHERIE; inline;
  55081. begin
  55082. pTDefRegMap(@Self)^.clr := $00010000;
  55083. end;
  55084. procedure TDMAC4_DCH4INT.setCHERIE(thebits : TBits_1); inline;
  55085. begin
  55086. if thebits = 0 then
  55087. pTDefRegMap(@Self)^.clr := $00010000
  55088. else
  55089. pTDefRegMap(@Self)^.&set := $00010000;
  55090. end;
  55091. function TDMAC4_DCH4INT.getCHERIE : TBits_1; inline;
  55092. begin
  55093. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  55094. end;
  55095. procedure TDMAC4_DCH4INT.setCHTAIE; inline;
  55096. begin
  55097. pTDefRegMap(@Self)^.&set := $00020000;
  55098. end;
  55099. procedure TDMAC4_DCH4INT.clearCHTAIE; inline;
  55100. begin
  55101. pTDefRegMap(@Self)^.clr := $00020000;
  55102. end;
  55103. procedure TDMAC4_DCH4INT.setCHTAIE(thebits : TBits_1); inline;
  55104. begin
  55105. if thebits = 0 then
  55106. pTDefRegMap(@Self)^.clr := $00020000
  55107. else
  55108. pTDefRegMap(@Self)^.&set := $00020000;
  55109. end;
  55110. function TDMAC4_DCH4INT.getCHTAIE : TBits_1; inline;
  55111. begin
  55112. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  55113. end;
  55114. procedure TDMAC4_DCH4INT.setCHCCIE; inline;
  55115. begin
  55116. pTDefRegMap(@Self)^.&set := $00040000;
  55117. end;
  55118. procedure TDMAC4_DCH4INT.clearCHCCIE; inline;
  55119. begin
  55120. pTDefRegMap(@Self)^.clr := $00040000;
  55121. end;
  55122. procedure TDMAC4_DCH4INT.setCHCCIE(thebits : TBits_1); inline;
  55123. begin
  55124. if thebits = 0 then
  55125. pTDefRegMap(@Self)^.clr := $00040000
  55126. else
  55127. pTDefRegMap(@Self)^.&set := $00040000;
  55128. end;
  55129. function TDMAC4_DCH4INT.getCHCCIE : TBits_1; inline;
  55130. begin
  55131. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  55132. end;
  55133. procedure TDMAC4_DCH4INT.setCHBCIE; inline;
  55134. begin
  55135. pTDefRegMap(@Self)^.&set := $00080000;
  55136. end;
  55137. procedure TDMAC4_DCH4INT.clearCHBCIE; inline;
  55138. begin
  55139. pTDefRegMap(@Self)^.clr := $00080000;
  55140. end;
  55141. procedure TDMAC4_DCH4INT.setCHBCIE(thebits : TBits_1); inline;
  55142. begin
  55143. if thebits = 0 then
  55144. pTDefRegMap(@Self)^.clr := $00080000
  55145. else
  55146. pTDefRegMap(@Self)^.&set := $00080000;
  55147. end;
  55148. function TDMAC4_DCH4INT.getCHBCIE : TBits_1; inline;
  55149. begin
  55150. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  55151. end;
  55152. procedure TDMAC4_DCH4INT.setCHDHIE; inline;
  55153. begin
  55154. pTDefRegMap(@Self)^.&set := $00100000;
  55155. end;
  55156. procedure TDMAC4_DCH4INT.clearCHDHIE; inline;
  55157. begin
  55158. pTDefRegMap(@Self)^.clr := $00100000;
  55159. end;
  55160. procedure TDMAC4_DCH4INT.setCHDHIE(thebits : TBits_1); inline;
  55161. begin
  55162. if thebits = 0 then
  55163. pTDefRegMap(@Self)^.clr := $00100000
  55164. else
  55165. pTDefRegMap(@Self)^.&set := $00100000;
  55166. end;
  55167. function TDMAC4_DCH4INT.getCHDHIE : TBits_1; inline;
  55168. begin
  55169. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  55170. end;
  55171. procedure TDMAC4_DCH4INT.setCHDDIE; inline;
  55172. begin
  55173. pTDefRegMap(@Self)^.&set := $00200000;
  55174. end;
  55175. procedure TDMAC4_DCH4INT.clearCHDDIE; inline;
  55176. begin
  55177. pTDefRegMap(@Self)^.clr := $00200000;
  55178. end;
  55179. procedure TDMAC4_DCH4INT.setCHDDIE(thebits : TBits_1); inline;
  55180. begin
  55181. if thebits = 0 then
  55182. pTDefRegMap(@Self)^.clr := $00200000
  55183. else
  55184. pTDefRegMap(@Self)^.&set := $00200000;
  55185. end;
  55186. function TDMAC4_DCH4INT.getCHDDIE : TBits_1; inline;
  55187. begin
  55188. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  55189. end;
  55190. procedure TDMAC4_DCH4INT.setCHSHIE; inline;
  55191. begin
  55192. pTDefRegMap(@Self)^.&set := $00400000;
  55193. end;
  55194. procedure TDMAC4_DCH4INT.clearCHSHIE; inline;
  55195. begin
  55196. pTDefRegMap(@Self)^.clr := $00400000;
  55197. end;
  55198. procedure TDMAC4_DCH4INT.setCHSHIE(thebits : TBits_1); inline;
  55199. begin
  55200. if thebits = 0 then
  55201. pTDefRegMap(@Self)^.clr := $00400000
  55202. else
  55203. pTDefRegMap(@Self)^.&set := $00400000;
  55204. end;
  55205. function TDMAC4_DCH4INT.getCHSHIE : TBits_1; inline;
  55206. begin
  55207. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  55208. end;
  55209. procedure TDMAC4_DCH4INT.setCHSDIE; inline;
  55210. begin
  55211. pTDefRegMap(@Self)^.&set := $00800000;
  55212. end;
  55213. procedure TDMAC4_DCH4INT.clearCHSDIE; inline;
  55214. begin
  55215. pTDefRegMap(@Self)^.clr := $00800000;
  55216. end;
  55217. procedure TDMAC4_DCH4INT.setCHSDIE(thebits : TBits_1); inline;
  55218. begin
  55219. if thebits = 0 then
  55220. pTDefRegMap(@Self)^.clr := $00800000
  55221. else
  55222. pTDefRegMap(@Self)^.&set := $00800000;
  55223. end;
  55224. function TDMAC4_DCH4INT.getCHSDIE : TBits_1; inline;
  55225. begin
  55226. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  55227. end;
  55228. procedure TDMAC4_DCH4INT.setw(thebits : TBits_32); inline;
  55229. begin
  55230. pTDefRegMap(@Self)^.val := thebits;
  55231. end;
  55232. function TDMAC4_DCH4INT.getw : TBits_32; inline;
  55233. begin
  55234. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55235. end;
  55236. procedure TDMAC5_DCH5CON.setCHPRI(thebits : TBits_2); inline;
  55237. begin
  55238. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  55239. end;
  55240. function TDMAC5_DCH5CON.getCHPRI : TBits_2; inline;
  55241. begin
  55242. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  55243. end;
  55244. procedure TDMAC5_DCH5CON.setCHEDET; inline;
  55245. begin
  55246. pTDefRegMap(@Self)^.&set := $00000004;
  55247. end;
  55248. procedure TDMAC5_DCH5CON.clearCHEDET; inline;
  55249. begin
  55250. pTDefRegMap(@Self)^.clr := $00000004;
  55251. end;
  55252. procedure TDMAC5_DCH5CON.setCHEDET(thebits : TBits_1); inline;
  55253. begin
  55254. if thebits = 0 then
  55255. pTDefRegMap(@Self)^.clr := $00000004
  55256. else
  55257. pTDefRegMap(@Self)^.&set := $00000004;
  55258. end;
  55259. function TDMAC5_DCH5CON.getCHEDET : TBits_1; inline;
  55260. begin
  55261. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55262. end;
  55263. procedure TDMAC5_DCH5CON.setCHAEN; inline;
  55264. begin
  55265. pTDefRegMap(@Self)^.&set := $00000010;
  55266. end;
  55267. procedure TDMAC5_DCH5CON.clearCHAEN; inline;
  55268. begin
  55269. pTDefRegMap(@Self)^.clr := $00000010;
  55270. end;
  55271. procedure TDMAC5_DCH5CON.setCHAEN(thebits : TBits_1); inline;
  55272. begin
  55273. if thebits = 0 then
  55274. pTDefRegMap(@Self)^.clr := $00000010
  55275. else
  55276. pTDefRegMap(@Self)^.&set := $00000010;
  55277. end;
  55278. function TDMAC5_DCH5CON.getCHAEN : TBits_1; inline;
  55279. begin
  55280. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55281. end;
  55282. procedure TDMAC5_DCH5CON.setCHCHN; inline;
  55283. begin
  55284. pTDefRegMap(@Self)^.&set := $00000020;
  55285. end;
  55286. procedure TDMAC5_DCH5CON.clearCHCHN; inline;
  55287. begin
  55288. pTDefRegMap(@Self)^.clr := $00000020;
  55289. end;
  55290. procedure TDMAC5_DCH5CON.setCHCHN(thebits : TBits_1); inline;
  55291. begin
  55292. if thebits = 0 then
  55293. pTDefRegMap(@Self)^.clr := $00000020
  55294. else
  55295. pTDefRegMap(@Self)^.&set := $00000020;
  55296. end;
  55297. function TDMAC5_DCH5CON.getCHCHN : TBits_1; inline;
  55298. begin
  55299. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55300. end;
  55301. procedure TDMAC5_DCH5CON.setCHAED; inline;
  55302. begin
  55303. pTDefRegMap(@Self)^.&set := $00000040;
  55304. end;
  55305. procedure TDMAC5_DCH5CON.clearCHAED; inline;
  55306. begin
  55307. pTDefRegMap(@Self)^.clr := $00000040;
  55308. end;
  55309. procedure TDMAC5_DCH5CON.setCHAED(thebits : TBits_1); inline;
  55310. begin
  55311. if thebits = 0 then
  55312. pTDefRegMap(@Self)^.clr := $00000040
  55313. else
  55314. pTDefRegMap(@Self)^.&set := $00000040;
  55315. end;
  55316. function TDMAC5_DCH5CON.getCHAED : TBits_1; inline;
  55317. begin
  55318. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55319. end;
  55320. procedure TDMAC5_DCH5CON.setCHEN; inline;
  55321. begin
  55322. pTDefRegMap(@Self)^.&set := $00000080;
  55323. end;
  55324. procedure TDMAC5_DCH5CON.clearCHEN; inline;
  55325. begin
  55326. pTDefRegMap(@Self)^.clr := $00000080;
  55327. end;
  55328. procedure TDMAC5_DCH5CON.setCHEN(thebits : TBits_1); inline;
  55329. begin
  55330. if thebits = 0 then
  55331. pTDefRegMap(@Self)^.clr := $00000080
  55332. else
  55333. pTDefRegMap(@Self)^.&set := $00000080;
  55334. end;
  55335. function TDMAC5_DCH5CON.getCHEN : TBits_1; inline;
  55336. begin
  55337. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55338. end;
  55339. procedure TDMAC5_DCH5CON.setCHCHNS; inline;
  55340. begin
  55341. pTDefRegMap(@Self)^.&set := $00000100;
  55342. end;
  55343. procedure TDMAC5_DCH5CON.clearCHCHNS; inline;
  55344. begin
  55345. pTDefRegMap(@Self)^.clr := $00000100;
  55346. end;
  55347. procedure TDMAC5_DCH5CON.setCHCHNS(thebits : TBits_1); inline;
  55348. begin
  55349. if thebits = 0 then
  55350. pTDefRegMap(@Self)^.clr := $00000100
  55351. else
  55352. pTDefRegMap(@Self)^.&set := $00000100;
  55353. end;
  55354. function TDMAC5_DCH5CON.getCHCHNS : TBits_1; inline;
  55355. begin
  55356. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  55357. end;
  55358. procedure TDMAC5_DCH5CON.setCHBUSY; inline;
  55359. begin
  55360. pTDefRegMap(@Self)^.&set := $00008000;
  55361. end;
  55362. procedure TDMAC5_DCH5CON.clearCHBUSY; inline;
  55363. begin
  55364. pTDefRegMap(@Self)^.clr := $00008000;
  55365. end;
  55366. procedure TDMAC5_DCH5CON.setCHBUSY(thebits : TBits_1); inline;
  55367. begin
  55368. if thebits = 0 then
  55369. pTDefRegMap(@Self)^.clr := $00008000
  55370. else
  55371. pTDefRegMap(@Self)^.&set := $00008000;
  55372. end;
  55373. function TDMAC5_DCH5CON.getCHBUSY : TBits_1; inline;
  55374. begin
  55375. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  55376. end;
  55377. procedure TDMAC5_DCH5CON.setw(thebits : TBits_32); inline;
  55378. begin
  55379. pTDefRegMap(@Self)^.val := thebits;
  55380. end;
  55381. function TDMAC5_DCH5CON.getw : TBits_32; inline;
  55382. begin
  55383. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55384. end;
  55385. procedure TDMAC5_DCH5ECON.setAIRQEN; inline;
  55386. begin
  55387. pTDefRegMap(@Self)^.&set := $00000008;
  55388. end;
  55389. procedure TDMAC5_DCH5ECON.clearAIRQEN; inline;
  55390. begin
  55391. pTDefRegMap(@Self)^.clr := $00000008;
  55392. end;
  55393. procedure TDMAC5_DCH5ECON.setAIRQEN(thebits : TBits_1); inline;
  55394. begin
  55395. if thebits = 0 then
  55396. pTDefRegMap(@Self)^.clr := $00000008
  55397. else
  55398. pTDefRegMap(@Self)^.&set := $00000008;
  55399. end;
  55400. function TDMAC5_DCH5ECON.getAIRQEN : TBits_1; inline;
  55401. begin
  55402. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55403. end;
  55404. procedure TDMAC5_DCH5ECON.setSIRQEN; inline;
  55405. begin
  55406. pTDefRegMap(@Self)^.&set := $00000010;
  55407. end;
  55408. procedure TDMAC5_DCH5ECON.clearSIRQEN; inline;
  55409. begin
  55410. pTDefRegMap(@Self)^.clr := $00000010;
  55411. end;
  55412. procedure TDMAC5_DCH5ECON.setSIRQEN(thebits : TBits_1); inline;
  55413. begin
  55414. if thebits = 0 then
  55415. pTDefRegMap(@Self)^.clr := $00000010
  55416. else
  55417. pTDefRegMap(@Self)^.&set := $00000010;
  55418. end;
  55419. function TDMAC5_DCH5ECON.getSIRQEN : TBits_1; inline;
  55420. begin
  55421. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55422. end;
  55423. procedure TDMAC5_DCH5ECON.setPATEN; inline;
  55424. begin
  55425. pTDefRegMap(@Self)^.&set := $00000020;
  55426. end;
  55427. procedure TDMAC5_DCH5ECON.clearPATEN; inline;
  55428. begin
  55429. pTDefRegMap(@Self)^.clr := $00000020;
  55430. end;
  55431. procedure TDMAC5_DCH5ECON.setPATEN(thebits : TBits_1); inline;
  55432. begin
  55433. if thebits = 0 then
  55434. pTDefRegMap(@Self)^.clr := $00000020
  55435. else
  55436. pTDefRegMap(@Self)^.&set := $00000020;
  55437. end;
  55438. function TDMAC5_DCH5ECON.getPATEN : TBits_1; inline;
  55439. begin
  55440. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55441. end;
  55442. procedure TDMAC5_DCH5ECON.setCABORT; inline;
  55443. begin
  55444. pTDefRegMap(@Self)^.&set := $00000040;
  55445. end;
  55446. procedure TDMAC5_DCH5ECON.clearCABORT; inline;
  55447. begin
  55448. pTDefRegMap(@Self)^.clr := $00000040;
  55449. end;
  55450. procedure TDMAC5_DCH5ECON.setCABORT(thebits : TBits_1); inline;
  55451. begin
  55452. if thebits = 0 then
  55453. pTDefRegMap(@Self)^.clr := $00000040
  55454. else
  55455. pTDefRegMap(@Self)^.&set := $00000040;
  55456. end;
  55457. function TDMAC5_DCH5ECON.getCABORT : TBits_1; inline;
  55458. begin
  55459. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55460. end;
  55461. procedure TDMAC5_DCH5ECON.setCFORCE; inline;
  55462. begin
  55463. pTDefRegMap(@Self)^.&set := $00000080;
  55464. end;
  55465. procedure TDMAC5_DCH5ECON.clearCFORCE; inline;
  55466. begin
  55467. pTDefRegMap(@Self)^.clr := $00000080;
  55468. end;
  55469. procedure TDMAC5_DCH5ECON.setCFORCE(thebits : TBits_1); inline;
  55470. begin
  55471. if thebits = 0 then
  55472. pTDefRegMap(@Self)^.clr := $00000080
  55473. else
  55474. pTDefRegMap(@Self)^.&set := $00000080;
  55475. end;
  55476. function TDMAC5_DCH5ECON.getCFORCE : TBits_1; inline;
  55477. begin
  55478. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55479. end;
  55480. procedure TDMAC5_DCH5ECON.setCHSIRQ(thebits : TBits_8); inline;
  55481. begin
  55482. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  55483. end;
  55484. function TDMAC5_DCH5ECON.getCHSIRQ : TBits_8; inline;
  55485. begin
  55486. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  55487. end;
  55488. procedure TDMAC5_DCH5ECON.setCHAIRQ(thebits : TBits_8); inline;
  55489. begin
  55490. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  55491. end;
  55492. function TDMAC5_DCH5ECON.getCHAIRQ : TBits_8; inline;
  55493. begin
  55494. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  55495. end;
  55496. procedure TDMAC5_DCH5ECON.setw(thebits : TBits_32); inline;
  55497. begin
  55498. pTDefRegMap(@Self)^.val := thebits;
  55499. end;
  55500. function TDMAC5_DCH5ECON.getw : TBits_32; inline;
  55501. begin
  55502. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55503. end;
  55504. procedure TDMAC5_DCH5INT.setCHERIF; inline;
  55505. begin
  55506. pTDefRegMap(@Self)^.&set := $00000001;
  55507. end;
  55508. procedure TDMAC5_DCH5INT.clearCHERIF; inline;
  55509. begin
  55510. pTDefRegMap(@Self)^.clr := $00000001;
  55511. end;
  55512. procedure TDMAC5_DCH5INT.setCHERIF(thebits : TBits_1); inline;
  55513. begin
  55514. if thebits = 0 then
  55515. pTDefRegMap(@Self)^.clr := $00000001
  55516. else
  55517. pTDefRegMap(@Self)^.&set := $00000001;
  55518. end;
  55519. function TDMAC5_DCH5INT.getCHERIF : TBits_1; inline;
  55520. begin
  55521. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55522. end;
  55523. procedure TDMAC5_DCH5INT.setCHTAIF; inline;
  55524. begin
  55525. pTDefRegMap(@Self)^.&set := $00000002;
  55526. end;
  55527. procedure TDMAC5_DCH5INT.clearCHTAIF; inline;
  55528. begin
  55529. pTDefRegMap(@Self)^.clr := $00000002;
  55530. end;
  55531. procedure TDMAC5_DCH5INT.setCHTAIF(thebits : TBits_1); inline;
  55532. begin
  55533. if thebits = 0 then
  55534. pTDefRegMap(@Self)^.clr := $00000002
  55535. else
  55536. pTDefRegMap(@Self)^.&set := $00000002;
  55537. end;
  55538. function TDMAC5_DCH5INT.getCHTAIF : TBits_1; inline;
  55539. begin
  55540. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55541. end;
  55542. procedure TDMAC5_DCH5INT.setCHCCIF; inline;
  55543. begin
  55544. pTDefRegMap(@Self)^.&set := $00000004;
  55545. end;
  55546. procedure TDMAC5_DCH5INT.clearCHCCIF; inline;
  55547. begin
  55548. pTDefRegMap(@Self)^.clr := $00000004;
  55549. end;
  55550. procedure TDMAC5_DCH5INT.setCHCCIF(thebits : TBits_1); inline;
  55551. begin
  55552. if thebits = 0 then
  55553. pTDefRegMap(@Self)^.clr := $00000004
  55554. else
  55555. pTDefRegMap(@Self)^.&set := $00000004;
  55556. end;
  55557. function TDMAC5_DCH5INT.getCHCCIF : TBits_1; inline;
  55558. begin
  55559. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55560. end;
  55561. procedure TDMAC5_DCH5INT.setCHBCIF; inline;
  55562. begin
  55563. pTDefRegMap(@Self)^.&set := $00000008;
  55564. end;
  55565. procedure TDMAC5_DCH5INT.clearCHBCIF; inline;
  55566. begin
  55567. pTDefRegMap(@Self)^.clr := $00000008;
  55568. end;
  55569. procedure TDMAC5_DCH5INT.setCHBCIF(thebits : TBits_1); inline;
  55570. begin
  55571. if thebits = 0 then
  55572. pTDefRegMap(@Self)^.clr := $00000008
  55573. else
  55574. pTDefRegMap(@Self)^.&set := $00000008;
  55575. end;
  55576. function TDMAC5_DCH5INT.getCHBCIF : TBits_1; inline;
  55577. begin
  55578. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55579. end;
  55580. procedure TDMAC5_DCH5INT.setCHDHIF; inline;
  55581. begin
  55582. pTDefRegMap(@Self)^.&set := $00000010;
  55583. end;
  55584. procedure TDMAC5_DCH5INT.clearCHDHIF; inline;
  55585. begin
  55586. pTDefRegMap(@Self)^.clr := $00000010;
  55587. end;
  55588. procedure TDMAC5_DCH5INT.setCHDHIF(thebits : TBits_1); inline;
  55589. begin
  55590. if thebits = 0 then
  55591. pTDefRegMap(@Self)^.clr := $00000010
  55592. else
  55593. pTDefRegMap(@Self)^.&set := $00000010;
  55594. end;
  55595. function TDMAC5_DCH5INT.getCHDHIF : TBits_1; inline;
  55596. begin
  55597. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55598. end;
  55599. procedure TDMAC5_DCH5INT.setCHDDIF; inline;
  55600. begin
  55601. pTDefRegMap(@Self)^.&set := $00000020;
  55602. end;
  55603. procedure TDMAC5_DCH5INT.clearCHDDIF; inline;
  55604. begin
  55605. pTDefRegMap(@Self)^.clr := $00000020;
  55606. end;
  55607. procedure TDMAC5_DCH5INT.setCHDDIF(thebits : TBits_1); inline;
  55608. begin
  55609. if thebits = 0 then
  55610. pTDefRegMap(@Self)^.clr := $00000020
  55611. else
  55612. pTDefRegMap(@Self)^.&set := $00000020;
  55613. end;
  55614. function TDMAC5_DCH5INT.getCHDDIF : TBits_1; inline;
  55615. begin
  55616. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55617. end;
  55618. procedure TDMAC5_DCH5INT.setCHSHIF; inline;
  55619. begin
  55620. pTDefRegMap(@Self)^.&set := $00000040;
  55621. end;
  55622. procedure TDMAC5_DCH5INT.clearCHSHIF; inline;
  55623. begin
  55624. pTDefRegMap(@Self)^.clr := $00000040;
  55625. end;
  55626. procedure TDMAC5_DCH5INT.setCHSHIF(thebits : TBits_1); inline;
  55627. begin
  55628. if thebits = 0 then
  55629. pTDefRegMap(@Self)^.clr := $00000040
  55630. else
  55631. pTDefRegMap(@Self)^.&set := $00000040;
  55632. end;
  55633. function TDMAC5_DCH5INT.getCHSHIF : TBits_1; inline;
  55634. begin
  55635. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55636. end;
  55637. procedure TDMAC5_DCH5INT.setCHSDIF; inline;
  55638. begin
  55639. pTDefRegMap(@Self)^.&set := $00000080;
  55640. end;
  55641. procedure TDMAC5_DCH5INT.clearCHSDIF; inline;
  55642. begin
  55643. pTDefRegMap(@Self)^.clr := $00000080;
  55644. end;
  55645. procedure TDMAC5_DCH5INT.setCHSDIF(thebits : TBits_1); inline;
  55646. begin
  55647. if thebits = 0 then
  55648. pTDefRegMap(@Self)^.clr := $00000080
  55649. else
  55650. pTDefRegMap(@Self)^.&set := $00000080;
  55651. end;
  55652. function TDMAC5_DCH5INT.getCHSDIF : TBits_1; inline;
  55653. begin
  55654. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55655. end;
  55656. procedure TDMAC5_DCH5INT.setCHERIE; inline;
  55657. begin
  55658. pTDefRegMap(@Self)^.&set := $00010000;
  55659. end;
  55660. procedure TDMAC5_DCH5INT.clearCHERIE; inline;
  55661. begin
  55662. pTDefRegMap(@Self)^.clr := $00010000;
  55663. end;
  55664. procedure TDMAC5_DCH5INT.setCHERIE(thebits : TBits_1); inline;
  55665. begin
  55666. if thebits = 0 then
  55667. pTDefRegMap(@Self)^.clr := $00010000
  55668. else
  55669. pTDefRegMap(@Self)^.&set := $00010000;
  55670. end;
  55671. function TDMAC5_DCH5INT.getCHERIE : TBits_1; inline;
  55672. begin
  55673. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  55674. end;
  55675. procedure TDMAC5_DCH5INT.setCHTAIE; inline;
  55676. begin
  55677. pTDefRegMap(@Self)^.&set := $00020000;
  55678. end;
  55679. procedure TDMAC5_DCH5INT.clearCHTAIE; inline;
  55680. begin
  55681. pTDefRegMap(@Self)^.clr := $00020000;
  55682. end;
  55683. procedure TDMAC5_DCH5INT.setCHTAIE(thebits : TBits_1); inline;
  55684. begin
  55685. if thebits = 0 then
  55686. pTDefRegMap(@Self)^.clr := $00020000
  55687. else
  55688. pTDefRegMap(@Self)^.&set := $00020000;
  55689. end;
  55690. function TDMAC5_DCH5INT.getCHTAIE : TBits_1; inline;
  55691. begin
  55692. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  55693. end;
  55694. procedure TDMAC5_DCH5INT.setCHCCIE; inline;
  55695. begin
  55696. pTDefRegMap(@Self)^.&set := $00040000;
  55697. end;
  55698. procedure TDMAC5_DCH5INT.clearCHCCIE; inline;
  55699. begin
  55700. pTDefRegMap(@Self)^.clr := $00040000;
  55701. end;
  55702. procedure TDMAC5_DCH5INT.setCHCCIE(thebits : TBits_1); inline;
  55703. begin
  55704. if thebits = 0 then
  55705. pTDefRegMap(@Self)^.clr := $00040000
  55706. else
  55707. pTDefRegMap(@Self)^.&set := $00040000;
  55708. end;
  55709. function TDMAC5_DCH5INT.getCHCCIE : TBits_1; inline;
  55710. begin
  55711. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  55712. end;
  55713. procedure TDMAC5_DCH5INT.setCHBCIE; inline;
  55714. begin
  55715. pTDefRegMap(@Self)^.&set := $00080000;
  55716. end;
  55717. procedure TDMAC5_DCH5INT.clearCHBCIE; inline;
  55718. begin
  55719. pTDefRegMap(@Self)^.clr := $00080000;
  55720. end;
  55721. procedure TDMAC5_DCH5INT.setCHBCIE(thebits : TBits_1); inline;
  55722. begin
  55723. if thebits = 0 then
  55724. pTDefRegMap(@Self)^.clr := $00080000
  55725. else
  55726. pTDefRegMap(@Self)^.&set := $00080000;
  55727. end;
  55728. function TDMAC5_DCH5INT.getCHBCIE : TBits_1; inline;
  55729. begin
  55730. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  55731. end;
  55732. procedure TDMAC5_DCH5INT.setCHDHIE; inline;
  55733. begin
  55734. pTDefRegMap(@Self)^.&set := $00100000;
  55735. end;
  55736. procedure TDMAC5_DCH5INT.clearCHDHIE; inline;
  55737. begin
  55738. pTDefRegMap(@Self)^.clr := $00100000;
  55739. end;
  55740. procedure TDMAC5_DCH5INT.setCHDHIE(thebits : TBits_1); inline;
  55741. begin
  55742. if thebits = 0 then
  55743. pTDefRegMap(@Self)^.clr := $00100000
  55744. else
  55745. pTDefRegMap(@Self)^.&set := $00100000;
  55746. end;
  55747. function TDMAC5_DCH5INT.getCHDHIE : TBits_1; inline;
  55748. begin
  55749. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  55750. end;
  55751. procedure TDMAC5_DCH5INT.setCHDDIE; inline;
  55752. begin
  55753. pTDefRegMap(@Self)^.&set := $00200000;
  55754. end;
  55755. procedure TDMAC5_DCH5INT.clearCHDDIE; inline;
  55756. begin
  55757. pTDefRegMap(@Self)^.clr := $00200000;
  55758. end;
  55759. procedure TDMAC5_DCH5INT.setCHDDIE(thebits : TBits_1); inline;
  55760. begin
  55761. if thebits = 0 then
  55762. pTDefRegMap(@Self)^.clr := $00200000
  55763. else
  55764. pTDefRegMap(@Self)^.&set := $00200000;
  55765. end;
  55766. function TDMAC5_DCH5INT.getCHDDIE : TBits_1; inline;
  55767. begin
  55768. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  55769. end;
  55770. procedure TDMAC5_DCH5INT.setCHSHIE; inline;
  55771. begin
  55772. pTDefRegMap(@Self)^.&set := $00400000;
  55773. end;
  55774. procedure TDMAC5_DCH5INT.clearCHSHIE; inline;
  55775. begin
  55776. pTDefRegMap(@Self)^.clr := $00400000;
  55777. end;
  55778. procedure TDMAC5_DCH5INT.setCHSHIE(thebits : TBits_1); inline;
  55779. begin
  55780. if thebits = 0 then
  55781. pTDefRegMap(@Self)^.clr := $00400000
  55782. else
  55783. pTDefRegMap(@Self)^.&set := $00400000;
  55784. end;
  55785. function TDMAC5_DCH5INT.getCHSHIE : TBits_1; inline;
  55786. begin
  55787. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  55788. end;
  55789. procedure TDMAC5_DCH5INT.setCHSDIE; inline;
  55790. begin
  55791. pTDefRegMap(@Self)^.&set := $00800000;
  55792. end;
  55793. procedure TDMAC5_DCH5INT.clearCHSDIE; inline;
  55794. begin
  55795. pTDefRegMap(@Self)^.clr := $00800000;
  55796. end;
  55797. procedure TDMAC5_DCH5INT.setCHSDIE(thebits : TBits_1); inline;
  55798. begin
  55799. if thebits = 0 then
  55800. pTDefRegMap(@Self)^.clr := $00800000
  55801. else
  55802. pTDefRegMap(@Self)^.&set := $00800000;
  55803. end;
  55804. function TDMAC5_DCH5INT.getCHSDIE : TBits_1; inline;
  55805. begin
  55806. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  55807. end;
  55808. procedure TDMAC5_DCH5INT.setw(thebits : TBits_32); inline;
  55809. begin
  55810. pTDefRegMap(@Self)^.val := thebits;
  55811. end;
  55812. function TDMAC5_DCH5INT.getw : TBits_32; inline;
  55813. begin
  55814. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55815. end;
  55816. procedure TDMAC6_DCH6CON.setCHPRI(thebits : TBits_2); inline;
  55817. begin
  55818. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  55819. end;
  55820. function TDMAC6_DCH6CON.getCHPRI : TBits_2; inline;
  55821. begin
  55822. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  55823. end;
  55824. procedure TDMAC6_DCH6CON.setCHEDET; inline;
  55825. begin
  55826. pTDefRegMap(@Self)^.&set := $00000004;
  55827. end;
  55828. procedure TDMAC6_DCH6CON.clearCHEDET; inline;
  55829. begin
  55830. pTDefRegMap(@Self)^.clr := $00000004;
  55831. end;
  55832. procedure TDMAC6_DCH6CON.setCHEDET(thebits : TBits_1); inline;
  55833. begin
  55834. if thebits = 0 then
  55835. pTDefRegMap(@Self)^.clr := $00000004
  55836. else
  55837. pTDefRegMap(@Self)^.&set := $00000004;
  55838. end;
  55839. function TDMAC6_DCH6CON.getCHEDET : TBits_1; inline;
  55840. begin
  55841. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55842. end;
  55843. procedure TDMAC6_DCH6CON.setCHAEN; inline;
  55844. begin
  55845. pTDefRegMap(@Self)^.&set := $00000010;
  55846. end;
  55847. procedure TDMAC6_DCH6CON.clearCHAEN; inline;
  55848. begin
  55849. pTDefRegMap(@Self)^.clr := $00000010;
  55850. end;
  55851. procedure TDMAC6_DCH6CON.setCHAEN(thebits : TBits_1); inline;
  55852. begin
  55853. if thebits = 0 then
  55854. pTDefRegMap(@Self)^.clr := $00000010
  55855. else
  55856. pTDefRegMap(@Self)^.&set := $00000010;
  55857. end;
  55858. function TDMAC6_DCH6CON.getCHAEN : TBits_1; inline;
  55859. begin
  55860. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55861. end;
  55862. procedure TDMAC6_DCH6CON.setCHCHN; inline;
  55863. begin
  55864. pTDefRegMap(@Self)^.&set := $00000020;
  55865. end;
  55866. procedure TDMAC6_DCH6CON.clearCHCHN; inline;
  55867. begin
  55868. pTDefRegMap(@Self)^.clr := $00000020;
  55869. end;
  55870. procedure TDMAC6_DCH6CON.setCHCHN(thebits : TBits_1); inline;
  55871. begin
  55872. if thebits = 0 then
  55873. pTDefRegMap(@Self)^.clr := $00000020
  55874. else
  55875. pTDefRegMap(@Self)^.&set := $00000020;
  55876. end;
  55877. function TDMAC6_DCH6CON.getCHCHN : TBits_1; inline;
  55878. begin
  55879. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55880. end;
  55881. procedure TDMAC6_DCH6CON.setCHAED; inline;
  55882. begin
  55883. pTDefRegMap(@Self)^.&set := $00000040;
  55884. end;
  55885. procedure TDMAC6_DCH6CON.clearCHAED; inline;
  55886. begin
  55887. pTDefRegMap(@Self)^.clr := $00000040;
  55888. end;
  55889. procedure TDMAC6_DCH6CON.setCHAED(thebits : TBits_1); inline;
  55890. begin
  55891. if thebits = 0 then
  55892. pTDefRegMap(@Self)^.clr := $00000040
  55893. else
  55894. pTDefRegMap(@Self)^.&set := $00000040;
  55895. end;
  55896. function TDMAC6_DCH6CON.getCHAED : TBits_1; inline;
  55897. begin
  55898. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55899. end;
  55900. procedure TDMAC6_DCH6CON.setCHEN; inline;
  55901. begin
  55902. pTDefRegMap(@Self)^.&set := $00000080;
  55903. end;
  55904. procedure TDMAC6_DCH6CON.clearCHEN; inline;
  55905. begin
  55906. pTDefRegMap(@Self)^.clr := $00000080;
  55907. end;
  55908. procedure TDMAC6_DCH6CON.setCHEN(thebits : TBits_1); inline;
  55909. begin
  55910. if thebits = 0 then
  55911. pTDefRegMap(@Self)^.clr := $00000080
  55912. else
  55913. pTDefRegMap(@Self)^.&set := $00000080;
  55914. end;
  55915. function TDMAC6_DCH6CON.getCHEN : TBits_1; inline;
  55916. begin
  55917. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55918. end;
  55919. procedure TDMAC6_DCH6CON.setCHCHNS; inline;
  55920. begin
  55921. pTDefRegMap(@Self)^.&set := $00000100;
  55922. end;
  55923. procedure TDMAC6_DCH6CON.clearCHCHNS; inline;
  55924. begin
  55925. pTDefRegMap(@Self)^.clr := $00000100;
  55926. end;
  55927. procedure TDMAC6_DCH6CON.setCHCHNS(thebits : TBits_1); inline;
  55928. begin
  55929. if thebits = 0 then
  55930. pTDefRegMap(@Self)^.clr := $00000100
  55931. else
  55932. pTDefRegMap(@Self)^.&set := $00000100;
  55933. end;
  55934. function TDMAC6_DCH6CON.getCHCHNS : TBits_1; inline;
  55935. begin
  55936. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  55937. end;
  55938. procedure TDMAC6_DCH6CON.setCHBUSY; inline;
  55939. begin
  55940. pTDefRegMap(@Self)^.&set := $00008000;
  55941. end;
  55942. procedure TDMAC6_DCH6CON.clearCHBUSY; inline;
  55943. begin
  55944. pTDefRegMap(@Self)^.clr := $00008000;
  55945. end;
  55946. procedure TDMAC6_DCH6CON.setCHBUSY(thebits : TBits_1); inline;
  55947. begin
  55948. if thebits = 0 then
  55949. pTDefRegMap(@Self)^.clr := $00008000
  55950. else
  55951. pTDefRegMap(@Self)^.&set := $00008000;
  55952. end;
  55953. function TDMAC6_DCH6CON.getCHBUSY : TBits_1; inline;
  55954. begin
  55955. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  55956. end;
  55957. procedure TDMAC6_DCH6CON.setw(thebits : TBits_32); inline;
  55958. begin
  55959. pTDefRegMap(@Self)^.val := thebits;
  55960. end;
  55961. function TDMAC6_DCH6CON.getw : TBits_32; inline;
  55962. begin
  55963. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55964. end;
  55965. procedure TDMAC6_DCH6ECON.setAIRQEN; inline;
  55966. begin
  55967. pTDefRegMap(@Self)^.&set := $00000008;
  55968. end;
  55969. procedure TDMAC6_DCH6ECON.clearAIRQEN; inline;
  55970. begin
  55971. pTDefRegMap(@Self)^.clr := $00000008;
  55972. end;
  55973. procedure TDMAC6_DCH6ECON.setAIRQEN(thebits : TBits_1); inline;
  55974. begin
  55975. if thebits = 0 then
  55976. pTDefRegMap(@Self)^.clr := $00000008
  55977. else
  55978. pTDefRegMap(@Self)^.&set := $00000008;
  55979. end;
  55980. function TDMAC6_DCH6ECON.getAIRQEN : TBits_1; inline;
  55981. begin
  55982. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55983. end;
  55984. procedure TDMAC6_DCH6ECON.setSIRQEN; inline;
  55985. begin
  55986. pTDefRegMap(@Self)^.&set := $00000010;
  55987. end;
  55988. procedure TDMAC6_DCH6ECON.clearSIRQEN; inline;
  55989. begin
  55990. pTDefRegMap(@Self)^.clr := $00000010;
  55991. end;
  55992. procedure TDMAC6_DCH6ECON.setSIRQEN(thebits : TBits_1); inline;
  55993. begin
  55994. if thebits = 0 then
  55995. pTDefRegMap(@Self)^.clr := $00000010
  55996. else
  55997. pTDefRegMap(@Self)^.&set := $00000010;
  55998. end;
  55999. function TDMAC6_DCH6ECON.getSIRQEN : TBits_1; inline;
  56000. begin
  56001. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56002. end;
  56003. procedure TDMAC6_DCH6ECON.setPATEN; inline;
  56004. begin
  56005. pTDefRegMap(@Self)^.&set := $00000020;
  56006. end;
  56007. procedure TDMAC6_DCH6ECON.clearPATEN; inline;
  56008. begin
  56009. pTDefRegMap(@Self)^.clr := $00000020;
  56010. end;
  56011. procedure TDMAC6_DCH6ECON.setPATEN(thebits : TBits_1); inline;
  56012. begin
  56013. if thebits = 0 then
  56014. pTDefRegMap(@Self)^.clr := $00000020
  56015. else
  56016. pTDefRegMap(@Self)^.&set := $00000020;
  56017. end;
  56018. function TDMAC6_DCH6ECON.getPATEN : TBits_1; inline;
  56019. begin
  56020. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56021. end;
  56022. procedure TDMAC6_DCH6ECON.setCABORT; inline;
  56023. begin
  56024. pTDefRegMap(@Self)^.&set := $00000040;
  56025. end;
  56026. procedure TDMAC6_DCH6ECON.clearCABORT; inline;
  56027. begin
  56028. pTDefRegMap(@Self)^.clr := $00000040;
  56029. end;
  56030. procedure TDMAC6_DCH6ECON.setCABORT(thebits : TBits_1); inline;
  56031. begin
  56032. if thebits = 0 then
  56033. pTDefRegMap(@Self)^.clr := $00000040
  56034. else
  56035. pTDefRegMap(@Self)^.&set := $00000040;
  56036. end;
  56037. function TDMAC6_DCH6ECON.getCABORT : TBits_1; inline;
  56038. begin
  56039. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56040. end;
  56041. procedure TDMAC6_DCH6ECON.setCFORCE; inline;
  56042. begin
  56043. pTDefRegMap(@Self)^.&set := $00000080;
  56044. end;
  56045. procedure TDMAC6_DCH6ECON.clearCFORCE; inline;
  56046. begin
  56047. pTDefRegMap(@Self)^.clr := $00000080;
  56048. end;
  56049. procedure TDMAC6_DCH6ECON.setCFORCE(thebits : TBits_1); inline;
  56050. begin
  56051. if thebits = 0 then
  56052. pTDefRegMap(@Self)^.clr := $00000080
  56053. else
  56054. pTDefRegMap(@Self)^.&set := $00000080;
  56055. end;
  56056. function TDMAC6_DCH6ECON.getCFORCE : TBits_1; inline;
  56057. begin
  56058. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56059. end;
  56060. procedure TDMAC6_DCH6ECON.setCHSIRQ(thebits : TBits_8); inline;
  56061. begin
  56062. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  56063. end;
  56064. function TDMAC6_DCH6ECON.getCHSIRQ : TBits_8; inline;
  56065. begin
  56066. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  56067. end;
  56068. procedure TDMAC6_DCH6ECON.setCHAIRQ(thebits : TBits_8); inline;
  56069. begin
  56070. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  56071. end;
  56072. function TDMAC6_DCH6ECON.getCHAIRQ : TBits_8; inline;
  56073. begin
  56074. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  56075. end;
  56076. procedure TDMAC6_DCH6ECON.setw(thebits : TBits_32); inline;
  56077. begin
  56078. pTDefRegMap(@Self)^.val := thebits;
  56079. end;
  56080. function TDMAC6_DCH6ECON.getw : TBits_32; inline;
  56081. begin
  56082. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56083. end;
  56084. procedure TDMAC6_DCH6INT.setCHERIF; inline;
  56085. begin
  56086. pTDefRegMap(@Self)^.&set := $00000001;
  56087. end;
  56088. procedure TDMAC6_DCH6INT.clearCHERIF; inline;
  56089. begin
  56090. pTDefRegMap(@Self)^.clr := $00000001;
  56091. end;
  56092. procedure TDMAC6_DCH6INT.setCHERIF(thebits : TBits_1); inline;
  56093. begin
  56094. if thebits = 0 then
  56095. pTDefRegMap(@Self)^.clr := $00000001
  56096. else
  56097. pTDefRegMap(@Self)^.&set := $00000001;
  56098. end;
  56099. function TDMAC6_DCH6INT.getCHERIF : TBits_1; inline;
  56100. begin
  56101. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56102. end;
  56103. procedure TDMAC6_DCH6INT.setCHTAIF; inline;
  56104. begin
  56105. pTDefRegMap(@Self)^.&set := $00000002;
  56106. end;
  56107. procedure TDMAC6_DCH6INT.clearCHTAIF; inline;
  56108. begin
  56109. pTDefRegMap(@Self)^.clr := $00000002;
  56110. end;
  56111. procedure TDMAC6_DCH6INT.setCHTAIF(thebits : TBits_1); inline;
  56112. begin
  56113. if thebits = 0 then
  56114. pTDefRegMap(@Self)^.clr := $00000002
  56115. else
  56116. pTDefRegMap(@Self)^.&set := $00000002;
  56117. end;
  56118. function TDMAC6_DCH6INT.getCHTAIF : TBits_1; inline;
  56119. begin
  56120. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56121. end;
  56122. procedure TDMAC6_DCH6INT.setCHCCIF; inline;
  56123. begin
  56124. pTDefRegMap(@Self)^.&set := $00000004;
  56125. end;
  56126. procedure TDMAC6_DCH6INT.clearCHCCIF; inline;
  56127. begin
  56128. pTDefRegMap(@Self)^.clr := $00000004;
  56129. end;
  56130. procedure TDMAC6_DCH6INT.setCHCCIF(thebits : TBits_1); inline;
  56131. begin
  56132. if thebits = 0 then
  56133. pTDefRegMap(@Self)^.clr := $00000004
  56134. else
  56135. pTDefRegMap(@Self)^.&set := $00000004;
  56136. end;
  56137. function TDMAC6_DCH6INT.getCHCCIF : TBits_1; inline;
  56138. begin
  56139. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56140. end;
  56141. procedure TDMAC6_DCH6INT.setCHBCIF; inline;
  56142. begin
  56143. pTDefRegMap(@Self)^.&set := $00000008;
  56144. end;
  56145. procedure TDMAC6_DCH6INT.clearCHBCIF; inline;
  56146. begin
  56147. pTDefRegMap(@Self)^.clr := $00000008;
  56148. end;
  56149. procedure TDMAC6_DCH6INT.setCHBCIF(thebits : TBits_1); inline;
  56150. begin
  56151. if thebits = 0 then
  56152. pTDefRegMap(@Self)^.clr := $00000008
  56153. else
  56154. pTDefRegMap(@Self)^.&set := $00000008;
  56155. end;
  56156. function TDMAC6_DCH6INT.getCHBCIF : TBits_1; inline;
  56157. begin
  56158. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56159. end;
  56160. procedure TDMAC6_DCH6INT.setCHDHIF; inline;
  56161. begin
  56162. pTDefRegMap(@Self)^.&set := $00000010;
  56163. end;
  56164. procedure TDMAC6_DCH6INT.clearCHDHIF; inline;
  56165. begin
  56166. pTDefRegMap(@Self)^.clr := $00000010;
  56167. end;
  56168. procedure TDMAC6_DCH6INT.setCHDHIF(thebits : TBits_1); inline;
  56169. begin
  56170. if thebits = 0 then
  56171. pTDefRegMap(@Self)^.clr := $00000010
  56172. else
  56173. pTDefRegMap(@Self)^.&set := $00000010;
  56174. end;
  56175. function TDMAC6_DCH6INT.getCHDHIF : TBits_1; inline;
  56176. begin
  56177. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56178. end;
  56179. procedure TDMAC6_DCH6INT.setCHDDIF; inline;
  56180. begin
  56181. pTDefRegMap(@Self)^.&set := $00000020;
  56182. end;
  56183. procedure TDMAC6_DCH6INT.clearCHDDIF; inline;
  56184. begin
  56185. pTDefRegMap(@Self)^.clr := $00000020;
  56186. end;
  56187. procedure TDMAC6_DCH6INT.setCHDDIF(thebits : TBits_1); inline;
  56188. begin
  56189. if thebits = 0 then
  56190. pTDefRegMap(@Self)^.clr := $00000020
  56191. else
  56192. pTDefRegMap(@Self)^.&set := $00000020;
  56193. end;
  56194. function TDMAC6_DCH6INT.getCHDDIF : TBits_1; inline;
  56195. begin
  56196. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56197. end;
  56198. procedure TDMAC6_DCH6INT.setCHSHIF; inline;
  56199. begin
  56200. pTDefRegMap(@Self)^.&set := $00000040;
  56201. end;
  56202. procedure TDMAC6_DCH6INT.clearCHSHIF; inline;
  56203. begin
  56204. pTDefRegMap(@Self)^.clr := $00000040;
  56205. end;
  56206. procedure TDMAC6_DCH6INT.setCHSHIF(thebits : TBits_1); inline;
  56207. begin
  56208. if thebits = 0 then
  56209. pTDefRegMap(@Self)^.clr := $00000040
  56210. else
  56211. pTDefRegMap(@Self)^.&set := $00000040;
  56212. end;
  56213. function TDMAC6_DCH6INT.getCHSHIF : TBits_1; inline;
  56214. begin
  56215. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56216. end;
  56217. procedure TDMAC6_DCH6INT.setCHSDIF; inline;
  56218. begin
  56219. pTDefRegMap(@Self)^.&set := $00000080;
  56220. end;
  56221. procedure TDMAC6_DCH6INT.clearCHSDIF; inline;
  56222. begin
  56223. pTDefRegMap(@Self)^.clr := $00000080;
  56224. end;
  56225. procedure TDMAC6_DCH6INT.setCHSDIF(thebits : TBits_1); inline;
  56226. begin
  56227. if thebits = 0 then
  56228. pTDefRegMap(@Self)^.clr := $00000080
  56229. else
  56230. pTDefRegMap(@Self)^.&set := $00000080;
  56231. end;
  56232. function TDMAC6_DCH6INT.getCHSDIF : TBits_1; inline;
  56233. begin
  56234. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56235. end;
  56236. procedure TDMAC6_DCH6INT.setCHERIE; inline;
  56237. begin
  56238. pTDefRegMap(@Self)^.&set := $00010000;
  56239. end;
  56240. procedure TDMAC6_DCH6INT.clearCHERIE; inline;
  56241. begin
  56242. pTDefRegMap(@Self)^.clr := $00010000;
  56243. end;
  56244. procedure TDMAC6_DCH6INT.setCHERIE(thebits : TBits_1); inline;
  56245. begin
  56246. if thebits = 0 then
  56247. pTDefRegMap(@Self)^.clr := $00010000
  56248. else
  56249. pTDefRegMap(@Self)^.&set := $00010000;
  56250. end;
  56251. function TDMAC6_DCH6INT.getCHERIE : TBits_1; inline;
  56252. begin
  56253. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  56254. end;
  56255. procedure TDMAC6_DCH6INT.setCHTAIE; inline;
  56256. begin
  56257. pTDefRegMap(@Self)^.&set := $00020000;
  56258. end;
  56259. procedure TDMAC6_DCH6INT.clearCHTAIE; inline;
  56260. begin
  56261. pTDefRegMap(@Self)^.clr := $00020000;
  56262. end;
  56263. procedure TDMAC6_DCH6INT.setCHTAIE(thebits : TBits_1); inline;
  56264. begin
  56265. if thebits = 0 then
  56266. pTDefRegMap(@Self)^.clr := $00020000
  56267. else
  56268. pTDefRegMap(@Self)^.&set := $00020000;
  56269. end;
  56270. function TDMAC6_DCH6INT.getCHTAIE : TBits_1; inline;
  56271. begin
  56272. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  56273. end;
  56274. procedure TDMAC6_DCH6INT.setCHCCIE; inline;
  56275. begin
  56276. pTDefRegMap(@Self)^.&set := $00040000;
  56277. end;
  56278. procedure TDMAC6_DCH6INT.clearCHCCIE; inline;
  56279. begin
  56280. pTDefRegMap(@Self)^.clr := $00040000;
  56281. end;
  56282. procedure TDMAC6_DCH6INT.setCHCCIE(thebits : TBits_1); inline;
  56283. begin
  56284. if thebits = 0 then
  56285. pTDefRegMap(@Self)^.clr := $00040000
  56286. else
  56287. pTDefRegMap(@Self)^.&set := $00040000;
  56288. end;
  56289. function TDMAC6_DCH6INT.getCHCCIE : TBits_1; inline;
  56290. begin
  56291. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  56292. end;
  56293. procedure TDMAC6_DCH6INT.setCHBCIE; inline;
  56294. begin
  56295. pTDefRegMap(@Self)^.&set := $00080000;
  56296. end;
  56297. procedure TDMAC6_DCH6INT.clearCHBCIE; inline;
  56298. begin
  56299. pTDefRegMap(@Self)^.clr := $00080000;
  56300. end;
  56301. procedure TDMAC6_DCH6INT.setCHBCIE(thebits : TBits_1); inline;
  56302. begin
  56303. if thebits = 0 then
  56304. pTDefRegMap(@Self)^.clr := $00080000
  56305. else
  56306. pTDefRegMap(@Self)^.&set := $00080000;
  56307. end;
  56308. function TDMAC6_DCH6INT.getCHBCIE : TBits_1; inline;
  56309. begin
  56310. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  56311. end;
  56312. procedure TDMAC6_DCH6INT.setCHDHIE; inline;
  56313. begin
  56314. pTDefRegMap(@Self)^.&set := $00100000;
  56315. end;
  56316. procedure TDMAC6_DCH6INT.clearCHDHIE; inline;
  56317. begin
  56318. pTDefRegMap(@Self)^.clr := $00100000;
  56319. end;
  56320. procedure TDMAC6_DCH6INT.setCHDHIE(thebits : TBits_1); inline;
  56321. begin
  56322. if thebits = 0 then
  56323. pTDefRegMap(@Self)^.clr := $00100000
  56324. else
  56325. pTDefRegMap(@Self)^.&set := $00100000;
  56326. end;
  56327. function TDMAC6_DCH6INT.getCHDHIE : TBits_1; inline;
  56328. begin
  56329. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  56330. end;
  56331. procedure TDMAC6_DCH6INT.setCHDDIE; inline;
  56332. begin
  56333. pTDefRegMap(@Self)^.&set := $00200000;
  56334. end;
  56335. procedure TDMAC6_DCH6INT.clearCHDDIE; inline;
  56336. begin
  56337. pTDefRegMap(@Self)^.clr := $00200000;
  56338. end;
  56339. procedure TDMAC6_DCH6INT.setCHDDIE(thebits : TBits_1); inline;
  56340. begin
  56341. if thebits = 0 then
  56342. pTDefRegMap(@Self)^.clr := $00200000
  56343. else
  56344. pTDefRegMap(@Self)^.&set := $00200000;
  56345. end;
  56346. function TDMAC6_DCH6INT.getCHDDIE : TBits_1; inline;
  56347. begin
  56348. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  56349. end;
  56350. procedure TDMAC6_DCH6INT.setCHSHIE; inline;
  56351. begin
  56352. pTDefRegMap(@Self)^.&set := $00400000;
  56353. end;
  56354. procedure TDMAC6_DCH6INT.clearCHSHIE; inline;
  56355. begin
  56356. pTDefRegMap(@Self)^.clr := $00400000;
  56357. end;
  56358. procedure TDMAC6_DCH6INT.setCHSHIE(thebits : TBits_1); inline;
  56359. begin
  56360. if thebits = 0 then
  56361. pTDefRegMap(@Self)^.clr := $00400000
  56362. else
  56363. pTDefRegMap(@Self)^.&set := $00400000;
  56364. end;
  56365. function TDMAC6_DCH6INT.getCHSHIE : TBits_1; inline;
  56366. begin
  56367. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  56368. end;
  56369. procedure TDMAC6_DCH6INT.setCHSDIE; inline;
  56370. begin
  56371. pTDefRegMap(@Self)^.&set := $00800000;
  56372. end;
  56373. procedure TDMAC6_DCH6INT.clearCHSDIE; inline;
  56374. begin
  56375. pTDefRegMap(@Self)^.clr := $00800000;
  56376. end;
  56377. procedure TDMAC6_DCH6INT.setCHSDIE(thebits : TBits_1); inline;
  56378. begin
  56379. if thebits = 0 then
  56380. pTDefRegMap(@Self)^.clr := $00800000
  56381. else
  56382. pTDefRegMap(@Self)^.&set := $00800000;
  56383. end;
  56384. function TDMAC6_DCH6INT.getCHSDIE : TBits_1; inline;
  56385. begin
  56386. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  56387. end;
  56388. procedure TDMAC6_DCH6INT.setw(thebits : TBits_32); inline;
  56389. begin
  56390. pTDefRegMap(@Self)^.val := thebits;
  56391. end;
  56392. function TDMAC6_DCH6INT.getw : TBits_32; inline;
  56393. begin
  56394. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56395. end;
  56396. procedure TDMAC7_DCH7CON.setCHPRI(thebits : TBits_2); inline;
  56397. begin
  56398. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  56399. end;
  56400. function TDMAC7_DCH7CON.getCHPRI : TBits_2; inline;
  56401. begin
  56402. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  56403. end;
  56404. procedure TDMAC7_DCH7CON.setCHEDET; inline;
  56405. begin
  56406. pTDefRegMap(@Self)^.&set := $00000004;
  56407. end;
  56408. procedure TDMAC7_DCH7CON.clearCHEDET; inline;
  56409. begin
  56410. pTDefRegMap(@Self)^.clr := $00000004;
  56411. end;
  56412. procedure TDMAC7_DCH7CON.setCHEDET(thebits : TBits_1); inline;
  56413. begin
  56414. if thebits = 0 then
  56415. pTDefRegMap(@Self)^.clr := $00000004
  56416. else
  56417. pTDefRegMap(@Self)^.&set := $00000004;
  56418. end;
  56419. function TDMAC7_DCH7CON.getCHEDET : TBits_1; inline;
  56420. begin
  56421. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56422. end;
  56423. procedure TDMAC7_DCH7CON.setCHAEN; inline;
  56424. begin
  56425. pTDefRegMap(@Self)^.&set := $00000010;
  56426. end;
  56427. procedure TDMAC7_DCH7CON.clearCHAEN; inline;
  56428. begin
  56429. pTDefRegMap(@Self)^.clr := $00000010;
  56430. end;
  56431. procedure TDMAC7_DCH7CON.setCHAEN(thebits : TBits_1); inline;
  56432. begin
  56433. if thebits = 0 then
  56434. pTDefRegMap(@Self)^.clr := $00000010
  56435. else
  56436. pTDefRegMap(@Self)^.&set := $00000010;
  56437. end;
  56438. function TDMAC7_DCH7CON.getCHAEN : TBits_1; inline;
  56439. begin
  56440. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56441. end;
  56442. procedure TDMAC7_DCH7CON.setCHCHN; inline;
  56443. begin
  56444. pTDefRegMap(@Self)^.&set := $00000020;
  56445. end;
  56446. procedure TDMAC7_DCH7CON.clearCHCHN; inline;
  56447. begin
  56448. pTDefRegMap(@Self)^.clr := $00000020;
  56449. end;
  56450. procedure TDMAC7_DCH7CON.setCHCHN(thebits : TBits_1); inline;
  56451. begin
  56452. if thebits = 0 then
  56453. pTDefRegMap(@Self)^.clr := $00000020
  56454. else
  56455. pTDefRegMap(@Self)^.&set := $00000020;
  56456. end;
  56457. function TDMAC7_DCH7CON.getCHCHN : TBits_1; inline;
  56458. begin
  56459. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56460. end;
  56461. procedure TDMAC7_DCH7CON.setCHAED; inline;
  56462. begin
  56463. pTDefRegMap(@Self)^.&set := $00000040;
  56464. end;
  56465. procedure TDMAC7_DCH7CON.clearCHAED; inline;
  56466. begin
  56467. pTDefRegMap(@Self)^.clr := $00000040;
  56468. end;
  56469. procedure TDMAC7_DCH7CON.setCHAED(thebits : TBits_1); inline;
  56470. begin
  56471. if thebits = 0 then
  56472. pTDefRegMap(@Self)^.clr := $00000040
  56473. else
  56474. pTDefRegMap(@Self)^.&set := $00000040;
  56475. end;
  56476. function TDMAC7_DCH7CON.getCHAED : TBits_1; inline;
  56477. begin
  56478. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56479. end;
  56480. procedure TDMAC7_DCH7CON.setCHEN; inline;
  56481. begin
  56482. pTDefRegMap(@Self)^.&set := $00000080;
  56483. end;
  56484. procedure TDMAC7_DCH7CON.clearCHEN; inline;
  56485. begin
  56486. pTDefRegMap(@Self)^.clr := $00000080;
  56487. end;
  56488. procedure TDMAC7_DCH7CON.setCHEN(thebits : TBits_1); inline;
  56489. begin
  56490. if thebits = 0 then
  56491. pTDefRegMap(@Self)^.clr := $00000080
  56492. else
  56493. pTDefRegMap(@Self)^.&set := $00000080;
  56494. end;
  56495. function TDMAC7_DCH7CON.getCHEN : TBits_1; inline;
  56496. begin
  56497. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56498. end;
  56499. procedure TDMAC7_DCH7CON.setCHCHNS; inline;
  56500. begin
  56501. pTDefRegMap(@Self)^.&set := $00000100;
  56502. end;
  56503. procedure TDMAC7_DCH7CON.clearCHCHNS; inline;
  56504. begin
  56505. pTDefRegMap(@Self)^.clr := $00000100;
  56506. end;
  56507. procedure TDMAC7_DCH7CON.setCHCHNS(thebits : TBits_1); inline;
  56508. begin
  56509. if thebits = 0 then
  56510. pTDefRegMap(@Self)^.clr := $00000100
  56511. else
  56512. pTDefRegMap(@Self)^.&set := $00000100;
  56513. end;
  56514. function TDMAC7_DCH7CON.getCHCHNS : TBits_1; inline;
  56515. begin
  56516. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  56517. end;
  56518. procedure TDMAC7_DCH7CON.setCHBUSY; inline;
  56519. begin
  56520. pTDefRegMap(@Self)^.&set := $00008000;
  56521. end;
  56522. procedure TDMAC7_DCH7CON.clearCHBUSY; inline;
  56523. begin
  56524. pTDefRegMap(@Self)^.clr := $00008000;
  56525. end;
  56526. procedure TDMAC7_DCH7CON.setCHBUSY(thebits : TBits_1); inline;
  56527. begin
  56528. if thebits = 0 then
  56529. pTDefRegMap(@Self)^.clr := $00008000
  56530. else
  56531. pTDefRegMap(@Self)^.&set := $00008000;
  56532. end;
  56533. function TDMAC7_DCH7CON.getCHBUSY : TBits_1; inline;
  56534. begin
  56535. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  56536. end;
  56537. procedure TDMAC7_DCH7CON.setw(thebits : TBits_32); inline;
  56538. begin
  56539. pTDefRegMap(@Self)^.val := thebits;
  56540. end;
  56541. function TDMAC7_DCH7CON.getw : TBits_32; inline;
  56542. begin
  56543. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56544. end;
  56545. procedure TDMAC7_DCH7ECON.setAIRQEN; inline;
  56546. begin
  56547. pTDefRegMap(@Self)^.&set := $00000008;
  56548. end;
  56549. procedure TDMAC7_DCH7ECON.clearAIRQEN; inline;
  56550. begin
  56551. pTDefRegMap(@Self)^.clr := $00000008;
  56552. end;
  56553. procedure TDMAC7_DCH7ECON.setAIRQEN(thebits : TBits_1); inline;
  56554. begin
  56555. if thebits = 0 then
  56556. pTDefRegMap(@Self)^.clr := $00000008
  56557. else
  56558. pTDefRegMap(@Self)^.&set := $00000008;
  56559. end;
  56560. function TDMAC7_DCH7ECON.getAIRQEN : TBits_1; inline;
  56561. begin
  56562. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56563. end;
  56564. procedure TDMAC7_DCH7ECON.setSIRQEN; inline;
  56565. begin
  56566. pTDefRegMap(@Self)^.&set := $00000010;
  56567. end;
  56568. procedure TDMAC7_DCH7ECON.clearSIRQEN; inline;
  56569. begin
  56570. pTDefRegMap(@Self)^.clr := $00000010;
  56571. end;
  56572. procedure TDMAC7_DCH7ECON.setSIRQEN(thebits : TBits_1); inline;
  56573. begin
  56574. if thebits = 0 then
  56575. pTDefRegMap(@Self)^.clr := $00000010
  56576. else
  56577. pTDefRegMap(@Self)^.&set := $00000010;
  56578. end;
  56579. function TDMAC7_DCH7ECON.getSIRQEN : TBits_1; inline;
  56580. begin
  56581. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56582. end;
  56583. procedure TDMAC7_DCH7ECON.setPATEN; inline;
  56584. begin
  56585. pTDefRegMap(@Self)^.&set := $00000020;
  56586. end;
  56587. procedure TDMAC7_DCH7ECON.clearPATEN; inline;
  56588. begin
  56589. pTDefRegMap(@Self)^.clr := $00000020;
  56590. end;
  56591. procedure TDMAC7_DCH7ECON.setPATEN(thebits : TBits_1); inline;
  56592. begin
  56593. if thebits = 0 then
  56594. pTDefRegMap(@Self)^.clr := $00000020
  56595. else
  56596. pTDefRegMap(@Self)^.&set := $00000020;
  56597. end;
  56598. function TDMAC7_DCH7ECON.getPATEN : TBits_1; inline;
  56599. begin
  56600. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56601. end;
  56602. procedure TDMAC7_DCH7ECON.setCABORT; inline;
  56603. begin
  56604. pTDefRegMap(@Self)^.&set := $00000040;
  56605. end;
  56606. procedure TDMAC7_DCH7ECON.clearCABORT; inline;
  56607. begin
  56608. pTDefRegMap(@Self)^.clr := $00000040;
  56609. end;
  56610. procedure TDMAC7_DCH7ECON.setCABORT(thebits : TBits_1); inline;
  56611. begin
  56612. if thebits = 0 then
  56613. pTDefRegMap(@Self)^.clr := $00000040
  56614. else
  56615. pTDefRegMap(@Self)^.&set := $00000040;
  56616. end;
  56617. function TDMAC7_DCH7ECON.getCABORT : TBits_1; inline;
  56618. begin
  56619. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56620. end;
  56621. procedure TDMAC7_DCH7ECON.setCFORCE; inline;
  56622. begin
  56623. pTDefRegMap(@Self)^.&set := $00000080;
  56624. end;
  56625. procedure TDMAC7_DCH7ECON.clearCFORCE; inline;
  56626. begin
  56627. pTDefRegMap(@Self)^.clr := $00000080;
  56628. end;
  56629. procedure TDMAC7_DCH7ECON.setCFORCE(thebits : TBits_1); inline;
  56630. begin
  56631. if thebits = 0 then
  56632. pTDefRegMap(@Self)^.clr := $00000080
  56633. else
  56634. pTDefRegMap(@Self)^.&set := $00000080;
  56635. end;
  56636. function TDMAC7_DCH7ECON.getCFORCE : TBits_1; inline;
  56637. begin
  56638. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56639. end;
  56640. procedure TDMAC7_DCH7ECON.setCHSIRQ(thebits : TBits_8); inline;
  56641. begin
  56642. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  56643. end;
  56644. function TDMAC7_DCH7ECON.getCHSIRQ : TBits_8; inline;
  56645. begin
  56646. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  56647. end;
  56648. procedure TDMAC7_DCH7ECON.setCHAIRQ(thebits : TBits_8); inline;
  56649. begin
  56650. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  56651. end;
  56652. function TDMAC7_DCH7ECON.getCHAIRQ : TBits_8; inline;
  56653. begin
  56654. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  56655. end;
  56656. procedure TDMAC7_DCH7ECON.setw(thebits : TBits_32); inline;
  56657. begin
  56658. pTDefRegMap(@Self)^.val := thebits;
  56659. end;
  56660. function TDMAC7_DCH7ECON.getw : TBits_32; inline;
  56661. begin
  56662. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56663. end;
  56664. procedure TDMAC7_DCH7INT.setCHERIF; inline;
  56665. begin
  56666. pTDefRegMap(@Self)^.&set := $00000001;
  56667. end;
  56668. procedure TDMAC7_DCH7INT.clearCHERIF; inline;
  56669. begin
  56670. pTDefRegMap(@Self)^.clr := $00000001;
  56671. end;
  56672. procedure TDMAC7_DCH7INT.setCHERIF(thebits : TBits_1); inline;
  56673. begin
  56674. if thebits = 0 then
  56675. pTDefRegMap(@Self)^.clr := $00000001
  56676. else
  56677. pTDefRegMap(@Self)^.&set := $00000001;
  56678. end;
  56679. function TDMAC7_DCH7INT.getCHERIF : TBits_1; inline;
  56680. begin
  56681. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56682. end;
  56683. procedure TDMAC7_DCH7INT.setCHTAIF; inline;
  56684. begin
  56685. pTDefRegMap(@Self)^.&set := $00000002;
  56686. end;
  56687. procedure TDMAC7_DCH7INT.clearCHTAIF; inline;
  56688. begin
  56689. pTDefRegMap(@Self)^.clr := $00000002;
  56690. end;
  56691. procedure TDMAC7_DCH7INT.setCHTAIF(thebits : TBits_1); inline;
  56692. begin
  56693. if thebits = 0 then
  56694. pTDefRegMap(@Self)^.clr := $00000002
  56695. else
  56696. pTDefRegMap(@Self)^.&set := $00000002;
  56697. end;
  56698. function TDMAC7_DCH7INT.getCHTAIF : TBits_1; inline;
  56699. begin
  56700. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56701. end;
  56702. procedure TDMAC7_DCH7INT.setCHCCIF; inline;
  56703. begin
  56704. pTDefRegMap(@Self)^.&set := $00000004;
  56705. end;
  56706. procedure TDMAC7_DCH7INT.clearCHCCIF; inline;
  56707. begin
  56708. pTDefRegMap(@Self)^.clr := $00000004;
  56709. end;
  56710. procedure TDMAC7_DCH7INT.setCHCCIF(thebits : TBits_1); inline;
  56711. begin
  56712. if thebits = 0 then
  56713. pTDefRegMap(@Self)^.clr := $00000004
  56714. else
  56715. pTDefRegMap(@Self)^.&set := $00000004;
  56716. end;
  56717. function TDMAC7_DCH7INT.getCHCCIF : TBits_1; inline;
  56718. begin
  56719. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56720. end;
  56721. procedure TDMAC7_DCH7INT.setCHBCIF; inline;
  56722. begin
  56723. pTDefRegMap(@Self)^.&set := $00000008;
  56724. end;
  56725. procedure TDMAC7_DCH7INT.clearCHBCIF; inline;
  56726. begin
  56727. pTDefRegMap(@Self)^.clr := $00000008;
  56728. end;
  56729. procedure TDMAC7_DCH7INT.setCHBCIF(thebits : TBits_1); inline;
  56730. begin
  56731. if thebits = 0 then
  56732. pTDefRegMap(@Self)^.clr := $00000008
  56733. else
  56734. pTDefRegMap(@Self)^.&set := $00000008;
  56735. end;
  56736. function TDMAC7_DCH7INT.getCHBCIF : TBits_1; inline;
  56737. begin
  56738. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56739. end;
  56740. procedure TDMAC7_DCH7INT.setCHDHIF; inline;
  56741. begin
  56742. pTDefRegMap(@Self)^.&set := $00000010;
  56743. end;
  56744. procedure TDMAC7_DCH7INT.clearCHDHIF; inline;
  56745. begin
  56746. pTDefRegMap(@Self)^.clr := $00000010;
  56747. end;
  56748. procedure TDMAC7_DCH7INT.setCHDHIF(thebits : TBits_1); inline;
  56749. begin
  56750. if thebits = 0 then
  56751. pTDefRegMap(@Self)^.clr := $00000010
  56752. else
  56753. pTDefRegMap(@Self)^.&set := $00000010;
  56754. end;
  56755. function TDMAC7_DCH7INT.getCHDHIF : TBits_1; inline;
  56756. begin
  56757. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56758. end;
  56759. procedure TDMAC7_DCH7INT.setCHDDIF; inline;
  56760. begin
  56761. pTDefRegMap(@Self)^.&set := $00000020;
  56762. end;
  56763. procedure TDMAC7_DCH7INT.clearCHDDIF; inline;
  56764. begin
  56765. pTDefRegMap(@Self)^.clr := $00000020;
  56766. end;
  56767. procedure TDMAC7_DCH7INT.setCHDDIF(thebits : TBits_1); inline;
  56768. begin
  56769. if thebits = 0 then
  56770. pTDefRegMap(@Self)^.clr := $00000020
  56771. else
  56772. pTDefRegMap(@Self)^.&set := $00000020;
  56773. end;
  56774. function TDMAC7_DCH7INT.getCHDDIF : TBits_1; inline;
  56775. begin
  56776. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56777. end;
  56778. procedure TDMAC7_DCH7INT.setCHSHIF; inline;
  56779. begin
  56780. pTDefRegMap(@Self)^.&set := $00000040;
  56781. end;
  56782. procedure TDMAC7_DCH7INT.clearCHSHIF; inline;
  56783. begin
  56784. pTDefRegMap(@Self)^.clr := $00000040;
  56785. end;
  56786. procedure TDMAC7_DCH7INT.setCHSHIF(thebits : TBits_1); inline;
  56787. begin
  56788. if thebits = 0 then
  56789. pTDefRegMap(@Self)^.clr := $00000040
  56790. else
  56791. pTDefRegMap(@Self)^.&set := $00000040;
  56792. end;
  56793. function TDMAC7_DCH7INT.getCHSHIF : TBits_1; inline;
  56794. begin
  56795. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56796. end;
  56797. procedure TDMAC7_DCH7INT.setCHSDIF; inline;
  56798. begin
  56799. pTDefRegMap(@Self)^.&set := $00000080;
  56800. end;
  56801. procedure TDMAC7_DCH7INT.clearCHSDIF; inline;
  56802. begin
  56803. pTDefRegMap(@Self)^.clr := $00000080;
  56804. end;
  56805. procedure TDMAC7_DCH7INT.setCHSDIF(thebits : TBits_1); inline;
  56806. begin
  56807. if thebits = 0 then
  56808. pTDefRegMap(@Self)^.clr := $00000080
  56809. else
  56810. pTDefRegMap(@Self)^.&set := $00000080;
  56811. end;
  56812. function TDMAC7_DCH7INT.getCHSDIF : TBits_1; inline;
  56813. begin
  56814. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56815. end;
  56816. procedure TDMAC7_DCH7INT.setCHERIE; inline;
  56817. begin
  56818. pTDefRegMap(@Self)^.&set := $00010000;
  56819. end;
  56820. procedure TDMAC7_DCH7INT.clearCHERIE; inline;
  56821. begin
  56822. pTDefRegMap(@Self)^.clr := $00010000;
  56823. end;
  56824. procedure TDMAC7_DCH7INT.setCHERIE(thebits : TBits_1); inline;
  56825. begin
  56826. if thebits = 0 then
  56827. pTDefRegMap(@Self)^.clr := $00010000
  56828. else
  56829. pTDefRegMap(@Self)^.&set := $00010000;
  56830. end;
  56831. function TDMAC7_DCH7INT.getCHERIE : TBits_1; inline;
  56832. begin
  56833. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  56834. end;
  56835. procedure TDMAC7_DCH7INT.setCHTAIE; inline;
  56836. begin
  56837. pTDefRegMap(@Self)^.&set := $00020000;
  56838. end;
  56839. procedure TDMAC7_DCH7INT.clearCHTAIE; inline;
  56840. begin
  56841. pTDefRegMap(@Self)^.clr := $00020000;
  56842. end;
  56843. procedure TDMAC7_DCH7INT.setCHTAIE(thebits : TBits_1); inline;
  56844. begin
  56845. if thebits = 0 then
  56846. pTDefRegMap(@Self)^.clr := $00020000
  56847. else
  56848. pTDefRegMap(@Self)^.&set := $00020000;
  56849. end;
  56850. function TDMAC7_DCH7INT.getCHTAIE : TBits_1; inline;
  56851. begin
  56852. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  56853. end;
  56854. procedure TDMAC7_DCH7INT.setCHCCIE; inline;
  56855. begin
  56856. pTDefRegMap(@Self)^.&set := $00040000;
  56857. end;
  56858. procedure TDMAC7_DCH7INT.clearCHCCIE; inline;
  56859. begin
  56860. pTDefRegMap(@Self)^.clr := $00040000;
  56861. end;
  56862. procedure TDMAC7_DCH7INT.setCHCCIE(thebits : TBits_1); inline;
  56863. begin
  56864. if thebits = 0 then
  56865. pTDefRegMap(@Self)^.clr := $00040000
  56866. else
  56867. pTDefRegMap(@Self)^.&set := $00040000;
  56868. end;
  56869. function TDMAC7_DCH7INT.getCHCCIE : TBits_1; inline;
  56870. begin
  56871. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  56872. end;
  56873. procedure TDMAC7_DCH7INT.setCHBCIE; inline;
  56874. begin
  56875. pTDefRegMap(@Self)^.&set := $00080000;
  56876. end;
  56877. procedure TDMAC7_DCH7INT.clearCHBCIE; inline;
  56878. begin
  56879. pTDefRegMap(@Self)^.clr := $00080000;
  56880. end;
  56881. procedure TDMAC7_DCH7INT.setCHBCIE(thebits : TBits_1); inline;
  56882. begin
  56883. if thebits = 0 then
  56884. pTDefRegMap(@Self)^.clr := $00080000
  56885. else
  56886. pTDefRegMap(@Self)^.&set := $00080000;
  56887. end;
  56888. function TDMAC7_DCH7INT.getCHBCIE : TBits_1; inline;
  56889. begin
  56890. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  56891. end;
  56892. procedure TDMAC7_DCH7INT.setCHDHIE; inline;
  56893. begin
  56894. pTDefRegMap(@Self)^.&set := $00100000;
  56895. end;
  56896. procedure TDMAC7_DCH7INT.clearCHDHIE; inline;
  56897. begin
  56898. pTDefRegMap(@Self)^.clr := $00100000;
  56899. end;
  56900. procedure TDMAC7_DCH7INT.setCHDHIE(thebits : TBits_1); inline;
  56901. begin
  56902. if thebits = 0 then
  56903. pTDefRegMap(@Self)^.clr := $00100000
  56904. else
  56905. pTDefRegMap(@Self)^.&set := $00100000;
  56906. end;
  56907. function TDMAC7_DCH7INT.getCHDHIE : TBits_1; inline;
  56908. begin
  56909. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  56910. end;
  56911. procedure TDMAC7_DCH7INT.setCHDDIE; inline;
  56912. begin
  56913. pTDefRegMap(@Self)^.&set := $00200000;
  56914. end;
  56915. procedure TDMAC7_DCH7INT.clearCHDDIE; inline;
  56916. begin
  56917. pTDefRegMap(@Self)^.clr := $00200000;
  56918. end;
  56919. procedure TDMAC7_DCH7INT.setCHDDIE(thebits : TBits_1); inline;
  56920. begin
  56921. if thebits = 0 then
  56922. pTDefRegMap(@Self)^.clr := $00200000
  56923. else
  56924. pTDefRegMap(@Self)^.&set := $00200000;
  56925. end;
  56926. function TDMAC7_DCH7INT.getCHDDIE : TBits_1; inline;
  56927. begin
  56928. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  56929. end;
  56930. procedure TDMAC7_DCH7INT.setCHSHIE; inline;
  56931. begin
  56932. pTDefRegMap(@Self)^.&set := $00400000;
  56933. end;
  56934. procedure TDMAC7_DCH7INT.clearCHSHIE; inline;
  56935. begin
  56936. pTDefRegMap(@Self)^.clr := $00400000;
  56937. end;
  56938. procedure TDMAC7_DCH7INT.setCHSHIE(thebits : TBits_1); inline;
  56939. begin
  56940. if thebits = 0 then
  56941. pTDefRegMap(@Self)^.clr := $00400000
  56942. else
  56943. pTDefRegMap(@Self)^.&set := $00400000;
  56944. end;
  56945. function TDMAC7_DCH7INT.getCHSHIE : TBits_1; inline;
  56946. begin
  56947. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  56948. end;
  56949. procedure TDMAC7_DCH7INT.setCHSDIE; inline;
  56950. begin
  56951. pTDefRegMap(@Self)^.&set := $00800000;
  56952. end;
  56953. procedure TDMAC7_DCH7INT.clearCHSDIE; inline;
  56954. begin
  56955. pTDefRegMap(@Self)^.clr := $00800000;
  56956. end;
  56957. procedure TDMAC7_DCH7INT.setCHSDIE(thebits : TBits_1); inline;
  56958. begin
  56959. if thebits = 0 then
  56960. pTDefRegMap(@Self)^.clr := $00800000
  56961. else
  56962. pTDefRegMap(@Self)^.&set := $00800000;
  56963. end;
  56964. function TDMAC7_DCH7INT.getCHSDIE : TBits_1; inline;
  56965. begin
  56966. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  56967. end;
  56968. procedure TDMAC7_DCH7INT.setw(thebits : TBits_32); inline;
  56969. begin
  56970. pTDefRegMap(@Self)^.val := thebits;
  56971. end;
  56972. function TDMAC7_DCH7INT.getw : TBits_32; inline;
  56973. begin
  56974. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56975. end;
  56976. procedure TPCACHE_CHECON.setPFMWS(thebits : TBits_3); inline;
  56977. begin
  56978. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  56979. end;
  56980. function TPCACHE_CHECON.getPFMWS : TBits_3; inline;
  56981. begin
  56982. getPFMWS := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  56983. end;
  56984. procedure TPCACHE_CHECON.setPREFEN(thebits : TBits_2); inline;
  56985. begin
  56986. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFCF or ( thebits shl 4 );
  56987. end;
  56988. function TPCACHE_CHECON.getPREFEN : TBits_2; inline;
  56989. begin
  56990. getPREFEN := (pTDefRegMap(@Self)^.val and $00000030) shr 4;
  56991. end;
  56992. procedure TPCACHE_CHECON.setDCSZ(thebits : TBits_2); inline;
  56993. begin
  56994. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  56995. end;
  56996. function TPCACHE_CHECON.getDCSZ : TBits_2; inline;
  56997. begin
  56998. getDCSZ := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  56999. end;
  57000. procedure TPCACHE_CHECON.setCHECOH; inline;
  57001. begin
  57002. pTDefRegMap(@Self)^.&set := $00010000;
  57003. end;
  57004. procedure TPCACHE_CHECON.clearCHECOH; inline;
  57005. begin
  57006. pTDefRegMap(@Self)^.clr := $00010000;
  57007. end;
  57008. procedure TPCACHE_CHECON.setCHECOH(thebits : TBits_1); inline;
  57009. begin
  57010. if thebits = 0 then
  57011. pTDefRegMap(@Self)^.clr := $00010000
  57012. else
  57013. pTDefRegMap(@Self)^.&set := $00010000;
  57014. end;
  57015. function TPCACHE_CHECON.getCHECOH : TBits_1; inline;
  57016. begin
  57017. getCHECOH := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  57018. end;
  57019. procedure TPCACHE_CHECON.setw(thebits : TBits_32); inline;
  57020. begin
  57021. pTDefRegMap(@Self)^.val := thebits;
  57022. end;
  57023. function TPCACHE_CHECON.getw : TBits_32; inline;
  57024. begin
  57025. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57026. end;
  57027. procedure TPCACHE_CHETAG.setLTYPE; inline;
  57028. begin
  57029. pTDefRegMap(@Self)^.&set := $00000002;
  57030. end;
  57031. procedure TPCACHE_CHETAG.clearLTYPE; inline;
  57032. begin
  57033. pTDefRegMap(@Self)^.clr := $00000002;
  57034. end;
  57035. procedure TPCACHE_CHETAG.setLTYPE(thebits : TBits_1); inline;
  57036. begin
  57037. if thebits = 0 then
  57038. pTDefRegMap(@Self)^.clr := $00000002
  57039. else
  57040. pTDefRegMap(@Self)^.&set := $00000002;
  57041. end;
  57042. function TPCACHE_CHETAG.getLTYPE : TBits_1; inline;
  57043. begin
  57044. getLTYPE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57045. end;
  57046. procedure TPCACHE_CHETAG.setLLOCK; inline;
  57047. begin
  57048. pTDefRegMap(@Self)^.&set := $00000004;
  57049. end;
  57050. procedure TPCACHE_CHETAG.clearLLOCK; inline;
  57051. begin
  57052. pTDefRegMap(@Self)^.clr := $00000004;
  57053. end;
  57054. procedure TPCACHE_CHETAG.setLLOCK(thebits : TBits_1); inline;
  57055. begin
  57056. if thebits = 0 then
  57057. pTDefRegMap(@Self)^.clr := $00000004
  57058. else
  57059. pTDefRegMap(@Self)^.&set := $00000004;
  57060. end;
  57061. function TPCACHE_CHETAG.getLLOCK : TBits_1; inline;
  57062. begin
  57063. getLLOCK := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57064. end;
  57065. procedure TPCACHE_CHETAG.setLVALID; inline;
  57066. begin
  57067. pTDefRegMap(@Self)^.&set := $00000008;
  57068. end;
  57069. procedure TPCACHE_CHETAG.clearLVALID; inline;
  57070. begin
  57071. pTDefRegMap(@Self)^.clr := $00000008;
  57072. end;
  57073. procedure TPCACHE_CHETAG.setLVALID(thebits : TBits_1); inline;
  57074. begin
  57075. if thebits = 0 then
  57076. pTDefRegMap(@Self)^.clr := $00000008
  57077. else
  57078. pTDefRegMap(@Self)^.&set := $00000008;
  57079. end;
  57080. function TPCACHE_CHETAG.getLVALID : TBits_1; inline;
  57081. begin
  57082. getLVALID := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57083. end;
  57084. procedure TPCACHE_CHETAG.setLTAG(thebits : TBits_20); inline;
  57085. begin
  57086. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00000F or ( thebits shl 4 );
  57087. end;
  57088. function TPCACHE_CHETAG.getLTAG : TBits_20; inline;
  57089. begin
  57090. getLTAG := (pTDefRegMap(@Self)^.val and $00FFFFF0) shr 4;
  57091. end;
  57092. procedure TPCACHE_CHETAG.setLTAGBOOT; inline;
  57093. begin
  57094. pTDefRegMap(@Self)^.&set := $80000000;
  57095. end;
  57096. procedure TPCACHE_CHETAG.clearLTAGBOOT; inline;
  57097. begin
  57098. pTDefRegMap(@Self)^.clr := $80000000;
  57099. end;
  57100. procedure TPCACHE_CHETAG.setLTAGBOOT(thebits : TBits_1); inline;
  57101. begin
  57102. if thebits = 0 then
  57103. pTDefRegMap(@Self)^.clr := $80000000
  57104. else
  57105. pTDefRegMap(@Self)^.&set := $80000000;
  57106. end;
  57107. function TPCACHE_CHETAG.getLTAGBOOT : TBits_1; inline;
  57108. begin
  57109. getLTAGBOOT := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  57110. end;
  57111. procedure TPCACHE_CHETAG.setw(thebits : TBits_32); inline;
  57112. begin
  57113. pTDefRegMap(@Self)^.val := thebits;
  57114. end;
  57115. function TPCACHE_CHETAG.getw : TBits_32; inline;
  57116. begin
  57117. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57118. end;
  57119. procedure TUSB_U1IR.setURSTIF_DETACHIF; inline;
  57120. begin
  57121. pTDefRegMap(@Self)^.&set := $00000001;
  57122. end;
  57123. procedure TUSB_U1IR.clearURSTIF_DETACHIF; inline;
  57124. begin
  57125. pTDefRegMap(@Self)^.clr := $00000001;
  57126. end;
  57127. procedure TUSB_U1IR.setURSTIF_DETACHIF(thebits : TBits_1); inline;
  57128. begin
  57129. if thebits = 0 then
  57130. pTDefRegMap(@Self)^.clr := $00000001
  57131. else
  57132. pTDefRegMap(@Self)^.&set := $00000001;
  57133. end;
  57134. function TUSB_U1IR.getURSTIF_DETACHIF : TBits_1; inline;
  57135. begin
  57136. getURSTIF_DETACHIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57137. end;
  57138. procedure TUSB_U1IR.setUERRIF; inline;
  57139. begin
  57140. pTDefRegMap(@Self)^.&set := $00000002;
  57141. end;
  57142. procedure TUSB_U1IR.clearUERRIF; inline;
  57143. begin
  57144. pTDefRegMap(@Self)^.clr := $00000002;
  57145. end;
  57146. procedure TUSB_U1IR.setUERRIF(thebits : TBits_1); inline;
  57147. begin
  57148. if thebits = 0 then
  57149. pTDefRegMap(@Self)^.clr := $00000002
  57150. else
  57151. pTDefRegMap(@Self)^.&set := $00000002;
  57152. end;
  57153. function TUSB_U1IR.getUERRIF : TBits_1; inline;
  57154. begin
  57155. getUERRIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57156. end;
  57157. procedure TUSB_U1IR.setSOFIF; inline;
  57158. begin
  57159. pTDefRegMap(@Self)^.&set := $00000004;
  57160. end;
  57161. procedure TUSB_U1IR.clearSOFIF; inline;
  57162. begin
  57163. pTDefRegMap(@Self)^.clr := $00000004;
  57164. end;
  57165. procedure TUSB_U1IR.setSOFIF(thebits : TBits_1); inline;
  57166. begin
  57167. if thebits = 0 then
  57168. pTDefRegMap(@Self)^.clr := $00000004
  57169. else
  57170. pTDefRegMap(@Self)^.&set := $00000004;
  57171. end;
  57172. function TUSB_U1IR.getSOFIF : TBits_1; inline;
  57173. begin
  57174. getSOFIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57175. end;
  57176. procedure TUSB_U1IR.setTRNIF; inline;
  57177. begin
  57178. pTDefRegMap(@Self)^.&set := $00000008;
  57179. end;
  57180. procedure TUSB_U1IR.clearTRNIF; inline;
  57181. begin
  57182. pTDefRegMap(@Self)^.clr := $00000008;
  57183. end;
  57184. procedure TUSB_U1IR.setTRNIF(thebits : TBits_1); inline;
  57185. begin
  57186. if thebits = 0 then
  57187. pTDefRegMap(@Self)^.clr := $00000008
  57188. else
  57189. pTDefRegMap(@Self)^.&set := $00000008;
  57190. end;
  57191. function TUSB_U1IR.getTRNIF : TBits_1; inline;
  57192. begin
  57193. getTRNIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57194. end;
  57195. procedure TUSB_U1IR.setIDLEIF; inline;
  57196. begin
  57197. pTDefRegMap(@Self)^.&set := $00000010;
  57198. end;
  57199. procedure TUSB_U1IR.clearIDLEIF; inline;
  57200. begin
  57201. pTDefRegMap(@Self)^.clr := $00000010;
  57202. end;
  57203. procedure TUSB_U1IR.setIDLEIF(thebits : TBits_1); inline;
  57204. begin
  57205. if thebits = 0 then
  57206. pTDefRegMap(@Self)^.clr := $00000010
  57207. else
  57208. pTDefRegMap(@Self)^.&set := $00000010;
  57209. end;
  57210. function TUSB_U1IR.getIDLEIF : TBits_1; inline;
  57211. begin
  57212. getIDLEIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57213. end;
  57214. procedure TUSB_U1IR.setRESUMEIF; inline;
  57215. begin
  57216. pTDefRegMap(@Self)^.&set := $00000020;
  57217. end;
  57218. procedure TUSB_U1IR.clearRESUMEIF; inline;
  57219. begin
  57220. pTDefRegMap(@Self)^.clr := $00000020;
  57221. end;
  57222. procedure TUSB_U1IR.setRESUMEIF(thebits : TBits_1); inline;
  57223. begin
  57224. if thebits = 0 then
  57225. pTDefRegMap(@Self)^.clr := $00000020
  57226. else
  57227. pTDefRegMap(@Self)^.&set := $00000020;
  57228. end;
  57229. function TUSB_U1IR.getRESUMEIF : TBits_1; inline;
  57230. begin
  57231. getRESUMEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57232. end;
  57233. procedure TUSB_U1IR.setATTACHIF; inline;
  57234. begin
  57235. pTDefRegMap(@Self)^.&set := $00000040;
  57236. end;
  57237. procedure TUSB_U1IR.clearATTACHIF; inline;
  57238. begin
  57239. pTDefRegMap(@Self)^.clr := $00000040;
  57240. end;
  57241. procedure TUSB_U1IR.setATTACHIF(thebits : TBits_1); inline;
  57242. begin
  57243. if thebits = 0 then
  57244. pTDefRegMap(@Self)^.clr := $00000040
  57245. else
  57246. pTDefRegMap(@Self)^.&set := $00000040;
  57247. end;
  57248. function TUSB_U1IR.getATTACHIF : TBits_1; inline;
  57249. begin
  57250. getATTACHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57251. end;
  57252. procedure TUSB_U1IR.setSTALLIF; inline;
  57253. begin
  57254. pTDefRegMap(@Self)^.&set := $00000080;
  57255. end;
  57256. procedure TUSB_U1IR.clearSTALLIF; inline;
  57257. begin
  57258. pTDefRegMap(@Self)^.clr := $00000080;
  57259. end;
  57260. procedure TUSB_U1IR.setSTALLIF(thebits : TBits_1); inline;
  57261. begin
  57262. if thebits = 0 then
  57263. pTDefRegMap(@Self)^.clr := $00000080
  57264. else
  57265. pTDefRegMap(@Self)^.&set := $00000080;
  57266. end;
  57267. function TUSB_U1IR.getSTALLIF : TBits_1; inline;
  57268. begin
  57269. getSTALLIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57270. end;
  57271. procedure TUSB_U1IR.setDETACHIF; inline;
  57272. begin
  57273. pTDefRegMap(@Self)^.&set := $00000001;
  57274. end;
  57275. procedure TUSB_U1IR.clearDETACHIF; inline;
  57276. begin
  57277. pTDefRegMap(@Self)^.clr := $00000001;
  57278. end;
  57279. procedure TUSB_U1IR.setDETACHIF(thebits : TBits_1); inline;
  57280. begin
  57281. if thebits = 0 then
  57282. pTDefRegMap(@Self)^.clr := $00000001
  57283. else
  57284. pTDefRegMap(@Self)^.&set := $00000001;
  57285. end;
  57286. function TUSB_U1IR.getDETACHIF : TBits_1; inline;
  57287. begin
  57288. getDETACHIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57289. end;
  57290. procedure TUSB_U1IR.setURSTIF; inline;
  57291. begin
  57292. pTDefRegMap(@Self)^.&set := $00000001;
  57293. end;
  57294. procedure TUSB_U1IR.clearURSTIF; inline;
  57295. begin
  57296. pTDefRegMap(@Self)^.clr := $00000001;
  57297. end;
  57298. procedure TUSB_U1IR.setURSTIF(thebits : TBits_1); inline;
  57299. begin
  57300. if thebits = 0 then
  57301. pTDefRegMap(@Self)^.clr := $00000001
  57302. else
  57303. pTDefRegMap(@Self)^.&set := $00000001;
  57304. end;
  57305. function TUSB_U1IR.getURSTIF : TBits_1; inline;
  57306. begin
  57307. getURSTIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57308. end;
  57309. procedure TUSB_U1IE.setURSTIE_DETACHIE; inline;
  57310. begin
  57311. pTDefRegMap(@Self)^.&set := $00000001;
  57312. end;
  57313. procedure TUSB_U1IE.clearURSTIE_DETACHIE; inline;
  57314. begin
  57315. pTDefRegMap(@Self)^.clr := $00000001;
  57316. end;
  57317. procedure TUSB_U1IE.setURSTIE_DETACHIE(thebits : TBits_1); inline;
  57318. begin
  57319. if thebits = 0 then
  57320. pTDefRegMap(@Self)^.clr := $00000001
  57321. else
  57322. pTDefRegMap(@Self)^.&set := $00000001;
  57323. end;
  57324. function TUSB_U1IE.getURSTIE_DETACHIE : TBits_1; inline;
  57325. begin
  57326. getURSTIE_DETACHIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57327. end;
  57328. procedure TUSB_U1IE.setUERRIE; inline;
  57329. begin
  57330. pTDefRegMap(@Self)^.&set := $00000002;
  57331. end;
  57332. procedure TUSB_U1IE.clearUERRIE; inline;
  57333. begin
  57334. pTDefRegMap(@Self)^.clr := $00000002;
  57335. end;
  57336. procedure TUSB_U1IE.setUERRIE(thebits : TBits_1); inline;
  57337. begin
  57338. if thebits = 0 then
  57339. pTDefRegMap(@Self)^.clr := $00000002
  57340. else
  57341. pTDefRegMap(@Self)^.&set := $00000002;
  57342. end;
  57343. function TUSB_U1IE.getUERRIE : TBits_1; inline;
  57344. begin
  57345. getUERRIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57346. end;
  57347. procedure TUSB_U1IE.setSOFIE; inline;
  57348. begin
  57349. pTDefRegMap(@Self)^.&set := $00000004;
  57350. end;
  57351. procedure TUSB_U1IE.clearSOFIE; inline;
  57352. begin
  57353. pTDefRegMap(@Self)^.clr := $00000004;
  57354. end;
  57355. procedure TUSB_U1IE.setSOFIE(thebits : TBits_1); inline;
  57356. begin
  57357. if thebits = 0 then
  57358. pTDefRegMap(@Self)^.clr := $00000004
  57359. else
  57360. pTDefRegMap(@Self)^.&set := $00000004;
  57361. end;
  57362. function TUSB_U1IE.getSOFIE : TBits_1; inline;
  57363. begin
  57364. getSOFIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57365. end;
  57366. procedure TUSB_U1IE.setTRNIE; inline;
  57367. begin
  57368. pTDefRegMap(@Self)^.&set := $00000008;
  57369. end;
  57370. procedure TUSB_U1IE.clearTRNIE; inline;
  57371. begin
  57372. pTDefRegMap(@Self)^.clr := $00000008;
  57373. end;
  57374. procedure TUSB_U1IE.setTRNIE(thebits : TBits_1); inline;
  57375. begin
  57376. if thebits = 0 then
  57377. pTDefRegMap(@Self)^.clr := $00000008
  57378. else
  57379. pTDefRegMap(@Self)^.&set := $00000008;
  57380. end;
  57381. function TUSB_U1IE.getTRNIE : TBits_1; inline;
  57382. begin
  57383. getTRNIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57384. end;
  57385. procedure TUSB_U1IE.setIDLEIE; inline;
  57386. begin
  57387. pTDefRegMap(@Self)^.&set := $00000010;
  57388. end;
  57389. procedure TUSB_U1IE.clearIDLEIE; inline;
  57390. begin
  57391. pTDefRegMap(@Self)^.clr := $00000010;
  57392. end;
  57393. procedure TUSB_U1IE.setIDLEIE(thebits : TBits_1); inline;
  57394. begin
  57395. if thebits = 0 then
  57396. pTDefRegMap(@Self)^.clr := $00000010
  57397. else
  57398. pTDefRegMap(@Self)^.&set := $00000010;
  57399. end;
  57400. function TUSB_U1IE.getIDLEIE : TBits_1; inline;
  57401. begin
  57402. getIDLEIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57403. end;
  57404. procedure TUSB_U1IE.setRESUMEIE; inline;
  57405. begin
  57406. pTDefRegMap(@Self)^.&set := $00000020;
  57407. end;
  57408. procedure TUSB_U1IE.clearRESUMEIE; inline;
  57409. begin
  57410. pTDefRegMap(@Self)^.clr := $00000020;
  57411. end;
  57412. procedure TUSB_U1IE.setRESUMEIE(thebits : TBits_1); inline;
  57413. begin
  57414. if thebits = 0 then
  57415. pTDefRegMap(@Self)^.clr := $00000020
  57416. else
  57417. pTDefRegMap(@Self)^.&set := $00000020;
  57418. end;
  57419. function TUSB_U1IE.getRESUMEIE : TBits_1; inline;
  57420. begin
  57421. getRESUMEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57422. end;
  57423. procedure TUSB_U1IE.setATTACHIE; inline;
  57424. begin
  57425. pTDefRegMap(@Self)^.&set := $00000040;
  57426. end;
  57427. procedure TUSB_U1IE.clearATTACHIE; inline;
  57428. begin
  57429. pTDefRegMap(@Self)^.clr := $00000040;
  57430. end;
  57431. procedure TUSB_U1IE.setATTACHIE(thebits : TBits_1); inline;
  57432. begin
  57433. if thebits = 0 then
  57434. pTDefRegMap(@Self)^.clr := $00000040
  57435. else
  57436. pTDefRegMap(@Self)^.&set := $00000040;
  57437. end;
  57438. function TUSB_U1IE.getATTACHIE : TBits_1; inline;
  57439. begin
  57440. getATTACHIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57441. end;
  57442. procedure TUSB_U1IE.setSTALLIE; inline;
  57443. begin
  57444. pTDefRegMap(@Self)^.&set := $00000080;
  57445. end;
  57446. procedure TUSB_U1IE.clearSTALLIE; inline;
  57447. begin
  57448. pTDefRegMap(@Self)^.clr := $00000080;
  57449. end;
  57450. procedure TUSB_U1IE.setSTALLIE(thebits : TBits_1); inline;
  57451. begin
  57452. if thebits = 0 then
  57453. pTDefRegMap(@Self)^.clr := $00000080
  57454. else
  57455. pTDefRegMap(@Self)^.&set := $00000080;
  57456. end;
  57457. function TUSB_U1IE.getSTALLIE : TBits_1; inline;
  57458. begin
  57459. getSTALLIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57460. end;
  57461. procedure TUSB_U1IE.setDETACHIE; inline;
  57462. begin
  57463. pTDefRegMap(@Self)^.&set := $00000001;
  57464. end;
  57465. procedure TUSB_U1IE.clearDETACHIE; inline;
  57466. begin
  57467. pTDefRegMap(@Self)^.clr := $00000001;
  57468. end;
  57469. procedure TUSB_U1IE.setDETACHIE(thebits : TBits_1); inline;
  57470. begin
  57471. if thebits = 0 then
  57472. pTDefRegMap(@Self)^.clr := $00000001
  57473. else
  57474. pTDefRegMap(@Self)^.&set := $00000001;
  57475. end;
  57476. function TUSB_U1IE.getDETACHIE : TBits_1; inline;
  57477. begin
  57478. getDETACHIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57479. end;
  57480. procedure TUSB_U1IE.setURSTIE; inline;
  57481. begin
  57482. pTDefRegMap(@Self)^.&set := $00000001;
  57483. end;
  57484. procedure TUSB_U1IE.clearURSTIE; inline;
  57485. begin
  57486. pTDefRegMap(@Self)^.clr := $00000001;
  57487. end;
  57488. procedure TUSB_U1IE.setURSTIE(thebits : TBits_1); inline;
  57489. begin
  57490. if thebits = 0 then
  57491. pTDefRegMap(@Self)^.clr := $00000001
  57492. else
  57493. pTDefRegMap(@Self)^.&set := $00000001;
  57494. end;
  57495. function TUSB_U1IE.getURSTIE : TBits_1; inline;
  57496. begin
  57497. getURSTIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57498. end;
  57499. procedure TUSB_U1EIR.setPIDEF; inline;
  57500. begin
  57501. pTDefRegMap(@Self)^.&set := $00000001;
  57502. end;
  57503. procedure TUSB_U1EIR.clearPIDEF; inline;
  57504. begin
  57505. pTDefRegMap(@Self)^.clr := $00000001;
  57506. end;
  57507. procedure TUSB_U1EIR.setPIDEF(thebits : TBits_1); inline;
  57508. begin
  57509. if thebits = 0 then
  57510. pTDefRegMap(@Self)^.clr := $00000001
  57511. else
  57512. pTDefRegMap(@Self)^.&set := $00000001;
  57513. end;
  57514. function TUSB_U1EIR.getPIDEF : TBits_1; inline;
  57515. begin
  57516. getPIDEF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57517. end;
  57518. procedure TUSB_U1EIR.setCRC5EF_EOFEF; inline;
  57519. begin
  57520. pTDefRegMap(@Self)^.&set := $00000002;
  57521. end;
  57522. procedure TUSB_U1EIR.clearCRC5EF_EOFEF; inline;
  57523. begin
  57524. pTDefRegMap(@Self)^.clr := $00000002;
  57525. end;
  57526. procedure TUSB_U1EIR.setCRC5EF_EOFEF(thebits : TBits_1); inline;
  57527. begin
  57528. if thebits = 0 then
  57529. pTDefRegMap(@Self)^.clr := $00000002
  57530. else
  57531. pTDefRegMap(@Self)^.&set := $00000002;
  57532. end;
  57533. function TUSB_U1EIR.getCRC5EF_EOFEF : TBits_1; inline;
  57534. begin
  57535. getCRC5EF_EOFEF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57536. end;
  57537. procedure TUSB_U1EIR.setCRC16EF; inline;
  57538. begin
  57539. pTDefRegMap(@Self)^.&set := $00000004;
  57540. end;
  57541. procedure TUSB_U1EIR.clearCRC16EF; inline;
  57542. begin
  57543. pTDefRegMap(@Self)^.clr := $00000004;
  57544. end;
  57545. procedure TUSB_U1EIR.setCRC16EF(thebits : TBits_1); inline;
  57546. begin
  57547. if thebits = 0 then
  57548. pTDefRegMap(@Self)^.clr := $00000004
  57549. else
  57550. pTDefRegMap(@Self)^.&set := $00000004;
  57551. end;
  57552. function TUSB_U1EIR.getCRC16EF : TBits_1; inline;
  57553. begin
  57554. getCRC16EF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57555. end;
  57556. procedure TUSB_U1EIR.setDFN8EF; inline;
  57557. begin
  57558. pTDefRegMap(@Self)^.&set := $00000008;
  57559. end;
  57560. procedure TUSB_U1EIR.clearDFN8EF; inline;
  57561. begin
  57562. pTDefRegMap(@Self)^.clr := $00000008;
  57563. end;
  57564. procedure TUSB_U1EIR.setDFN8EF(thebits : TBits_1); inline;
  57565. begin
  57566. if thebits = 0 then
  57567. pTDefRegMap(@Self)^.clr := $00000008
  57568. else
  57569. pTDefRegMap(@Self)^.&set := $00000008;
  57570. end;
  57571. function TUSB_U1EIR.getDFN8EF : TBits_1; inline;
  57572. begin
  57573. getDFN8EF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57574. end;
  57575. procedure TUSB_U1EIR.setBTOEF; inline;
  57576. begin
  57577. pTDefRegMap(@Self)^.&set := $00000010;
  57578. end;
  57579. procedure TUSB_U1EIR.clearBTOEF; inline;
  57580. begin
  57581. pTDefRegMap(@Self)^.clr := $00000010;
  57582. end;
  57583. procedure TUSB_U1EIR.setBTOEF(thebits : TBits_1); inline;
  57584. begin
  57585. if thebits = 0 then
  57586. pTDefRegMap(@Self)^.clr := $00000010
  57587. else
  57588. pTDefRegMap(@Self)^.&set := $00000010;
  57589. end;
  57590. function TUSB_U1EIR.getBTOEF : TBits_1; inline;
  57591. begin
  57592. getBTOEF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57593. end;
  57594. procedure TUSB_U1EIR.setDMAEF; inline;
  57595. begin
  57596. pTDefRegMap(@Self)^.&set := $00000020;
  57597. end;
  57598. procedure TUSB_U1EIR.clearDMAEF; inline;
  57599. begin
  57600. pTDefRegMap(@Self)^.clr := $00000020;
  57601. end;
  57602. procedure TUSB_U1EIR.setDMAEF(thebits : TBits_1); inline;
  57603. begin
  57604. if thebits = 0 then
  57605. pTDefRegMap(@Self)^.clr := $00000020
  57606. else
  57607. pTDefRegMap(@Self)^.&set := $00000020;
  57608. end;
  57609. function TUSB_U1EIR.getDMAEF : TBits_1; inline;
  57610. begin
  57611. getDMAEF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57612. end;
  57613. procedure TUSB_U1EIR.setBMXEF; inline;
  57614. begin
  57615. pTDefRegMap(@Self)^.&set := $00000040;
  57616. end;
  57617. procedure TUSB_U1EIR.clearBMXEF; inline;
  57618. begin
  57619. pTDefRegMap(@Self)^.clr := $00000040;
  57620. end;
  57621. procedure TUSB_U1EIR.setBMXEF(thebits : TBits_1); inline;
  57622. begin
  57623. if thebits = 0 then
  57624. pTDefRegMap(@Self)^.clr := $00000040
  57625. else
  57626. pTDefRegMap(@Self)^.&set := $00000040;
  57627. end;
  57628. function TUSB_U1EIR.getBMXEF : TBits_1; inline;
  57629. begin
  57630. getBMXEF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57631. end;
  57632. procedure TUSB_U1EIR.setBTSEF; inline;
  57633. begin
  57634. pTDefRegMap(@Self)^.&set := $00000080;
  57635. end;
  57636. procedure TUSB_U1EIR.clearBTSEF; inline;
  57637. begin
  57638. pTDefRegMap(@Self)^.clr := $00000080;
  57639. end;
  57640. procedure TUSB_U1EIR.setBTSEF(thebits : TBits_1); inline;
  57641. begin
  57642. if thebits = 0 then
  57643. pTDefRegMap(@Self)^.clr := $00000080
  57644. else
  57645. pTDefRegMap(@Self)^.&set := $00000080;
  57646. end;
  57647. function TUSB_U1EIR.getBTSEF : TBits_1; inline;
  57648. begin
  57649. getBTSEF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57650. end;
  57651. procedure TUSB_U1EIR.setCRC5EF; inline;
  57652. begin
  57653. pTDefRegMap(@Self)^.&set := $00000002;
  57654. end;
  57655. procedure TUSB_U1EIR.clearCRC5EF; inline;
  57656. begin
  57657. pTDefRegMap(@Self)^.clr := $00000002;
  57658. end;
  57659. procedure TUSB_U1EIR.setCRC5EF(thebits : TBits_1); inline;
  57660. begin
  57661. if thebits = 0 then
  57662. pTDefRegMap(@Self)^.clr := $00000002
  57663. else
  57664. pTDefRegMap(@Self)^.&set := $00000002;
  57665. end;
  57666. function TUSB_U1EIR.getCRC5EF : TBits_1; inline;
  57667. begin
  57668. getCRC5EF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57669. end;
  57670. procedure TUSB_U1EIR.setEOFEF; inline;
  57671. begin
  57672. pTDefRegMap(@Self)^.&set := $00000002;
  57673. end;
  57674. procedure TUSB_U1EIR.clearEOFEF; inline;
  57675. begin
  57676. pTDefRegMap(@Self)^.clr := $00000002;
  57677. end;
  57678. procedure TUSB_U1EIR.setEOFEF(thebits : TBits_1); inline;
  57679. begin
  57680. if thebits = 0 then
  57681. pTDefRegMap(@Self)^.clr := $00000002
  57682. else
  57683. pTDefRegMap(@Self)^.&set := $00000002;
  57684. end;
  57685. function TUSB_U1EIR.getEOFEF : TBits_1; inline;
  57686. begin
  57687. getEOFEF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57688. end;
  57689. procedure TUSB_U1EIE.setPIDEE; inline;
  57690. begin
  57691. pTDefRegMap(@Self)^.&set := $00000001;
  57692. end;
  57693. procedure TUSB_U1EIE.clearPIDEE; inline;
  57694. begin
  57695. pTDefRegMap(@Self)^.clr := $00000001;
  57696. end;
  57697. procedure TUSB_U1EIE.setPIDEE(thebits : TBits_1); inline;
  57698. begin
  57699. if thebits = 0 then
  57700. pTDefRegMap(@Self)^.clr := $00000001
  57701. else
  57702. pTDefRegMap(@Self)^.&set := $00000001;
  57703. end;
  57704. function TUSB_U1EIE.getPIDEE : TBits_1; inline;
  57705. begin
  57706. getPIDEE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57707. end;
  57708. procedure TUSB_U1EIE.setCRC5EE_EOFEE; inline;
  57709. begin
  57710. pTDefRegMap(@Self)^.&set := $00000002;
  57711. end;
  57712. procedure TUSB_U1EIE.clearCRC5EE_EOFEE; inline;
  57713. begin
  57714. pTDefRegMap(@Self)^.clr := $00000002;
  57715. end;
  57716. procedure TUSB_U1EIE.setCRC5EE_EOFEE(thebits : TBits_1); inline;
  57717. begin
  57718. if thebits = 0 then
  57719. pTDefRegMap(@Self)^.clr := $00000002
  57720. else
  57721. pTDefRegMap(@Self)^.&set := $00000002;
  57722. end;
  57723. function TUSB_U1EIE.getCRC5EE_EOFEE : TBits_1; inline;
  57724. begin
  57725. getCRC5EE_EOFEE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57726. end;
  57727. procedure TUSB_U1EIE.setCRC16EE; inline;
  57728. begin
  57729. pTDefRegMap(@Self)^.&set := $00000004;
  57730. end;
  57731. procedure TUSB_U1EIE.clearCRC16EE; inline;
  57732. begin
  57733. pTDefRegMap(@Self)^.clr := $00000004;
  57734. end;
  57735. procedure TUSB_U1EIE.setCRC16EE(thebits : TBits_1); inline;
  57736. begin
  57737. if thebits = 0 then
  57738. pTDefRegMap(@Self)^.clr := $00000004
  57739. else
  57740. pTDefRegMap(@Self)^.&set := $00000004;
  57741. end;
  57742. function TUSB_U1EIE.getCRC16EE : TBits_1; inline;
  57743. begin
  57744. getCRC16EE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57745. end;
  57746. procedure TUSB_U1EIE.setDFN8EE; inline;
  57747. begin
  57748. pTDefRegMap(@Self)^.&set := $00000008;
  57749. end;
  57750. procedure TUSB_U1EIE.clearDFN8EE; inline;
  57751. begin
  57752. pTDefRegMap(@Self)^.clr := $00000008;
  57753. end;
  57754. procedure TUSB_U1EIE.setDFN8EE(thebits : TBits_1); inline;
  57755. begin
  57756. if thebits = 0 then
  57757. pTDefRegMap(@Self)^.clr := $00000008
  57758. else
  57759. pTDefRegMap(@Self)^.&set := $00000008;
  57760. end;
  57761. function TUSB_U1EIE.getDFN8EE : TBits_1; inline;
  57762. begin
  57763. getDFN8EE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57764. end;
  57765. procedure TUSB_U1EIE.setBTOEE; inline;
  57766. begin
  57767. pTDefRegMap(@Self)^.&set := $00000010;
  57768. end;
  57769. procedure TUSB_U1EIE.clearBTOEE; inline;
  57770. begin
  57771. pTDefRegMap(@Self)^.clr := $00000010;
  57772. end;
  57773. procedure TUSB_U1EIE.setBTOEE(thebits : TBits_1); inline;
  57774. begin
  57775. if thebits = 0 then
  57776. pTDefRegMap(@Self)^.clr := $00000010
  57777. else
  57778. pTDefRegMap(@Self)^.&set := $00000010;
  57779. end;
  57780. function TUSB_U1EIE.getBTOEE : TBits_1; inline;
  57781. begin
  57782. getBTOEE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57783. end;
  57784. procedure TUSB_U1EIE.setDMAEE; inline;
  57785. begin
  57786. pTDefRegMap(@Self)^.&set := $00000020;
  57787. end;
  57788. procedure TUSB_U1EIE.clearDMAEE; inline;
  57789. begin
  57790. pTDefRegMap(@Self)^.clr := $00000020;
  57791. end;
  57792. procedure TUSB_U1EIE.setDMAEE(thebits : TBits_1); inline;
  57793. begin
  57794. if thebits = 0 then
  57795. pTDefRegMap(@Self)^.clr := $00000020
  57796. else
  57797. pTDefRegMap(@Self)^.&set := $00000020;
  57798. end;
  57799. function TUSB_U1EIE.getDMAEE : TBits_1; inline;
  57800. begin
  57801. getDMAEE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57802. end;
  57803. procedure TUSB_U1EIE.setBMXEE; inline;
  57804. begin
  57805. pTDefRegMap(@Self)^.&set := $00000040;
  57806. end;
  57807. procedure TUSB_U1EIE.clearBMXEE; inline;
  57808. begin
  57809. pTDefRegMap(@Self)^.clr := $00000040;
  57810. end;
  57811. procedure TUSB_U1EIE.setBMXEE(thebits : TBits_1); inline;
  57812. begin
  57813. if thebits = 0 then
  57814. pTDefRegMap(@Self)^.clr := $00000040
  57815. else
  57816. pTDefRegMap(@Self)^.&set := $00000040;
  57817. end;
  57818. function TUSB_U1EIE.getBMXEE : TBits_1; inline;
  57819. begin
  57820. getBMXEE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57821. end;
  57822. procedure TUSB_U1EIE.setBTSEE; inline;
  57823. begin
  57824. pTDefRegMap(@Self)^.&set := $00000080;
  57825. end;
  57826. procedure TUSB_U1EIE.clearBTSEE; inline;
  57827. begin
  57828. pTDefRegMap(@Self)^.clr := $00000080;
  57829. end;
  57830. procedure TUSB_U1EIE.setBTSEE(thebits : TBits_1); inline;
  57831. begin
  57832. if thebits = 0 then
  57833. pTDefRegMap(@Self)^.clr := $00000080
  57834. else
  57835. pTDefRegMap(@Self)^.&set := $00000080;
  57836. end;
  57837. function TUSB_U1EIE.getBTSEE : TBits_1; inline;
  57838. begin
  57839. getBTSEE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57840. end;
  57841. procedure TUSB_U1EIE.setCRC5EE; inline;
  57842. begin
  57843. pTDefRegMap(@Self)^.&set := $00000002;
  57844. end;
  57845. procedure TUSB_U1EIE.clearCRC5EE; inline;
  57846. begin
  57847. pTDefRegMap(@Self)^.clr := $00000002;
  57848. end;
  57849. procedure TUSB_U1EIE.setCRC5EE(thebits : TBits_1); inline;
  57850. begin
  57851. if thebits = 0 then
  57852. pTDefRegMap(@Self)^.clr := $00000002
  57853. else
  57854. pTDefRegMap(@Self)^.&set := $00000002;
  57855. end;
  57856. function TUSB_U1EIE.getCRC5EE : TBits_1; inline;
  57857. begin
  57858. getCRC5EE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57859. end;
  57860. procedure TUSB_U1EIE.setEOFEE; inline;
  57861. begin
  57862. pTDefRegMap(@Self)^.&set := $00000002;
  57863. end;
  57864. procedure TUSB_U1EIE.clearEOFEE; inline;
  57865. begin
  57866. pTDefRegMap(@Self)^.clr := $00000002;
  57867. end;
  57868. procedure TUSB_U1EIE.setEOFEE(thebits : TBits_1); inline;
  57869. begin
  57870. if thebits = 0 then
  57871. pTDefRegMap(@Self)^.clr := $00000002
  57872. else
  57873. pTDefRegMap(@Self)^.&set := $00000002;
  57874. end;
  57875. function TUSB_U1EIE.getEOFEE : TBits_1; inline;
  57876. begin
  57877. getEOFEE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57878. end;
  57879. procedure TUSB_U1STAT.setPPBI; inline;
  57880. begin
  57881. pTDefRegMap(@Self)^.&set := $00000004;
  57882. end;
  57883. procedure TUSB_U1STAT.clearPPBI; inline;
  57884. begin
  57885. pTDefRegMap(@Self)^.clr := $00000004;
  57886. end;
  57887. procedure TUSB_U1STAT.setPPBI(thebits : TBits_1); inline;
  57888. begin
  57889. if thebits = 0 then
  57890. pTDefRegMap(@Self)^.clr := $00000004
  57891. else
  57892. pTDefRegMap(@Self)^.&set := $00000004;
  57893. end;
  57894. function TUSB_U1STAT.getPPBI : TBits_1; inline;
  57895. begin
  57896. getPPBI := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57897. end;
  57898. procedure TUSB_U1STAT.setDIR; inline;
  57899. begin
  57900. pTDefRegMap(@Self)^.&set := $00000008;
  57901. end;
  57902. procedure TUSB_U1STAT.clearDIR; inline;
  57903. begin
  57904. pTDefRegMap(@Self)^.clr := $00000008;
  57905. end;
  57906. procedure TUSB_U1STAT.setDIR(thebits : TBits_1); inline;
  57907. begin
  57908. if thebits = 0 then
  57909. pTDefRegMap(@Self)^.clr := $00000008
  57910. else
  57911. pTDefRegMap(@Self)^.&set := $00000008;
  57912. end;
  57913. function TUSB_U1STAT.getDIR : TBits_1; inline;
  57914. begin
  57915. getDIR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57916. end;
  57917. procedure TUSB_U1STAT.setENDPT(thebits : TBits_4); inline;
  57918. begin
  57919. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF0F or ( thebits shl 4 );
  57920. end;
  57921. function TUSB_U1STAT.getENDPT : TBits_4; inline;
  57922. begin
  57923. getENDPT := (pTDefRegMap(@Self)^.val and $000000F0) shr 4;
  57924. end;
  57925. procedure TUSB_U1STAT.setENDPT0; inline;
  57926. begin
  57927. pTDefRegMap(@Self)^.&set := $00000010;
  57928. end;
  57929. procedure TUSB_U1STAT.clearENDPT0; inline;
  57930. begin
  57931. pTDefRegMap(@Self)^.clr := $00000010;
  57932. end;
  57933. procedure TUSB_U1STAT.setENDPT0(thebits : TBits_1); inline;
  57934. begin
  57935. if thebits = 0 then
  57936. pTDefRegMap(@Self)^.clr := $00000010
  57937. else
  57938. pTDefRegMap(@Self)^.&set := $00000010;
  57939. end;
  57940. function TUSB_U1STAT.getENDPT0 : TBits_1; inline;
  57941. begin
  57942. getENDPT0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57943. end;
  57944. procedure TUSB_U1STAT.setENDPT1; inline;
  57945. begin
  57946. pTDefRegMap(@Self)^.&set := $00000020;
  57947. end;
  57948. procedure TUSB_U1STAT.clearENDPT1; inline;
  57949. begin
  57950. pTDefRegMap(@Self)^.clr := $00000020;
  57951. end;
  57952. procedure TUSB_U1STAT.setENDPT1(thebits : TBits_1); inline;
  57953. begin
  57954. if thebits = 0 then
  57955. pTDefRegMap(@Self)^.clr := $00000020
  57956. else
  57957. pTDefRegMap(@Self)^.&set := $00000020;
  57958. end;
  57959. function TUSB_U1STAT.getENDPT1 : TBits_1; inline;
  57960. begin
  57961. getENDPT1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57962. end;
  57963. procedure TUSB_U1STAT.setENDPT2; inline;
  57964. begin
  57965. pTDefRegMap(@Self)^.&set := $00000040;
  57966. end;
  57967. procedure TUSB_U1STAT.clearENDPT2; inline;
  57968. begin
  57969. pTDefRegMap(@Self)^.clr := $00000040;
  57970. end;
  57971. procedure TUSB_U1STAT.setENDPT2(thebits : TBits_1); inline;
  57972. begin
  57973. if thebits = 0 then
  57974. pTDefRegMap(@Self)^.clr := $00000040
  57975. else
  57976. pTDefRegMap(@Self)^.&set := $00000040;
  57977. end;
  57978. function TUSB_U1STAT.getENDPT2 : TBits_1; inline;
  57979. begin
  57980. getENDPT2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57981. end;
  57982. procedure TUSB_U1STAT.setENDPT3; inline;
  57983. begin
  57984. pTDefRegMap(@Self)^.&set := $00000080;
  57985. end;
  57986. procedure TUSB_U1STAT.clearENDPT3; inline;
  57987. begin
  57988. pTDefRegMap(@Self)^.clr := $00000080;
  57989. end;
  57990. procedure TUSB_U1STAT.setENDPT3(thebits : TBits_1); inline;
  57991. begin
  57992. if thebits = 0 then
  57993. pTDefRegMap(@Self)^.clr := $00000080
  57994. else
  57995. pTDefRegMap(@Self)^.&set := $00000080;
  57996. end;
  57997. function TUSB_U1STAT.getENDPT3 : TBits_1; inline;
  57998. begin
  57999. getENDPT3 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58000. end;
  58001. procedure TUSB_U1CON.setUSBEN_SOFEN; inline;
  58002. begin
  58003. pTDefRegMap(@Self)^.&set := $00000001;
  58004. end;
  58005. procedure TUSB_U1CON.clearUSBEN_SOFEN; inline;
  58006. begin
  58007. pTDefRegMap(@Self)^.clr := $00000001;
  58008. end;
  58009. procedure TUSB_U1CON.setUSBEN_SOFEN(thebits : TBits_1); inline;
  58010. begin
  58011. if thebits = 0 then
  58012. pTDefRegMap(@Self)^.clr := $00000001
  58013. else
  58014. pTDefRegMap(@Self)^.&set := $00000001;
  58015. end;
  58016. function TUSB_U1CON.getUSBEN_SOFEN : TBits_1; inline;
  58017. begin
  58018. getUSBEN_SOFEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58019. end;
  58020. procedure TUSB_U1CON.setPPBRST; inline;
  58021. begin
  58022. pTDefRegMap(@Self)^.&set := $00000002;
  58023. end;
  58024. procedure TUSB_U1CON.clearPPBRST; inline;
  58025. begin
  58026. pTDefRegMap(@Self)^.clr := $00000002;
  58027. end;
  58028. procedure TUSB_U1CON.setPPBRST(thebits : TBits_1); inline;
  58029. begin
  58030. if thebits = 0 then
  58031. pTDefRegMap(@Self)^.clr := $00000002
  58032. else
  58033. pTDefRegMap(@Self)^.&set := $00000002;
  58034. end;
  58035. function TUSB_U1CON.getPPBRST : TBits_1; inline;
  58036. begin
  58037. getPPBRST := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58038. end;
  58039. procedure TUSB_U1CON.setRESUME; inline;
  58040. begin
  58041. pTDefRegMap(@Self)^.&set := $00000004;
  58042. end;
  58043. procedure TUSB_U1CON.clearRESUME; inline;
  58044. begin
  58045. pTDefRegMap(@Self)^.clr := $00000004;
  58046. end;
  58047. procedure TUSB_U1CON.setRESUME(thebits : TBits_1); inline;
  58048. begin
  58049. if thebits = 0 then
  58050. pTDefRegMap(@Self)^.clr := $00000004
  58051. else
  58052. pTDefRegMap(@Self)^.&set := $00000004;
  58053. end;
  58054. function TUSB_U1CON.getRESUME : TBits_1; inline;
  58055. begin
  58056. getRESUME := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58057. end;
  58058. procedure TUSB_U1CON.setHOSTEN; inline;
  58059. begin
  58060. pTDefRegMap(@Self)^.&set := $00000008;
  58061. end;
  58062. procedure TUSB_U1CON.clearHOSTEN; inline;
  58063. begin
  58064. pTDefRegMap(@Self)^.clr := $00000008;
  58065. end;
  58066. procedure TUSB_U1CON.setHOSTEN(thebits : TBits_1); inline;
  58067. begin
  58068. if thebits = 0 then
  58069. pTDefRegMap(@Self)^.clr := $00000008
  58070. else
  58071. pTDefRegMap(@Self)^.&set := $00000008;
  58072. end;
  58073. function TUSB_U1CON.getHOSTEN : TBits_1; inline;
  58074. begin
  58075. getHOSTEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58076. end;
  58077. procedure TUSB_U1CON.setUSBRST; inline;
  58078. begin
  58079. pTDefRegMap(@Self)^.&set := $00000010;
  58080. end;
  58081. procedure TUSB_U1CON.clearUSBRST; inline;
  58082. begin
  58083. pTDefRegMap(@Self)^.clr := $00000010;
  58084. end;
  58085. procedure TUSB_U1CON.setUSBRST(thebits : TBits_1); inline;
  58086. begin
  58087. if thebits = 0 then
  58088. pTDefRegMap(@Self)^.clr := $00000010
  58089. else
  58090. pTDefRegMap(@Self)^.&set := $00000010;
  58091. end;
  58092. function TUSB_U1CON.getUSBRST : TBits_1; inline;
  58093. begin
  58094. getUSBRST := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58095. end;
  58096. procedure TUSB_U1CON.setPKTDIS_TOKBUSY; inline;
  58097. begin
  58098. pTDefRegMap(@Self)^.&set := $00000020;
  58099. end;
  58100. procedure TUSB_U1CON.clearPKTDIS_TOKBUSY; inline;
  58101. begin
  58102. pTDefRegMap(@Self)^.clr := $00000020;
  58103. end;
  58104. procedure TUSB_U1CON.setPKTDIS_TOKBUSY(thebits : TBits_1); inline;
  58105. begin
  58106. if thebits = 0 then
  58107. pTDefRegMap(@Self)^.clr := $00000020
  58108. else
  58109. pTDefRegMap(@Self)^.&set := $00000020;
  58110. end;
  58111. function TUSB_U1CON.getPKTDIS_TOKBUSY : TBits_1; inline;
  58112. begin
  58113. getPKTDIS_TOKBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58114. end;
  58115. procedure TUSB_U1CON.setSE0; inline;
  58116. begin
  58117. pTDefRegMap(@Self)^.&set := $00000040;
  58118. end;
  58119. procedure TUSB_U1CON.clearSE0; inline;
  58120. begin
  58121. pTDefRegMap(@Self)^.clr := $00000040;
  58122. end;
  58123. procedure TUSB_U1CON.setSE0(thebits : TBits_1); inline;
  58124. begin
  58125. if thebits = 0 then
  58126. pTDefRegMap(@Self)^.clr := $00000040
  58127. else
  58128. pTDefRegMap(@Self)^.&set := $00000040;
  58129. end;
  58130. function TUSB_U1CON.getSE0 : TBits_1; inline;
  58131. begin
  58132. getSE0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58133. end;
  58134. procedure TUSB_U1CON.setJSTATE; inline;
  58135. begin
  58136. pTDefRegMap(@Self)^.&set := $00000080;
  58137. end;
  58138. procedure TUSB_U1CON.clearJSTATE; inline;
  58139. begin
  58140. pTDefRegMap(@Self)^.clr := $00000080;
  58141. end;
  58142. procedure TUSB_U1CON.setJSTATE(thebits : TBits_1); inline;
  58143. begin
  58144. if thebits = 0 then
  58145. pTDefRegMap(@Self)^.clr := $00000080
  58146. else
  58147. pTDefRegMap(@Self)^.&set := $00000080;
  58148. end;
  58149. function TUSB_U1CON.getJSTATE : TBits_1; inline;
  58150. begin
  58151. getJSTATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58152. end;
  58153. procedure TUSB_U1CON.setUSBEN; inline;
  58154. begin
  58155. pTDefRegMap(@Self)^.&set := $00000001;
  58156. end;
  58157. procedure TUSB_U1CON.clearUSBEN; inline;
  58158. begin
  58159. pTDefRegMap(@Self)^.clr := $00000001;
  58160. end;
  58161. procedure TUSB_U1CON.setUSBEN(thebits : TBits_1); inline;
  58162. begin
  58163. if thebits = 0 then
  58164. pTDefRegMap(@Self)^.clr := $00000001
  58165. else
  58166. pTDefRegMap(@Self)^.&set := $00000001;
  58167. end;
  58168. function TUSB_U1CON.getUSBEN : TBits_1; inline;
  58169. begin
  58170. getUSBEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58171. end;
  58172. procedure TUSB_U1CON.setSOFEN; inline;
  58173. begin
  58174. pTDefRegMap(@Self)^.&set := $00000001;
  58175. end;
  58176. procedure TUSB_U1CON.clearSOFEN; inline;
  58177. begin
  58178. pTDefRegMap(@Self)^.clr := $00000001;
  58179. end;
  58180. procedure TUSB_U1CON.setSOFEN(thebits : TBits_1); inline;
  58181. begin
  58182. if thebits = 0 then
  58183. pTDefRegMap(@Self)^.clr := $00000001
  58184. else
  58185. pTDefRegMap(@Self)^.&set := $00000001;
  58186. end;
  58187. function TUSB_U1CON.getSOFEN : TBits_1; inline;
  58188. begin
  58189. getSOFEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58190. end;
  58191. procedure TUSB_U1CON.setPKTDIS; inline;
  58192. begin
  58193. pTDefRegMap(@Self)^.&set := $00000020;
  58194. end;
  58195. procedure TUSB_U1CON.clearPKTDIS; inline;
  58196. begin
  58197. pTDefRegMap(@Self)^.clr := $00000020;
  58198. end;
  58199. procedure TUSB_U1CON.setPKTDIS(thebits : TBits_1); inline;
  58200. begin
  58201. if thebits = 0 then
  58202. pTDefRegMap(@Self)^.clr := $00000020
  58203. else
  58204. pTDefRegMap(@Self)^.&set := $00000020;
  58205. end;
  58206. function TUSB_U1CON.getPKTDIS : TBits_1; inline;
  58207. begin
  58208. getPKTDIS := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58209. end;
  58210. procedure TUSB_U1CON.setTOKBUSY; inline;
  58211. begin
  58212. pTDefRegMap(@Self)^.&set := $00000020;
  58213. end;
  58214. procedure TUSB_U1CON.clearTOKBUSY; inline;
  58215. begin
  58216. pTDefRegMap(@Self)^.clr := $00000020;
  58217. end;
  58218. procedure TUSB_U1CON.setTOKBUSY(thebits : TBits_1); inline;
  58219. begin
  58220. if thebits = 0 then
  58221. pTDefRegMap(@Self)^.clr := $00000020
  58222. else
  58223. pTDefRegMap(@Self)^.&set := $00000020;
  58224. end;
  58225. function TUSB_U1CON.getTOKBUSY : TBits_1; inline;
  58226. begin
  58227. getTOKBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58228. end;
  58229. procedure TUSB_U1ADDR.setDEVADDR(thebits : TBits_7); inline;
  58230. begin
  58231. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  58232. end;
  58233. function TUSB_U1ADDR.getDEVADDR : TBits_7; inline;
  58234. begin
  58235. getDEVADDR := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  58236. end;
  58237. procedure TUSB_U1ADDR.setLSPDEN; inline;
  58238. begin
  58239. pTDefRegMap(@Self)^.&set := $00000080;
  58240. end;
  58241. procedure TUSB_U1ADDR.clearLSPDEN; inline;
  58242. begin
  58243. pTDefRegMap(@Self)^.clr := $00000080;
  58244. end;
  58245. procedure TUSB_U1ADDR.setLSPDEN(thebits : TBits_1); inline;
  58246. begin
  58247. if thebits = 0 then
  58248. pTDefRegMap(@Self)^.clr := $00000080
  58249. else
  58250. pTDefRegMap(@Self)^.&set := $00000080;
  58251. end;
  58252. function TUSB_U1ADDR.getLSPDEN : TBits_1; inline;
  58253. begin
  58254. getLSPDEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58255. end;
  58256. procedure TUSB_U1ADDR.setDEVADDR0; inline;
  58257. begin
  58258. pTDefRegMap(@Self)^.&set := $00000001;
  58259. end;
  58260. procedure TUSB_U1ADDR.clearDEVADDR0; inline;
  58261. begin
  58262. pTDefRegMap(@Self)^.clr := $00000001;
  58263. end;
  58264. procedure TUSB_U1ADDR.setDEVADDR0(thebits : TBits_1); inline;
  58265. begin
  58266. if thebits = 0 then
  58267. pTDefRegMap(@Self)^.clr := $00000001
  58268. else
  58269. pTDefRegMap(@Self)^.&set := $00000001;
  58270. end;
  58271. function TUSB_U1ADDR.getDEVADDR0 : TBits_1; inline;
  58272. begin
  58273. getDEVADDR0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58274. end;
  58275. procedure TUSB_U1ADDR.setDEVADDR1; inline;
  58276. begin
  58277. pTDefRegMap(@Self)^.&set := $00000002;
  58278. end;
  58279. procedure TUSB_U1ADDR.clearDEVADDR1; inline;
  58280. begin
  58281. pTDefRegMap(@Self)^.clr := $00000002;
  58282. end;
  58283. procedure TUSB_U1ADDR.setDEVADDR1(thebits : TBits_1); inline;
  58284. begin
  58285. if thebits = 0 then
  58286. pTDefRegMap(@Self)^.clr := $00000002
  58287. else
  58288. pTDefRegMap(@Self)^.&set := $00000002;
  58289. end;
  58290. function TUSB_U1ADDR.getDEVADDR1 : TBits_1; inline;
  58291. begin
  58292. getDEVADDR1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58293. end;
  58294. procedure TUSB_U1ADDR.setDEVADDR2; inline;
  58295. begin
  58296. pTDefRegMap(@Self)^.&set := $00000004;
  58297. end;
  58298. procedure TUSB_U1ADDR.clearDEVADDR2; inline;
  58299. begin
  58300. pTDefRegMap(@Self)^.clr := $00000004;
  58301. end;
  58302. procedure TUSB_U1ADDR.setDEVADDR2(thebits : TBits_1); inline;
  58303. begin
  58304. if thebits = 0 then
  58305. pTDefRegMap(@Self)^.clr := $00000004
  58306. else
  58307. pTDefRegMap(@Self)^.&set := $00000004;
  58308. end;
  58309. function TUSB_U1ADDR.getDEVADDR2 : TBits_1; inline;
  58310. begin
  58311. getDEVADDR2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58312. end;
  58313. procedure TUSB_U1ADDR.setDEVADDR3; inline;
  58314. begin
  58315. pTDefRegMap(@Self)^.&set := $00000008;
  58316. end;
  58317. procedure TUSB_U1ADDR.clearDEVADDR3; inline;
  58318. begin
  58319. pTDefRegMap(@Self)^.clr := $00000008;
  58320. end;
  58321. procedure TUSB_U1ADDR.setDEVADDR3(thebits : TBits_1); inline;
  58322. begin
  58323. if thebits = 0 then
  58324. pTDefRegMap(@Self)^.clr := $00000008
  58325. else
  58326. pTDefRegMap(@Self)^.&set := $00000008;
  58327. end;
  58328. function TUSB_U1ADDR.getDEVADDR3 : TBits_1; inline;
  58329. begin
  58330. getDEVADDR3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58331. end;
  58332. procedure TUSB_U1ADDR.setDEVADDR4; inline;
  58333. begin
  58334. pTDefRegMap(@Self)^.&set := $00000010;
  58335. end;
  58336. procedure TUSB_U1ADDR.clearDEVADDR4; inline;
  58337. begin
  58338. pTDefRegMap(@Self)^.clr := $00000010;
  58339. end;
  58340. procedure TUSB_U1ADDR.setDEVADDR4(thebits : TBits_1); inline;
  58341. begin
  58342. if thebits = 0 then
  58343. pTDefRegMap(@Self)^.clr := $00000010
  58344. else
  58345. pTDefRegMap(@Self)^.&set := $00000010;
  58346. end;
  58347. function TUSB_U1ADDR.getDEVADDR4 : TBits_1; inline;
  58348. begin
  58349. getDEVADDR4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58350. end;
  58351. procedure TUSB_U1ADDR.setDEVADDR5; inline;
  58352. begin
  58353. pTDefRegMap(@Self)^.&set := $00000020;
  58354. end;
  58355. procedure TUSB_U1ADDR.clearDEVADDR5; inline;
  58356. begin
  58357. pTDefRegMap(@Self)^.clr := $00000020;
  58358. end;
  58359. procedure TUSB_U1ADDR.setDEVADDR5(thebits : TBits_1); inline;
  58360. begin
  58361. if thebits = 0 then
  58362. pTDefRegMap(@Self)^.clr := $00000020
  58363. else
  58364. pTDefRegMap(@Self)^.&set := $00000020;
  58365. end;
  58366. function TUSB_U1ADDR.getDEVADDR5 : TBits_1; inline;
  58367. begin
  58368. getDEVADDR5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58369. end;
  58370. procedure TUSB_U1ADDR.setDEVADDR6; inline;
  58371. begin
  58372. pTDefRegMap(@Self)^.&set := $00000040;
  58373. end;
  58374. procedure TUSB_U1ADDR.clearDEVADDR6; inline;
  58375. begin
  58376. pTDefRegMap(@Self)^.clr := $00000040;
  58377. end;
  58378. procedure TUSB_U1ADDR.setDEVADDR6(thebits : TBits_1); inline;
  58379. begin
  58380. if thebits = 0 then
  58381. pTDefRegMap(@Self)^.clr := $00000040
  58382. else
  58383. pTDefRegMap(@Self)^.&set := $00000040;
  58384. end;
  58385. function TUSB_U1ADDR.getDEVADDR6 : TBits_1; inline;
  58386. begin
  58387. getDEVADDR6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58388. end;
  58389. procedure TUSB_U1FRML.setFRML(thebits : TBits_8); inline;
  58390. begin
  58391. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  58392. end;
  58393. function TUSB_U1FRML.getFRML : TBits_8; inline;
  58394. begin
  58395. getFRML := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  58396. end;
  58397. procedure TUSB_U1FRML.setFRM0; inline;
  58398. begin
  58399. pTDefRegMap(@Self)^.&set := $00000001;
  58400. end;
  58401. procedure TUSB_U1FRML.clearFRM0; inline;
  58402. begin
  58403. pTDefRegMap(@Self)^.clr := $00000001;
  58404. end;
  58405. procedure TUSB_U1FRML.setFRM0(thebits : TBits_1); inline;
  58406. begin
  58407. if thebits = 0 then
  58408. pTDefRegMap(@Self)^.clr := $00000001
  58409. else
  58410. pTDefRegMap(@Self)^.&set := $00000001;
  58411. end;
  58412. function TUSB_U1FRML.getFRM0 : TBits_1; inline;
  58413. begin
  58414. getFRM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58415. end;
  58416. procedure TUSB_U1FRML.setFRM1; inline;
  58417. begin
  58418. pTDefRegMap(@Self)^.&set := $00000002;
  58419. end;
  58420. procedure TUSB_U1FRML.clearFRM1; inline;
  58421. begin
  58422. pTDefRegMap(@Self)^.clr := $00000002;
  58423. end;
  58424. procedure TUSB_U1FRML.setFRM1(thebits : TBits_1); inline;
  58425. begin
  58426. if thebits = 0 then
  58427. pTDefRegMap(@Self)^.clr := $00000002
  58428. else
  58429. pTDefRegMap(@Self)^.&set := $00000002;
  58430. end;
  58431. function TUSB_U1FRML.getFRM1 : TBits_1; inline;
  58432. begin
  58433. getFRM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58434. end;
  58435. procedure TUSB_U1FRML.setFRM2; inline;
  58436. begin
  58437. pTDefRegMap(@Self)^.&set := $00000004;
  58438. end;
  58439. procedure TUSB_U1FRML.clearFRM2; inline;
  58440. begin
  58441. pTDefRegMap(@Self)^.clr := $00000004;
  58442. end;
  58443. procedure TUSB_U1FRML.setFRM2(thebits : TBits_1); inline;
  58444. begin
  58445. if thebits = 0 then
  58446. pTDefRegMap(@Self)^.clr := $00000004
  58447. else
  58448. pTDefRegMap(@Self)^.&set := $00000004;
  58449. end;
  58450. function TUSB_U1FRML.getFRM2 : TBits_1; inline;
  58451. begin
  58452. getFRM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58453. end;
  58454. procedure TUSB_U1FRML.setFRM3; inline;
  58455. begin
  58456. pTDefRegMap(@Self)^.&set := $00000008;
  58457. end;
  58458. procedure TUSB_U1FRML.clearFRM3; inline;
  58459. begin
  58460. pTDefRegMap(@Self)^.clr := $00000008;
  58461. end;
  58462. procedure TUSB_U1FRML.setFRM3(thebits : TBits_1); inline;
  58463. begin
  58464. if thebits = 0 then
  58465. pTDefRegMap(@Self)^.clr := $00000008
  58466. else
  58467. pTDefRegMap(@Self)^.&set := $00000008;
  58468. end;
  58469. function TUSB_U1FRML.getFRM3 : TBits_1; inline;
  58470. begin
  58471. getFRM3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58472. end;
  58473. procedure TUSB_U1FRML.setFRM4; inline;
  58474. begin
  58475. pTDefRegMap(@Self)^.&set := $00000010;
  58476. end;
  58477. procedure TUSB_U1FRML.clearFRM4; inline;
  58478. begin
  58479. pTDefRegMap(@Self)^.clr := $00000010;
  58480. end;
  58481. procedure TUSB_U1FRML.setFRM4(thebits : TBits_1); inline;
  58482. begin
  58483. if thebits = 0 then
  58484. pTDefRegMap(@Self)^.clr := $00000010
  58485. else
  58486. pTDefRegMap(@Self)^.&set := $00000010;
  58487. end;
  58488. function TUSB_U1FRML.getFRM4 : TBits_1; inline;
  58489. begin
  58490. getFRM4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58491. end;
  58492. procedure TUSB_U1FRML.setFRM5; inline;
  58493. begin
  58494. pTDefRegMap(@Self)^.&set := $00000020;
  58495. end;
  58496. procedure TUSB_U1FRML.clearFRM5; inline;
  58497. begin
  58498. pTDefRegMap(@Self)^.clr := $00000020;
  58499. end;
  58500. procedure TUSB_U1FRML.setFRM5(thebits : TBits_1); inline;
  58501. begin
  58502. if thebits = 0 then
  58503. pTDefRegMap(@Self)^.clr := $00000020
  58504. else
  58505. pTDefRegMap(@Self)^.&set := $00000020;
  58506. end;
  58507. function TUSB_U1FRML.getFRM5 : TBits_1; inline;
  58508. begin
  58509. getFRM5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58510. end;
  58511. procedure TUSB_U1FRML.setFRM6; inline;
  58512. begin
  58513. pTDefRegMap(@Self)^.&set := $00000040;
  58514. end;
  58515. procedure TUSB_U1FRML.clearFRM6; inline;
  58516. begin
  58517. pTDefRegMap(@Self)^.clr := $00000040;
  58518. end;
  58519. procedure TUSB_U1FRML.setFRM6(thebits : TBits_1); inline;
  58520. begin
  58521. if thebits = 0 then
  58522. pTDefRegMap(@Self)^.clr := $00000040
  58523. else
  58524. pTDefRegMap(@Self)^.&set := $00000040;
  58525. end;
  58526. function TUSB_U1FRML.getFRM6 : TBits_1; inline;
  58527. begin
  58528. getFRM6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58529. end;
  58530. procedure TUSB_U1FRML.setFRM7; inline;
  58531. begin
  58532. pTDefRegMap(@Self)^.&set := $00000080;
  58533. end;
  58534. procedure TUSB_U1FRML.clearFRM7; inline;
  58535. begin
  58536. pTDefRegMap(@Self)^.clr := $00000080;
  58537. end;
  58538. procedure TUSB_U1FRML.setFRM7(thebits : TBits_1); inline;
  58539. begin
  58540. if thebits = 0 then
  58541. pTDefRegMap(@Self)^.clr := $00000080
  58542. else
  58543. pTDefRegMap(@Self)^.&set := $00000080;
  58544. end;
  58545. function TUSB_U1FRML.getFRM7 : TBits_1; inline;
  58546. begin
  58547. getFRM7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58548. end;
  58549. procedure TUSB_U1FRMH.setFRMH(thebits : TBits_3); inline;
  58550. begin
  58551. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  58552. end;
  58553. function TUSB_U1FRMH.getFRMH : TBits_3; inline;
  58554. begin
  58555. getFRMH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  58556. end;
  58557. procedure TUSB_U1FRMH.setFRM8; inline;
  58558. begin
  58559. pTDefRegMap(@Self)^.&set := $00000001;
  58560. end;
  58561. procedure TUSB_U1FRMH.clearFRM8; inline;
  58562. begin
  58563. pTDefRegMap(@Self)^.clr := $00000001;
  58564. end;
  58565. procedure TUSB_U1FRMH.setFRM8(thebits : TBits_1); inline;
  58566. begin
  58567. if thebits = 0 then
  58568. pTDefRegMap(@Self)^.clr := $00000001
  58569. else
  58570. pTDefRegMap(@Self)^.&set := $00000001;
  58571. end;
  58572. function TUSB_U1FRMH.getFRM8 : TBits_1; inline;
  58573. begin
  58574. getFRM8 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58575. end;
  58576. procedure TUSB_U1FRMH.setFRM9; inline;
  58577. begin
  58578. pTDefRegMap(@Self)^.&set := $00000002;
  58579. end;
  58580. procedure TUSB_U1FRMH.clearFRM9; inline;
  58581. begin
  58582. pTDefRegMap(@Self)^.clr := $00000002;
  58583. end;
  58584. procedure TUSB_U1FRMH.setFRM9(thebits : TBits_1); inline;
  58585. begin
  58586. if thebits = 0 then
  58587. pTDefRegMap(@Self)^.clr := $00000002
  58588. else
  58589. pTDefRegMap(@Self)^.&set := $00000002;
  58590. end;
  58591. function TUSB_U1FRMH.getFRM9 : TBits_1; inline;
  58592. begin
  58593. getFRM9 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58594. end;
  58595. procedure TUSB_U1FRMH.setFRM10; inline;
  58596. begin
  58597. pTDefRegMap(@Self)^.&set := $00000004;
  58598. end;
  58599. procedure TUSB_U1FRMH.clearFRM10; inline;
  58600. begin
  58601. pTDefRegMap(@Self)^.clr := $00000004;
  58602. end;
  58603. procedure TUSB_U1FRMH.setFRM10(thebits : TBits_1); inline;
  58604. begin
  58605. if thebits = 0 then
  58606. pTDefRegMap(@Self)^.clr := $00000004
  58607. else
  58608. pTDefRegMap(@Self)^.&set := $00000004;
  58609. end;
  58610. function TUSB_U1FRMH.getFRM10 : TBits_1; inline;
  58611. begin
  58612. getFRM10 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58613. end;
  58614. procedure TUSB_U1TOK.setEP(thebits : TBits_4); inline;
  58615. begin
  58616. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  58617. end;
  58618. function TUSB_U1TOK.getEP : TBits_4; inline;
  58619. begin
  58620. getEP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  58621. end;
  58622. procedure TUSB_U1TOK.setPID(thebits : TBits_4); inline;
  58623. begin
  58624. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF0F or ( thebits shl 4 );
  58625. end;
  58626. function TUSB_U1TOK.getPID : TBits_4; inline;
  58627. begin
  58628. getPID := (pTDefRegMap(@Self)^.val and $000000F0) shr 4;
  58629. end;
  58630. procedure TUSB_U1TOK.setEP0; inline;
  58631. begin
  58632. pTDefRegMap(@Self)^.&set := $00000001;
  58633. end;
  58634. procedure TUSB_U1TOK.clearEP0; inline;
  58635. begin
  58636. pTDefRegMap(@Self)^.clr := $00000001;
  58637. end;
  58638. procedure TUSB_U1TOK.setEP0(thebits : TBits_1); inline;
  58639. begin
  58640. if thebits = 0 then
  58641. pTDefRegMap(@Self)^.clr := $00000001
  58642. else
  58643. pTDefRegMap(@Self)^.&set := $00000001;
  58644. end;
  58645. function TUSB_U1TOK.getEP0 : TBits_1; inline;
  58646. begin
  58647. getEP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58648. end;
  58649. procedure TUSB_U1TOK.setEP1; inline;
  58650. begin
  58651. pTDefRegMap(@Self)^.&set := $00000002;
  58652. end;
  58653. procedure TUSB_U1TOK.clearEP1; inline;
  58654. begin
  58655. pTDefRegMap(@Self)^.clr := $00000002;
  58656. end;
  58657. procedure TUSB_U1TOK.setEP1(thebits : TBits_1); inline;
  58658. begin
  58659. if thebits = 0 then
  58660. pTDefRegMap(@Self)^.clr := $00000002
  58661. else
  58662. pTDefRegMap(@Self)^.&set := $00000002;
  58663. end;
  58664. function TUSB_U1TOK.getEP1 : TBits_1; inline;
  58665. begin
  58666. getEP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58667. end;
  58668. procedure TUSB_U1TOK.setEP2; inline;
  58669. begin
  58670. pTDefRegMap(@Self)^.&set := $00000004;
  58671. end;
  58672. procedure TUSB_U1TOK.clearEP2; inline;
  58673. begin
  58674. pTDefRegMap(@Self)^.clr := $00000004;
  58675. end;
  58676. procedure TUSB_U1TOK.setEP2(thebits : TBits_1); inline;
  58677. begin
  58678. if thebits = 0 then
  58679. pTDefRegMap(@Self)^.clr := $00000004
  58680. else
  58681. pTDefRegMap(@Self)^.&set := $00000004;
  58682. end;
  58683. function TUSB_U1TOK.getEP2 : TBits_1; inline;
  58684. begin
  58685. getEP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58686. end;
  58687. procedure TUSB_U1TOK.setEP3; inline;
  58688. begin
  58689. pTDefRegMap(@Self)^.&set := $00000008;
  58690. end;
  58691. procedure TUSB_U1TOK.clearEP3; inline;
  58692. begin
  58693. pTDefRegMap(@Self)^.clr := $00000008;
  58694. end;
  58695. procedure TUSB_U1TOK.setEP3(thebits : TBits_1); inline;
  58696. begin
  58697. if thebits = 0 then
  58698. pTDefRegMap(@Self)^.clr := $00000008
  58699. else
  58700. pTDefRegMap(@Self)^.&set := $00000008;
  58701. end;
  58702. function TUSB_U1TOK.getEP3 : TBits_1; inline;
  58703. begin
  58704. getEP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58705. end;
  58706. procedure TUSB_U1TOK.setPID0; inline;
  58707. begin
  58708. pTDefRegMap(@Self)^.&set := $00000010;
  58709. end;
  58710. procedure TUSB_U1TOK.clearPID0; inline;
  58711. begin
  58712. pTDefRegMap(@Self)^.clr := $00000010;
  58713. end;
  58714. procedure TUSB_U1TOK.setPID0(thebits : TBits_1); inline;
  58715. begin
  58716. if thebits = 0 then
  58717. pTDefRegMap(@Self)^.clr := $00000010
  58718. else
  58719. pTDefRegMap(@Self)^.&set := $00000010;
  58720. end;
  58721. function TUSB_U1TOK.getPID0 : TBits_1; inline;
  58722. begin
  58723. getPID0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58724. end;
  58725. procedure TUSB_U1TOK.setPID1; inline;
  58726. begin
  58727. pTDefRegMap(@Self)^.&set := $00000020;
  58728. end;
  58729. procedure TUSB_U1TOK.clearPID1; inline;
  58730. begin
  58731. pTDefRegMap(@Self)^.clr := $00000020;
  58732. end;
  58733. procedure TUSB_U1TOK.setPID1(thebits : TBits_1); inline;
  58734. begin
  58735. if thebits = 0 then
  58736. pTDefRegMap(@Self)^.clr := $00000020
  58737. else
  58738. pTDefRegMap(@Self)^.&set := $00000020;
  58739. end;
  58740. function TUSB_U1TOK.getPID1 : TBits_1; inline;
  58741. begin
  58742. getPID1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58743. end;
  58744. procedure TUSB_U1TOK.setPID2; inline;
  58745. begin
  58746. pTDefRegMap(@Self)^.&set := $00000040;
  58747. end;
  58748. procedure TUSB_U1TOK.clearPID2; inline;
  58749. begin
  58750. pTDefRegMap(@Self)^.clr := $00000040;
  58751. end;
  58752. procedure TUSB_U1TOK.setPID2(thebits : TBits_1); inline;
  58753. begin
  58754. if thebits = 0 then
  58755. pTDefRegMap(@Self)^.clr := $00000040
  58756. else
  58757. pTDefRegMap(@Self)^.&set := $00000040;
  58758. end;
  58759. function TUSB_U1TOK.getPID2 : TBits_1; inline;
  58760. begin
  58761. getPID2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58762. end;
  58763. procedure TUSB_U1TOK.setPID3; inline;
  58764. begin
  58765. pTDefRegMap(@Self)^.&set := $00000080;
  58766. end;
  58767. procedure TUSB_U1TOK.clearPID3; inline;
  58768. begin
  58769. pTDefRegMap(@Self)^.clr := $00000080;
  58770. end;
  58771. procedure TUSB_U1TOK.setPID3(thebits : TBits_1); inline;
  58772. begin
  58773. if thebits = 0 then
  58774. pTDefRegMap(@Self)^.clr := $00000080
  58775. else
  58776. pTDefRegMap(@Self)^.&set := $00000080;
  58777. end;
  58778. function TUSB_U1TOK.getPID3 : TBits_1; inline;
  58779. begin
  58780. getPID3 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58781. end;
  58782. procedure TPORTB_TRISB.setTRISB0; inline;
  58783. begin
  58784. pTDefRegMap(@Self)^.&set := $00000001;
  58785. end;
  58786. procedure TPORTB_TRISB.clearTRISB0; inline;
  58787. begin
  58788. pTDefRegMap(@Self)^.clr := $00000001;
  58789. end;
  58790. procedure TPORTB_TRISB.setTRISB0(thebits : TBits_1); inline;
  58791. begin
  58792. if thebits = 0 then
  58793. pTDefRegMap(@Self)^.clr := $00000001
  58794. else
  58795. pTDefRegMap(@Self)^.&set := $00000001;
  58796. end;
  58797. function TPORTB_TRISB.getTRISB0 : TBits_1; inline;
  58798. begin
  58799. getTRISB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58800. end;
  58801. procedure TPORTB_TRISB.setTRISB1; inline;
  58802. begin
  58803. pTDefRegMap(@Self)^.&set := $00000002;
  58804. end;
  58805. procedure TPORTB_TRISB.clearTRISB1; inline;
  58806. begin
  58807. pTDefRegMap(@Self)^.clr := $00000002;
  58808. end;
  58809. procedure TPORTB_TRISB.setTRISB1(thebits : TBits_1); inline;
  58810. begin
  58811. if thebits = 0 then
  58812. pTDefRegMap(@Self)^.clr := $00000002
  58813. else
  58814. pTDefRegMap(@Self)^.&set := $00000002;
  58815. end;
  58816. function TPORTB_TRISB.getTRISB1 : TBits_1; inline;
  58817. begin
  58818. getTRISB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58819. end;
  58820. procedure TPORTB_TRISB.setTRISB2; inline;
  58821. begin
  58822. pTDefRegMap(@Self)^.&set := $00000004;
  58823. end;
  58824. procedure TPORTB_TRISB.clearTRISB2; inline;
  58825. begin
  58826. pTDefRegMap(@Self)^.clr := $00000004;
  58827. end;
  58828. procedure TPORTB_TRISB.setTRISB2(thebits : TBits_1); inline;
  58829. begin
  58830. if thebits = 0 then
  58831. pTDefRegMap(@Self)^.clr := $00000004
  58832. else
  58833. pTDefRegMap(@Self)^.&set := $00000004;
  58834. end;
  58835. function TPORTB_TRISB.getTRISB2 : TBits_1; inline;
  58836. begin
  58837. getTRISB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58838. end;
  58839. procedure TPORTB_TRISB.setTRISB3; inline;
  58840. begin
  58841. pTDefRegMap(@Self)^.&set := $00000008;
  58842. end;
  58843. procedure TPORTB_TRISB.clearTRISB3; inline;
  58844. begin
  58845. pTDefRegMap(@Self)^.clr := $00000008;
  58846. end;
  58847. procedure TPORTB_TRISB.setTRISB3(thebits : TBits_1); inline;
  58848. begin
  58849. if thebits = 0 then
  58850. pTDefRegMap(@Self)^.clr := $00000008
  58851. else
  58852. pTDefRegMap(@Self)^.&set := $00000008;
  58853. end;
  58854. function TPORTB_TRISB.getTRISB3 : TBits_1; inline;
  58855. begin
  58856. getTRISB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58857. end;
  58858. procedure TPORTB_TRISB.setTRISB4; inline;
  58859. begin
  58860. pTDefRegMap(@Self)^.&set := $00000010;
  58861. end;
  58862. procedure TPORTB_TRISB.clearTRISB4; inline;
  58863. begin
  58864. pTDefRegMap(@Self)^.clr := $00000010;
  58865. end;
  58866. procedure TPORTB_TRISB.setTRISB4(thebits : TBits_1); inline;
  58867. begin
  58868. if thebits = 0 then
  58869. pTDefRegMap(@Self)^.clr := $00000010
  58870. else
  58871. pTDefRegMap(@Self)^.&set := $00000010;
  58872. end;
  58873. function TPORTB_TRISB.getTRISB4 : TBits_1; inline;
  58874. begin
  58875. getTRISB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58876. end;
  58877. procedure TPORTB_TRISB.setTRISB5; inline;
  58878. begin
  58879. pTDefRegMap(@Self)^.&set := $00000020;
  58880. end;
  58881. procedure TPORTB_TRISB.clearTRISB5; inline;
  58882. begin
  58883. pTDefRegMap(@Self)^.clr := $00000020;
  58884. end;
  58885. procedure TPORTB_TRISB.setTRISB5(thebits : TBits_1); inline;
  58886. begin
  58887. if thebits = 0 then
  58888. pTDefRegMap(@Self)^.clr := $00000020
  58889. else
  58890. pTDefRegMap(@Self)^.&set := $00000020;
  58891. end;
  58892. function TPORTB_TRISB.getTRISB5 : TBits_1; inline;
  58893. begin
  58894. getTRISB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58895. end;
  58896. procedure TPORTB_TRISB.setTRISB6; inline;
  58897. begin
  58898. pTDefRegMap(@Self)^.&set := $00000040;
  58899. end;
  58900. procedure TPORTB_TRISB.clearTRISB6; inline;
  58901. begin
  58902. pTDefRegMap(@Self)^.clr := $00000040;
  58903. end;
  58904. procedure TPORTB_TRISB.setTRISB6(thebits : TBits_1); inline;
  58905. begin
  58906. if thebits = 0 then
  58907. pTDefRegMap(@Self)^.clr := $00000040
  58908. else
  58909. pTDefRegMap(@Self)^.&set := $00000040;
  58910. end;
  58911. function TPORTB_TRISB.getTRISB6 : TBits_1; inline;
  58912. begin
  58913. getTRISB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58914. end;
  58915. procedure TPORTB_TRISB.setTRISB7; inline;
  58916. begin
  58917. pTDefRegMap(@Self)^.&set := $00000080;
  58918. end;
  58919. procedure TPORTB_TRISB.clearTRISB7; inline;
  58920. begin
  58921. pTDefRegMap(@Self)^.clr := $00000080;
  58922. end;
  58923. procedure TPORTB_TRISB.setTRISB7(thebits : TBits_1); inline;
  58924. begin
  58925. if thebits = 0 then
  58926. pTDefRegMap(@Self)^.clr := $00000080
  58927. else
  58928. pTDefRegMap(@Self)^.&set := $00000080;
  58929. end;
  58930. function TPORTB_TRISB.getTRISB7 : TBits_1; inline;
  58931. begin
  58932. getTRISB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58933. end;
  58934. procedure TPORTB_TRISB.setTRISB8; inline;
  58935. begin
  58936. pTDefRegMap(@Self)^.&set := $00000100;
  58937. end;
  58938. procedure TPORTB_TRISB.clearTRISB8; inline;
  58939. begin
  58940. pTDefRegMap(@Self)^.clr := $00000100;
  58941. end;
  58942. procedure TPORTB_TRISB.setTRISB8(thebits : TBits_1); inline;
  58943. begin
  58944. if thebits = 0 then
  58945. pTDefRegMap(@Self)^.clr := $00000100
  58946. else
  58947. pTDefRegMap(@Self)^.&set := $00000100;
  58948. end;
  58949. function TPORTB_TRISB.getTRISB8 : TBits_1; inline;
  58950. begin
  58951. getTRISB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  58952. end;
  58953. procedure TPORTB_TRISB.setTRISB9; inline;
  58954. begin
  58955. pTDefRegMap(@Self)^.&set := $00000200;
  58956. end;
  58957. procedure TPORTB_TRISB.clearTRISB9; inline;
  58958. begin
  58959. pTDefRegMap(@Self)^.clr := $00000200;
  58960. end;
  58961. procedure TPORTB_TRISB.setTRISB9(thebits : TBits_1); inline;
  58962. begin
  58963. if thebits = 0 then
  58964. pTDefRegMap(@Self)^.clr := $00000200
  58965. else
  58966. pTDefRegMap(@Self)^.&set := $00000200;
  58967. end;
  58968. function TPORTB_TRISB.getTRISB9 : TBits_1; inline;
  58969. begin
  58970. getTRISB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  58971. end;
  58972. procedure TPORTB_TRISB.setTRISB10; inline;
  58973. begin
  58974. pTDefRegMap(@Self)^.&set := $00000400;
  58975. end;
  58976. procedure TPORTB_TRISB.clearTRISB10; inline;
  58977. begin
  58978. pTDefRegMap(@Self)^.clr := $00000400;
  58979. end;
  58980. procedure TPORTB_TRISB.setTRISB10(thebits : TBits_1); inline;
  58981. begin
  58982. if thebits = 0 then
  58983. pTDefRegMap(@Self)^.clr := $00000400
  58984. else
  58985. pTDefRegMap(@Self)^.&set := $00000400;
  58986. end;
  58987. function TPORTB_TRISB.getTRISB10 : TBits_1; inline;
  58988. begin
  58989. getTRISB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  58990. end;
  58991. procedure TPORTB_TRISB.setTRISB11; inline;
  58992. begin
  58993. pTDefRegMap(@Self)^.&set := $00000800;
  58994. end;
  58995. procedure TPORTB_TRISB.clearTRISB11; inline;
  58996. begin
  58997. pTDefRegMap(@Self)^.clr := $00000800;
  58998. end;
  58999. procedure TPORTB_TRISB.setTRISB11(thebits : TBits_1); inline;
  59000. begin
  59001. if thebits = 0 then
  59002. pTDefRegMap(@Self)^.clr := $00000800
  59003. else
  59004. pTDefRegMap(@Self)^.&set := $00000800;
  59005. end;
  59006. function TPORTB_TRISB.getTRISB11 : TBits_1; inline;
  59007. begin
  59008. getTRISB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  59009. end;
  59010. procedure TPORTB_TRISB.setTRISB12; inline;
  59011. begin
  59012. pTDefRegMap(@Self)^.&set := $00001000;
  59013. end;
  59014. procedure TPORTB_TRISB.clearTRISB12; inline;
  59015. begin
  59016. pTDefRegMap(@Self)^.clr := $00001000;
  59017. end;
  59018. procedure TPORTB_TRISB.setTRISB12(thebits : TBits_1); inline;
  59019. begin
  59020. if thebits = 0 then
  59021. pTDefRegMap(@Self)^.clr := $00001000
  59022. else
  59023. pTDefRegMap(@Self)^.&set := $00001000;
  59024. end;
  59025. function TPORTB_TRISB.getTRISB12 : TBits_1; inline;
  59026. begin
  59027. getTRISB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  59028. end;
  59029. procedure TPORTB_TRISB.setTRISB13; inline;
  59030. begin
  59031. pTDefRegMap(@Self)^.&set := $00002000;
  59032. end;
  59033. procedure TPORTB_TRISB.clearTRISB13; inline;
  59034. begin
  59035. pTDefRegMap(@Self)^.clr := $00002000;
  59036. end;
  59037. procedure TPORTB_TRISB.setTRISB13(thebits : TBits_1); inline;
  59038. begin
  59039. if thebits = 0 then
  59040. pTDefRegMap(@Self)^.clr := $00002000
  59041. else
  59042. pTDefRegMap(@Self)^.&set := $00002000;
  59043. end;
  59044. function TPORTB_TRISB.getTRISB13 : TBits_1; inline;
  59045. begin
  59046. getTRISB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  59047. end;
  59048. procedure TPORTB_TRISB.setTRISB14; inline;
  59049. begin
  59050. pTDefRegMap(@Self)^.&set := $00004000;
  59051. end;
  59052. procedure TPORTB_TRISB.clearTRISB14; inline;
  59053. begin
  59054. pTDefRegMap(@Self)^.clr := $00004000;
  59055. end;
  59056. procedure TPORTB_TRISB.setTRISB14(thebits : TBits_1); inline;
  59057. begin
  59058. if thebits = 0 then
  59059. pTDefRegMap(@Self)^.clr := $00004000
  59060. else
  59061. pTDefRegMap(@Self)^.&set := $00004000;
  59062. end;
  59063. function TPORTB_TRISB.getTRISB14 : TBits_1; inline;
  59064. begin
  59065. getTRISB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  59066. end;
  59067. procedure TPORTB_TRISB.setTRISB15; inline;
  59068. begin
  59069. pTDefRegMap(@Self)^.&set := $00008000;
  59070. end;
  59071. procedure TPORTB_TRISB.clearTRISB15; inline;
  59072. begin
  59073. pTDefRegMap(@Self)^.clr := $00008000;
  59074. end;
  59075. procedure TPORTB_TRISB.setTRISB15(thebits : TBits_1); inline;
  59076. begin
  59077. if thebits = 0 then
  59078. pTDefRegMap(@Self)^.clr := $00008000
  59079. else
  59080. pTDefRegMap(@Self)^.&set := $00008000;
  59081. end;
  59082. function TPORTB_TRISB.getTRISB15 : TBits_1; inline;
  59083. begin
  59084. getTRISB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  59085. end;
  59086. procedure TPORTB_TRISB.setw(thebits : TBits_32); inline;
  59087. begin
  59088. pTDefRegMap(@Self)^.val := thebits;
  59089. end;
  59090. function TPORTB_TRISB.getw : TBits_32; inline;
  59091. begin
  59092. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59093. end;
  59094. procedure TPORTB_PORTB.setRB0; inline;
  59095. begin
  59096. pTDefRegMap(@Self)^.&set := $00000001;
  59097. end;
  59098. procedure TPORTB_PORTB.clearRB0; inline;
  59099. begin
  59100. pTDefRegMap(@Self)^.clr := $00000001;
  59101. end;
  59102. procedure TPORTB_PORTB.setRB0(thebits : TBits_1); inline;
  59103. begin
  59104. if thebits = 0 then
  59105. pTDefRegMap(@Self)^.clr := $00000001
  59106. else
  59107. pTDefRegMap(@Self)^.&set := $00000001;
  59108. end;
  59109. function TPORTB_PORTB.getRB0 : TBits_1; inline;
  59110. begin
  59111. getRB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59112. end;
  59113. procedure TPORTB_PORTB.setRB1; inline;
  59114. begin
  59115. pTDefRegMap(@Self)^.&set := $00000002;
  59116. end;
  59117. procedure TPORTB_PORTB.clearRB1; inline;
  59118. begin
  59119. pTDefRegMap(@Self)^.clr := $00000002;
  59120. end;
  59121. procedure TPORTB_PORTB.setRB1(thebits : TBits_1); inline;
  59122. begin
  59123. if thebits = 0 then
  59124. pTDefRegMap(@Self)^.clr := $00000002
  59125. else
  59126. pTDefRegMap(@Self)^.&set := $00000002;
  59127. end;
  59128. function TPORTB_PORTB.getRB1 : TBits_1; inline;
  59129. begin
  59130. getRB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59131. end;
  59132. procedure TPORTB_PORTB.setRB2; inline;
  59133. begin
  59134. pTDefRegMap(@Self)^.&set := $00000004;
  59135. end;
  59136. procedure TPORTB_PORTB.clearRB2; inline;
  59137. begin
  59138. pTDefRegMap(@Self)^.clr := $00000004;
  59139. end;
  59140. procedure TPORTB_PORTB.setRB2(thebits : TBits_1); inline;
  59141. begin
  59142. if thebits = 0 then
  59143. pTDefRegMap(@Self)^.clr := $00000004
  59144. else
  59145. pTDefRegMap(@Self)^.&set := $00000004;
  59146. end;
  59147. function TPORTB_PORTB.getRB2 : TBits_1; inline;
  59148. begin
  59149. getRB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59150. end;
  59151. procedure TPORTB_PORTB.setRB3; inline;
  59152. begin
  59153. pTDefRegMap(@Self)^.&set := $00000008;
  59154. end;
  59155. procedure TPORTB_PORTB.clearRB3; inline;
  59156. begin
  59157. pTDefRegMap(@Self)^.clr := $00000008;
  59158. end;
  59159. procedure TPORTB_PORTB.setRB3(thebits : TBits_1); inline;
  59160. begin
  59161. if thebits = 0 then
  59162. pTDefRegMap(@Self)^.clr := $00000008
  59163. else
  59164. pTDefRegMap(@Self)^.&set := $00000008;
  59165. end;
  59166. function TPORTB_PORTB.getRB3 : TBits_1; inline;
  59167. begin
  59168. getRB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59169. end;
  59170. procedure TPORTB_PORTB.setRB4; inline;
  59171. begin
  59172. pTDefRegMap(@Self)^.&set := $00000010;
  59173. end;
  59174. procedure TPORTB_PORTB.clearRB4; inline;
  59175. begin
  59176. pTDefRegMap(@Self)^.clr := $00000010;
  59177. end;
  59178. procedure TPORTB_PORTB.setRB4(thebits : TBits_1); inline;
  59179. begin
  59180. if thebits = 0 then
  59181. pTDefRegMap(@Self)^.clr := $00000010
  59182. else
  59183. pTDefRegMap(@Self)^.&set := $00000010;
  59184. end;
  59185. function TPORTB_PORTB.getRB4 : TBits_1; inline;
  59186. begin
  59187. getRB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59188. end;
  59189. procedure TPORTB_PORTB.setRB5; inline;
  59190. begin
  59191. pTDefRegMap(@Self)^.&set := $00000020;
  59192. end;
  59193. procedure TPORTB_PORTB.clearRB5; inline;
  59194. begin
  59195. pTDefRegMap(@Self)^.clr := $00000020;
  59196. end;
  59197. procedure TPORTB_PORTB.setRB5(thebits : TBits_1); inline;
  59198. begin
  59199. if thebits = 0 then
  59200. pTDefRegMap(@Self)^.clr := $00000020
  59201. else
  59202. pTDefRegMap(@Self)^.&set := $00000020;
  59203. end;
  59204. function TPORTB_PORTB.getRB5 : TBits_1; inline;
  59205. begin
  59206. getRB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59207. end;
  59208. procedure TPORTB_PORTB.setRB6; inline;
  59209. begin
  59210. pTDefRegMap(@Self)^.&set := $00000040;
  59211. end;
  59212. procedure TPORTB_PORTB.clearRB6; inline;
  59213. begin
  59214. pTDefRegMap(@Self)^.clr := $00000040;
  59215. end;
  59216. procedure TPORTB_PORTB.setRB6(thebits : TBits_1); inline;
  59217. begin
  59218. if thebits = 0 then
  59219. pTDefRegMap(@Self)^.clr := $00000040
  59220. else
  59221. pTDefRegMap(@Self)^.&set := $00000040;
  59222. end;
  59223. function TPORTB_PORTB.getRB6 : TBits_1; inline;
  59224. begin
  59225. getRB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59226. end;
  59227. procedure TPORTB_PORTB.setRB7; inline;
  59228. begin
  59229. pTDefRegMap(@Self)^.&set := $00000080;
  59230. end;
  59231. procedure TPORTB_PORTB.clearRB7; inline;
  59232. begin
  59233. pTDefRegMap(@Self)^.clr := $00000080;
  59234. end;
  59235. procedure TPORTB_PORTB.setRB7(thebits : TBits_1); inline;
  59236. begin
  59237. if thebits = 0 then
  59238. pTDefRegMap(@Self)^.clr := $00000080
  59239. else
  59240. pTDefRegMap(@Self)^.&set := $00000080;
  59241. end;
  59242. function TPORTB_PORTB.getRB7 : TBits_1; inline;
  59243. begin
  59244. getRB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59245. end;
  59246. procedure TPORTB_PORTB.setRB8; inline;
  59247. begin
  59248. pTDefRegMap(@Self)^.&set := $00000100;
  59249. end;
  59250. procedure TPORTB_PORTB.clearRB8; inline;
  59251. begin
  59252. pTDefRegMap(@Self)^.clr := $00000100;
  59253. end;
  59254. procedure TPORTB_PORTB.setRB8(thebits : TBits_1); inline;
  59255. begin
  59256. if thebits = 0 then
  59257. pTDefRegMap(@Self)^.clr := $00000100
  59258. else
  59259. pTDefRegMap(@Self)^.&set := $00000100;
  59260. end;
  59261. function TPORTB_PORTB.getRB8 : TBits_1; inline;
  59262. begin
  59263. getRB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59264. end;
  59265. procedure TPORTB_PORTB.setRB9; inline;
  59266. begin
  59267. pTDefRegMap(@Self)^.&set := $00000200;
  59268. end;
  59269. procedure TPORTB_PORTB.clearRB9; inline;
  59270. begin
  59271. pTDefRegMap(@Self)^.clr := $00000200;
  59272. end;
  59273. procedure TPORTB_PORTB.setRB9(thebits : TBits_1); inline;
  59274. begin
  59275. if thebits = 0 then
  59276. pTDefRegMap(@Self)^.clr := $00000200
  59277. else
  59278. pTDefRegMap(@Self)^.&set := $00000200;
  59279. end;
  59280. function TPORTB_PORTB.getRB9 : TBits_1; inline;
  59281. begin
  59282. getRB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59283. end;
  59284. procedure TPORTB_PORTB.setRB10; inline;
  59285. begin
  59286. pTDefRegMap(@Self)^.&set := $00000400;
  59287. end;
  59288. procedure TPORTB_PORTB.clearRB10; inline;
  59289. begin
  59290. pTDefRegMap(@Self)^.clr := $00000400;
  59291. end;
  59292. procedure TPORTB_PORTB.setRB10(thebits : TBits_1); inline;
  59293. begin
  59294. if thebits = 0 then
  59295. pTDefRegMap(@Self)^.clr := $00000400
  59296. else
  59297. pTDefRegMap(@Self)^.&set := $00000400;
  59298. end;
  59299. function TPORTB_PORTB.getRB10 : TBits_1; inline;
  59300. begin
  59301. getRB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59302. end;
  59303. procedure TPORTB_PORTB.setRB11; inline;
  59304. begin
  59305. pTDefRegMap(@Self)^.&set := $00000800;
  59306. end;
  59307. procedure TPORTB_PORTB.clearRB11; inline;
  59308. begin
  59309. pTDefRegMap(@Self)^.clr := $00000800;
  59310. end;
  59311. procedure TPORTB_PORTB.setRB11(thebits : TBits_1); inline;
  59312. begin
  59313. if thebits = 0 then
  59314. pTDefRegMap(@Self)^.clr := $00000800
  59315. else
  59316. pTDefRegMap(@Self)^.&set := $00000800;
  59317. end;
  59318. function TPORTB_PORTB.getRB11 : TBits_1; inline;
  59319. begin
  59320. getRB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  59321. end;
  59322. procedure TPORTB_PORTB.setRB12; inline;
  59323. begin
  59324. pTDefRegMap(@Self)^.&set := $00001000;
  59325. end;
  59326. procedure TPORTB_PORTB.clearRB12; inline;
  59327. begin
  59328. pTDefRegMap(@Self)^.clr := $00001000;
  59329. end;
  59330. procedure TPORTB_PORTB.setRB12(thebits : TBits_1); inline;
  59331. begin
  59332. if thebits = 0 then
  59333. pTDefRegMap(@Self)^.clr := $00001000
  59334. else
  59335. pTDefRegMap(@Self)^.&set := $00001000;
  59336. end;
  59337. function TPORTB_PORTB.getRB12 : TBits_1; inline;
  59338. begin
  59339. getRB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  59340. end;
  59341. procedure TPORTB_PORTB.setRB13; inline;
  59342. begin
  59343. pTDefRegMap(@Self)^.&set := $00002000;
  59344. end;
  59345. procedure TPORTB_PORTB.clearRB13; inline;
  59346. begin
  59347. pTDefRegMap(@Self)^.clr := $00002000;
  59348. end;
  59349. procedure TPORTB_PORTB.setRB13(thebits : TBits_1); inline;
  59350. begin
  59351. if thebits = 0 then
  59352. pTDefRegMap(@Self)^.clr := $00002000
  59353. else
  59354. pTDefRegMap(@Self)^.&set := $00002000;
  59355. end;
  59356. function TPORTB_PORTB.getRB13 : TBits_1; inline;
  59357. begin
  59358. getRB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  59359. end;
  59360. procedure TPORTB_PORTB.setRB14; inline;
  59361. begin
  59362. pTDefRegMap(@Self)^.&set := $00004000;
  59363. end;
  59364. procedure TPORTB_PORTB.clearRB14; inline;
  59365. begin
  59366. pTDefRegMap(@Self)^.clr := $00004000;
  59367. end;
  59368. procedure TPORTB_PORTB.setRB14(thebits : TBits_1); inline;
  59369. begin
  59370. if thebits = 0 then
  59371. pTDefRegMap(@Self)^.clr := $00004000
  59372. else
  59373. pTDefRegMap(@Self)^.&set := $00004000;
  59374. end;
  59375. function TPORTB_PORTB.getRB14 : TBits_1; inline;
  59376. begin
  59377. getRB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  59378. end;
  59379. procedure TPORTB_PORTB.setRB15; inline;
  59380. begin
  59381. pTDefRegMap(@Self)^.&set := $00008000;
  59382. end;
  59383. procedure TPORTB_PORTB.clearRB15; inline;
  59384. begin
  59385. pTDefRegMap(@Self)^.clr := $00008000;
  59386. end;
  59387. procedure TPORTB_PORTB.setRB15(thebits : TBits_1); inline;
  59388. begin
  59389. if thebits = 0 then
  59390. pTDefRegMap(@Self)^.clr := $00008000
  59391. else
  59392. pTDefRegMap(@Self)^.&set := $00008000;
  59393. end;
  59394. function TPORTB_PORTB.getRB15 : TBits_1; inline;
  59395. begin
  59396. getRB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  59397. end;
  59398. procedure TPORTB_PORTB.setw(thebits : TBits_32); inline;
  59399. begin
  59400. pTDefRegMap(@Self)^.val := thebits;
  59401. end;
  59402. function TPORTB_PORTB.getw : TBits_32; inline;
  59403. begin
  59404. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59405. end;
  59406. procedure TPORTB_LATB.setLATB0; inline;
  59407. begin
  59408. pTDefRegMap(@Self)^.&set := $00000001;
  59409. end;
  59410. procedure TPORTB_LATB.clearLATB0; inline;
  59411. begin
  59412. pTDefRegMap(@Self)^.clr := $00000001;
  59413. end;
  59414. procedure TPORTB_LATB.setLATB0(thebits : TBits_1); inline;
  59415. begin
  59416. if thebits = 0 then
  59417. pTDefRegMap(@Self)^.clr := $00000001
  59418. else
  59419. pTDefRegMap(@Self)^.&set := $00000001;
  59420. end;
  59421. function TPORTB_LATB.getLATB0 : TBits_1; inline;
  59422. begin
  59423. getLATB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59424. end;
  59425. procedure TPORTB_LATB.setLATB1; inline;
  59426. begin
  59427. pTDefRegMap(@Self)^.&set := $00000002;
  59428. end;
  59429. procedure TPORTB_LATB.clearLATB1; inline;
  59430. begin
  59431. pTDefRegMap(@Self)^.clr := $00000002;
  59432. end;
  59433. procedure TPORTB_LATB.setLATB1(thebits : TBits_1); inline;
  59434. begin
  59435. if thebits = 0 then
  59436. pTDefRegMap(@Self)^.clr := $00000002
  59437. else
  59438. pTDefRegMap(@Self)^.&set := $00000002;
  59439. end;
  59440. function TPORTB_LATB.getLATB1 : TBits_1; inline;
  59441. begin
  59442. getLATB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59443. end;
  59444. procedure TPORTB_LATB.setLATB2; inline;
  59445. begin
  59446. pTDefRegMap(@Self)^.&set := $00000004;
  59447. end;
  59448. procedure TPORTB_LATB.clearLATB2; inline;
  59449. begin
  59450. pTDefRegMap(@Self)^.clr := $00000004;
  59451. end;
  59452. procedure TPORTB_LATB.setLATB2(thebits : TBits_1); inline;
  59453. begin
  59454. if thebits = 0 then
  59455. pTDefRegMap(@Self)^.clr := $00000004
  59456. else
  59457. pTDefRegMap(@Self)^.&set := $00000004;
  59458. end;
  59459. function TPORTB_LATB.getLATB2 : TBits_1; inline;
  59460. begin
  59461. getLATB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59462. end;
  59463. procedure TPORTB_LATB.setLATB3; inline;
  59464. begin
  59465. pTDefRegMap(@Self)^.&set := $00000008;
  59466. end;
  59467. procedure TPORTB_LATB.clearLATB3; inline;
  59468. begin
  59469. pTDefRegMap(@Self)^.clr := $00000008;
  59470. end;
  59471. procedure TPORTB_LATB.setLATB3(thebits : TBits_1); inline;
  59472. begin
  59473. if thebits = 0 then
  59474. pTDefRegMap(@Self)^.clr := $00000008
  59475. else
  59476. pTDefRegMap(@Self)^.&set := $00000008;
  59477. end;
  59478. function TPORTB_LATB.getLATB3 : TBits_1; inline;
  59479. begin
  59480. getLATB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59481. end;
  59482. procedure TPORTB_LATB.setLATB4; inline;
  59483. begin
  59484. pTDefRegMap(@Self)^.&set := $00000010;
  59485. end;
  59486. procedure TPORTB_LATB.clearLATB4; inline;
  59487. begin
  59488. pTDefRegMap(@Self)^.clr := $00000010;
  59489. end;
  59490. procedure TPORTB_LATB.setLATB4(thebits : TBits_1); inline;
  59491. begin
  59492. if thebits = 0 then
  59493. pTDefRegMap(@Self)^.clr := $00000010
  59494. else
  59495. pTDefRegMap(@Self)^.&set := $00000010;
  59496. end;
  59497. function TPORTB_LATB.getLATB4 : TBits_1; inline;
  59498. begin
  59499. getLATB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59500. end;
  59501. procedure TPORTB_LATB.setLATB5; inline;
  59502. begin
  59503. pTDefRegMap(@Self)^.&set := $00000020;
  59504. end;
  59505. procedure TPORTB_LATB.clearLATB5; inline;
  59506. begin
  59507. pTDefRegMap(@Self)^.clr := $00000020;
  59508. end;
  59509. procedure TPORTB_LATB.setLATB5(thebits : TBits_1); inline;
  59510. begin
  59511. if thebits = 0 then
  59512. pTDefRegMap(@Self)^.clr := $00000020
  59513. else
  59514. pTDefRegMap(@Self)^.&set := $00000020;
  59515. end;
  59516. function TPORTB_LATB.getLATB5 : TBits_1; inline;
  59517. begin
  59518. getLATB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59519. end;
  59520. procedure TPORTB_LATB.setLATB6; inline;
  59521. begin
  59522. pTDefRegMap(@Self)^.&set := $00000040;
  59523. end;
  59524. procedure TPORTB_LATB.clearLATB6; inline;
  59525. begin
  59526. pTDefRegMap(@Self)^.clr := $00000040;
  59527. end;
  59528. procedure TPORTB_LATB.setLATB6(thebits : TBits_1); inline;
  59529. begin
  59530. if thebits = 0 then
  59531. pTDefRegMap(@Self)^.clr := $00000040
  59532. else
  59533. pTDefRegMap(@Self)^.&set := $00000040;
  59534. end;
  59535. function TPORTB_LATB.getLATB6 : TBits_1; inline;
  59536. begin
  59537. getLATB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59538. end;
  59539. procedure TPORTB_LATB.setLATB7; inline;
  59540. begin
  59541. pTDefRegMap(@Self)^.&set := $00000080;
  59542. end;
  59543. procedure TPORTB_LATB.clearLATB7; inline;
  59544. begin
  59545. pTDefRegMap(@Self)^.clr := $00000080;
  59546. end;
  59547. procedure TPORTB_LATB.setLATB7(thebits : TBits_1); inline;
  59548. begin
  59549. if thebits = 0 then
  59550. pTDefRegMap(@Self)^.clr := $00000080
  59551. else
  59552. pTDefRegMap(@Self)^.&set := $00000080;
  59553. end;
  59554. function TPORTB_LATB.getLATB7 : TBits_1; inline;
  59555. begin
  59556. getLATB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59557. end;
  59558. procedure TPORTB_LATB.setLATB8; inline;
  59559. begin
  59560. pTDefRegMap(@Self)^.&set := $00000100;
  59561. end;
  59562. procedure TPORTB_LATB.clearLATB8; inline;
  59563. begin
  59564. pTDefRegMap(@Self)^.clr := $00000100;
  59565. end;
  59566. procedure TPORTB_LATB.setLATB8(thebits : TBits_1); inline;
  59567. begin
  59568. if thebits = 0 then
  59569. pTDefRegMap(@Self)^.clr := $00000100
  59570. else
  59571. pTDefRegMap(@Self)^.&set := $00000100;
  59572. end;
  59573. function TPORTB_LATB.getLATB8 : TBits_1; inline;
  59574. begin
  59575. getLATB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59576. end;
  59577. procedure TPORTB_LATB.setLATB9; inline;
  59578. begin
  59579. pTDefRegMap(@Self)^.&set := $00000200;
  59580. end;
  59581. procedure TPORTB_LATB.clearLATB9; inline;
  59582. begin
  59583. pTDefRegMap(@Self)^.clr := $00000200;
  59584. end;
  59585. procedure TPORTB_LATB.setLATB9(thebits : TBits_1); inline;
  59586. begin
  59587. if thebits = 0 then
  59588. pTDefRegMap(@Self)^.clr := $00000200
  59589. else
  59590. pTDefRegMap(@Self)^.&set := $00000200;
  59591. end;
  59592. function TPORTB_LATB.getLATB9 : TBits_1; inline;
  59593. begin
  59594. getLATB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59595. end;
  59596. procedure TPORTB_LATB.setLATB10; inline;
  59597. begin
  59598. pTDefRegMap(@Self)^.&set := $00000400;
  59599. end;
  59600. procedure TPORTB_LATB.clearLATB10; inline;
  59601. begin
  59602. pTDefRegMap(@Self)^.clr := $00000400;
  59603. end;
  59604. procedure TPORTB_LATB.setLATB10(thebits : TBits_1); inline;
  59605. begin
  59606. if thebits = 0 then
  59607. pTDefRegMap(@Self)^.clr := $00000400
  59608. else
  59609. pTDefRegMap(@Self)^.&set := $00000400;
  59610. end;
  59611. function TPORTB_LATB.getLATB10 : TBits_1; inline;
  59612. begin
  59613. getLATB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59614. end;
  59615. procedure TPORTB_LATB.setLATB11; inline;
  59616. begin
  59617. pTDefRegMap(@Self)^.&set := $00000800;
  59618. end;
  59619. procedure TPORTB_LATB.clearLATB11; inline;
  59620. begin
  59621. pTDefRegMap(@Self)^.clr := $00000800;
  59622. end;
  59623. procedure TPORTB_LATB.setLATB11(thebits : TBits_1); inline;
  59624. begin
  59625. if thebits = 0 then
  59626. pTDefRegMap(@Self)^.clr := $00000800
  59627. else
  59628. pTDefRegMap(@Self)^.&set := $00000800;
  59629. end;
  59630. function TPORTB_LATB.getLATB11 : TBits_1; inline;
  59631. begin
  59632. getLATB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  59633. end;
  59634. procedure TPORTB_LATB.setLATB12; inline;
  59635. begin
  59636. pTDefRegMap(@Self)^.&set := $00001000;
  59637. end;
  59638. procedure TPORTB_LATB.clearLATB12; inline;
  59639. begin
  59640. pTDefRegMap(@Self)^.clr := $00001000;
  59641. end;
  59642. procedure TPORTB_LATB.setLATB12(thebits : TBits_1); inline;
  59643. begin
  59644. if thebits = 0 then
  59645. pTDefRegMap(@Self)^.clr := $00001000
  59646. else
  59647. pTDefRegMap(@Self)^.&set := $00001000;
  59648. end;
  59649. function TPORTB_LATB.getLATB12 : TBits_1; inline;
  59650. begin
  59651. getLATB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  59652. end;
  59653. procedure TPORTB_LATB.setLATB13; inline;
  59654. begin
  59655. pTDefRegMap(@Self)^.&set := $00002000;
  59656. end;
  59657. procedure TPORTB_LATB.clearLATB13; inline;
  59658. begin
  59659. pTDefRegMap(@Self)^.clr := $00002000;
  59660. end;
  59661. procedure TPORTB_LATB.setLATB13(thebits : TBits_1); inline;
  59662. begin
  59663. if thebits = 0 then
  59664. pTDefRegMap(@Self)^.clr := $00002000
  59665. else
  59666. pTDefRegMap(@Self)^.&set := $00002000;
  59667. end;
  59668. function TPORTB_LATB.getLATB13 : TBits_1; inline;
  59669. begin
  59670. getLATB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  59671. end;
  59672. procedure TPORTB_LATB.setLATB14; inline;
  59673. begin
  59674. pTDefRegMap(@Self)^.&set := $00004000;
  59675. end;
  59676. procedure TPORTB_LATB.clearLATB14; inline;
  59677. begin
  59678. pTDefRegMap(@Self)^.clr := $00004000;
  59679. end;
  59680. procedure TPORTB_LATB.setLATB14(thebits : TBits_1); inline;
  59681. begin
  59682. if thebits = 0 then
  59683. pTDefRegMap(@Self)^.clr := $00004000
  59684. else
  59685. pTDefRegMap(@Self)^.&set := $00004000;
  59686. end;
  59687. function TPORTB_LATB.getLATB14 : TBits_1; inline;
  59688. begin
  59689. getLATB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  59690. end;
  59691. procedure TPORTB_LATB.setLATB15; inline;
  59692. begin
  59693. pTDefRegMap(@Self)^.&set := $00008000;
  59694. end;
  59695. procedure TPORTB_LATB.clearLATB15; inline;
  59696. begin
  59697. pTDefRegMap(@Self)^.clr := $00008000;
  59698. end;
  59699. procedure TPORTB_LATB.setLATB15(thebits : TBits_1); inline;
  59700. begin
  59701. if thebits = 0 then
  59702. pTDefRegMap(@Self)^.clr := $00008000
  59703. else
  59704. pTDefRegMap(@Self)^.&set := $00008000;
  59705. end;
  59706. function TPORTB_LATB.getLATB15 : TBits_1; inline;
  59707. begin
  59708. getLATB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  59709. end;
  59710. procedure TPORTB_LATB.setw(thebits : TBits_32); inline;
  59711. begin
  59712. pTDefRegMap(@Self)^.val := thebits;
  59713. end;
  59714. function TPORTB_LATB.getw : TBits_32; inline;
  59715. begin
  59716. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59717. end;
  59718. procedure TPORTB_ODCB.setODCB0; inline;
  59719. begin
  59720. pTDefRegMap(@Self)^.&set := $00000001;
  59721. end;
  59722. procedure TPORTB_ODCB.clearODCB0; inline;
  59723. begin
  59724. pTDefRegMap(@Self)^.clr := $00000001;
  59725. end;
  59726. procedure TPORTB_ODCB.setODCB0(thebits : TBits_1); inline;
  59727. begin
  59728. if thebits = 0 then
  59729. pTDefRegMap(@Self)^.clr := $00000001
  59730. else
  59731. pTDefRegMap(@Self)^.&set := $00000001;
  59732. end;
  59733. function TPORTB_ODCB.getODCB0 : TBits_1; inline;
  59734. begin
  59735. getODCB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59736. end;
  59737. procedure TPORTB_ODCB.setODCB1; inline;
  59738. begin
  59739. pTDefRegMap(@Self)^.&set := $00000002;
  59740. end;
  59741. procedure TPORTB_ODCB.clearODCB1; inline;
  59742. begin
  59743. pTDefRegMap(@Self)^.clr := $00000002;
  59744. end;
  59745. procedure TPORTB_ODCB.setODCB1(thebits : TBits_1); inline;
  59746. begin
  59747. if thebits = 0 then
  59748. pTDefRegMap(@Self)^.clr := $00000002
  59749. else
  59750. pTDefRegMap(@Self)^.&set := $00000002;
  59751. end;
  59752. function TPORTB_ODCB.getODCB1 : TBits_1; inline;
  59753. begin
  59754. getODCB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59755. end;
  59756. procedure TPORTB_ODCB.setODCB2; inline;
  59757. begin
  59758. pTDefRegMap(@Self)^.&set := $00000004;
  59759. end;
  59760. procedure TPORTB_ODCB.clearODCB2; inline;
  59761. begin
  59762. pTDefRegMap(@Self)^.clr := $00000004;
  59763. end;
  59764. procedure TPORTB_ODCB.setODCB2(thebits : TBits_1); inline;
  59765. begin
  59766. if thebits = 0 then
  59767. pTDefRegMap(@Self)^.clr := $00000004
  59768. else
  59769. pTDefRegMap(@Self)^.&set := $00000004;
  59770. end;
  59771. function TPORTB_ODCB.getODCB2 : TBits_1; inline;
  59772. begin
  59773. getODCB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59774. end;
  59775. procedure TPORTB_ODCB.setODCB3; inline;
  59776. begin
  59777. pTDefRegMap(@Self)^.&set := $00000008;
  59778. end;
  59779. procedure TPORTB_ODCB.clearODCB3; inline;
  59780. begin
  59781. pTDefRegMap(@Self)^.clr := $00000008;
  59782. end;
  59783. procedure TPORTB_ODCB.setODCB3(thebits : TBits_1); inline;
  59784. begin
  59785. if thebits = 0 then
  59786. pTDefRegMap(@Self)^.clr := $00000008
  59787. else
  59788. pTDefRegMap(@Self)^.&set := $00000008;
  59789. end;
  59790. function TPORTB_ODCB.getODCB3 : TBits_1; inline;
  59791. begin
  59792. getODCB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59793. end;
  59794. procedure TPORTB_ODCB.setODCB4; inline;
  59795. begin
  59796. pTDefRegMap(@Self)^.&set := $00000010;
  59797. end;
  59798. procedure TPORTB_ODCB.clearODCB4; inline;
  59799. begin
  59800. pTDefRegMap(@Self)^.clr := $00000010;
  59801. end;
  59802. procedure TPORTB_ODCB.setODCB4(thebits : TBits_1); inline;
  59803. begin
  59804. if thebits = 0 then
  59805. pTDefRegMap(@Self)^.clr := $00000010
  59806. else
  59807. pTDefRegMap(@Self)^.&set := $00000010;
  59808. end;
  59809. function TPORTB_ODCB.getODCB4 : TBits_1; inline;
  59810. begin
  59811. getODCB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59812. end;
  59813. procedure TPORTB_ODCB.setODCB5; inline;
  59814. begin
  59815. pTDefRegMap(@Self)^.&set := $00000020;
  59816. end;
  59817. procedure TPORTB_ODCB.clearODCB5; inline;
  59818. begin
  59819. pTDefRegMap(@Self)^.clr := $00000020;
  59820. end;
  59821. procedure TPORTB_ODCB.setODCB5(thebits : TBits_1); inline;
  59822. begin
  59823. if thebits = 0 then
  59824. pTDefRegMap(@Self)^.clr := $00000020
  59825. else
  59826. pTDefRegMap(@Self)^.&set := $00000020;
  59827. end;
  59828. function TPORTB_ODCB.getODCB5 : TBits_1; inline;
  59829. begin
  59830. getODCB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59831. end;
  59832. procedure TPORTB_ODCB.setODCB6; inline;
  59833. begin
  59834. pTDefRegMap(@Self)^.&set := $00000040;
  59835. end;
  59836. procedure TPORTB_ODCB.clearODCB6; inline;
  59837. begin
  59838. pTDefRegMap(@Self)^.clr := $00000040;
  59839. end;
  59840. procedure TPORTB_ODCB.setODCB6(thebits : TBits_1); inline;
  59841. begin
  59842. if thebits = 0 then
  59843. pTDefRegMap(@Self)^.clr := $00000040
  59844. else
  59845. pTDefRegMap(@Self)^.&set := $00000040;
  59846. end;
  59847. function TPORTB_ODCB.getODCB6 : TBits_1; inline;
  59848. begin
  59849. getODCB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59850. end;
  59851. procedure TPORTB_ODCB.setODCB7; inline;
  59852. begin
  59853. pTDefRegMap(@Self)^.&set := $00000080;
  59854. end;
  59855. procedure TPORTB_ODCB.clearODCB7; inline;
  59856. begin
  59857. pTDefRegMap(@Self)^.clr := $00000080;
  59858. end;
  59859. procedure TPORTB_ODCB.setODCB7(thebits : TBits_1); inline;
  59860. begin
  59861. if thebits = 0 then
  59862. pTDefRegMap(@Self)^.clr := $00000080
  59863. else
  59864. pTDefRegMap(@Self)^.&set := $00000080;
  59865. end;
  59866. function TPORTB_ODCB.getODCB7 : TBits_1; inline;
  59867. begin
  59868. getODCB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59869. end;
  59870. procedure TPORTB_ODCB.setODCB8; inline;
  59871. begin
  59872. pTDefRegMap(@Self)^.&set := $00000100;
  59873. end;
  59874. procedure TPORTB_ODCB.clearODCB8; inline;
  59875. begin
  59876. pTDefRegMap(@Self)^.clr := $00000100;
  59877. end;
  59878. procedure TPORTB_ODCB.setODCB8(thebits : TBits_1); inline;
  59879. begin
  59880. if thebits = 0 then
  59881. pTDefRegMap(@Self)^.clr := $00000100
  59882. else
  59883. pTDefRegMap(@Self)^.&set := $00000100;
  59884. end;
  59885. function TPORTB_ODCB.getODCB8 : TBits_1; inline;
  59886. begin
  59887. getODCB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59888. end;
  59889. procedure TPORTB_ODCB.setODCB9; inline;
  59890. begin
  59891. pTDefRegMap(@Self)^.&set := $00000200;
  59892. end;
  59893. procedure TPORTB_ODCB.clearODCB9; inline;
  59894. begin
  59895. pTDefRegMap(@Self)^.clr := $00000200;
  59896. end;
  59897. procedure TPORTB_ODCB.setODCB9(thebits : TBits_1); inline;
  59898. begin
  59899. if thebits = 0 then
  59900. pTDefRegMap(@Self)^.clr := $00000200
  59901. else
  59902. pTDefRegMap(@Self)^.&set := $00000200;
  59903. end;
  59904. function TPORTB_ODCB.getODCB9 : TBits_1; inline;
  59905. begin
  59906. getODCB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59907. end;
  59908. procedure TPORTB_ODCB.setODCB10; inline;
  59909. begin
  59910. pTDefRegMap(@Self)^.&set := $00000400;
  59911. end;
  59912. procedure TPORTB_ODCB.clearODCB10; inline;
  59913. begin
  59914. pTDefRegMap(@Self)^.clr := $00000400;
  59915. end;
  59916. procedure TPORTB_ODCB.setODCB10(thebits : TBits_1); inline;
  59917. begin
  59918. if thebits = 0 then
  59919. pTDefRegMap(@Self)^.clr := $00000400
  59920. else
  59921. pTDefRegMap(@Self)^.&set := $00000400;
  59922. end;
  59923. function TPORTB_ODCB.getODCB10 : TBits_1; inline;
  59924. begin
  59925. getODCB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59926. end;
  59927. procedure TPORTB_ODCB.setODCB11; inline;
  59928. begin
  59929. pTDefRegMap(@Self)^.&set := $00000800;
  59930. end;
  59931. procedure TPORTB_ODCB.clearODCB11; inline;
  59932. begin
  59933. pTDefRegMap(@Self)^.clr := $00000800;
  59934. end;
  59935. procedure TPORTB_ODCB.setODCB11(thebits : TBits_1); inline;
  59936. begin
  59937. if thebits = 0 then
  59938. pTDefRegMap(@Self)^.clr := $00000800
  59939. else
  59940. pTDefRegMap(@Self)^.&set := $00000800;
  59941. end;
  59942. function TPORTB_ODCB.getODCB11 : TBits_1; inline;
  59943. begin
  59944. getODCB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  59945. end;
  59946. procedure TPORTB_ODCB.setODCB12; inline;
  59947. begin
  59948. pTDefRegMap(@Self)^.&set := $00001000;
  59949. end;
  59950. procedure TPORTB_ODCB.clearODCB12; inline;
  59951. begin
  59952. pTDefRegMap(@Self)^.clr := $00001000;
  59953. end;
  59954. procedure TPORTB_ODCB.setODCB12(thebits : TBits_1); inline;
  59955. begin
  59956. if thebits = 0 then
  59957. pTDefRegMap(@Self)^.clr := $00001000
  59958. else
  59959. pTDefRegMap(@Self)^.&set := $00001000;
  59960. end;
  59961. function TPORTB_ODCB.getODCB12 : TBits_1; inline;
  59962. begin
  59963. getODCB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  59964. end;
  59965. procedure TPORTB_ODCB.setODCB13; inline;
  59966. begin
  59967. pTDefRegMap(@Self)^.&set := $00002000;
  59968. end;
  59969. procedure TPORTB_ODCB.clearODCB13; inline;
  59970. begin
  59971. pTDefRegMap(@Self)^.clr := $00002000;
  59972. end;
  59973. procedure TPORTB_ODCB.setODCB13(thebits : TBits_1); inline;
  59974. begin
  59975. if thebits = 0 then
  59976. pTDefRegMap(@Self)^.clr := $00002000
  59977. else
  59978. pTDefRegMap(@Self)^.&set := $00002000;
  59979. end;
  59980. function TPORTB_ODCB.getODCB13 : TBits_1; inline;
  59981. begin
  59982. getODCB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  59983. end;
  59984. procedure TPORTB_ODCB.setODCB14; inline;
  59985. begin
  59986. pTDefRegMap(@Self)^.&set := $00004000;
  59987. end;
  59988. procedure TPORTB_ODCB.clearODCB14; inline;
  59989. begin
  59990. pTDefRegMap(@Self)^.clr := $00004000;
  59991. end;
  59992. procedure TPORTB_ODCB.setODCB14(thebits : TBits_1); inline;
  59993. begin
  59994. if thebits = 0 then
  59995. pTDefRegMap(@Self)^.clr := $00004000
  59996. else
  59997. pTDefRegMap(@Self)^.&set := $00004000;
  59998. end;
  59999. function TPORTB_ODCB.getODCB14 : TBits_1; inline;
  60000. begin
  60001. getODCB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  60002. end;
  60003. procedure TPORTB_ODCB.setODCB15; inline;
  60004. begin
  60005. pTDefRegMap(@Self)^.&set := $00008000;
  60006. end;
  60007. procedure TPORTB_ODCB.clearODCB15; inline;
  60008. begin
  60009. pTDefRegMap(@Self)^.clr := $00008000;
  60010. end;
  60011. procedure TPORTB_ODCB.setODCB15(thebits : TBits_1); inline;
  60012. begin
  60013. if thebits = 0 then
  60014. pTDefRegMap(@Self)^.clr := $00008000
  60015. else
  60016. pTDefRegMap(@Self)^.&set := $00008000;
  60017. end;
  60018. function TPORTB_ODCB.getODCB15 : TBits_1; inline;
  60019. begin
  60020. getODCB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  60021. end;
  60022. procedure TPORTB_ODCB.setw(thebits : TBits_32); inline;
  60023. begin
  60024. pTDefRegMap(@Self)^.val := thebits;
  60025. end;
  60026. function TPORTB_ODCB.getw : TBits_32; inline;
  60027. begin
  60028. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60029. end;
  60030. procedure TPORTC_TRISC.setTRISC12; inline;
  60031. begin
  60032. pTDefRegMap(@Self)^.&set := $00001000;
  60033. end;
  60034. procedure TPORTC_TRISC.clearTRISC12; inline;
  60035. begin
  60036. pTDefRegMap(@Self)^.clr := $00001000;
  60037. end;
  60038. procedure TPORTC_TRISC.setTRISC12(thebits : TBits_1); inline;
  60039. begin
  60040. if thebits = 0 then
  60041. pTDefRegMap(@Self)^.clr := $00001000
  60042. else
  60043. pTDefRegMap(@Self)^.&set := $00001000;
  60044. end;
  60045. function TPORTC_TRISC.getTRISC12 : TBits_1; inline;
  60046. begin
  60047. getTRISC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  60048. end;
  60049. procedure TPORTC_TRISC.setTRISC13; inline;
  60050. begin
  60051. pTDefRegMap(@Self)^.&set := $00002000;
  60052. end;
  60053. procedure TPORTC_TRISC.clearTRISC13; inline;
  60054. begin
  60055. pTDefRegMap(@Self)^.clr := $00002000;
  60056. end;
  60057. procedure TPORTC_TRISC.setTRISC13(thebits : TBits_1); inline;
  60058. begin
  60059. if thebits = 0 then
  60060. pTDefRegMap(@Self)^.clr := $00002000
  60061. else
  60062. pTDefRegMap(@Self)^.&set := $00002000;
  60063. end;
  60064. function TPORTC_TRISC.getTRISC13 : TBits_1; inline;
  60065. begin
  60066. getTRISC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  60067. end;
  60068. procedure TPORTC_TRISC.setTRISC14; inline;
  60069. begin
  60070. pTDefRegMap(@Self)^.&set := $00004000;
  60071. end;
  60072. procedure TPORTC_TRISC.clearTRISC14; inline;
  60073. begin
  60074. pTDefRegMap(@Self)^.clr := $00004000;
  60075. end;
  60076. procedure TPORTC_TRISC.setTRISC14(thebits : TBits_1); inline;
  60077. begin
  60078. if thebits = 0 then
  60079. pTDefRegMap(@Self)^.clr := $00004000
  60080. else
  60081. pTDefRegMap(@Self)^.&set := $00004000;
  60082. end;
  60083. function TPORTC_TRISC.getTRISC14 : TBits_1; inline;
  60084. begin
  60085. getTRISC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  60086. end;
  60087. procedure TPORTC_TRISC.setTRISC15; inline;
  60088. begin
  60089. pTDefRegMap(@Self)^.&set := $00008000;
  60090. end;
  60091. procedure TPORTC_TRISC.clearTRISC15; inline;
  60092. begin
  60093. pTDefRegMap(@Self)^.clr := $00008000;
  60094. end;
  60095. procedure TPORTC_TRISC.setTRISC15(thebits : TBits_1); inline;
  60096. begin
  60097. if thebits = 0 then
  60098. pTDefRegMap(@Self)^.clr := $00008000
  60099. else
  60100. pTDefRegMap(@Self)^.&set := $00008000;
  60101. end;
  60102. function TPORTC_TRISC.getTRISC15 : TBits_1; inline;
  60103. begin
  60104. getTRISC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  60105. end;
  60106. procedure TPORTC_TRISC.setw(thebits : TBits_32); inline;
  60107. begin
  60108. pTDefRegMap(@Self)^.val := thebits;
  60109. end;
  60110. function TPORTC_TRISC.getw : TBits_32; inline;
  60111. begin
  60112. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60113. end;
  60114. procedure TPORTC_PORTC.setRC12; inline;
  60115. begin
  60116. pTDefRegMap(@Self)^.&set := $00001000;
  60117. end;
  60118. procedure TPORTC_PORTC.clearRC12; inline;
  60119. begin
  60120. pTDefRegMap(@Self)^.clr := $00001000;
  60121. end;
  60122. procedure TPORTC_PORTC.setRC12(thebits : TBits_1); inline;
  60123. begin
  60124. if thebits = 0 then
  60125. pTDefRegMap(@Self)^.clr := $00001000
  60126. else
  60127. pTDefRegMap(@Self)^.&set := $00001000;
  60128. end;
  60129. function TPORTC_PORTC.getRC12 : TBits_1; inline;
  60130. begin
  60131. getRC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  60132. end;
  60133. procedure TPORTC_PORTC.setRC13; inline;
  60134. begin
  60135. pTDefRegMap(@Self)^.&set := $00002000;
  60136. end;
  60137. procedure TPORTC_PORTC.clearRC13; inline;
  60138. begin
  60139. pTDefRegMap(@Self)^.clr := $00002000;
  60140. end;
  60141. procedure TPORTC_PORTC.setRC13(thebits : TBits_1); inline;
  60142. begin
  60143. if thebits = 0 then
  60144. pTDefRegMap(@Self)^.clr := $00002000
  60145. else
  60146. pTDefRegMap(@Self)^.&set := $00002000;
  60147. end;
  60148. function TPORTC_PORTC.getRC13 : TBits_1; inline;
  60149. begin
  60150. getRC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  60151. end;
  60152. procedure TPORTC_PORTC.setRC14; inline;
  60153. begin
  60154. pTDefRegMap(@Self)^.&set := $00004000;
  60155. end;
  60156. procedure TPORTC_PORTC.clearRC14; inline;
  60157. begin
  60158. pTDefRegMap(@Self)^.clr := $00004000;
  60159. end;
  60160. procedure TPORTC_PORTC.setRC14(thebits : TBits_1); inline;
  60161. begin
  60162. if thebits = 0 then
  60163. pTDefRegMap(@Self)^.clr := $00004000
  60164. else
  60165. pTDefRegMap(@Self)^.&set := $00004000;
  60166. end;
  60167. function TPORTC_PORTC.getRC14 : TBits_1; inline;
  60168. begin
  60169. getRC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  60170. end;
  60171. procedure TPORTC_PORTC.setRC15; inline;
  60172. begin
  60173. pTDefRegMap(@Self)^.&set := $00008000;
  60174. end;
  60175. procedure TPORTC_PORTC.clearRC15; inline;
  60176. begin
  60177. pTDefRegMap(@Self)^.clr := $00008000;
  60178. end;
  60179. procedure TPORTC_PORTC.setRC15(thebits : TBits_1); inline;
  60180. begin
  60181. if thebits = 0 then
  60182. pTDefRegMap(@Self)^.clr := $00008000
  60183. else
  60184. pTDefRegMap(@Self)^.&set := $00008000;
  60185. end;
  60186. function TPORTC_PORTC.getRC15 : TBits_1; inline;
  60187. begin
  60188. getRC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  60189. end;
  60190. procedure TPORTC_PORTC.setw(thebits : TBits_32); inline;
  60191. begin
  60192. pTDefRegMap(@Self)^.val := thebits;
  60193. end;
  60194. function TPORTC_PORTC.getw : TBits_32; inline;
  60195. begin
  60196. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60197. end;
  60198. procedure TPORTC_LATC.setLATC12; inline;
  60199. begin
  60200. pTDefRegMap(@Self)^.&set := $00001000;
  60201. end;
  60202. procedure TPORTC_LATC.clearLATC12; inline;
  60203. begin
  60204. pTDefRegMap(@Self)^.clr := $00001000;
  60205. end;
  60206. procedure TPORTC_LATC.setLATC12(thebits : TBits_1); inline;
  60207. begin
  60208. if thebits = 0 then
  60209. pTDefRegMap(@Self)^.clr := $00001000
  60210. else
  60211. pTDefRegMap(@Self)^.&set := $00001000;
  60212. end;
  60213. function TPORTC_LATC.getLATC12 : TBits_1; inline;
  60214. begin
  60215. getLATC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  60216. end;
  60217. procedure TPORTC_LATC.setLATC13; inline;
  60218. begin
  60219. pTDefRegMap(@Self)^.&set := $00002000;
  60220. end;
  60221. procedure TPORTC_LATC.clearLATC13; inline;
  60222. begin
  60223. pTDefRegMap(@Self)^.clr := $00002000;
  60224. end;
  60225. procedure TPORTC_LATC.setLATC13(thebits : TBits_1); inline;
  60226. begin
  60227. if thebits = 0 then
  60228. pTDefRegMap(@Self)^.clr := $00002000
  60229. else
  60230. pTDefRegMap(@Self)^.&set := $00002000;
  60231. end;
  60232. function TPORTC_LATC.getLATC13 : TBits_1; inline;
  60233. begin
  60234. getLATC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  60235. end;
  60236. procedure TPORTC_LATC.setLATC14; inline;
  60237. begin
  60238. pTDefRegMap(@Self)^.&set := $00004000;
  60239. end;
  60240. procedure TPORTC_LATC.clearLATC14; inline;
  60241. begin
  60242. pTDefRegMap(@Self)^.clr := $00004000;
  60243. end;
  60244. procedure TPORTC_LATC.setLATC14(thebits : TBits_1); inline;
  60245. begin
  60246. if thebits = 0 then
  60247. pTDefRegMap(@Self)^.clr := $00004000
  60248. else
  60249. pTDefRegMap(@Self)^.&set := $00004000;
  60250. end;
  60251. function TPORTC_LATC.getLATC14 : TBits_1; inline;
  60252. begin
  60253. getLATC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  60254. end;
  60255. procedure TPORTC_LATC.setLATC15; inline;
  60256. begin
  60257. pTDefRegMap(@Self)^.&set := $00008000;
  60258. end;
  60259. procedure TPORTC_LATC.clearLATC15; inline;
  60260. begin
  60261. pTDefRegMap(@Self)^.clr := $00008000;
  60262. end;
  60263. procedure TPORTC_LATC.setLATC15(thebits : TBits_1); inline;
  60264. begin
  60265. if thebits = 0 then
  60266. pTDefRegMap(@Self)^.clr := $00008000
  60267. else
  60268. pTDefRegMap(@Self)^.&set := $00008000;
  60269. end;
  60270. function TPORTC_LATC.getLATC15 : TBits_1; inline;
  60271. begin
  60272. getLATC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  60273. end;
  60274. procedure TPORTC_LATC.setw(thebits : TBits_32); inline;
  60275. begin
  60276. pTDefRegMap(@Self)^.val := thebits;
  60277. end;
  60278. function TPORTC_LATC.getw : TBits_32; inline;
  60279. begin
  60280. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60281. end;
  60282. procedure TPORTC_ODCC.setODCC12; inline;
  60283. begin
  60284. pTDefRegMap(@Self)^.&set := $00001000;
  60285. end;
  60286. procedure TPORTC_ODCC.clearODCC12; inline;
  60287. begin
  60288. pTDefRegMap(@Self)^.clr := $00001000;
  60289. end;
  60290. procedure TPORTC_ODCC.setODCC12(thebits : TBits_1); inline;
  60291. begin
  60292. if thebits = 0 then
  60293. pTDefRegMap(@Self)^.clr := $00001000
  60294. else
  60295. pTDefRegMap(@Self)^.&set := $00001000;
  60296. end;
  60297. function TPORTC_ODCC.getODCC12 : TBits_1; inline;
  60298. begin
  60299. getODCC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  60300. end;
  60301. procedure TPORTC_ODCC.setODCC13; inline;
  60302. begin
  60303. pTDefRegMap(@Self)^.&set := $00002000;
  60304. end;
  60305. procedure TPORTC_ODCC.clearODCC13; inline;
  60306. begin
  60307. pTDefRegMap(@Self)^.clr := $00002000;
  60308. end;
  60309. procedure TPORTC_ODCC.setODCC13(thebits : TBits_1); inline;
  60310. begin
  60311. if thebits = 0 then
  60312. pTDefRegMap(@Self)^.clr := $00002000
  60313. else
  60314. pTDefRegMap(@Self)^.&set := $00002000;
  60315. end;
  60316. function TPORTC_ODCC.getODCC13 : TBits_1; inline;
  60317. begin
  60318. getODCC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  60319. end;
  60320. procedure TPORTC_ODCC.setODCC14; inline;
  60321. begin
  60322. pTDefRegMap(@Self)^.&set := $00004000;
  60323. end;
  60324. procedure TPORTC_ODCC.clearODCC14; inline;
  60325. begin
  60326. pTDefRegMap(@Self)^.clr := $00004000;
  60327. end;
  60328. procedure TPORTC_ODCC.setODCC14(thebits : TBits_1); inline;
  60329. begin
  60330. if thebits = 0 then
  60331. pTDefRegMap(@Self)^.clr := $00004000
  60332. else
  60333. pTDefRegMap(@Self)^.&set := $00004000;
  60334. end;
  60335. function TPORTC_ODCC.getODCC14 : TBits_1; inline;
  60336. begin
  60337. getODCC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  60338. end;
  60339. procedure TPORTC_ODCC.setODCC15; inline;
  60340. begin
  60341. pTDefRegMap(@Self)^.&set := $00008000;
  60342. end;
  60343. procedure TPORTC_ODCC.clearODCC15; inline;
  60344. begin
  60345. pTDefRegMap(@Self)^.clr := $00008000;
  60346. end;
  60347. procedure TPORTC_ODCC.setODCC15(thebits : TBits_1); inline;
  60348. begin
  60349. if thebits = 0 then
  60350. pTDefRegMap(@Self)^.clr := $00008000
  60351. else
  60352. pTDefRegMap(@Self)^.&set := $00008000;
  60353. end;
  60354. function TPORTC_ODCC.getODCC15 : TBits_1; inline;
  60355. begin
  60356. getODCC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  60357. end;
  60358. procedure TPORTC_ODCC.setw(thebits : TBits_32); inline;
  60359. begin
  60360. pTDefRegMap(@Self)^.val := thebits;
  60361. end;
  60362. function TPORTC_ODCC.getw : TBits_32; inline;
  60363. begin
  60364. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60365. end;
  60366. procedure TPORTD_TRISD.setTRISD0; inline;
  60367. begin
  60368. pTDefRegMap(@Self)^.&set := $00000001;
  60369. end;
  60370. procedure TPORTD_TRISD.clearTRISD0; inline;
  60371. begin
  60372. pTDefRegMap(@Self)^.clr := $00000001;
  60373. end;
  60374. procedure TPORTD_TRISD.setTRISD0(thebits : TBits_1); inline;
  60375. begin
  60376. if thebits = 0 then
  60377. pTDefRegMap(@Self)^.clr := $00000001
  60378. else
  60379. pTDefRegMap(@Self)^.&set := $00000001;
  60380. end;
  60381. function TPORTD_TRISD.getTRISD0 : TBits_1; inline;
  60382. begin
  60383. getTRISD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  60384. end;
  60385. procedure TPORTD_TRISD.setTRISD1; inline;
  60386. begin
  60387. pTDefRegMap(@Self)^.&set := $00000002;
  60388. end;
  60389. procedure TPORTD_TRISD.clearTRISD1; inline;
  60390. begin
  60391. pTDefRegMap(@Self)^.clr := $00000002;
  60392. end;
  60393. procedure TPORTD_TRISD.setTRISD1(thebits : TBits_1); inline;
  60394. begin
  60395. if thebits = 0 then
  60396. pTDefRegMap(@Self)^.clr := $00000002
  60397. else
  60398. pTDefRegMap(@Self)^.&set := $00000002;
  60399. end;
  60400. function TPORTD_TRISD.getTRISD1 : TBits_1; inline;
  60401. begin
  60402. getTRISD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  60403. end;
  60404. procedure TPORTD_TRISD.setTRISD2; inline;
  60405. begin
  60406. pTDefRegMap(@Self)^.&set := $00000004;
  60407. end;
  60408. procedure TPORTD_TRISD.clearTRISD2; inline;
  60409. begin
  60410. pTDefRegMap(@Self)^.clr := $00000004;
  60411. end;
  60412. procedure TPORTD_TRISD.setTRISD2(thebits : TBits_1); inline;
  60413. begin
  60414. if thebits = 0 then
  60415. pTDefRegMap(@Self)^.clr := $00000004
  60416. else
  60417. pTDefRegMap(@Self)^.&set := $00000004;
  60418. end;
  60419. function TPORTD_TRISD.getTRISD2 : TBits_1; inline;
  60420. begin
  60421. getTRISD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60422. end;
  60423. procedure TPORTD_TRISD.setTRISD3; inline;
  60424. begin
  60425. pTDefRegMap(@Self)^.&set := $00000008;
  60426. end;
  60427. procedure TPORTD_TRISD.clearTRISD3; inline;
  60428. begin
  60429. pTDefRegMap(@Self)^.clr := $00000008;
  60430. end;
  60431. procedure TPORTD_TRISD.setTRISD3(thebits : TBits_1); inline;
  60432. begin
  60433. if thebits = 0 then
  60434. pTDefRegMap(@Self)^.clr := $00000008
  60435. else
  60436. pTDefRegMap(@Self)^.&set := $00000008;
  60437. end;
  60438. function TPORTD_TRISD.getTRISD3 : TBits_1; inline;
  60439. begin
  60440. getTRISD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60441. end;
  60442. procedure TPORTD_TRISD.setTRISD4; inline;
  60443. begin
  60444. pTDefRegMap(@Self)^.&set := $00000010;
  60445. end;
  60446. procedure TPORTD_TRISD.clearTRISD4; inline;
  60447. begin
  60448. pTDefRegMap(@Self)^.clr := $00000010;
  60449. end;
  60450. procedure TPORTD_TRISD.setTRISD4(thebits : TBits_1); inline;
  60451. begin
  60452. if thebits = 0 then
  60453. pTDefRegMap(@Self)^.clr := $00000010
  60454. else
  60455. pTDefRegMap(@Self)^.&set := $00000010;
  60456. end;
  60457. function TPORTD_TRISD.getTRISD4 : TBits_1; inline;
  60458. begin
  60459. getTRISD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  60460. end;
  60461. procedure TPORTD_TRISD.setTRISD5; inline;
  60462. begin
  60463. pTDefRegMap(@Self)^.&set := $00000020;
  60464. end;
  60465. procedure TPORTD_TRISD.clearTRISD5; inline;
  60466. begin
  60467. pTDefRegMap(@Self)^.clr := $00000020;
  60468. end;
  60469. procedure TPORTD_TRISD.setTRISD5(thebits : TBits_1); inline;
  60470. begin
  60471. if thebits = 0 then
  60472. pTDefRegMap(@Self)^.clr := $00000020
  60473. else
  60474. pTDefRegMap(@Self)^.&set := $00000020;
  60475. end;
  60476. function TPORTD_TRISD.getTRISD5 : TBits_1; inline;
  60477. begin
  60478. getTRISD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  60479. end;
  60480. procedure TPORTD_TRISD.setTRISD6; inline;
  60481. begin
  60482. pTDefRegMap(@Self)^.&set := $00000040;
  60483. end;
  60484. procedure TPORTD_TRISD.clearTRISD6; inline;
  60485. begin
  60486. pTDefRegMap(@Self)^.clr := $00000040;
  60487. end;
  60488. procedure TPORTD_TRISD.setTRISD6(thebits : TBits_1); inline;
  60489. begin
  60490. if thebits = 0 then
  60491. pTDefRegMap(@Self)^.clr := $00000040
  60492. else
  60493. pTDefRegMap(@Self)^.&set := $00000040;
  60494. end;
  60495. function TPORTD_TRISD.getTRISD6 : TBits_1; inline;
  60496. begin
  60497. getTRISD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  60498. end;
  60499. procedure TPORTD_TRISD.setTRISD7; inline;
  60500. begin
  60501. pTDefRegMap(@Self)^.&set := $00000080;
  60502. end;
  60503. procedure TPORTD_TRISD.clearTRISD7; inline;
  60504. begin
  60505. pTDefRegMap(@Self)^.clr := $00000080;
  60506. end;
  60507. procedure TPORTD_TRISD.setTRISD7(thebits : TBits_1); inline;
  60508. begin
  60509. if thebits = 0 then
  60510. pTDefRegMap(@Self)^.clr := $00000080
  60511. else
  60512. pTDefRegMap(@Self)^.&set := $00000080;
  60513. end;
  60514. function TPORTD_TRISD.getTRISD7 : TBits_1; inline;
  60515. begin
  60516. getTRISD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  60517. end;
  60518. procedure TPORTD_TRISD.setTRISD8; inline;
  60519. begin
  60520. pTDefRegMap(@Self)^.&set := $00000100;
  60521. end;
  60522. procedure TPORTD_TRISD.clearTRISD8; inline;
  60523. begin
  60524. pTDefRegMap(@Self)^.clr := $00000100;
  60525. end;
  60526. procedure TPORTD_TRISD.setTRISD8(thebits : TBits_1); inline;
  60527. begin
  60528. if thebits = 0 then
  60529. pTDefRegMap(@Self)^.clr := $00000100
  60530. else
  60531. pTDefRegMap(@Self)^.&set := $00000100;
  60532. end;
  60533. function TPORTD_TRISD.getTRISD8 : TBits_1; inline;
  60534. begin
  60535. getTRISD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  60536. end;
  60537. procedure TPORTD_TRISD.setTRISD9; inline;
  60538. begin
  60539. pTDefRegMap(@Self)^.&set := $00000200;
  60540. end;
  60541. procedure TPORTD_TRISD.clearTRISD9; inline;
  60542. begin
  60543. pTDefRegMap(@Self)^.clr := $00000200;
  60544. end;
  60545. procedure TPORTD_TRISD.setTRISD9(thebits : TBits_1); inline;
  60546. begin
  60547. if thebits = 0 then
  60548. pTDefRegMap(@Self)^.clr := $00000200
  60549. else
  60550. pTDefRegMap(@Self)^.&set := $00000200;
  60551. end;
  60552. function TPORTD_TRISD.getTRISD9 : TBits_1; inline;
  60553. begin
  60554. getTRISD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  60555. end;
  60556. procedure TPORTD_TRISD.setTRISD10; inline;
  60557. begin
  60558. pTDefRegMap(@Self)^.&set := $00000400;
  60559. end;
  60560. procedure TPORTD_TRISD.clearTRISD10; inline;
  60561. begin
  60562. pTDefRegMap(@Self)^.clr := $00000400;
  60563. end;
  60564. procedure TPORTD_TRISD.setTRISD10(thebits : TBits_1); inline;
  60565. begin
  60566. if thebits = 0 then
  60567. pTDefRegMap(@Self)^.clr := $00000400
  60568. else
  60569. pTDefRegMap(@Self)^.&set := $00000400;
  60570. end;
  60571. function TPORTD_TRISD.getTRISD10 : TBits_1; inline;
  60572. begin
  60573. getTRISD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  60574. end;
  60575. procedure TPORTD_TRISD.setTRISD11; inline;
  60576. begin
  60577. pTDefRegMap(@Self)^.&set := $00000800;
  60578. end;
  60579. procedure TPORTD_TRISD.clearTRISD11; inline;
  60580. begin
  60581. pTDefRegMap(@Self)^.clr := $00000800;
  60582. end;
  60583. procedure TPORTD_TRISD.setTRISD11(thebits : TBits_1); inline;
  60584. begin
  60585. if thebits = 0 then
  60586. pTDefRegMap(@Self)^.clr := $00000800
  60587. else
  60588. pTDefRegMap(@Self)^.&set := $00000800;
  60589. end;
  60590. function TPORTD_TRISD.getTRISD11 : TBits_1; inline;
  60591. begin
  60592. getTRISD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  60593. end;
  60594. procedure TPORTD_TRISD.setw(thebits : TBits_32); inline;
  60595. begin
  60596. pTDefRegMap(@Self)^.val := thebits;
  60597. end;
  60598. function TPORTD_TRISD.getw : TBits_32; inline;
  60599. begin
  60600. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60601. end;
  60602. procedure TPORTD_PORTD.setRD0; inline;
  60603. begin
  60604. pTDefRegMap(@Self)^.&set := $00000001;
  60605. end;
  60606. procedure TPORTD_PORTD.clearRD0; inline;
  60607. begin
  60608. pTDefRegMap(@Self)^.clr := $00000001;
  60609. end;
  60610. procedure TPORTD_PORTD.setRD0(thebits : TBits_1); inline;
  60611. begin
  60612. if thebits = 0 then
  60613. pTDefRegMap(@Self)^.clr := $00000001
  60614. else
  60615. pTDefRegMap(@Self)^.&set := $00000001;
  60616. end;
  60617. function TPORTD_PORTD.getRD0 : TBits_1; inline;
  60618. begin
  60619. getRD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  60620. end;
  60621. procedure TPORTD_PORTD.setRD1; inline;
  60622. begin
  60623. pTDefRegMap(@Self)^.&set := $00000002;
  60624. end;
  60625. procedure TPORTD_PORTD.clearRD1; inline;
  60626. begin
  60627. pTDefRegMap(@Self)^.clr := $00000002;
  60628. end;
  60629. procedure TPORTD_PORTD.setRD1(thebits : TBits_1); inline;
  60630. begin
  60631. if thebits = 0 then
  60632. pTDefRegMap(@Self)^.clr := $00000002
  60633. else
  60634. pTDefRegMap(@Self)^.&set := $00000002;
  60635. end;
  60636. function TPORTD_PORTD.getRD1 : TBits_1; inline;
  60637. begin
  60638. getRD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  60639. end;
  60640. procedure TPORTD_PORTD.setRD2; inline;
  60641. begin
  60642. pTDefRegMap(@Self)^.&set := $00000004;
  60643. end;
  60644. procedure TPORTD_PORTD.clearRD2; inline;
  60645. begin
  60646. pTDefRegMap(@Self)^.clr := $00000004;
  60647. end;
  60648. procedure TPORTD_PORTD.setRD2(thebits : TBits_1); inline;
  60649. begin
  60650. if thebits = 0 then
  60651. pTDefRegMap(@Self)^.clr := $00000004
  60652. else
  60653. pTDefRegMap(@Self)^.&set := $00000004;
  60654. end;
  60655. function TPORTD_PORTD.getRD2 : TBits_1; inline;
  60656. begin
  60657. getRD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60658. end;
  60659. procedure TPORTD_PORTD.setRD3; inline;
  60660. begin
  60661. pTDefRegMap(@Self)^.&set := $00000008;
  60662. end;
  60663. procedure TPORTD_PORTD.clearRD3; inline;
  60664. begin
  60665. pTDefRegMap(@Self)^.clr := $00000008;
  60666. end;
  60667. procedure TPORTD_PORTD.setRD3(thebits : TBits_1); inline;
  60668. begin
  60669. if thebits = 0 then
  60670. pTDefRegMap(@Self)^.clr := $00000008
  60671. else
  60672. pTDefRegMap(@Self)^.&set := $00000008;
  60673. end;
  60674. function TPORTD_PORTD.getRD3 : TBits_1; inline;
  60675. begin
  60676. getRD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60677. end;
  60678. procedure TPORTD_PORTD.setRD4; inline;
  60679. begin
  60680. pTDefRegMap(@Self)^.&set := $00000010;
  60681. end;
  60682. procedure TPORTD_PORTD.clearRD4; inline;
  60683. begin
  60684. pTDefRegMap(@Self)^.clr := $00000010;
  60685. end;
  60686. procedure TPORTD_PORTD.setRD4(thebits : TBits_1); inline;
  60687. begin
  60688. if thebits = 0 then
  60689. pTDefRegMap(@Self)^.clr := $00000010
  60690. else
  60691. pTDefRegMap(@Self)^.&set := $00000010;
  60692. end;
  60693. function TPORTD_PORTD.getRD4 : TBits_1; inline;
  60694. begin
  60695. getRD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  60696. end;
  60697. procedure TPORTD_PORTD.setRD5; inline;
  60698. begin
  60699. pTDefRegMap(@Self)^.&set := $00000020;
  60700. end;
  60701. procedure TPORTD_PORTD.clearRD5; inline;
  60702. begin
  60703. pTDefRegMap(@Self)^.clr := $00000020;
  60704. end;
  60705. procedure TPORTD_PORTD.setRD5(thebits : TBits_1); inline;
  60706. begin
  60707. if thebits = 0 then
  60708. pTDefRegMap(@Self)^.clr := $00000020
  60709. else
  60710. pTDefRegMap(@Self)^.&set := $00000020;
  60711. end;
  60712. function TPORTD_PORTD.getRD5 : TBits_1; inline;
  60713. begin
  60714. getRD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  60715. end;
  60716. procedure TPORTD_PORTD.setRD6; inline;
  60717. begin
  60718. pTDefRegMap(@Self)^.&set := $00000040;
  60719. end;
  60720. procedure TPORTD_PORTD.clearRD6; inline;
  60721. begin
  60722. pTDefRegMap(@Self)^.clr := $00000040;
  60723. end;
  60724. procedure TPORTD_PORTD.setRD6(thebits : TBits_1); inline;
  60725. begin
  60726. if thebits = 0 then
  60727. pTDefRegMap(@Self)^.clr := $00000040
  60728. else
  60729. pTDefRegMap(@Self)^.&set := $00000040;
  60730. end;
  60731. function TPORTD_PORTD.getRD6 : TBits_1; inline;
  60732. begin
  60733. getRD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  60734. end;
  60735. procedure TPORTD_PORTD.setRD7; inline;
  60736. begin
  60737. pTDefRegMap(@Self)^.&set := $00000080;
  60738. end;
  60739. procedure TPORTD_PORTD.clearRD7; inline;
  60740. begin
  60741. pTDefRegMap(@Self)^.clr := $00000080;
  60742. end;
  60743. procedure TPORTD_PORTD.setRD7(thebits : TBits_1); inline;
  60744. begin
  60745. if thebits = 0 then
  60746. pTDefRegMap(@Self)^.clr := $00000080
  60747. else
  60748. pTDefRegMap(@Self)^.&set := $00000080;
  60749. end;
  60750. function TPORTD_PORTD.getRD7 : TBits_1; inline;
  60751. begin
  60752. getRD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  60753. end;
  60754. procedure TPORTD_PORTD.setRD8; inline;
  60755. begin
  60756. pTDefRegMap(@Self)^.&set := $00000100;
  60757. end;
  60758. procedure TPORTD_PORTD.clearRD8; inline;
  60759. begin
  60760. pTDefRegMap(@Self)^.clr := $00000100;
  60761. end;
  60762. procedure TPORTD_PORTD.setRD8(thebits : TBits_1); inline;
  60763. begin
  60764. if thebits = 0 then
  60765. pTDefRegMap(@Self)^.clr := $00000100
  60766. else
  60767. pTDefRegMap(@Self)^.&set := $00000100;
  60768. end;
  60769. function TPORTD_PORTD.getRD8 : TBits_1; inline;
  60770. begin
  60771. getRD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  60772. end;
  60773. procedure TPORTD_PORTD.setRD9; inline;
  60774. begin
  60775. pTDefRegMap(@Self)^.&set := $00000200;
  60776. end;
  60777. procedure TPORTD_PORTD.clearRD9; inline;
  60778. begin
  60779. pTDefRegMap(@Self)^.clr := $00000200;
  60780. end;
  60781. procedure TPORTD_PORTD.setRD9(thebits : TBits_1); inline;
  60782. begin
  60783. if thebits = 0 then
  60784. pTDefRegMap(@Self)^.clr := $00000200
  60785. else
  60786. pTDefRegMap(@Self)^.&set := $00000200;
  60787. end;
  60788. function TPORTD_PORTD.getRD9 : TBits_1; inline;
  60789. begin
  60790. getRD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  60791. end;
  60792. procedure TPORTD_PORTD.setRD10; inline;
  60793. begin
  60794. pTDefRegMap(@Self)^.&set := $00000400;
  60795. end;
  60796. procedure TPORTD_PORTD.clearRD10; inline;
  60797. begin
  60798. pTDefRegMap(@Self)^.clr := $00000400;
  60799. end;
  60800. procedure TPORTD_PORTD.setRD10(thebits : TBits_1); inline;
  60801. begin
  60802. if thebits = 0 then
  60803. pTDefRegMap(@Self)^.clr := $00000400
  60804. else
  60805. pTDefRegMap(@Self)^.&set := $00000400;
  60806. end;
  60807. function TPORTD_PORTD.getRD10 : TBits_1; inline;
  60808. begin
  60809. getRD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  60810. end;
  60811. procedure TPORTD_PORTD.setRD11; inline;
  60812. begin
  60813. pTDefRegMap(@Self)^.&set := $00000800;
  60814. end;
  60815. procedure TPORTD_PORTD.clearRD11; inline;
  60816. begin
  60817. pTDefRegMap(@Self)^.clr := $00000800;
  60818. end;
  60819. procedure TPORTD_PORTD.setRD11(thebits : TBits_1); inline;
  60820. begin
  60821. if thebits = 0 then
  60822. pTDefRegMap(@Self)^.clr := $00000800
  60823. else
  60824. pTDefRegMap(@Self)^.&set := $00000800;
  60825. end;
  60826. function TPORTD_PORTD.getRD11 : TBits_1; inline;
  60827. begin
  60828. getRD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  60829. end;
  60830. procedure TPORTD_PORTD.setw(thebits : TBits_32); inline;
  60831. begin
  60832. pTDefRegMap(@Self)^.val := thebits;
  60833. end;
  60834. function TPORTD_PORTD.getw : TBits_32; inline;
  60835. begin
  60836. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60837. end;
  60838. procedure TPORTD_LATD.setLATD0; inline;
  60839. begin
  60840. pTDefRegMap(@Self)^.&set := $00000001;
  60841. end;
  60842. procedure TPORTD_LATD.clearLATD0; inline;
  60843. begin
  60844. pTDefRegMap(@Self)^.clr := $00000001;
  60845. end;
  60846. procedure TPORTD_LATD.setLATD0(thebits : TBits_1); inline;
  60847. begin
  60848. if thebits = 0 then
  60849. pTDefRegMap(@Self)^.clr := $00000001
  60850. else
  60851. pTDefRegMap(@Self)^.&set := $00000001;
  60852. end;
  60853. function TPORTD_LATD.getLATD0 : TBits_1; inline;
  60854. begin
  60855. getLATD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  60856. end;
  60857. procedure TPORTD_LATD.setLATD1; inline;
  60858. begin
  60859. pTDefRegMap(@Self)^.&set := $00000002;
  60860. end;
  60861. procedure TPORTD_LATD.clearLATD1; inline;
  60862. begin
  60863. pTDefRegMap(@Self)^.clr := $00000002;
  60864. end;
  60865. procedure TPORTD_LATD.setLATD1(thebits : TBits_1); inline;
  60866. begin
  60867. if thebits = 0 then
  60868. pTDefRegMap(@Self)^.clr := $00000002
  60869. else
  60870. pTDefRegMap(@Self)^.&set := $00000002;
  60871. end;
  60872. function TPORTD_LATD.getLATD1 : TBits_1; inline;
  60873. begin
  60874. getLATD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  60875. end;
  60876. procedure TPORTD_LATD.setLATD2; inline;
  60877. begin
  60878. pTDefRegMap(@Self)^.&set := $00000004;
  60879. end;
  60880. procedure TPORTD_LATD.clearLATD2; inline;
  60881. begin
  60882. pTDefRegMap(@Self)^.clr := $00000004;
  60883. end;
  60884. procedure TPORTD_LATD.setLATD2(thebits : TBits_1); inline;
  60885. begin
  60886. if thebits = 0 then
  60887. pTDefRegMap(@Self)^.clr := $00000004
  60888. else
  60889. pTDefRegMap(@Self)^.&set := $00000004;
  60890. end;
  60891. function TPORTD_LATD.getLATD2 : TBits_1; inline;
  60892. begin
  60893. getLATD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60894. end;
  60895. procedure TPORTD_LATD.setLATD3; inline;
  60896. begin
  60897. pTDefRegMap(@Self)^.&set := $00000008;
  60898. end;
  60899. procedure TPORTD_LATD.clearLATD3; inline;
  60900. begin
  60901. pTDefRegMap(@Self)^.clr := $00000008;
  60902. end;
  60903. procedure TPORTD_LATD.setLATD3(thebits : TBits_1); inline;
  60904. begin
  60905. if thebits = 0 then
  60906. pTDefRegMap(@Self)^.clr := $00000008
  60907. else
  60908. pTDefRegMap(@Self)^.&set := $00000008;
  60909. end;
  60910. function TPORTD_LATD.getLATD3 : TBits_1; inline;
  60911. begin
  60912. getLATD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60913. end;
  60914. procedure TPORTD_LATD.setLATD4; inline;
  60915. begin
  60916. pTDefRegMap(@Self)^.&set := $00000010;
  60917. end;
  60918. procedure TPORTD_LATD.clearLATD4; inline;
  60919. begin
  60920. pTDefRegMap(@Self)^.clr := $00000010;
  60921. end;
  60922. procedure TPORTD_LATD.setLATD4(thebits : TBits_1); inline;
  60923. begin
  60924. if thebits = 0 then
  60925. pTDefRegMap(@Self)^.clr := $00000010
  60926. else
  60927. pTDefRegMap(@Self)^.&set := $00000010;
  60928. end;
  60929. function TPORTD_LATD.getLATD4 : TBits_1; inline;
  60930. begin
  60931. getLATD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  60932. end;
  60933. procedure TPORTD_LATD.setLATD5; inline;
  60934. begin
  60935. pTDefRegMap(@Self)^.&set := $00000020;
  60936. end;
  60937. procedure TPORTD_LATD.clearLATD5; inline;
  60938. begin
  60939. pTDefRegMap(@Self)^.clr := $00000020;
  60940. end;
  60941. procedure TPORTD_LATD.setLATD5(thebits : TBits_1); inline;
  60942. begin
  60943. if thebits = 0 then
  60944. pTDefRegMap(@Self)^.clr := $00000020
  60945. else
  60946. pTDefRegMap(@Self)^.&set := $00000020;
  60947. end;
  60948. function TPORTD_LATD.getLATD5 : TBits_1; inline;
  60949. begin
  60950. getLATD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  60951. end;
  60952. procedure TPORTD_LATD.setLATD6; inline;
  60953. begin
  60954. pTDefRegMap(@Self)^.&set := $00000040;
  60955. end;
  60956. procedure TPORTD_LATD.clearLATD6; inline;
  60957. begin
  60958. pTDefRegMap(@Self)^.clr := $00000040;
  60959. end;
  60960. procedure TPORTD_LATD.setLATD6(thebits : TBits_1); inline;
  60961. begin
  60962. if thebits = 0 then
  60963. pTDefRegMap(@Self)^.clr := $00000040
  60964. else
  60965. pTDefRegMap(@Self)^.&set := $00000040;
  60966. end;
  60967. function TPORTD_LATD.getLATD6 : TBits_1; inline;
  60968. begin
  60969. getLATD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  60970. end;
  60971. procedure TPORTD_LATD.setLATD7; inline;
  60972. begin
  60973. pTDefRegMap(@Self)^.&set := $00000080;
  60974. end;
  60975. procedure TPORTD_LATD.clearLATD7; inline;
  60976. begin
  60977. pTDefRegMap(@Self)^.clr := $00000080;
  60978. end;
  60979. procedure TPORTD_LATD.setLATD7(thebits : TBits_1); inline;
  60980. begin
  60981. if thebits = 0 then
  60982. pTDefRegMap(@Self)^.clr := $00000080
  60983. else
  60984. pTDefRegMap(@Self)^.&set := $00000080;
  60985. end;
  60986. function TPORTD_LATD.getLATD7 : TBits_1; inline;
  60987. begin
  60988. getLATD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  60989. end;
  60990. procedure TPORTD_LATD.setLATD8; inline;
  60991. begin
  60992. pTDefRegMap(@Self)^.&set := $00000100;
  60993. end;
  60994. procedure TPORTD_LATD.clearLATD8; inline;
  60995. begin
  60996. pTDefRegMap(@Self)^.clr := $00000100;
  60997. end;
  60998. procedure TPORTD_LATD.setLATD8(thebits : TBits_1); inline;
  60999. begin
  61000. if thebits = 0 then
  61001. pTDefRegMap(@Self)^.clr := $00000100
  61002. else
  61003. pTDefRegMap(@Self)^.&set := $00000100;
  61004. end;
  61005. function TPORTD_LATD.getLATD8 : TBits_1; inline;
  61006. begin
  61007. getLATD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61008. end;
  61009. procedure TPORTD_LATD.setLATD9; inline;
  61010. begin
  61011. pTDefRegMap(@Self)^.&set := $00000200;
  61012. end;
  61013. procedure TPORTD_LATD.clearLATD9; inline;
  61014. begin
  61015. pTDefRegMap(@Self)^.clr := $00000200;
  61016. end;
  61017. procedure TPORTD_LATD.setLATD9(thebits : TBits_1); inline;
  61018. begin
  61019. if thebits = 0 then
  61020. pTDefRegMap(@Self)^.clr := $00000200
  61021. else
  61022. pTDefRegMap(@Self)^.&set := $00000200;
  61023. end;
  61024. function TPORTD_LATD.getLATD9 : TBits_1; inline;
  61025. begin
  61026. getLATD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61027. end;
  61028. procedure TPORTD_LATD.setLATD10; inline;
  61029. begin
  61030. pTDefRegMap(@Self)^.&set := $00000400;
  61031. end;
  61032. procedure TPORTD_LATD.clearLATD10; inline;
  61033. begin
  61034. pTDefRegMap(@Self)^.clr := $00000400;
  61035. end;
  61036. procedure TPORTD_LATD.setLATD10(thebits : TBits_1); inline;
  61037. begin
  61038. if thebits = 0 then
  61039. pTDefRegMap(@Self)^.clr := $00000400
  61040. else
  61041. pTDefRegMap(@Self)^.&set := $00000400;
  61042. end;
  61043. function TPORTD_LATD.getLATD10 : TBits_1; inline;
  61044. begin
  61045. getLATD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  61046. end;
  61047. procedure TPORTD_LATD.setLATD11; inline;
  61048. begin
  61049. pTDefRegMap(@Self)^.&set := $00000800;
  61050. end;
  61051. procedure TPORTD_LATD.clearLATD11; inline;
  61052. begin
  61053. pTDefRegMap(@Self)^.clr := $00000800;
  61054. end;
  61055. procedure TPORTD_LATD.setLATD11(thebits : TBits_1); inline;
  61056. begin
  61057. if thebits = 0 then
  61058. pTDefRegMap(@Self)^.clr := $00000800
  61059. else
  61060. pTDefRegMap(@Self)^.&set := $00000800;
  61061. end;
  61062. function TPORTD_LATD.getLATD11 : TBits_1; inline;
  61063. begin
  61064. getLATD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  61065. end;
  61066. procedure TPORTD_LATD.setw(thebits : TBits_32); inline;
  61067. begin
  61068. pTDefRegMap(@Self)^.val := thebits;
  61069. end;
  61070. function TPORTD_LATD.getw : TBits_32; inline;
  61071. begin
  61072. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61073. end;
  61074. procedure TPORTD_ODCD.setODCD0; inline;
  61075. begin
  61076. pTDefRegMap(@Self)^.&set := $00000001;
  61077. end;
  61078. procedure TPORTD_ODCD.clearODCD0; inline;
  61079. begin
  61080. pTDefRegMap(@Self)^.clr := $00000001;
  61081. end;
  61082. procedure TPORTD_ODCD.setODCD0(thebits : TBits_1); inline;
  61083. begin
  61084. if thebits = 0 then
  61085. pTDefRegMap(@Self)^.clr := $00000001
  61086. else
  61087. pTDefRegMap(@Self)^.&set := $00000001;
  61088. end;
  61089. function TPORTD_ODCD.getODCD0 : TBits_1; inline;
  61090. begin
  61091. getODCD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61092. end;
  61093. procedure TPORTD_ODCD.setODCD1; inline;
  61094. begin
  61095. pTDefRegMap(@Self)^.&set := $00000002;
  61096. end;
  61097. procedure TPORTD_ODCD.clearODCD1; inline;
  61098. begin
  61099. pTDefRegMap(@Self)^.clr := $00000002;
  61100. end;
  61101. procedure TPORTD_ODCD.setODCD1(thebits : TBits_1); inline;
  61102. begin
  61103. if thebits = 0 then
  61104. pTDefRegMap(@Self)^.clr := $00000002
  61105. else
  61106. pTDefRegMap(@Self)^.&set := $00000002;
  61107. end;
  61108. function TPORTD_ODCD.getODCD1 : TBits_1; inline;
  61109. begin
  61110. getODCD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61111. end;
  61112. procedure TPORTD_ODCD.setODCD2; inline;
  61113. begin
  61114. pTDefRegMap(@Self)^.&set := $00000004;
  61115. end;
  61116. procedure TPORTD_ODCD.clearODCD2; inline;
  61117. begin
  61118. pTDefRegMap(@Self)^.clr := $00000004;
  61119. end;
  61120. procedure TPORTD_ODCD.setODCD2(thebits : TBits_1); inline;
  61121. begin
  61122. if thebits = 0 then
  61123. pTDefRegMap(@Self)^.clr := $00000004
  61124. else
  61125. pTDefRegMap(@Self)^.&set := $00000004;
  61126. end;
  61127. function TPORTD_ODCD.getODCD2 : TBits_1; inline;
  61128. begin
  61129. getODCD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61130. end;
  61131. procedure TPORTD_ODCD.setODCD3; inline;
  61132. begin
  61133. pTDefRegMap(@Self)^.&set := $00000008;
  61134. end;
  61135. procedure TPORTD_ODCD.clearODCD3; inline;
  61136. begin
  61137. pTDefRegMap(@Self)^.clr := $00000008;
  61138. end;
  61139. procedure TPORTD_ODCD.setODCD3(thebits : TBits_1); inline;
  61140. begin
  61141. if thebits = 0 then
  61142. pTDefRegMap(@Self)^.clr := $00000008
  61143. else
  61144. pTDefRegMap(@Self)^.&set := $00000008;
  61145. end;
  61146. function TPORTD_ODCD.getODCD3 : TBits_1; inline;
  61147. begin
  61148. getODCD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61149. end;
  61150. procedure TPORTD_ODCD.setODCD4; inline;
  61151. begin
  61152. pTDefRegMap(@Self)^.&set := $00000010;
  61153. end;
  61154. procedure TPORTD_ODCD.clearODCD4; inline;
  61155. begin
  61156. pTDefRegMap(@Self)^.clr := $00000010;
  61157. end;
  61158. procedure TPORTD_ODCD.setODCD4(thebits : TBits_1); inline;
  61159. begin
  61160. if thebits = 0 then
  61161. pTDefRegMap(@Self)^.clr := $00000010
  61162. else
  61163. pTDefRegMap(@Self)^.&set := $00000010;
  61164. end;
  61165. function TPORTD_ODCD.getODCD4 : TBits_1; inline;
  61166. begin
  61167. getODCD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61168. end;
  61169. procedure TPORTD_ODCD.setODCD5; inline;
  61170. begin
  61171. pTDefRegMap(@Self)^.&set := $00000020;
  61172. end;
  61173. procedure TPORTD_ODCD.clearODCD5; inline;
  61174. begin
  61175. pTDefRegMap(@Self)^.clr := $00000020;
  61176. end;
  61177. procedure TPORTD_ODCD.setODCD5(thebits : TBits_1); inline;
  61178. begin
  61179. if thebits = 0 then
  61180. pTDefRegMap(@Self)^.clr := $00000020
  61181. else
  61182. pTDefRegMap(@Self)^.&set := $00000020;
  61183. end;
  61184. function TPORTD_ODCD.getODCD5 : TBits_1; inline;
  61185. begin
  61186. getODCD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61187. end;
  61188. procedure TPORTD_ODCD.setODCD6; inline;
  61189. begin
  61190. pTDefRegMap(@Self)^.&set := $00000040;
  61191. end;
  61192. procedure TPORTD_ODCD.clearODCD6; inline;
  61193. begin
  61194. pTDefRegMap(@Self)^.clr := $00000040;
  61195. end;
  61196. procedure TPORTD_ODCD.setODCD6(thebits : TBits_1); inline;
  61197. begin
  61198. if thebits = 0 then
  61199. pTDefRegMap(@Self)^.clr := $00000040
  61200. else
  61201. pTDefRegMap(@Self)^.&set := $00000040;
  61202. end;
  61203. function TPORTD_ODCD.getODCD6 : TBits_1; inline;
  61204. begin
  61205. getODCD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61206. end;
  61207. procedure TPORTD_ODCD.setODCD7; inline;
  61208. begin
  61209. pTDefRegMap(@Self)^.&set := $00000080;
  61210. end;
  61211. procedure TPORTD_ODCD.clearODCD7; inline;
  61212. begin
  61213. pTDefRegMap(@Self)^.clr := $00000080;
  61214. end;
  61215. procedure TPORTD_ODCD.setODCD7(thebits : TBits_1); inline;
  61216. begin
  61217. if thebits = 0 then
  61218. pTDefRegMap(@Self)^.clr := $00000080
  61219. else
  61220. pTDefRegMap(@Self)^.&set := $00000080;
  61221. end;
  61222. function TPORTD_ODCD.getODCD7 : TBits_1; inline;
  61223. begin
  61224. getODCD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61225. end;
  61226. procedure TPORTD_ODCD.setODCD8; inline;
  61227. begin
  61228. pTDefRegMap(@Self)^.&set := $00000100;
  61229. end;
  61230. procedure TPORTD_ODCD.clearODCD8; inline;
  61231. begin
  61232. pTDefRegMap(@Self)^.clr := $00000100;
  61233. end;
  61234. procedure TPORTD_ODCD.setODCD8(thebits : TBits_1); inline;
  61235. begin
  61236. if thebits = 0 then
  61237. pTDefRegMap(@Self)^.clr := $00000100
  61238. else
  61239. pTDefRegMap(@Self)^.&set := $00000100;
  61240. end;
  61241. function TPORTD_ODCD.getODCD8 : TBits_1; inline;
  61242. begin
  61243. getODCD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61244. end;
  61245. procedure TPORTD_ODCD.setODCD9; inline;
  61246. begin
  61247. pTDefRegMap(@Self)^.&set := $00000200;
  61248. end;
  61249. procedure TPORTD_ODCD.clearODCD9; inline;
  61250. begin
  61251. pTDefRegMap(@Self)^.clr := $00000200;
  61252. end;
  61253. procedure TPORTD_ODCD.setODCD9(thebits : TBits_1); inline;
  61254. begin
  61255. if thebits = 0 then
  61256. pTDefRegMap(@Self)^.clr := $00000200
  61257. else
  61258. pTDefRegMap(@Self)^.&set := $00000200;
  61259. end;
  61260. function TPORTD_ODCD.getODCD9 : TBits_1; inline;
  61261. begin
  61262. getODCD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61263. end;
  61264. procedure TPORTD_ODCD.setODCD10; inline;
  61265. begin
  61266. pTDefRegMap(@Self)^.&set := $00000400;
  61267. end;
  61268. procedure TPORTD_ODCD.clearODCD10; inline;
  61269. begin
  61270. pTDefRegMap(@Self)^.clr := $00000400;
  61271. end;
  61272. procedure TPORTD_ODCD.setODCD10(thebits : TBits_1); inline;
  61273. begin
  61274. if thebits = 0 then
  61275. pTDefRegMap(@Self)^.clr := $00000400
  61276. else
  61277. pTDefRegMap(@Self)^.&set := $00000400;
  61278. end;
  61279. function TPORTD_ODCD.getODCD10 : TBits_1; inline;
  61280. begin
  61281. getODCD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  61282. end;
  61283. procedure TPORTD_ODCD.setODCD11; inline;
  61284. begin
  61285. pTDefRegMap(@Self)^.&set := $00000800;
  61286. end;
  61287. procedure TPORTD_ODCD.clearODCD11; inline;
  61288. begin
  61289. pTDefRegMap(@Self)^.clr := $00000800;
  61290. end;
  61291. procedure TPORTD_ODCD.setODCD11(thebits : TBits_1); inline;
  61292. begin
  61293. if thebits = 0 then
  61294. pTDefRegMap(@Self)^.clr := $00000800
  61295. else
  61296. pTDefRegMap(@Self)^.&set := $00000800;
  61297. end;
  61298. function TPORTD_ODCD.getODCD11 : TBits_1; inline;
  61299. begin
  61300. getODCD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  61301. end;
  61302. procedure TPORTD_ODCD.setw(thebits : TBits_32); inline;
  61303. begin
  61304. pTDefRegMap(@Self)^.val := thebits;
  61305. end;
  61306. function TPORTD_ODCD.getw : TBits_32; inline;
  61307. begin
  61308. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61309. end;
  61310. procedure TPORTE_TRISE.setTRISE0; inline;
  61311. begin
  61312. pTDefRegMap(@Self)^.&set := $00000001;
  61313. end;
  61314. procedure TPORTE_TRISE.clearTRISE0; inline;
  61315. begin
  61316. pTDefRegMap(@Self)^.clr := $00000001;
  61317. end;
  61318. procedure TPORTE_TRISE.setTRISE0(thebits : TBits_1); inline;
  61319. begin
  61320. if thebits = 0 then
  61321. pTDefRegMap(@Self)^.clr := $00000001
  61322. else
  61323. pTDefRegMap(@Self)^.&set := $00000001;
  61324. end;
  61325. function TPORTE_TRISE.getTRISE0 : TBits_1; inline;
  61326. begin
  61327. getTRISE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61328. end;
  61329. procedure TPORTE_TRISE.setTRISE1; inline;
  61330. begin
  61331. pTDefRegMap(@Self)^.&set := $00000002;
  61332. end;
  61333. procedure TPORTE_TRISE.clearTRISE1; inline;
  61334. begin
  61335. pTDefRegMap(@Self)^.clr := $00000002;
  61336. end;
  61337. procedure TPORTE_TRISE.setTRISE1(thebits : TBits_1); inline;
  61338. begin
  61339. if thebits = 0 then
  61340. pTDefRegMap(@Self)^.clr := $00000002
  61341. else
  61342. pTDefRegMap(@Self)^.&set := $00000002;
  61343. end;
  61344. function TPORTE_TRISE.getTRISE1 : TBits_1; inline;
  61345. begin
  61346. getTRISE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61347. end;
  61348. procedure TPORTE_TRISE.setTRISE2; inline;
  61349. begin
  61350. pTDefRegMap(@Self)^.&set := $00000004;
  61351. end;
  61352. procedure TPORTE_TRISE.clearTRISE2; inline;
  61353. begin
  61354. pTDefRegMap(@Self)^.clr := $00000004;
  61355. end;
  61356. procedure TPORTE_TRISE.setTRISE2(thebits : TBits_1); inline;
  61357. begin
  61358. if thebits = 0 then
  61359. pTDefRegMap(@Self)^.clr := $00000004
  61360. else
  61361. pTDefRegMap(@Self)^.&set := $00000004;
  61362. end;
  61363. function TPORTE_TRISE.getTRISE2 : TBits_1; inline;
  61364. begin
  61365. getTRISE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61366. end;
  61367. procedure TPORTE_TRISE.setTRISE3; inline;
  61368. begin
  61369. pTDefRegMap(@Self)^.&set := $00000008;
  61370. end;
  61371. procedure TPORTE_TRISE.clearTRISE3; inline;
  61372. begin
  61373. pTDefRegMap(@Self)^.clr := $00000008;
  61374. end;
  61375. procedure TPORTE_TRISE.setTRISE3(thebits : TBits_1); inline;
  61376. begin
  61377. if thebits = 0 then
  61378. pTDefRegMap(@Self)^.clr := $00000008
  61379. else
  61380. pTDefRegMap(@Self)^.&set := $00000008;
  61381. end;
  61382. function TPORTE_TRISE.getTRISE3 : TBits_1; inline;
  61383. begin
  61384. getTRISE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61385. end;
  61386. procedure TPORTE_TRISE.setTRISE4; inline;
  61387. begin
  61388. pTDefRegMap(@Self)^.&set := $00000010;
  61389. end;
  61390. procedure TPORTE_TRISE.clearTRISE4; inline;
  61391. begin
  61392. pTDefRegMap(@Self)^.clr := $00000010;
  61393. end;
  61394. procedure TPORTE_TRISE.setTRISE4(thebits : TBits_1); inline;
  61395. begin
  61396. if thebits = 0 then
  61397. pTDefRegMap(@Self)^.clr := $00000010
  61398. else
  61399. pTDefRegMap(@Self)^.&set := $00000010;
  61400. end;
  61401. function TPORTE_TRISE.getTRISE4 : TBits_1; inline;
  61402. begin
  61403. getTRISE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61404. end;
  61405. procedure TPORTE_TRISE.setTRISE5; inline;
  61406. begin
  61407. pTDefRegMap(@Self)^.&set := $00000020;
  61408. end;
  61409. procedure TPORTE_TRISE.clearTRISE5; inline;
  61410. begin
  61411. pTDefRegMap(@Self)^.clr := $00000020;
  61412. end;
  61413. procedure TPORTE_TRISE.setTRISE5(thebits : TBits_1); inline;
  61414. begin
  61415. if thebits = 0 then
  61416. pTDefRegMap(@Self)^.clr := $00000020
  61417. else
  61418. pTDefRegMap(@Self)^.&set := $00000020;
  61419. end;
  61420. function TPORTE_TRISE.getTRISE5 : TBits_1; inline;
  61421. begin
  61422. getTRISE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61423. end;
  61424. procedure TPORTE_TRISE.setTRISE6; inline;
  61425. begin
  61426. pTDefRegMap(@Self)^.&set := $00000040;
  61427. end;
  61428. procedure TPORTE_TRISE.clearTRISE6; inline;
  61429. begin
  61430. pTDefRegMap(@Self)^.clr := $00000040;
  61431. end;
  61432. procedure TPORTE_TRISE.setTRISE6(thebits : TBits_1); inline;
  61433. begin
  61434. if thebits = 0 then
  61435. pTDefRegMap(@Self)^.clr := $00000040
  61436. else
  61437. pTDefRegMap(@Self)^.&set := $00000040;
  61438. end;
  61439. function TPORTE_TRISE.getTRISE6 : TBits_1; inline;
  61440. begin
  61441. getTRISE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61442. end;
  61443. procedure TPORTE_TRISE.setTRISE7; inline;
  61444. begin
  61445. pTDefRegMap(@Self)^.&set := $00000080;
  61446. end;
  61447. procedure TPORTE_TRISE.clearTRISE7; inline;
  61448. begin
  61449. pTDefRegMap(@Self)^.clr := $00000080;
  61450. end;
  61451. procedure TPORTE_TRISE.setTRISE7(thebits : TBits_1); inline;
  61452. begin
  61453. if thebits = 0 then
  61454. pTDefRegMap(@Self)^.clr := $00000080
  61455. else
  61456. pTDefRegMap(@Self)^.&set := $00000080;
  61457. end;
  61458. function TPORTE_TRISE.getTRISE7 : TBits_1; inline;
  61459. begin
  61460. getTRISE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61461. end;
  61462. procedure TPORTE_TRISE.setw(thebits : TBits_32); inline;
  61463. begin
  61464. pTDefRegMap(@Self)^.val := thebits;
  61465. end;
  61466. function TPORTE_TRISE.getw : TBits_32; inline;
  61467. begin
  61468. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61469. end;
  61470. procedure TPORTE_PORTE.setRE0; inline;
  61471. begin
  61472. pTDefRegMap(@Self)^.&set := $00000001;
  61473. end;
  61474. procedure TPORTE_PORTE.clearRE0; inline;
  61475. begin
  61476. pTDefRegMap(@Self)^.clr := $00000001;
  61477. end;
  61478. procedure TPORTE_PORTE.setRE0(thebits : TBits_1); inline;
  61479. begin
  61480. if thebits = 0 then
  61481. pTDefRegMap(@Self)^.clr := $00000001
  61482. else
  61483. pTDefRegMap(@Self)^.&set := $00000001;
  61484. end;
  61485. function TPORTE_PORTE.getRE0 : TBits_1; inline;
  61486. begin
  61487. getRE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61488. end;
  61489. procedure TPORTE_PORTE.setRE1; inline;
  61490. begin
  61491. pTDefRegMap(@Self)^.&set := $00000002;
  61492. end;
  61493. procedure TPORTE_PORTE.clearRE1; inline;
  61494. begin
  61495. pTDefRegMap(@Self)^.clr := $00000002;
  61496. end;
  61497. procedure TPORTE_PORTE.setRE1(thebits : TBits_1); inline;
  61498. begin
  61499. if thebits = 0 then
  61500. pTDefRegMap(@Self)^.clr := $00000002
  61501. else
  61502. pTDefRegMap(@Self)^.&set := $00000002;
  61503. end;
  61504. function TPORTE_PORTE.getRE1 : TBits_1; inline;
  61505. begin
  61506. getRE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61507. end;
  61508. procedure TPORTE_PORTE.setRE2; inline;
  61509. begin
  61510. pTDefRegMap(@Self)^.&set := $00000004;
  61511. end;
  61512. procedure TPORTE_PORTE.clearRE2; inline;
  61513. begin
  61514. pTDefRegMap(@Self)^.clr := $00000004;
  61515. end;
  61516. procedure TPORTE_PORTE.setRE2(thebits : TBits_1); inline;
  61517. begin
  61518. if thebits = 0 then
  61519. pTDefRegMap(@Self)^.clr := $00000004
  61520. else
  61521. pTDefRegMap(@Self)^.&set := $00000004;
  61522. end;
  61523. function TPORTE_PORTE.getRE2 : TBits_1; inline;
  61524. begin
  61525. getRE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61526. end;
  61527. procedure TPORTE_PORTE.setRE3; inline;
  61528. begin
  61529. pTDefRegMap(@Self)^.&set := $00000008;
  61530. end;
  61531. procedure TPORTE_PORTE.clearRE3; inline;
  61532. begin
  61533. pTDefRegMap(@Self)^.clr := $00000008;
  61534. end;
  61535. procedure TPORTE_PORTE.setRE3(thebits : TBits_1); inline;
  61536. begin
  61537. if thebits = 0 then
  61538. pTDefRegMap(@Self)^.clr := $00000008
  61539. else
  61540. pTDefRegMap(@Self)^.&set := $00000008;
  61541. end;
  61542. function TPORTE_PORTE.getRE3 : TBits_1; inline;
  61543. begin
  61544. getRE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61545. end;
  61546. procedure TPORTE_PORTE.setRE4; inline;
  61547. begin
  61548. pTDefRegMap(@Self)^.&set := $00000010;
  61549. end;
  61550. procedure TPORTE_PORTE.clearRE4; inline;
  61551. begin
  61552. pTDefRegMap(@Self)^.clr := $00000010;
  61553. end;
  61554. procedure TPORTE_PORTE.setRE4(thebits : TBits_1); inline;
  61555. begin
  61556. if thebits = 0 then
  61557. pTDefRegMap(@Self)^.clr := $00000010
  61558. else
  61559. pTDefRegMap(@Self)^.&set := $00000010;
  61560. end;
  61561. function TPORTE_PORTE.getRE4 : TBits_1; inline;
  61562. begin
  61563. getRE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61564. end;
  61565. procedure TPORTE_PORTE.setRE5; inline;
  61566. begin
  61567. pTDefRegMap(@Self)^.&set := $00000020;
  61568. end;
  61569. procedure TPORTE_PORTE.clearRE5; inline;
  61570. begin
  61571. pTDefRegMap(@Self)^.clr := $00000020;
  61572. end;
  61573. procedure TPORTE_PORTE.setRE5(thebits : TBits_1); inline;
  61574. begin
  61575. if thebits = 0 then
  61576. pTDefRegMap(@Self)^.clr := $00000020
  61577. else
  61578. pTDefRegMap(@Self)^.&set := $00000020;
  61579. end;
  61580. function TPORTE_PORTE.getRE5 : TBits_1; inline;
  61581. begin
  61582. getRE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61583. end;
  61584. procedure TPORTE_PORTE.setRE6; inline;
  61585. begin
  61586. pTDefRegMap(@Self)^.&set := $00000040;
  61587. end;
  61588. procedure TPORTE_PORTE.clearRE6; inline;
  61589. begin
  61590. pTDefRegMap(@Self)^.clr := $00000040;
  61591. end;
  61592. procedure TPORTE_PORTE.setRE6(thebits : TBits_1); inline;
  61593. begin
  61594. if thebits = 0 then
  61595. pTDefRegMap(@Self)^.clr := $00000040
  61596. else
  61597. pTDefRegMap(@Self)^.&set := $00000040;
  61598. end;
  61599. function TPORTE_PORTE.getRE6 : TBits_1; inline;
  61600. begin
  61601. getRE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61602. end;
  61603. procedure TPORTE_PORTE.setRE7; inline;
  61604. begin
  61605. pTDefRegMap(@Self)^.&set := $00000080;
  61606. end;
  61607. procedure TPORTE_PORTE.clearRE7; inline;
  61608. begin
  61609. pTDefRegMap(@Self)^.clr := $00000080;
  61610. end;
  61611. procedure TPORTE_PORTE.setRE7(thebits : TBits_1); inline;
  61612. begin
  61613. if thebits = 0 then
  61614. pTDefRegMap(@Self)^.clr := $00000080
  61615. else
  61616. pTDefRegMap(@Self)^.&set := $00000080;
  61617. end;
  61618. function TPORTE_PORTE.getRE7 : TBits_1; inline;
  61619. begin
  61620. getRE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61621. end;
  61622. procedure TPORTE_PORTE.setw(thebits : TBits_32); inline;
  61623. begin
  61624. pTDefRegMap(@Self)^.val := thebits;
  61625. end;
  61626. function TPORTE_PORTE.getw : TBits_32; inline;
  61627. begin
  61628. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61629. end;
  61630. procedure TPORTE_LATE.setLATE0; inline;
  61631. begin
  61632. pTDefRegMap(@Self)^.&set := $00000001;
  61633. end;
  61634. procedure TPORTE_LATE.clearLATE0; inline;
  61635. begin
  61636. pTDefRegMap(@Self)^.clr := $00000001;
  61637. end;
  61638. procedure TPORTE_LATE.setLATE0(thebits : TBits_1); inline;
  61639. begin
  61640. if thebits = 0 then
  61641. pTDefRegMap(@Self)^.clr := $00000001
  61642. else
  61643. pTDefRegMap(@Self)^.&set := $00000001;
  61644. end;
  61645. function TPORTE_LATE.getLATE0 : TBits_1; inline;
  61646. begin
  61647. getLATE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61648. end;
  61649. procedure TPORTE_LATE.setLATE1; inline;
  61650. begin
  61651. pTDefRegMap(@Self)^.&set := $00000002;
  61652. end;
  61653. procedure TPORTE_LATE.clearLATE1; inline;
  61654. begin
  61655. pTDefRegMap(@Self)^.clr := $00000002;
  61656. end;
  61657. procedure TPORTE_LATE.setLATE1(thebits : TBits_1); inline;
  61658. begin
  61659. if thebits = 0 then
  61660. pTDefRegMap(@Self)^.clr := $00000002
  61661. else
  61662. pTDefRegMap(@Self)^.&set := $00000002;
  61663. end;
  61664. function TPORTE_LATE.getLATE1 : TBits_1; inline;
  61665. begin
  61666. getLATE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61667. end;
  61668. procedure TPORTE_LATE.setLATE2; inline;
  61669. begin
  61670. pTDefRegMap(@Self)^.&set := $00000004;
  61671. end;
  61672. procedure TPORTE_LATE.clearLATE2; inline;
  61673. begin
  61674. pTDefRegMap(@Self)^.clr := $00000004;
  61675. end;
  61676. procedure TPORTE_LATE.setLATE2(thebits : TBits_1); inline;
  61677. begin
  61678. if thebits = 0 then
  61679. pTDefRegMap(@Self)^.clr := $00000004
  61680. else
  61681. pTDefRegMap(@Self)^.&set := $00000004;
  61682. end;
  61683. function TPORTE_LATE.getLATE2 : TBits_1; inline;
  61684. begin
  61685. getLATE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61686. end;
  61687. procedure TPORTE_LATE.setLATE3; inline;
  61688. begin
  61689. pTDefRegMap(@Self)^.&set := $00000008;
  61690. end;
  61691. procedure TPORTE_LATE.clearLATE3; inline;
  61692. begin
  61693. pTDefRegMap(@Self)^.clr := $00000008;
  61694. end;
  61695. procedure TPORTE_LATE.setLATE3(thebits : TBits_1); inline;
  61696. begin
  61697. if thebits = 0 then
  61698. pTDefRegMap(@Self)^.clr := $00000008
  61699. else
  61700. pTDefRegMap(@Self)^.&set := $00000008;
  61701. end;
  61702. function TPORTE_LATE.getLATE3 : TBits_1; inline;
  61703. begin
  61704. getLATE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61705. end;
  61706. procedure TPORTE_LATE.setLATE4; inline;
  61707. begin
  61708. pTDefRegMap(@Self)^.&set := $00000010;
  61709. end;
  61710. procedure TPORTE_LATE.clearLATE4; inline;
  61711. begin
  61712. pTDefRegMap(@Self)^.clr := $00000010;
  61713. end;
  61714. procedure TPORTE_LATE.setLATE4(thebits : TBits_1); inline;
  61715. begin
  61716. if thebits = 0 then
  61717. pTDefRegMap(@Self)^.clr := $00000010
  61718. else
  61719. pTDefRegMap(@Self)^.&set := $00000010;
  61720. end;
  61721. function TPORTE_LATE.getLATE4 : TBits_1; inline;
  61722. begin
  61723. getLATE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61724. end;
  61725. procedure TPORTE_LATE.setLATE5; inline;
  61726. begin
  61727. pTDefRegMap(@Self)^.&set := $00000020;
  61728. end;
  61729. procedure TPORTE_LATE.clearLATE5; inline;
  61730. begin
  61731. pTDefRegMap(@Self)^.clr := $00000020;
  61732. end;
  61733. procedure TPORTE_LATE.setLATE5(thebits : TBits_1); inline;
  61734. begin
  61735. if thebits = 0 then
  61736. pTDefRegMap(@Self)^.clr := $00000020
  61737. else
  61738. pTDefRegMap(@Self)^.&set := $00000020;
  61739. end;
  61740. function TPORTE_LATE.getLATE5 : TBits_1; inline;
  61741. begin
  61742. getLATE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61743. end;
  61744. procedure TPORTE_LATE.setLATE6; inline;
  61745. begin
  61746. pTDefRegMap(@Self)^.&set := $00000040;
  61747. end;
  61748. procedure TPORTE_LATE.clearLATE6; inline;
  61749. begin
  61750. pTDefRegMap(@Self)^.clr := $00000040;
  61751. end;
  61752. procedure TPORTE_LATE.setLATE6(thebits : TBits_1); inline;
  61753. begin
  61754. if thebits = 0 then
  61755. pTDefRegMap(@Self)^.clr := $00000040
  61756. else
  61757. pTDefRegMap(@Self)^.&set := $00000040;
  61758. end;
  61759. function TPORTE_LATE.getLATE6 : TBits_1; inline;
  61760. begin
  61761. getLATE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61762. end;
  61763. procedure TPORTE_LATE.setLATE7; inline;
  61764. begin
  61765. pTDefRegMap(@Self)^.&set := $00000080;
  61766. end;
  61767. procedure TPORTE_LATE.clearLATE7; inline;
  61768. begin
  61769. pTDefRegMap(@Self)^.clr := $00000080;
  61770. end;
  61771. procedure TPORTE_LATE.setLATE7(thebits : TBits_1); inline;
  61772. begin
  61773. if thebits = 0 then
  61774. pTDefRegMap(@Self)^.clr := $00000080
  61775. else
  61776. pTDefRegMap(@Self)^.&set := $00000080;
  61777. end;
  61778. function TPORTE_LATE.getLATE7 : TBits_1; inline;
  61779. begin
  61780. getLATE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61781. end;
  61782. procedure TPORTE_LATE.setw(thebits : TBits_32); inline;
  61783. begin
  61784. pTDefRegMap(@Self)^.val := thebits;
  61785. end;
  61786. function TPORTE_LATE.getw : TBits_32; inline;
  61787. begin
  61788. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61789. end;
  61790. procedure TPORTE_ODCE.setODCE0; inline;
  61791. begin
  61792. pTDefRegMap(@Self)^.&set := $00000001;
  61793. end;
  61794. procedure TPORTE_ODCE.clearODCE0; inline;
  61795. begin
  61796. pTDefRegMap(@Self)^.clr := $00000001;
  61797. end;
  61798. procedure TPORTE_ODCE.setODCE0(thebits : TBits_1); inline;
  61799. begin
  61800. if thebits = 0 then
  61801. pTDefRegMap(@Self)^.clr := $00000001
  61802. else
  61803. pTDefRegMap(@Self)^.&set := $00000001;
  61804. end;
  61805. function TPORTE_ODCE.getODCE0 : TBits_1; inline;
  61806. begin
  61807. getODCE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61808. end;
  61809. procedure TPORTE_ODCE.setODCE1; inline;
  61810. begin
  61811. pTDefRegMap(@Self)^.&set := $00000002;
  61812. end;
  61813. procedure TPORTE_ODCE.clearODCE1; inline;
  61814. begin
  61815. pTDefRegMap(@Self)^.clr := $00000002;
  61816. end;
  61817. procedure TPORTE_ODCE.setODCE1(thebits : TBits_1); inline;
  61818. begin
  61819. if thebits = 0 then
  61820. pTDefRegMap(@Self)^.clr := $00000002
  61821. else
  61822. pTDefRegMap(@Self)^.&set := $00000002;
  61823. end;
  61824. function TPORTE_ODCE.getODCE1 : TBits_1; inline;
  61825. begin
  61826. getODCE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61827. end;
  61828. procedure TPORTE_ODCE.setODCE2; inline;
  61829. begin
  61830. pTDefRegMap(@Self)^.&set := $00000004;
  61831. end;
  61832. procedure TPORTE_ODCE.clearODCE2; inline;
  61833. begin
  61834. pTDefRegMap(@Self)^.clr := $00000004;
  61835. end;
  61836. procedure TPORTE_ODCE.setODCE2(thebits : TBits_1); inline;
  61837. begin
  61838. if thebits = 0 then
  61839. pTDefRegMap(@Self)^.clr := $00000004
  61840. else
  61841. pTDefRegMap(@Self)^.&set := $00000004;
  61842. end;
  61843. function TPORTE_ODCE.getODCE2 : TBits_1; inline;
  61844. begin
  61845. getODCE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61846. end;
  61847. procedure TPORTE_ODCE.setODCE3; inline;
  61848. begin
  61849. pTDefRegMap(@Self)^.&set := $00000008;
  61850. end;
  61851. procedure TPORTE_ODCE.clearODCE3; inline;
  61852. begin
  61853. pTDefRegMap(@Self)^.clr := $00000008;
  61854. end;
  61855. procedure TPORTE_ODCE.setODCE3(thebits : TBits_1); inline;
  61856. begin
  61857. if thebits = 0 then
  61858. pTDefRegMap(@Self)^.clr := $00000008
  61859. else
  61860. pTDefRegMap(@Self)^.&set := $00000008;
  61861. end;
  61862. function TPORTE_ODCE.getODCE3 : TBits_1; inline;
  61863. begin
  61864. getODCE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61865. end;
  61866. procedure TPORTE_ODCE.setODCE4; inline;
  61867. begin
  61868. pTDefRegMap(@Self)^.&set := $00000010;
  61869. end;
  61870. procedure TPORTE_ODCE.clearODCE4; inline;
  61871. begin
  61872. pTDefRegMap(@Self)^.clr := $00000010;
  61873. end;
  61874. procedure TPORTE_ODCE.setODCE4(thebits : TBits_1); inline;
  61875. begin
  61876. if thebits = 0 then
  61877. pTDefRegMap(@Self)^.clr := $00000010
  61878. else
  61879. pTDefRegMap(@Self)^.&set := $00000010;
  61880. end;
  61881. function TPORTE_ODCE.getODCE4 : TBits_1; inline;
  61882. begin
  61883. getODCE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61884. end;
  61885. procedure TPORTE_ODCE.setODCE5; inline;
  61886. begin
  61887. pTDefRegMap(@Self)^.&set := $00000020;
  61888. end;
  61889. procedure TPORTE_ODCE.clearODCE5; inline;
  61890. begin
  61891. pTDefRegMap(@Self)^.clr := $00000020;
  61892. end;
  61893. procedure TPORTE_ODCE.setODCE5(thebits : TBits_1); inline;
  61894. begin
  61895. if thebits = 0 then
  61896. pTDefRegMap(@Self)^.clr := $00000020
  61897. else
  61898. pTDefRegMap(@Self)^.&set := $00000020;
  61899. end;
  61900. function TPORTE_ODCE.getODCE5 : TBits_1; inline;
  61901. begin
  61902. getODCE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61903. end;
  61904. procedure TPORTE_ODCE.setODCE6; inline;
  61905. begin
  61906. pTDefRegMap(@Self)^.&set := $00000040;
  61907. end;
  61908. procedure TPORTE_ODCE.clearODCE6; inline;
  61909. begin
  61910. pTDefRegMap(@Self)^.clr := $00000040;
  61911. end;
  61912. procedure TPORTE_ODCE.setODCE6(thebits : TBits_1); inline;
  61913. begin
  61914. if thebits = 0 then
  61915. pTDefRegMap(@Self)^.clr := $00000040
  61916. else
  61917. pTDefRegMap(@Self)^.&set := $00000040;
  61918. end;
  61919. function TPORTE_ODCE.getODCE6 : TBits_1; inline;
  61920. begin
  61921. getODCE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61922. end;
  61923. procedure TPORTE_ODCE.setODCE7; inline;
  61924. begin
  61925. pTDefRegMap(@Self)^.&set := $00000080;
  61926. end;
  61927. procedure TPORTE_ODCE.clearODCE7; inline;
  61928. begin
  61929. pTDefRegMap(@Self)^.clr := $00000080;
  61930. end;
  61931. procedure TPORTE_ODCE.setODCE7(thebits : TBits_1); inline;
  61932. begin
  61933. if thebits = 0 then
  61934. pTDefRegMap(@Self)^.clr := $00000080
  61935. else
  61936. pTDefRegMap(@Self)^.&set := $00000080;
  61937. end;
  61938. function TPORTE_ODCE.getODCE7 : TBits_1; inline;
  61939. begin
  61940. getODCE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61941. end;
  61942. procedure TPORTE_ODCE.setw(thebits : TBits_32); inline;
  61943. begin
  61944. pTDefRegMap(@Self)^.val := thebits;
  61945. end;
  61946. function TPORTE_ODCE.getw : TBits_32; inline;
  61947. begin
  61948. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61949. end;
  61950. procedure TPORTF_TRISF.setTRISF0; inline;
  61951. begin
  61952. pTDefRegMap(@Self)^.&set := $00000001;
  61953. end;
  61954. procedure TPORTF_TRISF.clearTRISF0; inline;
  61955. begin
  61956. pTDefRegMap(@Self)^.clr := $00000001;
  61957. end;
  61958. procedure TPORTF_TRISF.setTRISF0(thebits : TBits_1); inline;
  61959. begin
  61960. if thebits = 0 then
  61961. pTDefRegMap(@Self)^.clr := $00000001
  61962. else
  61963. pTDefRegMap(@Self)^.&set := $00000001;
  61964. end;
  61965. function TPORTF_TRISF.getTRISF0 : TBits_1; inline;
  61966. begin
  61967. getTRISF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61968. end;
  61969. procedure TPORTF_TRISF.setTRISF1; inline;
  61970. begin
  61971. pTDefRegMap(@Self)^.&set := $00000002;
  61972. end;
  61973. procedure TPORTF_TRISF.clearTRISF1; inline;
  61974. begin
  61975. pTDefRegMap(@Self)^.clr := $00000002;
  61976. end;
  61977. procedure TPORTF_TRISF.setTRISF1(thebits : TBits_1); inline;
  61978. begin
  61979. if thebits = 0 then
  61980. pTDefRegMap(@Self)^.clr := $00000002
  61981. else
  61982. pTDefRegMap(@Self)^.&set := $00000002;
  61983. end;
  61984. function TPORTF_TRISF.getTRISF1 : TBits_1; inline;
  61985. begin
  61986. getTRISF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61987. end;
  61988. procedure TPORTF_TRISF.setTRISF2; inline;
  61989. begin
  61990. pTDefRegMap(@Self)^.&set := $00000004;
  61991. end;
  61992. procedure TPORTF_TRISF.clearTRISF2; inline;
  61993. begin
  61994. pTDefRegMap(@Self)^.clr := $00000004;
  61995. end;
  61996. procedure TPORTF_TRISF.setTRISF2(thebits : TBits_1); inline;
  61997. begin
  61998. if thebits = 0 then
  61999. pTDefRegMap(@Self)^.clr := $00000004
  62000. else
  62001. pTDefRegMap(@Self)^.&set := $00000004;
  62002. end;
  62003. function TPORTF_TRISF.getTRISF2 : TBits_1; inline;
  62004. begin
  62005. getTRISF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62006. end;
  62007. procedure TPORTF_TRISF.setTRISF3; inline;
  62008. begin
  62009. pTDefRegMap(@Self)^.&set := $00000008;
  62010. end;
  62011. procedure TPORTF_TRISF.clearTRISF3; inline;
  62012. begin
  62013. pTDefRegMap(@Self)^.clr := $00000008;
  62014. end;
  62015. procedure TPORTF_TRISF.setTRISF3(thebits : TBits_1); inline;
  62016. begin
  62017. if thebits = 0 then
  62018. pTDefRegMap(@Self)^.clr := $00000008
  62019. else
  62020. pTDefRegMap(@Self)^.&set := $00000008;
  62021. end;
  62022. function TPORTF_TRISF.getTRISF3 : TBits_1; inline;
  62023. begin
  62024. getTRISF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62025. end;
  62026. procedure TPORTF_TRISF.setTRISF4; inline;
  62027. begin
  62028. pTDefRegMap(@Self)^.&set := $00000010;
  62029. end;
  62030. procedure TPORTF_TRISF.clearTRISF4; inline;
  62031. begin
  62032. pTDefRegMap(@Self)^.clr := $00000010;
  62033. end;
  62034. procedure TPORTF_TRISF.setTRISF4(thebits : TBits_1); inline;
  62035. begin
  62036. if thebits = 0 then
  62037. pTDefRegMap(@Self)^.clr := $00000010
  62038. else
  62039. pTDefRegMap(@Self)^.&set := $00000010;
  62040. end;
  62041. function TPORTF_TRISF.getTRISF4 : TBits_1; inline;
  62042. begin
  62043. getTRISF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  62044. end;
  62045. procedure TPORTF_TRISF.setTRISF5; inline;
  62046. begin
  62047. pTDefRegMap(@Self)^.&set := $00000020;
  62048. end;
  62049. procedure TPORTF_TRISF.clearTRISF5; inline;
  62050. begin
  62051. pTDefRegMap(@Self)^.clr := $00000020;
  62052. end;
  62053. procedure TPORTF_TRISF.setTRISF5(thebits : TBits_1); inline;
  62054. begin
  62055. if thebits = 0 then
  62056. pTDefRegMap(@Self)^.clr := $00000020
  62057. else
  62058. pTDefRegMap(@Self)^.&set := $00000020;
  62059. end;
  62060. function TPORTF_TRISF.getTRISF5 : TBits_1; inline;
  62061. begin
  62062. getTRISF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62063. end;
  62064. procedure TPORTF_TRISF.setw(thebits : TBits_32); inline;
  62065. begin
  62066. pTDefRegMap(@Self)^.val := thebits;
  62067. end;
  62068. function TPORTF_TRISF.getw : TBits_32; inline;
  62069. begin
  62070. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62071. end;
  62072. procedure TPORTF_PORTF.setRF0; inline;
  62073. begin
  62074. pTDefRegMap(@Self)^.&set := $00000001;
  62075. end;
  62076. procedure TPORTF_PORTF.clearRF0; inline;
  62077. begin
  62078. pTDefRegMap(@Self)^.clr := $00000001;
  62079. end;
  62080. procedure TPORTF_PORTF.setRF0(thebits : TBits_1); inline;
  62081. begin
  62082. if thebits = 0 then
  62083. pTDefRegMap(@Self)^.clr := $00000001
  62084. else
  62085. pTDefRegMap(@Self)^.&set := $00000001;
  62086. end;
  62087. function TPORTF_PORTF.getRF0 : TBits_1; inline;
  62088. begin
  62089. getRF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  62090. end;
  62091. procedure TPORTF_PORTF.setRF1; inline;
  62092. begin
  62093. pTDefRegMap(@Self)^.&set := $00000002;
  62094. end;
  62095. procedure TPORTF_PORTF.clearRF1; inline;
  62096. begin
  62097. pTDefRegMap(@Self)^.clr := $00000002;
  62098. end;
  62099. procedure TPORTF_PORTF.setRF1(thebits : TBits_1); inline;
  62100. begin
  62101. if thebits = 0 then
  62102. pTDefRegMap(@Self)^.clr := $00000002
  62103. else
  62104. pTDefRegMap(@Self)^.&set := $00000002;
  62105. end;
  62106. function TPORTF_PORTF.getRF1 : TBits_1; inline;
  62107. begin
  62108. getRF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  62109. end;
  62110. procedure TPORTF_PORTF.setRF2; inline;
  62111. begin
  62112. pTDefRegMap(@Self)^.&set := $00000004;
  62113. end;
  62114. procedure TPORTF_PORTF.clearRF2; inline;
  62115. begin
  62116. pTDefRegMap(@Self)^.clr := $00000004;
  62117. end;
  62118. procedure TPORTF_PORTF.setRF2(thebits : TBits_1); inline;
  62119. begin
  62120. if thebits = 0 then
  62121. pTDefRegMap(@Self)^.clr := $00000004
  62122. else
  62123. pTDefRegMap(@Self)^.&set := $00000004;
  62124. end;
  62125. function TPORTF_PORTF.getRF2 : TBits_1; inline;
  62126. begin
  62127. getRF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62128. end;
  62129. procedure TPORTF_PORTF.setRF3; inline;
  62130. begin
  62131. pTDefRegMap(@Self)^.&set := $00000008;
  62132. end;
  62133. procedure TPORTF_PORTF.clearRF3; inline;
  62134. begin
  62135. pTDefRegMap(@Self)^.clr := $00000008;
  62136. end;
  62137. procedure TPORTF_PORTF.setRF3(thebits : TBits_1); inline;
  62138. begin
  62139. if thebits = 0 then
  62140. pTDefRegMap(@Self)^.clr := $00000008
  62141. else
  62142. pTDefRegMap(@Self)^.&set := $00000008;
  62143. end;
  62144. function TPORTF_PORTF.getRF3 : TBits_1; inline;
  62145. begin
  62146. getRF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62147. end;
  62148. procedure TPORTF_PORTF.setRF4; inline;
  62149. begin
  62150. pTDefRegMap(@Self)^.&set := $00000010;
  62151. end;
  62152. procedure TPORTF_PORTF.clearRF4; inline;
  62153. begin
  62154. pTDefRegMap(@Self)^.clr := $00000010;
  62155. end;
  62156. procedure TPORTF_PORTF.setRF4(thebits : TBits_1); inline;
  62157. begin
  62158. if thebits = 0 then
  62159. pTDefRegMap(@Self)^.clr := $00000010
  62160. else
  62161. pTDefRegMap(@Self)^.&set := $00000010;
  62162. end;
  62163. function TPORTF_PORTF.getRF4 : TBits_1; inline;
  62164. begin
  62165. getRF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  62166. end;
  62167. procedure TPORTF_PORTF.setRF5; inline;
  62168. begin
  62169. pTDefRegMap(@Self)^.&set := $00000020;
  62170. end;
  62171. procedure TPORTF_PORTF.clearRF5; inline;
  62172. begin
  62173. pTDefRegMap(@Self)^.clr := $00000020;
  62174. end;
  62175. procedure TPORTF_PORTF.setRF5(thebits : TBits_1); inline;
  62176. begin
  62177. if thebits = 0 then
  62178. pTDefRegMap(@Self)^.clr := $00000020
  62179. else
  62180. pTDefRegMap(@Self)^.&set := $00000020;
  62181. end;
  62182. function TPORTF_PORTF.getRF5 : TBits_1; inline;
  62183. begin
  62184. getRF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62185. end;
  62186. procedure TPORTF_PORTF.setw(thebits : TBits_32); inline;
  62187. begin
  62188. pTDefRegMap(@Self)^.val := thebits;
  62189. end;
  62190. function TPORTF_PORTF.getw : TBits_32; inline;
  62191. begin
  62192. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62193. end;
  62194. procedure TPORTF_LATF.setLATF0; inline;
  62195. begin
  62196. pTDefRegMap(@Self)^.&set := $00000001;
  62197. end;
  62198. procedure TPORTF_LATF.clearLATF0; inline;
  62199. begin
  62200. pTDefRegMap(@Self)^.clr := $00000001;
  62201. end;
  62202. procedure TPORTF_LATF.setLATF0(thebits : TBits_1); inline;
  62203. begin
  62204. if thebits = 0 then
  62205. pTDefRegMap(@Self)^.clr := $00000001
  62206. else
  62207. pTDefRegMap(@Self)^.&set := $00000001;
  62208. end;
  62209. function TPORTF_LATF.getLATF0 : TBits_1; inline;
  62210. begin
  62211. getLATF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  62212. end;
  62213. procedure TPORTF_LATF.setLATF1; inline;
  62214. begin
  62215. pTDefRegMap(@Self)^.&set := $00000002;
  62216. end;
  62217. procedure TPORTF_LATF.clearLATF1; inline;
  62218. begin
  62219. pTDefRegMap(@Self)^.clr := $00000002;
  62220. end;
  62221. procedure TPORTF_LATF.setLATF1(thebits : TBits_1); inline;
  62222. begin
  62223. if thebits = 0 then
  62224. pTDefRegMap(@Self)^.clr := $00000002
  62225. else
  62226. pTDefRegMap(@Self)^.&set := $00000002;
  62227. end;
  62228. function TPORTF_LATF.getLATF1 : TBits_1; inline;
  62229. begin
  62230. getLATF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  62231. end;
  62232. procedure TPORTF_LATF.setLATF2; inline;
  62233. begin
  62234. pTDefRegMap(@Self)^.&set := $00000004;
  62235. end;
  62236. procedure TPORTF_LATF.clearLATF2; inline;
  62237. begin
  62238. pTDefRegMap(@Self)^.clr := $00000004;
  62239. end;
  62240. procedure TPORTF_LATF.setLATF2(thebits : TBits_1); inline;
  62241. begin
  62242. if thebits = 0 then
  62243. pTDefRegMap(@Self)^.clr := $00000004
  62244. else
  62245. pTDefRegMap(@Self)^.&set := $00000004;
  62246. end;
  62247. function TPORTF_LATF.getLATF2 : TBits_1; inline;
  62248. begin
  62249. getLATF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62250. end;
  62251. procedure TPORTF_LATF.setLATF3; inline;
  62252. begin
  62253. pTDefRegMap(@Self)^.&set := $00000008;
  62254. end;
  62255. procedure TPORTF_LATF.clearLATF3; inline;
  62256. begin
  62257. pTDefRegMap(@Self)^.clr := $00000008;
  62258. end;
  62259. procedure TPORTF_LATF.setLATF3(thebits : TBits_1); inline;
  62260. begin
  62261. if thebits = 0 then
  62262. pTDefRegMap(@Self)^.clr := $00000008
  62263. else
  62264. pTDefRegMap(@Self)^.&set := $00000008;
  62265. end;
  62266. function TPORTF_LATF.getLATF3 : TBits_1; inline;
  62267. begin
  62268. getLATF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62269. end;
  62270. procedure TPORTF_LATF.setLATF4; inline;
  62271. begin
  62272. pTDefRegMap(@Self)^.&set := $00000010;
  62273. end;
  62274. procedure TPORTF_LATF.clearLATF4; inline;
  62275. begin
  62276. pTDefRegMap(@Self)^.clr := $00000010;
  62277. end;
  62278. procedure TPORTF_LATF.setLATF4(thebits : TBits_1); inline;
  62279. begin
  62280. if thebits = 0 then
  62281. pTDefRegMap(@Self)^.clr := $00000010
  62282. else
  62283. pTDefRegMap(@Self)^.&set := $00000010;
  62284. end;
  62285. function TPORTF_LATF.getLATF4 : TBits_1; inline;
  62286. begin
  62287. getLATF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  62288. end;
  62289. procedure TPORTF_LATF.setLATF5; inline;
  62290. begin
  62291. pTDefRegMap(@Self)^.&set := $00000020;
  62292. end;
  62293. procedure TPORTF_LATF.clearLATF5; inline;
  62294. begin
  62295. pTDefRegMap(@Self)^.clr := $00000020;
  62296. end;
  62297. procedure TPORTF_LATF.setLATF5(thebits : TBits_1); inline;
  62298. begin
  62299. if thebits = 0 then
  62300. pTDefRegMap(@Self)^.clr := $00000020
  62301. else
  62302. pTDefRegMap(@Self)^.&set := $00000020;
  62303. end;
  62304. function TPORTF_LATF.getLATF5 : TBits_1; inline;
  62305. begin
  62306. getLATF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62307. end;
  62308. procedure TPORTF_LATF.setw(thebits : TBits_32); inline;
  62309. begin
  62310. pTDefRegMap(@Self)^.val := thebits;
  62311. end;
  62312. function TPORTF_LATF.getw : TBits_32; inline;
  62313. begin
  62314. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62315. end;
  62316. procedure TPORTF_ODCF.setODCF0; inline;
  62317. begin
  62318. pTDefRegMap(@Self)^.&set := $00000001;
  62319. end;
  62320. procedure TPORTF_ODCF.clearODCF0; inline;
  62321. begin
  62322. pTDefRegMap(@Self)^.clr := $00000001;
  62323. end;
  62324. procedure TPORTF_ODCF.setODCF0(thebits : TBits_1); inline;
  62325. begin
  62326. if thebits = 0 then
  62327. pTDefRegMap(@Self)^.clr := $00000001
  62328. else
  62329. pTDefRegMap(@Self)^.&set := $00000001;
  62330. end;
  62331. function TPORTF_ODCF.getODCF0 : TBits_1; inline;
  62332. begin
  62333. getODCF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  62334. end;
  62335. procedure TPORTF_ODCF.setODCF1; inline;
  62336. begin
  62337. pTDefRegMap(@Self)^.&set := $00000002;
  62338. end;
  62339. procedure TPORTF_ODCF.clearODCF1; inline;
  62340. begin
  62341. pTDefRegMap(@Self)^.clr := $00000002;
  62342. end;
  62343. procedure TPORTF_ODCF.setODCF1(thebits : TBits_1); inline;
  62344. begin
  62345. if thebits = 0 then
  62346. pTDefRegMap(@Self)^.clr := $00000002
  62347. else
  62348. pTDefRegMap(@Self)^.&set := $00000002;
  62349. end;
  62350. function TPORTF_ODCF.getODCF1 : TBits_1; inline;
  62351. begin
  62352. getODCF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  62353. end;
  62354. procedure TPORTF_ODCF.setODCF2; inline;
  62355. begin
  62356. pTDefRegMap(@Self)^.&set := $00000004;
  62357. end;
  62358. procedure TPORTF_ODCF.clearODCF2; inline;
  62359. begin
  62360. pTDefRegMap(@Self)^.clr := $00000004;
  62361. end;
  62362. procedure TPORTF_ODCF.setODCF2(thebits : TBits_1); inline;
  62363. begin
  62364. if thebits = 0 then
  62365. pTDefRegMap(@Self)^.clr := $00000004
  62366. else
  62367. pTDefRegMap(@Self)^.&set := $00000004;
  62368. end;
  62369. function TPORTF_ODCF.getODCF2 : TBits_1; inline;
  62370. begin
  62371. getODCF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62372. end;
  62373. procedure TPORTF_ODCF.setODCF3; inline;
  62374. begin
  62375. pTDefRegMap(@Self)^.&set := $00000008;
  62376. end;
  62377. procedure TPORTF_ODCF.clearODCF3; inline;
  62378. begin
  62379. pTDefRegMap(@Self)^.clr := $00000008;
  62380. end;
  62381. procedure TPORTF_ODCF.setODCF3(thebits : TBits_1); inline;
  62382. begin
  62383. if thebits = 0 then
  62384. pTDefRegMap(@Self)^.clr := $00000008
  62385. else
  62386. pTDefRegMap(@Self)^.&set := $00000008;
  62387. end;
  62388. function TPORTF_ODCF.getODCF3 : TBits_1; inline;
  62389. begin
  62390. getODCF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62391. end;
  62392. procedure TPORTF_ODCF.setODCF4; inline;
  62393. begin
  62394. pTDefRegMap(@Self)^.&set := $00000010;
  62395. end;
  62396. procedure TPORTF_ODCF.clearODCF4; inline;
  62397. begin
  62398. pTDefRegMap(@Self)^.clr := $00000010;
  62399. end;
  62400. procedure TPORTF_ODCF.setODCF4(thebits : TBits_1); inline;
  62401. begin
  62402. if thebits = 0 then
  62403. pTDefRegMap(@Self)^.clr := $00000010
  62404. else
  62405. pTDefRegMap(@Self)^.&set := $00000010;
  62406. end;
  62407. function TPORTF_ODCF.getODCF4 : TBits_1; inline;
  62408. begin
  62409. getODCF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  62410. end;
  62411. procedure TPORTF_ODCF.setODCF5; inline;
  62412. begin
  62413. pTDefRegMap(@Self)^.&set := $00000020;
  62414. end;
  62415. procedure TPORTF_ODCF.clearODCF5; inline;
  62416. begin
  62417. pTDefRegMap(@Self)^.clr := $00000020;
  62418. end;
  62419. procedure TPORTF_ODCF.setODCF5(thebits : TBits_1); inline;
  62420. begin
  62421. if thebits = 0 then
  62422. pTDefRegMap(@Self)^.clr := $00000020
  62423. else
  62424. pTDefRegMap(@Self)^.&set := $00000020;
  62425. end;
  62426. function TPORTF_ODCF.getODCF5 : TBits_1; inline;
  62427. begin
  62428. getODCF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62429. end;
  62430. procedure TPORTF_ODCF.setw(thebits : TBits_32); inline;
  62431. begin
  62432. pTDefRegMap(@Self)^.val := thebits;
  62433. end;
  62434. function TPORTF_ODCF.getw : TBits_32; inline;
  62435. begin
  62436. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62437. end;
  62438. procedure TPORTG_TRISG.setTRISG2; inline;
  62439. begin
  62440. pTDefRegMap(@Self)^.&set := $00000004;
  62441. end;
  62442. procedure TPORTG_TRISG.clearTRISG2; inline;
  62443. begin
  62444. pTDefRegMap(@Self)^.clr := $00000004;
  62445. end;
  62446. procedure TPORTG_TRISG.setTRISG2(thebits : TBits_1); inline;
  62447. begin
  62448. if thebits = 0 then
  62449. pTDefRegMap(@Self)^.clr := $00000004
  62450. else
  62451. pTDefRegMap(@Self)^.&set := $00000004;
  62452. end;
  62453. function TPORTG_TRISG.getTRISG2 : TBits_1; inline;
  62454. begin
  62455. getTRISG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62456. end;
  62457. procedure TPORTG_TRISG.setTRISG3; inline;
  62458. begin
  62459. pTDefRegMap(@Self)^.&set := $00000008;
  62460. end;
  62461. procedure TPORTG_TRISG.clearTRISG3; inline;
  62462. begin
  62463. pTDefRegMap(@Self)^.clr := $00000008;
  62464. end;
  62465. procedure TPORTG_TRISG.setTRISG3(thebits : TBits_1); inline;
  62466. begin
  62467. if thebits = 0 then
  62468. pTDefRegMap(@Self)^.clr := $00000008
  62469. else
  62470. pTDefRegMap(@Self)^.&set := $00000008;
  62471. end;
  62472. function TPORTG_TRISG.getTRISG3 : TBits_1; inline;
  62473. begin
  62474. getTRISG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62475. end;
  62476. procedure TPORTG_TRISG.setTRISG6; inline;
  62477. begin
  62478. pTDefRegMap(@Self)^.&set := $00000040;
  62479. end;
  62480. procedure TPORTG_TRISG.clearTRISG6; inline;
  62481. begin
  62482. pTDefRegMap(@Self)^.clr := $00000040;
  62483. end;
  62484. procedure TPORTG_TRISG.setTRISG6(thebits : TBits_1); inline;
  62485. begin
  62486. if thebits = 0 then
  62487. pTDefRegMap(@Self)^.clr := $00000040
  62488. else
  62489. pTDefRegMap(@Self)^.&set := $00000040;
  62490. end;
  62491. function TPORTG_TRISG.getTRISG6 : TBits_1; inline;
  62492. begin
  62493. getTRISG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62494. end;
  62495. procedure TPORTG_TRISG.setTRISG7; inline;
  62496. begin
  62497. pTDefRegMap(@Self)^.&set := $00000080;
  62498. end;
  62499. procedure TPORTG_TRISG.clearTRISG7; inline;
  62500. begin
  62501. pTDefRegMap(@Self)^.clr := $00000080;
  62502. end;
  62503. procedure TPORTG_TRISG.setTRISG7(thebits : TBits_1); inline;
  62504. begin
  62505. if thebits = 0 then
  62506. pTDefRegMap(@Self)^.clr := $00000080
  62507. else
  62508. pTDefRegMap(@Self)^.&set := $00000080;
  62509. end;
  62510. function TPORTG_TRISG.getTRISG7 : TBits_1; inline;
  62511. begin
  62512. getTRISG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62513. end;
  62514. procedure TPORTG_TRISG.setTRISG8; inline;
  62515. begin
  62516. pTDefRegMap(@Self)^.&set := $00000100;
  62517. end;
  62518. procedure TPORTG_TRISG.clearTRISG8; inline;
  62519. begin
  62520. pTDefRegMap(@Self)^.clr := $00000100;
  62521. end;
  62522. procedure TPORTG_TRISG.setTRISG8(thebits : TBits_1); inline;
  62523. begin
  62524. if thebits = 0 then
  62525. pTDefRegMap(@Self)^.clr := $00000100
  62526. else
  62527. pTDefRegMap(@Self)^.&set := $00000100;
  62528. end;
  62529. function TPORTG_TRISG.getTRISG8 : TBits_1; inline;
  62530. begin
  62531. getTRISG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  62532. end;
  62533. procedure TPORTG_TRISG.setTRISG9; inline;
  62534. begin
  62535. pTDefRegMap(@Self)^.&set := $00000200;
  62536. end;
  62537. procedure TPORTG_TRISG.clearTRISG9; inline;
  62538. begin
  62539. pTDefRegMap(@Self)^.clr := $00000200;
  62540. end;
  62541. procedure TPORTG_TRISG.setTRISG9(thebits : TBits_1); inline;
  62542. begin
  62543. if thebits = 0 then
  62544. pTDefRegMap(@Self)^.clr := $00000200
  62545. else
  62546. pTDefRegMap(@Self)^.&set := $00000200;
  62547. end;
  62548. function TPORTG_TRISG.getTRISG9 : TBits_1; inline;
  62549. begin
  62550. getTRISG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  62551. end;
  62552. procedure TPORTG_TRISG.setw(thebits : TBits_32); inline;
  62553. begin
  62554. pTDefRegMap(@Self)^.val := thebits;
  62555. end;
  62556. function TPORTG_TRISG.getw : TBits_32; inline;
  62557. begin
  62558. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62559. end;
  62560. procedure TPORTG_PORTG.setRG2; inline;
  62561. begin
  62562. pTDefRegMap(@Self)^.&set := $00000004;
  62563. end;
  62564. procedure TPORTG_PORTG.clearRG2; inline;
  62565. begin
  62566. pTDefRegMap(@Self)^.clr := $00000004;
  62567. end;
  62568. procedure TPORTG_PORTG.setRG2(thebits : TBits_1); inline;
  62569. begin
  62570. if thebits = 0 then
  62571. pTDefRegMap(@Self)^.clr := $00000004
  62572. else
  62573. pTDefRegMap(@Self)^.&set := $00000004;
  62574. end;
  62575. function TPORTG_PORTG.getRG2 : TBits_1; inline;
  62576. begin
  62577. getRG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62578. end;
  62579. procedure TPORTG_PORTG.setRG3; inline;
  62580. begin
  62581. pTDefRegMap(@Self)^.&set := $00000008;
  62582. end;
  62583. procedure TPORTG_PORTG.clearRG3; inline;
  62584. begin
  62585. pTDefRegMap(@Self)^.clr := $00000008;
  62586. end;
  62587. procedure TPORTG_PORTG.setRG3(thebits : TBits_1); inline;
  62588. begin
  62589. if thebits = 0 then
  62590. pTDefRegMap(@Self)^.clr := $00000008
  62591. else
  62592. pTDefRegMap(@Self)^.&set := $00000008;
  62593. end;
  62594. function TPORTG_PORTG.getRG3 : TBits_1; inline;
  62595. begin
  62596. getRG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62597. end;
  62598. procedure TPORTG_PORTG.setRG6; inline;
  62599. begin
  62600. pTDefRegMap(@Self)^.&set := $00000040;
  62601. end;
  62602. procedure TPORTG_PORTG.clearRG6; inline;
  62603. begin
  62604. pTDefRegMap(@Self)^.clr := $00000040;
  62605. end;
  62606. procedure TPORTG_PORTG.setRG6(thebits : TBits_1); inline;
  62607. begin
  62608. if thebits = 0 then
  62609. pTDefRegMap(@Self)^.clr := $00000040
  62610. else
  62611. pTDefRegMap(@Self)^.&set := $00000040;
  62612. end;
  62613. function TPORTG_PORTG.getRG6 : TBits_1; inline;
  62614. begin
  62615. getRG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62616. end;
  62617. procedure TPORTG_PORTG.setRG7; inline;
  62618. begin
  62619. pTDefRegMap(@Self)^.&set := $00000080;
  62620. end;
  62621. procedure TPORTG_PORTG.clearRG7; inline;
  62622. begin
  62623. pTDefRegMap(@Self)^.clr := $00000080;
  62624. end;
  62625. procedure TPORTG_PORTG.setRG7(thebits : TBits_1); inline;
  62626. begin
  62627. if thebits = 0 then
  62628. pTDefRegMap(@Self)^.clr := $00000080
  62629. else
  62630. pTDefRegMap(@Self)^.&set := $00000080;
  62631. end;
  62632. function TPORTG_PORTG.getRG7 : TBits_1; inline;
  62633. begin
  62634. getRG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62635. end;
  62636. procedure TPORTG_PORTG.setRG8; inline;
  62637. begin
  62638. pTDefRegMap(@Self)^.&set := $00000100;
  62639. end;
  62640. procedure TPORTG_PORTG.clearRG8; inline;
  62641. begin
  62642. pTDefRegMap(@Self)^.clr := $00000100;
  62643. end;
  62644. procedure TPORTG_PORTG.setRG8(thebits : TBits_1); inline;
  62645. begin
  62646. if thebits = 0 then
  62647. pTDefRegMap(@Self)^.clr := $00000100
  62648. else
  62649. pTDefRegMap(@Self)^.&set := $00000100;
  62650. end;
  62651. function TPORTG_PORTG.getRG8 : TBits_1; inline;
  62652. begin
  62653. getRG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  62654. end;
  62655. procedure TPORTG_PORTG.setRG9; inline;
  62656. begin
  62657. pTDefRegMap(@Self)^.&set := $00000200;
  62658. end;
  62659. procedure TPORTG_PORTG.clearRG9; inline;
  62660. begin
  62661. pTDefRegMap(@Self)^.clr := $00000200;
  62662. end;
  62663. procedure TPORTG_PORTG.setRG9(thebits : TBits_1); inline;
  62664. begin
  62665. if thebits = 0 then
  62666. pTDefRegMap(@Self)^.clr := $00000200
  62667. else
  62668. pTDefRegMap(@Self)^.&set := $00000200;
  62669. end;
  62670. function TPORTG_PORTG.getRG9 : TBits_1; inline;
  62671. begin
  62672. getRG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  62673. end;
  62674. procedure TPORTG_PORTG.setw(thebits : TBits_32); inline;
  62675. begin
  62676. pTDefRegMap(@Self)^.val := thebits;
  62677. end;
  62678. function TPORTG_PORTG.getw : TBits_32; inline;
  62679. begin
  62680. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62681. end;
  62682. procedure TPORTG_LATG.setLATG2; inline;
  62683. begin
  62684. pTDefRegMap(@Self)^.&set := $00000004;
  62685. end;
  62686. procedure TPORTG_LATG.clearLATG2; inline;
  62687. begin
  62688. pTDefRegMap(@Self)^.clr := $00000004;
  62689. end;
  62690. procedure TPORTG_LATG.setLATG2(thebits : TBits_1); inline;
  62691. begin
  62692. if thebits = 0 then
  62693. pTDefRegMap(@Self)^.clr := $00000004
  62694. else
  62695. pTDefRegMap(@Self)^.&set := $00000004;
  62696. end;
  62697. function TPORTG_LATG.getLATG2 : TBits_1; inline;
  62698. begin
  62699. getLATG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62700. end;
  62701. procedure TPORTG_LATG.setLATG3; inline;
  62702. begin
  62703. pTDefRegMap(@Self)^.&set := $00000008;
  62704. end;
  62705. procedure TPORTG_LATG.clearLATG3; inline;
  62706. begin
  62707. pTDefRegMap(@Self)^.clr := $00000008;
  62708. end;
  62709. procedure TPORTG_LATG.setLATG3(thebits : TBits_1); inline;
  62710. begin
  62711. if thebits = 0 then
  62712. pTDefRegMap(@Self)^.clr := $00000008
  62713. else
  62714. pTDefRegMap(@Self)^.&set := $00000008;
  62715. end;
  62716. function TPORTG_LATG.getLATG3 : TBits_1; inline;
  62717. begin
  62718. getLATG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62719. end;
  62720. procedure TPORTG_LATG.setLATG6; inline;
  62721. begin
  62722. pTDefRegMap(@Self)^.&set := $00000040;
  62723. end;
  62724. procedure TPORTG_LATG.clearLATG6; inline;
  62725. begin
  62726. pTDefRegMap(@Self)^.clr := $00000040;
  62727. end;
  62728. procedure TPORTG_LATG.setLATG6(thebits : TBits_1); inline;
  62729. begin
  62730. if thebits = 0 then
  62731. pTDefRegMap(@Self)^.clr := $00000040
  62732. else
  62733. pTDefRegMap(@Self)^.&set := $00000040;
  62734. end;
  62735. function TPORTG_LATG.getLATG6 : TBits_1; inline;
  62736. begin
  62737. getLATG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62738. end;
  62739. procedure TPORTG_LATG.setLATG7; inline;
  62740. begin
  62741. pTDefRegMap(@Self)^.&set := $00000080;
  62742. end;
  62743. procedure TPORTG_LATG.clearLATG7; inline;
  62744. begin
  62745. pTDefRegMap(@Self)^.clr := $00000080;
  62746. end;
  62747. procedure TPORTG_LATG.setLATG7(thebits : TBits_1); inline;
  62748. begin
  62749. if thebits = 0 then
  62750. pTDefRegMap(@Self)^.clr := $00000080
  62751. else
  62752. pTDefRegMap(@Self)^.&set := $00000080;
  62753. end;
  62754. function TPORTG_LATG.getLATG7 : TBits_1; inline;
  62755. begin
  62756. getLATG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62757. end;
  62758. procedure TPORTG_LATG.setLATG8; inline;
  62759. begin
  62760. pTDefRegMap(@Self)^.&set := $00000100;
  62761. end;
  62762. procedure TPORTG_LATG.clearLATG8; inline;
  62763. begin
  62764. pTDefRegMap(@Self)^.clr := $00000100;
  62765. end;
  62766. procedure TPORTG_LATG.setLATG8(thebits : TBits_1); inline;
  62767. begin
  62768. if thebits = 0 then
  62769. pTDefRegMap(@Self)^.clr := $00000100
  62770. else
  62771. pTDefRegMap(@Self)^.&set := $00000100;
  62772. end;
  62773. function TPORTG_LATG.getLATG8 : TBits_1; inline;
  62774. begin
  62775. getLATG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  62776. end;
  62777. procedure TPORTG_LATG.setLATG9; inline;
  62778. begin
  62779. pTDefRegMap(@Self)^.&set := $00000200;
  62780. end;
  62781. procedure TPORTG_LATG.clearLATG9; inline;
  62782. begin
  62783. pTDefRegMap(@Self)^.clr := $00000200;
  62784. end;
  62785. procedure TPORTG_LATG.setLATG9(thebits : TBits_1); inline;
  62786. begin
  62787. if thebits = 0 then
  62788. pTDefRegMap(@Self)^.clr := $00000200
  62789. else
  62790. pTDefRegMap(@Self)^.&set := $00000200;
  62791. end;
  62792. function TPORTG_LATG.getLATG9 : TBits_1; inline;
  62793. begin
  62794. getLATG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  62795. end;
  62796. procedure TPORTG_LATG.setw(thebits : TBits_32); inline;
  62797. begin
  62798. pTDefRegMap(@Self)^.val := thebits;
  62799. end;
  62800. function TPORTG_LATG.getw : TBits_32; inline;
  62801. begin
  62802. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62803. end;
  62804. procedure TPORTG_ODCG.setODCG2; inline;
  62805. begin
  62806. pTDefRegMap(@Self)^.&set := $00000004;
  62807. end;
  62808. procedure TPORTG_ODCG.clearODCG2; inline;
  62809. begin
  62810. pTDefRegMap(@Self)^.clr := $00000004;
  62811. end;
  62812. procedure TPORTG_ODCG.setODCG2(thebits : TBits_1); inline;
  62813. begin
  62814. if thebits = 0 then
  62815. pTDefRegMap(@Self)^.clr := $00000004
  62816. else
  62817. pTDefRegMap(@Self)^.&set := $00000004;
  62818. end;
  62819. function TPORTG_ODCG.getODCG2 : TBits_1; inline;
  62820. begin
  62821. getODCG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62822. end;
  62823. procedure TPORTG_ODCG.setODCG3; inline;
  62824. begin
  62825. pTDefRegMap(@Self)^.&set := $00000008;
  62826. end;
  62827. procedure TPORTG_ODCG.clearODCG3; inline;
  62828. begin
  62829. pTDefRegMap(@Self)^.clr := $00000008;
  62830. end;
  62831. procedure TPORTG_ODCG.setODCG3(thebits : TBits_1); inline;
  62832. begin
  62833. if thebits = 0 then
  62834. pTDefRegMap(@Self)^.clr := $00000008
  62835. else
  62836. pTDefRegMap(@Self)^.&set := $00000008;
  62837. end;
  62838. function TPORTG_ODCG.getODCG3 : TBits_1; inline;
  62839. begin
  62840. getODCG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62841. end;
  62842. procedure TPORTG_ODCG.setODCG6; inline;
  62843. begin
  62844. pTDefRegMap(@Self)^.&set := $00000040;
  62845. end;
  62846. procedure TPORTG_ODCG.clearODCG6; inline;
  62847. begin
  62848. pTDefRegMap(@Self)^.clr := $00000040;
  62849. end;
  62850. procedure TPORTG_ODCG.setODCG6(thebits : TBits_1); inline;
  62851. begin
  62852. if thebits = 0 then
  62853. pTDefRegMap(@Self)^.clr := $00000040
  62854. else
  62855. pTDefRegMap(@Self)^.&set := $00000040;
  62856. end;
  62857. function TPORTG_ODCG.getODCG6 : TBits_1; inline;
  62858. begin
  62859. getODCG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62860. end;
  62861. procedure TPORTG_ODCG.setODCG7; inline;
  62862. begin
  62863. pTDefRegMap(@Self)^.&set := $00000080;
  62864. end;
  62865. procedure TPORTG_ODCG.clearODCG7; inline;
  62866. begin
  62867. pTDefRegMap(@Self)^.clr := $00000080;
  62868. end;
  62869. procedure TPORTG_ODCG.setODCG7(thebits : TBits_1); inline;
  62870. begin
  62871. if thebits = 0 then
  62872. pTDefRegMap(@Self)^.clr := $00000080
  62873. else
  62874. pTDefRegMap(@Self)^.&set := $00000080;
  62875. end;
  62876. function TPORTG_ODCG.getODCG7 : TBits_1; inline;
  62877. begin
  62878. getODCG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62879. end;
  62880. procedure TPORTG_ODCG.setODCG8; inline;
  62881. begin
  62882. pTDefRegMap(@Self)^.&set := $00000100;
  62883. end;
  62884. procedure TPORTG_ODCG.clearODCG8; inline;
  62885. begin
  62886. pTDefRegMap(@Self)^.clr := $00000100;
  62887. end;
  62888. procedure TPORTG_ODCG.setODCG8(thebits : TBits_1); inline;
  62889. begin
  62890. if thebits = 0 then
  62891. pTDefRegMap(@Self)^.clr := $00000100
  62892. else
  62893. pTDefRegMap(@Self)^.&set := $00000100;
  62894. end;
  62895. function TPORTG_ODCG.getODCG8 : TBits_1; inline;
  62896. begin
  62897. getODCG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  62898. end;
  62899. procedure TPORTG_ODCG.setODCG9; inline;
  62900. begin
  62901. pTDefRegMap(@Self)^.&set := $00000200;
  62902. end;
  62903. procedure TPORTG_ODCG.clearODCG9; inline;
  62904. begin
  62905. pTDefRegMap(@Self)^.clr := $00000200;
  62906. end;
  62907. procedure TPORTG_ODCG.setODCG9(thebits : TBits_1); inline;
  62908. begin
  62909. if thebits = 0 then
  62910. pTDefRegMap(@Self)^.clr := $00000200
  62911. else
  62912. pTDefRegMap(@Self)^.&set := $00000200;
  62913. end;
  62914. function TPORTG_ODCG.getODCG9 : TBits_1; inline;
  62915. begin
  62916. getODCG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  62917. end;
  62918. procedure TPORTG_ODCG.setw(thebits : TBits_32); inline;
  62919. begin
  62920. pTDefRegMap(@Self)^.val := thebits;
  62921. end;
  62922. function TPORTG_ODCG.getw : TBits_32; inline;
  62923. begin
  62924. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62925. end;
  62926. procedure TPORTG_CNCON.setSIDL; inline;
  62927. begin
  62928. pTDefRegMap(@Self)^.&set := $00002000;
  62929. end;
  62930. procedure TPORTG_CNCON.clearSIDL; inline;
  62931. begin
  62932. pTDefRegMap(@Self)^.clr := $00002000;
  62933. end;
  62934. procedure TPORTG_CNCON.setSIDL(thebits : TBits_1); inline;
  62935. begin
  62936. if thebits = 0 then
  62937. pTDefRegMap(@Self)^.clr := $00002000
  62938. else
  62939. pTDefRegMap(@Self)^.&set := $00002000;
  62940. end;
  62941. function TPORTG_CNCON.getSIDL : TBits_1; inline;
  62942. begin
  62943. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  62944. end;
  62945. procedure TPORTG_CNCON.setON; inline;
  62946. begin
  62947. pTDefRegMap(@Self)^.&set := $00008000;
  62948. end;
  62949. procedure TPORTG_CNCON.clearON; inline;
  62950. begin
  62951. pTDefRegMap(@Self)^.clr := $00008000;
  62952. end;
  62953. procedure TPORTG_CNCON.setON(thebits : TBits_1); inline;
  62954. begin
  62955. if thebits = 0 then
  62956. pTDefRegMap(@Self)^.clr := $00008000
  62957. else
  62958. pTDefRegMap(@Self)^.&set := $00008000;
  62959. end;
  62960. function TPORTG_CNCON.getON : TBits_1; inline;
  62961. begin
  62962. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  62963. end;
  62964. procedure TPORTG_CNCON.setw(thebits : TBits_32); inline;
  62965. begin
  62966. pTDefRegMap(@Self)^.val := thebits;
  62967. end;
  62968. function TPORTG_CNCON.getw : TBits_32; inline;
  62969. begin
  62970. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62971. end;
  62972. procedure TPORTG_CNEN.setCNEN0; inline;
  62973. begin
  62974. pTDefRegMap(@Self)^.&set := $00000001;
  62975. end;
  62976. procedure TPORTG_CNEN.clearCNEN0; inline;
  62977. begin
  62978. pTDefRegMap(@Self)^.clr := $00000001;
  62979. end;
  62980. procedure TPORTG_CNEN.setCNEN0(thebits : TBits_1); inline;
  62981. begin
  62982. if thebits = 0 then
  62983. pTDefRegMap(@Self)^.clr := $00000001
  62984. else
  62985. pTDefRegMap(@Self)^.&set := $00000001;
  62986. end;
  62987. function TPORTG_CNEN.getCNEN0 : TBits_1; inline;
  62988. begin
  62989. getCNEN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  62990. end;
  62991. procedure TPORTG_CNEN.setCNEN1; inline;
  62992. begin
  62993. pTDefRegMap(@Self)^.&set := $00000002;
  62994. end;
  62995. procedure TPORTG_CNEN.clearCNEN1; inline;
  62996. begin
  62997. pTDefRegMap(@Self)^.clr := $00000002;
  62998. end;
  62999. procedure TPORTG_CNEN.setCNEN1(thebits : TBits_1); inline;
  63000. begin
  63001. if thebits = 0 then
  63002. pTDefRegMap(@Self)^.clr := $00000002
  63003. else
  63004. pTDefRegMap(@Self)^.&set := $00000002;
  63005. end;
  63006. function TPORTG_CNEN.getCNEN1 : TBits_1; inline;
  63007. begin
  63008. getCNEN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  63009. end;
  63010. procedure TPORTG_CNEN.setCNEN2; inline;
  63011. begin
  63012. pTDefRegMap(@Self)^.&set := $00000004;
  63013. end;
  63014. procedure TPORTG_CNEN.clearCNEN2; inline;
  63015. begin
  63016. pTDefRegMap(@Self)^.clr := $00000004;
  63017. end;
  63018. procedure TPORTG_CNEN.setCNEN2(thebits : TBits_1); inline;
  63019. begin
  63020. if thebits = 0 then
  63021. pTDefRegMap(@Self)^.clr := $00000004
  63022. else
  63023. pTDefRegMap(@Self)^.&set := $00000004;
  63024. end;
  63025. function TPORTG_CNEN.getCNEN2 : TBits_1; inline;
  63026. begin
  63027. getCNEN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  63028. end;
  63029. procedure TPORTG_CNEN.setCNEN3; inline;
  63030. begin
  63031. pTDefRegMap(@Self)^.&set := $00000008;
  63032. end;
  63033. procedure TPORTG_CNEN.clearCNEN3; inline;
  63034. begin
  63035. pTDefRegMap(@Self)^.clr := $00000008;
  63036. end;
  63037. procedure TPORTG_CNEN.setCNEN3(thebits : TBits_1); inline;
  63038. begin
  63039. if thebits = 0 then
  63040. pTDefRegMap(@Self)^.clr := $00000008
  63041. else
  63042. pTDefRegMap(@Self)^.&set := $00000008;
  63043. end;
  63044. function TPORTG_CNEN.getCNEN3 : TBits_1; inline;
  63045. begin
  63046. getCNEN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  63047. end;
  63048. procedure TPORTG_CNEN.setCNEN4; inline;
  63049. begin
  63050. pTDefRegMap(@Self)^.&set := $00000010;
  63051. end;
  63052. procedure TPORTG_CNEN.clearCNEN4; inline;
  63053. begin
  63054. pTDefRegMap(@Self)^.clr := $00000010;
  63055. end;
  63056. procedure TPORTG_CNEN.setCNEN4(thebits : TBits_1); inline;
  63057. begin
  63058. if thebits = 0 then
  63059. pTDefRegMap(@Self)^.clr := $00000010
  63060. else
  63061. pTDefRegMap(@Self)^.&set := $00000010;
  63062. end;
  63063. function TPORTG_CNEN.getCNEN4 : TBits_1; inline;
  63064. begin
  63065. getCNEN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63066. end;
  63067. procedure TPORTG_CNEN.setCNEN5; inline;
  63068. begin
  63069. pTDefRegMap(@Self)^.&set := $00000020;
  63070. end;
  63071. procedure TPORTG_CNEN.clearCNEN5; inline;
  63072. begin
  63073. pTDefRegMap(@Self)^.clr := $00000020;
  63074. end;
  63075. procedure TPORTG_CNEN.setCNEN5(thebits : TBits_1); inline;
  63076. begin
  63077. if thebits = 0 then
  63078. pTDefRegMap(@Self)^.clr := $00000020
  63079. else
  63080. pTDefRegMap(@Self)^.&set := $00000020;
  63081. end;
  63082. function TPORTG_CNEN.getCNEN5 : TBits_1; inline;
  63083. begin
  63084. getCNEN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  63085. end;
  63086. procedure TPORTG_CNEN.setCNEN6; inline;
  63087. begin
  63088. pTDefRegMap(@Self)^.&set := $00000040;
  63089. end;
  63090. procedure TPORTG_CNEN.clearCNEN6; inline;
  63091. begin
  63092. pTDefRegMap(@Self)^.clr := $00000040;
  63093. end;
  63094. procedure TPORTG_CNEN.setCNEN6(thebits : TBits_1); inline;
  63095. begin
  63096. if thebits = 0 then
  63097. pTDefRegMap(@Self)^.clr := $00000040
  63098. else
  63099. pTDefRegMap(@Self)^.&set := $00000040;
  63100. end;
  63101. function TPORTG_CNEN.getCNEN6 : TBits_1; inline;
  63102. begin
  63103. getCNEN6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63104. end;
  63105. procedure TPORTG_CNEN.setCNEN7; inline;
  63106. begin
  63107. pTDefRegMap(@Self)^.&set := $00000080;
  63108. end;
  63109. procedure TPORTG_CNEN.clearCNEN7; inline;
  63110. begin
  63111. pTDefRegMap(@Self)^.clr := $00000080;
  63112. end;
  63113. procedure TPORTG_CNEN.setCNEN7(thebits : TBits_1); inline;
  63114. begin
  63115. if thebits = 0 then
  63116. pTDefRegMap(@Self)^.clr := $00000080
  63117. else
  63118. pTDefRegMap(@Self)^.&set := $00000080;
  63119. end;
  63120. function TPORTG_CNEN.getCNEN7 : TBits_1; inline;
  63121. begin
  63122. getCNEN7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63123. end;
  63124. procedure TPORTG_CNEN.setCNEN8; inline;
  63125. begin
  63126. pTDefRegMap(@Self)^.&set := $00000100;
  63127. end;
  63128. procedure TPORTG_CNEN.clearCNEN8; inline;
  63129. begin
  63130. pTDefRegMap(@Self)^.clr := $00000100;
  63131. end;
  63132. procedure TPORTG_CNEN.setCNEN8(thebits : TBits_1); inline;
  63133. begin
  63134. if thebits = 0 then
  63135. pTDefRegMap(@Self)^.clr := $00000100
  63136. else
  63137. pTDefRegMap(@Self)^.&set := $00000100;
  63138. end;
  63139. function TPORTG_CNEN.getCNEN8 : TBits_1; inline;
  63140. begin
  63141. getCNEN8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  63142. end;
  63143. procedure TPORTG_CNEN.setCNEN9; inline;
  63144. begin
  63145. pTDefRegMap(@Self)^.&set := $00000200;
  63146. end;
  63147. procedure TPORTG_CNEN.clearCNEN9; inline;
  63148. begin
  63149. pTDefRegMap(@Self)^.clr := $00000200;
  63150. end;
  63151. procedure TPORTG_CNEN.setCNEN9(thebits : TBits_1); inline;
  63152. begin
  63153. if thebits = 0 then
  63154. pTDefRegMap(@Self)^.clr := $00000200
  63155. else
  63156. pTDefRegMap(@Self)^.&set := $00000200;
  63157. end;
  63158. function TPORTG_CNEN.getCNEN9 : TBits_1; inline;
  63159. begin
  63160. getCNEN9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  63161. end;
  63162. procedure TPORTG_CNEN.setCNEN10; inline;
  63163. begin
  63164. pTDefRegMap(@Self)^.&set := $00000400;
  63165. end;
  63166. procedure TPORTG_CNEN.clearCNEN10; inline;
  63167. begin
  63168. pTDefRegMap(@Self)^.clr := $00000400;
  63169. end;
  63170. procedure TPORTG_CNEN.setCNEN10(thebits : TBits_1); inline;
  63171. begin
  63172. if thebits = 0 then
  63173. pTDefRegMap(@Self)^.clr := $00000400
  63174. else
  63175. pTDefRegMap(@Self)^.&set := $00000400;
  63176. end;
  63177. function TPORTG_CNEN.getCNEN10 : TBits_1; inline;
  63178. begin
  63179. getCNEN10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  63180. end;
  63181. procedure TPORTG_CNEN.setCNEN11; inline;
  63182. begin
  63183. pTDefRegMap(@Self)^.&set := $00000800;
  63184. end;
  63185. procedure TPORTG_CNEN.clearCNEN11; inline;
  63186. begin
  63187. pTDefRegMap(@Self)^.clr := $00000800;
  63188. end;
  63189. procedure TPORTG_CNEN.setCNEN11(thebits : TBits_1); inline;
  63190. begin
  63191. if thebits = 0 then
  63192. pTDefRegMap(@Self)^.clr := $00000800
  63193. else
  63194. pTDefRegMap(@Self)^.&set := $00000800;
  63195. end;
  63196. function TPORTG_CNEN.getCNEN11 : TBits_1; inline;
  63197. begin
  63198. getCNEN11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  63199. end;
  63200. procedure TPORTG_CNEN.setCNEN12; inline;
  63201. begin
  63202. pTDefRegMap(@Self)^.&set := $00001000;
  63203. end;
  63204. procedure TPORTG_CNEN.clearCNEN12; inline;
  63205. begin
  63206. pTDefRegMap(@Self)^.clr := $00001000;
  63207. end;
  63208. procedure TPORTG_CNEN.setCNEN12(thebits : TBits_1); inline;
  63209. begin
  63210. if thebits = 0 then
  63211. pTDefRegMap(@Self)^.clr := $00001000
  63212. else
  63213. pTDefRegMap(@Self)^.&set := $00001000;
  63214. end;
  63215. function TPORTG_CNEN.getCNEN12 : TBits_1; inline;
  63216. begin
  63217. getCNEN12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  63218. end;
  63219. procedure TPORTG_CNEN.setCNEN13; inline;
  63220. begin
  63221. pTDefRegMap(@Self)^.&set := $00002000;
  63222. end;
  63223. procedure TPORTG_CNEN.clearCNEN13; inline;
  63224. begin
  63225. pTDefRegMap(@Self)^.clr := $00002000;
  63226. end;
  63227. procedure TPORTG_CNEN.setCNEN13(thebits : TBits_1); inline;
  63228. begin
  63229. if thebits = 0 then
  63230. pTDefRegMap(@Self)^.clr := $00002000
  63231. else
  63232. pTDefRegMap(@Self)^.&set := $00002000;
  63233. end;
  63234. function TPORTG_CNEN.getCNEN13 : TBits_1; inline;
  63235. begin
  63236. getCNEN13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  63237. end;
  63238. procedure TPORTG_CNEN.setCNEN14; inline;
  63239. begin
  63240. pTDefRegMap(@Self)^.&set := $00004000;
  63241. end;
  63242. procedure TPORTG_CNEN.clearCNEN14; inline;
  63243. begin
  63244. pTDefRegMap(@Self)^.clr := $00004000;
  63245. end;
  63246. procedure TPORTG_CNEN.setCNEN14(thebits : TBits_1); inline;
  63247. begin
  63248. if thebits = 0 then
  63249. pTDefRegMap(@Self)^.clr := $00004000
  63250. else
  63251. pTDefRegMap(@Self)^.&set := $00004000;
  63252. end;
  63253. function TPORTG_CNEN.getCNEN14 : TBits_1; inline;
  63254. begin
  63255. getCNEN14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  63256. end;
  63257. procedure TPORTG_CNEN.setCNEN15; inline;
  63258. begin
  63259. pTDefRegMap(@Self)^.&set := $00008000;
  63260. end;
  63261. procedure TPORTG_CNEN.clearCNEN15; inline;
  63262. begin
  63263. pTDefRegMap(@Self)^.clr := $00008000;
  63264. end;
  63265. procedure TPORTG_CNEN.setCNEN15(thebits : TBits_1); inline;
  63266. begin
  63267. if thebits = 0 then
  63268. pTDefRegMap(@Self)^.clr := $00008000
  63269. else
  63270. pTDefRegMap(@Self)^.&set := $00008000;
  63271. end;
  63272. function TPORTG_CNEN.getCNEN15 : TBits_1; inline;
  63273. begin
  63274. getCNEN15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63275. end;
  63276. procedure TPORTG_CNEN.setCNEN16; inline;
  63277. begin
  63278. pTDefRegMap(@Self)^.&set := $00010000;
  63279. end;
  63280. procedure TPORTG_CNEN.clearCNEN16; inline;
  63281. begin
  63282. pTDefRegMap(@Self)^.clr := $00010000;
  63283. end;
  63284. procedure TPORTG_CNEN.setCNEN16(thebits : TBits_1); inline;
  63285. begin
  63286. if thebits = 0 then
  63287. pTDefRegMap(@Self)^.clr := $00010000
  63288. else
  63289. pTDefRegMap(@Self)^.&set := $00010000;
  63290. end;
  63291. function TPORTG_CNEN.getCNEN16 : TBits_1; inline;
  63292. begin
  63293. getCNEN16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  63294. end;
  63295. procedure TPORTG_CNEN.setCNEN17; inline;
  63296. begin
  63297. pTDefRegMap(@Self)^.&set := $00020000;
  63298. end;
  63299. procedure TPORTG_CNEN.clearCNEN17; inline;
  63300. begin
  63301. pTDefRegMap(@Self)^.clr := $00020000;
  63302. end;
  63303. procedure TPORTG_CNEN.setCNEN17(thebits : TBits_1); inline;
  63304. begin
  63305. if thebits = 0 then
  63306. pTDefRegMap(@Self)^.clr := $00020000
  63307. else
  63308. pTDefRegMap(@Self)^.&set := $00020000;
  63309. end;
  63310. function TPORTG_CNEN.getCNEN17 : TBits_1; inline;
  63311. begin
  63312. getCNEN17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  63313. end;
  63314. procedure TPORTG_CNEN.setCNEN18; inline;
  63315. begin
  63316. pTDefRegMap(@Self)^.&set := $00040000;
  63317. end;
  63318. procedure TPORTG_CNEN.clearCNEN18; inline;
  63319. begin
  63320. pTDefRegMap(@Self)^.clr := $00040000;
  63321. end;
  63322. procedure TPORTG_CNEN.setCNEN18(thebits : TBits_1); inline;
  63323. begin
  63324. if thebits = 0 then
  63325. pTDefRegMap(@Self)^.clr := $00040000
  63326. else
  63327. pTDefRegMap(@Self)^.&set := $00040000;
  63328. end;
  63329. function TPORTG_CNEN.getCNEN18 : TBits_1; inline;
  63330. begin
  63331. getCNEN18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  63332. end;
  63333. procedure TPORTG_CNEN.setw(thebits : TBits_32); inline;
  63334. begin
  63335. pTDefRegMap(@Self)^.val := thebits;
  63336. end;
  63337. function TPORTG_CNEN.getw : TBits_32; inline;
  63338. begin
  63339. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63340. end;
  63341. procedure TPORTG_CNPUE.setCNPUE0; inline;
  63342. begin
  63343. pTDefRegMap(@Self)^.&set := $00000001;
  63344. end;
  63345. procedure TPORTG_CNPUE.clearCNPUE0; inline;
  63346. begin
  63347. pTDefRegMap(@Self)^.clr := $00000001;
  63348. end;
  63349. procedure TPORTG_CNPUE.setCNPUE0(thebits : TBits_1); inline;
  63350. begin
  63351. if thebits = 0 then
  63352. pTDefRegMap(@Self)^.clr := $00000001
  63353. else
  63354. pTDefRegMap(@Self)^.&set := $00000001;
  63355. end;
  63356. function TPORTG_CNPUE.getCNPUE0 : TBits_1; inline;
  63357. begin
  63358. getCNPUE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  63359. end;
  63360. procedure TPORTG_CNPUE.setCNPUE1; inline;
  63361. begin
  63362. pTDefRegMap(@Self)^.&set := $00000002;
  63363. end;
  63364. procedure TPORTG_CNPUE.clearCNPUE1; inline;
  63365. begin
  63366. pTDefRegMap(@Self)^.clr := $00000002;
  63367. end;
  63368. procedure TPORTG_CNPUE.setCNPUE1(thebits : TBits_1); inline;
  63369. begin
  63370. if thebits = 0 then
  63371. pTDefRegMap(@Self)^.clr := $00000002
  63372. else
  63373. pTDefRegMap(@Self)^.&set := $00000002;
  63374. end;
  63375. function TPORTG_CNPUE.getCNPUE1 : TBits_1; inline;
  63376. begin
  63377. getCNPUE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  63378. end;
  63379. procedure TPORTG_CNPUE.setCNPUE2; inline;
  63380. begin
  63381. pTDefRegMap(@Self)^.&set := $00000004;
  63382. end;
  63383. procedure TPORTG_CNPUE.clearCNPUE2; inline;
  63384. begin
  63385. pTDefRegMap(@Self)^.clr := $00000004;
  63386. end;
  63387. procedure TPORTG_CNPUE.setCNPUE2(thebits : TBits_1); inline;
  63388. begin
  63389. if thebits = 0 then
  63390. pTDefRegMap(@Self)^.clr := $00000004
  63391. else
  63392. pTDefRegMap(@Self)^.&set := $00000004;
  63393. end;
  63394. function TPORTG_CNPUE.getCNPUE2 : TBits_1; inline;
  63395. begin
  63396. getCNPUE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  63397. end;
  63398. procedure TPORTG_CNPUE.setCNPUE3; inline;
  63399. begin
  63400. pTDefRegMap(@Self)^.&set := $00000008;
  63401. end;
  63402. procedure TPORTG_CNPUE.clearCNPUE3; inline;
  63403. begin
  63404. pTDefRegMap(@Self)^.clr := $00000008;
  63405. end;
  63406. procedure TPORTG_CNPUE.setCNPUE3(thebits : TBits_1); inline;
  63407. begin
  63408. if thebits = 0 then
  63409. pTDefRegMap(@Self)^.clr := $00000008
  63410. else
  63411. pTDefRegMap(@Self)^.&set := $00000008;
  63412. end;
  63413. function TPORTG_CNPUE.getCNPUE3 : TBits_1; inline;
  63414. begin
  63415. getCNPUE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  63416. end;
  63417. procedure TPORTG_CNPUE.setCNPUE4; inline;
  63418. begin
  63419. pTDefRegMap(@Self)^.&set := $00000010;
  63420. end;
  63421. procedure TPORTG_CNPUE.clearCNPUE4; inline;
  63422. begin
  63423. pTDefRegMap(@Self)^.clr := $00000010;
  63424. end;
  63425. procedure TPORTG_CNPUE.setCNPUE4(thebits : TBits_1); inline;
  63426. begin
  63427. if thebits = 0 then
  63428. pTDefRegMap(@Self)^.clr := $00000010
  63429. else
  63430. pTDefRegMap(@Self)^.&set := $00000010;
  63431. end;
  63432. function TPORTG_CNPUE.getCNPUE4 : TBits_1; inline;
  63433. begin
  63434. getCNPUE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63435. end;
  63436. procedure TPORTG_CNPUE.setCNPUE5; inline;
  63437. begin
  63438. pTDefRegMap(@Self)^.&set := $00000020;
  63439. end;
  63440. procedure TPORTG_CNPUE.clearCNPUE5; inline;
  63441. begin
  63442. pTDefRegMap(@Self)^.clr := $00000020;
  63443. end;
  63444. procedure TPORTG_CNPUE.setCNPUE5(thebits : TBits_1); inline;
  63445. begin
  63446. if thebits = 0 then
  63447. pTDefRegMap(@Self)^.clr := $00000020
  63448. else
  63449. pTDefRegMap(@Self)^.&set := $00000020;
  63450. end;
  63451. function TPORTG_CNPUE.getCNPUE5 : TBits_1; inline;
  63452. begin
  63453. getCNPUE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  63454. end;
  63455. procedure TPORTG_CNPUE.setCNPUE6; inline;
  63456. begin
  63457. pTDefRegMap(@Self)^.&set := $00000040;
  63458. end;
  63459. procedure TPORTG_CNPUE.clearCNPUE6; inline;
  63460. begin
  63461. pTDefRegMap(@Self)^.clr := $00000040;
  63462. end;
  63463. procedure TPORTG_CNPUE.setCNPUE6(thebits : TBits_1); inline;
  63464. begin
  63465. if thebits = 0 then
  63466. pTDefRegMap(@Self)^.clr := $00000040
  63467. else
  63468. pTDefRegMap(@Self)^.&set := $00000040;
  63469. end;
  63470. function TPORTG_CNPUE.getCNPUE6 : TBits_1; inline;
  63471. begin
  63472. getCNPUE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63473. end;
  63474. procedure TPORTG_CNPUE.setCNPUE7; inline;
  63475. begin
  63476. pTDefRegMap(@Self)^.&set := $00000080;
  63477. end;
  63478. procedure TPORTG_CNPUE.clearCNPUE7; inline;
  63479. begin
  63480. pTDefRegMap(@Self)^.clr := $00000080;
  63481. end;
  63482. procedure TPORTG_CNPUE.setCNPUE7(thebits : TBits_1); inline;
  63483. begin
  63484. if thebits = 0 then
  63485. pTDefRegMap(@Self)^.clr := $00000080
  63486. else
  63487. pTDefRegMap(@Self)^.&set := $00000080;
  63488. end;
  63489. function TPORTG_CNPUE.getCNPUE7 : TBits_1; inline;
  63490. begin
  63491. getCNPUE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63492. end;
  63493. procedure TPORTG_CNPUE.setCNPUE8; inline;
  63494. begin
  63495. pTDefRegMap(@Self)^.&set := $00000100;
  63496. end;
  63497. procedure TPORTG_CNPUE.clearCNPUE8; inline;
  63498. begin
  63499. pTDefRegMap(@Self)^.clr := $00000100;
  63500. end;
  63501. procedure TPORTG_CNPUE.setCNPUE8(thebits : TBits_1); inline;
  63502. begin
  63503. if thebits = 0 then
  63504. pTDefRegMap(@Self)^.clr := $00000100
  63505. else
  63506. pTDefRegMap(@Self)^.&set := $00000100;
  63507. end;
  63508. function TPORTG_CNPUE.getCNPUE8 : TBits_1; inline;
  63509. begin
  63510. getCNPUE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  63511. end;
  63512. procedure TPORTG_CNPUE.setCNPUE9; inline;
  63513. begin
  63514. pTDefRegMap(@Self)^.&set := $00000200;
  63515. end;
  63516. procedure TPORTG_CNPUE.clearCNPUE9; inline;
  63517. begin
  63518. pTDefRegMap(@Self)^.clr := $00000200;
  63519. end;
  63520. procedure TPORTG_CNPUE.setCNPUE9(thebits : TBits_1); inline;
  63521. begin
  63522. if thebits = 0 then
  63523. pTDefRegMap(@Self)^.clr := $00000200
  63524. else
  63525. pTDefRegMap(@Self)^.&set := $00000200;
  63526. end;
  63527. function TPORTG_CNPUE.getCNPUE9 : TBits_1; inline;
  63528. begin
  63529. getCNPUE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  63530. end;
  63531. procedure TPORTG_CNPUE.setCNPUE10; inline;
  63532. begin
  63533. pTDefRegMap(@Self)^.&set := $00000400;
  63534. end;
  63535. procedure TPORTG_CNPUE.clearCNPUE10; inline;
  63536. begin
  63537. pTDefRegMap(@Self)^.clr := $00000400;
  63538. end;
  63539. procedure TPORTG_CNPUE.setCNPUE10(thebits : TBits_1); inline;
  63540. begin
  63541. if thebits = 0 then
  63542. pTDefRegMap(@Self)^.clr := $00000400
  63543. else
  63544. pTDefRegMap(@Self)^.&set := $00000400;
  63545. end;
  63546. function TPORTG_CNPUE.getCNPUE10 : TBits_1; inline;
  63547. begin
  63548. getCNPUE10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  63549. end;
  63550. procedure TPORTG_CNPUE.setCNPUE11; inline;
  63551. begin
  63552. pTDefRegMap(@Self)^.&set := $00000800;
  63553. end;
  63554. procedure TPORTG_CNPUE.clearCNPUE11; inline;
  63555. begin
  63556. pTDefRegMap(@Self)^.clr := $00000800;
  63557. end;
  63558. procedure TPORTG_CNPUE.setCNPUE11(thebits : TBits_1); inline;
  63559. begin
  63560. if thebits = 0 then
  63561. pTDefRegMap(@Self)^.clr := $00000800
  63562. else
  63563. pTDefRegMap(@Self)^.&set := $00000800;
  63564. end;
  63565. function TPORTG_CNPUE.getCNPUE11 : TBits_1; inline;
  63566. begin
  63567. getCNPUE11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  63568. end;
  63569. procedure TPORTG_CNPUE.setCNPUE12; inline;
  63570. begin
  63571. pTDefRegMap(@Self)^.&set := $00001000;
  63572. end;
  63573. procedure TPORTG_CNPUE.clearCNPUE12; inline;
  63574. begin
  63575. pTDefRegMap(@Self)^.clr := $00001000;
  63576. end;
  63577. procedure TPORTG_CNPUE.setCNPUE12(thebits : TBits_1); inline;
  63578. begin
  63579. if thebits = 0 then
  63580. pTDefRegMap(@Self)^.clr := $00001000
  63581. else
  63582. pTDefRegMap(@Self)^.&set := $00001000;
  63583. end;
  63584. function TPORTG_CNPUE.getCNPUE12 : TBits_1; inline;
  63585. begin
  63586. getCNPUE12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  63587. end;
  63588. procedure TPORTG_CNPUE.setCNPUE13; inline;
  63589. begin
  63590. pTDefRegMap(@Self)^.&set := $00002000;
  63591. end;
  63592. procedure TPORTG_CNPUE.clearCNPUE13; inline;
  63593. begin
  63594. pTDefRegMap(@Self)^.clr := $00002000;
  63595. end;
  63596. procedure TPORTG_CNPUE.setCNPUE13(thebits : TBits_1); inline;
  63597. begin
  63598. if thebits = 0 then
  63599. pTDefRegMap(@Self)^.clr := $00002000
  63600. else
  63601. pTDefRegMap(@Self)^.&set := $00002000;
  63602. end;
  63603. function TPORTG_CNPUE.getCNPUE13 : TBits_1; inline;
  63604. begin
  63605. getCNPUE13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  63606. end;
  63607. procedure TPORTG_CNPUE.setCNPUE14; inline;
  63608. begin
  63609. pTDefRegMap(@Self)^.&set := $00004000;
  63610. end;
  63611. procedure TPORTG_CNPUE.clearCNPUE14; inline;
  63612. begin
  63613. pTDefRegMap(@Self)^.clr := $00004000;
  63614. end;
  63615. procedure TPORTG_CNPUE.setCNPUE14(thebits : TBits_1); inline;
  63616. begin
  63617. if thebits = 0 then
  63618. pTDefRegMap(@Self)^.clr := $00004000
  63619. else
  63620. pTDefRegMap(@Self)^.&set := $00004000;
  63621. end;
  63622. function TPORTG_CNPUE.getCNPUE14 : TBits_1; inline;
  63623. begin
  63624. getCNPUE14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  63625. end;
  63626. procedure TPORTG_CNPUE.setCNPUE15; inline;
  63627. begin
  63628. pTDefRegMap(@Self)^.&set := $00008000;
  63629. end;
  63630. procedure TPORTG_CNPUE.clearCNPUE15; inline;
  63631. begin
  63632. pTDefRegMap(@Self)^.clr := $00008000;
  63633. end;
  63634. procedure TPORTG_CNPUE.setCNPUE15(thebits : TBits_1); inline;
  63635. begin
  63636. if thebits = 0 then
  63637. pTDefRegMap(@Self)^.clr := $00008000
  63638. else
  63639. pTDefRegMap(@Self)^.&set := $00008000;
  63640. end;
  63641. function TPORTG_CNPUE.getCNPUE15 : TBits_1; inline;
  63642. begin
  63643. getCNPUE15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63644. end;
  63645. procedure TPORTG_CNPUE.setCNPUE16; inline;
  63646. begin
  63647. pTDefRegMap(@Self)^.&set := $00010000;
  63648. end;
  63649. procedure TPORTG_CNPUE.clearCNPUE16; inline;
  63650. begin
  63651. pTDefRegMap(@Self)^.clr := $00010000;
  63652. end;
  63653. procedure TPORTG_CNPUE.setCNPUE16(thebits : TBits_1); inline;
  63654. begin
  63655. if thebits = 0 then
  63656. pTDefRegMap(@Self)^.clr := $00010000
  63657. else
  63658. pTDefRegMap(@Self)^.&set := $00010000;
  63659. end;
  63660. function TPORTG_CNPUE.getCNPUE16 : TBits_1; inline;
  63661. begin
  63662. getCNPUE16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  63663. end;
  63664. procedure TPORTG_CNPUE.setCNPUE17; inline;
  63665. begin
  63666. pTDefRegMap(@Self)^.&set := $00020000;
  63667. end;
  63668. procedure TPORTG_CNPUE.clearCNPUE17; inline;
  63669. begin
  63670. pTDefRegMap(@Self)^.clr := $00020000;
  63671. end;
  63672. procedure TPORTG_CNPUE.setCNPUE17(thebits : TBits_1); inline;
  63673. begin
  63674. if thebits = 0 then
  63675. pTDefRegMap(@Self)^.clr := $00020000
  63676. else
  63677. pTDefRegMap(@Self)^.&set := $00020000;
  63678. end;
  63679. function TPORTG_CNPUE.getCNPUE17 : TBits_1; inline;
  63680. begin
  63681. getCNPUE17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  63682. end;
  63683. procedure TPORTG_CNPUE.setCNPUE18; inline;
  63684. begin
  63685. pTDefRegMap(@Self)^.&set := $00040000;
  63686. end;
  63687. procedure TPORTG_CNPUE.clearCNPUE18; inline;
  63688. begin
  63689. pTDefRegMap(@Self)^.clr := $00040000;
  63690. end;
  63691. procedure TPORTG_CNPUE.setCNPUE18(thebits : TBits_1); inline;
  63692. begin
  63693. if thebits = 0 then
  63694. pTDefRegMap(@Self)^.clr := $00040000
  63695. else
  63696. pTDefRegMap(@Self)^.&set := $00040000;
  63697. end;
  63698. function TPORTG_CNPUE.getCNPUE18 : TBits_1; inline;
  63699. begin
  63700. getCNPUE18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  63701. end;
  63702. procedure TPORTG_CNPUE.setw(thebits : TBits_32); inline;
  63703. begin
  63704. pTDefRegMap(@Self)^.val := thebits;
  63705. end;
  63706. function TPORTG_CNPUE.getw : TBits_32; inline;
  63707. begin
  63708. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63709. end;
  63710. procedure TCAN1_C1CON.setDNCNT(thebits : TBits_5); inline;
  63711. begin
  63712. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  63713. end;
  63714. function TCAN1_C1CON.getDNCNT : TBits_5; inline;
  63715. begin
  63716. getDNCNT := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  63717. end;
  63718. procedure TCAN1_C1CON.setCANBUSY; inline;
  63719. begin
  63720. pTDefRegMap(@Self)^.&set := $00000800;
  63721. end;
  63722. procedure TCAN1_C1CON.clearCANBUSY; inline;
  63723. begin
  63724. pTDefRegMap(@Self)^.clr := $00000800;
  63725. end;
  63726. procedure TCAN1_C1CON.setCANBUSY(thebits : TBits_1); inline;
  63727. begin
  63728. if thebits = 0 then
  63729. pTDefRegMap(@Self)^.clr := $00000800
  63730. else
  63731. pTDefRegMap(@Self)^.&set := $00000800;
  63732. end;
  63733. function TCAN1_C1CON.getCANBUSY : TBits_1; inline;
  63734. begin
  63735. getCANBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  63736. end;
  63737. procedure TCAN1_C1CON.setSIDL; inline;
  63738. begin
  63739. pTDefRegMap(@Self)^.&set := $00002000;
  63740. end;
  63741. procedure TCAN1_C1CON.clearSIDL; inline;
  63742. begin
  63743. pTDefRegMap(@Self)^.clr := $00002000;
  63744. end;
  63745. procedure TCAN1_C1CON.setSIDL(thebits : TBits_1); inline;
  63746. begin
  63747. if thebits = 0 then
  63748. pTDefRegMap(@Self)^.clr := $00002000
  63749. else
  63750. pTDefRegMap(@Self)^.&set := $00002000;
  63751. end;
  63752. function TCAN1_C1CON.getSIDL : TBits_1; inline;
  63753. begin
  63754. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  63755. end;
  63756. procedure TCAN1_C1CON.setON; inline;
  63757. begin
  63758. pTDefRegMap(@Self)^.&set := $00008000;
  63759. end;
  63760. procedure TCAN1_C1CON.clearON; inline;
  63761. begin
  63762. pTDefRegMap(@Self)^.clr := $00008000;
  63763. end;
  63764. procedure TCAN1_C1CON.setON(thebits : TBits_1); inline;
  63765. begin
  63766. if thebits = 0 then
  63767. pTDefRegMap(@Self)^.clr := $00008000
  63768. else
  63769. pTDefRegMap(@Self)^.&set := $00008000;
  63770. end;
  63771. function TCAN1_C1CON.getON : TBits_1; inline;
  63772. begin
  63773. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63774. end;
  63775. procedure TCAN1_C1CON.setCANCAP; inline;
  63776. begin
  63777. pTDefRegMap(@Self)^.&set := $00100000;
  63778. end;
  63779. procedure TCAN1_C1CON.clearCANCAP; inline;
  63780. begin
  63781. pTDefRegMap(@Self)^.clr := $00100000;
  63782. end;
  63783. procedure TCAN1_C1CON.setCANCAP(thebits : TBits_1); inline;
  63784. begin
  63785. if thebits = 0 then
  63786. pTDefRegMap(@Self)^.clr := $00100000
  63787. else
  63788. pTDefRegMap(@Self)^.&set := $00100000;
  63789. end;
  63790. function TCAN1_C1CON.getCANCAP : TBits_1; inline;
  63791. begin
  63792. getCANCAP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  63793. end;
  63794. procedure TCAN1_C1CON.setOPMOD(thebits : TBits_3); inline;
  63795. begin
  63796. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF1FFFFF or ( thebits shl 21 );
  63797. end;
  63798. function TCAN1_C1CON.getOPMOD : TBits_3; inline;
  63799. begin
  63800. getOPMOD := (pTDefRegMap(@Self)^.val and $00E00000) shr 21;
  63801. end;
  63802. procedure TCAN1_C1CON.setREQOP(thebits : TBits_3); inline;
  63803. begin
  63804. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  63805. end;
  63806. function TCAN1_C1CON.getREQOP : TBits_3; inline;
  63807. begin
  63808. getREQOP := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  63809. end;
  63810. procedure TCAN1_C1CON.setABAT; inline;
  63811. begin
  63812. pTDefRegMap(@Self)^.&set := $08000000;
  63813. end;
  63814. procedure TCAN1_C1CON.clearABAT; inline;
  63815. begin
  63816. pTDefRegMap(@Self)^.clr := $08000000;
  63817. end;
  63818. procedure TCAN1_C1CON.setABAT(thebits : TBits_1); inline;
  63819. begin
  63820. if thebits = 0 then
  63821. pTDefRegMap(@Self)^.clr := $08000000
  63822. else
  63823. pTDefRegMap(@Self)^.&set := $08000000;
  63824. end;
  63825. function TCAN1_C1CON.getABAT : TBits_1; inline;
  63826. begin
  63827. getABAT := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  63828. end;
  63829. procedure TCAN1_C1CON.setw(thebits : TBits_32); inline;
  63830. begin
  63831. pTDefRegMap(@Self)^.val := thebits;
  63832. end;
  63833. function TCAN1_C1CON.getw : TBits_32; inline;
  63834. begin
  63835. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63836. end;
  63837. procedure TCAN1_C1CFG.setBRP(thebits : TBits_6); inline;
  63838. begin
  63839. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
  63840. end;
  63841. function TCAN1_C1CFG.getBRP : TBits_6; inline;
  63842. begin
  63843. getBRP := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
  63844. end;
  63845. procedure TCAN1_C1CFG.setSJW(thebits : TBits_2); inline;
  63846. begin
  63847. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  63848. end;
  63849. function TCAN1_C1CFG.getSJW : TBits_2; inline;
  63850. begin
  63851. getSJW := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  63852. end;
  63853. procedure TCAN1_C1CFG.setPRSEG(thebits : TBits_3); inline;
  63854. begin
  63855. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  63856. end;
  63857. function TCAN1_C1CFG.getPRSEG : TBits_3; inline;
  63858. begin
  63859. getPRSEG := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  63860. end;
  63861. procedure TCAN1_C1CFG.setSEG1PH(thebits : TBits_3); inline;
  63862. begin
  63863. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC7FF or ( thebits shl 11 );
  63864. end;
  63865. function TCAN1_C1CFG.getSEG1PH : TBits_3; inline;
  63866. begin
  63867. getSEG1PH := (pTDefRegMap(@Self)^.val and $00003800) shr 11;
  63868. end;
  63869. procedure TCAN1_C1CFG.setSAM; inline;
  63870. begin
  63871. pTDefRegMap(@Self)^.&set := $00004000;
  63872. end;
  63873. procedure TCAN1_C1CFG.clearSAM; inline;
  63874. begin
  63875. pTDefRegMap(@Self)^.clr := $00004000;
  63876. end;
  63877. procedure TCAN1_C1CFG.setSAM(thebits : TBits_1); inline;
  63878. begin
  63879. if thebits = 0 then
  63880. pTDefRegMap(@Self)^.clr := $00004000
  63881. else
  63882. pTDefRegMap(@Self)^.&set := $00004000;
  63883. end;
  63884. function TCAN1_C1CFG.getSAM : TBits_1; inline;
  63885. begin
  63886. getSAM := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  63887. end;
  63888. procedure TCAN1_C1CFG.setSEG2PHTS; inline;
  63889. begin
  63890. pTDefRegMap(@Self)^.&set := $00008000;
  63891. end;
  63892. procedure TCAN1_C1CFG.clearSEG2PHTS; inline;
  63893. begin
  63894. pTDefRegMap(@Self)^.clr := $00008000;
  63895. end;
  63896. procedure TCAN1_C1CFG.setSEG2PHTS(thebits : TBits_1); inline;
  63897. begin
  63898. if thebits = 0 then
  63899. pTDefRegMap(@Self)^.clr := $00008000
  63900. else
  63901. pTDefRegMap(@Self)^.&set := $00008000;
  63902. end;
  63903. function TCAN1_C1CFG.getSEG2PHTS : TBits_1; inline;
  63904. begin
  63905. getSEG2PHTS := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63906. end;
  63907. procedure TCAN1_C1CFG.setSEG2PH(thebits : TBits_3); inline;
  63908. begin
  63909. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  63910. end;
  63911. function TCAN1_C1CFG.getSEG2PH : TBits_3; inline;
  63912. begin
  63913. getSEG2PH := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  63914. end;
  63915. procedure TCAN1_C1CFG.setWAKFIL; inline;
  63916. begin
  63917. pTDefRegMap(@Self)^.&set := $00400000;
  63918. end;
  63919. procedure TCAN1_C1CFG.clearWAKFIL; inline;
  63920. begin
  63921. pTDefRegMap(@Self)^.clr := $00400000;
  63922. end;
  63923. procedure TCAN1_C1CFG.setWAKFIL(thebits : TBits_1); inline;
  63924. begin
  63925. if thebits = 0 then
  63926. pTDefRegMap(@Self)^.clr := $00400000
  63927. else
  63928. pTDefRegMap(@Self)^.&set := $00400000;
  63929. end;
  63930. function TCAN1_C1CFG.getWAKFIL : TBits_1; inline;
  63931. begin
  63932. getWAKFIL := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  63933. end;
  63934. procedure TCAN1_C1CFG.setw(thebits : TBits_32); inline;
  63935. begin
  63936. pTDefRegMap(@Self)^.val := thebits;
  63937. end;
  63938. function TCAN1_C1CFG.getw : TBits_32; inline;
  63939. begin
  63940. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63941. end;
  63942. procedure TCAN1_C1INT.setTBIF; inline;
  63943. begin
  63944. pTDefRegMap(@Self)^.&set := $00000001;
  63945. end;
  63946. procedure TCAN1_C1INT.clearTBIF; inline;
  63947. begin
  63948. pTDefRegMap(@Self)^.clr := $00000001;
  63949. end;
  63950. procedure TCAN1_C1INT.setTBIF(thebits : TBits_1); inline;
  63951. begin
  63952. if thebits = 0 then
  63953. pTDefRegMap(@Self)^.clr := $00000001
  63954. else
  63955. pTDefRegMap(@Self)^.&set := $00000001;
  63956. end;
  63957. function TCAN1_C1INT.getTBIF : TBits_1; inline;
  63958. begin
  63959. getTBIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  63960. end;
  63961. procedure TCAN1_C1INT.setRBIF; inline;
  63962. begin
  63963. pTDefRegMap(@Self)^.&set := $00000002;
  63964. end;
  63965. procedure TCAN1_C1INT.clearRBIF; inline;
  63966. begin
  63967. pTDefRegMap(@Self)^.clr := $00000002;
  63968. end;
  63969. procedure TCAN1_C1INT.setRBIF(thebits : TBits_1); inline;
  63970. begin
  63971. if thebits = 0 then
  63972. pTDefRegMap(@Self)^.clr := $00000002
  63973. else
  63974. pTDefRegMap(@Self)^.&set := $00000002;
  63975. end;
  63976. function TCAN1_C1INT.getRBIF : TBits_1; inline;
  63977. begin
  63978. getRBIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  63979. end;
  63980. procedure TCAN1_C1INT.setCTMRIF; inline;
  63981. begin
  63982. pTDefRegMap(@Self)^.&set := $00000004;
  63983. end;
  63984. procedure TCAN1_C1INT.clearCTMRIF; inline;
  63985. begin
  63986. pTDefRegMap(@Self)^.clr := $00000004;
  63987. end;
  63988. procedure TCAN1_C1INT.setCTMRIF(thebits : TBits_1); inline;
  63989. begin
  63990. if thebits = 0 then
  63991. pTDefRegMap(@Self)^.clr := $00000004
  63992. else
  63993. pTDefRegMap(@Self)^.&set := $00000004;
  63994. end;
  63995. function TCAN1_C1INT.getCTMRIF : TBits_1; inline;
  63996. begin
  63997. getCTMRIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  63998. end;
  63999. procedure TCAN1_C1INT.setMODIF; inline;
  64000. begin
  64001. pTDefRegMap(@Self)^.&set := $00000008;
  64002. end;
  64003. procedure TCAN1_C1INT.clearMODIF; inline;
  64004. begin
  64005. pTDefRegMap(@Self)^.clr := $00000008;
  64006. end;
  64007. procedure TCAN1_C1INT.setMODIF(thebits : TBits_1); inline;
  64008. begin
  64009. if thebits = 0 then
  64010. pTDefRegMap(@Self)^.clr := $00000008
  64011. else
  64012. pTDefRegMap(@Self)^.&set := $00000008;
  64013. end;
  64014. function TCAN1_C1INT.getMODIF : TBits_1; inline;
  64015. begin
  64016. getMODIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  64017. end;
  64018. procedure TCAN1_C1INT.setRBOVIF; inline;
  64019. begin
  64020. pTDefRegMap(@Self)^.&set := $00000800;
  64021. end;
  64022. procedure TCAN1_C1INT.clearRBOVIF; inline;
  64023. begin
  64024. pTDefRegMap(@Self)^.clr := $00000800;
  64025. end;
  64026. procedure TCAN1_C1INT.setRBOVIF(thebits : TBits_1); inline;
  64027. begin
  64028. if thebits = 0 then
  64029. pTDefRegMap(@Self)^.clr := $00000800
  64030. else
  64031. pTDefRegMap(@Self)^.&set := $00000800;
  64032. end;
  64033. function TCAN1_C1INT.getRBOVIF : TBits_1; inline;
  64034. begin
  64035. getRBOVIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  64036. end;
  64037. procedure TCAN1_C1INT.setSERRIF; inline;
  64038. begin
  64039. pTDefRegMap(@Self)^.&set := $00001000;
  64040. end;
  64041. procedure TCAN1_C1INT.clearSERRIF; inline;
  64042. begin
  64043. pTDefRegMap(@Self)^.clr := $00001000;
  64044. end;
  64045. procedure TCAN1_C1INT.setSERRIF(thebits : TBits_1); inline;
  64046. begin
  64047. if thebits = 0 then
  64048. pTDefRegMap(@Self)^.clr := $00001000
  64049. else
  64050. pTDefRegMap(@Self)^.&set := $00001000;
  64051. end;
  64052. function TCAN1_C1INT.getSERRIF : TBits_1; inline;
  64053. begin
  64054. getSERRIF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  64055. end;
  64056. procedure TCAN1_C1INT.setCERRIF; inline;
  64057. begin
  64058. pTDefRegMap(@Self)^.&set := $00002000;
  64059. end;
  64060. procedure TCAN1_C1INT.clearCERRIF; inline;
  64061. begin
  64062. pTDefRegMap(@Self)^.clr := $00002000;
  64063. end;
  64064. procedure TCAN1_C1INT.setCERRIF(thebits : TBits_1); inline;
  64065. begin
  64066. if thebits = 0 then
  64067. pTDefRegMap(@Self)^.clr := $00002000
  64068. else
  64069. pTDefRegMap(@Self)^.&set := $00002000;
  64070. end;
  64071. function TCAN1_C1INT.getCERRIF : TBits_1; inline;
  64072. begin
  64073. getCERRIF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  64074. end;
  64075. procedure TCAN1_C1INT.setWAKIF; inline;
  64076. begin
  64077. pTDefRegMap(@Self)^.&set := $00004000;
  64078. end;
  64079. procedure TCAN1_C1INT.clearWAKIF; inline;
  64080. begin
  64081. pTDefRegMap(@Self)^.clr := $00004000;
  64082. end;
  64083. procedure TCAN1_C1INT.setWAKIF(thebits : TBits_1); inline;
  64084. begin
  64085. if thebits = 0 then
  64086. pTDefRegMap(@Self)^.clr := $00004000
  64087. else
  64088. pTDefRegMap(@Self)^.&set := $00004000;
  64089. end;
  64090. function TCAN1_C1INT.getWAKIF : TBits_1; inline;
  64091. begin
  64092. getWAKIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  64093. end;
  64094. procedure TCAN1_C1INT.setIVRIF; inline;
  64095. begin
  64096. pTDefRegMap(@Self)^.&set := $00008000;
  64097. end;
  64098. procedure TCAN1_C1INT.clearIVRIF; inline;
  64099. begin
  64100. pTDefRegMap(@Self)^.clr := $00008000;
  64101. end;
  64102. procedure TCAN1_C1INT.setIVRIF(thebits : TBits_1); inline;
  64103. begin
  64104. if thebits = 0 then
  64105. pTDefRegMap(@Self)^.clr := $00008000
  64106. else
  64107. pTDefRegMap(@Self)^.&set := $00008000;
  64108. end;
  64109. function TCAN1_C1INT.getIVRIF : TBits_1; inline;
  64110. begin
  64111. getIVRIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  64112. end;
  64113. procedure TCAN1_C1INT.setTBIE; inline;
  64114. begin
  64115. pTDefRegMap(@Self)^.&set := $00010000;
  64116. end;
  64117. procedure TCAN1_C1INT.clearTBIE; inline;
  64118. begin
  64119. pTDefRegMap(@Self)^.clr := $00010000;
  64120. end;
  64121. procedure TCAN1_C1INT.setTBIE(thebits : TBits_1); inline;
  64122. begin
  64123. if thebits = 0 then
  64124. pTDefRegMap(@Self)^.clr := $00010000
  64125. else
  64126. pTDefRegMap(@Self)^.&set := $00010000;
  64127. end;
  64128. function TCAN1_C1INT.getTBIE : TBits_1; inline;
  64129. begin
  64130. getTBIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  64131. end;
  64132. procedure TCAN1_C1INT.setRBIE; inline;
  64133. begin
  64134. pTDefRegMap(@Self)^.&set := $00020000;
  64135. end;
  64136. procedure TCAN1_C1INT.clearRBIE; inline;
  64137. begin
  64138. pTDefRegMap(@Self)^.clr := $00020000;
  64139. end;
  64140. procedure TCAN1_C1INT.setRBIE(thebits : TBits_1); inline;
  64141. begin
  64142. if thebits = 0 then
  64143. pTDefRegMap(@Self)^.clr := $00020000
  64144. else
  64145. pTDefRegMap(@Self)^.&set := $00020000;
  64146. end;
  64147. function TCAN1_C1INT.getRBIE : TBits_1; inline;
  64148. begin
  64149. getRBIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  64150. end;
  64151. procedure TCAN1_C1INT.setCTMRIE; inline;
  64152. begin
  64153. pTDefRegMap(@Self)^.&set := $00040000;
  64154. end;
  64155. procedure TCAN1_C1INT.clearCTMRIE; inline;
  64156. begin
  64157. pTDefRegMap(@Self)^.clr := $00040000;
  64158. end;
  64159. procedure TCAN1_C1INT.setCTMRIE(thebits : TBits_1); inline;
  64160. begin
  64161. if thebits = 0 then
  64162. pTDefRegMap(@Self)^.clr := $00040000
  64163. else
  64164. pTDefRegMap(@Self)^.&set := $00040000;
  64165. end;
  64166. function TCAN1_C1INT.getCTMRIE : TBits_1; inline;
  64167. begin
  64168. getCTMRIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  64169. end;
  64170. procedure TCAN1_C1INT.setMODIE; inline;
  64171. begin
  64172. pTDefRegMap(@Self)^.&set := $00080000;
  64173. end;
  64174. procedure TCAN1_C1INT.clearMODIE; inline;
  64175. begin
  64176. pTDefRegMap(@Self)^.clr := $00080000;
  64177. end;
  64178. procedure TCAN1_C1INT.setMODIE(thebits : TBits_1); inline;
  64179. begin
  64180. if thebits = 0 then
  64181. pTDefRegMap(@Self)^.clr := $00080000
  64182. else
  64183. pTDefRegMap(@Self)^.&set := $00080000;
  64184. end;
  64185. function TCAN1_C1INT.getMODIE : TBits_1; inline;
  64186. begin
  64187. getMODIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64188. end;
  64189. procedure TCAN1_C1INT.setRBOVIE; inline;
  64190. begin
  64191. pTDefRegMap(@Self)^.&set := $08000000;
  64192. end;
  64193. procedure TCAN1_C1INT.clearRBOVIE; inline;
  64194. begin
  64195. pTDefRegMap(@Self)^.clr := $08000000;
  64196. end;
  64197. procedure TCAN1_C1INT.setRBOVIE(thebits : TBits_1); inline;
  64198. begin
  64199. if thebits = 0 then
  64200. pTDefRegMap(@Self)^.clr := $08000000
  64201. else
  64202. pTDefRegMap(@Self)^.&set := $08000000;
  64203. end;
  64204. function TCAN1_C1INT.getRBOVIE : TBits_1; inline;
  64205. begin
  64206. getRBOVIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  64207. end;
  64208. procedure TCAN1_C1INT.setSERRIE; inline;
  64209. begin
  64210. pTDefRegMap(@Self)^.&set := $10000000;
  64211. end;
  64212. procedure TCAN1_C1INT.clearSERRIE; inline;
  64213. begin
  64214. pTDefRegMap(@Self)^.clr := $10000000;
  64215. end;
  64216. procedure TCAN1_C1INT.setSERRIE(thebits : TBits_1); inline;
  64217. begin
  64218. if thebits = 0 then
  64219. pTDefRegMap(@Self)^.clr := $10000000
  64220. else
  64221. pTDefRegMap(@Self)^.&set := $10000000;
  64222. end;
  64223. function TCAN1_C1INT.getSERRIE : TBits_1; inline;
  64224. begin
  64225. getSERRIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  64226. end;
  64227. procedure TCAN1_C1INT.setCERRIE; inline;
  64228. begin
  64229. pTDefRegMap(@Self)^.&set := $20000000;
  64230. end;
  64231. procedure TCAN1_C1INT.clearCERRIE; inline;
  64232. begin
  64233. pTDefRegMap(@Self)^.clr := $20000000;
  64234. end;
  64235. procedure TCAN1_C1INT.setCERRIE(thebits : TBits_1); inline;
  64236. begin
  64237. if thebits = 0 then
  64238. pTDefRegMap(@Self)^.clr := $20000000
  64239. else
  64240. pTDefRegMap(@Self)^.&set := $20000000;
  64241. end;
  64242. function TCAN1_C1INT.getCERRIE : TBits_1; inline;
  64243. begin
  64244. getCERRIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  64245. end;
  64246. procedure TCAN1_C1INT.setWAKIE; inline;
  64247. begin
  64248. pTDefRegMap(@Self)^.&set := $40000000;
  64249. end;
  64250. procedure TCAN1_C1INT.clearWAKIE; inline;
  64251. begin
  64252. pTDefRegMap(@Self)^.clr := $40000000;
  64253. end;
  64254. procedure TCAN1_C1INT.setWAKIE(thebits : TBits_1); inline;
  64255. begin
  64256. if thebits = 0 then
  64257. pTDefRegMap(@Self)^.clr := $40000000
  64258. else
  64259. pTDefRegMap(@Self)^.&set := $40000000;
  64260. end;
  64261. function TCAN1_C1INT.getWAKIE : TBits_1; inline;
  64262. begin
  64263. getWAKIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  64264. end;
  64265. procedure TCAN1_C1INT.setIVRIE; inline;
  64266. begin
  64267. pTDefRegMap(@Self)^.&set := $80000000;
  64268. end;
  64269. procedure TCAN1_C1INT.clearIVRIE; inline;
  64270. begin
  64271. pTDefRegMap(@Self)^.clr := $80000000;
  64272. end;
  64273. procedure TCAN1_C1INT.setIVRIE(thebits : TBits_1); inline;
  64274. begin
  64275. if thebits = 0 then
  64276. pTDefRegMap(@Self)^.clr := $80000000
  64277. else
  64278. pTDefRegMap(@Self)^.&set := $80000000;
  64279. end;
  64280. function TCAN1_C1INT.getIVRIE : TBits_1; inline;
  64281. begin
  64282. getIVRIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  64283. end;
  64284. procedure TCAN1_C1INT.setw(thebits : TBits_32); inline;
  64285. begin
  64286. pTDefRegMap(@Self)^.val := thebits;
  64287. end;
  64288. function TCAN1_C1INT.getw : TBits_32; inline;
  64289. begin
  64290. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64291. end;
  64292. procedure TCAN1_C1VEC.setICODE(thebits : TBits_7); inline;
  64293. begin
  64294. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  64295. end;
  64296. function TCAN1_C1VEC.getICODE : TBits_7; inline;
  64297. begin
  64298. getICODE := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  64299. end;
  64300. procedure TCAN1_C1VEC.setFILHIT(thebits : TBits_5); inline;
  64301. begin
  64302. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  64303. end;
  64304. function TCAN1_C1VEC.getFILHIT : TBits_5; inline;
  64305. begin
  64306. getFILHIT := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  64307. end;
  64308. procedure TCAN1_C1VEC.setw(thebits : TBits_32); inline;
  64309. begin
  64310. pTDefRegMap(@Self)^.val := thebits;
  64311. end;
  64312. function TCAN1_C1VEC.getw : TBits_32; inline;
  64313. begin
  64314. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64315. end;
  64316. procedure TCAN1_C1TREC.setRERRCNT(thebits : TBits_8); inline;
  64317. begin
  64318. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  64319. end;
  64320. function TCAN1_C1TREC.getRERRCNT : TBits_8; inline;
  64321. begin
  64322. getRERRCNT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  64323. end;
  64324. procedure TCAN1_C1TREC.setTERRCNT(thebits : TBits_8); inline;
  64325. begin
  64326. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  64327. end;
  64328. function TCAN1_C1TREC.getTERRCNT : TBits_8; inline;
  64329. begin
  64330. getTERRCNT := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  64331. end;
  64332. procedure TCAN1_C1TREC.setEWARN; inline;
  64333. begin
  64334. pTDefRegMap(@Self)^.&set := $00010000;
  64335. end;
  64336. procedure TCAN1_C1TREC.clearEWARN; inline;
  64337. begin
  64338. pTDefRegMap(@Self)^.clr := $00010000;
  64339. end;
  64340. procedure TCAN1_C1TREC.setEWARN(thebits : TBits_1); inline;
  64341. begin
  64342. if thebits = 0 then
  64343. pTDefRegMap(@Self)^.clr := $00010000
  64344. else
  64345. pTDefRegMap(@Self)^.&set := $00010000;
  64346. end;
  64347. function TCAN1_C1TREC.getEWARN : TBits_1; inline;
  64348. begin
  64349. getEWARN := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  64350. end;
  64351. procedure TCAN1_C1TREC.setRXWARN; inline;
  64352. begin
  64353. pTDefRegMap(@Self)^.&set := $00020000;
  64354. end;
  64355. procedure TCAN1_C1TREC.clearRXWARN; inline;
  64356. begin
  64357. pTDefRegMap(@Self)^.clr := $00020000;
  64358. end;
  64359. procedure TCAN1_C1TREC.setRXWARN(thebits : TBits_1); inline;
  64360. begin
  64361. if thebits = 0 then
  64362. pTDefRegMap(@Self)^.clr := $00020000
  64363. else
  64364. pTDefRegMap(@Self)^.&set := $00020000;
  64365. end;
  64366. function TCAN1_C1TREC.getRXWARN : TBits_1; inline;
  64367. begin
  64368. getRXWARN := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  64369. end;
  64370. procedure TCAN1_C1TREC.setTXWARN; inline;
  64371. begin
  64372. pTDefRegMap(@Self)^.&set := $00040000;
  64373. end;
  64374. procedure TCAN1_C1TREC.clearTXWARN; inline;
  64375. begin
  64376. pTDefRegMap(@Self)^.clr := $00040000;
  64377. end;
  64378. procedure TCAN1_C1TREC.setTXWARN(thebits : TBits_1); inline;
  64379. begin
  64380. if thebits = 0 then
  64381. pTDefRegMap(@Self)^.clr := $00040000
  64382. else
  64383. pTDefRegMap(@Self)^.&set := $00040000;
  64384. end;
  64385. function TCAN1_C1TREC.getTXWARN : TBits_1; inline;
  64386. begin
  64387. getTXWARN := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  64388. end;
  64389. procedure TCAN1_C1TREC.setRXBP; inline;
  64390. begin
  64391. pTDefRegMap(@Self)^.&set := $00080000;
  64392. end;
  64393. procedure TCAN1_C1TREC.clearRXBP; inline;
  64394. begin
  64395. pTDefRegMap(@Self)^.clr := $00080000;
  64396. end;
  64397. procedure TCAN1_C1TREC.setRXBP(thebits : TBits_1); inline;
  64398. begin
  64399. if thebits = 0 then
  64400. pTDefRegMap(@Self)^.clr := $00080000
  64401. else
  64402. pTDefRegMap(@Self)^.&set := $00080000;
  64403. end;
  64404. function TCAN1_C1TREC.getRXBP : TBits_1; inline;
  64405. begin
  64406. getRXBP := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64407. end;
  64408. procedure TCAN1_C1TREC.setTXBP; inline;
  64409. begin
  64410. pTDefRegMap(@Self)^.&set := $00100000;
  64411. end;
  64412. procedure TCAN1_C1TREC.clearTXBP; inline;
  64413. begin
  64414. pTDefRegMap(@Self)^.clr := $00100000;
  64415. end;
  64416. procedure TCAN1_C1TREC.setTXBP(thebits : TBits_1); inline;
  64417. begin
  64418. if thebits = 0 then
  64419. pTDefRegMap(@Self)^.clr := $00100000
  64420. else
  64421. pTDefRegMap(@Self)^.&set := $00100000;
  64422. end;
  64423. function TCAN1_C1TREC.getTXBP : TBits_1; inline;
  64424. begin
  64425. getTXBP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  64426. end;
  64427. procedure TCAN1_C1TREC.setTXBO; inline;
  64428. begin
  64429. pTDefRegMap(@Self)^.&set := $00200000;
  64430. end;
  64431. procedure TCAN1_C1TREC.clearTXBO; inline;
  64432. begin
  64433. pTDefRegMap(@Self)^.clr := $00200000;
  64434. end;
  64435. procedure TCAN1_C1TREC.setTXBO(thebits : TBits_1); inline;
  64436. begin
  64437. if thebits = 0 then
  64438. pTDefRegMap(@Self)^.clr := $00200000
  64439. else
  64440. pTDefRegMap(@Self)^.&set := $00200000;
  64441. end;
  64442. function TCAN1_C1TREC.getTXBO : TBits_1; inline;
  64443. begin
  64444. getTXBO := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  64445. end;
  64446. procedure TCAN1_C1TREC.setw(thebits : TBits_32); inline;
  64447. begin
  64448. pTDefRegMap(@Self)^.val := thebits;
  64449. end;
  64450. function TCAN1_C1TREC.getw : TBits_32; inline;
  64451. begin
  64452. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64453. end;
  64454. procedure TCAN1_C1FSTAT.setFIFOIP(thebits : TBits_32); inline;
  64455. begin
  64456. pTDefRegMap(@Self)^.val := thebits;
  64457. end;
  64458. function TCAN1_C1FSTAT.getFIFOIP : TBits_32; inline;
  64459. begin
  64460. getFIFOIP := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64461. end;
  64462. procedure TCAN1_C1FSTAT.setFIFOIP0; inline;
  64463. begin
  64464. pTDefRegMap(@Self)^.&set := $00000001;
  64465. end;
  64466. procedure TCAN1_C1FSTAT.clearFIFOIP0; inline;
  64467. begin
  64468. pTDefRegMap(@Self)^.clr := $00000001;
  64469. end;
  64470. procedure TCAN1_C1FSTAT.setFIFOIP0(thebits : TBits_1); inline;
  64471. begin
  64472. if thebits = 0 then
  64473. pTDefRegMap(@Self)^.clr := $00000001
  64474. else
  64475. pTDefRegMap(@Self)^.&set := $00000001;
  64476. end;
  64477. function TCAN1_C1FSTAT.getFIFOIP0 : TBits_1; inline;
  64478. begin
  64479. getFIFOIP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64480. end;
  64481. procedure TCAN1_C1FSTAT.setFIFOIP1; inline;
  64482. begin
  64483. pTDefRegMap(@Self)^.&set := $00000002;
  64484. end;
  64485. procedure TCAN1_C1FSTAT.clearFIFOIP1; inline;
  64486. begin
  64487. pTDefRegMap(@Self)^.clr := $00000002;
  64488. end;
  64489. procedure TCAN1_C1FSTAT.setFIFOIP1(thebits : TBits_1); inline;
  64490. begin
  64491. if thebits = 0 then
  64492. pTDefRegMap(@Self)^.clr := $00000002
  64493. else
  64494. pTDefRegMap(@Self)^.&set := $00000002;
  64495. end;
  64496. function TCAN1_C1FSTAT.getFIFOIP1 : TBits_1; inline;
  64497. begin
  64498. getFIFOIP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64499. end;
  64500. procedure TCAN1_C1FSTAT.setFIFOIP2; inline;
  64501. begin
  64502. pTDefRegMap(@Self)^.&set := $00000004;
  64503. end;
  64504. procedure TCAN1_C1FSTAT.clearFIFOIP2; inline;
  64505. begin
  64506. pTDefRegMap(@Self)^.clr := $00000004;
  64507. end;
  64508. procedure TCAN1_C1FSTAT.setFIFOIP2(thebits : TBits_1); inline;
  64509. begin
  64510. if thebits = 0 then
  64511. pTDefRegMap(@Self)^.clr := $00000004
  64512. else
  64513. pTDefRegMap(@Self)^.&set := $00000004;
  64514. end;
  64515. function TCAN1_C1FSTAT.getFIFOIP2 : TBits_1; inline;
  64516. begin
  64517. getFIFOIP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64518. end;
  64519. procedure TCAN1_C1FSTAT.setFIFOIP3; inline;
  64520. begin
  64521. pTDefRegMap(@Self)^.&set := $00000008;
  64522. end;
  64523. procedure TCAN1_C1FSTAT.clearFIFOIP3; inline;
  64524. begin
  64525. pTDefRegMap(@Self)^.clr := $00000008;
  64526. end;
  64527. procedure TCAN1_C1FSTAT.setFIFOIP3(thebits : TBits_1); inline;
  64528. begin
  64529. if thebits = 0 then
  64530. pTDefRegMap(@Self)^.clr := $00000008
  64531. else
  64532. pTDefRegMap(@Self)^.&set := $00000008;
  64533. end;
  64534. function TCAN1_C1FSTAT.getFIFOIP3 : TBits_1; inline;
  64535. begin
  64536. getFIFOIP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  64537. end;
  64538. procedure TCAN1_C1FSTAT.setFIFOIP4; inline;
  64539. begin
  64540. pTDefRegMap(@Self)^.&set := $00000010;
  64541. end;
  64542. procedure TCAN1_C1FSTAT.clearFIFOIP4; inline;
  64543. begin
  64544. pTDefRegMap(@Self)^.clr := $00000010;
  64545. end;
  64546. procedure TCAN1_C1FSTAT.setFIFOIP4(thebits : TBits_1); inline;
  64547. begin
  64548. if thebits = 0 then
  64549. pTDefRegMap(@Self)^.clr := $00000010
  64550. else
  64551. pTDefRegMap(@Self)^.&set := $00000010;
  64552. end;
  64553. function TCAN1_C1FSTAT.getFIFOIP4 : TBits_1; inline;
  64554. begin
  64555. getFIFOIP4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  64556. end;
  64557. procedure TCAN1_C1FSTAT.setFIFOIP5; inline;
  64558. begin
  64559. pTDefRegMap(@Self)^.&set := $00000020;
  64560. end;
  64561. procedure TCAN1_C1FSTAT.clearFIFOIP5; inline;
  64562. begin
  64563. pTDefRegMap(@Self)^.clr := $00000020;
  64564. end;
  64565. procedure TCAN1_C1FSTAT.setFIFOIP5(thebits : TBits_1); inline;
  64566. begin
  64567. if thebits = 0 then
  64568. pTDefRegMap(@Self)^.clr := $00000020
  64569. else
  64570. pTDefRegMap(@Self)^.&set := $00000020;
  64571. end;
  64572. function TCAN1_C1FSTAT.getFIFOIP5 : TBits_1; inline;
  64573. begin
  64574. getFIFOIP5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  64575. end;
  64576. procedure TCAN1_C1FSTAT.setFIFOIP6; inline;
  64577. begin
  64578. pTDefRegMap(@Self)^.&set := $00000040;
  64579. end;
  64580. procedure TCAN1_C1FSTAT.clearFIFOIP6; inline;
  64581. begin
  64582. pTDefRegMap(@Self)^.clr := $00000040;
  64583. end;
  64584. procedure TCAN1_C1FSTAT.setFIFOIP6(thebits : TBits_1); inline;
  64585. begin
  64586. if thebits = 0 then
  64587. pTDefRegMap(@Self)^.clr := $00000040
  64588. else
  64589. pTDefRegMap(@Self)^.&set := $00000040;
  64590. end;
  64591. function TCAN1_C1FSTAT.getFIFOIP6 : TBits_1; inline;
  64592. begin
  64593. getFIFOIP6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  64594. end;
  64595. procedure TCAN1_C1FSTAT.setFIFOIP7; inline;
  64596. begin
  64597. pTDefRegMap(@Self)^.&set := $00000080;
  64598. end;
  64599. procedure TCAN1_C1FSTAT.clearFIFOIP7; inline;
  64600. begin
  64601. pTDefRegMap(@Self)^.clr := $00000080;
  64602. end;
  64603. procedure TCAN1_C1FSTAT.setFIFOIP7(thebits : TBits_1); inline;
  64604. begin
  64605. if thebits = 0 then
  64606. pTDefRegMap(@Self)^.clr := $00000080
  64607. else
  64608. pTDefRegMap(@Self)^.&set := $00000080;
  64609. end;
  64610. function TCAN1_C1FSTAT.getFIFOIP7 : TBits_1; inline;
  64611. begin
  64612. getFIFOIP7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  64613. end;
  64614. procedure TCAN1_C1FSTAT.setFIFOIP8; inline;
  64615. begin
  64616. pTDefRegMap(@Self)^.&set := $00000100;
  64617. end;
  64618. procedure TCAN1_C1FSTAT.clearFIFOIP8; inline;
  64619. begin
  64620. pTDefRegMap(@Self)^.clr := $00000100;
  64621. end;
  64622. procedure TCAN1_C1FSTAT.setFIFOIP8(thebits : TBits_1); inline;
  64623. begin
  64624. if thebits = 0 then
  64625. pTDefRegMap(@Self)^.clr := $00000100
  64626. else
  64627. pTDefRegMap(@Self)^.&set := $00000100;
  64628. end;
  64629. function TCAN1_C1FSTAT.getFIFOIP8 : TBits_1; inline;
  64630. begin
  64631. getFIFOIP8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  64632. end;
  64633. procedure TCAN1_C1FSTAT.setFIFOIP9; inline;
  64634. begin
  64635. pTDefRegMap(@Self)^.&set := $00000200;
  64636. end;
  64637. procedure TCAN1_C1FSTAT.clearFIFOIP9; inline;
  64638. begin
  64639. pTDefRegMap(@Self)^.clr := $00000200;
  64640. end;
  64641. procedure TCAN1_C1FSTAT.setFIFOIP9(thebits : TBits_1); inline;
  64642. begin
  64643. if thebits = 0 then
  64644. pTDefRegMap(@Self)^.clr := $00000200
  64645. else
  64646. pTDefRegMap(@Self)^.&set := $00000200;
  64647. end;
  64648. function TCAN1_C1FSTAT.getFIFOIP9 : TBits_1; inline;
  64649. begin
  64650. getFIFOIP9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  64651. end;
  64652. procedure TCAN1_C1FSTAT.setFIFOIP10; inline;
  64653. begin
  64654. pTDefRegMap(@Self)^.&set := $00000400;
  64655. end;
  64656. procedure TCAN1_C1FSTAT.clearFIFOIP10; inline;
  64657. begin
  64658. pTDefRegMap(@Self)^.clr := $00000400;
  64659. end;
  64660. procedure TCAN1_C1FSTAT.setFIFOIP10(thebits : TBits_1); inline;
  64661. begin
  64662. if thebits = 0 then
  64663. pTDefRegMap(@Self)^.clr := $00000400
  64664. else
  64665. pTDefRegMap(@Self)^.&set := $00000400;
  64666. end;
  64667. function TCAN1_C1FSTAT.getFIFOIP10 : TBits_1; inline;
  64668. begin
  64669. getFIFOIP10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  64670. end;
  64671. procedure TCAN1_C1FSTAT.setFIFOIP11; inline;
  64672. begin
  64673. pTDefRegMap(@Self)^.&set := $00000800;
  64674. end;
  64675. procedure TCAN1_C1FSTAT.clearFIFOIP11; inline;
  64676. begin
  64677. pTDefRegMap(@Self)^.clr := $00000800;
  64678. end;
  64679. procedure TCAN1_C1FSTAT.setFIFOIP11(thebits : TBits_1); inline;
  64680. begin
  64681. if thebits = 0 then
  64682. pTDefRegMap(@Self)^.clr := $00000800
  64683. else
  64684. pTDefRegMap(@Self)^.&set := $00000800;
  64685. end;
  64686. function TCAN1_C1FSTAT.getFIFOIP11 : TBits_1; inline;
  64687. begin
  64688. getFIFOIP11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  64689. end;
  64690. procedure TCAN1_C1FSTAT.setFIFOIP12; inline;
  64691. begin
  64692. pTDefRegMap(@Self)^.&set := $00001000;
  64693. end;
  64694. procedure TCAN1_C1FSTAT.clearFIFOIP12; inline;
  64695. begin
  64696. pTDefRegMap(@Self)^.clr := $00001000;
  64697. end;
  64698. procedure TCAN1_C1FSTAT.setFIFOIP12(thebits : TBits_1); inline;
  64699. begin
  64700. if thebits = 0 then
  64701. pTDefRegMap(@Self)^.clr := $00001000
  64702. else
  64703. pTDefRegMap(@Self)^.&set := $00001000;
  64704. end;
  64705. function TCAN1_C1FSTAT.getFIFOIP12 : TBits_1; inline;
  64706. begin
  64707. getFIFOIP12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  64708. end;
  64709. procedure TCAN1_C1FSTAT.setFIFOIP13; inline;
  64710. begin
  64711. pTDefRegMap(@Self)^.&set := $00002000;
  64712. end;
  64713. procedure TCAN1_C1FSTAT.clearFIFOIP13; inline;
  64714. begin
  64715. pTDefRegMap(@Self)^.clr := $00002000;
  64716. end;
  64717. procedure TCAN1_C1FSTAT.setFIFOIP13(thebits : TBits_1); inline;
  64718. begin
  64719. if thebits = 0 then
  64720. pTDefRegMap(@Self)^.clr := $00002000
  64721. else
  64722. pTDefRegMap(@Self)^.&set := $00002000;
  64723. end;
  64724. function TCAN1_C1FSTAT.getFIFOIP13 : TBits_1; inline;
  64725. begin
  64726. getFIFOIP13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  64727. end;
  64728. procedure TCAN1_C1FSTAT.setFIFOIP14; inline;
  64729. begin
  64730. pTDefRegMap(@Self)^.&set := $00004000;
  64731. end;
  64732. procedure TCAN1_C1FSTAT.clearFIFOIP14; inline;
  64733. begin
  64734. pTDefRegMap(@Self)^.clr := $00004000;
  64735. end;
  64736. procedure TCAN1_C1FSTAT.setFIFOIP14(thebits : TBits_1); inline;
  64737. begin
  64738. if thebits = 0 then
  64739. pTDefRegMap(@Self)^.clr := $00004000
  64740. else
  64741. pTDefRegMap(@Self)^.&set := $00004000;
  64742. end;
  64743. function TCAN1_C1FSTAT.getFIFOIP14 : TBits_1; inline;
  64744. begin
  64745. getFIFOIP14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  64746. end;
  64747. procedure TCAN1_C1FSTAT.setFIFOIP15; inline;
  64748. begin
  64749. pTDefRegMap(@Self)^.&set := $00008000;
  64750. end;
  64751. procedure TCAN1_C1FSTAT.clearFIFOIP15; inline;
  64752. begin
  64753. pTDefRegMap(@Self)^.clr := $00008000;
  64754. end;
  64755. procedure TCAN1_C1FSTAT.setFIFOIP15(thebits : TBits_1); inline;
  64756. begin
  64757. if thebits = 0 then
  64758. pTDefRegMap(@Self)^.clr := $00008000
  64759. else
  64760. pTDefRegMap(@Self)^.&set := $00008000;
  64761. end;
  64762. function TCAN1_C1FSTAT.getFIFOIP15 : TBits_1; inline;
  64763. begin
  64764. getFIFOIP15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  64765. end;
  64766. procedure TCAN1_C1FSTAT.setFIFOIP16; inline;
  64767. begin
  64768. pTDefRegMap(@Self)^.&set := $00010000;
  64769. end;
  64770. procedure TCAN1_C1FSTAT.clearFIFOIP16; inline;
  64771. begin
  64772. pTDefRegMap(@Self)^.clr := $00010000;
  64773. end;
  64774. procedure TCAN1_C1FSTAT.setFIFOIP16(thebits : TBits_1); inline;
  64775. begin
  64776. if thebits = 0 then
  64777. pTDefRegMap(@Self)^.clr := $00010000
  64778. else
  64779. pTDefRegMap(@Self)^.&set := $00010000;
  64780. end;
  64781. function TCAN1_C1FSTAT.getFIFOIP16 : TBits_1; inline;
  64782. begin
  64783. getFIFOIP16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  64784. end;
  64785. procedure TCAN1_C1FSTAT.setFIFOIP17; inline;
  64786. begin
  64787. pTDefRegMap(@Self)^.&set := $00020000;
  64788. end;
  64789. procedure TCAN1_C1FSTAT.clearFIFOIP17; inline;
  64790. begin
  64791. pTDefRegMap(@Self)^.clr := $00020000;
  64792. end;
  64793. procedure TCAN1_C1FSTAT.setFIFOIP17(thebits : TBits_1); inline;
  64794. begin
  64795. if thebits = 0 then
  64796. pTDefRegMap(@Self)^.clr := $00020000
  64797. else
  64798. pTDefRegMap(@Self)^.&set := $00020000;
  64799. end;
  64800. function TCAN1_C1FSTAT.getFIFOIP17 : TBits_1; inline;
  64801. begin
  64802. getFIFOIP17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  64803. end;
  64804. procedure TCAN1_C1FSTAT.setFIFOIP18; inline;
  64805. begin
  64806. pTDefRegMap(@Self)^.&set := $00040000;
  64807. end;
  64808. procedure TCAN1_C1FSTAT.clearFIFOIP18; inline;
  64809. begin
  64810. pTDefRegMap(@Self)^.clr := $00040000;
  64811. end;
  64812. procedure TCAN1_C1FSTAT.setFIFOIP18(thebits : TBits_1); inline;
  64813. begin
  64814. if thebits = 0 then
  64815. pTDefRegMap(@Self)^.clr := $00040000
  64816. else
  64817. pTDefRegMap(@Self)^.&set := $00040000;
  64818. end;
  64819. function TCAN1_C1FSTAT.getFIFOIP18 : TBits_1; inline;
  64820. begin
  64821. getFIFOIP18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  64822. end;
  64823. procedure TCAN1_C1FSTAT.setFIFOIP19; inline;
  64824. begin
  64825. pTDefRegMap(@Self)^.&set := $00080000;
  64826. end;
  64827. procedure TCAN1_C1FSTAT.clearFIFOIP19; inline;
  64828. begin
  64829. pTDefRegMap(@Self)^.clr := $00080000;
  64830. end;
  64831. procedure TCAN1_C1FSTAT.setFIFOIP19(thebits : TBits_1); inline;
  64832. begin
  64833. if thebits = 0 then
  64834. pTDefRegMap(@Self)^.clr := $00080000
  64835. else
  64836. pTDefRegMap(@Self)^.&set := $00080000;
  64837. end;
  64838. function TCAN1_C1FSTAT.getFIFOIP19 : TBits_1; inline;
  64839. begin
  64840. getFIFOIP19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64841. end;
  64842. procedure TCAN1_C1FSTAT.setFIFOIP20; inline;
  64843. begin
  64844. pTDefRegMap(@Self)^.&set := $00100000;
  64845. end;
  64846. procedure TCAN1_C1FSTAT.clearFIFOIP20; inline;
  64847. begin
  64848. pTDefRegMap(@Self)^.clr := $00100000;
  64849. end;
  64850. procedure TCAN1_C1FSTAT.setFIFOIP20(thebits : TBits_1); inline;
  64851. begin
  64852. if thebits = 0 then
  64853. pTDefRegMap(@Self)^.clr := $00100000
  64854. else
  64855. pTDefRegMap(@Self)^.&set := $00100000;
  64856. end;
  64857. function TCAN1_C1FSTAT.getFIFOIP20 : TBits_1; inline;
  64858. begin
  64859. getFIFOIP20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  64860. end;
  64861. procedure TCAN1_C1FSTAT.setFIFOIP21; inline;
  64862. begin
  64863. pTDefRegMap(@Self)^.&set := $00200000;
  64864. end;
  64865. procedure TCAN1_C1FSTAT.clearFIFOIP21; inline;
  64866. begin
  64867. pTDefRegMap(@Self)^.clr := $00200000;
  64868. end;
  64869. procedure TCAN1_C1FSTAT.setFIFOIP21(thebits : TBits_1); inline;
  64870. begin
  64871. if thebits = 0 then
  64872. pTDefRegMap(@Self)^.clr := $00200000
  64873. else
  64874. pTDefRegMap(@Self)^.&set := $00200000;
  64875. end;
  64876. function TCAN1_C1FSTAT.getFIFOIP21 : TBits_1; inline;
  64877. begin
  64878. getFIFOIP21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  64879. end;
  64880. procedure TCAN1_C1FSTAT.setFIFOIP22; inline;
  64881. begin
  64882. pTDefRegMap(@Self)^.&set := $00400000;
  64883. end;
  64884. procedure TCAN1_C1FSTAT.clearFIFOIP22; inline;
  64885. begin
  64886. pTDefRegMap(@Self)^.clr := $00400000;
  64887. end;
  64888. procedure TCAN1_C1FSTAT.setFIFOIP22(thebits : TBits_1); inline;
  64889. begin
  64890. if thebits = 0 then
  64891. pTDefRegMap(@Self)^.clr := $00400000
  64892. else
  64893. pTDefRegMap(@Self)^.&set := $00400000;
  64894. end;
  64895. function TCAN1_C1FSTAT.getFIFOIP22 : TBits_1; inline;
  64896. begin
  64897. getFIFOIP22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  64898. end;
  64899. procedure TCAN1_C1FSTAT.setFIFOIP23; inline;
  64900. begin
  64901. pTDefRegMap(@Self)^.&set := $00800000;
  64902. end;
  64903. procedure TCAN1_C1FSTAT.clearFIFOIP23; inline;
  64904. begin
  64905. pTDefRegMap(@Self)^.clr := $00800000;
  64906. end;
  64907. procedure TCAN1_C1FSTAT.setFIFOIP23(thebits : TBits_1); inline;
  64908. begin
  64909. if thebits = 0 then
  64910. pTDefRegMap(@Self)^.clr := $00800000
  64911. else
  64912. pTDefRegMap(@Self)^.&set := $00800000;
  64913. end;
  64914. function TCAN1_C1FSTAT.getFIFOIP23 : TBits_1; inline;
  64915. begin
  64916. getFIFOIP23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  64917. end;
  64918. procedure TCAN1_C1FSTAT.setFIFOIP24; inline;
  64919. begin
  64920. pTDefRegMap(@Self)^.&set := $01000000;
  64921. end;
  64922. procedure TCAN1_C1FSTAT.clearFIFOIP24; inline;
  64923. begin
  64924. pTDefRegMap(@Self)^.clr := $01000000;
  64925. end;
  64926. procedure TCAN1_C1FSTAT.setFIFOIP24(thebits : TBits_1); inline;
  64927. begin
  64928. if thebits = 0 then
  64929. pTDefRegMap(@Self)^.clr := $01000000
  64930. else
  64931. pTDefRegMap(@Self)^.&set := $01000000;
  64932. end;
  64933. function TCAN1_C1FSTAT.getFIFOIP24 : TBits_1; inline;
  64934. begin
  64935. getFIFOIP24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  64936. end;
  64937. procedure TCAN1_C1FSTAT.setFIFOIP25; inline;
  64938. begin
  64939. pTDefRegMap(@Self)^.&set := $02000000;
  64940. end;
  64941. procedure TCAN1_C1FSTAT.clearFIFOIP25; inline;
  64942. begin
  64943. pTDefRegMap(@Self)^.clr := $02000000;
  64944. end;
  64945. procedure TCAN1_C1FSTAT.setFIFOIP25(thebits : TBits_1); inline;
  64946. begin
  64947. if thebits = 0 then
  64948. pTDefRegMap(@Self)^.clr := $02000000
  64949. else
  64950. pTDefRegMap(@Self)^.&set := $02000000;
  64951. end;
  64952. function TCAN1_C1FSTAT.getFIFOIP25 : TBits_1; inline;
  64953. begin
  64954. getFIFOIP25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  64955. end;
  64956. procedure TCAN1_C1FSTAT.setFIFOIP26; inline;
  64957. begin
  64958. pTDefRegMap(@Self)^.&set := $04000000;
  64959. end;
  64960. procedure TCAN1_C1FSTAT.clearFIFOIP26; inline;
  64961. begin
  64962. pTDefRegMap(@Self)^.clr := $04000000;
  64963. end;
  64964. procedure TCAN1_C1FSTAT.setFIFOIP26(thebits : TBits_1); inline;
  64965. begin
  64966. if thebits = 0 then
  64967. pTDefRegMap(@Self)^.clr := $04000000
  64968. else
  64969. pTDefRegMap(@Self)^.&set := $04000000;
  64970. end;
  64971. function TCAN1_C1FSTAT.getFIFOIP26 : TBits_1; inline;
  64972. begin
  64973. getFIFOIP26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  64974. end;
  64975. procedure TCAN1_C1FSTAT.setFIFOIP27; inline;
  64976. begin
  64977. pTDefRegMap(@Self)^.&set := $08000000;
  64978. end;
  64979. procedure TCAN1_C1FSTAT.clearFIFOIP27; inline;
  64980. begin
  64981. pTDefRegMap(@Self)^.clr := $08000000;
  64982. end;
  64983. procedure TCAN1_C1FSTAT.setFIFOIP27(thebits : TBits_1); inline;
  64984. begin
  64985. if thebits = 0 then
  64986. pTDefRegMap(@Self)^.clr := $08000000
  64987. else
  64988. pTDefRegMap(@Self)^.&set := $08000000;
  64989. end;
  64990. function TCAN1_C1FSTAT.getFIFOIP27 : TBits_1; inline;
  64991. begin
  64992. getFIFOIP27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  64993. end;
  64994. procedure TCAN1_C1FSTAT.setFIFOIP28; inline;
  64995. begin
  64996. pTDefRegMap(@Self)^.&set := $10000000;
  64997. end;
  64998. procedure TCAN1_C1FSTAT.clearFIFOIP28; inline;
  64999. begin
  65000. pTDefRegMap(@Self)^.clr := $10000000;
  65001. end;
  65002. procedure TCAN1_C1FSTAT.setFIFOIP28(thebits : TBits_1); inline;
  65003. begin
  65004. if thebits = 0 then
  65005. pTDefRegMap(@Self)^.clr := $10000000
  65006. else
  65007. pTDefRegMap(@Self)^.&set := $10000000;
  65008. end;
  65009. function TCAN1_C1FSTAT.getFIFOIP28 : TBits_1; inline;
  65010. begin
  65011. getFIFOIP28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  65012. end;
  65013. procedure TCAN1_C1FSTAT.setFIFOIP29; inline;
  65014. begin
  65015. pTDefRegMap(@Self)^.&set := $20000000;
  65016. end;
  65017. procedure TCAN1_C1FSTAT.clearFIFOIP29; inline;
  65018. begin
  65019. pTDefRegMap(@Self)^.clr := $20000000;
  65020. end;
  65021. procedure TCAN1_C1FSTAT.setFIFOIP29(thebits : TBits_1); inline;
  65022. begin
  65023. if thebits = 0 then
  65024. pTDefRegMap(@Self)^.clr := $20000000
  65025. else
  65026. pTDefRegMap(@Self)^.&set := $20000000;
  65027. end;
  65028. function TCAN1_C1FSTAT.getFIFOIP29 : TBits_1; inline;
  65029. begin
  65030. getFIFOIP29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  65031. end;
  65032. procedure TCAN1_C1FSTAT.setFIFOIP30; inline;
  65033. begin
  65034. pTDefRegMap(@Self)^.&set := $40000000;
  65035. end;
  65036. procedure TCAN1_C1FSTAT.clearFIFOIP30; inline;
  65037. begin
  65038. pTDefRegMap(@Self)^.clr := $40000000;
  65039. end;
  65040. procedure TCAN1_C1FSTAT.setFIFOIP30(thebits : TBits_1); inline;
  65041. begin
  65042. if thebits = 0 then
  65043. pTDefRegMap(@Self)^.clr := $40000000
  65044. else
  65045. pTDefRegMap(@Self)^.&set := $40000000;
  65046. end;
  65047. function TCAN1_C1FSTAT.getFIFOIP30 : TBits_1; inline;
  65048. begin
  65049. getFIFOIP30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  65050. end;
  65051. procedure TCAN1_C1FSTAT.setFIFOIP31; inline;
  65052. begin
  65053. pTDefRegMap(@Self)^.&set := $80000000;
  65054. end;
  65055. procedure TCAN1_C1FSTAT.clearFIFOIP31; inline;
  65056. begin
  65057. pTDefRegMap(@Self)^.clr := $80000000;
  65058. end;
  65059. procedure TCAN1_C1FSTAT.setFIFOIP31(thebits : TBits_1); inline;
  65060. begin
  65061. if thebits = 0 then
  65062. pTDefRegMap(@Self)^.clr := $80000000
  65063. else
  65064. pTDefRegMap(@Self)^.&set := $80000000;
  65065. end;
  65066. function TCAN1_C1FSTAT.getFIFOIP31 : TBits_1; inline;
  65067. begin
  65068. getFIFOIP31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  65069. end;
  65070. procedure TCAN1_C1FSTAT.setw(thebits : TBits_32); inline;
  65071. begin
  65072. pTDefRegMap(@Self)^.val := thebits;
  65073. end;
  65074. function TCAN1_C1FSTAT.getw : TBits_32; inline;
  65075. begin
  65076. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65077. end;
  65078. procedure TCAN1_C1RXOVF.setRXOVF(thebits : TBits_32); inline;
  65079. begin
  65080. pTDefRegMap(@Self)^.val := thebits;
  65081. end;
  65082. function TCAN1_C1RXOVF.getRXOVF : TBits_32; inline;
  65083. begin
  65084. getRXOVF := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65085. end;
  65086. procedure TCAN1_C1RXOVF.setRXOVF0; inline;
  65087. begin
  65088. pTDefRegMap(@Self)^.&set := $00000001;
  65089. end;
  65090. procedure TCAN1_C1RXOVF.clearRXOVF0; inline;
  65091. begin
  65092. pTDefRegMap(@Self)^.clr := $00000001;
  65093. end;
  65094. procedure TCAN1_C1RXOVF.setRXOVF0(thebits : TBits_1); inline;
  65095. begin
  65096. if thebits = 0 then
  65097. pTDefRegMap(@Self)^.clr := $00000001
  65098. else
  65099. pTDefRegMap(@Self)^.&set := $00000001;
  65100. end;
  65101. function TCAN1_C1RXOVF.getRXOVF0 : TBits_1; inline;
  65102. begin
  65103. getRXOVF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  65104. end;
  65105. procedure TCAN1_C1RXOVF.setRXOVF1; inline;
  65106. begin
  65107. pTDefRegMap(@Self)^.&set := $00000002;
  65108. end;
  65109. procedure TCAN1_C1RXOVF.clearRXOVF1; inline;
  65110. begin
  65111. pTDefRegMap(@Self)^.clr := $00000002;
  65112. end;
  65113. procedure TCAN1_C1RXOVF.setRXOVF1(thebits : TBits_1); inline;
  65114. begin
  65115. if thebits = 0 then
  65116. pTDefRegMap(@Self)^.clr := $00000002
  65117. else
  65118. pTDefRegMap(@Self)^.&set := $00000002;
  65119. end;
  65120. function TCAN1_C1RXOVF.getRXOVF1 : TBits_1; inline;
  65121. begin
  65122. getRXOVF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  65123. end;
  65124. procedure TCAN1_C1RXOVF.setRXOVF2; inline;
  65125. begin
  65126. pTDefRegMap(@Self)^.&set := $00000004;
  65127. end;
  65128. procedure TCAN1_C1RXOVF.clearRXOVF2; inline;
  65129. begin
  65130. pTDefRegMap(@Self)^.clr := $00000004;
  65131. end;
  65132. procedure TCAN1_C1RXOVF.setRXOVF2(thebits : TBits_1); inline;
  65133. begin
  65134. if thebits = 0 then
  65135. pTDefRegMap(@Self)^.clr := $00000004
  65136. else
  65137. pTDefRegMap(@Self)^.&set := $00000004;
  65138. end;
  65139. function TCAN1_C1RXOVF.getRXOVF2 : TBits_1; inline;
  65140. begin
  65141. getRXOVF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65142. end;
  65143. procedure TCAN1_C1RXOVF.setRXOVF3; inline;
  65144. begin
  65145. pTDefRegMap(@Self)^.&set := $00000008;
  65146. end;
  65147. procedure TCAN1_C1RXOVF.clearRXOVF3; inline;
  65148. begin
  65149. pTDefRegMap(@Self)^.clr := $00000008;
  65150. end;
  65151. procedure TCAN1_C1RXOVF.setRXOVF3(thebits : TBits_1); inline;
  65152. begin
  65153. if thebits = 0 then
  65154. pTDefRegMap(@Self)^.clr := $00000008
  65155. else
  65156. pTDefRegMap(@Self)^.&set := $00000008;
  65157. end;
  65158. function TCAN1_C1RXOVF.getRXOVF3 : TBits_1; inline;
  65159. begin
  65160. getRXOVF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65161. end;
  65162. procedure TCAN1_C1RXOVF.setRXOVF4; inline;
  65163. begin
  65164. pTDefRegMap(@Self)^.&set := $00000010;
  65165. end;
  65166. procedure TCAN1_C1RXOVF.clearRXOVF4; inline;
  65167. begin
  65168. pTDefRegMap(@Self)^.clr := $00000010;
  65169. end;
  65170. procedure TCAN1_C1RXOVF.setRXOVF4(thebits : TBits_1); inline;
  65171. begin
  65172. if thebits = 0 then
  65173. pTDefRegMap(@Self)^.clr := $00000010
  65174. else
  65175. pTDefRegMap(@Self)^.&set := $00000010;
  65176. end;
  65177. function TCAN1_C1RXOVF.getRXOVF4 : TBits_1; inline;
  65178. begin
  65179. getRXOVF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65180. end;
  65181. procedure TCAN1_C1RXOVF.setRXOVF5; inline;
  65182. begin
  65183. pTDefRegMap(@Self)^.&set := $00000020;
  65184. end;
  65185. procedure TCAN1_C1RXOVF.clearRXOVF5; inline;
  65186. begin
  65187. pTDefRegMap(@Self)^.clr := $00000020;
  65188. end;
  65189. procedure TCAN1_C1RXOVF.setRXOVF5(thebits : TBits_1); inline;
  65190. begin
  65191. if thebits = 0 then
  65192. pTDefRegMap(@Self)^.clr := $00000020
  65193. else
  65194. pTDefRegMap(@Self)^.&set := $00000020;
  65195. end;
  65196. function TCAN1_C1RXOVF.getRXOVF5 : TBits_1; inline;
  65197. begin
  65198. getRXOVF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65199. end;
  65200. procedure TCAN1_C1RXOVF.setRXOVF6; inline;
  65201. begin
  65202. pTDefRegMap(@Self)^.&set := $00000040;
  65203. end;
  65204. procedure TCAN1_C1RXOVF.clearRXOVF6; inline;
  65205. begin
  65206. pTDefRegMap(@Self)^.clr := $00000040;
  65207. end;
  65208. procedure TCAN1_C1RXOVF.setRXOVF6(thebits : TBits_1); inline;
  65209. begin
  65210. if thebits = 0 then
  65211. pTDefRegMap(@Self)^.clr := $00000040
  65212. else
  65213. pTDefRegMap(@Self)^.&set := $00000040;
  65214. end;
  65215. function TCAN1_C1RXOVF.getRXOVF6 : TBits_1; inline;
  65216. begin
  65217. getRXOVF6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65218. end;
  65219. procedure TCAN1_C1RXOVF.setRXOVF7; inline;
  65220. begin
  65221. pTDefRegMap(@Self)^.&set := $00000080;
  65222. end;
  65223. procedure TCAN1_C1RXOVF.clearRXOVF7; inline;
  65224. begin
  65225. pTDefRegMap(@Self)^.clr := $00000080;
  65226. end;
  65227. procedure TCAN1_C1RXOVF.setRXOVF7(thebits : TBits_1); inline;
  65228. begin
  65229. if thebits = 0 then
  65230. pTDefRegMap(@Self)^.clr := $00000080
  65231. else
  65232. pTDefRegMap(@Self)^.&set := $00000080;
  65233. end;
  65234. function TCAN1_C1RXOVF.getRXOVF7 : TBits_1; inline;
  65235. begin
  65236. getRXOVF7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65237. end;
  65238. procedure TCAN1_C1RXOVF.setRXOVF8; inline;
  65239. begin
  65240. pTDefRegMap(@Self)^.&set := $00000100;
  65241. end;
  65242. procedure TCAN1_C1RXOVF.clearRXOVF8; inline;
  65243. begin
  65244. pTDefRegMap(@Self)^.clr := $00000100;
  65245. end;
  65246. procedure TCAN1_C1RXOVF.setRXOVF8(thebits : TBits_1); inline;
  65247. begin
  65248. if thebits = 0 then
  65249. pTDefRegMap(@Self)^.clr := $00000100
  65250. else
  65251. pTDefRegMap(@Self)^.&set := $00000100;
  65252. end;
  65253. function TCAN1_C1RXOVF.getRXOVF8 : TBits_1; inline;
  65254. begin
  65255. getRXOVF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  65256. end;
  65257. procedure TCAN1_C1RXOVF.setRXOVF9; inline;
  65258. begin
  65259. pTDefRegMap(@Self)^.&set := $00000200;
  65260. end;
  65261. procedure TCAN1_C1RXOVF.clearRXOVF9; inline;
  65262. begin
  65263. pTDefRegMap(@Self)^.clr := $00000200;
  65264. end;
  65265. procedure TCAN1_C1RXOVF.setRXOVF9(thebits : TBits_1); inline;
  65266. begin
  65267. if thebits = 0 then
  65268. pTDefRegMap(@Self)^.clr := $00000200
  65269. else
  65270. pTDefRegMap(@Self)^.&set := $00000200;
  65271. end;
  65272. function TCAN1_C1RXOVF.getRXOVF9 : TBits_1; inline;
  65273. begin
  65274. getRXOVF9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  65275. end;
  65276. procedure TCAN1_C1RXOVF.setRXOVF10; inline;
  65277. begin
  65278. pTDefRegMap(@Self)^.&set := $00000400;
  65279. end;
  65280. procedure TCAN1_C1RXOVF.clearRXOVF10; inline;
  65281. begin
  65282. pTDefRegMap(@Self)^.clr := $00000400;
  65283. end;
  65284. procedure TCAN1_C1RXOVF.setRXOVF10(thebits : TBits_1); inline;
  65285. begin
  65286. if thebits = 0 then
  65287. pTDefRegMap(@Self)^.clr := $00000400
  65288. else
  65289. pTDefRegMap(@Self)^.&set := $00000400;
  65290. end;
  65291. function TCAN1_C1RXOVF.getRXOVF10 : TBits_1; inline;
  65292. begin
  65293. getRXOVF10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  65294. end;
  65295. procedure TCAN1_C1RXOVF.setRXOVF11; inline;
  65296. begin
  65297. pTDefRegMap(@Self)^.&set := $00000800;
  65298. end;
  65299. procedure TCAN1_C1RXOVF.clearRXOVF11; inline;
  65300. begin
  65301. pTDefRegMap(@Self)^.clr := $00000800;
  65302. end;
  65303. procedure TCAN1_C1RXOVF.setRXOVF11(thebits : TBits_1); inline;
  65304. begin
  65305. if thebits = 0 then
  65306. pTDefRegMap(@Self)^.clr := $00000800
  65307. else
  65308. pTDefRegMap(@Self)^.&set := $00000800;
  65309. end;
  65310. function TCAN1_C1RXOVF.getRXOVF11 : TBits_1; inline;
  65311. begin
  65312. getRXOVF11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  65313. end;
  65314. procedure TCAN1_C1RXOVF.setRXOVF12; inline;
  65315. begin
  65316. pTDefRegMap(@Self)^.&set := $00001000;
  65317. end;
  65318. procedure TCAN1_C1RXOVF.clearRXOVF12; inline;
  65319. begin
  65320. pTDefRegMap(@Self)^.clr := $00001000;
  65321. end;
  65322. procedure TCAN1_C1RXOVF.setRXOVF12(thebits : TBits_1); inline;
  65323. begin
  65324. if thebits = 0 then
  65325. pTDefRegMap(@Self)^.clr := $00001000
  65326. else
  65327. pTDefRegMap(@Self)^.&set := $00001000;
  65328. end;
  65329. function TCAN1_C1RXOVF.getRXOVF12 : TBits_1; inline;
  65330. begin
  65331. getRXOVF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  65332. end;
  65333. procedure TCAN1_C1RXOVF.setRXOVF13; inline;
  65334. begin
  65335. pTDefRegMap(@Self)^.&set := $00002000;
  65336. end;
  65337. procedure TCAN1_C1RXOVF.clearRXOVF13; inline;
  65338. begin
  65339. pTDefRegMap(@Self)^.clr := $00002000;
  65340. end;
  65341. procedure TCAN1_C1RXOVF.setRXOVF13(thebits : TBits_1); inline;
  65342. begin
  65343. if thebits = 0 then
  65344. pTDefRegMap(@Self)^.clr := $00002000
  65345. else
  65346. pTDefRegMap(@Self)^.&set := $00002000;
  65347. end;
  65348. function TCAN1_C1RXOVF.getRXOVF13 : TBits_1; inline;
  65349. begin
  65350. getRXOVF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  65351. end;
  65352. procedure TCAN1_C1RXOVF.setRXOVF14; inline;
  65353. begin
  65354. pTDefRegMap(@Self)^.&set := $00004000;
  65355. end;
  65356. procedure TCAN1_C1RXOVF.clearRXOVF14; inline;
  65357. begin
  65358. pTDefRegMap(@Self)^.clr := $00004000;
  65359. end;
  65360. procedure TCAN1_C1RXOVF.setRXOVF14(thebits : TBits_1); inline;
  65361. begin
  65362. if thebits = 0 then
  65363. pTDefRegMap(@Self)^.clr := $00004000
  65364. else
  65365. pTDefRegMap(@Self)^.&set := $00004000;
  65366. end;
  65367. function TCAN1_C1RXOVF.getRXOVF14 : TBits_1; inline;
  65368. begin
  65369. getRXOVF14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  65370. end;
  65371. procedure TCAN1_C1RXOVF.setRXOVF15; inline;
  65372. begin
  65373. pTDefRegMap(@Self)^.&set := $00008000;
  65374. end;
  65375. procedure TCAN1_C1RXOVF.clearRXOVF15; inline;
  65376. begin
  65377. pTDefRegMap(@Self)^.clr := $00008000;
  65378. end;
  65379. procedure TCAN1_C1RXOVF.setRXOVF15(thebits : TBits_1); inline;
  65380. begin
  65381. if thebits = 0 then
  65382. pTDefRegMap(@Self)^.clr := $00008000
  65383. else
  65384. pTDefRegMap(@Self)^.&set := $00008000;
  65385. end;
  65386. function TCAN1_C1RXOVF.getRXOVF15 : TBits_1; inline;
  65387. begin
  65388. getRXOVF15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  65389. end;
  65390. procedure TCAN1_C1RXOVF.setRXOVF16; inline;
  65391. begin
  65392. pTDefRegMap(@Self)^.&set := $00010000;
  65393. end;
  65394. procedure TCAN1_C1RXOVF.clearRXOVF16; inline;
  65395. begin
  65396. pTDefRegMap(@Self)^.clr := $00010000;
  65397. end;
  65398. procedure TCAN1_C1RXOVF.setRXOVF16(thebits : TBits_1); inline;
  65399. begin
  65400. if thebits = 0 then
  65401. pTDefRegMap(@Self)^.clr := $00010000
  65402. else
  65403. pTDefRegMap(@Self)^.&set := $00010000;
  65404. end;
  65405. function TCAN1_C1RXOVF.getRXOVF16 : TBits_1; inline;
  65406. begin
  65407. getRXOVF16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  65408. end;
  65409. procedure TCAN1_C1RXOVF.setRXOVF17; inline;
  65410. begin
  65411. pTDefRegMap(@Self)^.&set := $00020000;
  65412. end;
  65413. procedure TCAN1_C1RXOVF.clearRXOVF17; inline;
  65414. begin
  65415. pTDefRegMap(@Self)^.clr := $00020000;
  65416. end;
  65417. procedure TCAN1_C1RXOVF.setRXOVF17(thebits : TBits_1); inline;
  65418. begin
  65419. if thebits = 0 then
  65420. pTDefRegMap(@Self)^.clr := $00020000
  65421. else
  65422. pTDefRegMap(@Self)^.&set := $00020000;
  65423. end;
  65424. function TCAN1_C1RXOVF.getRXOVF17 : TBits_1; inline;
  65425. begin
  65426. getRXOVF17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  65427. end;
  65428. procedure TCAN1_C1RXOVF.setRXOVF18; inline;
  65429. begin
  65430. pTDefRegMap(@Self)^.&set := $00040000;
  65431. end;
  65432. procedure TCAN1_C1RXOVF.clearRXOVF18; inline;
  65433. begin
  65434. pTDefRegMap(@Self)^.clr := $00040000;
  65435. end;
  65436. procedure TCAN1_C1RXOVF.setRXOVF18(thebits : TBits_1); inline;
  65437. begin
  65438. if thebits = 0 then
  65439. pTDefRegMap(@Self)^.clr := $00040000
  65440. else
  65441. pTDefRegMap(@Self)^.&set := $00040000;
  65442. end;
  65443. function TCAN1_C1RXOVF.getRXOVF18 : TBits_1; inline;
  65444. begin
  65445. getRXOVF18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  65446. end;
  65447. procedure TCAN1_C1RXOVF.setRXOVF19; inline;
  65448. begin
  65449. pTDefRegMap(@Self)^.&set := $00080000;
  65450. end;
  65451. procedure TCAN1_C1RXOVF.clearRXOVF19; inline;
  65452. begin
  65453. pTDefRegMap(@Self)^.clr := $00080000;
  65454. end;
  65455. procedure TCAN1_C1RXOVF.setRXOVF19(thebits : TBits_1); inline;
  65456. begin
  65457. if thebits = 0 then
  65458. pTDefRegMap(@Self)^.clr := $00080000
  65459. else
  65460. pTDefRegMap(@Self)^.&set := $00080000;
  65461. end;
  65462. function TCAN1_C1RXOVF.getRXOVF19 : TBits_1; inline;
  65463. begin
  65464. getRXOVF19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  65465. end;
  65466. procedure TCAN1_C1RXOVF.setRXOVF20; inline;
  65467. begin
  65468. pTDefRegMap(@Self)^.&set := $00100000;
  65469. end;
  65470. procedure TCAN1_C1RXOVF.clearRXOVF20; inline;
  65471. begin
  65472. pTDefRegMap(@Self)^.clr := $00100000;
  65473. end;
  65474. procedure TCAN1_C1RXOVF.setRXOVF20(thebits : TBits_1); inline;
  65475. begin
  65476. if thebits = 0 then
  65477. pTDefRegMap(@Self)^.clr := $00100000
  65478. else
  65479. pTDefRegMap(@Self)^.&set := $00100000;
  65480. end;
  65481. function TCAN1_C1RXOVF.getRXOVF20 : TBits_1; inline;
  65482. begin
  65483. getRXOVF20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  65484. end;
  65485. procedure TCAN1_C1RXOVF.setRXOVF21; inline;
  65486. begin
  65487. pTDefRegMap(@Self)^.&set := $00200000;
  65488. end;
  65489. procedure TCAN1_C1RXOVF.clearRXOVF21; inline;
  65490. begin
  65491. pTDefRegMap(@Self)^.clr := $00200000;
  65492. end;
  65493. procedure TCAN1_C1RXOVF.setRXOVF21(thebits : TBits_1); inline;
  65494. begin
  65495. if thebits = 0 then
  65496. pTDefRegMap(@Self)^.clr := $00200000
  65497. else
  65498. pTDefRegMap(@Self)^.&set := $00200000;
  65499. end;
  65500. function TCAN1_C1RXOVF.getRXOVF21 : TBits_1; inline;
  65501. begin
  65502. getRXOVF21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  65503. end;
  65504. procedure TCAN1_C1RXOVF.setRXOVF22; inline;
  65505. begin
  65506. pTDefRegMap(@Self)^.&set := $00400000;
  65507. end;
  65508. procedure TCAN1_C1RXOVF.clearRXOVF22; inline;
  65509. begin
  65510. pTDefRegMap(@Self)^.clr := $00400000;
  65511. end;
  65512. procedure TCAN1_C1RXOVF.setRXOVF22(thebits : TBits_1); inline;
  65513. begin
  65514. if thebits = 0 then
  65515. pTDefRegMap(@Self)^.clr := $00400000
  65516. else
  65517. pTDefRegMap(@Self)^.&set := $00400000;
  65518. end;
  65519. function TCAN1_C1RXOVF.getRXOVF22 : TBits_1; inline;
  65520. begin
  65521. getRXOVF22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  65522. end;
  65523. procedure TCAN1_C1RXOVF.setRXOVF23; inline;
  65524. begin
  65525. pTDefRegMap(@Self)^.&set := $00800000;
  65526. end;
  65527. procedure TCAN1_C1RXOVF.clearRXOVF23; inline;
  65528. begin
  65529. pTDefRegMap(@Self)^.clr := $00800000;
  65530. end;
  65531. procedure TCAN1_C1RXOVF.setRXOVF23(thebits : TBits_1); inline;
  65532. begin
  65533. if thebits = 0 then
  65534. pTDefRegMap(@Self)^.clr := $00800000
  65535. else
  65536. pTDefRegMap(@Self)^.&set := $00800000;
  65537. end;
  65538. function TCAN1_C1RXOVF.getRXOVF23 : TBits_1; inline;
  65539. begin
  65540. getRXOVF23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  65541. end;
  65542. procedure TCAN1_C1RXOVF.setRXOVF24; inline;
  65543. begin
  65544. pTDefRegMap(@Self)^.&set := $01000000;
  65545. end;
  65546. procedure TCAN1_C1RXOVF.clearRXOVF24; inline;
  65547. begin
  65548. pTDefRegMap(@Self)^.clr := $01000000;
  65549. end;
  65550. procedure TCAN1_C1RXOVF.setRXOVF24(thebits : TBits_1); inline;
  65551. begin
  65552. if thebits = 0 then
  65553. pTDefRegMap(@Self)^.clr := $01000000
  65554. else
  65555. pTDefRegMap(@Self)^.&set := $01000000;
  65556. end;
  65557. function TCAN1_C1RXOVF.getRXOVF24 : TBits_1; inline;
  65558. begin
  65559. getRXOVF24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  65560. end;
  65561. procedure TCAN1_C1RXOVF.setRXOVF25; inline;
  65562. begin
  65563. pTDefRegMap(@Self)^.&set := $02000000;
  65564. end;
  65565. procedure TCAN1_C1RXOVF.clearRXOVF25; inline;
  65566. begin
  65567. pTDefRegMap(@Self)^.clr := $02000000;
  65568. end;
  65569. procedure TCAN1_C1RXOVF.setRXOVF25(thebits : TBits_1); inline;
  65570. begin
  65571. if thebits = 0 then
  65572. pTDefRegMap(@Self)^.clr := $02000000
  65573. else
  65574. pTDefRegMap(@Self)^.&set := $02000000;
  65575. end;
  65576. function TCAN1_C1RXOVF.getRXOVF25 : TBits_1; inline;
  65577. begin
  65578. getRXOVF25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  65579. end;
  65580. procedure TCAN1_C1RXOVF.setRXOVF26; inline;
  65581. begin
  65582. pTDefRegMap(@Self)^.&set := $04000000;
  65583. end;
  65584. procedure TCAN1_C1RXOVF.clearRXOVF26; inline;
  65585. begin
  65586. pTDefRegMap(@Self)^.clr := $04000000;
  65587. end;
  65588. procedure TCAN1_C1RXOVF.setRXOVF26(thebits : TBits_1); inline;
  65589. begin
  65590. if thebits = 0 then
  65591. pTDefRegMap(@Self)^.clr := $04000000
  65592. else
  65593. pTDefRegMap(@Self)^.&set := $04000000;
  65594. end;
  65595. function TCAN1_C1RXOVF.getRXOVF26 : TBits_1; inline;
  65596. begin
  65597. getRXOVF26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  65598. end;
  65599. procedure TCAN1_C1RXOVF.setRXOVF27; inline;
  65600. begin
  65601. pTDefRegMap(@Self)^.&set := $08000000;
  65602. end;
  65603. procedure TCAN1_C1RXOVF.clearRXOVF27; inline;
  65604. begin
  65605. pTDefRegMap(@Self)^.clr := $08000000;
  65606. end;
  65607. procedure TCAN1_C1RXOVF.setRXOVF27(thebits : TBits_1); inline;
  65608. begin
  65609. if thebits = 0 then
  65610. pTDefRegMap(@Self)^.clr := $08000000
  65611. else
  65612. pTDefRegMap(@Self)^.&set := $08000000;
  65613. end;
  65614. function TCAN1_C1RXOVF.getRXOVF27 : TBits_1; inline;
  65615. begin
  65616. getRXOVF27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  65617. end;
  65618. procedure TCAN1_C1RXOVF.setRXOVF28; inline;
  65619. begin
  65620. pTDefRegMap(@Self)^.&set := $10000000;
  65621. end;
  65622. procedure TCAN1_C1RXOVF.clearRXOVF28; inline;
  65623. begin
  65624. pTDefRegMap(@Self)^.clr := $10000000;
  65625. end;
  65626. procedure TCAN1_C1RXOVF.setRXOVF28(thebits : TBits_1); inline;
  65627. begin
  65628. if thebits = 0 then
  65629. pTDefRegMap(@Self)^.clr := $10000000
  65630. else
  65631. pTDefRegMap(@Self)^.&set := $10000000;
  65632. end;
  65633. function TCAN1_C1RXOVF.getRXOVF28 : TBits_1; inline;
  65634. begin
  65635. getRXOVF28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  65636. end;
  65637. procedure TCAN1_C1RXOVF.setRXOVF29; inline;
  65638. begin
  65639. pTDefRegMap(@Self)^.&set := $20000000;
  65640. end;
  65641. procedure TCAN1_C1RXOVF.clearRXOVF29; inline;
  65642. begin
  65643. pTDefRegMap(@Self)^.clr := $20000000;
  65644. end;
  65645. procedure TCAN1_C1RXOVF.setRXOVF29(thebits : TBits_1); inline;
  65646. begin
  65647. if thebits = 0 then
  65648. pTDefRegMap(@Self)^.clr := $20000000
  65649. else
  65650. pTDefRegMap(@Self)^.&set := $20000000;
  65651. end;
  65652. function TCAN1_C1RXOVF.getRXOVF29 : TBits_1; inline;
  65653. begin
  65654. getRXOVF29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  65655. end;
  65656. procedure TCAN1_C1RXOVF.setRXOVF30; inline;
  65657. begin
  65658. pTDefRegMap(@Self)^.&set := $40000000;
  65659. end;
  65660. procedure TCAN1_C1RXOVF.clearRXOVF30; inline;
  65661. begin
  65662. pTDefRegMap(@Self)^.clr := $40000000;
  65663. end;
  65664. procedure TCAN1_C1RXOVF.setRXOVF30(thebits : TBits_1); inline;
  65665. begin
  65666. if thebits = 0 then
  65667. pTDefRegMap(@Self)^.clr := $40000000
  65668. else
  65669. pTDefRegMap(@Self)^.&set := $40000000;
  65670. end;
  65671. function TCAN1_C1RXOVF.getRXOVF30 : TBits_1; inline;
  65672. begin
  65673. getRXOVF30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  65674. end;
  65675. procedure TCAN1_C1RXOVF.setRXOVF31; inline;
  65676. begin
  65677. pTDefRegMap(@Self)^.&set := $80000000;
  65678. end;
  65679. procedure TCAN1_C1RXOVF.clearRXOVF31; inline;
  65680. begin
  65681. pTDefRegMap(@Self)^.clr := $80000000;
  65682. end;
  65683. procedure TCAN1_C1RXOVF.setRXOVF31(thebits : TBits_1); inline;
  65684. begin
  65685. if thebits = 0 then
  65686. pTDefRegMap(@Self)^.clr := $80000000
  65687. else
  65688. pTDefRegMap(@Self)^.&set := $80000000;
  65689. end;
  65690. function TCAN1_C1RXOVF.getRXOVF31 : TBits_1; inline;
  65691. begin
  65692. getRXOVF31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  65693. end;
  65694. procedure TCAN1_C1RXOVF.setw(thebits : TBits_32); inline;
  65695. begin
  65696. pTDefRegMap(@Self)^.val := thebits;
  65697. end;
  65698. function TCAN1_C1RXOVF.getw : TBits_32; inline;
  65699. begin
  65700. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65701. end;
  65702. procedure TCAN1_C1TMR.setCANTSPRE(thebits : TBits_16); inline;
  65703. begin
  65704. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  65705. end;
  65706. function TCAN1_C1TMR.getCANTSPRE : TBits_16; inline;
  65707. begin
  65708. getCANTSPRE := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  65709. end;
  65710. procedure TCAN1_C1TMR.setCANTS(thebits : TBits_16); inline;
  65711. begin
  65712. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0000FFFF or ( thebits shl 16 );
  65713. end;
  65714. function TCAN1_C1TMR.getCANTS : TBits_16; inline;
  65715. begin
  65716. getCANTS := (pTDefRegMap(@Self)^.val and $FFFF0000) shr 16;
  65717. end;
  65718. procedure TCAN1_C1TMR.setw(thebits : TBits_32); inline;
  65719. begin
  65720. pTDefRegMap(@Self)^.val := thebits;
  65721. end;
  65722. function TCAN1_C1TMR.getw : TBits_32; inline;
  65723. begin
  65724. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65725. end;
  65726. procedure TCAN1_C1RXM0.setEID(thebits : TBits_18); inline;
  65727. begin
  65728. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  65729. end;
  65730. function TCAN1_C1RXM0.getEID : TBits_18; inline;
  65731. begin
  65732. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  65733. end;
  65734. procedure TCAN1_C1RXM0.setMIDE; inline;
  65735. begin
  65736. pTDefRegMap(@Self)^.&set := $00080000;
  65737. end;
  65738. procedure TCAN1_C1RXM0.clearMIDE; inline;
  65739. begin
  65740. pTDefRegMap(@Self)^.clr := $00080000;
  65741. end;
  65742. procedure TCAN1_C1RXM0.setMIDE(thebits : TBits_1); inline;
  65743. begin
  65744. if thebits = 0 then
  65745. pTDefRegMap(@Self)^.clr := $00080000
  65746. else
  65747. pTDefRegMap(@Self)^.&set := $00080000;
  65748. end;
  65749. function TCAN1_C1RXM0.getMIDE : TBits_1; inline;
  65750. begin
  65751. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  65752. end;
  65753. procedure TCAN1_C1RXM0.setSID(thebits : TBits_11); inline;
  65754. begin
  65755. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  65756. end;
  65757. function TCAN1_C1RXM0.getSID : TBits_11; inline;
  65758. begin
  65759. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  65760. end;
  65761. procedure TCAN1_C1RXM0.setw(thebits : TBits_32); inline;
  65762. begin
  65763. pTDefRegMap(@Self)^.val := thebits;
  65764. end;
  65765. function TCAN1_C1RXM0.getw : TBits_32; inline;
  65766. begin
  65767. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65768. end;
  65769. procedure TCAN1_C1RXM1.setEID(thebits : TBits_18); inline;
  65770. begin
  65771. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  65772. end;
  65773. function TCAN1_C1RXM1.getEID : TBits_18; inline;
  65774. begin
  65775. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  65776. end;
  65777. procedure TCAN1_C1RXM1.setMIDE; inline;
  65778. begin
  65779. pTDefRegMap(@Self)^.&set := $00080000;
  65780. end;
  65781. procedure TCAN1_C1RXM1.clearMIDE; inline;
  65782. begin
  65783. pTDefRegMap(@Self)^.clr := $00080000;
  65784. end;
  65785. procedure TCAN1_C1RXM1.setMIDE(thebits : TBits_1); inline;
  65786. begin
  65787. if thebits = 0 then
  65788. pTDefRegMap(@Self)^.clr := $00080000
  65789. else
  65790. pTDefRegMap(@Self)^.&set := $00080000;
  65791. end;
  65792. function TCAN1_C1RXM1.getMIDE : TBits_1; inline;
  65793. begin
  65794. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  65795. end;
  65796. procedure TCAN1_C1RXM1.setSID(thebits : TBits_11); inline;
  65797. begin
  65798. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  65799. end;
  65800. function TCAN1_C1RXM1.getSID : TBits_11; inline;
  65801. begin
  65802. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  65803. end;
  65804. procedure TCAN1_C1RXM1.setw(thebits : TBits_32); inline;
  65805. begin
  65806. pTDefRegMap(@Self)^.val := thebits;
  65807. end;
  65808. function TCAN1_C1RXM1.getw : TBits_32; inline;
  65809. begin
  65810. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65811. end;
  65812. procedure TCAN1_C1RXM2.setEID(thebits : TBits_18); inline;
  65813. begin
  65814. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  65815. end;
  65816. function TCAN1_C1RXM2.getEID : TBits_18; inline;
  65817. begin
  65818. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  65819. end;
  65820. procedure TCAN1_C1RXM2.setMIDE; inline;
  65821. begin
  65822. pTDefRegMap(@Self)^.&set := $00080000;
  65823. end;
  65824. procedure TCAN1_C1RXM2.clearMIDE; inline;
  65825. begin
  65826. pTDefRegMap(@Self)^.clr := $00080000;
  65827. end;
  65828. procedure TCAN1_C1RXM2.setMIDE(thebits : TBits_1); inline;
  65829. begin
  65830. if thebits = 0 then
  65831. pTDefRegMap(@Self)^.clr := $00080000
  65832. else
  65833. pTDefRegMap(@Self)^.&set := $00080000;
  65834. end;
  65835. function TCAN1_C1RXM2.getMIDE : TBits_1; inline;
  65836. begin
  65837. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  65838. end;
  65839. procedure TCAN1_C1RXM2.setSID(thebits : TBits_11); inline;
  65840. begin
  65841. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  65842. end;
  65843. function TCAN1_C1RXM2.getSID : TBits_11; inline;
  65844. begin
  65845. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  65846. end;
  65847. procedure TCAN1_C1RXM2.setw(thebits : TBits_32); inline;
  65848. begin
  65849. pTDefRegMap(@Self)^.val := thebits;
  65850. end;
  65851. function TCAN1_C1RXM2.getw : TBits_32; inline;
  65852. begin
  65853. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65854. end;
  65855. procedure TCAN1_C1RXM3.setEID(thebits : TBits_18); inline;
  65856. begin
  65857. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  65858. end;
  65859. function TCAN1_C1RXM3.getEID : TBits_18; inline;
  65860. begin
  65861. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  65862. end;
  65863. procedure TCAN1_C1RXM3.setMIDE; inline;
  65864. begin
  65865. pTDefRegMap(@Self)^.&set := $00080000;
  65866. end;
  65867. procedure TCAN1_C1RXM3.clearMIDE; inline;
  65868. begin
  65869. pTDefRegMap(@Self)^.clr := $00080000;
  65870. end;
  65871. procedure TCAN1_C1RXM3.setMIDE(thebits : TBits_1); inline;
  65872. begin
  65873. if thebits = 0 then
  65874. pTDefRegMap(@Self)^.clr := $00080000
  65875. else
  65876. pTDefRegMap(@Self)^.&set := $00080000;
  65877. end;
  65878. function TCAN1_C1RXM3.getMIDE : TBits_1; inline;
  65879. begin
  65880. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  65881. end;
  65882. procedure TCAN1_C1RXM3.setSID(thebits : TBits_11); inline;
  65883. begin
  65884. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  65885. end;
  65886. function TCAN1_C1RXM3.getSID : TBits_11; inline;
  65887. begin
  65888. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  65889. end;
  65890. procedure TCAN1_C1RXM3.setw(thebits : TBits_32); inline;
  65891. begin
  65892. pTDefRegMap(@Self)^.val := thebits;
  65893. end;
  65894. function TCAN1_C1RXM3.getw : TBits_32; inline;
  65895. begin
  65896. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65897. end;
  65898. procedure TCAN1_C1FLTCON0.setFSEL0(thebits : TBits_5); inline;
  65899. begin
  65900. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  65901. end;
  65902. function TCAN1_C1FLTCON0.getFSEL0 : TBits_5; inline;
  65903. begin
  65904. getFSEL0 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  65905. end;
  65906. procedure TCAN1_C1FLTCON0.setMSEL0(thebits : TBits_2); inline;
  65907. begin
  65908. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  65909. end;
  65910. function TCAN1_C1FLTCON0.getMSEL0 : TBits_2; inline;
  65911. begin
  65912. getMSEL0 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  65913. end;
  65914. procedure TCAN1_C1FLTCON0.setFLTEN0; inline;
  65915. begin
  65916. pTDefRegMap(@Self)^.&set := $00000080;
  65917. end;
  65918. procedure TCAN1_C1FLTCON0.clearFLTEN0; inline;
  65919. begin
  65920. pTDefRegMap(@Self)^.clr := $00000080;
  65921. end;
  65922. procedure TCAN1_C1FLTCON0.setFLTEN0(thebits : TBits_1); inline;
  65923. begin
  65924. if thebits = 0 then
  65925. pTDefRegMap(@Self)^.clr := $00000080
  65926. else
  65927. pTDefRegMap(@Self)^.&set := $00000080;
  65928. end;
  65929. function TCAN1_C1FLTCON0.getFLTEN0 : TBits_1; inline;
  65930. begin
  65931. getFLTEN0 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65932. end;
  65933. procedure TCAN1_C1FLTCON0.setFSEL1(thebits : TBits_5); inline;
  65934. begin
  65935. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  65936. end;
  65937. function TCAN1_C1FLTCON0.getFSEL1 : TBits_5; inline;
  65938. begin
  65939. getFSEL1 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  65940. end;
  65941. procedure TCAN1_C1FLTCON0.setMSEL1(thebits : TBits_2); inline;
  65942. begin
  65943. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  65944. end;
  65945. function TCAN1_C1FLTCON0.getMSEL1 : TBits_2; inline;
  65946. begin
  65947. getMSEL1 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  65948. end;
  65949. procedure TCAN1_C1FLTCON0.setFLTEN1; inline;
  65950. begin
  65951. pTDefRegMap(@Self)^.&set := $00008000;
  65952. end;
  65953. procedure TCAN1_C1FLTCON0.clearFLTEN1; inline;
  65954. begin
  65955. pTDefRegMap(@Self)^.clr := $00008000;
  65956. end;
  65957. procedure TCAN1_C1FLTCON0.setFLTEN1(thebits : TBits_1); inline;
  65958. begin
  65959. if thebits = 0 then
  65960. pTDefRegMap(@Self)^.clr := $00008000
  65961. else
  65962. pTDefRegMap(@Self)^.&set := $00008000;
  65963. end;
  65964. function TCAN1_C1FLTCON0.getFLTEN1 : TBits_1; inline;
  65965. begin
  65966. getFLTEN1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  65967. end;
  65968. procedure TCAN1_C1FLTCON0.setFSEL2(thebits : TBits_5); inline;
  65969. begin
  65970. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  65971. end;
  65972. function TCAN1_C1FLTCON0.getFSEL2 : TBits_5; inline;
  65973. begin
  65974. getFSEL2 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  65975. end;
  65976. procedure TCAN1_C1FLTCON0.setMSEL2(thebits : TBits_2); inline;
  65977. begin
  65978. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  65979. end;
  65980. function TCAN1_C1FLTCON0.getMSEL2 : TBits_2; inline;
  65981. begin
  65982. getMSEL2 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  65983. end;
  65984. procedure TCAN1_C1FLTCON0.setFLTEN2; inline;
  65985. begin
  65986. pTDefRegMap(@Self)^.&set := $00800000;
  65987. end;
  65988. procedure TCAN1_C1FLTCON0.clearFLTEN2; inline;
  65989. begin
  65990. pTDefRegMap(@Self)^.clr := $00800000;
  65991. end;
  65992. procedure TCAN1_C1FLTCON0.setFLTEN2(thebits : TBits_1); inline;
  65993. begin
  65994. if thebits = 0 then
  65995. pTDefRegMap(@Self)^.clr := $00800000
  65996. else
  65997. pTDefRegMap(@Self)^.&set := $00800000;
  65998. end;
  65999. function TCAN1_C1FLTCON0.getFLTEN2 : TBits_1; inline;
  66000. begin
  66001. getFLTEN2 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  66002. end;
  66003. procedure TCAN1_C1FLTCON0.setFSEL3(thebits : TBits_5); inline;
  66004. begin
  66005. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  66006. end;
  66007. function TCAN1_C1FLTCON0.getFSEL3 : TBits_5; inline;
  66008. begin
  66009. getFSEL3 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  66010. end;
  66011. procedure TCAN1_C1FLTCON0.setMSEL3(thebits : TBits_2); inline;
  66012. begin
  66013. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  66014. end;
  66015. function TCAN1_C1FLTCON0.getMSEL3 : TBits_2; inline;
  66016. begin
  66017. getMSEL3 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  66018. end;
  66019. procedure TCAN1_C1FLTCON0.setFLTEN3; inline;
  66020. begin
  66021. pTDefRegMap(@Self)^.&set := $80000000;
  66022. end;
  66023. procedure TCAN1_C1FLTCON0.clearFLTEN3; inline;
  66024. begin
  66025. pTDefRegMap(@Self)^.clr := $80000000;
  66026. end;
  66027. procedure TCAN1_C1FLTCON0.setFLTEN3(thebits : TBits_1); inline;
  66028. begin
  66029. if thebits = 0 then
  66030. pTDefRegMap(@Self)^.clr := $80000000
  66031. else
  66032. pTDefRegMap(@Self)^.&set := $80000000;
  66033. end;
  66034. function TCAN1_C1FLTCON0.getFLTEN3 : TBits_1; inline;
  66035. begin
  66036. getFLTEN3 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  66037. end;
  66038. procedure TCAN1_C1FLTCON0.setw(thebits : TBits_32); inline;
  66039. begin
  66040. pTDefRegMap(@Self)^.val := thebits;
  66041. end;
  66042. function TCAN1_C1FLTCON0.getw : TBits_32; inline;
  66043. begin
  66044. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66045. end;
  66046. procedure TCAN1_C1FLTCON1.setFSEL4(thebits : TBits_5); inline;
  66047. begin
  66048. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  66049. end;
  66050. function TCAN1_C1FLTCON1.getFSEL4 : TBits_5; inline;
  66051. begin
  66052. getFSEL4 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  66053. end;
  66054. procedure TCAN1_C1FLTCON1.setMSEL4(thebits : TBits_2); inline;
  66055. begin
  66056. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  66057. end;
  66058. function TCAN1_C1FLTCON1.getMSEL4 : TBits_2; inline;
  66059. begin
  66060. getMSEL4 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  66061. end;
  66062. procedure TCAN1_C1FLTCON1.setFLTEN4; inline;
  66063. begin
  66064. pTDefRegMap(@Self)^.&set := $00000080;
  66065. end;
  66066. procedure TCAN1_C1FLTCON1.clearFLTEN4; inline;
  66067. begin
  66068. pTDefRegMap(@Self)^.clr := $00000080;
  66069. end;
  66070. procedure TCAN1_C1FLTCON1.setFLTEN4(thebits : TBits_1); inline;
  66071. begin
  66072. if thebits = 0 then
  66073. pTDefRegMap(@Self)^.clr := $00000080
  66074. else
  66075. pTDefRegMap(@Self)^.&set := $00000080;
  66076. end;
  66077. function TCAN1_C1FLTCON1.getFLTEN4 : TBits_1; inline;
  66078. begin
  66079. getFLTEN4 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66080. end;
  66081. procedure TCAN1_C1FLTCON1.setFSEL5(thebits : TBits_5); inline;
  66082. begin
  66083. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  66084. end;
  66085. function TCAN1_C1FLTCON1.getFSEL5 : TBits_5; inline;
  66086. begin
  66087. getFSEL5 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  66088. end;
  66089. procedure TCAN1_C1FLTCON1.setMSEL5(thebits : TBits_2); inline;
  66090. begin
  66091. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  66092. end;
  66093. function TCAN1_C1FLTCON1.getMSEL5 : TBits_2; inline;
  66094. begin
  66095. getMSEL5 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  66096. end;
  66097. procedure TCAN1_C1FLTCON1.setFLTEN5; inline;
  66098. begin
  66099. pTDefRegMap(@Self)^.&set := $00008000;
  66100. end;
  66101. procedure TCAN1_C1FLTCON1.clearFLTEN5; inline;
  66102. begin
  66103. pTDefRegMap(@Self)^.clr := $00008000;
  66104. end;
  66105. procedure TCAN1_C1FLTCON1.setFLTEN5(thebits : TBits_1); inline;
  66106. begin
  66107. if thebits = 0 then
  66108. pTDefRegMap(@Self)^.clr := $00008000
  66109. else
  66110. pTDefRegMap(@Self)^.&set := $00008000;
  66111. end;
  66112. function TCAN1_C1FLTCON1.getFLTEN5 : TBits_1; inline;
  66113. begin
  66114. getFLTEN5 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  66115. end;
  66116. procedure TCAN1_C1FLTCON1.setFSEL6(thebits : TBits_5); inline;
  66117. begin
  66118. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  66119. end;
  66120. function TCAN1_C1FLTCON1.getFSEL6 : TBits_5; inline;
  66121. begin
  66122. getFSEL6 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  66123. end;
  66124. procedure TCAN1_C1FLTCON1.setMSEL6(thebits : TBits_2); inline;
  66125. begin
  66126. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  66127. end;
  66128. function TCAN1_C1FLTCON1.getMSEL6 : TBits_2; inline;
  66129. begin
  66130. getMSEL6 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  66131. end;
  66132. procedure TCAN1_C1FLTCON1.setFLTEN6; inline;
  66133. begin
  66134. pTDefRegMap(@Self)^.&set := $00800000;
  66135. end;
  66136. procedure TCAN1_C1FLTCON1.clearFLTEN6; inline;
  66137. begin
  66138. pTDefRegMap(@Self)^.clr := $00800000;
  66139. end;
  66140. procedure TCAN1_C1FLTCON1.setFLTEN6(thebits : TBits_1); inline;
  66141. begin
  66142. if thebits = 0 then
  66143. pTDefRegMap(@Self)^.clr := $00800000
  66144. else
  66145. pTDefRegMap(@Self)^.&set := $00800000;
  66146. end;
  66147. function TCAN1_C1FLTCON1.getFLTEN6 : TBits_1; inline;
  66148. begin
  66149. getFLTEN6 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  66150. end;
  66151. procedure TCAN1_C1FLTCON1.setFSEL7(thebits : TBits_5); inline;
  66152. begin
  66153. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  66154. end;
  66155. function TCAN1_C1FLTCON1.getFSEL7 : TBits_5; inline;
  66156. begin
  66157. getFSEL7 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  66158. end;
  66159. procedure TCAN1_C1FLTCON1.setMSEL7(thebits : TBits_2); inline;
  66160. begin
  66161. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  66162. end;
  66163. function TCAN1_C1FLTCON1.getMSEL7 : TBits_2; inline;
  66164. begin
  66165. getMSEL7 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  66166. end;
  66167. procedure TCAN1_C1FLTCON1.setFLTEN7; inline;
  66168. begin
  66169. pTDefRegMap(@Self)^.&set := $80000000;
  66170. end;
  66171. procedure TCAN1_C1FLTCON1.clearFLTEN7; inline;
  66172. begin
  66173. pTDefRegMap(@Self)^.clr := $80000000;
  66174. end;
  66175. procedure TCAN1_C1FLTCON1.setFLTEN7(thebits : TBits_1); inline;
  66176. begin
  66177. if thebits = 0 then
  66178. pTDefRegMap(@Self)^.clr := $80000000
  66179. else
  66180. pTDefRegMap(@Self)^.&set := $80000000;
  66181. end;
  66182. function TCAN1_C1FLTCON1.getFLTEN7 : TBits_1; inline;
  66183. begin
  66184. getFLTEN7 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  66185. end;
  66186. procedure TCAN1_C1FLTCON1.setw(thebits : TBits_32); inline;
  66187. begin
  66188. pTDefRegMap(@Self)^.val := thebits;
  66189. end;
  66190. function TCAN1_C1FLTCON1.getw : TBits_32; inline;
  66191. begin
  66192. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66193. end;
  66194. procedure TCAN1_C1FLTCON2.setFSEL8(thebits : TBits_5); inline;
  66195. begin
  66196. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  66197. end;
  66198. function TCAN1_C1FLTCON2.getFSEL8 : TBits_5; inline;
  66199. begin
  66200. getFSEL8 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  66201. end;
  66202. procedure TCAN1_C1FLTCON2.setMSEL8(thebits : TBits_2); inline;
  66203. begin
  66204. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  66205. end;
  66206. function TCAN1_C1FLTCON2.getMSEL8 : TBits_2; inline;
  66207. begin
  66208. getMSEL8 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  66209. end;
  66210. procedure TCAN1_C1FLTCON2.setFLTEN8; inline;
  66211. begin
  66212. pTDefRegMap(@Self)^.&set := $00000080;
  66213. end;
  66214. procedure TCAN1_C1FLTCON2.clearFLTEN8; inline;
  66215. begin
  66216. pTDefRegMap(@Self)^.clr := $00000080;
  66217. end;
  66218. procedure TCAN1_C1FLTCON2.setFLTEN8(thebits : TBits_1); inline;
  66219. begin
  66220. if thebits = 0 then
  66221. pTDefRegMap(@Self)^.clr := $00000080
  66222. else
  66223. pTDefRegMap(@Self)^.&set := $00000080;
  66224. end;
  66225. function TCAN1_C1FLTCON2.getFLTEN8 : TBits_1; inline;
  66226. begin
  66227. getFLTEN8 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66228. end;
  66229. procedure TCAN1_C1FLTCON2.setFSEL9(thebits : TBits_5); inline;
  66230. begin
  66231. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  66232. end;
  66233. function TCAN1_C1FLTCON2.getFSEL9 : TBits_5; inline;
  66234. begin
  66235. getFSEL9 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  66236. end;
  66237. procedure TCAN1_C1FLTCON2.setMSEL9(thebits : TBits_2); inline;
  66238. begin
  66239. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  66240. end;
  66241. function TCAN1_C1FLTCON2.getMSEL9 : TBits_2; inline;
  66242. begin
  66243. getMSEL9 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  66244. end;
  66245. procedure TCAN1_C1FLTCON2.setFLTEN9; inline;
  66246. begin
  66247. pTDefRegMap(@Self)^.&set := $00008000;
  66248. end;
  66249. procedure TCAN1_C1FLTCON2.clearFLTEN9; inline;
  66250. begin
  66251. pTDefRegMap(@Self)^.clr := $00008000;
  66252. end;
  66253. procedure TCAN1_C1FLTCON2.setFLTEN9(thebits : TBits_1); inline;
  66254. begin
  66255. if thebits = 0 then
  66256. pTDefRegMap(@Self)^.clr := $00008000
  66257. else
  66258. pTDefRegMap(@Self)^.&set := $00008000;
  66259. end;
  66260. function TCAN1_C1FLTCON2.getFLTEN9 : TBits_1; inline;
  66261. begin
  66262. getFLTEN9 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  66263. end;
  66264. procedure TCAN1_C1FLTCON2.setFSEL10(thebits : TBits_5); inline;
  66265. begin
  66266. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  66267. end;
  66268. function TCAN1_C1FLTCON2.getFSEL10 : TBits_5; inline;
  66269. begin
  66270. getFSEL10 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  66271. end;
  66272. procedure TCAN1_C1FLTCON2.setMSEL10(thebits : TBits_2); inline;
  66273. begin
  66274. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  66275. end;
  66276. function TCAN1_C1FLTCON2.getMSEL10 : TBits_2; inline;
  66277. begin
  66278. getMSEL10 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  66279. end;
  66280. procedure TCAN1_C1FLTCON2.setFLTEN10; inline;
  66281. begin
  66282. pTDefRegMap(@Self)^.&set := $00800000;
  66283. end;
  66284. procedure TCAN1_C1FLTCON2.clearFLTEN10; inline;
  66285. begin
  66286. pTDefRegMap(@Self)^.clr := $00800000;
  66287. end;
  66288. procedure TCAN1_C1FLTCON2.setFLTEN10(thebits : TBits_1); inline;
  66289. begin
  66290. if thebits = 0 then
  66291. pTDefRegMap(@Self)^.clr := $00800000
  66292. else
  66293. pTDefRegMap(@Self)^.&set := $00800000;
  66294. end;
  66295. function TCAN1_C1FLTCON2.getFLTEN10 : TBits_1; inline;
  66296. begin
  66297. getFLTEN10 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  66298. end;
  66299. procedure TCAN1_C1FLTCON2.setFSEL11(thebits : TBits_5); inline;
  66300. begin
  66301. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  66302. end;
  66303. function TCAN1_C1FLTCON2.getFSEL11 : TBits_5; inline;
  66304. begin
  66305. getFSEL11 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  66306. end;
  66307. procedure TCAN1_C1FLTCON2.setMSEL11(thebits : TBits_2); inline;
  66308. begin
  66309. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  66310. end;
  66311. function TCAN1_C1FLTCON2.getMSEL11 : TBits_2; inline;
  66312. begin
  66313. getMSEL11 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  66314. end;
  66315. procedure TCAN1_C1FLTCON2.setFLTEN11; inline;
  66316. begin
  66317. pTDefRegMap(@Self)^.&set := $80000000;
  66318. end;
  66319. procedure TCAN1_C1FLTCON2.clearFLTEN11; inline;
  66320. begin
  66321. pTDefRegMap(@Self)^.clr := $80000000;
  66322. end;
  66323. procedure TCAN1_C1FLTCON2.setFLTEN11(thebits : TBits_1); inline;
  66324. begin
  66325. if thebits = 0 then
  66326. pTDefRegMap(@Self)^.clr := $80000000
  66327. else
  66328. pTDefRegMap(@Self)^.&set := $80000000;
  66329. end;
  66330. function TCAN1_C1FLTCON2.getFLTEN11 : TBits_1; inline;
  66331. begin
  66332. getFLTEN11 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  66333. end;
  66334. procedure TCAN1_C1FLTCON2.setw(thebits : TBits_32); inline;
  66335. begin
  66336. pTDefRegMap(@Self)^.val := thebits;
  66337. end;
  66338. function TCAN1_C1FLTCON2.getw : TBits_32; inline;
  66339. begin
  66340. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66341. end;
  66342. procedure TCAN1_C1FLTCON3.setFSEL12(thebits : TBits_5); inline;
  66343. begin
  66344. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  66345. end;
  66346. function TCAN1_C1FLTCON3.getFSEL12 : TBits_5; inline;
  66347. begin
  66348. getFSEL12 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  66349. end;
  66350. procedure TCAN1_C1FLTCON3.setMSEL12(thebits : TBits_2); inline;
  66351. begin
  66352. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  66353. end;
  66354. function TCAN1_C1FLTCON3.getMSEL12 : TBits_2; inline;
  66355. begin
  66356. getMSEL12 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  66357. end;
  66358. procedure TCAN1_C1FLTCON3.setFLTEN12; inline;
  66359. begin
  66360. pTDefRegMap(@Self)^.&set := $00000080;
  66361. end;
  66362. procedure TCAN1_C1FLTCON3.clearFLTEN12; inline;
  66363. begin
  66364. pTDefRegMap(@Self)^.clr := $00000080;
  66365. end;
  66366. procedure TCAN1_C1FLTCON3.setFLTEN12(thebits : TBits_1); inline;
  66367. begin
  66368. if thebits = 0 then
  66369. pTDefRegMap(@Self)^.clr := $00000080
  66370. else
  66371. pTDefRegMap(@Self)^.&set := $00000080;
  66372. end;
  66373. function TCAN1_C1FLTCON3.getFLTEN12 : TBits_1; inline;
  66374. begin
  66375. getFLTEN12 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66376. end;
  66377. procedure TCAN1_C1FLTCON3.setFSEL13(thebits : TBits_5); inline;
  66378. begin
  66379. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  66380. end;
  66381. function TCAN1_C1FLTCON3.getFSEL13 : TBits_5; inline;
  66382. begin
  66383. getFSEL13 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  66384. end;
  66385. procedure TCAN1_C1FLTCON3.setMSEL13(thebits : TBits_2); inline;
  66386. begin
  66387. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  66388. end;
  66389. function TCAN1_C1FLTCON3.getMSEL13 : TBits_2; inline;
  66390. begin
  66391. getMSEL13 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  66392. end;
  66393. procedure TCAN1_C1FLTCON3.setFLTEN13; inline;
  66394. begin
  66395. pTDefRegMap(@Self)^.&set := $00008000;
  66396. end;
  66397. procedure TCAN1_C1FLTCON3.clearFLTEN13; inline;
  66398. begin
  66399. pTDefRegMap(@Self)^.clr := $00008000;
  66400. end;
  66401. procedure TCAN1_C1FLTCON3.setFLTEN13(thebits : TBits_1); inline;
  66402. begin
  66403. if thebits = 0 then
  66404. pTDefRegMap(@Self)^.clr := $00008000
  66405. else
  66406. pTDefRegMap(@Self)^.&set := $00008000;
  66407. end;
  66408. function TCAN1_C1FLTCON3.getFLTEN13 : TBits_1; inline;
  66409. begin
  66410. getFLTEN13 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  66411. end;
  66412. procedure TCAN1_C1FLTCON3.setFSEL14(thebits : TBits_5); inline;
  66413. begin
  66414. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  66415. end;
  66416. function TCAN1_C1FLTCON3.getFSEL14 : TBits_5; inline;
  66417. begin
  66418. getFSEL14 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  66419. end;
  66420. procedure TCAN1_C1FLTCON3.setMSEL14(thebits : TBits_2); inline;
  66421. begin
  66422. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  66423. end;
  66424. function TCAN1_C1FLTCON3.getMSEL14 : TBits_2; inline;
  66425. begin
  66426. getMSEL14 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  66427. end;
  66428. procedure TCAN1_C1FLTCON3.setFLTEN14; inline;
  66429. begin
  66430. pTDefRegMap(@Self)^.&set := $00800000;
  66431. end;
  66432. procedure TCAN1_C1FLTCON3.clearFLTEN14; inline;
  66433. begin
  66434. pTDefRegMap(@Self)^.clr := $00800000;
  66435. end;
  66436. procedure TCAN1_C1FLTCON3.setFLTEN14(thebits : TBits_1); inline;
  66437. begin
  66438. if thebits = 0 then
  66439. pTDefRegMap(@Self)^.clr := $00800000
  66440. else
  66441. pTDefRegMap(@Self)^.&set := $00800000;
  66442. end;
  66443. function TCAN1_C1FLTCON3.getFLTEN14 : TBits_1; inline;
  66444. begin
  66445. getFLTEN14 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  66446. end;
  66447. procedure TCAN1_C1FLTCON3.setFSEL15(thebits : TBits_5); inline;
  66448. begin
  66449. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  66450. end;
  66451. function TCAN1_C1FLTCON3.getFSEL15 : TBits_5; inline;
  66452. begin
  66453. getFSEL15 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  66454. end;
  66455. procedure TCAN1_C1FLTCON3.setMSEL15(thebits : TBits_2); inline;
  66456. begin
  66457. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  66458. end;
  66459. function TCAN1_C1FLTCON3.getMSEL15 : TBits_2; inline;
  66460. begin
  66461. getMSEL15 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  66462. end;
  66463. procedure TCAN1_C1FLTCON3.setFLTEN15; inline;
  66464. begin
  66465. pTDefRegMap(@Self)^.&set := $80000000;
  66466. end;
  66467. procedure TCAN1_C1FLTCON3.clearFLTEN15; inline;
  66468. begin
  66469. pTDefRegMap(@Self)^.clr := $80000000;
  66470. end;
  66471. procedure TCAN1_C1FLTCON3.setFLTEN15(thebits : TBits_1); inline;
  66472. begin
  66473. if thebits = 0 then
  66474. pTDefRegMap(@Self)^.clr := $80000000
  66475. else
  66476. pTDefRegMap(@Self)^.&set := $80000000;
  66477. end;
  66478. function TCAN1_C1FLTCON3.getFLTEN15 : TBits_1; inline;
  66479. begin
  66480. getFLTEN15 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  66481. end;
  66482. procedure TCAN1_C1FLTCON3.setw(thebits : TBits_32); inline;
  66483. begin
  66484. pTDefRegMap(@Self)^.val := thebits;
  66485. end;
  66486. function TCAN1_C1FLTCON3.getw : TBits_32; inline;
  66487. begin
  66488. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66489. end;
  66490. procedure TCAN1_C1FLTCON4.setFSEL16(thebits : TBits_5); inline;
  66491. begin
  66492. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  66493. end;
  66494. function TCAN1_C1FLTCON4.getFSEL16 : TBits_5; inline;
  66495. begin
  66496. getFSEL16 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  66497. end;
  66498. procedure TCAN1_C1FLTCON4.setMSEL16(thebits : TBits_2); inline;
  66499. begin
  66500. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  66501. end;
  66502. function TCAN1_C1FLTCON4.getMSEL16 : TBits_2; inline;
  66503. begin
  66504. getMSEL16 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  66505. end;
  66506. procedure TCAN1_C1FLTCON4.setFLTEN16; inline;
  66507. begin
  66508. pTDefRegMap(@Self)^.&set := $00000080;
  66509. end;
  66510. procedure TCAN1_C1FLTCON4.clearFLTEN16; inline;
  66511. begin
  66512. pTDefRegMap(@Self)^.clr := $00000080;
  66513. end;
  66514. procedure TCAN1_C1FLTCON4.setFLTEN16(thebits : TBits_1); inline;
  66515. begin
  66516. if thebits = 0 then
  66517. pTDefRegMap(@Self)^.clr := $00000080
  66518. else
  66519. pTDefRegMap(@Self)^.&set := $00000080;
  66520. end;
  66521. function TCAN1_C1FLTCON4.getFLTEN16 : TBits_1; inline;
  66522. begin
  66523. getFLTEN16 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66524. end;
  66525. procedure TCAN1_C1FLTCON4.setFSEL17(thebits : TBits_5); inline;
  66526. begin
  66527. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  66528. end;
  66529. function TCAN1_C1FLTCON4.getFSEL17 : TBits_5; inline;
  66530. begin
  66531. getFSEL17 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  66532. end;
  66533. procedure TCAN1_C1FLTCON4.setMSEL17(thebits : TBits_2); inline;
  66534. begin
  66535. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  66536. end;
  66537. function TCAN1_C1FLTCON4.getMSEL17 : TBits_2; inline;
  66538. begin
  66539. getMSEL17 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  66540. end;
  66541. procedure TCAN1_C1FLTCON4.setFLTEN17; inline;
  66542. begin
  66543. pTDefRegMap(@Self)^.&set := $00008000;
  66544. end;
  66545. procedure TCAN1_C1FLTCON4.clearFLTEN17; inline;
  66546. begin
  66547. pTDefRegMap(@Self)^.clr := $00008000;
  66548. end;
  66549. procedure TCAN1_C1FLTCON4.setFLTEN17(thebits : TBits_1); inline;
  66550. begin
  66551. if thebits = 0 then
  66552. pTDefRegMap(@Self)^.clr := $00008000
  66553. else
  66554. pTDefRegMap(@Self)^.&set := $00008000;
  66555. end;
  66556. function TCAN1_C1FLTCON4.getFLTEN17 : TBits_1; inline;
  66557. begin
  66558. getFLTEN17 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  66559. end;
  66560. procedure TCAN1_C1FLTCON4.setFSEL18(thebits : TBits_5); inline;
  66561. begin
  66562. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  66563. end;
  66564. function TCAN1_C1FLTCON4.getFSEL18 : TBits_5; inline;
  66565. begin
  66566. getFSEL18 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  66567. end;
  66568. procedure TCAN1_C1FLTCON4.setMSEL18(thebits : TBits_2); inline;
  66569. begin
  66570. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  66571. end;
  66572. function TCAN1_C1FLTCON4.getMSEL18 : TBits_2; inline;
  66573. begin
  66574. getMSEL18 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  66575. end;
  66576. procedure TCAN1_C1FLTCON4.setFLTEN18; inline;
  66577. begin
  66578. pTDefRegMap(@Self)^.&set := $00800000;
  66579. end;
  66580. procedure TCAN1_C1FLTCON4.clearFLTEN18; inline;
  66581. begin
  66582. pTDefRegMap(@Self)^.clr := $00800000;
  66583. end;
  66584. procedure TCAN1_C1FLTCON4.setFLTEN18(thebits : TBits_1); inline;
  66585. begin
  66586. if thebits = 0 then
  66587. pTDefRegMap(@Self)^.clr := $00800000
  66588. else
  66589. pTDefRegMap(@Self)^.&set := $00800000;
  66590. end;
  66591. function TCAN1_C1FLTCON4.getFLTEN18 : TBits_1; inline;
  66592. begin
  66593. getFLTEN18 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  66594. end;
  66595. procedure TCAN1_C1FLTCON4.setFSEL19(thebits : TBits_5); inline;
  66596. begin
  66597. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  66598. end;
  66599. function TCAN1_C1FLTCON4.getFSEL19 : TBits_5; inline;
  66600. begin
  66601. getFSEL19 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  66602. end;
  66603. procedure TCAN1_C1FLTCON4.setMSEL19(thebits : TBits_2); inline;
  66604. begin
  66605. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  66606. end;
  66607. function TCAN1_C1FLTCON4.getMSEL19 : TBits_2; inline;
  66608. begin
  66609. getMSEL19 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  66610. end;
  66611. procedure TCAN1_C1FLTCON4.setFLTEN19; inline;
  66612. begin
  66613. pTDefRegMap(@Self)^.&set := $80000000;
  66614. end;
  66615. procedure TCAN1_C1FLTCON4.clearFLTEN19; inline;
  66616. begin
  66617. pTDefRegMap(@Self)^.clr := $80000000;
  66618. end;
  66619. procedure TCAN1_C1FLTCON4.setFLTEN19(thebits : TBits_1); inline;
  66620. begin
  66621. if thebits = 0 then
  66622. pTDefRegMap(@Self)^.clr := $80000000
  66623. else
  66624. pTDefRegMap(@Self)^.&set := $80000000;
  66625. end;
  66626. function TCAN1_C1FLTCON4.getFLTEN19 : TBits_1; inline;
  66627. begin
  66628. getFLTEN19 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  66629. end;
  66630. procedure TCAN1_C1FLTCON4.setw(thebits : TBits_32); inline;
  66631. begin
  66632. pTDefRegMap(@Self)^.val := thebits;
  66633. end;
  66634. function TCAN1_C1FLTCON4.getw : TBits_32; inline;
  66635. begin
  66636. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66637. end;
  66638. procedure TCAN1_C1FLTCON5.setFSEL20(thebits : TBits_5); inline;
  66639. begin
  66640. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  66641. end;
  66642. function TCAN1_C1FLTCON5.getFSEL20 : TBits_5; inline;
  66643. begin
  66644. getFSEL20 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  66645. end;
  66646. procedure TCAN1_C1FLTCON5.setMSEL20(thebits : TBits_2); inline;
  66647. begin
  66648. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  66649. end;
  66650. function TCAN1_C1FLTCON5.getMSEL20 : TBits_2; inline;
  66651. begin
  66652. getMSEL20 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  66653. end;
  66654. procedure TCAN1_C1FLTCON5.setFLTEN20; inline;
  66655. begin
  66656. pTDefRegMap(@Self)^.&set := $00000080;
  66657. end;
  66658. procedure TCAN1_C1FLTCON5.clearFLTEN20; inline;
  66659. begin
  66660. pTDefRegMap(@Self)^.clr := $00000080;
  66661. end;
  66662. procedure TCAN1_C1FLTCON5.setFLTEN20(thebits : TBits_1); inline;
  66663. begin
  66664. if thebits = 0 then
  66665. pTDefRegMap(@Self)^.clr := $00000080
  66666. else
  66667. pTDefRegMap(@Self)^.&set := $00000080;
  66668. end;
  66669. function TCAN1_C1FLTCON5.getFLTEN20 : TBits_1; inline;
  66670. begin
  66671. getFLTEN20 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66672. end;
  66673. procedure TCAN1_C1FLTCON5.setFSEL21(thebits : TBits_5); inline;
  66674. begin
  66675. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  66676. end;
  66677. function TCAN1_C1FLTCON5.getFSEL21 : TBits_5; inline;
  66678. begin
  66679. getFSEL21 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  66680. end;
  66681. procedure TCAN1_C1FLTCON5.setMSEL21(thebits : TBits_2); inline;
  66682. begin
  66683. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  66684. end;
  66685. function TCAN1_C1FLTCON5.getMSEL21 : TBits_2; inline;
  66686. begin
  66687. getMSEL21 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  66688. end;
  66689. procedure TCAN1_C1FLTCON5.setFLTEN21; inline;
  66690. begin
  66691. pTDefRegMap(@Self)^.&set := $00008000;
  66692. end;
  66693. procedure TCAN1_C1FLTCON5.clearFLTEN21; inline;
  66694. begin
  66695. pTDefRegMap(@Self)^.clr := $00008000;
  66696. end;
  66697. procedure TCAN1_C1FLTCON5.setFLTEN21(thebits : TBits_1); inline;
  66698. begin
  66699. if thebits = 0 then
  66700. pTDefRegMap(@Self)^.clr := $00008000
  66701. else
  66702. pTDefRegMap(@Self)^.&set := $00008000;
  66703. end;
  66704. function TCAN1_C1FLTCON5.getFLTEN21 : TBits_1; inline;
  66705. begin
  66706. getFLTEN21 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  66707. end;
  66708. procedure TCAN1_C1FLTCON5.setFSEL22(thebits : TBits_5); inline;
  66709. begin
  66710. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  66711. end;
  66712. function TCAN1_C1FLTCON5.getFSEL22 : TBits_5; inline;
  66713. begin
  66714. getFSEL22 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  66715. end;
  66716. procedure TCAN1_C1FLTCON5.setMSEL22(thebits : TBits_2); inline;
  66717. begin
  66718. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  66719. end;
  66720. function TCAN1_C1FLTCON5.getMSEL22 : TBits_2; inline;
  66721. begin
  66722. getMSEL22 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  66723. end;
  66724. procedure TCAN1_C1FLTCON5.setFLTEN22; inline;
  66725. begin
  66726. pTDefRegMap(@Self)^.&set := $00800000;
  66727. end;
  66728. procedure TCAN1_C1FLTCON5.clearFLTEN22; inline;
  66729. begin
  66730. pTDefRegMap(@Self)^.clr := $00800000;
  66731. end;
  66732. procedure TCAN1_C1FLTCON5.setFLTEN22(thebits : TBits_1); inline;
  66733. begin
  66734. if thebits = 0 then
  66735. pTDefRegMap(@Self)^.clr := $00800000
  66736. else
  66737. pTDefRegMap(@Self)^.&set := $00800000;
  66738. end;
  66739. function TCAN1_C1FLTCON5.getFLTEN22 : TBits_1; inline;
  66740. begin
  66741. getFLTEN22 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  66742. end;
  66743. procedure TCAN1_C1FLTCON5.setFSEL23(thebits : TBits_5); inline;
  66744. begin
  66745. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  66746. end;
  66747. function TCAN1_C1FLTCON5.getFSEL23 : TBits_5; inline;
  66748. begin
  66749. getFSEL23 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  66750. end;
  66751. procedure TCAN1_C1FLTCON5.setMSEL23(thebits : TBits_2); inline;
  66752. begin
  66753. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  66754. end;
  66755. function TCAN1_C1FLTCON5.getMSEL23 : TBits_2; inline;
  66756. begin
  66757. getMSEL23 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  66758. end;
  66759. procedure TCAN1_C1FLTCON5.setFLTEN23; inline;
  66760. begin
  66761. pTDefRegMap(@Self)^.&set := $80000000;
  66762. end;
  66763. procedure TCAN1_C1FLTCON5.clearFLTEN23; inline;
  66764. begin
  66765. pTDefRegMap(@Self)^.clr := $80000000;
  66766. end;
  66767. procedure TCAN1_C1FLTCON5.setFLTEN23(thebits : TBits_1); inline;
  66768. begin
  66769. if thebits = 0 then
  66770. pTDefRegMap(@Self)^.clr := $80000000
  66771. else
  66772. pTDefRegMap(@Self)^.&set := $80000000;
  66773. end;
  66774. function TCAN1_C1FLTCON5.getFLTEN23 : TBits_1; inline;
  66775. begin
  66776. getFLTEN23 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  66777. end;
  66778. procedure TCAN1_C1FLTCON5.setw(thebits : TBits_32); inline;
  66779. begin
  66780. pTDefRegMap(@Self)^.val := thebits;
  66781. end;
  66782. function TCAN1_C1FLTCON5.getw : TBits_32; inline;
  66783. begin
  66784. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66785. end;
  66786. procedure TCAN1_C1FLTCON6.setFSEL24(thebits : TBits_5); inline;
  66787. begin
  66788. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  66789. end;
  66790. function TCAN1_C1FLTCON6.getFSEL24 : TBits_5; inline;
  66791. begin
  66792. getFSEL24 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  66793. end;
  66794. procedure TCAN1_C1FLTCON6.setMSEL24(thebits : TBits_2); inline;
  66795. begin
  66796. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  66797. end;
  66798. function TCAN1_C1FLTCON6.getMSEL24 : TBits_2; inline;
  66799. begin
  66800. getMSEL24 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  66801. end;
  66802. procedure TCAN1_C1FLTCON6.setFLTEN24; inline;
  66803. begin
  66804. pTDefRegMap(@Self)^.&set := $00000080;
  66805. end;
  66806. procedure TCAN1_C1FLTCON6.clearFLTEN24; inline;
  66807. begin
  66808. pTDefRegMap(@Self)^.clr := $00000080;
  66809. end;
  66810. procedure TCAN1_C1FLTCON6.setFLTEN24(thebits : TBits_1); inline;
  66811. begin
  66812. if thebits = 0 then
  66813. pTDefRegMap(@Self)^.clr := $00000080
  66814. else
  66815. pTDefRegMap(@Self)^.&set := $00000080;
  66816. end;
  66817. function TCAN1_C1FLTCON6.getFLTEN24 : TBits_1; inline;
  66818. begin
  66819. getFLTEN24 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66820. end;
  66821. procedure TCAN1_C1FLTCON6.setFSEL25(thebits : TBits_5); inline;
  66822. begin
  66823. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  66824. end;
  66825. function TCAN1_C1FLTCON6.getFSEL25 : TBits_5; inline;
  66826. begin
  66827. getFSEL25 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  66828. end;
  66829. procedure TCAN1_C1FLTCON6.setMSEL25(thebits : TBits_2); inline;
  66830. begin
  66831. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  66832. end;
  66833. function TCAN1_C1FLTCON6.getMSEL25 : TBits_2; inline;
  66834. begin
  66835. getMSEL25 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  66836. end;
  66837. procedure TCAN1_C1FLTCON6.setFLTEN25; inline;
  66838. begin
  66839. pTDefRegMap(@Self)^.&set := $00008000;
  66840. end;
  66841. procedure TCAN1_C1FLTCON6.clearFLTEN25; inline;
  66842. begin
  66843. pTDefRegMap(@Self)^.clr := $00008000;
  66844. end;
  66845. procedure TCAN1_C1FLTCON6.setFLTEN25(thebits : TBits_1); inline;
  66846. begin
  66847. if thebits = 0 then
  66848. pTDefRegMap(@Self)^.clr := $00008000
  66849. else
  66850. pTDefRegMap(@Self)^.&set := $00008000;
  66851. end;
  66852. function TCAN1_C1FLTCON6.getFLTEN25 : TBits_1; inline;
  66853. begin
  66854. getFLTEN25 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  66855. end;
  66856. procedure TCAN1_C1FLTCON6.setFSEL26(thebits : TBits_5); inline;
  66857. begin
  66858. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  66859. end;
  66860. function TCAN1_C1FLTCON6.getFSEL26 : TBits_5; inline;
  66861. begin
  66862. getFSEL26 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  66863. end;
  66864. procedure TCAN1_C1FLTCON6.setMSEL26(thebits : TBits_2); inline;
  66865. begin
  66866. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  66867. end;
  66868. function TCAN1_C1FLTCON6.getMSEL26 : TBits_2; inline;
  66869. begin
  66870. getMSEL26 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  66871. end;
  66872. procedure TCAN1_C1FLTCON6.setFLTEN26; inline;
  66873. begin
  66874. pTDefRegMap(@Self)^.&set := $00800000;
  66875. end;
  66876. procedure TCAN1_C1FLTCON6.clearFLTEN26; inline;
  66877. begin
  66878. pTDefRegMap(@Self)^.clr := $00800000;
  66879. end;
  66880. procedure TCAN1_C1FLTCON6.setFLTEN26(thebits : TBits_1); inline;
  66881. begin
  66882. if thebits = 0 then
  66883. pTDefRegMap(@Self)^.clr := $00800000
  66884. else
  66885. pTDefRegMap(@Self)^.&set := $00800000;
  66886. end;
  66887. function TCAN1_C1FLTCON6.getFLTEN26 : TBits_1; inline;
  66888. begin
  66889. getFLTEN26 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  66890. end;
  66891. procedure TCAN1_C1FLTCON6.setFSEL27(thebits : TBits_5); inline;
  66892. begin
  66893. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  66894. end;
  66895. function TCAN1_C1FLTCON6.getFSEL27 : TBits_5; inline;
  66896. begin
  66897. getFSEL27 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  66898. end;
  66899. procedure TCAN1_C1FLTCON6.setMSEL27(thebits : TBits_2); inline;
  66900. begin
  66901. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  66902. end;
  66903. function TCAN1_C1FLTCON6.getMSEL27 : TBits_2; inline;
  66904. begin
  66905. getMSEL27 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  66906. end;
  66907. procedure TCAN1_C1FLTCON6.setFLTEN27; inline;
  66908. begin
  66909. pTDefRegMap(@Self)^.&set := $80000000;
  66910. end;
  66911. procedure TCAN1_C1FLTCON6.clearFLTEN27; inline;
  66912. begin
  66913. pTDefRegMap(@Self)^.clr := $80000000;
  66914. end;
  66915. procedure TCAN1_C1FLTCON6.setFLTEN27(thebits : TBits_1); inline;
  66916. begin
  66917. if thebits = 0 then
  66918. pTDefRegMap(@Self)^.clr := $80000000
  66919. else
  66920. pTDefRegMap(@Self)^.&set := $80000000;
  66921. end;
  66922. function TCAN1_C1FLTCON6.getFLTEN27 : TBits_1; inline;
  66923. begin
  66924. getFLTEN27 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  66925. end;
  66926. procedure TCAN1_C1FLTCON6.setw(thebits : TBits_32); inline;
  66927. begin
  66928. pTDefRegMap(@Self)^.val := thebits;
  66929. end;
  66930. function TCAN1_C1FLTCON6.getw : TBits_32; inline;
  66931. begin
  66932. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66933. end;
  66934. procedure TCAN1_C1FLTCON7.setFSEL28(thebits : TBits_5); inline;
  66935. begin
  66936. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  66937. end;
  66938. function TCAN1_C1FLTCON7.getFSEL28 : TBits_5; inline;
  66939. begin
  66940. getFSEL28 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  66941. end;
  66942. procedure TCAN1_C1FLTCON7.setMSEL28(thebits : TBits_2); inline;
  66943. begin
  66944. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  66945. end;
  66946. function TCAN1_C1FLTCON7.getMSEL28 : TBits_2; inline;
  66947. begin
  66948. getMSEL28 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  66949. end;
  66950. procedure TCAN1_C1FLTCON7.setFLTEN28; inline;
  66951. begin
  66952. pTDefRegMap(@Self)^.&set := $00000080;
  66953. end;
  66954. procedure TCAN1_C1FLTCON7.clearFLTEN28; inline;
  66955. begin
  66956. pTDefRegMap(@Self)^.clr := $00000080;
  66957. end;
  66958. procedure TCAN1_C1FLTCON7.setFLTEN28(thebits : TBits_1); inline;
  66959. begin
  66960. if thebits = 0 then
  66961. pTDefRegMap(@Self)^.clr := $00000080
  66962. else
  66963. pTDefRegMap(@Self)^.&set := $00000080;
  66964. end;
  66965. function TCAN1_C1FLTCON7.getFLTEN28 : TBits_1; inline;
  66966. begin
  66967. getFLTEN28 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66968. end;
  66969. procedure TCAN1_C1FLTCON7.setFSEL29(thebits : TBits_5); inline;
  66970. begin
  66971. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  66972. end;
  66973. function TCAN1_C1FLTCON7.getFSEL29 : TBits_5; inline;
  66974. begin
  66975. getFSEL29 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  66976. end;
  66977. procedure TCAN1_C1FLTCON7.setMSEL29(thebits : TBits_2); inline;
  66978. begin
  66979. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  66980. end;
  66981. function TCAN1_C1FLTCON7.getMSEL29 : TBits_2; inline;
  66982. begin
  66983. getMSEL29 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  66984. end;
  66985. procedure TCAN1_C1FLTCON7.setFLTEN29; inline;
  66986. begin
  66987. pTDefRegMap(@Self)^.&set := $00008000;
  66988. end;
  66989. procedure TCAN1_C1FLTCON7.clearFLTEN29; inline;
  66990. begin
  66991. pTDefRegMap(@Self)^.clr := $00008000;
  66992. end;
  66993. procedure TCAN1_C1FLTCON7.setFLTEN29(thebits : TBits_1); inline;
  66994. begin
  66995. if thebits = 0 then
  66996. pTDefRegMap(@Self)^.clr := $00008000
  66997. else
  66998. pTDefRegMap(@Self)^.&set := $00008000;
  66999. end;
  67000. function TCAN1_C1FLTCON7.getFLTEN29 : TBits_1; inline;
  67001. begin
  67002. getFLTEN29 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  67003. end;
  67004. procedure TCAN1_C1FLTCON7.setFSEL30(thebits : TBits_5); inline;
  67005. begin
  67006. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  67007. end;
  67008. function TCAN1_C1FLTCON7.getFSEL30 : TBits_5; inline;
  67009. begin
  67010. getFSEL30 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  67011. end;
  67012. procedure TCAN1_C1FLTCON7.setMSEL30(thebits : TBits_2); inline;
  67013. begin
  67014. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  67015. end;
  67016. function TCAN1_C1FLTCON7.getMSEL30 : TBits_2; inline;
  67017. begin
  67018. getMSEL30 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  67019. end;
  67020. procedure TCAN1_C1FLTCON7.setFLTEN30; inline;
  67021. begin
  67022. pTDefRegMap(@Self)^.&set := $00800000;
  67023. end;
  67024. procedure TCAN1_C1FLTCON7.clearFLTEN30; inline;
  67025. begin
  67026. pTDefRegMap(@Self)^.clr := $00800000;
  67027. end;
  67028. procedure TCAN1_C1FLTCON7.setFLTEN30(thebits : TBits_1); inline;
  67029. begin
  67030. if thebits = 0 then
  67031. pTDefRegMap(@Self)^.clr := $00800000
  67032. else
  67033. pTDefRegMap(@Self)^.&set := $00800000;
  67034. end;
  67035. function TCAN1_C1FLTCON7.getFLTEN30 : TBits_1; inline;
  67036. begin
  67037. getFLTEN30 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  67038. end;
  67039. procedure TCAN1_C1FLTCON7.setFSEL31(thebits : TBits_5); inline;
  67040. begin
  67041. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  67042. end;
  67043. function TCAN1_C1FLTCON7.getFSEL31 : TBits_5; inline;
  67044. begin
  67045. getFSEL31 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  67046. end;
  67047. procedure TCAN1_C1FLTCON7.setMSEL31(thebits : TBits_2); inline;
  67048. begin
  67049. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  67050. end;
  67051. function TCAN1_C1FLTCON7.getMSEL31 : TBits_2; inline;
  67052. begin
  67053. getMSEL31 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  67054. end;
  67055. procedure TCAN1_C1FLTCON7.setFLTEN31; inline;
  67056. begin
  67057. pTDefRegMap(@Self)^.&set := $80000000;
  67058. end;
  67059. procedure TCAN1_C1FLTCON7.clearFLTEN31; inline;
  67060. begin
  67061. pTDefRegMap(@Self)^.clr := $80000000;
  67062. end;
  67063. procedure TCAN1_C1FLTCON7.setFLTEN31(thebits : TBits_1); inline;
  67064. begin
  67065. if thebits = 0 then
  67066. pTDefRegMap(@Self)^.clr := $80000000
  67067. else
  67068. pTDefRegMap(@Self)^.&set := $80000000;
  67069. end;
  67070. function TCAN1_C1FLTCON7.getFLTEN31 : TBits_1; inline;
  67071. begin
  67072. getFLTEN31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  67073. end;
  67074. procedure TCAN1_C1FLTCON7.setw(thebits : TBits_32); inline;
  67075. begin
  67076. pTDefRegMap(@Self)^.val := thebits;
  67077. end;
  67078. function TCAN1_C1FLTCON7.getw : TBits_32; inline;
  67079. begin
  67080. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67081. end;
  67082. procedure TCAN1_C1RXF0.setEID(thebits : TBits_18); inline;
  67083. begin
  67084. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67085. end;
  67086. function TCAN1_C1RXF0.getEID : TBits_18; inline;
  67087. begin
  67088. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67089. end;
  67090. procedure TCAN1_C1RXF0.setEXID; inline;
  67091. begin
  67092. pTDefRegMap(@Self)^.&set := $00080000;
  67093. end;
  67094. procedure TCAN1_C1RXF0.clearEXID; inline;
  67095. begin
  67096. pTDefRegMap(@Self)^.clr := $00080000;
  67097. end;
  67098. procedure TCAN1_C1RXF0.setEXID(thebits : TBits_1); inline;
  67099. begin
  67100. if thebits = 0 then
  67101. pTDefRegMap(@Self)^.clr := $00080000
  67102. else
  67103. pTDefRegMap(@Self)^.&set := $00080000;
  67104. end;
  67105. function TCAN1_C1RXF0.getEXID : TBits_1; inline;
  67106. begin
  67107. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67108. end;
  67109. procedure TCAN1_C1RXF0.setSID(thebits : TBits_11); inline;
  67110. begin
  67111. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67112. end;
  67113. function TCAN1_C1RXF0.getSID : TBits_11; inline;
  67114. begin
  67115. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67116. end;
  67117. procedure TCAN1_C1RXF0.setw(thebits : TBits_32); inline;
  67118. begin
  67119. pTDefRegMap(@Self)^.val := thebits;
  67120. end;
  67121. function TCAN1_C1RXF0.getw : TBits_32; inline;
  67122. begin
  67123. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67124. end;
  67125. procedure TCAN1_C1RXF1.setEID(thebits : TBits_18); inline;
  67126. begin
  67127. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67128. end;
  67129. function TCAN1_C1RXF1.getEID : TBits_18; inline;
  67130. begin
  67131. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67132. end;
  67133. procedure TCAN1_C1RXF1.setEXID; inline;
  67134. begin
  67135. pTDefRegMap(@Self)^.&set := $00080000;
  67136. end;
  67137. procedure TCAN1_C1RXF1.clearEXID; inline;
  67138. begin
  67139. pTDefRegMap(@Self)^.clr := $00080000;
  67140. end;
  67141. procedure TCAN1_C1RXF1.setEXID(thebits : TBits_1); inline;
  67142. begin
  67143. if thebits = 0 then
  67144. pTDefRegMap(@Self)^.clr := $00080000
  67145. else
  67146. pTDefRegMap(@Self)^.&set := $00080000;
  67147. end;
  67148. function TCAN1_C1RXF1.getEXID : TBits_1; inline;
  67149. begin
  67150. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67151. end;
  67152. procedure TCAN1_C1RXF1.setSID(thebits : TBits_11); inline;
  67153. begin
  67154. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67155. end;
  67156. function TCAN1_C1RXF1.getSID : TBits_11; inline;
  67157. begin
  67158. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67159. end;
  67160. procedure TCAN1_C1RXF1.setw(thebits : TBits_32); inline;
  67161. begin
  67162. pTDefRegMap(@Self)^.val := thebits;
  67163. end;
  67164. function TCAN1_C1RXF1.getw : TBits_32; inline;
  67165. begin
  67166. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67167. end;
  67168. procedure TCAN1_C1RXF2.setEID(thebits : TBits_18); inline;
  67169. begin
  67170. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67171. end;
  67172. function TCAN1_C1RXF2.getEID : TBits_18; inline;
  67173. begin
  67174. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67175. end;
  67176. procedure TCAN1_C1RXF2.setEXID; inline;
  67177. begin
  67178. pTDefRegMap(@Self)^.&set := $00080000;
  67179. end;
  67180. procedure TCAN1_C1RXF2.clearEXID; inline;
  67181. begin
  67182. pTDefRegMap(@Self)^.clr := $00080000;
  67183. end;
  67184. procedure TCAN1_C1RXF2.setEXID(thebits : TBits_1); inline;
  67185. begin
  67186. if thebits = 0 then
  67187. pTDefRegMap(@Self)^.clr := $00080000
  67188. else
  67189. pTDefRegMap(@Self)^.&set := $00080000;
  67190. end;
  67191. function TCAN1_C1RXF2.getEXID : TBits_1; inline;
  67192. begin
  67193. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67194. end;
  67195. procedure TCAN1_C1RXF2.setSID(thebits : TBits_11); inline;
  67196. begin
  67197. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67198. end;
  67199. function TCAN1_C1RXF2.getSID : TBits_11; inline;
  67200. begin
  67201. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67202. end;
  67203. procedure TCAN1_C1RXF2.setw(thebits : TBits_32); inline;
  67204. begin
  67205. pTDefRegMap(@Self)^.val := thebits;
  67206. end;
  67207. function TCAN1_C1RXF2.getw : TBits_32; inline;
  67208. begin
  67209. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67210. end;
  67211. procedure TCAN1_C1RXF3.setEID(thebits : TBits_18); inline;
  67212. begin
  67213. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67214. end;
  67215. function TCAN1_C1RXF3.getEID : TBits_18; inline;
  67216. begin
  67217. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67218. end;
  67219. procedure TCAN1_C1RXF3.setEXID; inline;
  67220. begin
  67221. pTDefRegMap(@Self)^.&set := $00080000;
  67222. end;
  67223. procedure TCAN1_C1RXF3.clearEXID; inline;
  67224. begin
  67225. pTDefRegMap(@Self)^.clr := $00080000;
  67226. end;
  67227. procedure TCAN1_C1RXF3.setEXID(thebits : TBits_1); inline;
  67228. begin
  67229. if thebits = 0 then
  67230. pTDefRegMap(@Self)^.clr := $00080000
  67231. else
  67232. pTDefRegMap(@Self)^.&set := $00080000;
  67233. end;
  67234. function TCAN1_C1RXF3.getEXID : TBits_1; inline;
  67235. begin
  67236. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67237. end;
  67238. procedure TCAN1_C1RXF3.setSID(thebits : TBits_11); inline;
  67239. begin
  67240. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67241. end;
  67242. function TCAN1_C1RXF3.getSID : TBits_11; inline;
  67243. begin
  67244. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67245. end;
  67246. procedure TCAN1_C1RXF3.setw(thebits : TBits_32); inline;
  67247. begin
  67248. pTDefRegMap(@Self)^.val := thebits;
  67249. end;
  67250. function TCAN1_C1RXF3.getw : TBits_32; inline;
  67251. begin
  67252. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67253. end;
  67254. procedure TCAN1_C1RXF4.setEID(thebits : TBits_18); inline;
  67255. begin
  67256. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67257. end;
  67258. function TCAN1_C1RXF4.getEID : TBits_18; inline;
  67259. begin
  67260. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67261. end;
  67262. procedure TCAN1_C1RXF4.setEXID; inline;
  67263. begin
  67264. pTDefRegMap(@Self)^.&set := $00080000;
  67265. end;
  67266. procedure TCAN1_C1RXF4.clearEXID; inline;
  67267. begin
  67268. pTDefRegMap(@Self)^.clr := $00080000;
  67269. end;
  67270. procedure TCAN1_C1RXF4.setEXID(thebits : TBits_1); inline;
  67271. begin
  67272. if thebits = 0 then
  67273. pTDefRegMap(@Self)^.clr := $00080000
  67274. else
  67275. pTDefRegMap(@Self)^.&set := $00080000;
  67276. end;
  67277. function TCAN1_C1RXF4.getEXID : TBits_1; inline;
  67278. begin
  67279. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67280. end;
  67281. procedure TCAN1_C1RXF4.setSID(thebits : TBits_11); inline;
  67282. begin
  67283. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67284. end;
  67285. function TCAN1_C1RXF4.getSID : TBits_11; inline;
  67286. begin
  67287. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67288. end;
  67289. procedure TCAN1_C1RXF4.setw(thebits : TBits_32); inline;
  67290. begin
  67291. pTDefRegMap(@Self)^.val := thebits;
  67292. end;
  67293. function TCAN1_C1RXF4.getw : TBits_32; inline;
  67294. begin
  67295. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67296. end;
  67297. procedure TCAN1_C1RXF5.setEID(thebits : TBits_18); inline;
  67298. begin
  67299. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67300. end;
  67301. function TCAN1_C1RXF5.getEID : TBits_18; inline;
  67302. begin
  67303. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67304. end;
  67305. procedure TCAN1_C1RXF5.setEXID; inline;
  67306. begin
  67307. pTDefRegMap(@Self)^.&set := $00080000;
  67308. end;
  67309. procedure TCAN1_C1RXF5.clearEXID; inline;
  67310. begin
  67311. pTDefRegMap(@Self)^.clr := $00080000;
  67312. end;
  67313. procedure TCAN1_C1RXF5.setEXID(thebits : TBits_1); inline;
  67314. begin
  67315. if thebits = 0 then
  67316. pTDefRegMap(@Self)^.clr := $00080000
  67317. else
  67318. pTDefRegMap(@Self)^.&set := $00080000;
  67319. end;
  67320. function TCAN1_C1RXF5.getEXID : TBits_1; inline;
  67321. begin
  67322. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67323. end;
  67324. procedure TCAN1_C1RXF5.setSID(thebits : TBits_11); inline;
  67325. begin
  67326. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67327. end;
  67328. function TCAN1_C1RXF5.getSID : TBits_11; inline;
  67329. begin
  67330. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67331. end;
  67332. procedure TCAN1_C1RXF5.setw(thebits : TBits_32); inline;
  67333. begin
  67334. pTDefRegMap(@Self)^.val := thebits;
  67335. end;
  67336. function TCAN1_C1RXF5.getw : TBits_32; inline;
  67337. begin
  67338. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67339. end;
  67340. procedure TCAN1_C1RXF6.setEID(thebits : TBits_18); inline;
  67341. begin
  67342. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67343. end;
  67344. function TCAN1_C1RXF6.getEID : TBits_18; inline;
  67345. begin
  67346. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67347. end;
  67348. procedure TCAN1_C1RXF6.setEXID; inline;
  67349. begin
  67350. pTDefRegMap(@Self)^.&set := $00080000;
  67351. end;
  67352. procedure TCAN1_C1RXF6.clearEXID; inline;
  67353. begin
  67354. pTDefRegMap(@Self)^.clr := $00080000;
  67355. end;
  67356. procedure TCAN1_C1RXF6.setEXID(thebits : TBits_1); inline;
  67357. begin
  67358. if thebits = 0 then
  67359. pTDefRegMap(@Self)^.clr := $00080000
  67360. else
  67361. pTDefRegMap(@Self)^.&set := $00080000;
  67362. end;
  67363. function TCAN1_C1RXF6.getEXID : TBits_1; inline;
  67364. begin
  67365. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67366. end;
  67367. procedure TCAN1_C1RXF6.setSID(thebits : TBits_11); inline;
  67368. begin
  67369. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67370. end;
  67371. function TCAN1_C1RXF6.getSID : TBits_11; inline;
  67372. begin
  67373. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67374. end;
  67375. procedure TCAN1_C1RXF6.setw(thebits : TBits_32); inline;
  67376. begin
  67377. pTDefRegMap(@Self)^.val := thebits;
  67378. end;
  67379. function TCAN1_C1RXF6.getw : TBits_32; inline;
  67380. begin
  67381. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67382. end;
  67383. procedure TCAN1_C1RXF7.setEID(thebits : TBits_18); inline;
  67384. begin
  67385. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67386. end;
  67387. function TCAN1_C1RXF7.getEID : TBits_18; inline;
  67388. begin
  67389. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67390. end;
  67391. procedure TCAN1_C1RXF7.setEXID; inline;
  67392. begin
  67393. pTDefRegMap(@Self)^.&set := $00080000;
  67394. end;
  67395. procedure TCAN1_C1RXF7.clearEXID; inline;
  67396. begin
  67397. pTDefRegMap(@Self)^.clr := $00080000;
  67398. end;
  67399. procedure TCAN1_C1RXF7.setEXID(thebits : TBits_1); inline;
  67400. begin
  67401. if thebits = 0 then
  67402. pTDefRegMap(@Self)^.clr := $00080000
  67403. else
  67404. pTDefRegMap(@Self)^.&set := $00080000;
  67405. end;
  67406. function TCAN1_C1RXF7.getEXID : TBits_1; inline;
  67407. begin
  67408. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67409. end;
  67410. procedure TCAN1_C1RXF7.setSID(thebits : TBits_11); inline;
  67411. begin
  67412. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67413. end;
  67414. function TCAN1_C1RXF7.getSID : TBits_11; inline;
  67415. begin
  67416. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67417. end;
  67418. procedure TCAN1_C1RXF7.setw(thebits : TBits_32); inline;
  67419. begin
  67420. pTDefRegMap(@Self)^.val := thebits;
  67421. end;
  67422. function TCAN1_C1RXF7.getw : TBits_32; inline;
  67423. begin
  67424. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67425. end;
  67426. procedure TCAN1_C1RXF8.setEID(thebits : TBits_18); inline;
  67427. begin
  67428. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67429. end;
  67430. function TCAN1_C1RXF8.getEID : TBits_18; inline;
  67431. begin
  67432. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67433. end;
  67434. procedure TCAN1_C1RXF8.setEXID; inline;
  67435. begin
  67436. pTDefRegMap(@Self)^.&set := $00080000;
  67437. end;
  67438. procedure TCAN1_C1RXF8.clearEXID; inline;
  67439. begin
  67440. pTDefRegMap(@Self)^.clr := $00080000;
  67441. end;
  67442. procedure TCAN1_C1RXF8.setEXID(thebits : TBits_1); inline;
  67443. begin
  67444. if thebits = 0 then
  67445. pTDefRegMap(@Self)^.clr := $00080000
  67446. else
  67447. pTDefRegMap(@Self)^.&set := $00080000;
  67448. end;
  67449. function TCAN1_C1RXF8.getEXID : TBits_1; inline;
  67450. begin
  67451. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67452. end;
  67453. procedure TCAN1_C1RXF8.setSID(thebits : TBits_11); inline;
  67454. begin
  67455. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67456. end;
  67457. function TCAN1_C1RXF8.getSID : TBits_11; inline;
  67458. begin
  67459. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67460. end;
  67461. procedure TCAN1_C1RXF8.setw(thebits : TBits_32); inline;
  67462. begin
  67463. pTDefRegMap(@Self)^.val := thebits;
  67464. end;
  67465. function TCAN1_C1RXF8.getw : TBits_32; inline;
  67466. begin
  67467. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67468. end;
  67469. procedure TCAN1_C1RXF9.setEID(thebits : TBits_18); inline;
  67470. begin
  67471. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67472. end;
  67473. function TCAN1_C1RXF9.getEID : TBits_18; inline;
  67474. begin
  67475. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67476. end;
  67477. procedure TCAN1_C1RXF9.setEXID; inline;
  67478. begin
  67479. pTDefRegMap(@Self)^.&set := $00080000;
  67480. end;
  67481. procedure TCAN1_C1RXF9.clearEXID; inline;
  67482. begin
  67483. pTDefRegMap(@Self)^.clr := $00080000;
  67484. end;
  67485. procedure TCAN1_C1RXF9.setEXID(thebits : TBits_1); inline;
  67486. begin
  67487. if thebits = 0 then
  67488. pTDefRegMap(@Self)^.clr := $00080000
  67489. else
  67490. pTDefRegMap(@Self)^.&set := $00080000;
  67491. end;
  67492. function TCAN1_C1RXF9.getEXID : TBits_1; inline;
  67493. begin
  67494. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67495. end;
  67496. procedure TCAN1_C1RXF9.setSID(thebits : TBits_11); inline;
  67497. begin
  67498. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67499. end;
  67500. function TCAN1_C1RXF9.getSID : TBits_11; inline;
  67501. begin
  67502. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67503. end;
  67504. procedure TCAN1_C1RXF9.setw(thebits : TBits_32); inline;
  67505. begin
  67506. pTDefRegMap(@Self)^.val := thebits;
  67507. end;
  67508. function TCAN1_C1RXF9.getw : TBits_32; inline;
  67509. begin
  67510. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67511. end;
  67512. procedure TCAN1_C1RXF10.setEID(thebits : TBits_18); inline;
  67513. begin
  67514. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67515. end;
  67516. function TCAN1_C1RXF10.getEID : TBits_18; inline;
  67517. begin
  67518. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67519. end;
  67520. procedure TCAN1_C1RXF10.setEXID; inline;
  67521. begin
  67522. pTDefRegMap(@Self)^.&set := $00080000;
  67523. end;
  67524. procedure TCAN1_C1RXF10.clearEXID; inline;
  67525. begin
  67526. pTDefRegMap(@Self)^.clr := $00080000;
  67527. end;
  67528. procedure TCAN1_C1RXF10.setEXID(thebits : TBits_1); inline;
  67529. begin
  67530. if thebits = 0 then
  67531. pTDefRegMap(@Self)^.clr := $00080000
  67532. else
  67533. pTDefRegMap(@Self)^.&set := $00080000;
  67534. end;
  67535. function TCAN1_C1RXF10.getEXID : TBits_1; inline;
  67536. begin
  67537. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67538. end;
  67539. procedure TCAN1_C1RXF10.setSID(thebits : TBits_11); inline;
  67540. begin
  67541. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67542. end;
  67543. function TCAN1_C1RXF10.getSID : TBits_11; inline;
  67544. begin
  67545. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67546. end;
  67547. procedure TCAN1_C1RXF10.setw(thebits : TBits_32); inline;
  67548. begin
  67549. pTDefRegMap(@Self)^.val := thebits;
  67550. end;
  67551. function TCAN1_C1RXF10.getw : TBits_32; inline;
  67552. begin
  67553. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67554. end;
  67555. procedure TCAN1_C1RXF11.setEID(thebits : TBits_18); inline;
  67556. begin
  67557. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67558. end;
  67559. function TCAN1_C1RXF11.getEID : TBits_18; inline;
  67560. begin
  67561. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67562. end;
  67563. procedure TCAN1_C1RXF11.setEXID; inline;
  67564. begin
  67565. pTDefRegMap(@Self)^.&set := $00080000;
  67566. end;
  67567. procedure TCAN1_C1RXF11.clearEXID; inline;
  67568. begin
  67569. pTDefRegMap(@Self)^.clr := $00080000;
  67570. end;
  67571. procedure TCAN1_C1RXF11.setEXID(thebits : TBits_1); inline;
  67572. begin
  67573. if thebits = 0 then
  67574. pTDefRegMap(@Self)^.clr := $00080000
  67575. else
  67576. pTDefRegMap(@Self)^.&set := $00080000;
  67577. end;
  67578. function TCAN1_C1RXF11.getEXID : TBits_1; inline;
  67579. begin
  67580. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67581. end;
  67582. procedure TCAN1_C1RXF11.setSID(thebits : TBits_11); inline;
  67583. begin
  67584. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67585. end;
  67586. function TCAN1_C1RXF11.getSID : TBits_11; inline;
  67587. begin
  67588. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67589. end;
  67590. procedure TCAN1_C1RXF11.setw(thebits : TBits_32); inline;
  67591. begin
  67592. pTDefRegMap(@Self)^.val := thebits;
  67593. end;
  67594. function TCAN1_C1RXF11.getw : TBits_32; inline;
  67595. begin
  67596. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67597. end;
  67598. procedure TCAN1_C1RXF12.setEID(thebits : TBits_18); inline;
  67599. begin
  67600. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67601. end;
  67602. function TCAN1_C1RXF12.getEID : TBits_18; inline;
  67603. begin
  67604. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67605. end;
  67606. procedure TCAN1_C1RXF12.setEXID; inline;
  67607. begin
  67608. pTDefRegMap(@Self)^.&set := $00080000;
  67609. end;
  67610. procedure TCAN1_C1RXF12.clearEXID; inline;
  67611. begin
  67612. pTDefRegMap(@Self)^.clr := $00080000;
  67613. end;
  67614. procedure TCAN1_C1RXF12.setEXID(thebits : TBits_1); inline;
  67615. begin
  67616. if thebits = 0 then
  67617. pTDefRegMap(@Self)^.clr := $00080000
  67618. else
  67619. pTDefRegMap(@Self)^.&set := $00080000;
  67620. end;
  67621. function TCAN1_C1RXF12.getEXID : TBits_1; inline;
  67622. begin
  67623. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67624. end;
  67625. procedure TCAN1_C1RXF12.setSID(thebits : TBits_11); inline;
  67626. begin
  67627. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67628. end;
  67629. function TCAN1_C1RXF12.getSID : TBits_11; inline;
  67630. begin
  67631. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67632. end;
  67633. procedure TCAN1_C1RXF12.setw(thebits : TBits_32); inline;
  67634. begin
  67635. pTDefRegMap(@Self)^.val := thebits;
  67636. end;
  67637. function TCAN1_C1RXF12.getw : TBits_32; inline;
  67638. begin
  67639. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67640. end;
  67641. procedure TCAN1_C1RXF13.setEID(thebits : TBits_18); inline;
  67642. begin
  67643. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67644. end;
  67645. function TCAN1_C1RXF13.getEID : TBits_18; inline;
  67646. begin
  67647. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67648. end;
  67649. procedure TCAN1_C1RXF13.setEXID; inline;
  67650. begin
  67651. pTDefRegMap(@Self)^.&set := $00080000;
  67652. end;
  67653. procedure TCAN1_C1RXF13.clearEXID; inline;
  67654. begin
  67655. pTDefRegMap(@Self)^.clr := $00080000;
  67656. end;
  67657. procedure TCAN1_C1RXF13.setEXID(thebits : TBits_1); inline;
  67658. begin
  67659. if thebits = 0 then
  67660. pTDefRegMap(@Self)^.clr := $00080000
  67661. else
  67662. pTDefRegMap(@Self)^.&set := $00080000;
  67663. end;
  67664. function TCAN1_C1RXF13.getEXID : TBits_1; inline;
  67665. begin
  67666. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67667. end;
  67668. procedure TCAN1_C1RXF13.setSID(thebits : TBits_11); inline;
  67669. begin
  67670. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67671. end;
  67672. function TCAN1_C1RXF13.getSID : TBits_11; inline;
  67673. begin
  67674. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67675. end;
  67676. procedure TCAN1_C1RXF13.setw(thebits : TBits_32); inline;
  67677. begin
  67678. pTDefRegMap(@Self)^.val := thebits;
  67679. end;
  67680. function TCAN1_C1RXF13.getw : TBits_32; inline;
  67681. begin
  67682. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67683. end;
  67684. procedure TCAN1_C1RXF14.setEID(thebits : TBits_18); inline;
  67685. begin
  67686. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67687. end;
  67688. function TCAN1_C1RXF14.getEID : TBits_18; inline;
  67689. begin
  67690. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67691. end;
  67692. procedure TCAN1_C1RXF14.setEXID; inline;
  67693. begin
  67694. pTDefRegMap(@Self)^.&set := $00080000;
  67695. end;
  67696. procedure TCAN1_C1RXF14.clearEXID; inline;
  67697. begin
  67698. pTDefRegMap(@Self)^.clr := $00080000;
  67699. end;
  67700. procedure TCAN1_C1RXF14.setEXID(thebits : TBits_1); inline;
  67701. begin
  67702. if thebits = 0 then
  67703. pTDefRegMap(@Self)^.clr := $00080000
  67704. else
  67705. pTDefRegMap(@Self)^.&set := $00080000;
  67706. end;
  67707. function TCAN1_C1RXF14.getEXID : TBits_1; inline;
  67708. begin
  67709. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67710. end;
  67711. procedure TCAN1_C1RXF14.setSID(thebits : TBits_11); inline;
  67712. begin
  67713. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67714. end;
  67715. function TCAN1_C1RXF14.getSID : TBits_11; inline;
  67716. begin
  67717. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67718. end;
  67719. procedure TCAN1_C1RXF14.setw(thebits : TBits_32); inline;
  67720. begin
  67721. pTDefRegMap(@Self)^.val := thebits;
  67722. end;
  67723. function TCAN1_C1RXF14.getw : TBits_32; inline;
  67724. begin
  67725. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67726. end;
  67727. procedure TCAN1_C1RXF15.setEID(thebits : TBits_18); inline;
  67728. begin
  67729. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67730. end;
  67731. function TCAN1_C1RXF15.getEID : TBits_18; inline;
  67732. begin
  67733. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67734. end;
  67735. procedure TCAN1_C1RXF15.setEXID; inline;
  67736. begin
  67737. pTDefRegMap(@Self)^.&set := $00080000;
  67738. end;
  67739. procedure TCAN1_C1RXF15.clearEXID; inline;
  67740. begin
  67741. pTDefRegMap(@Self)^.clr := $00080000;
  67742. end;
  67743. procedure TCAN1_C1RXF15.setEXID(thebits : TBits_1); inline;
  67744. begin
  67745. if thebits = 0 then
  67746. pTDefRegMap(@Self)^.clr := $00080000
  67747. else
  67748. pTDefRegMap(@Self)^.&set := $00080000;
  67749. end;
  67750. function TCAN1_C1RXF15.getEXID : TBits_1; inline;
  67751. begin
  67752. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67753. end;
  67754. procedure TCAN1_C1RXF15.setSID(thebits : TBits_11); inline;
  67755. begin
  67756. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67757. end;
  67758. function TCAN1_C1RXF15.getSID : TBits_11; inline;
  67759. begin
  67760. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67761. end;
  67762. procedure TCAN1_C1RXF15.setw(thebits : TBits_32); inline;
  67763. begin
  67764. pTDefRegMap(@Self)^.val := thebits;
  67765. end;
  67766. function TCAN1_C1RXF15.getw : TBits_32; inline;
  67767. begin
  67768. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67769. end;
  67770. procedure TCAN1_C1RXF16.setEID(thebits : TBits_18); inline;
  67771. begin
  67772. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67773. end;
  67774. function TCAN1_C1RXF16.getEID : TBits_18; inline;
  67775. begin
  67776. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67777. end;
  67778. procedure TCAN1_C1RXF16.setEXID; inline;
  67779. begin
  67780. pTDefRegMap(@Self)^.&set := $00080000;
  67781. end;
  67782. procedure TCAN1_C1RXF16.clearEXID; inline;
  67783. begin
  67784. pTDefRegMap(@Self)^.clr := $00080000;
  67785. end;
  67786. procedure TCAN1_C1RXF16.setEXID(thebits : TBits_1); inline;
  67787. begin
  67788. if thebits = 0 then
  67789. pTDefRegMap(@Self)^.clr := $00080000
  67790. else
  67791. pTDefRegMap(@Self)^.&set := $00080000;
  67792. end;
  67793. function TCAN1_C1RXF16.getEXID : TBits_1; inline;
  67794. begin
  67795. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67796. end;
  67797. procedure TCAN1_C1RXF16.setSID(thebits : TBits_11); inline;
  67798. begin
  67799. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67800. end;
  67801. function TCAN1_C1RXF16.getSID : TBits_11; inline;
  67802. begin
  67803. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67804. end;
  67805. procedure TCAN1_C1RXF16.setw(thebits : TBits_32); inline;
  67806. begin
  67807. pTDefRegMap(@Self)^.val := thebits;
  67808. end;
  67809. function TCAN1_C1RXF16.getw : TBits_32; inline;
  67810. begin
  67811. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67812. end;
  67813. procedure TCAN1_C1RXF17.setEID(thebits : TBits_18); inline;
  67814. begin
  67815. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67816. end;
  67817. function TCAN1_C1RXF17.getEID : TBits_18; inline;
  67818. begin
  67819. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67820. end;
  67821. procedure TCAN1_C1RXF17.setEXID; inline;
  67822. begin
  67823. pTDefRegMap(@Self)^.&set := $00080000;
  67824. end;
  67825. procedure TCAN1_C1RXF17.clearEXID; inline;
  67826. begin
  67827. pTDefRegMap(@Self)^.clr := $00080000;
  67828. end;
  67829. procedure TCAN1_C1RXF17.setEXID(thebits : TBits_1); inline;
  67830. begin
  67831. if thebits = 0 then
  67832. pTDefRegMap(@Self)^.clr := $00080000
  67833. else
  67834. pTDefRegMap(@Self)^.&set := $00080000;
  67835. end;
  67836. function TCAN1_C1RXF17.getEXID : TBits_1; inline;
  67837. begin
  67838. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67839. end;
  67840. procedure TCAN1_C1RXF17.setSID(thebits : TBits_11); inline;
  67841. begin
  67842. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67843. end;
  67844. function TCAN1_C1RXF17.getSID : TBits_11; inline;
  67845. begin
  67846. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67847. end;
  67848. procedure TCAN1_C1RXF17.setw(thebits : TBits_32); inline;
  67849. begin
  67850. pTDefRegMap(@Self)^.val := thebits;
  67851. end;
  67852. function TCAN1_C1RXF17.getw : TBits_32; inline;
  67853. begin
  67854. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67855. end;
  67856. procedure TCAN1_C1RXF18.setEID(thebits : TBits_18); inline;
  67857. begin
  67858. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67859. end;
  67860. function TCAN1_C1RXF18.getEID : TBits_18; inline;
  67861. begin
  67862. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67863. end;
  67864. procedure TCAN1_C1RXF18.setEXID; inline;
  67865. begin
  67866. pTDefRegMap(@Self)^.&set := $00080000;
  67867. end;
  67868. procedure TCAN1_C1RXF18.clearEXID; inline;
  67869. begin
  67870. pTDefRegMap(@Self)^.clr := $00080000;
  67871. end;
  67872. procedure TCAN1_C1RXF18.setEXID(thebits : TBits_1); inline;
  67873. begin
  67874. if thebits = 0 then
  67875. pTDefRegMap(@Self)^.clr := $00080000
  67876. else
  67877. pTDefRegMap(@Self)^.&set := $00080000;
  67878. end;
  67879. function TCAN1_C1RXF18.getEXID : TBits_1; inline;
  67880. begin
  67881. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67882. end;
  67883. procedure TCAN1_C1RXF18.setSID(thebits : TBits_11); inline;
  67884. begin
  67885. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67886. end;
  67887. function TCAN1_C1RXF18.getSID : TBits_11; inline;
  67888. begin
  67889. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67890. end;
  67891. procedure TCAN1_C1RXF18.setw(thebits : TBits_32); inline;
  67892. begin
  67893. pTDefRegMap(@Self)^.val := thebits;
  67894. end;
  67895. function TCAN1_C1RXF18.getw : TBits_32; inline;
  67896. begin
  67897. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67898. end;
  67899. procedure TCAN1_C1RXF19.setEID(thebits : TBits_18); inline;
  67900. begin
  67901. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67902. end;
  67903. function TCAN1_C1RXF19.getEID : TBits_18; inline;
  67904. begin
  67905. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67906. end;
  67907. procedure TCAN1_C1RXF19.setEXID; inline;
  67908. begin
  67909. pTDefRegMap(@Self)^.&set := $00080000;
  67910. end;
  67911. procedure TCAN1_C1RXF19.clearEXID; inline;
  67912. begin
  67913. pTDefRegMap(@Self)^.clr := $00080000;
  67914. end;
  67915. procedure TCAN1_C1RXF19.setEXID(thebits : TBits_1); inline;
  67916. begin
  67917. if thebits = 0 then
  67918. pTDefRegMap(@Self)^.clr := $00080000
  67919. else
  67920. pTDefRegMap(@Self)^.&set := $00080000;
  67921. end;
  67922. function TCAN1_C1RXF19.getEXID : TBits_1; inline;
  67923. begin
  67924. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67925. end;
  67926. procedure TCAN1_C1RXF19.setSID(thebits : TBits_11); inline;
  67927. begin
  67928. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67929. end;
  67930. function TCAN1_C1RXF19.getSID : TBits_11; inline;
  67931. begin
  67932. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67933. end;
  67934. procedure TCAN1_C1RXF19.setw(thebits : TBits_32); inline;
  67935. begin
  67936. pTDefRegMap(@Self)^.val := thebits;
  67937. end;
  67938. function TCAN1_C1RXF19.getw : TBits_32; inline;
  67939. begin
  67940. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67941. end;
  67942. procedure TCAN1_C1RXF20.setEID(thebits : TBits_18); inline;
  67943. begin
  67944. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67945. end;
  67946. function TCAN1_C1RXF20.getEID : TBits_18; inline;
  67947. begin
  67948. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67949. end;
  67950. procedure TCAN1_C1RXF20.setEXID; inline;
  67951. begin
  67952. pTDefRegMap(@Self)^.&set := $00080000;
  67953. end;
  67954. procedure TCAN1_C1RXF20.clearEXID; inline;
  67955. begin
  67956. pTDefRegMap(@Self)^.clr := $00080000;
  67957. end;
  67958. procedure TCAN1_C1RXF20.setEXID(thebits : TBits_1); inline;
  67959. begin
  67960. if thebits = 0 then
  67961. pTDefRegMap(@Self)^.clr := $00080000
  67962. else
  67963. pTDefRegMap(@Self)^.&set := $00080000;
  67964. end;
  67965. function TCAN1_C1RXF20.getEXID : TBits_1; inline;
  67966. begin
  67967. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67968. end;
  67969. procedure TCAN1_C1RXF20.setSID(thebits : TBits_11); inline;
  67970. begin
  67971. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  67972. end;
  67973. function TCAN1_C1RXF20.getSID : TBits_11; inline;
  67974. begin
  67975. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  67976. end;
  67977. procedure TCAN1_C1RXF20.setw(thebits : TBits_32); inline;
  67978. begin
  67979. pTDefRegMap(@Self)^.val := thebits;
  67980. end;
  67981. function TCAN1_C1RXF20.getw : TBits_32; inline;
  67982. begin
  67983. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67984. end;
  67985. procedure TCAN1_C1RXF21.setEID(thebits : TBits_18); inline;
  67986. begin
  67987. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  67988. end;
  67989. function TCAN1_C1RXF21.getEID : TBits_18; inline;
  67990. begin
  67991. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  67992. end;
  67993. procedure TCAN1_C1RXF21.setEXID; inline;
  67994. begin
  67995. pTDefRegMap(@Self)^.&set := $00080000;
  67996. end;
  67997. procedure TCAN1_C1RXF21.clearEXID; inline;
  67998. begin
  67999. pTDefRegMap(@Self)^.clr := $00080000;
  68000. end;
  68001. procedure TCAN1_C1RXF21.setEXID(thebits : TBits_1); inline;
  68002. begin
  68003. if thebits = 0 then
  68004. pTDefRegMap(@Self)^.clr := $00080000
  68005. else
  68006. pTDefRegMap(@Self)^.&set := $00080000;
  68007. end;
  68008. function TCAN1_C1RXF21.getEXID : TBits_1; inline;
  68009. begin
  68010. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68011. end;
  68012. procedure TCAN1_C1RXF21.setSID(thebits : TBits_11); inline;
  68013. begin
  68014. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68015. end;
  68016. function TCAN1_C1RXF21.getSID : TBits_11; inline;
  68017. begin
  68018. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68019. end;
  68020. procedure TCAN1_C1RXF21.setw(thebits : TBits_32); inline;
  68021. begin
  68022. pTDefRegMap(@Self)^.val := thebits;
  68023. end;
  68024. function TCAN1_C1RXF21.getw : TBits_32; inline;
  68025. begin
  68026. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68027. end;
  68028. procedure TCAN1_C1RXF22.setEID(thebits : TBits_18); inline;
  68029. begin
  68030. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68031. end;
  68032. function TCAN1_C1RXF22.getEID : TBits_18; inline;
  68033. begin
  68034. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68035. end;
  68036. procedure TCAN1_C1RXF22.setEXID; inline;
  68037. begin
  68038. pTDefRegMap(@Self)^.&set := $00080000;
  68039. end;
  68040. procedure TCAN1_C1RXF22.clearEXID; inline;
  68041. begin
  68042. pTDefRegMap(@Self)^.clr := $00080000;
  68043. end;
  68044. procedure TCAN1_C1RXF22.setEXID(thebits : TBits_1); inline;
  68045. begin
  68046. if thebits = 0 then
  68047. pTDefRegMap(@Self)^.clr := $00080000
  68048. else
  68049. pTDefRegMap(@Self)^.&set := $00080000;
  68050. end;
  68051. function TCAN1_C1RXF22.getEXID : TBits_1; inline;
  68052. begin
  68053. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68054. end;
  68055. procedure TCAN1_C1RXF22.setSID(thebits : TBits_11); inline;
  68056. begin
  68057. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68058. end;
  68059. function TCAN1_C1RXF22.getSID : TBits_11; inline;
  68060. begin
  68061. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68062. end;
  68063. procedure TCAN1_C1RXF22.setw(thebits : TBits_32); inline;
  68064. begin
  68065. pTDefRegMap(@Self)^.val := thebits;
  68066. end;
  68067. function TCAN1_C1RXF22.getw : TBits_32; inline;
  68068. begin
  68069. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68070. end;
  68071. procedure TCAN1_C1RXF23.setEID(thebits : TBits_18); inline;
  68072. begin
  68073. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68074. end;
  68075. function TCAN1_C1RXF23.getEID : TBits_18; inline;
  68076. begin
  68077. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68078. end;
  68079. procedure TCAN1_C1RXF23.setEXID; inline;
  68080. begin
  68081. pTDefRegMap(@Self)^.&set := $00080000;
  68082. end;
  68083. procedure TCAN1_C1RXF23.clearEXID; inline;
  68084. begin
  68085. pTDefRegMap(@Self)^.clr := $00080000;
  68086. end;
  68087. procedure TCAN1_C1RXF23.setEXID(thebits : TBits_1); inline;
  68088. begin
  68089. if thebits = 0 then
  68090. pTDefRegMap(@Self)^.clr := $00080000
  68091. else
  68092. pTDefRegMap(@Self)^.&set := $00080000;
  68093. end;
  68094. function TCAN1_C1RXF23.getEXID : TBits_1; inline;
  68095. begin
  68096. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68097. end;
  68098. procedure TCAN1_C1RXF23.setSID(thebits : TBits_11); inline;
  68099. begin
  68100. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68101. end;
  68102. function TCAN1_C1RXF23.getSID : TBits_11; inline;
  68103. begin
  68104. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68105. end;
  68106. procedure TCAN1_C1RXF23.setw(thebits : TBits_32); inline;
  68107. begin
  68108. pTDefRegMap(@Self)^.val := thebits;
  68109. end;
  68110. function TCAN1_C1RXF23.getw : TBits_32; inline;
  68111. begin
  68112. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68113. end;
  68114. procedure TCAN1_C1RXF24.setEID(thebits : TBits_18); inline;
  68115. begin
  68116. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68117. end;
  68118. function TCAN1_C1RXF24.getEID : TBits_18; inline;
  68119. begin
  68120. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68121. end;
  68122. procedure TCAN1_C1RXF24.setEXID; inline;
  68123. begin
  68124. pTDefRegMap(@Self)^.&set := $00080000;
  68125. end;
  68126. procedure TCAN1_C1RXF24.clearEXID; inline;
  68127. begin
  68128. pTDefRegMap(@Self)^.clr := $00080000;
  68129. end;
  68130. procedure TCAN1_C1RXF24.setEXID(thebits : TBits_1); inline;
  68131. begin
  68132. if thebits = 0 then
  68133. pTDefRegMap(@Self)^.clr := $00080000
  68134. else
  68135. pTDefRegMap(@Self)^.&set := $00080000;
  68136. end;
  68137. function TCAN1_C1RXF24.getEXID : TBits_1; inline;
  68138. begin
  68139. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68140. end;
  68141. procedure TCAN1_C1RXF24.setSID(thebits : TBits_11); inline;
  68142. begin
  68143. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68144. end;
  68145. function TCAN1_C1RXF24.getSID : TBits_11; inline;
  68146. begin
  68147. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68148. end;
  68149. procedure TCAN1_C1RXF24.setw(thebits : TBits_32); inline;
  68150. begin
  68151. pTDefRegMap(@Self)^.val := thebits;
  68152. end;
  68153. function TCAN1_C1RXF24.getw : TBits_32; inline;
  68154. begin
  68155. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68156. end;
  68157. procedure TCAN1_C1RXF25.setEID(thebits : TBits_18); inline;
  68158. begin
  68159. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68160. end;
  68161. function TCAN1_C1RXF25.getEID : TBits_18; inline;
  68162. begin
  68163. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68164. end;
  68165. procedure TCAN1_C1RXF25.setEXID; inline;
  68166. begin
  68167. pTDefRegMap(@Self)^.&set := $00080000;
  68168. end;
  68169. procedure TCAN1_C1RXF25.clearEXID; inline;
  68170. begin
  68171. pTDefRegMap(@Self)^.clr := $00080000;
  68172. end;
  68173. procedure TCAN1_C1RXF25.setEXID(thebits : TBits_1); inline;
  68174. begin
  68175. if thebits = 0 then
  68176. pTDefRegMap(@Self)^.clr := $00080000
  68177. else
  68178. pTDefRegMap(@Self)^.&set := $00080000;
  68179. end;
  68180. function TCAN1_C1RXF25.getEXID : TBits_1; inline;
  68181. begin
  68182. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68183. end;
  68184. procedure TCAN1_C1RXF25.setSID(thebits : TBits_11); inline;
  68185. begin
  68186. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68187. end;
  68188. function TCAN1_C1RXF25.getSID : TBits_11; inline;
  68189. begin
  68190. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68191. end;
  68192. procedure TCAN1_C1RXF25.setw(thebits : TBits_32); inline;
  68193. begin
  68194. pTDefRegMap(@Self)^.val := thebits;
  68195. end;
  68196. function TCAN1_C1RXF25.getw : TBits_32; inline;
  68197. begin
  68198. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68199. end;
  68200. procedure TCAN1_C1RXF26.setEID(thebits : TBits_18); inline;
  68201. begin
  68202. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68203. end;
  68204. function TCAN1_C1RXF26.getEID : TBits_18; inline;
  68205. begin
  68206. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68207. end;
  68208. procedure TCAN1_C1RXF26.setEXID; inline;
  68209. begin
  68210. pTDefRegMap(@Self)^.&set := $00080000;
  68211. end;
  68212. procedure TCAN1_C1RXF26.clearEXID; inline;
  68213. begin
  68214. pTDefRegMap(@Self)^.clr := $00080000;
  68215. end;
  68216. procedure TCAN1_C1RXF26.setEXID(thebits : TBits_1); inline;
  68217. begin
  68218. if thebits = 0 then
  68219. pTDefRegMap(@Self)^.clr := $00080000
  68220. else
  68221. pTDefRegMap(@Self)^.&set := $00080000;
  68222. end;
  68223. function TCAN1_C1RXF26.getEXID : TBits_1; inline;
  68224. begin
  68225. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68226. end;
  68227. procedure TCAN1_C1RXF26.setSID(thebits : TBits_11); inline;
  68228. begin
  68229. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68230. end;
  68231. function TCAN1_C1RXF26.getSID : TBits_11; inline;
  68232. begin
  68233. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68234. end;
  68235. procedure TCAN1_C1RXF26.setw(thebits : TBits_32); inline;
  68236. begin
  68237. pTDefRegMap(@Self)^.val := thebits;
  68238. end;
  68239. function TCAN1_C1RXF26.getw : TBits_32; inline;
  68240. begin
  68241. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68242. end;
  68243. procedure TCAN1_C1RXF27.setEID(thebits : TBits_18); inline;
  68244. begin
  68245. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68246. end;
  68247. function TCAN1_C1RXF27.getEID : TBits_18; inline;
  68248. begin
  68249. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68250. end;
  68251. procedure TCAN1_C1RXF27.setEXID; inline;
  68252. begin
  68253. pTDefRegMap(@Self)^.&set := $00080000;
  68254. end;
  68255. procedure TCAN1_C1RXF27.clearEXID; inline;
  68256. begin
  68257. pTDefRegMap(@Self)^.clr := $00080000;
  68258. end;
  68259. procedure TCAN1_C1RXF27.setEXID(thebits : TBits_1); inline;
  68260. begin
  68261. if thebits = 0 then
  68262. pTDefRegMap(@Self)^.clr := $00080000
  68263. else
  68264. pTDefRegMap(@Self)^.&set := $00080000;
  68265. end;
  68266. function TCAN1_C1RXF27.getEXID : TBits_1; inline;
  68267. begin
  68268. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68269. end;
  68270. procedure TCAN1_C1RXF27.setSID(thebits : TBits_11); inline;
  68271. begin
  68272. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68273. end;
  68274. function TCAN1_C1RXF27.getSID : TBits_11; inline;
  68275. begin
  68276. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68277. end;
  68278. procedure TCAN1_C1RXF27.setw(thebits : TBits_32); inline;
  68279. begin
  68280. pTDefRegMap(@Self)^.val := thebits;
  68281. end;
  68282. function TCAN1_C1RXF27.getw : TBits_32; inline;
  68283. begin
  68284. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68285. end;
  68286. procedure TCAN1_C1RXF28.setEID(thebits : TBits_18); inline;
  68287. begin
  68288. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68289. end;
  68290. function TCAN1_C1RXF28.getEID : TBits_18; inline;
  68291. begin
  68292. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68293. end;
  68294. procedure TCAN1_C1RXF28.setEXID; inline;
  68295. begin
  68296. pTDefRegMap(@Self)^.&set := $00080000;
  68297. end;
  68298. procedure TCAN1_C1RXF28.clearEXID; inline;
  68299. begin
  68300. pTDefRegMap(@Self)^.clr := $00080000;
  68301. end;
  68302. procedure TCAN1_C1RXF28.setEXID(thebits : TBits_1); inline;
  68303. begin
  68304. if thebits = 0 then
  68305. pTDefRegMap(@Self)^.clr := $00080000
  68306. else
  68307. pTDefRegMap(@Self)^.&set := $00080000;
  68308. end;
  68309. function TCAN1_C1RXF28.getEXID : TBits_1; inline;
  68310. begin
  68311. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68312. end;
  68313. procedure TCAN1_C1RXF28.setSID(thebits : TBits_11); inline;
  68314. begin
  68315. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68316. end;
  68317. function TCAN1_C1RXF28.getSID : TBits_11; inline;
  68318. begin
  68319. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68320. end;
  68321. procedure TCAN1_C1RXF28.setw(thebits : TBits_32); inline;
  68322. begin
  68323. pTDefRegMap(@Self)^.val := thebits;
  68324. end;
  68325. function TCAN1_C1RXF28.getw : TBits_32; inline;
  68326. begin
  68327. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68328. end;
  68329. procedure TCAN1_C1RXF29.setEID(thebits : TBits_18); inline;
  68330. begin
  68331. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68332. end;
  68333. function TCAN1_C1RXF29.getEID : TBits_18; inline;
  68334. begin
  68335. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68336. end;
  68337. procedure TCAN1_C1RXF29.setEXID; inline;
  68338. begin
  68339. pTDefRegMap(@Self)^.&set := $00080000;
  68340. end;
  68341. procedure TCAN1_C1RXF29.clearEXID; inline;
  68342. begin
  68343. pTDefRegMap(@Self)^.clr := $00080000;
  68344. end;
  68345. procedure TCAN1_C1RXF29.setEXID(thebits : TBits_1); inline;
  68346. begin
  68347. if thebits = 0 then
  68348. pTDefRegMap(@Self)^.clr := $00080000
  68349. else
  68350. pTDefRegMap(@Self)^.&set := $00080000;
  68351. end;
  68352. function TCAN1_C1RXF29.getEXID : TBits_1; inline;
  68353. begin
  68354. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68355. end;
  68356. procedure TCAN1_C1RXF29.setSID(thebits : TBits_11); inline;
  68357. begin
  68358. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68359. end;
  68360. function TCAN1_C1RXF29.getSID : TBits_11; inline;
  68361. begin
  68362. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68363. end;
  68364. procedure TCAN1_C1RXF29.setw(thebits : TBits_32); inline;
  68365. begin
  68366. pTDefRegMap(@Self)^.val := thebits;
  68367. end;
  68368. function TCAN1_C1RXF29.getw : TBits_32; inline;
  68369. begin
  68370. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68371. end;
  68372. procedure TCAN1_C1RXF30.setEID(thebits : TBits_18); inline;
  68373. begin
  68374. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68375. end;
  68376. function TCAN1_C1RXF30.getEID : TBits_18; inline;
  68377. begin
  68378. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68379. end;
  68380. procedure TCAN1_C1RXF30.setEXID; inline;
  68381. begin
  68382. pTDefRegMap(@Self)^.&set := $00080000;
  68383. end;
  68384. procedure TCAN1_C1RXF30.clearEXID; inline;
  68385. begin
  68386. pTDefRegMap(@Self)^.clr := $00080000;
  68387. end;
  68388. procedure TCAN1_C1RXF30.setEXID(thebits : TBits_1); inline;
  68389. begin
  68390. if thebits = 0 then
  68391. pTDefRegMap(@Self)^.clr := $00080000
  68392. else
  68393. pTDefRegMap(@Self)^.&set := $00080000;
  68394. end;
  68395. function TCAN1_C1RXF30.getEXID : TBits_1; inline;
  68396. begin
  68397. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68398. end;
  68399. procedure TCAN1_C1RXF30.setSID(thebits : TBits_11); inline;
  68400. begin
  68401. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68402. end;
  68403. function TCAN1_C1RXF30.getSID : TBits_11; inline;
  68404. begin
  68405. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68406. end;
  68407. procedure TCAN1_C1RXF30.setw(thebits : TBits_32); inline;
  68408. begin
  68409. pTDefRegMap(@Self)^.val := thebits;
  68410. end;
  68411. function TCAN1_C1RXF30.getw : TBits_32; inline;
  68412. begin
  68413. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68414. end;
  68415. procedure TCAN1_C1RXF31.setEID(thebits : TBits_18); inline;
  68416. begin
  68417. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  68418. end;
  68419. function TCAN1_C1RXF31.getEID : TBits_18; inline;
  68420. begin
  68421. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  68422. end;
  68423. procedure TCAN1_C1RXF31.setEXID; inline;
  68424. begin
  68425. pTDefRegMap(@Self)^.&set := $00080000;
  68426. end;
  68427. procedure TCAN1_C1RXF31.clearEXID; inline;
  68428. begin
  68429. pTDefRegMap(@Self)^.clr := $00080000;
  68430. end;
  68431. procedure TCAN1_C1RXF31.setEXID(thebits : TBits_1); inline;
  68432. begin
  68433. if thebits = 0 then
  68434. pTDefRegMap(@Self)^.clr := $00080000
  68435. else
  68436. pTDefRegMap(@Self)^.&set := $00080000;
  68437. end;
  68438. function TCAN1_C1RXF31.getEXID : TBits_1; inline;
  68439. begin
  68440. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68441. end;
  68442. procedure TCAN1_C1RXF31.setSID(thebits : TBits_11); inline;
  68443. begin
  68444. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  68445. end;
  68446. function TCAN1_C1RXF31.getSID : TBits_11; inline;
  68447. begin
  68448. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  68449. end;
  68450. procedure TCAN1_C1RXF31.setw(thebits : TBits_32); inline;
  68451. begin
  68452. pTDefRegMap(@Self)^.val := thebits;
  68453. end;
  68454. function TCAN1_C1RXF31.getw : TBits_32; inline;
  68455. begin
  68456. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68457. end;
  68458. procedure TCAN1_C1FIFOCON0.setTXPRI(thebits : TBits_2); inline;
  68459. begin
  68460. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  68461. end;
  68462. function TCAN1_C1FIFOCON0.getTXPRI : TBits_2; inline;
  68463. begin
  68464. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  68465. end;
  68466. procedure TCAN1_C1FIFOCON0.setRTREN; inline;
  68467. begin
  68468. pTDefRegMap(@Self)^.&set := $00000004;
  68469. end;
  68470. procedure TCAN1_C1FIFOCON0.clearRTREN; inline;
  68471. begin
  68472. pTDefRegMap(@Self)^.clr := $00000004;
  68473. end;
  68474. procedure TCAN1_C1FIFOCON0.setRTREN(thebits : TBits_1); inline;
  68475. begin
  68476. if thebits = 0 then
  68477. pTDefRegMap(@Self)^.clr := $00000004
  68478. else
  68479. pTDefRegMap(@Self)^.&set := $00000004;
  68480. end;
  68481. function TCAN1_C1FIFOCON0.getRTREN : TBits_1; inline;
  68482. begin
  68483. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68484. end;
  68485. procedure TCAN1_C1FIFOCON0.setTXREQ; inline;
  68486. begin
  68487. pTDefRegMap(@Self)^.&set := $00000008;
  68488. end;
  68489. procedure TCAN1_C1FIFOCON0.clearTXREQ; inline;
  68490. begin
  68491. pTDefRegMap(@Self)^.clr := $00000008;
  68492. end;
  68493. procedure TCAN1_C1FIFOCON0.setTXREQ(thebits : TBits_1); inline;
  68494. begin
  68495. if thebits = 0 then
  68496. pTDefRegMap(@Self)^.clr := $00000008
  68497. else
  68498. pTDefRegMap(@Self)^.&set := $00000008;
  68499. end;
  68500. function TCAN1_C1FIFOCON0.getTXREQ : TBits_1; inline;
  68501. begin
  68502. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68503. end;
  68504. procedure TCAN1_C1FIFOCON0.setTXERR; inline;
  68505. begin
  68506. pTDefRegMap(@Self)^.&set := $00000010;
  68507. end;
  68508. procedure TCAN1_C1FIFOCON0.clearTXERR; inline;
  68509. begin
  68510. pTDefRegMap(@Self)^.clr := $00000010;
  68511. end;
  68512. procedure TCAN1_C1FIFOCON0.setTXERR(thebits : TBits_1); inline;
  68513. begin
  68514. if thebits = 0 then
  68515. pTDefRegMap(@Self)^.clr := $00000010
  68516. else
  68517. pTDefRegMap(@Self)^.&set := $00000010;
  68518. end;
  68519. function TCAN1_C1FIFOCON0.getTXERR : TBits_1; inline;
  68520. begin
  68521. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  68522. end;
  68523. procedure TCAN1_C1FIFOCON0.setTXLARB; inline;
  68524. begin
  68525. pTDefRegMap(@Self)^.&set := $00000020;
  68526. end;
  68527. procedure TCAN1_C1FIFOCON0.clearTXLARB; inline;
  68528. begin
  68529. pTDefRegMap(@Self)^.clr := $00000020;
  68530. end;
  68531. procedure TCAN1_C1FIFOCON0.setTXLARB(thebits : TBits_1); inline;
  68532. begin
  68533. if thebits = 0 then
  68534. pTDefRegMap(@Self)^.clr := $00000020
  68535. else
  68536. pTDefRegMap(@Self)^.&set := $00000020;
  68537. end;
  68538. function TCAN1_C1FIFOCON0.getTXLARB : TBits_1; inline;
  68539. begin
  68540. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  68541. end;
  68542. procedure TCAN1_C1FIFOCON0.setTXABAT; inline;
  68543. begin
  68544. pTDefRegMap(@Self)^.&set := $00000040;
  68545. end;
  68546. procedure TCAN1_C1FIFOCON0.clearTXABAT; inline;
  68547. begin
  68548. pTDefRegMap(@Self)^.clr := $00000040;
  68549. end;
  68550. procedure TCAN1_C1FIFOCON0.setTXABAT(thebits : TBits_1); inline;
  68551. begin
  68552. if thebits = 0 then
  68553. pTDefRegMap(@Self)^.clr := $00000040
  68554. else
  68555. pTDefRegMap(@Self)^.&set := $00000040;
  68556. end;
  68557. function TCAN1_C1FIFOCON0.getTXABAT : TBits_1; inline;
  68558. begin
  68559. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  68560. end;
  68561. procedure TCAN1_C1FIFOCON0.setTXEN; inline;
  68562. begin
  68563. pTDefRegMap(@Self)^.&set := $00000080;
  68564. end;
  68565. procedure TCAN1_C1FIFOCON0.clearTXEN; inline;
  68566. begin
  68567. pTDefRegMap(@Self)^.clr := $00000080;
  68568. end;
  68569. procedure TCAN1_C1FIFOCON0.setTXEN(thebits : TBits_1); inline;
  68570. begin
  68571. if thebits = 0 then
  68572. pTDefRegMap(@Self)^.clr := $00000080
  68573. else
  68574. pTDefRegMap(@Self)^.&set := $00000080;
  68575. end;
  68576. function TCAN1_C1FIFOCON0.getTXEN : TBits_1; inline;
  68577. begin
  68578. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  68579. end;
  68580. procedure TCAN1_C1FIFOCON0.setDONLY; inline;
  68581. begin
  68582. pTDefRegMap(@Self)^.&set := $00001000;
  68583. end;
  68584. procedure TCAN1_C1FIFOCON0.clearDONLY; inline;
  68585. begin
  68586. pTDefRegMap(@Self)^.clr := $00001000;
  68587. end;
  68588. procedure TCAN1_C1FIFOCON0.setDONLY(thebits : TBits_1); inline;
  68589. begin
  68590. if thebits = 0 then
  68591. pTDefRegMap(@Self)^.clr := $00001000
  68592. else
  68593. pTDefRegMap(@Self)^.&set := $00001000;
  68594. end;
  68595. function TCAN1_C1FIFOCON0.getDONLY : TBits_1; inline;
  68596. begin
  68597. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  68598. end;
  68599. procedure TCAN1_C1FIFOCON0.setUINC; inline;
  68600. begin
  68601. pTDefRegMap(@Self)^.&set := $00002000;
  68602. end;
  68603. procedure TCAN1_C1FIFOCON0.clearUINC; inline;
  68604. begin
  68605. pTDefRegMap(@Self)^.clr := $00002000;
  68606. end;
  68607. procedure TCAN1_C1FIFOCON0.setUINC(thebits : TBits_1); inline;
  68608. begin
  68609. if thebits = 0 then
  68610. pTDefRegMap(@Self)^.clr := $00002000
  68611. else
  68612. pTDefRegMap(@Self)^.&set := $00002000;
  68613. end;
  68614. function TCAN1_C1FIFOCON0.getUINC : TBits_1; inline;
  68615. begin
  68616. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  68617. end;
  68618. procedure TCAN1_C1FIFOCON0.setFRESET; inline;
  68619. begin
  68620. pTDefRegMap(@Self)^.&set := $00004000;
  68621. end;
  68622. procedure TCAN1_C1FIFOCON0.clearFRESET; inline;
  68623. begin
  68624. pTDefRegMap(@Self)^.clr := $00004000;
  68625. end;
  68626. procedure TCAN1_C1FIFOCON0.setFRESET(thebits : TBits_1); inline;
  68627. begin
  68628. if thebits = 0 then
  68629. pTDefRegMap(@Self)^.clr := $00004000
  68630. else
  68631. pTDefRegMap(@Self)^.&set := $00004000;
  68632. end;
  68633. function TCAN1_C1FIFOCON0.getFRESET : TBits_1; inline;
  68634. begin
  68635. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  68636. end;
  68637. procedure TCAN1_C1FIFOCON0.setFSIZE(thebits : TBits_5); inline;
  68638. begin
  68639. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  68640. end;
  68641. function TCAN1_C1FIFOCON0.getFSIZE : TBits_5; inline;
  68642. begin
  68643. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  68644. end;
  68645. procedure TCAN1_C1FIFOCON0.setw(thebits : TBits_32); inline;
  68646. begin
  68647. pTDefRegMap(@Self)^.val := thebits;
  68648. end;
  68649. function TCAN1_C1FIFOCON0.getw : TBits_32; inline;
  68650. begin
  68651. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68652. end;
  68653. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIF; inline;
  68654. begin
  68655. pTDefRegMap(@Self)^.&set := $00000001;
  68656. end;
  68657. procedure TCAN1_C1FIFOINT0.clearRXNEMPTYIF; inline;
  68658. begin
  68659. pTDefRegMap(@Self)^.clr := $00000001;
  68660. end;
  68661. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIF(thebits : TBits_1); inline;
  68662. begin
  68663. if thebits = 0 then
  68664. pTDefRegMap(@Self)^.clr := $00000001
  68665. else
  68666. pTDefRegMap(@Self)^.&set := $00000001;
  68667. end;
  68668. function TCAN1_C1FIFOINT0.getRXNEMPTYIF : TBits_1; inline;
  68669. begin
  68670. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68671. end;
  68672. procedure TCAN1_C1FIFOINT0.setRXHALFIF; inline;
  68673. begin
  68674. pTDefRegMap(@Self)^.&set := $00000002;
  68675. end;
  68676. procedure TCAN1_C1FIFOINT0.clearRXHALFIF; inline;
  68677. begin
  68678. pTDefRegMap(@Self)^.clr := $00000002;
  68679. end;
  68680. procedure TCAN1_C1FIFOINT0.setRXHALFIF(thebits : TBits_1); inline;
  68681. begin
  68682. if thebits = 0 then
  68683. pTDefRegMap(@Self)^.clr := $00000002
  68684. else
  68685. pTDefRegMap(@Self)^.&set := $00000002;
  68686. end;
  68687. function TCAN1_C1FIFOINT0.getRXHALFIF : TBits_1; inline;
  68688. begin
  68689. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  68690. end;
  68691. procedure TCAN1_C1FIFOINT0.setRXFULLIF; inline;
  68692. begin
  68693. pTDefRegMap(@Self)^.&set := $00000004;
  68694. end;
  68695. procedure TCAN1_C1FIFOINT0.clearRXFULLIF; inline;
  68696. begin
  68697. pTDefRegMap(@Self)^.clr := $00000004;
  68698. end;
  68699. procedure TCAN1_C1FIFOINT0.setRXFULLIF(thebits : TBits_1); inline;
  68700. begin
  68701. if thebits = 0 then
  68702. pTDefRegMap(@Self)^.clr := $00000004
  68703. else
  68704. pTDefRegMap(@Self)^.&set := $00000004;
  68705. end;
  68706. function TCAN1_C1FIFOINT0.getRXFULLIF : TBits_1; inline;
  68707. begin
  68708. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68709. end;
  68710. procedure TCAN1_C1FIFOINT0.setRXOVFLIF; inline;
  68711. begin
  68712. pTDefRegMap(@Self)^.&set := $00000008;
  68713. end;
  68714. procedure TCAN1_C1FIFOINT0.clearRXOVFLIF; inline;
  68715. begin
  68716. pTDefRegMap(@Self)^.clr := $00000008;
  68717. end;
  68718. procedure TCAN1_C1FIFOINT0.setRXOVFLIF(thebits : TBits_1); inline;
  68719. begin
  68720. if thebits = 0 then
  68721. pTDefRegMap(@Self)^.clr := $00000008
  68722. else
  68723. pTDefRegMap(@Self)^.&set := $00000008;
  68724. end;
  68725. function TCAN1_C1FIFOINT0.getRXOVFLIF : TBits_1; inline;
  68726. begin
  68727. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68728. end;
  68729. procedure TCAN1_C1FIFOINT0.setTXEMPTYIF; inline;
  68730. begin
  68731. pTDefRegMap(@Self)^.&set := $00000100;
  68732. end;
  68733. procedure TCAN1_C1FIFOINT0.clearTXEMPTYIF; inline;
  68734. begin
  68735. pTDefRegMap(@Self)^.clr := $00000100;
  68736. end;
  68737. procedure TCAN1_C1FIFOINT0.setTXEMPTYIF(thebits : TBits_1); inline;
  68738. begin
  68739. if thebits = 0 then
  68740. pTDefRegMap(@Self)^.clr := $00000100
  68741. else
  68742. pTDefRegMap(@Self)^.&set := $00000100;
  68743. end;
  68744. function TCAN1_C1FIFOINT0.getTXEMPTYIF : TBits_1; inline;
  68745. begin
  68746. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  68747. end;
  68748. procedure TCAN1_C1FIFOINT0.setTXHALFIF; inline;
  68749. begin
  68750. pTDefRegMap(@Self)^.&set := $00000200;
  68751. end;
  68752. procedure TCAN1_C1FIFOINT0.clearTXHALFIF; inline;
  68753. begin
  68754. pTDefRegMap(@Self)^.clr := $00000200;
  68755. end;
  68756. procedure TCAN1_C1FIFOINT0.setTXHALFIF(thebits : TBits_1); inline;
  68757. begin
  68758. if thebits = 0 then
  68759. pTDefRegMap(@Self)^.clr := $00000200
  68760. else
  68761. pTDefRegMap(@Self)^.&set := $00000200;
  68762. end;
  68763. function TCAN1_C1FIFOINT0.getTXHALFIF : TBits_1; inline;
  68764. begin
  68765. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  68766. end;
  68767. procedure TCAN1_C1FIFOINT0.setTXNFULLIF; inline;
  68768. begin
  68769. pTDefRegMap(@Self)^.&set := $00000400;
  68770. end;
  68771. procedure TCAN1_C1FIFOINT0.clearTXNFULLIF; inline;
  68772. begin
  68773. pTDefRegMap(@Self)^.clr := $00000400;
  68774. end;
  68775. procedure TCAN1_C1FIFOINT0.setTXNFULLIF(thebits : TBits_1); inline;
  68776. begin
  68777. if thebits = 0 then
  68778. pTDefRegMap(@Self)^.clr := $00000400
  68779. else
  68780. pTDefRegMap(@Self)^.&set := $00000400;
  68781. end;
  68782. function TCAN1_C1FIFOINT0.getTXNFULLIF : TBits_1; inline;
  68783. begin
  68784. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  68785. end;
  68786. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIE; inline;
  68787. begin
  68788. pTDefRegMap(@Self)^.&set := $00010000;
  68789. end;
  68790. procedure TCAN1_C1FIFOINT0.clearRXNEMPTYIE; inline;
  68791. begin
  68792. pTDefRegMap(@Self)^.clr := $00010000;
  68793. end;
  68794. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIE(thebits : TBits_1); inline;
  68795. begin
  68796. if thebits = 0 then
  68797. pTDefRegMap(@Self)^.clr := $00010000
  68798. else
  68799. pTDefRegMap(@Self)^.&set := $00010000;
  68800. end;
  68801. function TCAN1_C1FIFOINT0.getRXNEMPTYIE : TBits_1; inline;
  68802. begin
  68803. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  68804. end;
  68805. procedure TCAN1_C1FIFOINT0.setRXHALFIE; inline;
  68806. begin
  68807. pTDefRegMap(@Self)^.&set := $00020000;
  68808. end;
  68809. procedure TCAN1_C1FIFOINT0.clearRXHALFIE; inline;
  68810. begin
  68811. pTDefRegMap(@Self)^.clr := $00020000;
  68812. end;
  68813. procedure TCAN1_C1FIFOINT0.setRXHALFIE(thebits : TBits_1); inline;
  68814. begin
  68815. if thebits = 0 then
  68816. pTDefRegMap(@Self)^.clr := $00020000
  68817. else
  68818. pTDefRegMap(@Self)^.&set := $00020000;
  68819. end;
  68820. function TCAN1_C1FIFOINT0.getRXHALFIE : TBits_1; inline;
  68821. begin
  68822. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  68823. end;
  68824. procedure TCAN1_C1FIFOINT0.setRXFULLIE; inline;
  68825. begin
  68826. pTDefRegMap(@Self)^.&set := $00040000;
  68827. end;
  68828. procedure TCAN1_C1FIFOINT0.clearRXFULLIE; inline;
  68829. begin
  68830. pTDefRegMap(@Self)^.clr := $00040000;
  68831. end;
  68832. procedure TCAN1_C1FIFOINT0.setRXFULLIE(thebits : TBits_1); inline;
  68833. begin
  68834. if thebits = 0 then
  68835. pTDefRegMap(@Self)^.clr := $00040000
  68836. else
  68837. pTDefRegMap(@Self)^.&set := $00040000;
  68838. end;
  68839. function TCAN1_C1FIFOINT0.getRXFULLIE : TBits_1; inline;
  68840. begin
  68841. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  68842. end;
  68843. procedure TCAN1_C1FIFOINT0.setRXOVFLIE; inline;
  68844. begin
  68845. pTDefRegMap(@Self)^.&set := $00080000;
  68846. end;
  68847. procedure TCAN1_C1FIFOINT0.clearRXOVFLIE; inline;
  68848. begin
  68849. pTDefRegMap(@Self)^.clr := $00080000;
  68850. end;
  68851. procedure TCAN1_C1FIFOINT0.setRXOVFLIE(thebits : TBits_1); inline;
  68852. begin
  68853. if thebits = 0 then
  68854. pTDefRegMap(@Self)^.clr := $00080000
  68855. else
  68856. pTDefRegMap(@Self)^.&set := $00080000;
  68857. end;
  68858. function TCAN1_C1FIFOINT0.getRXOVFLIE : TBits_1; inline;
  68859. begin
  68860. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68861. end;
  68862. procedure TCAN1_C1FIFOINT0.setTXEMPTYIE; inline;
  68863. begin
  68864. pTDefRegMap(@Self)^.&set := $01000000;
  68865. end;
  68866. procedure TCAN1_C1FIFOINT0.clearTXEMPTYIE; inline;
  68867. begin
  68868. pTDefRegMap(@Self)^.clr := $01000000;
  68869. end;
  68870. procedure TCAN1_C1FIFOINT0.setTXEMPTYIE(thebits : TBits_1); inline;
  68871. begin
  68872. if thebits = 0 then
  68873. pTDefRegMap(@Self)^.clr := $01000000
  68874. else
  68875. pTDefRegMap(@Self)^.&set := $01000000;
  68876. end;
  68877. function TCAN1_C1FIFOINT0.getTXEMPTYIE : TBits_1; inline;
  68878. begin
  68879. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  68880. end;
  68881. procedure TCAN1_C1FIFOINT0.setTXHALFIE; inline;
  68882. begin
  68883. pTDefRegMap(@Self)^.&set := $02000000;
  68884. end;
  68885. procedure TCAN1_C1FIFOINT0.clearTXHALFIE; inline;
  68886. begin
  68887. pTDefRegMap(@Self)^.clr := $02000000;
  68888. end;
  68889. procedure TCAN1_C1FIFOINT0.setTXHALFIE(thebits : TBits_1); inline;
  68890. begin
  68891. if thebits = 0 then
  68892. pTDefRegMap(@Self)^.clr := $02000000
  68893. else
  68894. pTDefRegMap(@Self)^.&set := $02000000;
  68895. end;
  68896. function TCAN1_C1FIFOINT0.getTXHALFIE : TBits_1; inline;
  68897. begin
  68898. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  68899. end;
  68900. procedure TCAN1_C1FIFOINT0.setTXNFULLIE; inline;
  68901. begin
  68902. pTDefRegMap(@Self)^.&set := $04000000;
  68903. end;
  68904. procedure TCAN1_C1FIFOINT0.clearTXNFULLIE; inline;
  68905. begin
  68906. pTDefRegMap(@Self)^.clr := $04000000;
  68907. end;
  68908. procedure TCAN1_C1FIFOINT0.setTXNFULLIE(thebits : TBits_1); inline;
  68909. begin
  68910. if thebits = 0 then
  68911. pTDefRegMap(@Self)^.clr := $04000000
  68912. else
  68913. pTDefRegMap(@Self)^.&set := $04000000;
  68914. end;
  68915. function TCAN1_C1FIFOINT0.getTXNFULLIE : TBits_1; inline;
  68916. begin
  68917. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  68918. end;
  68919. procedure TCAN1_C1FIFOINT0.setw(thebits : TBits_32); inline;
  68920. begin
  68921. pTDefRegMap(@Self)^.val := thebits;
  68922. end;
  68923. function TCAN1_C1FIFOINT0.getw : TBits_32; inline;
  68924. begin
  68925. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68926. end;
  68927. procedure TCAN1_C1FIFOCI0.setCFIFOCI(thebits : TBits_5); inline;
  68928. begin
  68929. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  68930. end;
  68931. function TCAN1_C1FIFOCI0.getCFIFOCI : TBits_5; inline;
  68932. begin
  68933. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  68934. end;
  68935. procedure TCAN1_C1FIFOCI0.setw(thebits : TBits_32); inline;
  68936. begin
  68937. pTDefRegMap(@Self)^.val := thebits;
  68938. end;
  68939. function TCAN1_C1FIFOCI0.getw : TBits_32; inline;
  68940. begin
  68941. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68942. end;
  68943. procedure TCAN1_C1FIFOCON1.setTXPRI(thebits : TBits_2); inline;
  68944. begin
  68945. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  68946. end;
  68947. function TCAN1_C1FIFOCON1.getTXPRI : TBits_2; inline;
  68948. begin
  68949. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  68950. end;
  68951. procedure TCAN1_C1FIFOCON1.setRTREN; inline;
  68952. begin
  68953. pTDefRegMap(@Self)^.&set := $00000004;
  68954. end;
  68955. procedure TCAN1_C1FIFOCON1.clearRTREN; inline;
  68956. begin
  68957. pTDefRegMap(@Self)^.clr := $00000004;
  68958. end;
  68959. procedure TCAN1_C1FIFOCON1.setRTREN(thebits : TBits_1); inline;
  68960. begin
  68961. if thebits = 0 then
  68962. pTDefRegMap(@Self)^.clr := $00000004
  68963. else
  68964. pTDefRegMap(@Self)^.&set := $00000004;
  68965. end;
  68966. function TCAN1_C1FIFOCON1.getRTREN : TBits_1; inline;
  68967. begin
  68968. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68969. end;
  68970. procedure TCAN1_C1FIFOCON1.setTXREQ; inline;
  68971. begin
  68972. pTDefRegMap(@Self)^.&set := $00000008;
  68973. end;
  68974. procedure TCAN1_C1FIFOCON1.clearTXREQ; inline;
  68975. begin
  68976. pTDefRegMap(@Self)^.clr := $00000008;
  68977. end;
  68978. procedure TCAN1_C1FIFOCON1.setTXREQ(thebits : TBits_1); inline;
  68979. begin
  68980. if thebits = 0 then
  68981. pTDefRegMap(@Self)^.clr := $00000008
  68982. else
  68983. pTDefRegMap(@Self)^.&set := $00000008;
  68984. end;
  68985. function TCAN1_C1FIFOCON1.getTXREQ : TBits_1; inline;
  68986. begin
  68987. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68988. end;
  68989. procedure TCAN1_C1FIFOCON1.setTXERR; inline;
  68990. begin
  68991. pTDefRegMap(@Self)^.&set := $00000010;
  68992. end;
  68993. procedure TCAN1_C1FIFOCON1.clearTXERR; inline;
  68994. begin
  68995. pTDefRegMap(@Self)^.clr := $00000010;
  68996. end;
  68997. procedure TCAN1_C1FIFOCON1.setTXERR(thebits : TBits_1); inline;
  68998. begin
  68999. if thebits = 0 then
  69000. pTDefRegMap(@Self)^.clr := $00000010
  69001. else
  69002. pTDefRegMap(@Self)^.&set := $00000010;
  69003. end;
  69004. function TCAN1_C1FIFOCON1.getTXERR : TBits_1; inline;
  69005. begin
  69006. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69007. end;
  69008. procedure TCAN1_C1FIFOCON1.setTXLARB; inline;
  69009. begin
  69010. pTDefRegMap(@Self)^.&set := $00000020;
  69011. end;
  69012. procedure TCAN1_C1FIFOCON1.clearTXLARB; inline;
  69013. begin
  69014. pTDefRegMap(@Self)^.clr := $00000020;
  69015. end;
  69016. procedure TCAN1_C1FIFOCON1.setTXLARB(thebits : TBits_1); inline;
  69017. begin
  69018. if thebits = 0 then
  69019. pTDefRegMap(@Self)^.clr := $00000020
  69020. else
  69021. pTDefRegMap(@Self)^.&set := $00000020;
  69022. end;
  69023. function TCAN1_C1FIFOCON1.getTXLARB : TBits_1; inline;
  69024. begin
  69025. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69026. end;
  69027. procedure TCAN1_C1FIFOCON1.setTXABAT; inline;
  69028. begin
  69029. pTDefRegMap(@Self)^.&set := $00000040;
  69030. end;
  69031. procedure TCAN1_C1FIFOCON1.clearTXABAT; inline;
  69032. begin
  69033. pTDefRegMap(@Self)^.clr := $00000040;
  69034. end;
  69035. procedure TCAN1_C1FIFOCON1.setTXABAT(thebits : TBits_1); inline;
  69036. begin
  69037. if thebits = 0 then
  69038. pTDefRegMap(@Self)^.clr := $00000040
  69039. else
  69040. pTDefRegMap(@Self)^.&set := $00000040;
  69041. end;
  69042. function TCAN1_C1FIFOCON1.getTXABAT : TBits_1; inline;
  69043. begin
  69044. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69045. end;
  69046. procedure TCAN1_C1FIFOCON1.setTXEN; inline;
  69047. begin
  69048. pTDefRegMap(@Self)^.&set := $00000080;
  69049. end;
  69050. procedure TCAN1_C1FIFOCON1.clearTXEN; inline;
  69051. begin
  69052. pTDefRegMap(@Self)^.clr := $00000080;
  69053. end;
  69054. procedure TCAN1_C1FIFOCON1.setTXEN(thebits : TBits_1); inline;
  69055. begin
  69056. if thebits = 0 then
  69057. pTDefRegMap(@Self)^.clr := $00000080
  69058. else
  69059. pTDefRegMap(@Self)^.&set := $00000080;
  69060. end;
  69061. function TCAN1_C1FIFOCON1.getTXEN : TBits_1; inline;
  69062. begin
  69063. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69064. end;
  69065. procedure TCAN1_C1FIFOCON1.setDONLY; inline;
  69066. begin
  69067. pTDefRegMap(@Self)^.&set := $00001000;
  69068. end;
  69069. procedure TCAN1_C1FIFOCON1.clearDONLY; inline;
  69070. begin
  69071. pTDefRegMap(@Self)^.clr := $00001000;
  69072. end;
  69073. procedure TCAN1_C1FIFOCON1.setDONLY(thebits : TBits_1); inline;
  69074. begin
  69075. if thebits = 0 then
  69076. pTDefRegMap(@Self)^.clr := $00001000
  69077. else
  69078. pTDefRegMap(@Self)^.&set := $00001000;
  69079. end;
  69080. function TCAN1_C1FIFOCON1.getDONLY : TBits_1; inline;
  69081. begin
  69082. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  69083. end;
  69084. procedure TCAN1_C1FIFOCON1.setUINC; inline;
  69085. begin
  69086. pTDefRegMap(@Self)^.&set := $00002000;
  69087. end;
  69088. procedure TCAN1_C1FIFOCON1.clearUINC; inline;
  69089. begin
  69090. pTDefRegMap(@Self)^.clr := $00002000;
  69091. end;
  69092. procedure TCAN1_C1FIFOCON1.setUINC(thebits : TBits_1); inline;
  69093. begin
  69094. if thebits = 0 then
  69095. pTDefRegMap(@Self)^.clr := $00002000
  69096. else
  69097. pTDefRegMap(@Self)^.&set := $00002000;
  69098. end;
  69099. function TCAN1_C1FIFOCON1.getUINC : TBits_1; inline;
  69100. begin
  69101. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  69102. end;
  69103. procedure TCAN1_C1FIFOCON1.setFRESET; inline;
  69104. begin
  69105. pTDefRegMap(@Self)^.&set := $00004000;
  69106. end;
  69107. procedure TCAN1_C1FIFOCON1.clearFRESET; inline;
  69108. begin
  69109. pTDefRegMap(@Self)^.clr := $00004000;
  69110. end;
  69111. procedure TCAN1_C1FIFOCON1.setFRESET(thebits : TBits_1); inline;
  69112. begin
  69113. if thebits = 0 then
  69114. pTDefRegMap(@Self)^.clr := $00004000
  69115. else
  69116. pTDefRegMap(@Self)^.&set := $00004000;
  69117. end;
  69118. function TCAN1_C1FIFOCON1.getFRESET : TBits_1; inline;
  69119. begin
  69120. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  69121. end;
  69122. procedure TCAN1_C1FIFOCON1.setFSIZE(thebits : TBits_5); inline;
  69123. begin
  69124. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  69125. end;
  69126. function TCAN1_C1FIFOCON1.getFSIZE : TBits_5; inline;
  69127. begin
  69128. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  69129. end;
  69130. procedure TCAN1_C1FIFOCON1.setw(thebits : TBits_32); inline;
  69131. begin
  69132. pTDefRegMap(@Self)^.val := thebits;
  69133. end;
  69134. function TCAN1_C1FIFOCON1.getw : TBits_32; inline;
  69135. begin
  69136. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69137. end;
  69138. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIF; inline;
  69139. begin
  69140. pTDefRegMap(@Self)^.&set := $00000001;
  69141. end;
  69142. procedure TCAN1_C1FIFOINT1.clearRXNEMPTYIF; inline;
  69143. begin
  69144. pTDefRegMap(@Self)^.clr := $00000001;
  69145. end;
  69146. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIF(thebits : TBits_1); inline;
  69147. begin
  69148. if thebits = 0 then
  69149. pTDefRegMap(@Self)^.clr := $00000001
  69150. else
  69151. pTDefRegMap(@Self)^.&set := $00000001;
  69152. end;
  69153. function TCAN1_C1FIFOINT1.getRXNEMPTYIF : TBits_1; inline;
  69154. begin
  69155. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69156. end;
  69157. procedure TCAN1_C1FIFOINT1.setRXHALFIF; inline;
  69158. begin
  69159. pTDefRegMap(@Self)^.&set := $00000002;
  69160. end;
  69161. procedure TCAN1_C1FIFOINT1.clearRXHALFIF; inline;
  69162. begin
  69163. pTDefRegMap(@Self)^.clr := $00000002;
  69164. end;
  69165. procedure TCAN1_C1FIFOINT1.setRXHALFIF(thebits : TBits_1); inline;
  69166. begin
  69167. if thebits = 0 then
  69168. pTDefRegMap(@Self)^.clr := $00000002
  69169. else
  69170. pTDefRegMap(@Self)^.&set := $00000002;
  69171. end;
  69172. function TCAN1_C1FIFOINT1.getRXHALFIF : TBits_1; inline;
  69173. begin
  69174. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69175. end;
  69176. procedure TCAN1_C1FIFOINT1.setRXFULLIF; inline;
  69177. begin
  69178. pTDefRegMap(@Self)^.&set := $00000004;
  69179. end;
  69180. procedure TCAN1_C1FIFOINT1.clearRXFULLIF; inline;
  69181. begin
  69182. pTDefRegMap(@Self)^.clr := $00000004;
  69183. end;
  69184. procedure TCAN1_C1FIFOINT1.setRXFULLIF(thebits : TBits_1); inline;
  69185. begin
  69186. if thebits = 0 then
  69187. pTDefRegMap(@Self)^.clr := $00000004
  69188. else
  69189. pTDefRegMap(@Self)^.&set := $00000004;
  69190. end;
  69191. function TCAN1_C1FIFOINT1.getRXFULLIF : TBits_1; inline;
  69192. begin
  69193. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69194. end;
  69195. procedure TCAN1_C1FIFOINT1.setRXOVFLIF; inline;
  69196. begin
  69197. pTDefRegMap(@Self)^.&set := $00000008;
  69198. end;
  69199. procedure TCAN1_C1FIFOINT1.clearRXOVFLIF; inline;
  69200. begin
  69201. pTDefRegMap(@Self)^.clr := $00000008;
  69202. end;
  69203. procedure TCAN1_C1FIFOINT1.setRXOVFLIF(thebits : TBits_1); inline;
  69204. begin
  69205. if thebits = 0 then
  69206. pTDefRegMap(@Self)^.clr := $00000008
  69207. else
  69208. pTDefRegMap(@Self)^.&set := $00000008;
  69209. end;
  69210. function TCAN1_C1FIFOINT1.getRXOVFLIF : TBits_1; inline;
  69211. begin
  69212. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69213. end;
  69214. procedure TCAN1_C1FIFOINT1.setTXEMPTYIF; inline;
  69215. begin
  69216. pTDefRegMap(@Self)^.&set := $00000100;
  69217. end;
  69218. procedure TCAN1_C1FIFOINT1.clearTXEMPTYIF; inline;
  69219. begin
  69220. pTDefRegMap(@Self)^.clr := $00000100;
  69221. end;
  69222. procedure TCAN1_C1FIFOINT1.setTXEMPTYIF(thebits : TBits_1); inline;
  69223. begin
  69224. if thebits = 0 then
  69225. pTDefRegMap(@Self)^.clr := $00000100
  69226. else
  69227. pTDefRegMap(@Self)^.&set := $00000100;
  69228. end;
  69229. function TCAN1_C1FIFOINT1.getTXEMPTYIF : TBits_1; inline;
  69230. begin
  69231. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  69232. end;
  69233. procedure TCAN1_C1FIFOINT1.setTXHALFIF; inline;
  69234. begin
  69235. pTDefRegMap(@Self)^.&set := $00000200;
  69236. end;
  69237. procedure TCAN1_C1FIFOINT1.clearTXHALFIF; inline;
  69238. begin
  69239. pTDefRegMap(@Self)^.clr := $00000200;
  69240. end;
  69241. procedure TCAN1_C1FIFOINT1.setTXHALFIF(thebits : TBits_1); inline;
  69242. begin
  69243. if thebits = 0 then
  69244. pTDefRegMap(@Self)^.clr := $00000200
  69245. else
  69246. pTDefRegMap(@Self)^.&set := $00000200;
  69247. end;
  69248. function TCAN1_C1FIFOINT1.getTXHALFIF : TBits_1; inline;
  69249. begin
  69250. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  69251. end;
  69252. procedure TCAN1_C1FIFOINT1.setTXNFULLIF; inline;
  69253. begin
  69254. pTDefRegMap(@Self)^.&set := $00000400;
  69255. end;
  69256. procedure TCAN1_C1FIFOINT1.clearTXNFULLIF; inline;
  69257. begin
  69258. pTDefRegMap(@Self)^.clr := $00000400;
  69259. end;
  69260. procedure TCAN1_C1FIFOINT1.setTXNFULLIF(thebits : TBits_1); inline;
  69261. begin
  69262. if thebits = 0 then
  69263. pTDefRegMap(@Self)^.clr := $00000400
  69264. else
  69265. pTDefRegMap(@Self)^.&set := $00000400;
  69266. end;
  69267. function TCAN1_C1FIFOINT1.getTXNFULLIF : TBits_1; inline;
  69268. begin
  69269. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  69270. end;
  69271. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIE; inline;
  69272. begin
  69273. pTDefRegMap(@Self)^.&set := $00010000;
  69274. end;
  69275. procedure TCAN1_C1FIFOINT1.clearRXNEMPTYIE; inline;
  69276. begin
  69277. pTDefRegMap(@Self)^.clr := $00010000;
  69278. end;
  69279. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIE(thebits : TBits_1); inline;
  69280. begin
  69281. if thebits = 0 then
  69282. pTDefRegMap(@Self)^.clr := $00010000
  69283. else
  69284. pTDefRegMap(@Self)^.&set := $00010000;
  69285. end;
  69286. function TCAN1_C1FIFOINT1.getRXNEMPTYIE : TBits_1; inline;
  69287. begin
  69288. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  69289. end;
  69290. procedure TCAN1_C1FIFOINT1.setRXHALFIE; inline;
  69291. begin
  69292. pTDefRegMap(@Self)^.&set := $00020000;
  69293. end;
  69294. procedure TCAN1_C1FIFOINT1.clearRXHALFIE; inline;
  69295. begin
  69296. pTDefRegMap(@Self)^.clr := $00020000;
  69297. end;
  69298. procedure TCAN1_C1FIFOINT1.setRXHALFIE(thebits : TBits_1); inline;
  69299. begin
  69300. if thebits = 0 then
  69301. pTDefRegMap(@Self)^.clr := $00020000
  69302. else
  69303. pTDefRegMap(@Self)^.&set := $00020000;
  69304. end;
  69305. function TCAN1_C1FIFOINT1.getRXHALFIE : TBits_1; inline;
  69306. begin
  69307. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  69308. end;
  69309. procedure TCAN1_C1FIFOINT1.setRXFULLIE; inline;
  69310. begin
  69311. pTDefRegMap(@Self)^.&set := $00040000;
  69312. end;
  69313. procedure TCAN1_C1FIFOINT1.clearRXFULLIE; inline;
  69314. begin
  69315. pTDefRegMap(@Self)^.clr := $00040000;
  69316. end;
  69317. procedure TCAN1_C1FIFOINT1.setRXFULLIE(thebits : TBits_1); inline;
  69318. begin
  69319. if thebits = 0 then
  69320. pTDefRegMap(@Self)^.clr := $00040000
  69321. else
  69322. pTDefRegMap(@Self)^.&set := $00040000;
  69323. end;
  69324. function TCAN1_C1FIFOINT1.getRXFULLIE : TBits_1; inline;
  69325. begin
  69326. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  69327. end;
  69328. procedure TCAN1_C1FIFOINT1.setRXOVFLIE; inline;
  69329. begin
  69330. pTDefRegMap(@Self)^.&set := $00080000;
  69331. end;
  69332. procedure TCAN1_C1FIFOINT1.clearRXOVFLIE; inline;
  69333. begin
  69334. pTDefRegMap(@Self)^.clr := $00080000;
  69335. end;
  69336. procedure TCAN1_C1FIFOINT1.setRXOVFLIE(thebits : TBits_1); inline;
  69337. begin
  69338. if thebits = 0 then
  69339. pTDefRegMap(@Self)^.clr := $00080000
  69340. else
  69341. pTDefRegMap(@Self)^.&set := $00080000;
  69342. end;
  69343. function TCAN1_C1FIFOINT1.getRXOVFLIE : TBits_1; inline;
  69344. begin
  69345. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69346. end;
  69347. procedure TCAN1_C1FIFOINT1.setTXEMPTYIE; inline;
  69348. begin
  69349. pTDefRegMap(@Self)^.&set := $01000000;
  69350. end;
  69351. procedure TCAN1_C1FIFOINT1.clearTXEMPTYIE; inline;
  69352. begin
  69353. pTDefRegMap(@Self)^.clr := $01000000;
  69354. end;
  69355. procedure TCAN1_C1FIFOINT1.setTXEMPTYIE(thebits : TBits_1); inline;
  69356. begin
  69357. if thebits = 0 then
  69358. pTDefRegMap(@Self)^.clr := $01000000
  69359. else
  69360. pTDefRegMap(@Self)^.&set := $01000000;
  69361. end;
  69362. function TCAN1_C1FIFOINT1.getTXEMPTYIE : TBits_1; inline;
  69363. begin
  69364. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  69365. end;
  69366. procedure TCAN1_C1FIFOINT1.setTXHALFIE; inline;
  69367. begin
  69368. pTDefRegMap(@Self)^.&set := $02000000;
  69369. end;
  69370. procedure TCAN1_C1FIFOINT1.clearTXHALFIE; inline;
  69371. begin
  69372. pTDefRegMap(@Self)^.clr := $02000000;
  69373. end;
  69374. procedure TCAN1_C1FIFOINT1.setTXHALFIE(thebits : TBits_1); inline;
  69375. begin
  69376. if thebits = 0 then
  69377. pTDefRegMap(@Self)^.clr := $02000000
  69378. else
  69379. pTDefRegMap(@Self)^.&set := $02000000;
  69380. end;
  69381. function TCAN1_C1FIFOINT1.getTXHALFIE : TBits_1; inline;
  69382. begin
  69383. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  69384. end;
  69385. procedure TCAN1_C1FIFOINT1.setTXNFULLIE; inline;
  69386. begin
  69387. pTDefRegMap(@Self)^.&set := $04000000;
  69388. end;
  69389. procedure TCAN1_C1FIFOINT1.clearTXNFULLIE; inline;
  69390. begin
  69391. pTDefRegMap(@Self)^.clr := $04000000;
  69392. end;
  69393. procedure TCAN1_C1FIFOINT1.setTXNFULLIE(thebits : TBits_1); inline;
  69394. begin
  69395. if thebits = 0 then
  69396. pTDefRegMap(@Self)^.clr := $04000000
  69397. else
  69398. pTDefRegMap(@Self)^.&set := $04000000;
  69399. end;
  69400. function TCAN1_C1FIFOINT1.getTXNFULLIE : TBits_1; inline;
  69401. begin
  69402. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  69403. end;
  69404. procedure TCAN1_C1FIFOINT1.setw(thebits : TBits_32); inline;
  69405. begin
  69406. pTDefRegMap(@Self)^.val := thebits;
  69407. end;
  69408. function TCAN1_C1FIFOINT1.getw : TBits_32; inline;
  69409. begin
  69410. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69411. end;
  69412. procedure TCAN1_C1FIFOCI1.setCFIFOCI(thebits : TBits_5); inline;
  69413. begin
  69414. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  69415. end;
  69416. function TCAN1_C1FIFOCI1.getCFIFOCI : TBits_5; inline;
  69417. begin
  69418. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  69419. end;
  69420. procedure TCAN1_C1FIFOCI1.setw(thebits : TBits_32); inline;
  69421. begin
  69422. pTDefRegMap(@Self)^.val := thebits;
  69423. end;
  69424. function TCAN1_C1FIFOCI1.getw : TBits_32; inline;
  69425. begin
  69426. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69427. end;
  69428. procedure TCAN1_C1FIFOCON2.setTXPRI(thebits : TBits_2); inline;
  69429. begin
  69430. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  69431. end;
  69432. function TCAN1_C1FIFOCON2.getTXPRI : TBits_2; inline;
  69433. begin
  69434. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  69435. end;
  69436. procedure TCAN1_C1FIFOCON2.setRTREN; inline;
  69437. begin
  69438. pTDefRegMap(@Self)^.&set := $00000004;
  69439. end;
  69440. procedure TCAN1_C1FIFOCON2.clearRTREN; inline;
  69441. begin
  69442. pTDefRegMap(@Self)^.clr := $00000004;
  69443. end;
  69444. procedure TCAN1_C1FIFOCON2.setRTREN(thebits : TBits_1); inline;
  69445. begin
  69446. if thebits = 0 then
  69447. pTDefRegMap(@Self)^.clr := $00000004
  69448. else
  69449. pTDefRegMap(@Self)^.&set := $00000004;
  69450. end;
  69451. function TCAN1_C1FIFOCON2.getRTREN : TBits_1; inline;
  69452. begin
  69453. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69454. end;
  69455. procedure TCAN1_C1FIFOCON2.setTXREQ; inline;
  69456. begin
  69457. pTDefRegMap(@Self)^.&set := $00000008;
  69458. end;
  69459. procedure TCAN1_C1FIFOCON2.clearTXREQ; inline;
  69460. begin
  69461. pTDefRegMap(@Self)^.clr := $00000008;
  69462. end;
  69463. procedure TCAN1_C1FIFOCON2.setTXREQ(thebits : TBits_1); inline;
  69464. begin
  69465. if thebits = 0 then
  69466. pTDefRegMap(@Self)^.clr := $00000008
  69467. else
  69468. pTDefRegMap(@Self)^.&set := $00000008;
  69469. end;
  69470. function TCAN1_C1FIFOCON2.getTXREQ : TBits_1; inline;
  69471. begin
  69472. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69473. end;
  69474. procedure TCAN1_C1FIFOCON2.setTXERR; inline;
  69475. begin
  69476. pTDefRegMap(@Self)^.&set := $00000010;
  69477. end;
  69478. procedure TCAN1_C1FIFOCON2.clearTXERR; inline;
  69479. begin
  69480. pTDefRegMap(@Self)^.clr := $00000010;
  69481. end;
  69482. procedure TCAN1_C1FIFOCON2.setTXERR(thebits : TBits_1); inline;
  69483. begin
  69484. if thebits = 0 then
  69485. pTDefRegMap(@Self)^.clr := $00000010
  69486. else
  69487. pTDefRegMap(@Self)^.&set := $00000010;
  69488. end;
  69489. function TCAN1_C1FIFOCON2.getTXERR : TBits_1; inline;
  69490. begin
  69491. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69492. end;
  69493. procedure TCAN1_C1FIFOCON2.setTXLARB; inline;
  69494. begin
  69495. pTDefRegMap(@Self)^.&set := $00000020;
  69496. end;
  69497. procedure TCAN1_C1FIFOCON2.clearTXLARB; inline;
  69498. begin
  69499. pTDefRegMap(@Self)^.clr := $00000020;
  69500. end;
  69501. procedure TCAN1_C1FIFOCON2.setTXLARB(thebits : TBits_1); inline;
  69502. begin
  69503. if thebits = 0 then
  69504. pTDefRegMap(@Self)^.clr := $00000020
  69505. else
  69506. pTDefRegMap(@Self)^.&set := $00000020;
  69507. end;
  69508. function TCAN1_C1FIFOCON2.getTXLARB : TBits_1; inline;
  69509. begin
  69510. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69511. end;
  69512. procedure TCAN1_C1FIFOCON2.setTXABAT; inline;
  69513. begin
  69514. pTDefRegMap(@Self)^.&set := $00000040;
  69515. end;
  69516. procedure TCAN1_C1FIFOCON2.clearTXABAT; inline;
  69517. begin
  69518. pTDefRegMap(@Self)^.clr := $00000040;
  69519. end;
  69520. procedure TCAN1_C1FIFOCON2.setTXABAT(thebits : TBits_1); inline;
  69521. begin
  69522. if thebits = 0 then
  69523. pTDefRegMap(@Self)^.clr := $00000040
  69524. else
  69525. pTDefRegMap(@Self)^.&set := $00000040;
  69526. end;
  69527. function TCAN1_C1FIFOCON2.getTXABAT : TBits_1; inline;
  69528. begin
  69529. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69530. end;
  69531. procedure TCAN1_C1FIFOCON2.setTXEN; inline;
  69532. begin
  69533. pTDefRegMap(@Self)^.&set := $00000080;
  69534. end;
  69535. procedure TCAN1_C1FIFOCON2.clearTXEN; inline;
  69536. begin
  69537. pTDefRegMap(@Self)^.clr := $00000080;
  69538. end;
  69539. procedure TCAN1_C1FIFOCON2.setTXEN(thebits : TBits_1); inline;
  69540. begin
  69541. if thebits = 0 then
  69542. pTDefRegMap(@Self)^.clr := $00000080
  69543. else
  69544. pTDefRegMap(@Self)^.&set := $00000080;
  69545. end;
  69546. function TCAN1_C1FIFOCON2.getTXEN : TBits_1; inline;
  69547. begin
  69548. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69549. end;
  69550. procedure TCAN1_C1FIFOCON2.setDONLY; inline;
  69551. begin
  69552. pTDefRegMap(@Self)^.&set := $00001000;
  69553. end;
  69554. procedure TCAN1_C1FIFOCON2.clearDONLY; inline;
  69555. begin
  69556. pTDefRegMap(@Self)^.clr := $00001000;
  69557. end;
  69558. procedure TCAN1_C1FIFOCON2.setDONLY(thebits : TBits_1); inline;
  69559. begin
  69560. if thebits = 0 then
  69561. pTDefRegMap(@Self)^.clr := $00001000
  69562. else
  69563. pTDefRegMap(@Self)^.&set := $00001000;
  69564. end;
  69565. function TCAN1_C1FIFOCON2.getDONLY : TBits_1; inline;
  69566. begin
  69567. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  69568. end;
  69569. procedure TCAN1_C1FIFOCON2.setUINC; inline;
  69570. begin
  69571. pTDefRegMap(@Self)^.&set := $00002000;
  69572. end;
  69573. procedure TCAN1_C1FIFOCON2.clearUINC; inline;
  69574. begin
  69575. pTDefRegMap(@Self)^.clr := $00002000;
  69576. end;
  69577. procedure TCAN1_C1FIFOCON2.setUINC(thebits : TBits_1); inline;
  69578. begin
  69579. if thebits = 0 then
  69580. pTDefRegMap(@Self)^.clr := $00002000
  69581. else
  69582. pTDefRegMap(@Self)^.&set := $00002000;
  69583. end;
  69584. function TCAN1_C1FIFOCON2.getUINC : TBits_1; inline;
  69585. begin
  69586. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  69587. end;
  69588. procedure TCAN1_C1FIFOCON2.setFRESET; inline;
  69589. begin
  69590. pTDefRegMap(@Self)^.&set := $00004000;
  69591. end;
  69592. procedure TCAN1_C1FIFOCON2.clearFRESET; inline;
  69593. begin
  69594. pTDefRegMap(@Self)^.clr := $00004000;
  69595. end;
  69596. procedure TCAN1_C1FIFOCON2.setFRESET(thebits : TBits_1); inline;
  69597. begin
  69598. if thebits = 0 then
  69599. pTDefRegMap(@Self)^.clr := $00004000
  69600. else
  69601. pTDefRegMap(@Self)^.&set := $00004000;
  69602. end;
  69603. function TCAN1_C1FIFOCON2.getFRESET : TBits_1; inline;
  69604. begin
  69605. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  69606. end;
  69607. procedure TCAN1_C1FIFOCON2.setFSIZE(thebits : TBits_5); inline;
  69608. begin
  69609. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  69610. end;
  69611. function TCAN1_C1FIFOCON2.getFSIZE : TBits_5; inline;
  69612. begin
  69613. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  69614. end;
  69615. procedure TCAN1_C1FIFOCON2.setw(thebits : TBits_32); inline;
  69616. begin
  69617. pTDefRegMap(@Self)^.val := thebits;
  69618. end;
  69619. function TCAN1_C1FIFOCON2.getw : TBits_32; inline;
  69620. begin
  69621. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69622. end;
  69623. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIF; inline;
  69624. begin
  69625. pTDefRegMap(@Self)^.&set := $00000001;
  69626. end;
  69627. procedure TCAN1_C1FIFOINT2.clearRXNEMPTYIF; inline;
  69628. begin
  69629. pTDefRegMap(@Self)^.clr := $00000001;
  69630. end;
  69631. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIF(thebits : TBits_1); inline;
  69632. begin
  69633. if thebits = 0 then
  69634. pTDefRegMap(@Self)^.clr := $00000001
  69635. else
  69636. pTDefRegMap(@Self)^.&set := $00000001;
  69637. end;
  69638. function TCAN1_C1FIFOINT2.getRXNEMPTYIF : TBits_1; inline;
  69639. begin
  69640. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69641. end;
  69642. procedure TCAN1_C1FIFOINT2.setRXHALFIF; inline;
  69643. begin
  69644. pTDefRegMap(@Self)^.&set := $00000002;
  69645. end;
  69646. procedure TCAN1_C1FIFOINT2.clearRXHALFIF; inline;
  69647. begin
  69648. pTDefRegMap(@Self)^.clr := $00000002;
  69649. end;
  69650. procedure TCAN1_C1FIFOINT2.setRXHALFIF(thebits : TBits_1); inline;
  69651. begin
  69652. if thebits = 0 then
  69653. pTDefRegMap(@Self)^.clr := $00000002
  69654. else
  69655. pTDefRegMap(@Self)^.&set := $00000002;
  69656. end;
  69657. function TCAN1_C1FIFOINT2.getRXHALFIF : TBits_1; inline;
  69658. begin
  69659. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69660. end;
  69661. procedure TCAN1_C1FIFOINT2.setRXFULLIF; inline;
  69662. begin
  69663. pTDefRegMap(@Self)^.&set := $00000004;
  69664. end;
  69665. procedure TCAN1_C1FIFOINT2.clearRXFULLIF; inline;
  69666. begin
  69667. pTDefRegMap(@Self)^.clr := $00000004;
  69668. end;
  69669. procedure TCAN1_C1FIFOINT2.setRXFULLIF(thebits : TBits_1); inline;
  69670. begin
  69671. if thebits = 0 then
  69672. pTDefRegMap(@Self)^.clr := $00000004
  69673. else
  69674. pTDefRegMap(@Self)^.&set := $00000004;
  69675. end;
  69676. function TCAN1_C1FIFOINT2.getRXFULLIF : TBits_1; inline;
  69677. begin
  69678. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69679. end;
  69680. procedure TCAN1_C1FIFOINT2.setRXOVFLIF; inline;
  69681. begin
  69682. pTDefRegMap(@Self)^.&set := $00000008;
  69683. end;
  69684. procedure TCAN1_C1FIFOINT2.clearRXOVFLIF; inline;
  69685. begin
  69686. pTDefRegMap(@Self)^.clr := $00000008;
  69687. end;
  69688. procedure TCAN1_C1FIFOINT2.setRXOVFLIF(thebits : TBits_1); inline;
  69689. begin
  69690. if thebits = 0 then
  69691. pTDefRegMap(@Self)^.clr := $00000008
  69692. else
  69693. pTDefRegMap(@Self)^.&set := $00000008;
  69694. end;
  69695. function TCAN1_C1FIFOINT2.getRXOVFLIF : TBits_1; inline;
  69696. begin
  69697. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69698. end;
  69699. procedure TCAN1_C1FIFOINT2.setTXEMPTYIF; inline;
  69700. begin
  69701. pTDefRegMap(@Self)^.&set := $00000100;
  69702. end;
  69703. procedure TCAN1_C1FIFOINT2.clearTXEMPTYIF; inline;
  69704. begin
  69705. pTDefRegMap(@Self)^.clr := $00000100;
  69706. end;
  69707. procedure TCAN1_C1FIFOINT2.setTXEMPTYIF(thebits : TBits_1); inline;
  69708. begin
  69709. if thebits = 0 then
  69710. pTDefRegMap(@Self)^.clr := $00000100
  69711. else
  69712. pTDefRegMap(@Self)^.&set := $00000100;
  69713. end;
  69714. function TCAN1_C1FIFOINT2.getTXEMPTYIF : TBits_1; inline;
  69715. begin
  69716. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  69717. end;
  69718. procedure TCAN1_C1FIFOINT2.setTXHALFIF; inline;
  69719. begin
  69720. pTDefRegMap(@Self)^.&set := $00000200;
  69721. end;
  69722. procedure TCAN1_C1FIFOINT2.clearTXHALFIF; inline;
  69723. begin
  69724. pTDefRegMap(@Self)^.clr := $00000200;
  69725. end;
  69726. procedure TCAN1_C1FIFOINT2.setTXHALFIF(thebits : TBits_1); inline;
  69727. begin
  69728. if thebits = 0 then
  69729. pTDefRegMap(@Self)^.clr := $00000200
  69730. else
  69731. pTDefRegMap(@Self)^.&set := $00000200;
  69732. end;
  69733. function TCAN1_C1FIFOINT2.getTXHALFIF : TBits_1; inline;
  69734. begin
  69735. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  69736. end;
  69737. procedure TCAN1_C1FIFOINT2.setTXNFULLIF; inline;
  69738. begin
  69739. pTDefRegMap(@Self)^.&set := $00000400;
  69740. end;
  69741. procedure TCAN1_C1FIFOINT2.clearTXNFULLIF; inline;
  69742. begin
  69743. pTDefRegMap(@Self)^.clr := $00000400;
  69744. end;
  69745. procedure TCAN1_C1FIFOINT2.setTXNFULLIF(thebits : TBits_1); inline;
  69746. begin
  69747. if thebits = 0 then
  69748. pTDefRegMap(@Self)^.clr := $00000400
  69749. else
  69750. pTDefRegMap(@Self)^.&set := $00000400;
  69751. end;
  69752. function TCAN1_C1FIFOINT2.getTXNFULLIF : TBits_1; inline;
  69753. begin
  69754. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  69755. end;
  69756. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIE; inline;
  69757. begin
  69758. pTDefRegMap(@Self)^.&set := $00010000;
  69759. end;
  69760. procedure TCAN1_C1FIFOINT2.clearRXNEMPTYIE; inline;
  69761. begin
  69762. pTDefRegMap(@Self)^.clr := $00010000;
  69763. end;
  69764. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIE(thebits : TBits_1); inline;
  69765. begin
  69766. if thebits = 0 then
  69767. pTDefRegMap(@Self)^.clr := $00010000
  69768. else
  69769. pTDefRegMap(@Self)^.&set := $00010000;
  69770. end;
  69771. function TCAN1_C1FIFOINT2.getRXNEMPTYIE : TBits_1; inline;
  69772. begin
  69773. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  69774. end;
  69775. procedure TCAN1_C1FIFOINT2.setRXHALFIE; inline;
  69776. begin
  69777. pTDefRegMap(@Self)^.&set := $00020000;
  69778. end;
  69779. procedure TCAN1_C1FIFOINT2.clearRXHALFIE; inline;
  69780. begin
  69781. pTDefRegMap(@Self)^.clr := $00020000;
  69782. end;
  69783. procedure TCAN1_C1FIFOINT2.setRXHALFIE(thebits : TBits_1); inline;
  69784. begin
  69785. if thebits = 0 then
  69786. pTDefRegMap(@Self)^.clr := $00020000
  69787. else
  69788. pTDefRegMap(@Self)^.&set := $00020000;
  69789. end;
  69790. function TCAN1_C1FIFOINT2.getRXHALFIE : TBits_1; inline;
  69791. begin
  69792. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  69793. end;
  69794. procedure TCAN1_C1FIFOINT2.setRXFULLIE; inline;
  69795. begin
  69796. pTDefRegMap(@Self)^.&set := $00040000;
  69797. end;
  69798. procedure TCAN1_C1FIFOINT2.clearRXFULLIE; inline;
  69799. begin
  69800. pTDefRegMap(@Self)^.clr := $00040000;
  69801. end;
  69802. procedure TCAN1_C1FIFOINT2.setRXFULLIE(thebits : TBits_1); inline;
  69803. begin
  69804. if thebits = 0 then
  69805. pTDefRegMap(@Self)^.clr := $00040000
  69806. else
  69807. pTDefRegMap(@Self)^.&set := $00040000;
  69808. end;
  69809. function TCAN1_C1FIFOINT2.getRXFULLIE : TBits_1; inline;
  69810. begin
  69811. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  69812. end;
  69813. procedure TCAN1_C1FIFOINT2.setRXOVFLIE; inline;
  69814. begin
  69815. pTDefRegMap(@Self)^.&set := $00080000;
  69816. end;
  69817. procedure TCAN1_C1FIFOINT2.clearRXOVFLIE; inline;
  69818. begin
  69819. pTDefRegMap(@Self)^.clr := $00080000;
  69820. end;
  69821. procedure TCAN1_C1FIFOINT2.setRXOVFLIE(thebits : TBits_1); inline;
  69822. begin
  69823. if thebits = 0 then
  69824. pTDefRegMap(@Self)^.clr := $00080000
  69825. else
  69826. pTDefRegMap(@Self)^.&set := $00080000;
  69827. end;
  69828. function TCAN1_C1FIFOINT2.getRXOVFLIE : TBits_1; inline;
  69829. begin
  69830. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69831. end;
  69832. procedure TCAN1_C1FIFOINT2.setTXEMPTYIE; inline;
  69833. begin
  69834. pTDefRegMap(@Self)^.&set := $01000000;
  69835. end;
  69836. procedure TCAN1_C1FIFOINT2.clearTXEMPTYIE; inline;
  69837. begin
  69838. pTDefRegMap(@Self)^.clr := $01000000;
  69839. end;
  69840. procedure TCAN1_C1FIFOINT2.setTXEMPTYIE(thebits : TBits_1); inline;
  69841. begin
  69842. if thebits = 0 then
  69843. pTDefRegMap(@Self)^.clr := $01000000
  69844. else
  69845. pTDefRegMap(@Self)^.&set := $01000000;
  69846. end;
  69847. function TCAN1_C1FIFOINT2.getTXEMPTYIE : TBits_1; inline;
  69848. begin
  69849. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  69850. end;
  69851. procedure TCAN1_C1FIFOINT2.setTXHALFIE; inline;
  69852. begin
  69853. pTDefRegMap(@Self)^.&set := $02000000;
  69854. end;
  69855. procedure TCAN1_C1FIFOINT2.clearTXHALFIE; inline;
  69856. begin
  69857. pTDefRegMap(@Self)^.clr := $02000000;
  69858. end;
  69859. procedure TCAN1_C1FIFOINT2.setTXHALFIE(thebits : TBits_1); inline;
  69860. begin
  69861. if thebits = 0 then
  69862. pTDefRegMap(@Self)^.clr := $02000000
  69863. else
  69864. pTDefRegMap(@Self)^.&set := $02000000;
  69865. end;
  69866. function TCAN1_C1FIFOINT2.getTXHALFIE : TBits_1; inline;
  69867. begin
  69868. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  69869. end;
  69870. procedure TCAN1_C1FIFOINT2.setTXNFULLIE; inline;
  69871. begin
  69872. pTDefRegMap(@Self)^.&set := $04000000;
  69873. end;
  69874. procedure TCAN1_C1FIFOINT2.clearTXNFULLIE; inline;
  69875. begin
  69876. pTDefRegMap(@Self)^.clr := $04000000;
  69877. end;
  69878. procedure TCAN1_C1FIFOINT2.setTXNFULLIE(thebits : TBits_1); inline;
  69879. begin
  69880. if thebits = 0 then
  69881. pTDefRegMap(@Self)^.clr := $04000000
  69882. else
  69883. pTDefRegMap(@Self)^.&set := $04000000;
  69884. end;
  69885. function TCAN1_C1FIFOINT2.getTXNFULLIE : TBits_1; inline;
  69886. begin
  69887. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  69888. end;
  69889. procedure TCAN1_C1FIFOINT2.setw(thebits : TBits_32); inline;
  69890. begin
  69891. pTDefRegMap(@Self)^.val := thebits;
  69892. end;
  69893. function TCAN1_C1FIFOINT2.getw : TBits_32; inline;
  69894. begin
  69895. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69896. end;
  69897. procedure TCAN1_C1FIFOCI2.setCFIFOCI(thebits : TBits_5); inline;
  69898. begin
  69899. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  69900. end;
  69901. function TCAN1_C1FIFOCI2.getCFIFOCI : TBits_5; inline;
  69902. begin
  69903. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  69904. end;
  69905. procedure TCAN1_C1FIFOCI2.setw(thebits : TBits_32); inline;
  69906. begin
  69907. pTDefRegMap(@Self)^.val := thebits;
  69908. end;
  69909. function TCAN1_C1FIFOCI2.getw : TBits_32; inline;
  69910. begin
  69911. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69912. end;
  69913. procedure TCAN1_C1FIFOCON3.setTXPRI(thebits : TBits_2); inline;
  69914. begin
  69915. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  69916. end;
  69917. function TCAN1_C1FIFOCON3.getTXPRI : TBits_2; inline;
  69918. begin
  69919. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  69920. end;
  69921. procedure TCAN1_C1FIFOCON3.setRTREN; inline;
  69922. begin
  69923. pTDefRegMap(@Self)^.&set := $00000004;
  69924. end;
  69925. procedure TCAN1_C1FIFOCON3.clearRTREN; inline;
  69926. begin
  69927. pTDefRegMap(@Self)^.clr := $00000004;
  69928. end;
  69929. procedure TCAN1_C1FIFOCON3.setRTREN(thebits : TBits_1); inline;
  69930. begin
  69931. if thebits = 0 then
  69932. pTDefRegMap(@Self)^.clr := $00000004
  69933. else
  69934. pTDefRegMap(@Self)^.&set := $00000004;
  69935. end;
  69936. function TCAN1_C1FIFOCON3.getRTREN : TBits_1; inline;
  69937. begin
  69938. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69939. end;
  69940. procedure TCAN1_C1FIFOCON3.setTXREQ; inline;
  69941. begin
  69942. pTDefRegMap(@Self)^.&set := $00000008;
  69943. end;
  69944. procedure TCAN1_C1FIFOCON3.clearTXREQ; inline;
  69945. begin
  69946. pTDefRegMap(@Self)^.clr := $00000008;
  69947. end;
  69948. procedure TCAN1_C1FIFOCON3.setTXREQ(thebits : TBits_1); inline;
  69949. begin
  69950. if thebits = 0 then
  69951. pTDefRegMap(@Self)^.clr := $00000008
  69952. else
  69953. pTDefRegMap(@Self)^.&set := $00000008;
  69954. end;
  69955. function TCAN1_C1FIFOCON3.getTXREQ : TBits_1; inline;
  69956. begin
  69957. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69958. end;
  69959. procedure TCAN1_C1FIFOCON3.setTXERR; inline;
  69960. begin
  69961. pTDefRegMap(@Self)^.&set := $00000010;
  69962. end;
  69963. procedure TCAN1_C1FIFOCON3.clearTXERR; inline;
  69964. begin
  69965. pTDefRegMap(@Self)^.clr := $00000010;
  69966. end;
  69967. procedure TCAN1_C1FIFOCON3.setTXERR(thebits : TBits_1); inline;
  69968. begin
  69969. if thebits = 0 then
  69970. pTDefRegMap(@Self)^.clr := $00000010
  69971. else
  69972. pTDefRegMap(@Self)^.&set := $00000010;
  69973. end;
  69974. function TCAN1_C1FIFOCON3.getTXERR : TBits_1; inline;
  69975. begin
  69976. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69977. end;
  69978. procedure TCAN1_C1FIFOCON3.setTXLARB; inline;
  69979. begin
  69980. pTDefRegMap(@Self)^.&set := $00000020;
  69981. end;
  69982. procedure TCAN1_C1FIFOCON3.clearTXLARB; inline;
  69983. begin
  69984. pTDefRegMap(@Self)^.clr := $00000020;
  69985. end;
  69986. procedure TCAN1_C1FIFOCON3.setTXLARB(thebits : TBits_1); inline;
  69987. begin
  69988. if thebits = 0 then
  69989. pTDefRegMap(@Self)^.clr := $00000020
  69990. else
  69991. pTDefRegMap(@Self)^.&set := $00000020;
  69992. end;
  69993. function TCAN1_C1FIFOCON3.getTXLARB : TBits_1; inline;
  69994. begin
  69995. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69996. end;
  69997. procedure TCAN1_C1FIFOCON3.setTXABAT; inline;
  69998. begin
  69999. pTDefRegMap(@Self)^.&set := $00000040;
  70000. end;
  70001. procedure TCAN1_C1FIFOCON3.clearTXABAT; inline;
  70002. begin
  70003. pTDefRegMap(@Self)^.clr := $00000040;
  70004. end;
  70005. procedure TCAN1_C1FIFOCON3.setTXABAT(thebits : TBits_1); inline;
  70006. begin
  70007. if thebits = 0 then
  70008. pTDefRegMap(@Self)^.clr := $00000040
  70009. else
  70010. pTDefRegMap(@Self)^.&set := $00000040;
  70011. end;
  70012. function TCAN1_C1FIFOCON3.getTXABAT : TBits_1; inline;
  70013. begin
  70014. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70015. end;
  70016. procedure TCAN1_C1FIFOCON3.setTXEN; inline;
  70017. begin
  70018. pTDefRegMap(@Self)^.&set := $00000080;
  70019. end;
  70020. procedure TCAN1_C1FIFOCON3.clearTXEN; inline;
  70021. begin
  70022. pTDefRegMap(@Self)^.clr := $00000080;
  70023. end;
  70024. procedure TCAN1_C1FIFOCON3.setTXEN(thebits : TBits_1); inline;
  70025. begin
  70026. if thebits = 0 then
  70027. pTDefRegMap(@Self)^.clr := $00000080
  70028. else
  70029. pTDefRegMap(@Self)^.&set := $00000080;
  70030. end;
  70031. function TCAN1_C1FIFOCON3.getTXEN : TBits_1; inline;
  70032. begin
  70033. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70034. end;
  70035. procedure TCAN1_C1FIFOCON3.setDONLY; inline;
  70036. begin
  70037. pTDefRegMap(@Self)^.&set := $00001000;
  70038. end;
  70039. procedure TCAN1_C1FIFOCON3.clearDONLY; inline;
  70040. begin
  70041. pTDefRegMap(@Self)^.clr := $00001000;
  70042. end;
  70043. procedure TCAN1_C1FIFOCON3.setDONLY(thebits : TBits_1); inline;
  70044. begin
  70045. if thebits = 0 then
  70046. pTDefRegMap(@Self)^.clr := $00001000
  70047. else
  70048. pTDefRegMap(@Self)^.&set := $00001000;
  70049. end;
  70050. function TCAN1_C1FIFOCON3.getDONLY : TBits_1; inline;
  70051. begin
  70052. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  70053. end;
  70054. procedure TCAN1_C1FIFOCON3.setUINC; inline;
  70055. begin
  70056. pTDefRegMap(@Self)^.&set := $00002000;
  70057. end;
  70058. procedure TCAN1_C1FIFOCON3.clearUINC; inline;
  70059. begin
  70060. pTDefRegMap(@Self)^.clr := $00002000;
  70061. end;
  70062. procedure TCAN1_C1FIFOCON3.setUINC(thebits : TBits_1); inline;
  70063. begin
  70064. if thebits = 0 then
  70065. pTDefRegMap(@Self)^.clr := $00002000
  70066. else
  70067. pTDefRegMap(@Self)^.&set := $00002000;
  70068. end;
  70069. function TCAN1_C1FIFOCON3.getUINC : TBits_1; inline;
  70070. begin
  70071. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  70072. end;
  70073. procedure TCAN1_C1FIFOCON3.setFRESET; inline;
  70074. begin
  70075. pTDefRegMap(@Self)^.&set := $00004000;
  70076. end;
  70077. procedure TCAN1_C1FIFOCON3.clearFRESET; inline;
  70078. begin
  70079. pTDefRegMap(@Self)^.clr := $00004000;
  70080. end;
  70081. procedure TCAN1_C1FIFOCON3.setFRESET(thebits : TBits_1); inline;
  70082. begin
  70083. if thebits = 0 then
  70084. pTDefRegMap(@Self)^.clr := $00004000
  70085. else
  70086. pTDefRegMap(@Self)^.&set := $00004000;
  70087. end;
  70088. function TCAN1_C1FIFOCON3.getFRESET : TBits_1; inline;
  70089. begin
  70090. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  70091. end;
  70092. procedure TCAN1_C1FIFOCON3.setFSIZE(thebits : TBits_5); inline;
  70093. begin
  70094. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  70095. end;
  70096. function TCAN1_C1FIFOCON3.getFSIZE : TBits_5; inline;
  70097. begin
  70098. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  70099. end;
  70100. procedure TCAN1_C1FIFOCON3.setw(thebits : TBits_32); inline;
  70101. begin
  70102. pTDefRegMap(@Self)^.val := thebits;
  70103. end;
  70104. function TCAN1_C1FIFOCON3.getw : TBits_32; inline;
  70105. begin
  70106. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70107. end;
  70108. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIF; inline;
  70109. begin
  70110. pTDefRegMap(@Self)^.&set := $00000001;
  70111. end;
  70112. procedure TCAN1_C1FIFOINT3.clearRXNEMPTYIF; inline;
  70113. begin
  70114. pTDefRegMap(@Self)^.clr := $00000001;
  70115. end;
  70116. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIF(thebits : TBits_1); inline;
  70117. begin
  70118. if thebits = 0 then
  70119. pTDefRegMap(@Self)^.clr := $00000001
  70120. else
  70121. pTDefRegMap(@Self)^.&set := $00000001;
  70122. end;
  70123. function TCAN1_C1FIFOINT3.getRXNEMPTYIF : TBits_1; inline;
  70124. begin
  70125. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70126. end;
  70127. procedure TCAN1_C1FIFOINT3.setRXHALFIF; inline;
  70128. begin
  70129. pTDefRegMap(@Self)^.&set := $00000002;
  70130. end;
  70131. procedure TCAN1_C1FIFOINT3.clearRXHALFIF; inline;
  70132. begin
  70133. pTDefRegMap(@Self)^.clr := $00000002;
  70134. end;
  70135. procedure TCAN1_C1FIFOINT3.setRXHALFIF(thebits : TBits_1); inline;
  70136. begin
  70137. if thebits = 0 then
  70138. pTDefRegMap(@Self)^.clr := $00000002
  70139. else
  70140. pTDefRegMap(@Self)^.&set := $00000002;
  70141. end;
  70142. function TCAN1_C1FIFOINT3.getRXHALFIF : TBits_1; inline;
  70143. begin
  70144. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70145. end;
  70146. procedure TCAN1_C1FIFOINT3.setRXFULLIF; inline;
  70147. begin
  70148. pTDefRegMap(@Self)^.&set := $00000004;
  70149. end;
  70150. procedure TCAN1_C1FIFOINT3.clearRXFULLIF; inline;
  70151. begin
  70152. pTDefRegMap(@Self)^.clr := $00000004;
  70153. end;
  70154. procedure TCAN1_C1FIFOINT3.setRXFULLIF(thebits : TBits_1); inline;
  70155. begin
  70156. if thebits = 0 then
  70157. pTDefRegMap(@Self)^.clr := $00000004
  70158. else
  70159. pTDefRegMap(@Self)^.&set := $00000004;
  70160. end;
  70161. function TCAN1_C1FIFOINT3.getRXFULLIF : TBits_1; inline;
  70162. begin
  70163. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70164. end;
  70165. procedure TCAN1_C1FIFOINT3.setRXOVFLIF; inline;
  70166. begin
  70167. pTDefRegMap(@Self)^.&set := $00000008;
  70168. end;
  70169. procedure TCAN1_C1FIFOINT3.clearRXOVFLIF; inline;
  70170. begin
  70171. pTDefRegMap(@Self)^.clr := $00000008;
  70172. end;
  70173. procedure TCAN1_C1FIFOINT3.setRXOVFLIF(thebits : TBits_1); inline;
  70174. begin
  70175. if thebits = 0 then
  70176. pTDefRegMap(@Self)^.clr := $00000008
  70177. else
  70178. pTDefRegMap(@Self)^.&set := $00000008;
  70179. end;
  70180. function TCAN1_C1FIFOINT3.getRXOVFLIF : TBits_1; inline;
  70181. begin
  70182. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70183. end;
  70184. procedure TCAN1_C1FIFOINT3.setTXEMPTYIF; inline;
  70185. begin
  70186. pTDefRegMap(@Self)^.&set := $00000100;
  70187. end;
  70188. procedure TCAN1_C1FIFOINT3.clearTXEMPTYIF; inline;
  70189. begin
  70190. pTDefRegMap(@Self)^.clr := $00000100;
  70191. end;
  70192. procedure TCAN1_C1FIFOINT3.setTXEMPTYIF(thebits : TBits_1); inline;
  70193. begin
  70194. if thebits = 0 then
  70195. pTDefRegMap(@Self)^.clr := $00000100
  70196. else
  70197. pTDefRegMap(@Self)^.&set := $00000100;
  70198. end;
  70199. function TCAN1_C1FIFOINT3.getTXEMPTYIF : TBits_1; inline;
  70200. begin
  70201. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  70202. end;
  70203. procedure TCAN1_C1FIFOINT3.setTXHALFIF; inline;
  70204. begin
  70205. pTDefRegMap(@Self)^.&set := $00000200;
  70206. end;
  70207. procedure TCAN1_C1FIFOINT3.clearTXHALFIF; inline;
  70208. begin
  70209. pTDefRegMap(@Self)^.clr := $00000200;
  70210. end;
  70211. procedure TCAN1_C1FIFOINT3.setTXHALFIF(thebits : TBits_1); inline;
  70212. begin
  70213. if thebits = 0 then
  70214. pTDefRegMap(@Self)^.clr := $00000200
  70215. else
  70216. pTDefRegMap(@Self)^.&set := $00000200;
  70217. end;
  70218. function TCAN1_C1FIFOINT3.getTXHALFIF : TBits_1; inline;
  70219. begin
  70220. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  70221. end;
  70222. procedure TCAN1_C1FIFOINT3.setTXNFULLIF; inline;
  70223. begin
  70224. pTDefRegMap(@Self)^.&set := $00000400;
  70225. end;
  70226. procedure TCAN1_C1FIFOINT3.clearTXNFULLIF; inline;
  70227. begin
  70228. pTDefRegMap(@Self)^.clr := $00000400;
  70229. end;
  70230. procedure TCAN1_C1FIFOINT3.setTXNFULLIF(thebits : TBits_1); inline;
  70231. begin
  70232. if thebits = 0 then
  70233. pTDefRegMap(@Self)^.clr := $00000400
  70234. else
  70235. pTDefRegMap(@Self)^.&set := $00000400;
  70236. end;
  70237. function TCAN1_C1FIFOINT3.getTXNFULLIF : TBits_1; inline;
  70238. begin
  70239. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  70240. end;
  70241. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIE; inline;
  70242. begin
  70243. pTDefRegMap(@Self)^.&set := $00010000;
  70244. end;
  70245. procedure TCAN1_C1FIFOINT3.clearRXNEMPTYIE; inline;
  70246. begin
  70247. pTDefRegMap(@Self)^.clr := $00010000;
  70248. end;
  70249. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIE(thebits : TBits_1); inline;
  70250. begin
  70251. if thebits = 0 then
  70252. pTDefRegMap(@Self)^.clr := $00010000
  70253. else
  70254. pTDefRegMap(@Self)^.&set := $00010000;
  70255. end;
  70256. function TCAN1_C1FIFOINT3.getRXNEMPTYIE : TBits_1; inline;
  70257. begin
  70258. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  70259. end;
  70260. procedure TCAN1_C1FIFOINT3.setRXHALFIE; inline;
  70261. begin
  70262. pTDefRegMap(@Self)^.&set := $00020000;
  70263. end;
  70264. procedure TCAN1_C1FIFOINT3.clearRXHALFIE; inline;
  70265. begin
  70266. pTDefRegMap(@Self)^.clr := $00020000;
  70267. end;
  70268. procedure TCAN1_C1FIFOINT3.setRXHALFIE(thebits : TBits_1); inline;
  70269. begin
  70270. if thebits = 0 then
  70271. pTDefRegMap(@Self)^.clr := $00020000
  70272. else
  70273. pTDefRegMap(@Self)^.&set := $00020000;
  70274. end;
  70275. function TCAN1_C1FIFOINT3.getRXHALFIE : TBits_1; inline;
  70276. begin
  70277. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  70278. end;
  70279. procedure TCAN1_C1FIFOINT3.setRXFULLIE; inline;
  70280. begin
  70281. pTDefRegMap(@Self)^.&set := $00040000;
  70282. end;
  70283. procedure TCAN1_C1FIFOINT3.clearRXFULLIE; inline;
  70284. begin
  70285. pTDefRegMap(@Self)^.clr := $00040000;
  70286. end;
  70287. procedure TCAN1_C1FIFOINT3.setRXFULLIE(thebits : TBits_1); inline;
  70288. begin
  70289. if thebits = 0 then
  70290. pTDefRegMap(@Self)^.clr := $00040000
  70291. else
  70292. pTDefRegMap(@Self)^.&set := $00040000;
  70293. end;
  70294. function TCAN1_C1FIFOINT3.getRXFULLIE : TBits_1; inline;
  70295. begin
  70296. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  70297. end;
  70298. procedure TCAN1_C1FIFOINT3.setRXOVFLIE; inline;
  70299. begin
  70300. pTDefRegMap(@Self)^.&set := $00080000;
  70301. end;
  70302. procedure TCAN1_C1FIFOINT3.clearRXOVFLIE; inline;
  70303. begin
  70304. pTDefRegMap(@Self)^.clr := $00080000;
  70305. end;
  70306. procedure TCAN1_C1FIFOINT3.setRXOVFLIE(thebits : TBits_1); inline;
  70307. begin
  70308. if thebits = 0 then
  70309. pTDefRegMap(@Self)^.clr := $00080000
  70310. else
  70311. pTDefRegMap(@Self)^.&set := $00080000;
  70312. end;
  70313. function TCAN1_C1FIFOINT3.getRXOVFLIE : TBits_1; inline;
  70314. begin
  70315. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  70316. end;
  70317. procedure TCAN1_C1FIFOINT3.setTXEMPTYIE; inline;
  70318. begin
  70319. pTDefRegMap(@Self)^.&set := $01000000;
  70320. end;
  70321. procedure TCAN1_C1FIFOINT3.clearTXEMPTYIE; inline;
  70322. begin
  70323. pTDefRegMap(@Self)^.clr := $01000000;
  70324. end;
  70325. procedure TCAN1_C1FIFOINT3.setTXEMPTYIE(thebits : TBits_1); inline;
  70326. begin
  70327. if thebits = 0 then
  70328. pTDefRegMap(@Self)^.clr := $01000000
  70329. else
  70330. pTDefRegMap(@Self)^.&set := $01000000;
  70331. end;
  70332. function TCAN1_C1FIFOINT3.getTXEMPTYIE : TBits_1; inline;
  70333. begin
  70334. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  70335. end;
  70336. procedure TCAN1_C1FIFOINT3.setTXHALFIE; inline;
  70337. begin
  70338. pTDefRegMap(@Self)^.&set := $02000000;
  70339. end;
  70340. procedure TCAN1_C1FIFOINT3.clearTXHALFIE; inline;
  70341. begin
  70342. pTDefRegMap(@Self)^.clr := $02000000;
  70343. end;
  70344. procedure TCAN1_C1FIFOINT3.setTXHALFIE(thebits : TBits_1); inline;
  70345. begin
  70346. if thebits = 0 then
  70347. pTDefRegMap(@Self)^.clr := $02000000
  70348. else
  70349. pTDefRegMap(@Self)^.&set := $02000000;
  70350. end;
  70351. function TCAN1_C1FIFOINT3.getTXHALFIE : TBits_1; inline;
  70352. begin
  70353. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  70354. end;
  70355. procedure TCAN1_C1FIFOINT3.setTXNFULLIE; inline;
  70356. begin
  70357. pTDefRegMap(@Self)^.&set := $04000000;
  70358. end;
  70359. procedure TCAN1_C1FIFOINT3.clearTXNFULLIE; inline;
  70360. begin
  70361. pTDefRegMap(@Self)^.clr := $04000000;
  70362. end;
  70363. procedure TCAN1_C1FIFOINT3.setTXNFULLIE(thebits : TBits_1); inline;
  70364. begin
  70365. if thebits = 0 then
  70366. pTDefRegMap(@Self)^.clr := $04000000
  70367. else
  70368. pTDefRegMap(@Self)^.&set := $04000000;
  70369. end;
  70370. function TCAN1_C1FIFOINT3.getTXNFULLIE : TBits_1; inline;
  70371. begin
  70372. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  70373. end;
  70374. procedure TCAN1_C1FIFOINT3.setw(thebits : TBits_32); inline;
  70375. begin
  70376. pTDefRegMap(@Self)^.val := thebits;
  70377. end;
  70378. function TCAN1_C1FIFOINT3.getw : TBits_32; inline;
  70379. begin
  70380. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70381. end;
  70382. procedure TCAN1_C1FIFOCI3.setCFIFOCI(thebits : TBits_5); inline;
  70383. begin
  70384. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  70385. end;
  70386. function TCAN1_C1FIFOCI3.getCFIFOCI : TBits_5; inline;
  70387. begin
  70388. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  70389. end;
  70390. procedure TCAN1_C1FIFOCI3.setw(thebits : TBits_32); inline;
  70391. begin
  70392. pTDefRegMap(@Self)^.val := thebits;
  70393. end;
  70394. function TCAN1_C1FIFOCI3.getw : TBits_32; inline;
  70395. begin
  70396. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70397. end;
  70398. procedure TCAN1_C1FIFOCON4.setTXPRI(thebits : TBits_2); inline;
  70399. begin
  70400. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  70401. end;
  70402. function TCAN1_C1FIFOCON4.getTXPRI : TBits_2; inline;
  70403. begin
  70404. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  70405. end;
  70406. procedure TCAN1_C1FIFOCON4.setRTREN; inline;
  70407. begin
  70408. pTDefRegMap(@Self)^.&set := $00000004;
  70409. end;
  70410. procedure TCAN1_C1FIFOCON4.clearRTREN; inline;
  70411. begin
  70412. pTDefRegMap(@Self)^.clr := $00000004;
  70413. end;
  70414. procedure TCAN1_C1FIFOCON4.setRTREN(thebits : TBits_1); inline;
  70415. begin
  70416. if thebits = 0 then
  70417. pTDefRegMap(@Self)^.clr := $00000004
  70418. else
  70419. pTDefRegMap(@Self)^.&set := $00000004;
  70420. end;
  70421. function TCAN1_C1FIFOCON4.getRTREN : TBits_1; inline;
  70422. begin
  70423. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70424. end;
  70425. procedure TCAN1_C1FIFOCON4.setTXREQ; inline;
  70426. begin
  70427. pTDefRegMap(@Self)^.&set := $00000008;
  70428. end;
  70429. procedure TCAN1_C1FIFOCON4.clearTXREQ; inline;
  70430. begin
  70431. pTDefRegMap(@Self)^.clr := $00000008;
  70432. end;
  70433. procedure TCAN1_C1FIFOCON4.setTXREQ(thebits : TBits_1); inline;
  70434. begin
  70435. if thebits = 0 then
  70436. pTDefRegMap(@Self)^.clr := $00000008
  70437. else
  70438. pTDefRegMap(@Self)^.&set := $00000008;
  70439. end;
  70440. function TCAN1_C1FIFOCON4.getTXREQ : TBits_1; inline;
  70441. begin
  70442. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70443. end;
  70444. procedure TCAN1_C1FIFOCON4.setTXERR; inline;
  70445. begin
  70446. pTDefRegMap(@Self)^.&set := $00000010;
  70447. end;
  70448. procedure TCAN1_C1FIFOCON4.clearTXERR; inline;
  70449. begin
  70450. pTDefRegMap(@Self)^.clr := $00000010;
  70451. end;
  70452. procedure TCAN1_C1FIFOCON4.setTXERR(thebits : TBits_1); inline;
  70453. begin
  70454. if thebits = 0 then
  70455. pTDefRegMap(@Self)^.clr := $00000010
  70456. else
  70457. pTDefRegMap(@Self)^.&set := $00000010;
  70458. end;
  70459. function TCAN1_C1FIFOCON4.getTXERR : TBits_1; inline;
  70460. begin
  70461. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70462. end;
  70463. procedure TCAN1_C1FIFOCON4.setTXLARB; inline;
  70464. begin
  70465. pTDefRegMap(@Self)^.&set := $00000020;
  70466. end;
  70467. procedure TCAN1_C1FIFOCON4.clearTXLARB; inline;
  70468. begin
  70469. pTDefRegMap(@Self)^.clr := $00000020;
  70470. end;
  70471. procedure TCAN1_C1FIFOCON4.setTXLARB(thebits : TBits_1); inline;
  70472. begin
  70473. if thebits = 0 then
  70474. pTDefRegMap(@Self)^.clr := $00000020
  70475. else
  70476. pTDefRegMap(@Self)^.&set := $00000020;
  70477. end;
  70478. function TCAN1_C1FIFOCON4.getTXLARB : TBits_1; inline;
  70479. begin
  70480. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70481. end;
  70482. procedure TCAN1_C1FIFOCON4.setTXABAT; inline;
  70483. begin
  70484. pTDefRegMap(@Self)^.&set := $00000040;
  70485. end;
  70486. procedure TCAN1_C1FIFOCON4.clearTXABAT; inline;
  70487. begin
  70488. pTDefRegMap(@Self)^.clr := $00000040;
  70489. end;
  70490. procedure TCAN1_C1FIFOCON4.setTXABAT(thebits : TBits_1); inline;
  70491. begin
  70492. if thebits = 0 then
  70493. pTDefRegMap(@Self)^.clr := $00000040
  70494. else
  70495. pTDefRegMap(@Self)^.&set := $00000040;
  70496. end;
  70497. function TCAN1_C1FIFOCON4.getTXABAT : TBits_1; inline;
  70498. begin
  70499. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70500. end;
  70501. procedure TCAN1_C1FIFOCON4.setTXEN; inline;
  70502. begin
  70503. pTDefRegMap(@Self)^.&set := $00000080;
  70504. end;
  70505. procedure TCAN1_C1FIFOCON4.clearTXEN; inline;
  70506. begin
  70507. pTDefRegMap(@Self)^.clr := $00000080;
  70508. end;
  70509. procedure TCAN1_C1FIFOCON4.setTXEN(thebits : TBits_1); inline;
  70510. begin
  70511. if thebits = 0 then
  70512. pTDefRegMap(@Self)^.clr := $00000080
  70513. else
  70514. pTDefRegMap(@Self)^.&set := $00000080;
  70515. end;
  70516. function TCAN1_C1FIFOCON4.getTXEN : TBits_1; inline;
  70517. begin
  70518. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70519. end;
  70520. procedure TCAN1_C1FIFOCON4.setDONLY; inline;
  70521. begin
  70522. pTDefRegMap(@Self)^.&set := $00001000;
  70523. end;
  70524. procedure TCAN1_C1FIFOCON4.clearDONLY; inline;
  70525. begin
  70526. pTDefRegMap(@Self)^.clr := $00001000;
  70527. end;
  70528. procedure TCAN1_C1FIFOCON4.setDONLY(thebits : TBits_1); inline;
  70529. begin
  70530. if thebits = 0 then
  70531. pTDefRegMap(@Self)^.clr := $00001000
  70532. else
  70533. pTDefRegMap(@Self)^.&set := $00001000;
  70534. end;
  70535. function TCAN1_C1FIFOCON4.getDONLY : TBits_1; inline;
  70536. begin
  70537. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  70538. end;
  70539. procedure TCAN1_C1FIFOCON4.setUINC; inline;
  70540. begin
  70541. pTDefRegMap(@Self)^.&set := $00002000;
  70542. end;
  70543. procedure TCAN1_C1FIFOCON4.clearUINC; inline;
  70544. begin
  70545. pTDefRegMap(@Self)^.clr := $00002000;
  70546. end;
  70547. procedure TCAN1_C1FIFOCON4.setUINC(thebits : TBits_1); inline;
  70548. begin
  70549. if thebits = 0 then
  70550. pTDefRegMap(@Self)^.clr := $00002000
  70551. else
  70552. pTDefRegMap(@Self)^.&set := $00002000;
  70553. end;
  70554. function TCAN1_C1FIFOCON4.getUINC : TBits_1; inline;
  70555. begin
  70556. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  70557. end;
  70558. procedure TCAN1_C1FIFOCON4.setFRESET; inline;
  70559. begin
  70560. pTDefRegMap(@Self)^.&set := $00004000;
  70561. end;
  70562. procedure TCAN1_C1FIFOCON4.clearFRESET; inline;
  70563. begin
  70564. pTDefRegMap(@Self)^.clr := $00004000;
  70565. end;
  70566. procedure TCAN1_C1FIFOCON4.setFRESET(thebits : TBits_1); inline;
  70567. begin
  70568. if thebits = 0 then
  70569. pTDefRegMap(@Self)^.clr := $00004000
  70570. else
  70571. pTDefRegMap(@Self)^.&set := $00004000;
  70572. end;
  70573. function TCAN1_C1FIFOCON4.getFRESET : TBits_1; inline;
  70574. begin
  70575. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  70576. end;
  70577. procedure TCAN1_C1FIFOCON4.setFSIZE(thebits : TBits_5); inline;
  70578. begin
  70579. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  70580. end;
  70581. function TCAN1_C1FIFOCON4.getFSIZE : TBits_5; inline;
  70582. begin
  70583. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  70584. end;
  70585. procedure TCAN1_C1FIFOCON4.setw(thebits : TBits_32); inline;
  70586. begin
  70587. pTDefRegMap(@Self)^.val := thebits;
  70588. end;
  70589. function TCAN1_C1FIFOCON4.getw : TBits_32; inline;
  70590. begin
  70591. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70592. end;
  70593. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIF; inline;
  70594. begin
  70595. pTDefRegMap(@Self)^.&set := $00000001;
  70596. end;
  70597. procedure TCAN1_C1FIFOINT4.clearRXNEMPTYIF; inline;
  70598. begin
  70599. pTDefRegMap(@Self)^.clr := $00000001;
  70600. end;
  70601. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIF(thebits : TBits_1); inline;
  70602. begin
  70603. if thebits = 0 then
  70604. pTDefRegMap(@Self)^.clr := $00000001
  70605. else
  70606. pTDefRegMap(@Self)^.&set := $00000001;
  70607. end;
  70608. function TCAN1_C1FIFOINT4.getRXNEMPTYIF : TBits_1; inline;
  70609. begin
  70610. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70611. end;
  70612. procedure TCAN1_C1FIFOINT4.setRXHALFIF; inline;
  70613. begin
  70614. pTDefRegMap(@Self)^.&set := $00000002;
  70615. end;
  70616. procedure TCAN1_C1FIFOINT4.clearRXHALFIF; inline;
  70617. begin
  70618. pTDefRegMap(@Self)^.clr := $00000002;
  70619. end;
  70620. procedure TCAN1_C1FIFOINT4.setRXHALFIF(thebits : TBits_1); inline;
  70621. begin
  70622. if thebits = 0 then
  70623. pTDefRegMap(@Self)^.clr := $00000002
  70624. else
  70625. pTDefRegMap(@Self)^.&set := $00000002;
  70626. end;
  70627. function TCAN1_C1FIFOINT4.getRXHALFIF : TBits_1; inline;
  70628. begin
  70629. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70630. end;
  70631. procedure TCAN1_C1FIFOINT4.setRXFULLIF; inline;
  70632. begin
  70633. pTDefRegMap(@Self)^.&set := $00000004;
  70634. end;
  70635. procedure TCAN1_C1FIFOINT4.clearRXFULLIF; inline;
  70636. begin
  70637. pTDefRegMap(@Self)^.clr := $00000004;
  70638. end;
  70639. procedure TCAN1_C1FIFOINT4.setRXFULLIF(thebits : TBits_1); inline;
  70640. begin
  70641. if thebits = 0 then
  70642. pTDefRegMap(@Self)^.clr := $00000004
  70643. else
  70644. pTDefRegMap(@Self)^.&set := $00000004;
  70645. end;
  70646. function TCAN1_C1FIFOINT4.getRXFULLIF : TBits_1; inline;
  70647. begin
  70648. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70649. end;
  70650. procedure TCAN1_C1FIFOINT4.setRXOVFLIF; inline;
  70651. begin
  70652. pTDefRegMap(@Self)^.&set := $00000008;
  70653. end;
  70654. procedure TCAN1_C1FIFOINT4.clearRXOVFLIF; inline;
  70655. begin
  70656. pTDefRegMap(@Self)^.clr := $00000008;
  70657. end;
  70658. procedure TCAN1_C1FIFOINT4.setRXOVFLIF(thebits : TBits_1); inline;
  70659. begin
  70660. if thebits = 0 then
  70661. pTDefRegMap(@Self)^.clr := $00000008
  70662. else
  70663. pTDefRegMap(@Self)^.&set := $00000008;
  70664. end;
  70665. function TCAN1_C1FIFOINT4.getRXOVFLIF : TBits_1; inline;
  70666. begin
  70667. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70668. end;
  70669. procedure TCAN1_C1FIFOINT4.setTXEMPTYIF; inline;
  70670. begin
  70671. pTDefRegMap(@Self)^.&set := $00000100;
  70672. end;
  70673. procedure TCAN1_C1FIFOINT4.clearTXEMPTYIF; inline;
  70674. begin
  70675. pTDefRegMap(@Self)^.clr := $00000100;
  70676. end;
  70677. procedure TCAN1_C1FIFOINT4.setTXEMPTYIF(thebits : TBits_1); inline;
  70678. begin
  70679. if thebits = 0 then
  70680. pTDefRegMap(@Self)^.clr := $00000100
  70681. else
  70682. pTDefRegMap(@Self)^.&set := $00000100;
  70683. end;
  70684. function TCAN1_C1FIFOINT4.getTXEMPTYIF : TBits_1; inline;
  70685. begin
  70686. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  70687. end;
  70688. procedure TCAN1_C1FIFOINT4.setTXHALFIF; inline;
  70689. begin
  70690. pTDefRegMap(@Self)^.&set := $00000200;
  70691. end;
  70692. procedure TCAN1_C1FIFOINT4.clearTXHALFIF; inline;
  70693. begin
  70694. pTDefRegMap(@Self)^.clr := $00000200;
  70695. end;
  70696. procedure TCAN1_C1FIFOINT4.setTXHALFIF(thebits : TBits_1); inline;
  70697. begin
  70698. if thebits = 0 then
  70699. pTDefRegMap(@Self)^.clr := $00000200
  70700. else
  70701. pTDefRegMap(@Self)^.&set := $00000200;
  70702. end;
  70703. function TCAN1_C1FIFOINT4.getTXHALFIF : TBits_1; inline;
  70704. begin
  70705. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  70706. end;
  70707. procedure TCAN1_C1FIFOINT4.setTXNFULLIF; inline;
  70708. begin
  70709. pTDefRegMap(@Self)^.&set := $00000400;
  70710. end;
  70711. procedure TCAN1_C1FIFOINT4.clearTXNFULLIF; inline;
  70712. begin
  70713. pTDefRegMap(@Self)^.clr := $00000400;
  70714. end;
  70715. procedure TCAN1_C1FIFOINT4.setTXNFULLIF(thebits : TBits_1); inline;
  70716. begin
  70717. if thebits = 0 then
  70718. pTDefRegMap(@Self)^.clr := $00000400
  70719. else
  70720. pTDefRegMap(@Self)^.&set := $00000400;
  70721. end;
  70722. function TCAN1_C1FIFOINT4.getTXNFULLIF : TBits_1; inline;
  70723. begin
  70724. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  70725. end;
  70726. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIE; inline;
  70727. begin
  70728. pTDefRegMap(@Self)^.&set := $00010000;
  70729. end;
  70730. procedure TCAN1_C1FIFOINT4.clearRXNEMPTYIE; inline;
  70731. begin
  70732. pTDefRegMap(@Self)^.clr := $00010000;
  70733. end;
  70734. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIE(thebits : TBits_1); inline;
  70735. begin
  70736. if thebits = 0 then
  70737. pTDefRegMap(@Self)^.clr := $00010000
  70738. else
  70739. pTDefRegMap(@Self)^.&set := $00010000;
  70740. end;
  70741. function TCAN1_C1FIFOINT4.getRXNEMPTYIE : TBits_1; inline;
  70742. begin
  70743. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  70744. end;
  70745. procedure TCAN1_C1FIFOINT4.setRXHALFIE; inline;
  70746. begin
  70747. pTDefRegMap(@Self)^.&set := $00020000;
  70748. end;
  70749. procedure TCAN1_C1FIFOINT4.clearRXHALFIE; inline;
  70750. begin
  70751. pTDefRegMap(@Self)^.clr := $00020000;
  70752. end;
  70753. procedure TCAN1_C1FIFOINT4.setRXHALFIE(thebits : TBits_1); inline;
  70754. begin
  70755. if thebits = 0 then
  70756. pTDefRegMap(@Self)^.clr := $00020000
  70757. else
  70758. pTDefRegMap(@Self)^.&set := $00020000;
  70759. end;
  70760. function TCAN1_C1FIFOINT4.getRXHALFIE : TBits_1; inline;
  70761. begin
  70762. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  70763. end;
  70764. procedure TCAN1_C1FIFOINT4.setRXFULLIE; inline;
  70765. begin
  70766. pTDefRegMap(@Self)^.&set := $00040000;
  70767. end;
  70768. procedure TCAN1_C1FIFOINT4.clearRXFULLIE; inline;
  70769. begin
  70770. pTDefRegMap(@Self)^.clr := $00040000;
  70771. end;
  70772. procedure TCAN1_C1FIFOINT4.setRXFULLIE(thebits : TBits_1); inline;
  70773. begin
  70774. if thebits = 0 then
  70775. pTDefRegMap(@Self)^.clr := $00040000
  70776. else
  70777. pTDefRegMap(@Self)^.&set := $00040000;
  70778. end;
  70779. function TCAN1_C1FIFOINT4.getRXFULLIE : TBits_1; inline;
  70780. begin
  70781. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  70782. end;
  70783. procedure TCAN1_C1FIFOINT4.setRXOVFLIE; inline;
  70784. begin
  70785. pTDefRegMap(@Self)^.&set := $00080000;
  70786. end;
  70787. procedure TCAN1_C1FIFOINT4.clearRXOVFLIE; inline;
  70788. begin
  70789. pTDefRegMap(@Self)^.clr := $00080000;
  70790. end;
  70791. procedure TCAN1_C1FIFOINT4.setRXOVFLIE(thebits : TBits_1); inline;
  70792. begin
  70793. if thebits = 0 then
  70794. pTDefRegMap(@Self)^.clr := $00080000
  70795. else
  70796. pTDefRegMap(@Self)^.&set := $00080000;
  70797. end;
  70798. function TCAN1_C1FIFOINT4.getRXOVFLIE : TBits_1; inline;
  70799. begin
  70800. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  70801. end;
  70802. procedure TCAN1_C1FIFOINT4.setTXEMPTYIE; inline;
  70803. begin
  70804. pTDefRegMap(@Self)^.&set := $01000000;
  70805. end;
  70806. procedure TCAN1_C1FIFOINT4.clearTXEMPTYIE; inline;
  70807. begin
  70808. pTDefRegMap(@Self)^.clr := $01000000;
  70809. end;
  70810. procedure TCAN1_C1FIFOINT4.setTXEMPTYIE(thebits : TBits_1); inline;
  70811. begin
  70812. if thebits = 0 then
  70813. pTDefRegMap(@Self)^.clr := $01000000
  70814. else
  70815. pTDefRegMap(@Self)^.&set := $01000000;
  70816. end;
  70817. function TCAN1_C1FIFOINT4.getTXEMPTYIE : TBits_1; inline;
  70818. begin
  70819. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  70820. end;
  70821. procedure TCAN1_C1FIFOINT4.setTXHALFIE; inline;
  70822. begin
  70823. pTDefRegMap(@Self)^.&set := $02000000;
  70824. end;
  70825. procedure TCAN1_C1FIFOINT4.clearTXHALFIE; inline;
  70826. begin
  70827. pTDefRegMap(@Self)^.clr := $02000000;
  70828. end;
  70829. procedure TCAN1_C1FIFOINT4.setTXHALFIE(thebits : TBits_1); inline;
  70830. begin
  70831. if thebits = 0 then
  70832. pTDefRegMap(@Self)^.clr := $02000000
  70833. else
  70834. pTDefRegMap(@Self)^.&set := $02000000;
  70835. end;
  70836. function TCAN1_C1FIFOINT4.getTXHALFIE : TBits_1; inline;
  70837. begin
  70838. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  70839. end;
  70840. procedure TCAN1_C1FIFOINT4.setTXNFULLIE; inline;
  70841. begin
  70842. pTDefRegMap(@Self)^.&set := $04000000;
  70843. end;
  70844. procedure TCAN1_C1FIFOINT4.clearTXNFULLIE; inline;
  70845. begin
  70846. pTDefRegMap(@Self)^.clr := $04000000;
  70847. end;
  70848. procedure TCAN1_C1FIFOINT4.setTXNFULLIE(thebits : TBits_1); inline;
  70849. begin
  70850. if thebits = 0 then
  70851. pTDefRegMap(@Self)^.clr := $04000000
  70852. else
  70853. pTDefRegMap(@Self)^.&set := $04000000;
  70854. end;
  70855. function TCAN1_C1FIFOINT4.getTXNFULLIE : TBits_1; inline;
  70856. begin
  70857. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  70858. end;
  70859. procedure TCAN1_C1FIFOINT4.setw(thebits : TBits_32); inline;
  70860. begin
  70861. pTDefRegMap(@Self)^.val := thebits;
  70862. end;
  70863. function TCAN1_C1FIFOINT4.getw : TBits_32; inline;
  70864. begin
  70865. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70866. end;
  70867. procedure TCAN1_C1FIFOCI4.setCFIFOCI(thebits : TBits_5); inline;
  70868. begin
  70869. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  70870. end;
  70871. function TCAN1_C1FIFOCI4.getCFIFOCI : TBits_5; inline;
  70872. begin
  70873. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  70874. end;
  70875. procedure TCAN1_C1FIFOCI4.setw(thebits : TBits_32); inline;
  70876. begin
  70877. pTDefRegMap(@Self)^.val := thebits;
  70878. end;
  70879. function TCAN1_C1FIFOCI4.getw : TBits_32; inline;
  70880. begin
  70881. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70882. end;
  70883. procedure TCAN1_C1FIFOCON5.setTXPRI(thebits : TBits_2); inline;
  70884. begin
  70885. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  70886. end;
  70887. function TCAN1_C1FIFOCON5.getTXPRI : TBits_2; inline;
  70888. begin
  70889. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  70890. end;
  70891. procedure TCAN1_C1FIFOCON5.setRTREN; inline;
  70892. begin
  70893. pTDefRegMap(@Self)^.&set := $00000004;
  70894. end;
  70895. procedure TCAN1_C1FIFOCON5.clearRTREN; inline;
  70896. begin
  70897. pTDefRegMap(@Self)^.clr := $00000004;
  70898. end;
  70899. procedure TCAN1_C1FIFOCON5.setRTREN(thebits : TBits_1); inline;
  70900. begin
  70901. if thebits = 0 then
  70902. pTDefRegMap(@Self)^.clr := $00000004
  70903. else
  70904. pTDefRegMap(@Self)^.&set := $00000004;
  70905. end;
  70906. function TCAN1_C1FIFOCON5.getRTREN : TBits_1; inline;
  70907. begin
  70908. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70909. end;
  70910. procedure TCAN1_C1FIFOCON5.setTXREQ; inline;
  70911. begin
  70912. pTDefRegMap(@Self)^.&set := $00000008;
  70913. end;
  70914. procedure TCAN1_C1FIFOCON5.clearTXREQ; inline;
  70915. begin
  70916. pTDefRegMap(@Self)^.clr := $00000008;
  70917. end;
  70918. procedure TCAN1_C1FIFOCON5.setTXREQ(thebits : TBits_1); inline;
  70919. begin
  70920. if thebits = 0 then
  70921. pTDefRegMap(@Self)^.clr := $00000008
  70922. else
  70923. pTDefRegMap(@Self)^.&set := $00000008;
  70924. end;
  70925. function TCAN1_C1FIFOCON5.getTXREQ : TBits_1; inline;
  70926. begin
  70927. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70928. end;
  70929. procedure TCAN1_C1FIFOCON5.setTXERR; inline;
  70930. begin
  70931. pTDefRegMap(@Self)^.&set := $00000010;
  70932. end;
  70933. procedure TCAN1_C1FIFOCON5.clearTXERR; inline;
  70934. begin
  70935. pTDefRegMap(@Self)^.clr := $00000010;
  70936. end;
  70937. procedure TCAN1_C1FIFOCON5.setTXERR(thebits : TBits_1); inline;
  70938. begin
  70939. if thebits = 0 then
  70940. pTDefRegMap(@Self)^.clr := $00000010
  70941. else
  70942. pTDefRegMap(@Self)^.&set := $00000010;
  70943. end;
  70944. function TCAN1_C1FIFOCON5.getTXERR : TBits_1; inline;
  70945. begin
  70946. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70947. end;
  70948. procedure TCAN1_C1FIFOCON5.setTXLARB; inline;
  70949. begin
  70950. pTDefRegMap(@Self)^.&set := $00000020;
  70951. end;
  70952. procedure TCAN1_C1FIFOCON5.clearTXLARB; inline;
  70953. begin
  70954. pTDefRegMap(@Self)^.clr := $00000020;
  70955. end;
  70956. procedure TCAN1_C1FIFOCON5.setTXLARB(thebits : TBits_1); inline;
  70957. begin
  70958. if thebits = 0 then
  70959. pTDefRegMap(@Self)^.clr := $00000020
  70960. else
  70961. pTDefRegMap(@Self)^.&set := $00000020;
  70962. end;
  70963. function TCAN1_C1FIFOCON5.getTXLARB : TBits_1; inline;
  70964. begin
  70965. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70966. end;
  70967. procedure TCAN1_C1FIFOCON5.setTXABAT; inline;
  70968. begin
  70969. pTDefRegMap(@Self)^.&set := $00000040;
  70970. end;
  70971. procedure TCAN1_C1FIFOCON5.clearTXABAT; inline;
  70972. begin
  70973. pTDefRegMap(@Self)^.clr := $00000040;
  70974. end;
  70975. procedure TCAN1_C1FIFOCON5.setTXABAT(thebits : TBits_1); inline;
  70976. begin
  70977. if thebits = 0 then
  70978. pTDefRegMap(@Self)^.clr := $00000040
  70979. else
  70980. pTDefRegMap(@Self)^.&set := $00000040;
  70981. end;
  70982. function TCAN1_C1FIFOCON5.getTXABAT : TBits_1; inline;
  70983. begin
  70984. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70985. end;
  70986. procedure TCAN1_C1FIFOCON5.setTXEN; inline;
  70987. begin
  70988. pTDefRegMap(@Self)^.&set := $00000080;
  70989. end;
  70990. procedure TCAN1_C1FIFOCON5.clearTXEN; inline;
  70991. begin
  70992. pTDefRegMap(@Self)^.clr := $00000080;
  70993. end;
  70994. procedure TCAN1_C1FIFOCON5.setTXEN(thebits : TBits_1); inline;
  70995. begin
  70996. if thebits = 0 then
  70997. pTDefRegMap(@Self)^.clr := $00000080
  70998. else
  70999. pTDefRegMap(@Self)^.&set := $00000080;
  71000. end;
  71001. function TCAN1_C1FIFOCON5.getTXEN : TBits_1; inline;
  71002. begin
  71003. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71004. end;
  71005. procedure TCAN1_C1FIFOCON5.setDONLY; inline;
  71006. begin
  71007. pTDefRegMap(@Self)^.&set := $00001000;
  71008. end;
  71009. procedure TCAN1_C1FIFOCON5.clearDONLY; inline;
  71010. begin
  71011. pTDefRegMap(@Self)^.clr := $00001000;
  71012. end;
  71013. procedure TCAN1_C1FIFOCON5.setDONLY(thebits : TBits_1); inline;
  71014. begin
  71015. if thebits = 0 then
  71016. pTDefRegMap(@Self)^.clr := $00001000
  71017. else
  71018. pTDefRegMap(@Self)^.&set := $00001000;
  71019. end;
  71020. function TCAN1_C1FIFOCON5.getDONLY : TBits_1; inline;
  71021. begin
  71022. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  71023. end;
  71024. procedure TCAN1_C1FIFOCON5.setUINC; inline;
  71025. begin
  71026. pTDefRegMap(@Self)^.&set := $00002000;
  71027. end;
  71028. procedure TCAN1_C1FIFOCON5.clearUINC; inline;
  71029. begin
  71030. pTDefRegMap(@Self)^.clr := $00002000;
  71031. end;
  71032. procedure TCAN1_C1FIFOCON5.setUINC(thebits : TBits_1); inline;
  71033. begin
  71034. if thebits = 0 then
  71035. pTDefRegMap(@Self)^.clr := $00002000
  71036. else
  71037. pTDefRegMap(@Self)^.&set := $00002000;
  71038. end;
  71039. function TCAN1_C1FIFOCON5.getUINC : TBits_1; inline;
  71040. begin
  71041. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  71042. end;
  71043. procedure TCAN1_C1FIFOCON5.setFRESET; inline;
  71044. begin
  71045. pTDefRegMap(@Self)^.&set := $00004000;
  71046. end;
  71047. procedure TCAN1_C1FIFOCON5.clearFRESET; inline;
  71048. begin
  71049. pTDefRegMap(@Self)^.clr := $00004000;
  71050. end;
  71051. procedure TCAN1_C1FIFOCON5.setFRESET(thebits : TBits_1); inline;
  71052. begin
  71053. if thebits = 0 then
  71054. pTDefRegMap(@Self)^.clr := $00004000
  71055. else
  71056. pTDefRegMap(@Self)^.&set := $00004000;
  71057. end;
  71058. function TCAN1_C1FIFOCON5.getFRESET : TBits_1; inline;
  71059. begin
  71060. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  71061. end;
  71062. procedure TCAN1_C1FIFOCON5.setFSIZE(thebits : TBits_5); inline;
  71063. begin
  71064. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  71065. end;
  71066. function TCAN1_C1FIFOCON5.getFSIZE : TBits_5; inline;
  71067. begin
  71068. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  71069. end;
  71070. procedure TCAN1_C1FIFOCON5.setw(thebits : TBits_32); inline;
  71071. begin
  71072. pTDefRegMap(@Self)^.val := thebits;
  71073. end;
  71074. function TCAN1_C1FIFOCON5.getw : TBits_32; inline;
  71075. begin
  71076. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71077. end;
  71078. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIF; inline;
  71079. begin
  71080. pTDefRegMap(@Self)^.&set := $00000001;
  71081. end;
  71082. procedure TCAN1_C1FIFOINT5.clearRXNEMPTYIF; inline;
  71083. begin
  71084. pTDefRegMap(@Self)^.clr := $00000001;
  71085. end;
  71086. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIF(thebits : TBits_1); inline;
  71087. begin
  71088. if thebits = 0 then
  71089. pTDefRegMap(@Self)^.clr := $00000001
  71090. else
  71091. pTDefRegMap(@Self)^.&set := $00000001;
  71092. end;
  71093. function TCAN1_C1FIFOINT5.getRXNEMPTYIF : TBits_1; inline;
  71094. begin
  71095. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  71096. end;
  71097. procedure TCAN1_C1FIFOINT5.setRXHALFIF; inline;
  71098. begin
  71099. pTDefRegMap(@Self)^.&set := $00000002;
  71100. end;
  71101. procedure TCAN1_C1FIFOINT5.clearRXHALFIF; inline;
  71102. begin
  71103. pTDefRegMap(@Self)^.clr := $00000002;
  71104. end;
  71105. procedure TCAN1_C1FIFOINT5.setRXHALFIF(thebits : TBits_1); inline;
  71106. begin
  71107. if thebits = 0 then
  71108. pTDefRegMap(@Self)^.clr := $00000002
  71109. else
  71110. pTDefRegMap(@Self)^.&set := $00000002;
  71111. end;
  71112. function TCAN1_C1FIFOINT5.getRXHALFIF : TBits_1; inline;
  71113. begin
  71114. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  71115. end;
  71116. procedure TCAN1_C1FIFOINT5.setRXFULLIF; inline;
  71117. begin
  71118. pTDefRegMap(@Self)^.&set := $00000004;
  71119. end;
  71120. procedure TCAN1_C1FIFOINT5.clearRXFULLIF; inline;
  71121. begin
  71122. pTDefRegMap(@Self)^.clr := $00000004;
  71123. end;
  71124. procedure TCAN1_C1FIFOINT5.setRXFULLIF(thebits : TBits_1); inline;
  71125. begin
  71126. if thebits = 0 then
  71127. pTDefRegMap(@Self)^.clr := $00000004
  71128. else
  71129. pTDefRegMap(@Self)^.&set := $00000004;
  71130. end;
  71131. function TCAN1_C1FIFOINT5.getRXFULLIF : TBits_1; inline;
  71132. begin
  71133. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71134. end;
  71135. procedure TCAN1_C1FIFOINT5.setRXOVFLIF; inline;
  71136. begin
  71137. pTDefRegMap(@Self)^.&set := $00000008;
  71138. end;
  71139. procedure TCAN1_C1FIFOINT5.clearRXOVFLIF; inline;
  71140. begin
  71141. pTDefRegMap(@Self)^.clr := $00000008;
  71142. end;
  71143. procedure TCAN1_C1FIFOINT5.setRXOVFLIF(thebits : TBits_1); inline;
  71144. begin
  71145. if thebits = 0 then
  71146. pTDefRegMap(@Self)^.clr := $00000008
  71147. else
  71148. pTDefRegMap(@Self)^.&set := $00000008;
  71149. end;
  71150. function TCAN1_C1FIFOINT5.getRXOVFLIF : TBits_1; inline;
  71151. begin
  71152. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71153. end;
  71154. procedure TCAN1_C1FIFOINT5.setTXEMPTYIF; inline;
  71155. begin
  71156. pTDefRegMap(@Self)^.&set := $00000100;
  71157. end;
  71158. procedure TCAN1_C1FIFOINT5.clearTXEMPTYIF; inline;
  71159. begin
  71160. pTDefRegMap(@Self)^.clr := $00000100;
  71161. end;
  71162. procedure TCAN1_C1FIFOINT5.setTXEMPTYIF(thebits : TBits_1); inline;
  71163. begin
  71164. if thebits = 0 then
  71165. pTDefRegMap(@Self)^.clr := $00000100
  71166. else
  71167. pTDefRegMap(@Self)^.&set := $00000100;
  71168. end;
  71169. function TCAN1_C1FIFOINT5.getTXEMPTYIF : TBits_1; inline;
  71170. begin
  71171. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71172. end;
  71173. procedure TCAN1_C1FIFOINT5.setTXHALFIF; inline;
  71174. begin
  71175. pTDefRegMap(@Self)^.&set := $00000200;
  71176. end;
  71177. procedure TCAN1_C1FIFOINT5.clearTXHALFIF; inline;
  71178. begin
  71179. pTDefRegMap(@Self)^.clr := $00000200;
  71180. end;
  71181. procedure TCAN1_C1FIFOINT5.setTXHALFIF(thebits : TBits_1); inline;
  71182. begin
  71183. if thebits = 0 then
  71184. pTDefRegMap(@Self)^.clr := $00000200
  71185. else
  71186. pTDefRegMap(@Self)^.&set := $00000200;
  71187. end;
  71188. function TCAN1_C1FIFOINT5.getTXHALFIF : TBits_1; inline;
  71189. begin
  71190. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71191. end;
  71192. procedure TCAN1_C1FIFOINT5.setTXNFULLIF; inline;
  71193. begin
  71194. pTDefRegMap(@Self)^.&set := $00000400;
  71195. end;
  71196. procedure TCAN1_C1FIFOINT5.clearTXNFULLIF; inline;
  71197. begin
  71198. pTDefRegMap(@Self)^.clr := $00000400;
  71199. end;
  71200. procedure TCAN1_C1FIFOINT5.setTXNFULLIF(thebits : TBits_1); inline;
  71201. begin
  71202. if thebits = 0 then
  71203. pTDefRegMap(@Self)^.clr := $00000400
  71204. else
  71205. pTDefRegMap(@Self)^.&set := $00000400;
  71206. end;
  71207. function TCAN1_C1FIFOINT5.getTXNFULLIF : TBits_1; inline;
  71208. begin
  71209. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  71210. end;
  71211. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIE; inline;
  71212. begin
  71213. pTDefRegMap(@Self)^.&set := $00010000;
  71214. end;
  71215. procedure TCAN1_C1FIFOINT5.clearRXNEMPTYIE; inline;
  71216. begin
  71217. pTDefRegMap(@Self)^.clr := $00010000;
  71218. end;
  71219. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIE(thebits : TBits_1); inline;
  71220. begin
  71221. if thebits = 0 then
  71222. pTDefRegMap(@Self)^.clr := $00010000
  71223. else
  71224. pTDefRegMap(@Self)^.&set := $00010000;
  71225. end;
  71226. function TCAN1_C1FIFOINT5.getRXNEMPTYIE : TBits_1; inline;
  71227. begin
  71228. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  71229. end;
  71230. procedure TCAN1_C1FIFOINT5.setRXHALFIE; inline;
  71231. begin
  71232. pTDefRegMap(@Self)^.&set := $00020000;
  71233. end;
  71234. procedure TCAN1_C1FIFOINT5.clearRXHALFIE; inline;
  71235. begin
  71236. pTDefRegMap(@Self)^.clr := $00020000;
  71237. end;
  71238. procedure TCAN1_C1FIFOINT5.setRXHALFIE(thebits : TBits_1); inline;
  71239. begin
  71240. if thebits = 0 then
  71241. pTDefRegMap(@Self)^.clr := $00020000
  71242. else
  71243. pTDefRegMap(@Self)^.&set := $00020000;
  71244. end;
  71245. function TCAN1_C1FIFOINT5.getRXHALFIE : TBits_1; inline;
  71246. begin
  71247. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  71248. end;
  71249. procedure TCAN1_C1FIFOINT5.setRXFULLIE; inline;
  71250. begin
  71251. pTDefRegMap(@Self)^.&set := $00040000;
  71252. end;
  71253. procedure TCAN1_C1FIFOINT5.clearRXFULLIE; inline;
  71254. begin
  71255. pTDefRegMap(@Self)^.clr := $00040000;
  71256. end;
  71257. procedure TCAN1_C1FIFOINT5.setRXFULLIE(thebits : TBits_1); inline;
  71258. begin
  71259. if thebits = 0 then
  71260. pTDefRegMap(@Self)^.clr := $00040000
  71261. else
  71262. pTDefRegMap(@Self)^.&set := $00040000;
  71263. end;
  71264. function TCAN1_C1FIFOINT5.getRXFULLIE : TBits_1; inline;
  71265. begin
  71266. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  71267. end;
  71268. procedure TCAN1_C1FIFOINT5.setRXOVFLIE; inline;
  71269. begin
  71270. pTDefRegMap(@Self)^.&set := $00080000;
  71271. end;
  71272. procedure TCAN1_C1FIFOINT5.clearRXOVFLIE; inline;
  71273. begin
  71274. pTDefRegMap(@Self)^.clr := $00080000;
  71275. end;
  71276. procedure TCAN1_C1FIFOINT5.setRXOVFLIE(thebits : TBits_1); inline;
  71277. begin
  71278. if thebits = 0 then
  71279. pTDefRegMap(@Self)^.clr := $00080000
  71280. else
  71281. pTDefRegMap(@Self)^.&set := $00080000;
  71282. end;
  71283. function TCAN1_C1FIFOINT5.getRXOVFLIE : TBits_1; inline;
  71284. begin
  71285. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  71286. end;
  71287. procedure TCAN1_C1FIFOINT5.setTXEMPTYIE; inline;
  71288. begin
  71289. pTDefRegMap(@Self)^.&set := $01000000;
  71290. end;
  71291. procedure TCAN1_C1FIFOINT5.clearTXEMPTYIE; inline;
  71292. begin
  71293. pTDefRegMap(@Self)^.clr := $01000000;
  71294. end;
  71295. procedure TCAN1_C1FIFOINT5.setTXEMPTYIE(thebits : TBits_1); inline;
  71296. begin
  71297. if thebits = 0 then
  71298. pTDefRegMap(@Self)^.clr := $01000000
  71299. else
  71300. pTDefRegMap(@Self)^.&set := $01000000;
  71301. end;
  71302. function TCAN1_C1FIFOINT5.getTXEMPTYIE : TBits_1; inline;
  71303. begin
  71304. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  71305. end;
  71306. procedure TCAN1_C1FIFOINT5.setTXHALFIE; inline;
  71307. begin
  71308. pTDefRegMap(@Self)^.&set := $02000000;
  71309. end;
  71310. procedure TCAN1_C1FIFOINT5.clearTXHALFIE; inline;
  71311. begin
  71312. pTDefRegMap(@Self)^.clr := $02000000;
  71313. end;
  71314. procedure TCAN1_C1FIFOINT5.setTXHALFIE(thebits : TBits_1); inline;
  71315. begin
  71316. if thebits = 0 then
  71317. pTDefRegMap(@Self)^.clr := $02000000
  71318. else
  71319. pTDefRegMap(@Self)^.&set := $02000000;
  71320. end;
  71321. function TCAN1_C1FIFOINT5.getTXHALFIE : TBits_1; inline;
  71322. begin
  71323. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  71324. end;
  71325. procedure TCAN1_C1FIFOINT5.setTXNFULLIE; inline;
  71326. begin
  71327. pTDefRegMap(@Self)^.&set := $04000000;
  71328. end;
  71329. procedure TCAN1_C1FIFOINT5.clearTXNFULLIE; inline;
  71330. begin
  71331. pTDefRegMap(@Self)^.clr := $04000000;
  71332. end;
  71333. procedure TCAN1_C1FIFOINT5.setTXNFULLIE(thebits : TBits_1); inline;
  71334. begin
  71335. if thebits = 0 then
  71336. pTDefRegMap(@Self)^.clr := $04000000
  71337. else
  71338. pTDefRegMap(@Self)^.&set := $04000000;
  71339. end;
  71340. function TCAN1_C1FIFOINT5.getTXNFULLIE : TBits_1; inline;
  71341. begin
  71342. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  71343. end;
  71344. procedure TCAN1_C1FIFOINT5.setw(thebits : TBits_32); inline;
  71345. begin
  71346. pTDefRegMap(@Self)^.val := thebits;
  71347. end;
  71348. function TCAN1_C1FIFOINT5.getw : TBits_32; inline;
  71349. begin
  71350. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71351. end;
  71352. procedure TCAN1_C1FIFOCI5.setCFIFOCI(thebits : TBits_5); inline;
  71353. begin
  71354. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  71355. end;
  71356. function TCAN1_C1FIFOCI5.getCFIFOCI : TBits_5; inline;
  71357. begin
  71358. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  71359. end;
  71360. procedure TCAN1_C1FIFOCI5.setw(thebits : TBits_32); inline;
  71361. begin
  71362. pTDefRegMap(@Self)^.val := thebits;
  71363. end;
  71364. function TCAN1_C1FIFOCI5.getw : TBits_32; inline;
  71365. begin
  71366. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71367. end;
  71368. procedure TCAN1_C1FIFOCON6.setTXPRI(thebits : TBits_2); inline;
  71369. begin
  71370. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  71371. end;
  71372. function TCAN1_C1FIFOCON6.getTXPRI : TBits_2; inline;
  71373. begin
  71374. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  71375. end;
  71376. procedure TCAN1_C1FIFOCON6.setRTREN; inline;
  71377. begin
  71378. pTDefRegMap(@Self)^.&set := $00000004;
  71379. end;
  71380. procedure TCAN1_C1FIFOCON6.clearRTREN; inline;
  71381. begin
  71382. pTDefRegMap(@Self)^.clr := $00000004;
  71383. end;
  71384. procedure TCAN1_C1FIFOCON6.setRTREN(thebits : TBits_1); inline;
  71385. begin
  71386. if thebits = 0 then
  71387. pTDefRegMap(@Self)^.clr := $00000004
  71388. else
  71389. pTDefRegMap(@Self)^.&set := $00000004;
  71390. end;
  71391. function TCAN1_C1FIFOCON6.getRTREN : TBits_1; inline;
  71392. begin
  71393. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71394. end;
  71395. procedure TCAN1_C1FIFOCON6.setTXREQ; inline;
  71396. begin
  71397. pTDefRegMap(@Self)^.&set := $00000008;
  71398. end;
  71399. procedure TCAN1_C1FIFOCON6.clearTXREQ; inline;
  71400. begin
  71401. pTDefRegMap(@Self)^.clr := $00000008;
  71402. end;
  71403. procedure TCAN1_C1FIFOCON6.setTXREQ(thebits : TBits_1); inline;
  71404. begin
  71405. if thebits = 0 then
  71406. pTDefRegMap(@Self)^.clr := $00000008
  71407. else
  71408. pTDefRegMap(@Self)^.&set := $00000008;
  71409. end;
  71410. function TCAN1_C1FIFOCON6.getTXREQ : TBits_1; inline;
  71411. begin
  71412. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71413. end;
  71414. procedure TCAN1_C1FIFOCON6.setTXERR; inline;
  71415. begin
  71416. pTDefRegMap(@Self)^.&set := $00000010;
  71417. end;
  71418. procedure TCAN1_C1FIFOCON6.clearTXERR; inline;
  71419. begin
  71420. pTDefRegMap(@Self)^.clr := $00000010;
  71421. end;
  71422. procedure TCAN1_C1FIFOCON6.setTXERR(thebits : TBits_1); inline;
  71423. begin
  71424. if thebits = 0 then
  71425. pTDefRegMap(@Self)^.clr := $00000010
  71426. else
  71427. pTDefRegMap(@Self)^.&set := $00000010;
  71428. end;
  71429. function TCAN1_C1FIFOCON6.getTXERR : TBits_1; inline;
  71430. begin
  71431. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71432. end;
  71433. procedure TCAN1_C1FIFOCON6.setTXLARB; inline;
  71434. begin
  71435. pTDefRegMap(@Self)^.&set := $00000020;
  71436. end;
  71437. procedure TCAN1_C1FIFOCON6.clearTXLARB; inline;
  71438. begin
  71439. pTDefRegMap(@Self)^.clr := $00000020;
  71440. end;
  71441. procedure TCAN1_C1FIFOCON6.setTXLARB(thebits : TBits_1); inline;
  71442. begin
  71443. if thebits = 0 then
  71444. pTDefRegMap(@Self)^.clr := $00000020
  71445. else
  71446. pTDefRegMap(@Self)^.&set := $00000020;
  71447. end;
  71448. function TCAN1_C1FIFOCON6.getTXLARB : TBits_1; inline;
  71449. begin
  71450. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71451. end;
  71452. procedure TCAN1_C1FIFOCON6.setTXABAT; inline;
  71453. begin
  71454. pTDefRegMap(@Self)^.&set := $00000040;
  71455. end;
  71456. procedure TCAN1_C1FIFOCON6.clearTXABAT; inline;
  71457. begin
  71458. pTDefRegMap(@Self)^.clr := $00000040;
  71459. end;
  71460. procedure TCAN1_C1FIFOCON6.setTXABAT(thebits : TBits_1); inline;
  71461. begin
  71462. if thebits = 0 then
  71463. pTDefRegMap(@Self)^.clr := $00000040
  71464. else
  71465. pTDefRegMap(@Self)^.&set := $00000040;
  71466. end;
  71467. function TCAN1_C1FIFOCON6.getTXABAT : TBits_1; inline;
  71468. begin
  71469. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71470. end;
  71471. procedure TCAN1_C1FIFOCON6.setTXEN; inline;
  71472. begin
  71473. pTDefRegMap(@Self)^.&set := $00000080;
  71474. end;
  71475. procedure TCAN1_C1FIFOCON6.clearTXEN; inline;
  71476. begin
  71477. pTDefRegMap(@Self)^.clr := $00000080;
  71478. end;
  71479. procedure TCAN1_C1FIFOCON6.setTXEN(thebits : TBits_1); inline;
  71480. begin
  71481. if thebits = 0 then
  71482. pTDefRegMap(@Self)^.clr := $00000080
  71483. else
  71484. pTDefRegMap(@Self)^.&set := $00000080;
  71485. end;
  71486. function TCAN1_C1FIFOCON6.getTXEN : TBits_1; inline;
  71487. begin
  71488. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71489. end;
  71490. procedure TCAN1_C1FIFOCON6.setDONLY; inline;
  71491. begin
  71492. pTDefRegMap(@Self)^.&set := $00001000;
  71493. end;
  71494. procedure TCAN1_C1FIFOCON6.clearDONLY; inline;
  71495. begin
  71496. pTDefRegMap(@Self)^.clr := $00001000;
  71497. end;
  71498. procedure TCAN1_C1FIFOCON6.setDONLY(thebits : TBits_1); inline;
  71499. begin
  71500. if thebits = 0 then
  71501. pTDefRegMap(@Self)^.clr := $00001000
  71502. else
  71503. pTDefRegMap(@Self)^.&set := $00001000;
  71504. end;
  71505. function TCAN1_C1FIFOCON6.getDONLY : TBits_1; inline;
  71506. begin
  71507. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  71508. end;
  71509. procedure TCAN1_C1FIFOCON6.setUINC; inline;
  71510. begin
  71511. pTDefRegMap(@Self)^.&set := $00002000;
  71512. end;
  71513. procedure TCAN1_C1FIFOCON6.clearUINC; inline;
  71514. begin
  71515. pTDefRegMap(@Self)^.clr := $00002000;
  71516. end;
  71517. procedure TCAN1_C1FIFOCON6.setUINC(thebits : TBits_1); inline;
  71518. begin
  71519. if thebits = 0 then
  71520. pTDefRegMap(@Self)^.clr := $00002000
  71521. else
  71522. pTDefRegMap(@Self)^.&set := $00002000;
  71523. end;
  71524. function TCAN1_C1FIFOCON6.getUINC : TBits_1; inline;
  71525. begin
  71526. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  71527. end;
  71528. procedure TCAN1_C1FIFOCON6.setFRESET; inline;
  71529. begin
  71530. pTDefRegMap(@Self)^.&set := $00004000;
  71531. end;
  71532. procedure TCAN1_C1FIFOCON6.clearFRESET; inline;
  71533. begin
  71534. pTDefRegMap(@Self)^.clr := $00004000;
  71535. end;
  71536. procedure TCAN1_C1FIFOCON6.setFRESET(thebits : TBits_1); inline;
  71537. begin
  71538. if thebits = 0 then
  71539. pTDefRegMap(@Self)^.clr := $00004000
  71540. else
  71541. pTDefRegMap(@Self)^.&set := $00004000;
  71542. end;
  71543. function TCAN1_C1FIFOCON6.getFRESET : TBits_1; inline;
  71544. begin
  71545. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  71546. end;
  71547. procedure TCAN1_C1FIFOCON6.setFSIZE(thebits : TBits_5); inline;
  71548. begin
  71549. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  71550. end;
  71551. function TCAN1_C1FIFOCON6.getFSIZE : TBits_5; inline;
  71552. begin
  71553. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  71554. end;
  71555. procedure TCAN1_C1FIFOCON6.setw(thebits : TBits_32); inline;
  71556. begin
  71557. pTDefRegMap(@Self)^.val := thebits;
  71558. end;
  71559. function TCAN1_C1FIFOCON6.getw : TBits_32; inline;
  71560. begin
  71561. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71562. end;
  71563. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIF; inline;
  71564. begin
  71565. pTDefRegMap(@Self)^.&set := $00000001;
  71566. end;
  71567. procedure TCAN1_C1FIFOINT6.clearRXNEMPTYIF; inline;
  71568. begin
  71569. pTDefRegMap(@Self)^.clr := $00000001;
  71570. end;
  71571. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIF(thebits : TBits_1); inline;
  71572. begin
  71573. if thebits = 0 then
  71574. pTDefRegMap(@Self)^.clr := $00000001
  71575. else
  71576. pTDefRegMap(@Self)^.&set := $00000001;
  71577. end;
  71578. function TCAN1_C1FIFOINT6.getRXNEMPTYIF : TBits_1; inline;
  71579. begin
  71580. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  71581. end;
  71582. procedure TCAN1_C1FIFOINT6.setRXHALFIF; inline;
  71583. begin
  71584. pTDefRegMap(@Self)^.&set := $00000002;
  71585. end;
  71586. procedure TCAN1_C1FIFOINT6.clearRXHALFIF; inline;
  71587. begin
  71588. pTDefRegMap(@Self)^.clr := $00000002;
  71589. end;
  71590. procedure TCAN1_C1FIFOINT6.setRXHALFIF(thebits : TBits_1); inline;
  71591. begin
  71592. if thebits = 0 then
  71593. pTDefRegMap(@Self)^.clr := $00000002
  71594. else
  71595. pTDefRegMap(@Self)^.&set := $00000002;
  71596. end;
  71597. function TCAN1_C1FIFOINT6.getRXHALFIF : TBits_1; inline;
  71598. begin
  71599. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  71600. end;
  71601. procedure TCAN1_C1FIFOINT6.setRXFULLIF; inline;
  71602. begin
  71603. pTDefRegMap(@Self)^.&set := $00000004;
  71604. end;
  71605. procedure TCAN1_C1FIFOINT6.clearRXFULLIF; inline;
  71606. begin
  71607. pTDefRegMap(@Self)^.clr := $00000004;
  71608. end;
  71609. procedure TCAN1_C1FIFOINT6.setRXFULLIF(thebits : TBits_1); inline;
  71610. begin
  71611. if thebits = 0 then
  71612. pTDefRegMap(@Self)^.clr := $00000004
  71613. else
  71614. pTDefRegMap(@Self)^.&set := $00000004;
  71615. end;
  71616. function TCAN1_C1FIFOINT6.getRXFULLIF : TBits_1; inline;
  71617. begin
  71618. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71619. end;
  71620. procedure TCAN1_C1FIFOINT6.setRXOVFLIF; inline;
  71621. begin
  71622. pTDefRegMap(@Self)^.&set := $00000008;
  71623. end;
  71624. procedure TCAN1_C1FIFOINT6.clearRXOVFLIF; inline;
  71625. begin
  71626. pTDefRegMap(@Self)^.clr := $00000008;
  71627. end;
  71628. procedure TCAN1_C1FIFOINT6.setRXOVFLIF(thebits : TBits_1); inline;
  71629. begin
  71630. if thebits = 0 then
  71631. pTDefRegMap(@Self)^.clr := $00000008
  71632. else
  71633. pTDefRegMap(@Self)^.&set := $00000008;
  71634. end;
  71635. function TCAN1_C1FIFOINT6.getRXOVFLIF : TBits_1; inline;
  71636. begin
  71637. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71638. end;
  71639. procedure TCAN1_C1FIFOINT6.setTXEMPTYIF; inline;
  71640. begin
  71641. pTDefRegMap(@Self)^.&set := $00000100;
  71642. end;
  71643. procedure TCAN1_C1FIFOINT6.clearTXEMPTYIF; inline;
  71644. begin
  71645. pTDefRegMap(@Self)^.clr := $00000100;
  71646. end;
  71647. procedure TCAN1_C1FIFOINT6.setTXEMPTYIF(thebits : TBits_1); inline;
  71648. begin
  71649. if thebits = 0 then
  71650. pTDefRegMap(@Self)^.clr := $00000100
  71651. else
  71652. pTDefRegMap(@Self)^.&set := $00000100;
  71653. end;
  71654. function TCAN1_C1FIFOINT6.getTXEMPTYIF : TBits_1; inline;
  71655. begin
  71656. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71657. end;
  71658. procedure TCAN1_C1FIFOINT6.setTXHALFIF; inline;
  71659. begin
  71660. pTDefRegMap(@Self)^.&set := $00000200;
  71661. end;
  71662. procedure TCAN1_C1FIFOINT6.clearTXHALFIF; inline;
  71663. begin
  71664. pTDefRegMap(@Self)^.clr := $00000200;
  71665. end;
  71666. procedure TCAN1_C1FIFOINT6.setTXHALFIF(thebits : TBits_1); inline;
  71667. begin
  71668. if thebits = 0 then
  71669. pTDefRegMap(@Self)^.clr := $00000200
  71670. else
  71671. pTDefRegMap(@Self)^.&set := $00000200;
  71672. end;
  71673. function TCAN1_C1FIFOINT6.getTXHALFIF : TBits_1; inline;
  71674. begin
  71675. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71676. end;
  71677. procedure TCAN1_C1FIFOINT6.setTXNFULLIF; inline;
  71678. begin
  71679. pTDefRegMap(@Self)^.&set := $00000400;
  71680. end;
  71681. procedure TCAN1_C1FIFOINT6.clearTXNFULLIF; inline;
  71682. begin
  71683. pTDefRegMap(@Self)^.clr := $00000400;
  71684. end;
  71685. procedure TCAN1_C1FIFOINT6.setTXNFULLIF(thebits : TBits_1); inline;
  71686. begin
  71687. if thebits = 0 then
  71688. pTDefRegMap(@Self)^.clr := $00000400
  71689. else
  71690. pTDefRegMap(@Self)^.&set := $00000400;
  71691. end;
  71692. function TCAN1_C1FIFOINT6.getTXNFULLIF : TBits_1; inline;
  71693. begin
  71694. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  71695. end;
  71696. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIE; inline;
  71697. begin
  71698. pTDefRegMap(@Self)^.&set := $00010000;
  71699. end;
  71700. procedure TCAN1_C1FIFOINT6.clearRXNEMPTYIE; inline;
  71701. begin
  71702. pTDefRegMap(@Self)^.clr := $00010000;
  71703. end;
  71704. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIE(thebits : TBits_1); inline;
  71705. begin
  71706. if thebits = 0 then
  71707. pTDefRegMap(@Self)^.clr := $00010000
  71708. else
  71709. pTDefRegMap(@Self)^.&set := $00010000;
  71710. end;
  71711. function TCAN1_C1FIFOINT6.getRXNEMPTYIE : TBits_1; inline;
  71712. begin
  71713. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  71714. end;
  71715. procedure TCAN1_C1FIFOINT6.setRXHALFIE; inline;
  71716. begin
  71717. pTDefRegMap(@Self)^.&set := $00020000;
  71718. end;
  71719. procedure TCAN1_C1FIFOINT6.clearRXHALFIE; inline;
  71720. begin
  71721. pTDefRegMap(@Self)^.clr := $00020000;
  71722. end;
  71723. procedure TCAN1_C1FIFOINT6.setRXHALFIE(thebits : TBits_1); inline;
  71724. begin
  71725. if thebits = 0 then
  71726. pTDefRegMap(@Self)^.clr := $00020000
  71727. else
  71728. pTDefRegMap(@Self)^.&set := $00020000;
  71729. end;
  71730. function TCAN1_C1FIFOINT6.getRXHALFIE : TBits_1; inline;
  71731. begin
  71732. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  71733. end;
  71734. procedure TCAN1_C1FIFOINT6.setRXFULLIE; inline;
  71735. begin
  71736. pTDefRegMap(@Self)^.&set := $00040000;
  71737. end;
  71738. procedure TCAN1_C1FIFOINT6.clearRXFULLIE; inline;
  71739. begin
  71740. pTDefRegMap(@Self)^.clr := $00040000;
  71741. end;
  71742. procedure TCAN1_C1FIFOINT6.setRXFULLIE(thebits : TBits_1); inline;
  71743. begin
  71744. if thebits = 0 then
  71745. pTDefRegMap(@Self)^.clr := $00040000
  71746. else
  71747. pTDefRegMap(@Self)^.&set := $00040000;
  71748. end;
  71749. function TCAN1_C1FIFOINT6.getRXFULLIE : TBits_1; inline;
  71750. begin
  71751. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  71752. end;
  71753. procedure TCAN1_C1FIFOINT6.setRXOVFLIE; inline;
  71754. begin
  71755. pTDefRegMap(@Self)^.&set := $00080000;
  71756. end;
  71757. procedure TCAN1_C1FIFOINT6.clearRXOVFLIE; inline;
  71758. begin
  71759. pTDefRegMap(@Self)^.clr := $00080000;
  71760. end;
  71761. procedure TCAN1_C1FIFOINT6.setRXOVFLIE(thebits : TBits_1); inline;
  71762. begin
  71763. if thebits = 0 then
  71764. pTDefRegMap(@Self)^.clr := $00080000
  71765. else
  71766. pTDefRegMap(@Self)^.&set := $00080000;
  71767. end;
  71768. function TCAN1_C1FIFOINT6.getRXOVFLIE : TBits_1; inline;
  71769. begin
  71770. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  71771. end;
  71772. procedure TCAN1_C1FIFOINT6.setTXEMPTYIE; inline;
  71773. begin
  71774. pTDefRegMap(@Self)^.&set := $01000000;
  71775. end;
  71776. procedure TCAN1_C1FIFOINT6.clearTXEMPTYIE; inline;
  71777. begin
  71778. pTDefRegMap(@Self)^.clr := $01000000;
  71779. end;
  71780. procedure TCAN1_C1FIFOINT6.setTXEMPTYIE(thebits : TBits_1); inline;
  71781. begin
  71782. if thebits = 0 then
  71783. pTDefRegMap(@Self)^.clr := $01000000
  71784. else
  71785. pTDefRegMap(@Self)^.&set := $01000000;
  71786. end;
  71787. function TCAN1_C1FIFOINT6.getTXEMPTYIE : TBits_1; inline;
  71788. begin
  71789. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  71790. end;
  71791. procedure TCAN1_C1FIFOINT6.setTXHALFIE; inline;
  71792. begin
  71793. pTDefRegMap(@Self)^.&set := $02000000;
  71794. end;
  71795. procedure TCAN1_C1FIFOINT6.clearTXHALFIE; inline;
  71796. begin
  71797. pTDefRegMap(@Self)^.clr := $02000000;
  71798. end;
  71799. procedure TCAN1_C1FIFOINT6.setTXHALFIE(thebits : TBits_1); inline;
  71800. begin
  71801. if thebits = 0 then
  71802. pTDefRegMap(@Self)^.clr := $02000000
  71803. else
  71804. pTDefRegMap(@Self)^.&set := $02000000;
  71805. end;
  71806. function TCAN1_C1FIFOINT6.getTXHALFIE : TBits_1; inline;
  71807. begin
  71808. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  71809. end;
  71810. procedure TCAN1_C1FIFOINT6.setTXNFULLIE; inline;
  71811. begin
  71812. pTDefRegMap(@Self)^.&set := $04000000;
  71813. end;
  71814. procedure TCAN1_C1FIFOINT6.clearTXNFULLIE; inline;
  71815. begin
  71816. pTDefRegMap(@Self)^.clr := $04000000;
  71817. end;
  71818. procedure TCAN1_C1FIFOINT6.setTXNFULLIE(thebits : TBits_1); inline;
  71819. begin
  71820. if thebits = 0 then
  71821. pTDefRegMap(@Self)^.clr := $04000000
  71822. else
  71823. pTDefRegMap(@Self)^.&set := $04000000;
  71824. end;
  71825. function TCAN1_C1FIFOINT6.getTXNFULLIE : TBits_1; inline;
  71826. begin
  71827. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  71828. end;
  71829. procedure TCAN1_C1FIFOINT6.setw(thebits : TBits_32); inline;
  71830. begin
  71831. pTDefRegMap(@Self)^.val := thebits;
  71832. end;
  71833. function TCAN1_C1FIFOINT6.getw : TBits_32; inline;
  71834. begin
  71835. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71836. end;
  71837. procedure TCAN1_C1FIFOCI6.setCFIFOCI(thebits : TBits_5); inline;
  71838. begin
  71839. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  71840. end;
  71841. function TCAN1_C1FIFOCI6.getCFIFOCI : TBits_5; inline;
  71842. begin
  71843. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  71844. end;
  71845. procedure TCAN1_C1FIFOCI6.setw(thebits : TBits_32); inline;
  71846. begin
  71847. pTDefRegMap(@Self)^.val := thebits;
  71848. end;
  71849. function TCAN1_C1FIFOCI6.getw : TBits_32; inline;
  71850. begin
  71851. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71852. end;
  71853. procedure TCAN1_C1FIFOCON7.setTXPRI(thebits : TBits_2); inline;
  71854. begin
  71855. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  71856. end;
  71857. function TCAN1_C1FIFOCON7.getTXPRI : TBits_2; inline;
  71858. begin
  71859. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  71860. end;
  71861. procedure TCAN1_C1FIFOCON7.setRTREN; inline;
  71862. begin
  71863. pTDefRegMap(@Self)^.&set := $00000004;
  71864. end;
  71865. procedure TCAN1_C1FIFOCON7.clearRTREN; inline;
  71866. begin
  71867. pTDefRegMap(@Self)^.clr := $00000004;
  71868. end;
  71869. procedure TCAN1_C1FIFOCON7.setRTREN(thebits : TBits_1); inline;
  71870. begin
  71871. if thebits = 0 then
  71872. pTDefRegMap(@Self)^.clr := $00000004
  71873. else
  71874. pTDefRegMap(@Self)^.&set := $00000004;
  71875. end;
  71876. function TCAN1_C1FIFOCON7.getRTREN : TBits_1; inline;
  71877. begin
  71878. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71879. end;
  71880. procedure TCAN1_C1FIFOCON7.setTXREQ; inline;
  71881. begin
  71882. pTDefRegMap(@Self)^.&set := $00000008;
  71883. end;
  71884. procedure TCAN1_C1FIFOCON7.clearTXREQ; inline;
  71885. begin
  71886. pTDefRegMap(@Self)^.clr := $00000008;
  71887. end;
  71888. procedure TCAN1_C1FIFOCON7.setTXREQ(thebits : TBits_1); inline;
  71889. begin
  71890. if thebits = 0 then
  71891. pTDefRegMap(@Self)^.clr := $00000008
  71892. else
  71893. pTDefRegMap(@Self)^.&set := $00000008;
  71894. end;
  71895. function TCAN1_C1FIFOCON7.getTXREQ : TBits_1; inline;
  71896. begin
  71897. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71898. end;
  71899. procedure TCAN1_C1FIFOCON7.setTXERR; inline;
  71900. begin
  71901. pTDefRegMap(@Self)^.&set := $00000010;
  71902. end;
  71903. procedure TCAN1_C1FIFOCON7.clearTXERR; inline;
  71904. begin
  71905. pTDefRegMap(@Self)^.clr := $00000010;
  71906. end;
  71907. procedure TCAN1_C1FIFOCON7.setTXERR(thebits : TBits_1); inline;
  71908. begin
  71909. if thebits = 0 then
  71910. pTDefRegMap(@Self)^.clr := $00000010
  71911. else
  71912. pTDefRegMap(@Self)^.&set := $00000010;
  71913. end;
  71914. function TCAN1_C1FIFOCON7.getTXERR : TBits_1; inline;
  71915. begin
  71916. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71917. end;
  71918. procedure TCAN1_C1FIFOCON7.setTXLARB; inline;
  71919. begin
  71920. pTDefRegMap(@Self)^.&set := $00000020;
  71921. end;
  71922. procedure TCAN1_C1FIFOCON7.clearTXLARB; inline;
  71923. begin
  71924. pTDefRegMap(@Self)^.clr := $00000020;
  71925. end;
  71926. procedure TCAN1_C1FIFOCON7.setTXLARB(thebits : TBits_1); inline;
  71927. begin
  71928. if thebits = 0 then
  71929. pTDefRegMap(@Self)^.clr := $00000020
  71930. else
  71931. pTDefRegMap(@Self)^.&set := $00000020;
  71932. end;
  71933. function TCAN1_C1FIFOCON7.getTXLARB : TBits_1; inline;
  71934. begin
  71935. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71936. end;
  71937. procedure TCAN1_C1FIFOCON7.setTXABAT; inline;
  71938. begin
  71939. pTDefRegMap(@Self)^.&set := $00000040;
  71940. end;
  71941. procedure TCAN1_C1FIFOCON7.clearTXABAT; inline;
  71942. begin
  71943. pTDefRegMap(@Self)^.clr := $00000040;
  71944. end;
  71945. procedure TCAN1_C1FIFOCON7.setTXABAT(thebits : TBits_1); inline;
  71946. begin
  71947. if thebits = 0 then
  71948. pTDefRegMap(@Self)^.clr := $00000040
  71949. else
  71950. pTDefRegMap(@Self)^.&set := $00000040;
  71951. end;
  71952. function TCAN1_C1FIFOCON7.getTXABAT : TBits_1; inline;
  71953. begin
  71954. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71955. end;
  71956. procedure TCAN1_C1FIFOCON7.setTXEN; inline;
  71957. begin
  71958. pTDefRegMap(@Self)^.&set := $00000080;
  71959. end;
  71960. procedure TCAN1_C1FIFOCON7.clearTXEN; inline;
  71961. begin
  71962. pTDefRegMap(@Self)^.clr := $00000080;
  71963. end;
  71964. procedure TCAN1_C1FIFOCON7.setTXEN(thebits : TBits_1); inline;
  71965. begin
  71966. if thebits = 0 then
  71967. pTDefRegMap(@Self)^.clr := $00000080
  71968. else
  71969. pTDefRegMap(@Self)^.&set := $00000080;
  71970. end;
  71971. function TCAN1_C1FIFOCON7.getTXEN : TBits_1; inline;
  71972. begin
  71973. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71974. end;
  71975. procedure TCAN1_C1FIFOCON7.setDONLY; inline;
  71976. begin
  71977. pTDefRegMap(@Self)^.&set := $00001000;
  71978. end;
  71979. procedure TCAN1_C1FIFOCON7.clearDONLY; inline;
  71980. begin
  71981. pTDefRegMap(@Self)^.clr := $00001000;
  71982. end;
  71983. procedure TCAN1_C1FIFOCON7.setDONLY(thebits : TBits_1); inline;
  71984. begin
  71985. if thebits = 0 then
  71986. pTDefRegMap(@Self)^.clr := $00001000
  71987. else
  71988. pTDefRegMap(@Self)^.&set := $00001000;
  71989. end;
  71990. function TCAN1_C1FIFOCON7.getDONLY : TBits_1; inline;
  71991. begin
  71992. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  71993. end;
  71994. procedure TCAN1_C1FIFOCON7.setUINC; inline;
  71995. begin
  71996. pTDefRegMap(@Self)^.&set := $00002000;
  71997. end;
  71998. procedure TCAN1_C1FIFOCON7.clearUINC; inline;
  71999. begin
  72000. pTDefRegMap(@Self)^.clr := $00002000;
  72001. end;
  72002. procedure TCAN1_C1FIFOCON7.setUINC(thebits : TBits_1); inline;
  72003. begin
  72004. if thebits = 0 then
  72005. pTDefRegMap(@Self)^.clr := $00002000
  72006. else
  72007. pTDefRegMap(@Self)^.&set := $00002000;
  72008. end;
  72009. function TCAN1_C1FIFOCON7.getUINC : TBits_1; inline;
  72010. begin
  72011. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72012. end;
  72013. procedure TCAN1_C1FIFOCON7.setFRESET; inline;
  72014. begin
  72015. pTDefRegMap(@Self)^.&set := $00004000;
  72016. end;
  72017. procedure TCAN1_C1FIFOCON7.clearFRESET; inline;
  72018. begin
  72019. pTDefRegMap(@Self)^.clr := $00004000;
  72020. end;
  72021. procedure TCAN1_C1FIFOCON7.setFRESET(thebits : TBits_1); inline;
  72022. begin
  72023. if thebits = 0 then
  72024. pTDefRegMap(@Self)^.clr := $00004000
  72025. else
  72026. pTDefRegMap(@Self)^.&set := $00004000;
  72027. end;
  72028. function TCAN1_C1FIFOCON7.getFRESET : TBits_1; inline;
  72029. begin
  72030. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72031. end;
  72032. procedure TCAN1_C1FIFOCON7.setFSIZE(thebits : TBits_5); inline;
  72033. begin
  72034. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  72035. end;
  72036. function TCAN1_C1FIFOCON7.getFSIZE : TBits_5; inline;
  72037. begin
  72038. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  72039. end;
  72040. procedure TCAN1_C1FIFOCON7.setw(thebits : TBits_32); inline;
  72041. begin
  72042. pTDefRegMap(@Self)^.val := thebits;
  72043. end;
  72044. function TCAN1_C1FIFOCON7.getw : TBits_32; inline;
  72045. begin
  72046. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72047. end;
  72048. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIF; inline;
  72049. begin
  72050. pTDefRegMap(@Self)^.&set := $00000001;
  72051. end;
  72052. procedure TCAN1_C1FIFOINT7.clearRXNEMPTYIF; inline;
  72053. begin
  72054. pTDefRegMap(@Self)^.clr := $00000001;
  72055. end;
  72056. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIF(thebits : TBits_1); inline;
  72057. begin
  72058. if thebits = 0 then
  72059. pTDefRegMap(@Self)^.clr := $00000001
  72060. else
  72061. pTDefRegMap(@Self)^.&set := $00000001;
  72062. end;
  72063. function TCAN1_C1FIFOINT7.getRXNEMPTYIF : TBits_1; inline;
  72064. begin
  72065. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  72066. end;
  72067. procedure TCAN1_C1FIFOINT7.setRXHALFIF; inline;
  72068. begin
  72069. pTDefRegMap(@Self)^.&set := $00000002;
  72070. end;
  72071. procedure TCAN1_C1FIFOINT7.clearRXHALFIF; inline;
  72072. begin
  72073. pTDefRegMap(@Self)^.clr := $00000002;
  72074. end;
  72075. procedure TCAN1_C1FIFOINT7.setRXHALFIF(thebits : TBits_1); inline;
  72076. begin
  72077. if thebits = 0 then
  72078. pTDefRegMap(@Self)^.clr := $00000002
  72079. else
  72080. pTDefRegMap(@Self)^.&set := $00000002;
  72081. end;
  72082. function TCAN1_C1FIFOINT7.getRXHALFIF : TBits_1; inline;
  72083. begin
  72084. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72085. end;
  72086. procedure TCAN1_C1FIFOINT7.setRXFULLIF; inline;
  72087. begin
  72088. pTDefRegMap(@Self)^.&set := $00000004;
  72089. end;
  72090. procedure TCAN1_C1FIFOINT7.clearRXFULLIF; inline;
  72091. begin
  72092. pTDefRegMap(@Self)^.clr := $00000004;
  72093. end;
  72094. procedure TCAN1_C1FIFOINT7.setRXFULLIF(thebits : TBits_1); inline;
  72095. begin
  72096. if thebits = 0 then
  72097. pTDefRegMap(@Self)^.clr := $00000004
  72098. else
  72099. pTDefRegMap(@Self)^.&set := $00000004;
  72100. end;
  72101. function TCAN1_C1FIFOINT7.getRXFULLIF : TBits_1; inline;
  72102. begin
  72103. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72104. end;
  72105. procedure TCAN1_C1FIFOINT7.setRXOVFLIF; inline;
  72106. begin
  72107. pTDefRegMap(@Self)^.&set := $00000008;
  72108. end;
  72109. procedure TCAN1_C1FIFOINT7.clearRXOVFLIF; inline;
  72110. begin
  72111. pTDefRegMap(@Self)^.clr := $00000008;
  72112. end;
  72113. procedure TCAN1_C1FIFOINT7.setRXOVFLIF(thebits : TBits_1); inline;
  72114. begin
  72115. if thebits = 0 then
  72116. pTDefRegMap(@Self)^.clr := $00000008
  72117. else
  72118. pTDefRegMap(@Self)^.&set := $00000008;
  72119. end;
  72120. function TCAN1_C1FIFOINT7.getRXOVFLIF : TBits_1; inline;
  72121. begin
  72122. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72123. end;
  72124. procedure TCAN1_C1FIFOINT7.setTXEMPTYIF; inline;
  72125. begin
  72126. pTDefRegMap(@Self)^.&set := $00000100;
  72127. end;
  72128. procedure TCAN1_C1FIFOINT7.clearTXEMPTYIF; inline;
  72129. begin
  72130. pTDefRegMap(@Self)^.clr := $00000100;
  72131. end;
  72132. procedure TCAN1_C1FIFOINT7.setTXEMPTYIF(thebits : TBits_1); inline;
  72133. begin
  72134. if thebits = 0 then
  72135. pTDefRegMap(@Self)^.clr := $00000100
  72136. else
  72137. pTDefRegMap(@Self)^.&set := $00000100;
  72138. end;
  72139. function TCAN1_C1FIFOINT7.getTXEMPTYIF : TBits_1; inline;
  72140. begin
  72141. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  72142. end;
  72143. procedure TCAN1_C1FIFOINT7.setTXHALFIF; inline;
  72144. begin
  72145. pTDefRegMap(@Self)^.&set := $00000200;
  72146. end;
  72147. procedure TCAN1_C1FIFOINT7.clearTXHALFIF; inline;
  72148. begin
  72149. pTDefRegMap(@Self)^.clr := $00000200;
  72150. end;
  72151. procedure TCAN1_C1FIFOINT7.setTXHALFIF(thebits : TBits_1); inline;
  72152. begin
  72153. if thebits = 0 then
  72154. pTDefRegMap(@Self)^.clr := $00000200
  72155. else
  72156. pTDefRegMap(@Self)^.&set := $00000200;
  72157. end;
  72158. function TCAN1_C1FIFOINT7.getTXHALFIF : TBits_1; inline;
  72159. begin
  72160. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  72161. end;
  72162. procedure TCAN1_C1FIFOINT7.setTXNFULLIF; inline;
  72163. begin
  72164. pTDefRegMap(@Self)^.&set := $00000400;
  72165. end;
  72166. procedure TCAN1_C1FIFOINT7.clearTXNFULLIF; inline;
  72167. begin
  72168. pTDefRegMap(@Self)^.clr := $00000400;
  72169. end;
  72170. procedure TCAN1_C1FIFOINT7.setTXNFULLIF(thebits : TBits_1); inline;
  72171. begin
  72172. if thebits = 0 then
  72173. pTDefRegMap(@Self)^.clr := $00000400
  72174. else
  72175. pTDefRegMap(@Self)^.&set := $00000400;
  72176. end;
  72177. function TCAN1_C1FIFOINT7.getTXNFULLIF : TBits_1; inline;
  72178. begin
  72179. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  72180. end;
  72181. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIE; inline;
  72182. begin
  72183. pTDefRegMap(@Self)^.&set := $00010000;
  72184. end;
  72185. procedure TCAN1_C1FIFOINT7.clearRXNEMPTYIE; inline;
  72186. begin
  72187. pTDefRegMap(@Self)^.clr := $00010000;
  72188. end;
  72189. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIE(thebits : TBits_1); inline;
  72190. begin
  72191. if thebits = 0 then
  72192. pTDefRegMap(@Self)^.clr := $00010000
  72193. else
  72194. pTDefRegMap(@Self)^.&set := $00010000;
  72195. end;
  72196. function TCAN1_C1FIFOINT7.getRXNEMPTYIE : TBits_1; inline;
  72197. begin
  72198. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  72199. end;
  72200. procedure TCAN1_C1FIFOINT7.setRXHALFIE; inline;
  72201. begin
  72202. pTDefRegMap(@Self)^.&set := $00020000;
  72203. end;
  72204. procedure TCAN1_C1FIFOINT7.clearRXHALFIE; inline;
  72205. begin
  72206. pTDefRegMap(@Self)^.clr := $00020000;
  72207. end;
  72208. procedure TCAN1_C1FIFOINT7.setRXHALFIE(thebits : TBits_1); inline;
  72209. begin
  72210. if thebits = 0 then
  72211. pTDefRegMap(@Self)^.clr := $00020000
  72212. else
  72213. pTDefRegMap(@Self)^.&set := $00020000;
  72214. end;
  72215. function TCAN1_C1FIFOINT7.getRXHALFIE : TBits_1; inline;
  72216. begin
  72217. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  72218. end;
  72219. procedure TCAN1_C1FIFOINT7.setRXFULLIE; inline;
  72220. begin
  72221. pTDefRegMap(@Self)^.&set := $00040000;
  72222. end;
  72223. procedure TCAN1_C1FIFOINT7.clearRXFULLIE; inline;
  72224. begin
  72225. pTDefRegMap(@Self)^.clr := $00040000;
  72226. end;
  72227. procedure TCAN1_C1FIFOINT7.setRXFULLIE(thebits : TBits_1); inline;
  72228. begin
  72229. if thebits = 0 then
  72230. pTDefRegMap(@Self)^.clr := $00040000
  72231. else
  72232. pTDefRegMap(@Self)^.&set := $00040000;
  72233. end;
  72234. function TCAN1_C1FIFOINT7.getRXFULLIE : TBits_1; inline;
  72235. begin
  72236. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  72237. end;
  72238. procedure TCAN1_C1FIFOINT7.setRXOVFLIE; inline;
  72239. begin
  72240. pTDefRegMap(@Self)^.&set := $00080000;
  72241. end;
  72242. procedure TCAN1_C1FIFOINT7.clearRXOVFLIE; inline;
  72243. begin
  72244. pTDefRegMap(@Self)^.clr := $00080000;
  72245. end;
  72246. procedure TCAN1_C1FIFOINT7.setRXOVFLIE(thebits : TBits_1); inline;
  72247. begin
  72248. if thebits = 0 then
  72249. pTDefRegMap(@Self)^.clr := $00080000
  72250. else
  72251. pTDefRegMap(@Self)^.&set := $00080000;
  72252. end;
  72253. function TCAN1_C1FIFOINT7.getRXOVFLIE : TBits_1; inline;
  72254. begin
  72255. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  72256. end;
  72257. procedure TCAN1_C1FIFOINT7.setTXEMPTYIE; inline;
  72258. begin
  72259. pTDefRegMap(@Self)^.&set := $01000000;
  72260. end;
  72261. procedure TCAN1_C1FIFOINT7.clearTXEMPTYIE; inline;
  72262. begin
  72263. pTDefRegMap(@Self)^.clr := $01000000;
  72264. end;
  72265. procedure TCAN1_C1FIFOINT7.setTXEMPTYIE(thebits : TBits_1); inline;
  72266. begin
  72267. if thebits = 0 then
  72268. pTDefRegMap(@Self)^.clr := $01000000
  72269. else
  72270. pTDefRegMap(@Self)^.&set := $01000000;
  72271. end;
  72272. function TCAN1_C1FIFOINT7.getTXEMPTYIE : TBits_1; inline;
  72273. begin
  72274. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  72275. end;
  72276. procedure TCAN1_C1FIFOINT7.setTXHALFIE; inline;
  72277. begin
  72278. pTDefRegMap(@Self)^.&set := $02000000;
  72279. end;
  72280. procedure TCAN1_C1FIFOINT7.clearTXHALFIE; inline;
  72281. begin
  72282. pTDefRegMap(@Self)^.clr := $02000000;
  72283. end;
  72284. procedure TCAN1_C1FIFOINT7.setTXHALFIE(thebits : TBits_1); inline;
  72285. begin
  72286. if thebits = 0 then
  72287. pTDefRegMap(@Self)^.clr := $02000000
  72288. else
  72289. pTDefRegMap(@Self)^.&set := $02000000;
  72290. end;
  72291. function TCAN1_C1FIFOINT7.getTXHALFIE : TBits_1; inline;
  72292. begin
  72293. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  72294. end;
  72295. procedure TCAN1_C1FIFOINT7.setTXNFULLIE; inline;
  72296. begin
  72297. pTDefRegMap(@Self)^.&set := $04000000;
  72298. end;
  72299. procedure TCAN1_C1FIFOINT7.clearTXNFULLIE; inline;
  72300. begin
  72301. pTDefRegMap(@Self)^.clr := $04000000;
  72302. end;
  72303. procedure TCAN1_C1FIFOINT7.setTXNFULLIE(thebits : TBits_1); inline;
  72304. begin
  72305. if thebits = 0 then
  72306. pTDefRegMap(@Self)^.clr := $04000000
  72307. else
  72308. pTDefRegMap(@Self)^.&set := $04000000;
  72309. end;
  72310. function TCAN1_C1FIFOINT7.getTXNFULLIE : TBits_1; inline;
  72311. begin
  72312. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  72313. end;
  72314. procedure TCAN1_C1FIFOINT7.setw(thebits : TBits_32); inline;
  72315. begin
  72316. pTDefRegMap(@Self)^.val := thebits;
  72317. end;
  72318. function TCAN1_C1FIFOINT7.getw : TBits_32; inline;
  72319. begin
  72320. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72321. end;
  72322. procedure TCAN1_C1FIFOCI7.setCFIFOCI(thebits : TBits_5); inline;
  72323. begin
  72324. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  72325. end;
  72326. function TCAN1_C1FIFOCI7.getCFIFOCI : TBits_5; inline;
  72327. begin
  72328. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  72329. end;
  72330. procedure TCAN1_C1FIFOCI7.setw(thebits : TBits_32); inline;
  72331. begin
  72332. pTDefRegMap(@Self)^.val := thebits;
  72333. end;
  72334. function TCAN1_C1FIFOCI7.getw : TBits_32; inline;
  72335. begin
  72336. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72337. end;
  72338. procedure TCAN1_C1FIFOCON8.setTXPRI(thebits : TBits_2); inline;
  72339. begin
  72340. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  72341. end;
  72342. function TCAN1_C1FIFOCON8.getTXPRI : TBits_2; inline;
  72343. begin
  72344. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  72345. end;
  72346. procedure TCAN1_C1FIFOCON8.setRTREN; inline;
  72347. begin
  72348. pTDefRegMap(@Self)^.&set := $00000004;
  72349. end;
  72350. procedure TCAN1_C1FIFOCON8.clearRTREN; inline;
  72351. begin
  72352. pTDefRegMap(@Self)^.clr := $00000004;
  72353. end;
  72354. procedure TCAN1_C1FIFOCON8.setRTREN(thebits : TBits_1); inline;
  72355. begin
  72356. if thebits = 0 then
  72357. pTDefRegMap(@Self)^.clr := $00000004
  72358. else
  72359. pTDefRegMap(@Self)^.&set := $00000004;
  72360. end;
  72361. function TCAN1_C1FIFOCON8.getRTREN : TBits_1; inline;
  72362. begin
  72363. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72364. end;
  72365. procedure TCAN1_C1FIFOCON8.setTXREQ; inline;
  72366. begin
  72367. pTDefRegMap(@Self)^.&set := $00000008;
  72368. end;
  72369. procedure TCAN1_C1FIFOCON8.clearTXREQ; inline;
  72370. begin
  72371. pTDefRegMap(@Self)^.clr := $00000008;
  72372. end;
  72373. procedure TCAN1_C1FIFOCON8.setTXREQ(thebits : TBits_1); inline;
  72374. begin
  72375. if thebits = 0 then
  72376. pTDefRegMap(@Self)^.clr := $00000008
  72377. else
  72378. pTDefRegMap(@Self)^.&set := $00000008;
  72379. end;
  72380. function TCAN1_C1FIFOCON8.getTXREQ : TBits_1; inline;
  72381. begin
  72382. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72383. end;
  72384. procedure TCAN1_C1FIFOCON8.setTXERR; inline;
  72385. begin
  72386. pTDefRegMap(@Self)^.&set := $00000010;
  72387. end;
  72388. procedure TCAN1_C1FIFOCON8.clearTXERR; inline;
  72389. begin
  72390. pTDefRegMap(@Self)^.clr := $00000010;
  72391. end;
  72392. procedure TCAN1_C1FIFOCON8.setTXERR(thebits : TBits_1); inline;
  72393. begin
  72394. if thebits = 0 then
  72395. pTDefRegMap(@Self)^.clr := $00000010
  72396. else
  72397. pTDefRegMap(@Self)^.&set := $00000010;
  72398. end;
  72399. function TCAN1_C1FIFOCON8.getTXERR : TBits_1; inline;
  72400. begin
  72401. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72402. end;
  72403. procedure TCAN1_C1FIFOCON8.setTXLARB; inline;
  72404. begin
  72405. pTDefRegMap(@Self)^.&set := $00000020;
  72406. end;
  72407. procedure TCAN1_C1FIFOCON8.clearTXLARB; inline;
  72408. begin
  72409. pTDefRegMap(@Self)^.clr := $00000020;
  72410. end;
  72411. procedure TCAN1_C1FIFOCON8.setTXLARB(thebits : TBits_1); inline;
  72412. begin
  72413. if thebits = 0 then
  72414. pTDefRegMap(@Self)^.clr := $00000020
  72415. else
  72416. pTDefRegMap(@Self)^.&set := $00000020;
  72417. end;
  72418. function TCAN1_C1FIFOCON8.getTXLARB : TBits_1; inline;
  72419. begin
  72420. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  72421. end;
  72422. procedure TCAN1_C1FIFOCON8.setTXABAT; inline;
  72423. begin
  72424. pTDefRegMap(@Self)^.&set := $00000040;
  72425. end;
  72426. procedure TCAN1_C1FIFOCON8.clearTXABAT; inline;
  72427. begin
  72428. pTDefRegMap(@Self)^.clr := $00000040;
  72429. end;
  72430. procedure TCAN1_C1FIFOCON8.setTXABAT(thebits : TBits_1); inline;
  72431. begin
  72432. if thebits = 0 then
  72433. pTDefRegMap(@Self)^.clr := $00000040
  72434. else
  72435. pTDefRegMap(@Self)^.&set := $00000040;
  72436. end;
  72437. function TCAN1_C1FIFOCON8.getTXABAT : TBits_1; inline;
  72438. begin
  72439. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  72440. end;
  72441. procedure TCAN1_C1FIFOCON8.setTXEN; inline;
  72442. begin
  72443. pTDefRegMap(@Self)^.&set := $00000080;
  72444. end;
  72445. procedure TCAN1_C1FIFOCON8.clearTXEN; inline;
  72446. begin
  72447. pTDefRegMap(@Self)^.clr := $00000080;
  72448. end;
  72449. procedure TCAN1_C1FIFOCON8.setTXEN(thebits : TBits_1); inline;
  72450. begin
  72451. if thebits = 0 then
  72452. pTDefRegMap(@Self)^.clr := $00000080
  72453. else
  72454. pTDefRegMap(@Self)^.&set := $00000080;
  72455. end;
  72456. function TCAN1_C1FIFOCON8.getTXEN : TBits_1; inline;
  72457. begin
  72458. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  72459. end;
  72460. procedure TCAN1_C1FIFOCON8.setDONLY; inline;
  72461. begin
  72462. pTDefRegMap(@Self)^.&set := $00001000;
  72463. end;
  72464. procedure TCAN1_C1FIFOCON8.clearDONLY; inline;
  72465. begin
  72466. pTDefRegMap(@Self)^.clr := $00001000;
  72467. end;
  72468. procedure TCAN1_C1FIFOCON8.setDONLY(thebits : TBits_1); inline;
  72469. begin
  72470. if thebits = 0 then
  72471. pTDefRegMap(@Self)^.clr := $00001000
  72472. else
  72473. pTDefRegMap(@Self)^.&set := $00001000;
  72474. end;
  72475. function TCAN1_C1FIFOCON8.getDONLY : TBits_1; inline;
  72476. begin
  72477. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72478. end;
  72479. procedure TCAN1_C1FIFOCON8.setUINC; inline;
  72480. begin
  72481. pTDefRegMap(@Self)^.&set := $00002000;
  72482. end;
  72483. procedure TCAN1_C1FIFOCON8.clearUINC; inline;
  72484. begin
  72485. pTDefRegMap(@Self)^.clr := $00002000;
  72486. end;
  72487. procedure TCAN1_C1FIFOCON8.setUINC(thebits : TBits_1); inline;
  72488. begin
  72489. if thebits = 0 then
  72490. pTDefRegMap(@Self)^.clr := $00002000
  72491. else
  72492. pTDefRegMap(@Self)^.&set := $00002000;
  72493. end;
  72494. function TCAN1_C1FIFOCON8.getUINC : TBits_1; inline;
  72495. begin
  72496. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72497. end;
  72498. procedure TCAN1_C1FIFOCON8.setFRESET; inline;
  72499. begin
  72500. pTDefRegMap(@Self)^.&set := $00004000;
  72501. end;
  72502. procedure TCAN1_C1FIFOCON8.clearFRESET; inline;
  72503. begin
  72504. pTDefRegMap(@Self)^.clr := $00004000;
  72505. end;
  72506. procedure TCAN1_C1FIFOCON8.setFRESET(thebits : TBits_1); inline;
  72507. begin
  72508. if thebits = 0 then
  72509. pTDefRegMap(@Self)^.clr := $00004000
  72510. else
  72511. pTDefRegMap(@Self)^.&set := $00004000;
  72512. end;
  72513. function TCAN1_C1FIFOCON8.getFRESET : TBits_1; inline;
  72514. begin
  72515. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72516. end;
  72517. procedure TCAN1_C1FIFOCON8.setFSIZE(thebits : TBits_5); inline;
  72518. begin
  72519. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  72520. end;
  72521. function TCAN1_C1FIFOCON8.getFSIZE : TBits_5; inline;
  72522. begin
  72523. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  72524. end;
  72525. procedure TCAN1_C1FIFOCON8.setw(thebits : TBits_32); inline;
  72526. begin
  72527. pTDefRegMap(@Self)^.val := thebits;
  72528. end;
  72529. function TCAN1_C1FIFOCON8.getw : TBits_32; inline;
  72530. begin
  72531. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72532. end;
  72533. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIF; inline;
  72534. begin
  72535. pTDefRegMap(@Self)^.&set := $00000001;
  72536. end;
  72537. procedure TCAN1_C1FIFOINT8.clearRXNEMPTYIF; inline;
  72538. begin
  72539. pTDefRegMap(@Self)^.clr := $00000001;
  72540. end;
  72541. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIF(thebits : TBits_1); inline;
  72542. begin
  72543. if thebits = 0 then
  72544. pTDefRegMap(@Self)^.clr := $00000001
  72545. else
  72546. pTDefRegMap(@Self)^.&set := $00000001;
  72547. end;
  72548. function TCAN1_C1FIFOINT8.getRXNEMPTYIF : TBits_1; inline;
  72549. begin
  72550. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  72551. end;
  72552. procedure TCAN1_C1FIFOINT8.setRXHALFIF; inline;
  72553. begin
  72554. pTDefRegMap(@Self)^.&set := $00000002;
  72555. end;
  72556. procedure TCAN1_C1FIFOINT8.clearRXHALFIF; inline;
  72557. begin
  72558. pTDefRegMap(@Self)^.clr := $00000002;
  72559. end;
  72560. procedure TCAN1_C1FIFOINT8.setRXHALFIF(thebits : TBits_1); inline;
  72561. begin
  72562. if thebits = 0 then
  72563. pTDefRegMap(@Self)^.clr := $00000002
  72564. else
  72565. pTDefRegMap(@Self)^.&set := $00000002;
  72566. end;
  72567. function TCAN1_C1FIFOINT8.getRXHALFIF : TBits_1; inline;
  72568. begin
  72569. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72570. end;
  72571. procedure TCAN1_C1FIFOINT8.setRXFULLIF; inline;
  72572. begin
  72573. pTDefRegMap(@Self)^.&set := $00000004;
  72574. end;
  72575. procedure TCAN1_C1FIFOINT8.clearRXFULLIF; inline;
  72576. begin
  72577. pTDefRegMap(@Self)^.clr := $00000004;
  72578. end;
  72579. procedure TCAN1_C1FIFOINT8.setRXFULLIF(thebits : TBits_1); inline;
  72580. begin
  72581. if thebits = 0 then
  72582. pTDefRegMap(@Self)^.clr := $00000004
  72583. else
  72584. pTDefRegMap(@Self)^.&set := $00000004;
  72585. end;
  72586. function TCAN1_C1FIFOINT8.getRXFULLIF : TBits_1; inline;
  72587. begin
  72588. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72589. end;
  72590. procedure TCAN1_C1FIFOINT8.setRXOVFLIF; inline;
  72591. begin
  72592. pTDefRegMap(@Self)^.&set := $00000008;
  72593. end;
  72594. procedure TCAN1_C1FIFOINT8.clearRXOVFLIF; inline;
  72595. begin
  72596. pTDefRegMap(@Self)^.clr := $00000008;
  72597. end;
  72598. procedure TCAN1_C1FIFOINT8.setRXOVFLIF(thebits : TBits_1); inline;
  72599. begin
  72600. if thebits = 0 then
  72601. pTDefRegMap(@Self)^.clr := $00000008
  72602. else
  72603. pTDefRegMap(@Self)^.&set := $00000008;
  72604. end;
  72605. function TCAN1_C1FIFOINT8.getRXOVFLIF : TBits_1; inline;
  72606. begin
  72607. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72608. end;
  72609. procedure TCAN1_C1FIFOINT8.setTXEMPTYIF; inline;
  72610. begin
  72611. pTDefRegMap(@Self)^.&set := $00000100;
  72612. end;
  72613. procedure TCAN1_C1FIFOINT8.clearTXEMPTYIF; inline;
  72614. begin
  72615. pTDefRegMap(@Self)^.clr := $00000100;
  72616. end;
  72617. procedure TCAN1_C1FIFOINT8.setTXEMPTYIF(thebits : TBits_1); inline;
  72618. begin
  72619. if thebits = 0 then
  72620. pTDefRegMap(@Self)^.clr := $00000100
  72621. else
  72622. pTDefRegMap(@Self)^.&set := $00000100;
  72623. end;
  72624. function TCAN1_C1FIFOINT8.getTXEMPTYIF : TBits_1; inline;
  72625. begin
  72626. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  72627. end;
  72628. procedure TCAN1_C1FIFOINT8.setTXHALFIF; inline;
  72629. begin
  72630. pTDefRegMap(@Self)^.&set := $00000200;
  72631. end;
  72632. procedure TCAN1_C1FIFOINT8.clearTXHALFIF; inline;
  72633. begin
  72634. pTDefRegMap(@Self)^.clr := $00000200;
  72635. end;
  72636. procedure TCAN1_C1FIFOINT8.setTXHALFIF(thebits : TBits_1); inline;
  72637. begin
  72638. if thebits = 0 then
  72639. pTDefRegMap(@Self)^.clr := $00000200
  72640. else
  72641. pTDefRegMap(@Self)^.&set := $00000200;
  72642. end;
  72643. function TCAN1_C1FIFOINT8.getTXHALFIF : TBits_1; inline;
  72644. begin
  72645. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  72646. end;
  72647. procedure TCAN1_C1FIFOINT8.setTXNFULLIF; inline;
  72648. begin
  72649. pTDefRegMap(@Self)^.&set := $00000400;
  72650. end;
  72651. procedure TCAN1_C1FIFOINT8.clearTXNFULLIF; inline;
  72652. begin
  72653. pTDefRegMap(@Self)^.clr := $00000400;
  72654. end;
  72655. procedure TCAN1_C1FIFOINT8.setTXNFULLIF(thebits : TBits_1); inline;
  72656. begin
  72657. if thebits = 0 then
  72658. pTDefRegMap(@Self)^.clr := $00000400
  72659. else
  72660. pTDefRegMap(@Self)^.&set := $00000400;
  72661. end;
  72662. function TCAN1_C1FIFOINT8.getTXNFULLIF : TBits_1; inline;
  72663. begin
  72664. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  72665. end;
  72666. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIE; inline;
  72667. begin
  72668. pTDefRegMap(@Self)^.&set := $00010000;
  72669. end;
  72670. procedure TCAN1_C1FIFOINT8.clearRXNEMPTYIE; inline;
  72671. begin
  72672. pTDefRegMap(@Self)^.clr := $00010000;
  72673. end;
  72674. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIE(thebits : TBits_1); inline;
  72675. begin
  72676. if thebits = 0 then
  72677. pTDefRegMap(@Self)^.clr := $00010000
  72678. else
  72679. pTDefRegMap(@Self)^.&set := $00010000;
  72680. end;
  72681. function TCAN1_C1FIFOINT8.getRXNEMPTYIE : TBits_1; inline;
  72682. begin
  72683. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  72684. end;
  72685. procedure TCAN1_C1FIFOINT8.setRXHALFIE; inline;
  72686. begin
  72687. pTDefRegMap(@Self)^.&set := $00020000;
  72688. end;
  72689. procedure TCAN1_C1FIFOINT8.clearRXHALFIE; inline;
  72690. begin
  72691. pTDefRegMap(@Self)^.clr := $00020000;
  72692. end;
  72693. procedure TCAN1_C1FIFOINT8.setRXHALFIE(thebits : TBits_1); inline;
  72694. begin
  72695. if thebits = 0 then
  72696. pTDefRegMap(@Self)^.clr := $00020000
  72697. else
  72698. pTDefRegMap(@Self)^.&set := $00020000;
  72699. end;
  72700. function TCAN1_C1FIFOINT8.getRXHALFIE : TBits_1; inline;
  72701. begin
  72702. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  72703. end;
  72704. procedure TCAN1_C1FIFOINT8.setRXFULLIE; inline;
  72705. begin
  72706. pTDefRegMap(@Self)^.&set := $00040000;
  72707. end;
  72708. procedure TCAN1_C1FIFOINT8.clearRXFULLIE; inline;
  72709. begin
  72710. pTDefRegMap(@Self)^.clr := $00040000;
  72711. end;
  72712. procedure TCAN1_C1FIFOINT8.setRXFULLIE(thebits : TBits_1); inline;
  72713. begin
  72714. if thebits = 0 then
  72715. pTDefRegMap(@Self)^.clr := $00040000
  72716. else
  72717. pTDefRegMap(@Self)^.&set := $00040000;
  72718. end;
  72719. function TCAN1_C1FIFOINT8.getRXFULLIE : TBits_1; inline;
  72720. begin
  72721. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  72722. end;
  72723. procedure TCAN1_C1FIFOINT8.setRXOVFLIE; inline;
  72724. begin
  72725. pTDefRegMap(@Self)^.&set := $00080000;
  72726. end;
  72727. procedure TCAN1_C1FIFOINT8.clearRXOVFLIE; inline;
  72728. begin
  72729. pTDefRegMap(@Self)^.clr := $00080000;
  72730. end;
  72731. procedure TCAN1_C1FIFOINT8.setRXOVFLIE(thebits : TBits_1); inline;
  72732. begin
  72733. if thebits = 0 then
  72734. pTDefRegMap(@Self)^.clr := $00080000
  72735. else
  72736. pTDefRegMap(@Self)^.&set := $00080000;
  72737. end;
  72738. function TCAN1_C1FIFOINT8.getRXOVFLIE : TBits_1; inline;
  72739. begin
  72740. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  72741. end;
  72742. procedure TCAN1_C1FIFOINT8.setTXEMPTYIE; inline;
  72743. begin
  72744. pTDefRegMap(@Self)^.&set := $01000000;
  72745. end;
  72746. procedure TCAN1_C1FIFOINT8.clearTXEMPTYIE; inline;
  72747. begin
  72748. pTDefRegMap(@Self)^.clr := $01000000;
  72749. end;
  72750. procedure TCAN1_C1FIFOINT8.setTXEMPTYIE(thebits : TBits_1); inline;
  72751. begin
  72752. if thebits = 0 then
  72753. pTDefRegMap(@Self)^.clr := $01000000
  72754. else
  72755. pTDefRegMap(@Self)^.&set := $01000000;
  72756. end;
  72757. function TCAN1_C1FIFOINT8.getTXEMPTYIE : TBits_1; inline;
  72758. begin
  72759. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  72760. end;
  72761. procedure TCAN1_C1FIFOINT8.setTXHALFIE; inline;
  72762. begin
  72763. pTDefRegMap(@Self)^.&set := $02000000;
  72764. end;
  72765. procedure TCAN1_C1FIFOINT8.clearTXHALFIE; inline;
  72766. begin
  72767. pTDefRegMap(@Self)^.clr := $02000000;
  72768. end;
  72769. procedure TCAN1_C1FIFOINT8.setTXHALFIE(thebits : TBits_1); inline;
  72770. begin
  72771. if thebits = 0 then
  72772. pTDefRegMap(@Self)^.clr := $02000000
  72773. else
  72774. pTDefRegMap(@Self)^.&set := $02000000;
  72775. end;
  72776. function TCAN1_C1FIFOINT8.getTXHALFIE : TBits_1; inline;
  72777. begin
  72778. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  72779. end;
  72780. procedure TCAN1_C1FIFOINT8.setTXNFULLIE; inline;
  72781. begin
  72782. pTDefRegMap(@Self)^.&set := $04000000;
  72783. end;
  72784. procedure TCAN1_C1FIFOINT8.clearTXNFULLIE; inline;
  72785. begin
  72786. pTDefRegMap(@Self)^.clr := $04000000;
  72787. end;
  72788. procedure TCAN1_C1FIFOINT8.setTXNFULLIE(thebits : TBits_1); inline;
  72789. begin
  72790. if thebits = 0 then
  72791. pTDefRegMap(@Self)^.clr := $04000000
  72792. else
  72793. pTDefRegMap(@Self)^.&set := $04000000;
  72794. end;
  72795. function TCAN1_C1FIFOINT8.getTXNFULLIE : TBits_1; inline;
  72796. begin
  72797. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  72798. end;
  72799. procedure TCAN1_C1FIFOINT8.setw(thebits : TBits_32); inline;
  72800. begin
  72801. pTDefRegMap(@Self)^.val := thebits;
  72802. end;
  72803. function TCAN1_C1FIFOINT8.getw : TBits_32; inline;
  72804. begin
  72805. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72806. end;
  72807. procedure TCAN1_C1FIFOCI8.setCFIFOCI(thebits : TBits_5); inline;
  72808. begin
  72809. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  72810. end;
  72811. function TCAN1_C1FIFOCI8.getCFIFOCI : TBits_5; inline;
  72812. begin
  72813. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  72814. end;
  72815. procedure TCAN1_C1FIFOCI8.setw(thebits : TBits_32); inline;
  72816. begin
  72817. pTDefRegMap(@Self)^.val := thebits;
  72818. end;
  72819. function TCAN1_C1FIFOCI8.getw : TBits_32; inline;
  72820. begin
  72821. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72822. end;
  72823. procedure TCAN1_C1FIFOCON9.setTXPRI(thebits : TBits_2); inline;
  72824. begin
  72825. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  72826. end;
  72827. function TCAN1_C1FIFOCON9.getTXPRI : TBits_2; inline;
  72828. begin
  72829. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  72830. end;
  72831. procedure TCAN1_C1FIFOCON9.setRTREN; inline;
  72832. begin
  72833. pTDefRegMap(@Self)^.&set := $00000004;
  72834. end;
  72835. procedure TCAN1_C1FIFOCON9.clearRTREN; inline;
  72836. begin
  72837. pTDefRegMap(@Self)^.clr := $00000004;
  72838. end;
  72839. procedure TCAN1_C1FIFOCON9.setRTREN(thebits : TBits_1); inline;
  72840. begin
  72841. if thebits = 0 then
  72842. pTDefRegMap(@Self)^.clr := $00000004
  72843. else
  72844. pTDefRegMap(@Self)^.&set := $00000004;
  72845. end;
  72846. function TCAN1_C1FIFOCON9.getRTREN : TBits_1; inline;
  72847. begin
  72848. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72849. end;
  72850. procedure TCAN1_C1FIFOCON9.setTXREQ; inline;
  72851. begin
  72852. pTDefRegMap(@Self)^.&set := $00000008;
  72853. end;
  72854. procedure TCAN1_C1FIFOCON9.clearTXREQ; inline;
  72855. begin
  72856. pTDefRegMap(@Self)^.clr := $00000008;
  72857. end;
  72858. procedure TCAN1_C1FIFOCON9.setTXREQ(thebits : TBits_1); inline;
  72859. begin
  72860. if thebits = 0 then
  72861. pTDefRegMap(@Self)^.clr := $00000008
  72862. else
  72863. pTDefRegMap(@Self)^.&set := $00000008;
  72864. end;
  72865. function TCAN1_C1FIFOCON9.getTXREQ : TBits_1; inline;
  72866. begin
  72867. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72868. end;
  72869. procedure TCAN1_C1FIFOCON9.setTXERR; inline;
  72870. begin
  72871. pTDefRegMap(@Self)^.&set := $00000010;
  72872. end;
  72873. procedure TCAN1_C1FIFOCON9.clearTXERR; inline;
  72874. begin
  72875. pTDefRegMap(@Self)^.clr := $00000010;
  72876. end;
  72877. procedure TCAN1_C1FIFOCON9.setTXERR(thebits : TBits_1); inline;
  72878. begin
  72879. if thebits = 0 then
  72880. pTDefRegMap(@Self)^.clr := $00000010
  72881. else
  72882. pTDefRegMap(@Self)^.&set := $00000010;
  72883. end;
  72884. function TCAN1_C1FIFOCON9.getTXERR : TBits_1; inline;
  72885. begin
  72886. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72887. end;
  72888. procedure TCAN1_C1FIFOCON9.setTXLARB; inline;
  72889. begin
  72890. pTDefRegMap(@Self)^.&set := $00000020;
  72891. end;
  72892. procedure TCAN1_C1FIFOCON9.clearTXLARB; inline;
  72893. begin
  72894. pTDefRegMap(@Self)^.clr := $00000020;
  72895. end;
  72896. procedure TCAN1_C1FIFOCON9.setTXLARB(thebits : TBits_1); inline;
  72897. begin
  72898. if thebits = 0 then
  72899. pTDefRegMap(@Self)^.clr := $00000020
  72900. else
  72901. pTDefRegMap(@Self)^.&set := $00000020;
  72902. end;
  72903. function TCAN1_C1FIFOCON9.getTXLARB : TBits_1; inline;
  72904. begin
  72905. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  72906. end;
  72907. procedure TCAN1_C1FIFOCON9.setTXABAT; inline;
  72908. begin
  72909. pTDefRegMap(@Self)^.&set := $00000040;
  72910. end;
  72911. procedure TCAN1_C1FIFOCON9.clearTXABAT; inline;
  72912. begin
  72913. pTDefRegMap(@Self)^.clr := $00000040;
  72914. end;
  72915. procedure TCAN1_C1FIFOCON9.setTXABAT(thebits : TBits_1); inline;
  72916. begin
  72917. if thebits = 0 then
  72918. pTDefRegMap(@Self)^.clr := $00000040
  72919. else
  72920. pTDefRegMap(@Self)^.&set := $00000040;
  72921. end;
  72922. function TCAN1_C1FIFOCON9.getTXABAT : TBits_1; inline;
  72923. begin
  72924. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  72925. end;
  72926. procedure TCAN1_C1FIFOCON9.setTXEN; inline;
  72927. begin
  72928. pTDefRegMap(@Self)^.&set := $00000080;
  72929. end;
  72930. procedure TCAN1_C1FIFOCON9.clearTXEN; inline;
  72931. begin
  72932. pTDefRegMap(@Self)^.clr := $00000080;
  72933. end;
  72934. procedure TCAN1_C1FIFOCON9.setTXEN(thebits : TBits_1); inline;
  72935. begin
  72936. if thebits = 0 then
  72937. pTDefRegMap(@Self)^.clr := $00000080
  72938. else
  72939. pTDefRegMap(@Self)^.&set := $00000080;
  72940. end;
  72941. function TCAN1_C1FIFOCON9.getTXEN : TBits_1; inline;
  72942. begin
  72943. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  72944. end;
  72945. procedure TCAN1_C1FIFOCON9.setDONLY; inline;
  72946. begin
  72947. pTDefRegMap(@Self)^.&set := $00001000;
  72948. end;
  72949. procedure TCAN1_C1FIFOCON9.clearDONLY; inline;
  72950. begin
  72951. pTDefRegMap(@Self)^.clr := $00001000;
  72952. end;
  72953. procedure TCAN1_C1FIFOCON9.setDONLY(thebits : TBits_1); inline;
  72954. begin
  72955. if thebits = 0 then
  72956. pTDefRegMap(@Self)^.clr := $00001000
  72957. else
  72958. pTDefRegMap(@Self)^.&set := $00001000;
  72959. end;
  72960. function TCAN1_C1FIFOCON9.getDONLY : TBits_1; inline;
  72961. begin
  72962. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72963. end;
  72964. procedure TCAN1_C1FIFOCON9.setUINC; inline;
  72965. begin
  72966. pTDefRegMap(@Self)^.&set := $00002000;
  72967. end;
  72968. procedure TCAN1_C1FIFOCON9.clearUINC; inline;
  72969. begin
  72970. pTDefRegMap(@Self)^.clr := $00002000;
  72971. end;
  72972. procedure TCAN1_C1FIFOCON9.setUINC(thebits : TBits_1); inline;
  72973. begin
  72974. if thebits = 0 then
  72975. pTDefRegMap(@Self)^.clr := $00002000
  72976. else
  72977. pTDefRegMap(@Self)^.&set := $00002000;
  72978. end;
  72979. function TCAN1_C1FIFOCON9.getUINC : TBits_1; inline;
  72980. begin
  72981. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72982. end;
  72983. procedure TCAN1_C1FIFOCON9.setFRESET; inline;
  72984. begin
  72985. pTDefRegMap(@Self)^.&set := $00004000;
  72986. end;
  72987. procedure TCAN1_C1FIFOCON9.clearFRESET; inline;
  72988. begin
  72989. pTDefRegMap(@Self)^.clr := $00004000;
  72990. end;
  72991. procedure TCAN1_C1FIFOCON9.setFRESET(thebits : TBits_1); inline;
  72992. begin
  72993. if thebits = 0 then
  72994. pTDefRegMap(@Self)^.clr := $00004000
  72995. else
  72996. pTDefRegMap(@Self)^.&set := $00004000;
  72997. end;
  72998. function TCAN1_C1FIFOCON9.getFRESET : TBits_1; inline;
  72999. begin
  73000. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73001. end;
  73002. procedure TCAN1_C1FIFOCON9.setFSIZE(thebits : TBits_5); inline;
  73003. begin
  73004. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  73005. end;
  73006. function TCAN1_C1FIFOCON9.getFSIZE : TBits_5; inline;
  73007. begin
  73008. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  73009. end;
  73010. procedure TCAN1_C1FIFOCON9.setw(thebits : TBits_32); inline;
  73011. begin
  73012. pTDefRegMap(@Self)^.val := thebits;
  73013. end;
  73014. function TCAN1_C1FIFOCON9.getw : TBits_32; inline;
  73015. begin
  73016. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73017. end;
  73018. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIF; inline;
  73019. begin
  73020. pTDefRegMap(@Self)^.&set := $00000001;
  73021. end;
  73022. procedure TCAN1_C1FIFOINT9.clearRXNEMPTYIF; inline;
  73023. begin
  73024. pTDefRegMap(@Self)^.clr := $00000001;
  73025. end;
  73026. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIF(thebits : TBits_1); inline;
  73027. begin
  73028. if thebits = 0 then
  73029. pTDefRegMap(@Self)^.clr := $00000001
  73030. else
  73031. pTDefRegMap(@Self)^.&set := $00000001;
  73032. end;
  73033. function TCAN1_C1FIFOINT9.getRXNEMPTYIF : TBits_1; inline;
  73034. begin
  73035. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73036. end;
  73037. procedure TCAN1_C1FIFOINT9.setRXHALFIF; inline;
  73038. begin
  73039. pTDefRegMap(@Self)^.&set := $00000002;
  73040. end;
  73041. procedure TCAN1_C1FIFOINT9.clearRXHALFIF; inline;
  73042. begin
  73043. pTDefRegMap(@Self)^.clr := $00000002;
  73044. end;
  73045. procedure TCAN1_C1FIFOINT9.setRXHALFIF(thebits : TBits_1); inline;
  73046. begin
  73047. if thebits = 0 then
  73048. pTDefRegMap(@Self)^.clr := $00000002
  73049. else
  73050. pTDefRegMap(@Self)^.&set := $00000002;
  73051. end;
  73052. function TCAN1_C1FIFOINT9.getRXHALFIF : TBits_1; inline;
  73053. begin
  73054. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73055. end;
  73056. procedure TCAN1_C1FIFOINT9.setRXFULLIF; inline;
  73057. begin
  73058. pTDefRegMap(@Self)^.&set := $00000004;
  73059. end;
  73060. procedure TCAN1_C1FIFOINT9.clearRXFULLIF; inline;
  73061. begin
  73062. pTDefRegMap(@Self)^.clr := $00000004;
  73063. end;
  73064. procedure TCAN1_C1FIFOINT9.setRXFULLIF(thebits : TBits_1); inline;
  73065. begin
  73066. if thebits = 0 then
  73067. pTDefRegMap(@Self)^.clr := $00000004
  73068. else
  73069. pTDefRegMap(@Self)^.&set := $00000004;
  73070. end;
  73071. function TCAN1_C1FIFOINT9.getRXFULLIF : TBits_1; inline;
  73072. begin
  73073. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73074. end;
  73075. procedure TCAN1_C1FIFOINT9.setRXOVFLIF; inline;
  73076. begin
  73077. pTDefRegMap(@Self)^.&set := $00000008;
  73078. end;
  73079. procedure TCAN1_C1FIFOINT9.clearRXOVFLIF; inline;
  73080. begin
  73081. pTDefRegMap(@Self)^.clr := $00000008;
  73082. end;
  73083. procedure TCAN1_C1FIFOINT9.setRXOVFLIF(thebits : TBits_1); inline;
  73084. begin
  73085. if thebits = 0 then
  73086. pTDefRegMap(@Self)^.clr := $00000008
  73087. else
  73088. pTDefRegMap(@Self)^.&set := $00000008;
  73089. end;
  73090. function TCAN1_C1FIFOINT9.getRXOVFLIF : TBits_1; inline;
  73091. begin
  73092. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73093. end;
  73094. procedure TCAN1_C1FIFOINT9.setTXEMPTYIF; inline;
  73095. begin
  73096. pTDefRegMap(@Self)^.&set := $00000100;
  73097. end;
  73098. procedure TCAN1_C1FIFOINT9.clearTXEMPTYIF; inline;
  73099. begin
  73100. pTDefRegMap(@Self)^.clr := $00000100;
  73101. end;
  73102. procedure TCAN1_C1FIFOINT9.setTXEMPTYIF(thebits : TBits_1); inline;
  73103. begin
  73104. if thebits = 0 then
  73105. pTDefRegMap(@Self)^.clr := $00000100
  73106. else
  73107. pTDefRegMap(@Self)^.&set := $00000100;
  73108. end;
  73109. function TCAN1_C1FIFOINT9.getTXEMPTYIF : TBits_1; inline;
  73110. begin
  73111. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73112. end;
  73113. procedure TCAN1_C1FIFOINT9.setTXHALFIF; inline;
  73114. begin
  73115. pTDefRegMap(@Self)^.&set := $00000200;
  73116. end;
  73117. procedure TCAN1_C1FIFOINT9.clearTXHALFIF; inline;
  73118. begin
  73119. pTDefRegMap(@Self)^.clr := $00000200;
  73120. end;
  73121. procedure TCAN1_C1FIFOINT9.setTXHALFIF(thebits : TBits_1); inline;
  73122. begin
  73123. if thebits = 0 then
  73124. pTDefRegMap(@Self)^.clr := $00000200
  73125. else
  73126. pTDefRegMap(@Self)^.&set := $00000200;
  73127. end;
  73128. function TCAN1_C1FIFOINT9.getTXHALFIF : TBits_1; inline;
  73129. begin
  73130. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  73131. end;
  73132. procedure TCAN1_C1FIFOINT9.setTXNFULLIF; inline;
  73133. begin
  73134. pTDefRegMap(@Self)^.&set := $00000400;
  73135. end;
  73136. procedure TCAN1_C1FIFOINT9.clearTXNFULLIF; inline;
  73137. begin
  73138. pTDefRegMap(@Self)^.clr := $00000400;
  73139. end;
  73140. procedure TCAN1_C1FIFOINT9.setTXNFULLIF(thebits : TBits_1); inline;
  73141. begin
  73142. if thebits = 0 then
  73143. pTDefRegMap(@Self)^.clr := $00000400
  73144. else
  73145. pTDefRegMap(@Self)^.&set := $00000400;
  73146. end;
  73147. function TCAN1_C1FIFOINT9.getTXNFULLIF : TBits_1; inline;
  73148. begin
  73149. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  73150. end;
  73151. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIE; inline;
  73152. begin
  73153. pTDefRegMap(@Self)^.&set := $00010000;
  73154. end;
  73155. procedure TCAN1_C1FIFOINT9.clearRXNEMPTYIE; inline;
  73156. begin
  73157. pTDefRegMap(@Self)^.clr := $00010000;
  73158. end;
  73159. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIE(thebits : TBits_1); inline;
  73160. begin
  73161. if thebits = 0 then
  73162. pTDefRegMap(@Self)^.clr := $00010000
  73163. else
  73164. pTDefRegMap(@Self)^.&set := $00010000;
  73165. end;
  73166. function TCAN1_C1FIFOINT9.getRXNEMPTYIE : TBits_1; inline;
  73167. begin
  73168. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  73169. end;
  73170. procedure TCAN1_C1FIFOINT9.setRXHALFIE; inline;
  73171. begin
  73172. pTDefRegMap(@Self)^.&set := $00020000;
  73173. end;
  73174. procedure TCAN1_C1FIFOINT9.clearRXHALFIE; inline;
  73175. begin
  73176. pTDefRegMap(@Self)^.clr := $00020000;
  73177. end;
  73178. procedure TCAN1_C1FIFOINT9.setRXHALFIE(thebits : TBits_1); inline;
  73179. begin
  73180. if thebits = 0 then
  73181. pTDefRegMap(@Self)^.clr := $00020000
  73182. else
  73183. pTDefRegMap(@Self)^.&set := $00020000;
  73184. end;
  73185. function TCAN1_C1FIFOINT9.getRXHALFIE : TBits_1; inline;
  73186. begin
  73187. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  73188. end;
  73189. procedure TCAN1_C1FIFOINT9.setRXFULLIE; inline;
  73190. begin
  73191. pTDefRegMap(@Self)^.&set := $00040000;
  73192. end;
  73193. procedure TCAN1_C1FIFOINT9.clearRXFULLIE; inline;
  73194. begin
  73195. pTDefRegMap(@Self)^.clr := $00040000;
  73196. end;
  73197. procedure TCAN1_C1FIFOINT9.setRXFULLIE(thebits : TBits_1); inline;
  73198. begin
  73199. if thebits = 0 then
  73200. pTDefRegMap(@Self)^.clr := $00040000
  73201. else
  73202. pTDefRegMap(@Self)^.&set := $00040000;
  73203. end;
  73204. function TCAN1_C1FIFOINT9.getRXFULLIE : TBits_1; inline;
  73205. begin
  73206. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  73207. end;
  73208. procedure TCAN1_C1FIFOINT9.setRXOVFLIE; inline;
  73209. begin
  73210. pTDefRegMap(@Self)^.&set := $00080000;
  73211. end;
  73212. procedure TCAN1_C1FIFOINT9.clearRXOVFLIE; inline;
  73213. begin
  73214. pTDefRegMap(@Self)^.clr := $00080000;
  73215. end;
  73216. procedure TCAN1_C1FIFOINT9.setRXOVFLIE(thebits : TBits_1); inline;
  73217. begin
  73218. if thebits = 0 then
  73219. pTDefRegMap(@Self)^.clr := $00080000
  73220. else
  73221. pTDefRegMap(@Self)^.&set := $00080000;
  73222. end;
  73223. function TCAN1_C1FIFOINT9.getRXOVFLIE : TBits_1; inline;
  73224. begin
  73225. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  73226. end;
  73227. procedure TCAN1_C1FIFOINT9.setTXEMPTYIE; inline;
  73228. begin
  73229. pTDefRegMap(@Self)^.&set := $01000000;
  73230. end;
  73231. procedure TCAN1_C1FIFOINT9.clearTXEMPTYIE; inline;
  73232. begin
  73233. pTDefRegMap(@Self)^.clr := $01000000;
  73234. end;
  73235. procedure TCAN1_C1FIFOINT9.setTXEMPTYIE(thebits : TBits_1); inline;
  73236. begin
  73237. if thebits = 0 then
  73238. pTDefRegMap(@Self)^.clr := $01000000
  73239. else
  73240. pTDefRegMap(@Self)^.&set := $01000000;
  73241. end;
  73242. function TCAN1_C1FIFOINT9.getTXEMPTYIE : TBits_1; inline;
  73243. begin
  73244. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  73245. end;
  73246. procedure TCAN1_C1FIFOINT9.setTXHALFIE; inline;
  73247. begin
  73248. pTDefRegMap(@Self)^.&set := $02000000;
  73249. end;
  73250. procedure TCAN1_C1FIFOINT9.clearTXHALFIE; inline;
  73251. begin
  73252. pTDefRegMap(@Self)^.clr := $02000000;
  73253. end;
  73254. procedure TCAN1_C1FIFOINT9.setTXHALFIE(thebits : TBits_1); inline;
  73255. begin
  73256. if thebits = 0 then
  73257. pTDefRegMap(@Self)^.clr := $02000000
  73258. else
  73259. pTDefRegMap(@Self)^.&set := $02000000;
  73260. end;
  73261. function TCAN1_C1FIFOINT9.getTXHALFIE : TBits_1; inline;
  73262. begin
  73263. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  73264. end;
  73265. procedure TCAN1_C1FIFOINT9.setTXNFULLIE; inline;
  73266. begin
  73267. pTDefRegMap(@Self)^.&set := $04000000;
  73268. end;
  73269. procedure TCAN1_C1FIFOINT9.clearTXNFULLIE; inline;
  73270. begin
  73271. pTDefRegMap(@Self)^.clr := $04000000;
  73272. end;
  73273. procedure TCAN1_C1FIFOINT9.setTXNFULLIE(thebits : TBits_1); inline;
  73274. begin
  73275. if thebits = 0 then
  73276. pTDefRegMap(@Self)^.clr := $04000000
  73277. else
  73278. pTDefRegMap(@Self)^.&set := $04000000;
  73279. end;
  73280. function TCAN1_C1FIFOINT9.getTXNFULLIE : TBits_1; inline;
  73281. begin
  73282. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  73283. end;
  73284. procedure TCAN1_C1FIFOINT9.setw(thebits : TBits_32); inline;
  73285. begin
  73286. pTDefRegMap(@Self)^.val := thebits;
  73287. end;
  73288. function TCAN1_C1FIFOINT9.getw : TBits_32; inline;
  73289. begin
  73290. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73291. end;
  73292. procedure TCAN1_C1FIFOCI9.setCFIFOCI(thebits : TBits_5); inline;
  73293. begin
  73294. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  73295. end;
  73296. function TCAN1_C1FIFOCI9.getCFIFOCI : TBits_5; inline;
  73297. begin
  73298. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  73299. end;
  73300. procedure TCAN1_C1FIFOCI9.setw(thebits : TBits_32); inline;
  73301. begin
  73302. pTDefRegMap(@Self)^.val := thebits;
  73303. end;
  73304. function TCAN1_C1FIFOCI9.getw : TBits_32; inline;
  73305. begin
  73306. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73307. end;
  73308. procedure TCAN1_C1FIFOCON10.setTXPRI(thebits : TBits_2); inline;
  73309. begin
  73310. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  73311. end;
  73312. function TCAN1_C1FIFOCON10.getTXPRI : TBits_2; inline;
  73313. begin
  73314. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  73315. end;
  73316. procedure TCAN1_C1FIFOCON10.setRTREN; inline;
  73317. begin
  73318. pTDefRegMap(@Self)^.&set := $00000004;
  73319. end;
  73320. procedure TCAN1_C1FIFOCON10.clearRTREN; inline;
  73321. begin
  73322. pTDefRegMap(@Self)^.clr := $00000004;
  73323. end;
  73324. procedure TCAN1_C1FIFOCON10.setRTREN(thebits : TBits_1); inline;
  73325. begin
  73326. if thebits = 0 then
  73327. pTDefRegMap(@Self)^.clr := $00000004
  73328. else
  73329. pTDefRegMap(@Self)^.&set := $00000004;
  73330. end;
  73331. function TCAN1_C1FIFOCON10.getRTREN : TBits_1; inline;
  73332. begin
  73333. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73334. end;
  73335. procedure TCAN1_C1FIFOCON10.setTXREQ; inline;
  73336. begin
  73337. pTDefRegMap(@Self)^.&set := $00000008;
  73338. end;
  73339. procedure TCAN1_C1FIFOCON10.clearTXREQ; inline;
  73340. begin
  73341. pTDefRegMap(@Self)^.clr := $00000008;
  73342. end;
  73343. procedure TCAN1_C1FIFOCON10.setTXREQ(thebits : TBits_1); inline;
  73344. begin
  73345. if thebits = 0 then
  73346. pTDefRegMap(@Self)^.clr := $00000008
  73347. else
  73348. pTDefRegMap(@Self)^.&set := $00000008;
  73349. end;
  73350. function TCAN1_C1FIFOCON10.getTXREQ : TBits_1; inline;
  73351. begin
  73352. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73353. end;
  73354. procedure TCAN1_C1FIFOCON10.setTXERR; inline;
  73355. begin
  73356. pTDefRegMap(@Self)^.&set := $00000010;
  73357. end;
  73358. procedure TCAN1_C1FIFOCON10.clearTXERR; inline;
  73359. begin
  73360. pTDefRegMap(@Self)^.clr := $00000010;
  73361. end;
  73362. procedure TCAN1_C1FIFOCON10.setTXERR(thebits : TBits_1); inline;
  73363. begin
  73364. if thebits = 0 then
  73365. pTDefRegMap(@Self)^.clr := $00000010
  73366. else
  73367. pTDefRegMap(@Self)^.&set := $00000010;
  73368. end;
  73369. function TCAN1_C1FIFOCON10.getTXERR : TBits_1; inline;
  73370. begin
  73371. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  73372. end;
  73373. procedure TCAN1_C1FIFOCON10.setTXLARB; inline;
  73374. begin
  73375. pTDefRegMap(@Self)^.&set := $00000020;
  73376. end;
  73377. procedure TCAN1_C1FIFOCON10.clearTXLARB; inline;
  73378. begin
  73379. pTDefRegMap(@Self)^.clr := $00000020;
  73380. end;
  73381. procedure TCAN1_C1FIFOCON10.setTXLARB(thebits : TBits_1); inline;
  73382. begin
  73383. if thebits = 0 then
  73384. pTDefRegMap(@Self)^.clr := $00000020
  73385. else
  73386. pTDefRegMap(@Self)^.&set := $00000020;
  73387. end;
  73388. function TCAN1_C1FIFOCON10.getTXLARB : TBits_1; inline;
  73389. begin
  73390. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  73391. end;
  73392. procedure TCAN1_C1FIFOCON10.setTXABAT; inline;
  73393. begin
  73394. pTDefRegMap(@Self)^.&set := $00000040;
  73395. end;
  73396. procedure TCAN1_C1FIFOCON10.clearTXABAT; inline;
  73397. begin
  73398. pTDefRegMap(@Self)^.clr := $00000040;
  73399. end;
  73400. procedure TCAN1_C1FIFOCON10.setTXABAT(thebits : TBits_1); inline;
  73401. begin
  73402. if thebits = 0 then
  73403. pTDefRegMap(@Self)^.clr := $00000040
  73404. else
  73405. pTDefRegMap(@Self)^.&set := $00000040;
  73406. end;
  73407. function TCAN1_C1FIFOCON10.getTXABAT : TBits_1; inline;
  73408. begin
  73409. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  73410. end;
  73411. procedure TCAN1_C1FIFOCON10.setTXEN; inline;
  73412. begin
  73413. pTDefRegMap(@Self)^.&set := $00000080;
  73414. end;
  73415. procedure TCAN1_C1FIFOCON10.clearTXEN; inline;
  73416. begin
  73417. pTDefRegMap(@Self)^.clr := $00000080;
  73418. end;
  73419. procedure TCAN1_C1FIFOCON10.setTXEN(thebits : TBits_1); inline;
  73420. begin
  73421. if thebits = 0 then
  73422. pTDefRegMap(@Self)^.clr := $00000080
  73423. else
  73424. pTDefRegMap(@Self)^.&set := $00000080;
  73425. end;
  73426. function TCAN1_C1FIFOCON10.getTXEN : TBits_1; inline;
  73427. begin
  73428. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73429. end;
  73430. procedure TCAN1_C1FIFOCON10.setDONLY; inline;
  73431. begin
  73432. pTDefRegMap(@Self)^.&set := $00001000;
  73433. end;
  73434. procedure TCAN1_C1FIFOCON10.clearDONLY; inline;
  73435. begin
  73436. pTDefRegMap(@Self)^.clr := $00001000;
  73437. end;
  73438. procedure TCAN1_C1FIFOCON10.setDONLY(thebits : TBits_1); inline;
  73439. begin
  73440. if thebits = 0 then
  73441. pTDefRegMap(@Self)^.clr := $00001000
  73442. else
  73443. pTDefRegMap(@Self)^.&set := $00001000;
  73444. end;
  73445. function TCAN1_C1FIFOCON10.getDONLY : TBits_1; inline;
  73446. begin
  73447. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  73448. end;
  73449. procedure TCAN1_C1FIFOCON10.setUINC; inline;
  73450. begin
  73451. pTDefRegMap(@Self)^.&set := $00002000;
  73452. end;
  73453. procedure TCAN1_C1FIFOCON10.clearUINC; inline;
  73454. begin
  73455. pTDefRegMap(@Self)^.clr := $00002000;
  73456. end;
  73457. procedure TCAN1_C1FIFOCON10.setUINC(thebits : TBits_1); inline;
  73458. begin
  73459. if thebits = 0 then
  73460. pTDefRegMap(@Self)^.clr := $00002000
  73461. else
  73462. pTDefRegMap(@Self)^.&set := $00002000;
  73463. end;
  73464. function TCAN1_C1FIFOCON10.getUINC : TBits_1; inline;
  73465. begin
  73466. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  73467. end;
  73468. procedure TCAN1_C1FIFOCON10.setFRESET; inline;
  73469. begin
  73470. pTDefRegMap(@Self)^.&set := $00004000;
  73471. end;
  73472. procedure TCAN1_C1FIFOCON10.clearFRESET; inline;
  73473. begin
  73474. pTDefRegMap(@Self)^.clr := $00004000;
  73475. end;
  73476. procedure TCAN1_C1FIFOCON10.setFRESET(thebits : TBits_1); inline;
  73477. begin
  73478. if thebits = 0 then
  73479. pTDefRegMap(@Self)^.clr := $00004000
  73480. else
  73481. pTDefRegMap(@Self)^.&set := $00004000;
  73482. end;
  73483. function TCAN1_C1FIFOCON10.getFRESET : TBits_1; inline;
  73484. begin
  73485. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73486. end;
  73487. procedure TCAN1_C1FIFOCON10.setFSIZE(thebits : TBits_5); inline;
  73488. begin
  73489. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  73490. end;
  73491. function TCAN1_C1FIFOCON10.getFSIZE : TBits_5; inline;
  73492. begin
  73493. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  73494. end;
  73495. procedure TCAN1_C1FIFOCON10.setw(thebits : TBits_32); inline;
  73496. begin
  73497. pTDefRegMap(@Self)^.val := thebits;
  73498. end;
  73499. function TCAN1_C1FIFOCON10.getw : TBits_32; inline;
  73500. begin
  73501. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73502. end;
  73503. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIF; inline;
  73504. begin
  73505. pTDefRegMap(@Self)^.&set := $00000001;
  73506. end;
  73507. procedure TCAN1_C1FIFOINT10.clearRXNEMPTYIF; inline;
  73508. begin
  73509. pTDefRegMap(@Self)^.clr := $00000001;
  73510. end;
  73511. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIF(thebits : TBits_1); inline;
  73512. begin
  73513. if thebits = 0 then
  73514. pTDefRegMap(@Self)^.clr := $00000001
  73515. else
  73516. pTDefRegMap(@Self)^.&set := $00000001;
  73517. end;
  73518. function TCAN1_C1FIFOINT10.getRXNEMPTYIF : TBits_1; inline;
  73519. begin
  73520. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73521. end;
  73522. procedure TCAN1_C1FIFOINT10.setRXHALFIF; inline;
  73523. begin
  73524. pTDefRegMap(@Self)^.&set := $00000002;
  73525. end;
  73526. procedure TCAN1_C1FIFOINT10.clearRXHALFIF; inline;
  73527. begin
  73528. pTDefRegMap(@Self)^.clr := $00000002;
  73529. end;
  73530. procedure TCAN1_C1FIFOINT10.setRXHALFIF(thebits : TBits_1); inline;
  73531. begin
  73532. if thebits = 0 then
  73533. pTDefRegMap(@Self)^.clr := $00000002
  73534. else
  73535. pTDefRegMap(@Self)^.&set := $00000002;
  73536. end;
  73537. function TCAN1_C1FIFOINT10.getRXHALFIF : TBits_1; inline;
  73538. begin
  73539. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73540. end;
  73541. procedure TCAN1_C1FIFOINT10.setRXFULLIF; inline;
  73542. begin
  73543. pTDefRegMap(@Self)^.&set := $00000004;
  73544. end;
  73545. procedure TCAN1_C1FIFOINT10.clearRXFULLIF; inline;
  73546. begin
  73547. pTDefRegMap(@Self)^.clr := $00000004;
  73548. end;
  73549. procedure TCAN1_C1FIFOINT10.setRXFULLIF(thebits : TBits_1); inline;
  73550. begin
  73551. if thebits = 0 then
  73552. pTDefRegMap(@Self)^.clr := $00000004
  73553. else
  73554. pTDefRegMap(@Self)^.&set := $00000004;
  73555. end;
  73556. function TCAN1_C1FIFOINT10.getRXFULLIF : TBits_1; inline;
  73557. begin
  73558. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73559. end;
  73560. procedure TCAN1_C1FIFOINT10.setRXOVFLIF; inline;
  73561. begin
  73562. pTDefRegMap(@Self)^.&set := $00000008;
  73563. end;
  73564. procedure TCAN1_C1FIFOINT10.clearRXOVFLIF; inline;
  73565. begin
  73566. pTDefRegMap(@Self)^.clr := $00000008;
  73567. end;
  73568. procedure TCAN1_C1FIFOINT10.setRXOVFLIF(thebits : TBits_1); inline;
  73569. begin
  73570. if thebits = 0 then
  73571. pTDefRegMap(@Self)^.clr := $00000008
  73572. else
  73573. pTDefRegMap(@Self)^.&set := $00000008;
  73574. end;
  73575. function TCAN1_C1FIFOINT10.getRXOVFLIF : TBits_1; inline;
  73576. begin
  73577. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73578. end;
  73579. procedure TCAN1_C1FIFOINT10.setTXEMPTYIF; inline;
  73580. begin
  73581. pTDefRegMap(@Self)^.&set := $00000100;
  73582. end;
  73583. procedure TCAN1_C1FIFOINT10.clearTXEMPTYIF; inline;
  73584. begin
  73585. pTDefRegMap(@Self)^.clr := $00000100;
  73586. end;
  73587. procedure TCAN1_C1FIFOINT10.setTXEMPTYIF(thebits : TBits_1); inline;
  73588. begin
  73589. if thebits = 0 then
  73590. pTDefRegMap(@Self)^.clr := $00000100
  73591. else
  73592. pTDefRegMap(@Self)^.&set := $00000100;
  73593. end;
  73594. function TCAN1_C1FIFOINT10.getTXEMPTYIF : TBits_1; inline;
  73595. begin
  73596. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73597. end;
  73598. procedure TCAN1_C1FIFOINT10.setTXHALFIF; inline;
  73599. begin
  73600. pTDefRegMap(@Self)^.&set := $00000200;
  73601. end;
  73602. procedure TCAN1_C1FIFOINT10.clearTXHALFIF; inline;
  73603. begin
  73604. pTDefRegMap(@Self)^.clr := $00000200;
  73605. end;
  73606. procedure TCAN1_C1FIFOINT10.setTXHALFIF(thebits : TBits_1); inline;
  73607. begin
  73608. if thebits = 0 then
  73609. pTDefRegMap(@Self)^.clr := $00000200
  73610. else
  73611. pTDefRegMap(@Self)^.&set := $00000200;
  73612. end;
  73613. function TCAN1_C1FIFOINT10.getTXHALFIF : TBits_1; inline;
  73614. begin
  73615. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  73616. end;
  73617. procedure TCAN1_C1FIFOINT10.setTXNFULLIF; inline;
  73618. begin
  73619. pTDefRegMap(@Self)^.&set := $00000400;
  73620. end;
  73621. procedure TCAN1_C1FIFOINT10.clearTXNFULLIF; inline;
  73622. begin
  73623. pTDefRegMap(@Self)^.clr := $00000400;
  73624. end;
  73625. procedure TCAN1_C1FIFOINT10.setTXNFULLIF(thebits : TBits_1); inline;
  73626. begin
  73627. if thebits = 0 then
  73628. pTDefRegMap(@Self)^.clr := $00000400
  73629. else
  73630. pTDefRegMap(@Self)^.&set := $00000400;
  73631. end;
  73632. function TCAN1_C1FIFOINT10.getTXNFULLIF : TBits_1; inline;
  73633. begin
  73634. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  73635. end;
  73636. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIE; inline;
  73637. begin
  73638. pTDefRegMap(@Self)^.&set := $00010000;
  73639. end;
  73640. procedure TCAN1_C1FIFOINT10.clearRXNEMPTYIE; inline;
  73641. begin
  73642. pTDefRegMap(@Self)^.clr := $00010000;
  73643. end;
  73644. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIE(thebits : TBits_1); inline;
  73645. begin
  73646. if thebits = 0 then
  73647. pTDefRegMap(@Self)^.clr := $00010000
  73648. else
  73649. pTDefRegMap(@Self)^.&set := $00010000;
  73650. end;
  73651. function TCAN1_C1FIFOINT10.getRXNEMPTYIE : TBits_1; inline;
  73652. begin
  73653. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  73654. end;
  73655. procedure TCAN1_C1FIFOINT10.setRXHALFIE; inline;
  73656. begin
  73657. pTDefRegMap(@Self)^.&set := $00020000;
  73658. end;
  73659. procedure TCAN1_C1FIFOINT10.clearRXHALFIE; inline;
  73660. begin
  73661. pTDefRegMap(@Self)^.clr := $00020000;
  73662. end;
  73663. procedure TCAN1_C1FIFOINT10.setRXHALFIE(thebits : TBits_1); inline;
  73664. begin
  73665. if thebits = 0 then
  73666. pTDefRegMap(@Self)^.clr := $00020000
  73667. else
  73668. pTDefRegMap(@Self)^.&set := $00020000;
  73669. end;
  73670. function TCAN1_C1FIFOINT10.getRXHALFIE : TBits_1; inline;
  73671. begin
  73672. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  73673. end;
  73674. procedure TCAN1_C1FIFOINT10.setRXFULLIE; inline;
  73675. begin
  73676. pTDefRegMap(@Self)^.&set := $00040000;
  73677. end;
  73678. procedure TCAN1_C1FIFOINT10.clearRXFULLIE; inline;
  73679. begin
  73680. pTDefRegMap(@Self)^.clr := $00040000;
  73681. end;
  73682. procedure TCAN1_C1FIFOINT10.setRXFULLIE(thebits : TBits_1); inline;
  73683. begin
  73684. if thebits = 0 then
  73685. pTDefRegMap(@Self)^.clr := $00040000
  73686. else
  73687. pTDefRegMap(@Self)^.&set := $00040000;
  73688. end;
  73689. function TCAN1_C1FIFOINT10.getRXFULLIE : TBits_1; inline;
  73690. begin
  73691. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  73692. end;
  73693. procedure TCAN1_C1FIFOINT10.setRXOVFLIE; inline;
  73694. begin
  73695. pTDefRegMap(@Self)^.&set := $00080000;
  73696. end;
  73697. procedure TCAN1_C1FIFOINT10.clearRXOVFLIE; inline;
  73698. begin
  73699. pTDefRegMap(@Self)^.clr := $00080000;
  73700. end;
  73701. procedure TCAN1_C1FIFOINT10.setRXOVFLIE(thebits : TBits_1); inline;
  73702. begin
  73703. if thebits = 0 then
  73704. pTDefRegMap(@Self)^.clr := $00080000
  73705. else
  73706. pTDefRegMap(@Self)^.&set := $00080000;
  73707. end;
  73708. function TCAN1_C1FIFOINT10.getRXOVFLIE : TBits_1; inline;
  73709. begin
  73710. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  73711. end;
  73712. procedure TCAN1_C1FIFOINT10.setTXEMPTYIE; inline;
  73713. begin
  73714. pTDefRegMap(@Self)^.&set := $01000000;
  73715. end;
  73716. procedure TCAN1_C1FIFOINT10.clearTXEMPTYIE; inline;
  73717. begin
  73718. pTDefRegMap(@Self)^.clr := $01000000;
  73719. end;
  73720. procedure TCAN1_C1FIFOINT10.setTXEMPTYIE(thebits : TBits_1); inline;
  73721. begin
  73722. if thebits = 0 then
  73723. pTDefRegMap(@Self)^.clr := $01000000
  73724. else
  73725. pTDefRegMap(@Self)^.&set := $01000000;
  73726. end;
  73727. function TCAN1_C1FIFOINT10.getTXEMPTYIE : TBits_1; inline;
  73728. begin
  73729. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  73730. end;
  73731. procedure TCAN1_C1FIFOINT10.setTXHALFIE; inline;
  73732. begin
  73733. pTDefRegMap(@Self)^.&set := $02000000;
  73734. end;
  73735. procedure TCAN1_C1FIFOINT10.clearTXHALFIE; inline;
  73736. begin
  73737. pTDefRegMap(@Self)^.clr := $02000000;
  73738. end;
  73739. procedure TCAN1_C1FIFOINT10.setTXHALFIE(thebits : TBits_1); inline;
  73740. begin
  73741. if thebits = 0 then
  73742. pTDefRegMap(@Self)^.clr := $02000000
  73743. else
  73744. pTDefRegMap(@Self)^.&set := $02000000;
  73745. end;
  73746. function TCAN1_C1FIFOINT10.getTXHALFIE : TBits_1; inline;
  73747. begin
  73748. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  73749. end;
  73750. procedure TCAN1_C1FIFOINT10.setTXNFULLIE; inline;
  73751. begin
  73752. pTDefRegMap(@Self)^.&set := $04000000;
  73753. end;
  73754. procedure TCAN1_C1FIFOINT10.clearTXNFULLIE; inline;
  73755. begin
  73756. pTDefRegMap(@Self)^.clr := $04000000;
  73757. end;
  73758. procedure TCAN1_C1FIFOINT10.setTXNFULLIE(thebits : TBits_1); inline;
  73759. begin
  73760. if thebits = 0 then
  73761. pTDefRegMap(@Self)^.clr := $04000000
  73762. else
  73763. pTDefRegMap(@Self)^.&set := $04000000;
  73764. end;
  73765. function TCAN1_C1FIFOINT10.getTXNFULLIE : TBits_1; inline;
  73766. begin
  73767. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  73768. end;
  73769. procedure TCAN1_C1FIFOINT10.setw(thebits : TBits_32); inline;
  73770. begin
  73771. pTDefRegMap(@Self)^.val := thebits;
  73772. end;
  73773. function TCAN1_C1FIFOINT10.getw : TBits_32; inline;
  73774. begin
  73775. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73776. end;
  73777. procedure TCAN1_C1FIFOCI10.setCFIFOCI(thebits : TBits_5); inline;
  73778. begin
  73779. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  73780. end;
  73781. function TCAN1_C1FIFOCI10.getCFIFOCI : TBits_5; inline;
  73782. begin
  73783. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  73784. end;
  73785. procedure TCAN1_C1FIFOCI10.setw(thebits : TBits_32); inline;
  73786. begin
  73787. pTDefRegMap(@Self)^.val := thebits;
  73788. end;
  73789. function TCAN1_C1FIFOCI10.getw : TBits_32; inline;
  73790. begin
  73791. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73792. end;
  73793. procedure TCAN1_C1FIFOCON11.setTXPRI(thebits : TBits_2); inline;
  73794. begin
  73795. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  73796. end;
  73797. function TCAN1_C1FIFOCON11.getTXPRI : TBits_2; inline;
  73798. begin
  73799. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  73800. end;
  73801. procedure TCAN1_C1FIFOCON11.setRTREN; inline;
  73802. begin
  73803. pTDefRegMap(@Self)^.&set := $00000004;
  73804. end;
  73805. procedure TCAN1_C1FIFOCON11.clearRTREN; inline;
  73806. begin
  73807. pTDefRegMap(@Self)^.clr := $00000004;
  73808. end;
  73809. procedure TCAN1_C1FIFOCON11.setRTREN(thebits : TBits_1); inline;
  73810. begin
  73811. if thebits = 0 then
  73812. pTDefRegMap(@Self)^.clr := $00000004
  73813. else
  73814. pTDefRegMap(@Self)^.&set := $00000004;
  73815. end;
  73816. function TCAN1_C1FIFOCON11.getRTREN : TBits_1; inline;
  73817. begin
  73818. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73819. end;
  73820. procedure TCAN1_C1FIFOCON11.setTXREQ; inline;
  73821. begin
  73822. pTDefRegMap(@Self)^.&set := $00000008;
  73823. end;
  73824. procedure TCAN1_C1FIFOCON11.clearTXREQ; inline;
  73825. begin
  73826. pTDefRegMap(@Self)^.clr := $00000008;
  73827. end;
  73828. procedure TCAN1_C1FIFOCON11.setTXREQ(thebits : TBits_1); inline;
  73829. begin
  73830. if thebits = 0 then
  73831. pTDefRegMap(@Self)^.clr := $00000008
  73832. else
  73833. pTDefRegMap(@Self)^.&set := $00000008;
  73834. end;
  73835. function TCAN1_C1FIFOCON11.getTXREQ : TBits_1; inline;
  73836. begin
  73837. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73838. end;
  73839. procedure TCAN1_C1FIFOCON11.setTXERR; inline;
  73840. begin
  73841. pTDefRegMap(@Self)^.&set := $00000010;
  73842. end;
  73843. procedure TCAN1_C1FIFOCON11.clearTXERR; inline;
  73844. begin
  73845. pTDefRegMap(@Self)^.clr := $00000010;
  73846. end;
  73847. procedure TCAN1_C1FIFOCON11.setTXERR(thebits : TBits_1); inline;
  73848. begin
  73849. if thebits = 0 then
  73850. pTDefRegMap(@Self)^.clr := $00000010
  73851. else
  73852. pTDefRegMap(@Self)^.&set := $00000010;
  73853. end;
  73854. function TCAN1_C1FIFOCON11.getTXERR : TBits_1; inline;
  73855. begin
  73856. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  73857. end;
  73858. procedure TCAN1_C1FIFOCON11.setTXLARB; inline;
  73859. begin
  73860. pTDefRegMap(@Self)^.&set := $00000020;
  73861. end;
  73862. procedure TCAN1_C1FIFOCON11.clearTXLARB; inline;
  73863. begin
  73864. pTDefRegMap(@Self)^.clr := $00000020;
  73865. end;
  73866. procedure TCAN1_C1FIFOCON11.setTXLARB(thebits : TBits_1); inline;
  73867. begin
  73868. if thebits = 0 then
  73869. pTDefRegMap(@Self)^.clr := $00000020
  73870. else
  73871. pTDefRegMap(@Self)^.&set := $00000020;
  73872. end;
  73873. function TCAN1_C1FIFOCON11.getTXLARB : TBits_1; inline;
  73874. begin
  73875. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  73876. end;
  73877. procedure TCAN1_C1FIFOCON11.setTXABAT; inline;
  73878. begin
  73879. pTDefRegMap(@Self)^.&set := $00000040;
  73880. end;
  73881. procedure TCAN1_C1FIFOCON11.clearTXABAT; inline;
  73882. begin
  73883. pTDefRegMap(@Self)^.clr := $00000040;
  73884. end;
  73885. procedure TCAN1_C1FIFOCON11.setTXABAT(thebits : TBits_1); inline;
  73886. begin
  73887. if thebits = 0 then
  73888. pTDefRegMap(@Self)^.clr := $00000040
  73889. else
  73890. pTDefRegMap(@Self)^.&set := $00000040;
  73891. end;
  73892. function TCAN1_C1FIFOCON11.getTXABAT : TBits_1; inline;
  73893. begin
  73894. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  73895. end;
  73896. procedure TCAN1_C1FIFOCON11.setTXEN; inline;
  73897. begin
  73898. pTDefRegMap(@Self)^.&set := $00000080;
  73899. end;
  73900. procedure TCAN1_C1FIFOCON11.clearTXEN; inline;
  73901. begin
  73902. pTDefRegMap(@Self)^.clr := $00000080;
  73903. end;
  73904. procedure TCAN1_C1FIFOCON11.setTXEN(thebits : TBits_1); inline;
  73905. begin
  73906. if thebits = 0 then
  73907. pTDefRegMap(@Self)^.clr := $00000080
  73908. else
  73909. pTDefRegMap(@Self)^.&set := $00000080;
  73910. end;
  73911. function TCAN1_C1FIFOCON11.getTXEN : TBits_1; inline;
  73912. begin
  73913. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73914. end;
  73915. procedure TCAN1_C1FIFOCON11.setDONLY; inline;
  73916. begin
  73917. pTDefRegMap(@Self)^.&set := $00001000;
  73918. end;
  73919. procedure TCAN1_C1FIFOCON11.clearDONLY; inline;
  73920. begin
  73921. pTDefRegMap(@Self)^.clr := $00001000;
  73922. end;
  73923. procedure TCAN1_C1FIFOCON11.setDONLY(thebits : TBits_1); inline;
  73924. begin
  73925. if thebits = 0 then
  73926. pTDefRegMap(@Self)^.clr := $00001000
  73927. else
  73928. pTDefRegMap(@Self)^.&set := $00001000;
  73929. end;
  73930. function TCAN1_C1FIFOCON11.getDONLY : TBits_1; inline;
  73931. begin
  73932. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  73933. end;
  73934. procedure TCAN1_C1FIFOCON11.setUINC; inline;
  73935. begin
  73936. pTDefRegMap(@Self)^.&set := $00002000;
  73937. end;
  73938. procedure TCAN1_C1FIFOCON11.clearUINC; inline;
  73939. begin
  73940. pTDefRegMap(@Self)^.clr := $00002000;
  73941. end;
  73942. procedure TCAN1_C1FIFOCON11.setUINC(thebits : TBits_1); inline;
  73943. begin
  73944. if thebits = 0 then
  73945. pTDefRegMap(@Self)^.clr := $00002000
  73946. else
  73947. pTDefRegMap(@Self)^.&set := $00002000;
  73948. end;
  73949. function TCAN1_C1FIFOCON11.getUINC : TBits_1; inline;
  73950. begin
  73951. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  73952. end;
  73953. procedure TCAN1_C1FIFOCON11.setFRESET; inline;
  73954. begin
  73955. pTDefRegMap(@Self)^.&set := $00004000;
  73956. end;
  73957. procedure TCAN1_C1FIFOCON11.clearFRESET; inline;
  73958. begin
  73959. pTDefRegMap(@Self)^.clr := $00004000;
  73960. end;
  73961. procedure TCAN1_C1FIFOCON11.setFRESET(thebits : TBits_1); inline;
  73962. begin
  73963. if thebits = 0 then
  73964. pTDefRegMap(@Self)^.clr := $00004000
  73965. else
  73966. pTDefRegMap(@Self)^.&set := $00004000;
  73967. end;
  73968. function TCAN1_C1FIFOCON11.getFRESET : TBits_1; inline;
  73969. begin
  73970. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73971. end;
  73972. procedure TCAN1_C1FIFOCON11.setFSIZE(thebits : TBits_5); inline;
  73973. begin
  73974. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  73975. end;
  73976. function TCAN1_C1FIFOCON11.getFSIZE : TBits_5; inline;
  73977. begin
  73978. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  73979. end;
  73980. procedure TCAN1_C1FIFOCON11.setw(thebits : TBits_32); inline;
  73981. begin
  73982. pTDefRegMap(@Self)^.val := thebits;
  73983. end;
  73984. function TCAN1_C1FIFOCON11.getw : TBits_32; inline;
  73985. begin
  73986. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73987. end;
  73988. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIF; inline;
  73989. begin
  73990. pTDefRegMap(@Self)^.&set := $00000001;
  73991. end;
  73992. procedure TCAN1_C1FIFOINT11.clearRXNEMPTYIF; inline;
  73993. begin
  73994. pTDefRegMap(@Self)^.clr := $00000001;
  73995. end;
  73996. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIF(thebits : TBits_1); inline;
  73997. begin
  73998. if thebits = 0 then
  73999. pTDefRegMap(@Self)^.clr := $00000001
  74000. else
  74001. pTDefRegMap(@Self)^.&set := $00000001;
  74002. end;
  74003. function TCAN1_C1FIFOINT11.getRXNEMPTYIF : TBits_1; inline;
  74004. begin
  74005. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74006. end;
  74007. procedure TCAN1_C1FIFOINT11.setRXHALFIF; inline;
  74008. begin
  74009. pTDefRegMap(@Self)^.&set := $00000002;
  74010. end;
  74011. procedure TCAN1_C1FIFOINT11.clearRXHALFIF; inline;
  74012. begin
  74013. pTDefRegMap(@Self)^.clr := $00000002;
  74014. end;
  74015. procedure TCAN1_C1FIFOINT11.setRXHALFIF(thebits : TBits_1); inline;
  74016. begin
  74017. if thebits = 0 then
  74018. pTDefRegMap(@Self)^.clr := $00000002
  74019. else
  74020. pTDefRegMap(@Self)^.&set := $00000002;
  74021. end;
  74022. function TCAN1_C1FIFOINT11.getRXHALFIF : TBits_1; inline;
  74023. begin
  74024. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74025. end;
  74026. procedure TCAN1_C1FIFOINT11.setRXFULLIF; inline;
  74027. begin
  74028. pTDefRegMap(@Self)^.&set := $00000004;
  74029. end;
  74030. procedure TCAN1_C1FIFOINT11.clearRXFULLIF; inline;
  74031. begin
  74032. pTDefRegMap(@Self)^.clr := $00000004;
  74033. end;
  74034. procedure TCAN1_C1FIFOINT11.setRXFULLIF(thebits : TBits_1); inline;
  74035. begin
  74036. if thebits = 0 then
  74037. pTDefRegMap(@Self)^.clr := $00000004
  74038. else
  74039. pTDefRegMap(@Self)^.&set := $00000004;
  74040. end;
  74041. function TCAN1_C1FIFOINT11.getRXFULLIF : TBits_1; inline;
  74042. begin
  74043. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74044. end;
  74045. procedure TCAN1_C1FIFOINT11.setRXOVFLIF; inline;
  74046. begin
  74047. pTDefRegMap(@Self)^.&set := $00000008;
  74048. end;
  74049. procedure TCAN1_C1FIFOINT11.clearRXOVFLIF; inline;
  74050. begin
  74051. pTDefRegMap(@Self)^.clr := $00000008;
  74052. end;
  74053. procedure TCAN1_C1FIFOINT11.setRXOVFLIF(thebits : TBits_1); inline;
  74054. begin
  74055. if thebits = 0 then
  74056. pTDefRegMap(@Self)^.clr := $00000008
  74057. else
  74058. pTDefRegMap(@Self)^.&set := $00000008;
  74059. end;
  74060. function TCAN1_C1FIFOINT11.getRXOVFLIF : TBits_1; inline;
  74061. begin
  74062. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74063. end;
  74064. procedure TCAN1_C1FIFOINT11.setTXEMPTYIF; inline;
  74065. begin
  74066. pTDefRegMap(@Self)^.&set := $00000100;
  74067. end;
  74068. procedure TCAN1_C1FIFOINT11.clearTXEMPTYIF; inline;
  74069. begin
  74070. pTDefRegMap(@Self)^.clr := $00000100;
  74071. end;
  74072. procedure TCAN1_C1FIFOINT11.setTXEMPTYIF(thebits : TBits_1); inline;
  74073. begin
  74074. if thebits = 0 then
  74075. pTDefRegMap(@Self)^.clr := $00000100
  74076. else
  74077. pTDefRegMap(@Self)^.&set := $00000100;
  74078. end;
  74079. function TCAN1_C1FIFOINT11.getTXEMPTYIF : TBits_1; inline;
  74080. begin
  74081. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74082. end;
  74083. procedure TCAN1_C1FIFOINT11.setTXHALFIF; inline;
  74084. begin
  74085. pTDefRegMap(@Self)^.&set := $00000200;
  74086. end;
  74087. procedure TCAN1_C1FIFOINT11.clearTXHALFIF; inline;
  74088. begin
  74089. pTDefRegMap(@Self)^.clr := $00000200;
  74090. end;
  74091. procedure TCAN1_C1FIFOINT11.setTXHALFIF(thebits : TBits_1); inline;
  74092. begin
  74093. if thebits = 0 then
  74094. pTDefRegMap(@Self)^.clr := $00000200
  74095. else
  74096. pTDefRegMap(@Self)^.&set := $00000200;
  74097. end;
  74098. function TCAN1_C1FIFOINT11.getTXHALFIF : TBits_1; inline;
  74099. begin
  74100. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74101. end;
  74102. procedure TCAN1_C1FIFOINT11.setTXNFULLIF; inline;
  74103. begin
  74104. pTDefRegMap(@Self)^.&set := $00000400;
  74105. end;
  74106. procedure TCAN1_C1FIFOINT11.clearTXNFULLIF; inline;
  74107. begin
  74108. pTDefRegMap(@Self)^.clr := $00000400;
  74109. end;
  74110. procedure TCAN1_C1FIFOINT11.setTXNFULLIF(thebits : TBits_1); inline;
  74111. begin
  74112. if thebits = 0 then
  74113. pTDefRegMap(@Self)^.clr := $00000400
  74114. else
  74115. pTDefRegMap(@Self)^.&set := $00000400;
  74116. end;
  74117. function TCAN1_C1FIFOINT11.getTXNFULLIF : TBits_1; inline;
  74118. begin
  74119. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  74120. end;
  74121. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIE; inline;
  74122. begin
  74123. pTDefRegMap(@Self)^.&set := $00010000;
  74124. end;
  74125. procedure TCAN1_C1FIFOINT11.clearRXNEMPTYIE; inline;
  74126. begin
  74127. pTDefRegMap(@Self)^.clr := $00010000;
  74128. end;
  74129. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIE(thebits : TBits_1); inline;
  74130. begin
  74131. if thebits = 0 then
  74132. pTDefRegMap(@Self)^.clr := $00010000
  74133. else
  74134. pTDefRegMap(@Self)^.&set := $00010000;
  74135. end;
  74136. function TCAN1_C1FIFOINT11.getRXNEMPTYIE : TBits_1; inline;
  74137. begin
  74138. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  74139. end;
  74140. procedure TCAN1_C1FIFOINT11.setRXHALFIE; inline;
  74141. begin
  74142. pTDefRegMap(@Self)^.&set := $00020000;
  74143. end;
  74144. procedure TCAN1_C1FIFOINT11.clearRXHALFIE; inline;
  74145. begin
  74146. pTDefRegMap(@Self)^.clr := $00020000;
  74147. end;
  74148. procedure TCAN1_C1FIFOINT11.setRXHALFIE(thebits : TBits_1); inline;
  74149. begin
  74150. if thebits = 0 then
  74151. pTDefRegMap(@Self)^.clr := $00020000
  74152. else
  74153. pTDefRegMap(@Self)^.&set := $00020000;
  74154. end;
  74155. function TCAN1_C1FIFOINT11.getRXHALFIE : TBits_1; inline;
  74156. begin
  74157. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  74158. end;
  74159. procedure TCAN1_C1FIFOINT11.setRXFULLIE; inline;
  74160. begin
  74161. pTDefRegMap(@Self)^.&set := $00040000;
  74162. end;
  74163. procedure TCAN1_C1FIFOINT11.clearRXFULLIE; inline;
  74164. begin
  74165. pTDefRegMap(@Self)^.clr := $00040000;
  74166. end;
  74167. procedure TCAN1_C1FIFOINT11.setRXFULLIE(thebits : TBits_1); inline;
  74168. begin
  74169. if thebits = 0 then
  74170. pTDefRegMap(@Self)^.clr := $00040000
  74171. else
  74172. pTDefRegMap(@Self)^.&set := $00040000;
  74173. end;
  74174. function TCAN1_C1FIFOINT11.getRXFULLIE : TBits_1; inline;
  74175. begin
  74176. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  74177. end;
  74178. procedure TCAN1_C1FIFOINT11.setRXOVFLIE; inline;
  74179. begin
  74180. pTDefRegMap(@Self)^.&set := $00080000;
  74181. end;
  74182. procedure TCAN1_C1FIFOINT11.clearRXOVFLIE; inline;
  74183. begin
  74184. pTDefRegMap(@Self)^.clr := $00080000;
  74185. end;
  74186. procedure TCAN1_C1FIFOINT11.setRXOVFLIE(thebits : TBits_1); inline;
  74187. begin
  74188. if thebits = 0 then
  74189. pTDefRegMap(@Self)^.clr := $00080000
  74190. else
  74191. pTDefRegMap(@Self)^.&set := $00080000;
  74192. end;
  74193. function TCAN1_C1FIFOINT11.getRXOVFLIE : TBits_1; inline;
  74194. begin
  74195. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  74196. end;
  74197. procedure TCAN1_C1FIFOINT11.setTXEMPTYIE; inline;
  74198. begin
  74199. pTDefRegMap(@Self)^.&set := $01000000;
  74200. end;
  74201. procedure TCAN1_C1FIFOINT11.clearTXEMPTYIE; inline;
  74202. begin
  74203. pTDefRegMap(@Self)^.clr := $01000000;
  74204. end;
  74205. procedure TCAN1_C1FIFOINT11.setTXEMPTYIE(thebits : TBits_1); inline;
  74206. begin
  74207. if thebits = 0 then
  74208. pTDefRegMap(@Self)^.clr := $01000000
  74209. else
  74210. pTDefRegMap(@Self)^.&set := $01000000;
  74211. end;
  74212. function TCAN1_C1FIFOINT11.getTXEMPTYIE : TBits_1; inline;
  74213. begin
  74214. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  74215. end;
  74216. procedure TCAN1_C1FIFOINT11.setTXHALFIE; inline;
  74217. begin
  74218. pTDefRegMap(@Self)^.&set := $02000000;
  74219. end;
  74220. procedure TCAN1_C1FIFOINT11.clearTXHALFIE; inline;
  74221. begin
  74222. pTDefRegMap(@Self)^.clr := $02000000;
  74223. end;
  74224. procedure TCAN1_C1FIFOINT11.setTXHALFIE(thebits : TBits_1); inline;
  74225. begin
  74226. if thebits = 0 then
  74227. pTDefRegMap(@Self)^.clr := $02000000
  74228. else
  74229. pTDefRegMap(@Self)^.&set := $02000000;
  74230. end;
  74231. function TCAN1_C1FIFOINT11.getTXHALFIE : TBits_1; inline;
  74232. begin
  74233. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  74234. end;
  74235. procedure TCAN1_C1FIFOINT11.setTXNFULLIE; inline;
  74236. begin
  74237. pTDefRegMap(@Self)^.&set := $04000000;
  74238. end;
  74239. procedure TCAN1_C1FIFOINT11.clearTXNFULLIE; inline;
  74240. begin
  74241. pTDefRegMap(@Self)^.clr := $04000000;
  74242. end;
  74243. procedure TCAN1_C1FIFOINT11.setTXNFULLIE(thebits : TBits_1); inline;
  74244. begin
  74245. if thebits = 0 then
  74246. pTDefRegMap(@Self)^.clr := $04000000
  74247. else
  74248. pTDefRegMap(@Self)^.&set := $04000000;
  74249. end;
  74250. function TCAN1_C1FIFOINT11.getTXNFULLIE : TBits_1; inline;
  74251. begin
  74252. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  74253. end;
  74254. procedure TCAN1_C1FIFOINT11.setw(thebits : TBits_32); inline;
  74255. begin
  74256. pTDefRegMap(@Self)^.val := thebits;
  74257. end;
  74258. function TCAN1_C1FIFOINT11.getw : TBits_32; inline;
  74259. begin
  74260. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74261. end;
  74262. procedure TCAN1_C1FIFOCI11.setCFIFOCI(thebits : TBits_5); inline;
  74263. begin
  74264. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  74265. end;
  74266. function TCAN1_C1FIFOCI11.getCFIFOCI : TBits_5; inline;
  74267. begin
  74268. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  74269. end;
  74270. procedure TCAN1_C1FIFOCI11.setw(thebits : TBits_32); inline;
  74271. begin
  74272. pTDefRegMap(@Self)^.val := thebits;
  74273. end;
  74274. function TCAN1_C1FIFOCI11.getw : TBits_32; inline;
  74275. begin
  74276. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74277. end;
  74278. procedure TCAN1_C1FIFOCON12.setTXPRI(thebits : TBits_2); inline;
  74279. begin
  74280. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  74281. end;
  74282. function TCAN1_C1FIFOCON12.getTXPRI : TBits_2; inline;
  74283. begin
  74284. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  74285. end;
  74286. procedure TCAN1_C1FIFOCON12.setRTREN; inline;
  74287. begin
  74288. pTDefRegMap(@Self)^.&set := $00000004;
  74289. end;
  74290. procedure TCAN1_C1FIFOCON12.clearRTREN; inline;
  74291. begin
  74292. pTDefRegMap(@Self)^.clr := $00000004;
  74293. end;
  74294. procedure TCAN1_C1FIFOCON12.setRTREN(thebits : TBits_1); inline;
  74295. begin
  74296. if thebits = 0 then
  74297. pTDefRegMap(@Self)^.clr := $00000004
  74298. else
  74299. pTDefRegMap(@Self)^.&set := $00000004;
  74300. end;
  74301. function TCAN1_C1FIFOCON12.getRTREN : TBits_1; inline;
  74302. begin
  74303. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74304. end;
  74305. procedure TCAN1_C1FIFOCON12.setTXREQ; inline;
  74306. begin
  74307. pTDefRegMap(@Self)^.&set := $00000008;
  74308. end;
  74309. procedure TCAN1_C1FIFOCON12.clearTXREQ; inline;
  74310. begin
  74311. pTDefRegMap(@Self)^.clr := $00000008;
  74312. end;
  74313. procedure TCAN1_C1FIFOCON12.setTXREQ(thebits : TBits_1); inline;
  74314. begin
  74315. if thebits = 0 then
  74316. pTDefRegMap(@Self)^.clr := $00000008
  74317. else
  74318. pTDefRegMap(@Self)^.&set := $00000008;
  74319. end;
  74320. function TCAN1_C1FIFOCON12.getTXREQ : TBits_1; inline;
  74321. begin
  74322. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74323. end;
  74324. procedure TCAN1_C1FIFOCON12.setTXERR; inline;
  74325. begin
  74326. pTDefRegMap(@Self)^.&set := $00000010;
  74327. end;
  74328. procedure TCAN1_C1FIFOCON12.clearTXERR; inline;
  74329. begin
  74330. pTDefRegMap(@Self)^.clr := $00000010;
  74331. end;
  74332. procedure TCAN1_C1FIFOCON12.setTXERR(thebits : TBits_1); inline;
  74333. begin
  74334. if thebits = 0 then
  74335. pTDefRegMap(@Self)^.clr := $00000010
  74336. else
  74337. pTDefRegMap(@Self)^.&set := $00000010;
  74338. end;
  74339. function TCAN1_C1FIFOCON12.getTXERR : TBits_1; inline;
  74340. begin
  74341. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74342. end;
  74343. procedure TCAN1_C1FIFOCON12.setTXLARB; inline;
  74344. begin
  74345. pTDefRegMap(@Self)^.&set := $00000020;
  74346. end;
  74347. procedure TCAN1_C1FIFOCON12.clearTXLARB; inline;
  74348. begin
  74349. pTDefRegMap(@Self)^.clr := $00000020;
  74350. end;
  74351. procedure TCAN1_C1FIFOCON12.setTXLARB(thebits : TBits_1); inline;
  74352. begin
  74353. if thebits = 0 then
  74354. pTDefRegMap(@Self)^.clr := $00000020
  74355. else
  74356. pTDefRegMap(@Self)^.&set := $00000020;
  74357. end;
  74358. function TCAN1_C1FIFOCON12.getTXLARB : TBits_1; inline;
  74359. begin
  74360. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  74361. end;
  74362. procedure TCAN1_C1FIFOCON12.setTXABAT; inline;
  74363. begin
  74364. pTDefRegMap(@Self)^.&set := $00000040;
  74365. end;
  74366. procedure TCAN1_C1FIFOCON12.clearTXABAT; inline;
  74367. begin
  74368. pTDefRegMap(@Self)^.clr := $00000040;
  74369. end;
  74370. procedure TCAN1_C1FIFOCON12.setTXABAT(thebits : TBits_1); inline;
  74371. begin
  74372. if thebits = 0 then
  74373. pTDefRegMap(@Self)^.clr := $00000040
  74374. else
  74375. pTDefRegMap(@Self)^.&set := $00000040;
  74376. end;
  74377. function TCAN1_C1FIFOCON12.getTXABAT : TBits_1; inline;
  74378. begin
  74379. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  74380. end;
  74381. procedure TCAN1_C1FIFOCON12.setTXEN; inline;
  74382. begin
  74383. pTDefRegMap(@Self)^.&set := $00000080;
  74384. end;
  74385. procedure TCAN1_C1FIFOCON12.clearTXEN; inline;
  74386. begin
  74387. pTDefRegMap(@Self)^.clr := $00000080;
  74388. end;
  74389. procedure TCAN1_C1FIFOCON12.setTXEN(thebits : TBits_1); inline;
  74390. begin
  74391. if thebits = 0 then
  74392. pTDefRegMap(@Self)^.clr := $00000080
  74393. else
  74394. pTDefRegMap(@Self)^.&set := $00000080;
  74395. end;
  74396. function TCAN1_C1FIFOCON12.getTXEN : TBits_1; inline;
  74397. begin
  74398. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  74399. end;
  74400. procedure TCAN1_C1FIFOCON12.setDONLY; inline;
  74401. begin
  74402. pTDefRegMap(@Self)^.&set := $00001000;
  74403. end;
  74404. procedure TCAN1_C1FIFOCON12.clearDONLY; inline;
  74405. begin
  74406. pTDefRegMap(@Self)^.clr := $00001000;
  74407. end;
  74408. procedure TCAN1_C1FIFOCON12.setDONLY(thebits : TBits_1); inline;
  74409. begin
  74410. if thebits = 0 then
  74411. pTDefRegMap(@Self)^.clr := $00001000
  74412. else
  74413. pTDefRegMap(@Self)^.&set := $00001000;
  74414. end;
  74415. function TCAN1_C1FIFOCON12.getDONLY : TBits_1; inline;
  74416. begin
  74417. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  74418. end;
  74419. procedure TCAN1_C1FIFOCON12.setUINC; inline;
  74420. begin
  74421. pTDefRegMap(@Self)^.&set := $00002000;
  74422. end;
  74423. procedure TCAN1_C1FIFOCON12.clearUINC; inline;
  74424. begin
  74425. pTDefRegMap(@Self)^.clr := $00002000;
  74426. end;
  74427. procedure TCAN1_C1FIFOCON12.setUINC(thebits : TBits_1); inline;
  74428. begin
  74429. if thebits = 0 then
  74430. pTDefRegMap(@Self)^.clr := $00002000
  74431. else
  74432. pTDefRegMap(@Self)^.&set := $00002000;
  74433. end;
  74434. function TCAN1_C1FIFOCON12.getUINC : TBits_1; inline;
  74435. begin
  74436. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  74437. end;
  74438. procedure TCAN1_C1FIFOCON12.setFRESET; inline;
  74439. begin
  74440. pTDefRegMap(@Self)^.&set := $00004000;
  74441. end;
  74442. procedure TCAN1_C1FIFOCON12.clearFRESET; inline;
  74443. begin
  74444. pTDefRegMap(@Self)^.clr := $00004000;
  74445. end;
  74446. procedure TCAN1_C1FIFOCON12.setFRESET(thebits : TBits_1); inline;
  74447. begin
  74448. if thebits = 0 then
  74449. pTDefRegMap(@Self)^.clr := $00004000
  74450. else
  74451. pTDefRegMap(@Self)^.&set := $00004000;
  74452. end;
  74453. function TCAN1_C1FIFOCON12.getFRESET : TBits_1; inline;
  74454. begin
  74455. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  74456. end;
  74457. procedure TCAN1_C1FIFOCON12.setFSIZE(thebits : TBits_5); inline;
  74458. begin
  74459. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  74460. end;
  74461. function TCAN1_C1FIFOCON12.getFSIZE : TBits_5; inline;
  74462. begin
  74463. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  74464. end;
  74465. procedure TCAN1_C1FIFOCON12.setw(thebits : TBits_32); inline;
  74466. begin
  74467. pTDefRegMap(@Self)^.val := thebits;
  74468. end;
  74469. function TCAN1_C1FIFOCON12.getw : TBits_32; inline;
  74470. begin
  74471. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74472. end;
  74473. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIF; inline;
  74474. begin
  74475. pTDefRegMap(@Self)^.&set := $00000001;
  74476. end;
  74477. procedure TCAN1_C1FIFOINT12.clearRXNEMPTYIF; inline;
  74478. begin
  74479. pTDefRegMap(@Self)^.clr := $00000001;
  74480. end;
  74481. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIF(thebits : TBits_1); inline;
  74482. begin
  74483. if thebits = 0 then
  74484. pTDefRegMap(@Self)^.clr := $00000001
  74485. else
  74486. pTDefRegMap(@Self)^.&set := $00000001;
  74487. end;
  74488. function TCAN1_C1FIFOINT12.getRXNEMPTYIF : TBits_1; inline;
  74489. begin
  74490. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74491. end;
  74492. procedure TCAN1_C1FIFOINT12.setRXHALFIF; inline;
  74493. begin
  74494. pTDefRegMap(@Self)^.&set := $00000002;
  74495. end;
  74496. procedure TCAN1_C1FIFOINT12.clearRXHALFIF; inline;
  74497. begin
  74498. pTDefRegMap(@Self)^.clr := $00000002;
  74499. end;
  74500. procedure TCAN1_C1FIFOINT12.setRXHALFIF(thebits : TBits_1); inline;
  74501. begin
  74502. if thebits = 0 then
  74503. pTDefRegMap(@Self)^.clr := $00000002
  74504. else
  74505. pTDefRegMap(@Self)^.&set := $00000002;
  74506. end;
  74507. function TCAN1_C1FIFOINT12.getRXHALFIF : TBits_1; inline;
  74508. begin
  74509. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74510. end;
  74511. procedure TCAN1_C1FIFOINT12.setRXFULLIF; inline;
  74512. begin
  74513. pTDefRegMap(@Self)^.&set := $00000004;
  74514. end;
  74515. procedure TCAN1_C1FIFOINT12.clearRXFULLIF; inline;
  74516. begin
  74517. pTDefRegMap(@Self)^.clr := $00000004;
  74518. end;
  74519. procedure TCAN1_C1FIFOINT12.setRXFULLIF(thebits : TBits_1); inline;
  74520. begin
  74521. if thebits = 0 then
  74522. pTDefRegMap(@Self)^.clr := $00000004
  74523. else
  74524. pTDefRegMap(@Self)^.&set := $00000004;
  74525. end;
  74526. function TCAN1_C1FIFOINT12.getRXFULLIF : TBits_1; inline;
  74527. begin
  74528. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74529. end;
  74530. procedure TCAN1_C1FIFOINT12.setRXOVFLIF; inline;
  74531. begin
  74532. pTDefRegMap(@Self)^.&set := $00000008;
  74533. end;
  74534. procedure TCAN1_C1FIFOINT12.clearRXOVFLIF; inline;
  74535. begin
  74536. pTDefRegMap(@Self)^.clr := $00000008;
  74537. end;
  74538. procedure TCAN1_C1FIFOINT12.setRXOVFLIF(thebits : TBits_1); inline;
  74539. begin
  74540. if thebits = 0 then
  74541. pTDefRegMap(@Self)^.clr := $00000008
  74542. else
  74543. pTDefRegMap(@Self)^.&set := $00000008;
  74544. end;
  74545. function TCAN1_C1FIFOINT12.getRXOVFLIF : TBits_1; inline;
  74546. begin
  74547. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74548. end;
  74549. procedure TCAN1_C1FIFOINT12.setTXEMPTYIF; inline;
  74550. begin
  74551. pTDefRegMap(@Self)^.&set := $00000100;
  74552. end;
  74553. procedure TCAN1_C1FIFOINT12.clearTXEMPTYIF; inline;
  74554. begin
  74555. pTDefRegMap(@Self)^.clr := $00000100;
  74556. end;
  74557. procedure TCAN1_C1FIFOINT12.setTXEMPTYIF(thebits : TBits_1); inline;
  74558. begin
  74559. if thebits = 0 then
  74560. pTDefRegMap(@Self)^.clr := $00000100
  74561. else
  74562. pTDefRegMap(@Self)^.&set := $00000100;
  74563. end;
  74564. function TCAN1_C1FIFOINT12.getTXEMPTYIF : TBits_1; inline;
  74565. begin
  74566. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74567. end;
  74568. procedure TCAN1_C1FIFOINT12.setTXHALFIF; inline;
  74569. begin
  74570. pTDefRegMap(@Self)^.&set := $00000200;
  74571. end;
  74572. procedure TCAN1_C1FIFOINT12.clearTXHALFIF; inline;
  74573. begin
  74574. pTDefRegMap(@Self)^.clr := $00000200;
  74575. end;
  74576. procedure TCAN1_C1FIFOINT12.setTXHALFIF(thebits : TBits_1); inline;
  74577. begin
  74578. if thebits = 0 then
  74579. pTDefRegMap(@Self)^.clr := $00000200
  74580. else
  74581. pTDefRegMap(@Self)^.&set := $00000200;
  74582. end;
  74583. function TCAN1_C1FIFOINT12.getTXHALFIF : TBits_1; inline;
  74584. begin
  74585. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74586. end;
  74587. procedure TCAN1_C1FIFOINT12.setTXNFULLIF; inline;
  74588. begin
  74589. pTDefRegMap(@Self)^.&set := $00000400;
  74590. end;
  74591. procedure TCAN1_C1FIFOINT12.clearTXNFULLIF; inline;
  74592. begin
  74593. pTDefRegMap(@Self)^.clr := $00000400;
  74594. end;
  74595. procedure TCAN1_C1FIFOINT12.setTXNFULLIF(thebits : TBits_1); inline;
  74596. begin
  74597. if thebits = 0 then
  74598. pTDefRegMap(@Self)^.clr := $00000400
  74599. else
  74600. pTDefRegMap(@Self)^.&set := $00000400;
  74601. end;
  74602. function TCAN1_C1FIFOINT12.getTXNFULLIF : TBits_1; inline;
  74603. begin
  74604. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  74605. end;
  74606. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIE; inline;
  74607. begin
  74608. pTDefRegMap(@Self)^.&set := $00010000;
  74609. end;
  74610. procedure TCAN1_C1FIFOINT12.clearRXNEMPTYIE; inline;
  74611. begin
  74612. pTDefRegMap(@Self)^.clr := $00010000;
  74613. end;
  74614. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIE(thebits : TBits_1); inline;
  74615. begin
  74616. if thebits = 0 then
  74617. pTDefRegMap(@Self)^.clr := $00010000
  74618. else
  74619. pTDefRegMap(@Self)^.&set := $00010000;
  74620. end;
  74621. function TCAN1_C1FIFOINT12.getRXNEMPTYIE : TBits_1; inline;
  74622. begin
  74623. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  74624. end;
  74625. procedure TCAN1_C1FIFOINT12.setRXHALFIE; inline;
  74626. begin
  74627. pTDefRegMap(@Self)^.&set := $00020000;
  74628. end;
  74629. procedure TCAN1_C1FIFOINT12.clearRXHALFIE; inline;
  74630. begin
  74631. pTDefRegMap(@Self)^.clr := $00020000;
  74632. end;
  74633. procedure TCAN1_C1FIFOINT12.setRXHALFIE(thebits : TBits_1); inline;
  74634. begin
  74635. if thebits = 0 then
  74636. pTDefRegMap(@Self)^.clr := $00020000
  74637. else
  74638. pTDefRegMap(@Self)^.&set := $00020000;
  74639. end;
  74640. function TCAN1_C1FIFOINT12.getRXHALFIE : TBits_1; inline;
  74641. begin
  74642. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  74643. end;
  74644. procedure TCAN1_C1FIFOINT12.setRXFULLIE; inline;
  74645. begin
  74646. pTDefRegMap(@Self)^.&set := $00040000;
  74647. end;
  74648. procedure TCAN1_C1FIFOINT12.clearRXFULLIE; inline;
  74649. begin
  74650. pTDefRegMap(@Self)^.clr := $00040000;
  74651. end;
  74652. procedure TCAN1_C1FIFOINT12.setRXFULLIE(thebits : TBits_1); inline;
  74653. begin
  74654. if thebits = 0 then
  74655. pTDefRegMap(@Self)^.clr := $00040000
  74656. else
  74657. pTDefRegMap(@Self)^.&set := $00040000;
  74658. end;
  74659. function TCAN1_C1FIFOINT12.getRXFULLIE : TBits_1; inline;
  74660. begin
  74661. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  74662. end;
  74663. procedure TCAN1_C1FIFOINT12.setRXOVFLIE; inline;
  74664. begin
  74665. pTDefRegMap(@Self)^.&set := $00080000;
  74666. end;
  74667. procedure TCAN1_C1FIFOINT12.clearRXOVFLIE; inline;
  74668. begin
  74669. pTDefRegMap(@Self)^.clr := $00080000;
  74670. end;
  74671. procedure TCAN1_C1FIFOINT12.setRXOVFLIE(thebits : TBits_1); inline;
  74672. begin
  74673. if thebits = 0 then
  74674. pTDefRegMap(@Self)^.clr := $00080000
  74675. else
  74676. pTDefRegMap(@Self)^.&set := $00080000;
  74677. end;
  74678. function TCAN1_C1FIFOINT12.getRXOVFLIE : TBits_1; inline;
  74679. begin
  74680. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  74681. end;
  74682. procedure TCAN1_C1FIFOINT12.setTXEMPTYIE; inline;
  74683. begin
  74684. pTDefRegMap(@Self)^.&set := $01000000;
  74685. end;
  74686. procedure TCAN1_C1FIFOINT12.clearTXEMPTYIE; inline;
  74687. begin
  74688. pTDefRegMap(@Self)^.clr := $01000000;
  74689. end;
  74690. procedure TCAN1_C1FIFOINT12.setTXEMPTYIE(thebits : TBits_1); inline;
  74691. begin
  74692. if thebits = 0 then
  74693. pTDefRegMap(@Self)^.clr := $01000000
  74694. else
  74695. pTDefRegMap(@Self)^.&set := $01000000;
  74696. end;
  74697. function TCAN1_C1FIFOINT12.getTXEMPTYIE : TBits_1; inline;
  74698. begin
  74699. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  74700. end;
  74701. procedure TCAN1_C1FIFOINT12.setTXHALFIE; inline;
  74702. begin
  74703. pTDefRegMap(@Self)^.&set := $02000000;
  74704. end;
  74705. procedure TCAN1_C1FIFOINT12.clearTXHALFIE; inline;
  74706. begin
  74707. pTDefRegMap(@Self)^.clr := $02000000;
  74708. end;
  74709. procedure TCAN1_C1FIFOINT12.setTXHALFIE(thebits : TBits_1); inline;
  74710. begin
  74711. if thebits = 0 then
  74712. pTDefRegMap(@Self)^.clr := $02000000
  74713. else
  74714. pTDefRegMap(@Self)^.&set := $02000000;
  74715. end;
  74716. function TCAN1_C1FIFOINT12.getTXHALFIE : TBits_1; inline;
  74717. begin
  74718. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  74719. end;
  74720. procedure TCAN1_C1FIFOINT12.setTXNFULLIE; inline;
  74721. begin
  74722. pTDefRegMap(@Self)^.&set := $04000000;
  74723. end;
  74724. procedure TCAN1_C1FIFOINT12.clearTXNFULLIE; inline;
  74725. begin
  74726. pTDefRegMap(@Self)^.clr := $04000000;
  74727. end;
  74728. procedure TCAN1_C1FIFOINT12.setTXNFULLIE(thebits : TBits_1); inline;
  74729. begin
  74730. if thebits = 0 then
  74731. pTDefRegMap(@Self)^.clr := $04000000
  74732. else
  74733. pTDefRegMap(@Self)^.&set := $04000000;
  74734. end;
  74735. function TCAN1_C1FIFOINT12.getTXNFULLIE : TBits_1; inline;
  74736. begin
  74737. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  74738. end;
  74739. procedure TCAN1_C1FIFOINT12.setw(thebits : TBits_32); inline;
  74740. begin
  74741. pTDefRegMap(@Self)^.val := thebits;
  74742. end;
  74743. function TCAN1_C1FIFOINT12.getw : TBits_32; inline;
  74744. begin
  74745. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74746. end;
  74747. procedure TCAN1_C1FIFOCI12.setCFIFOCI(thebits : TBits_5); inline;
  74748. begin
  74749. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  74750. end;
  74751. function TCAN1_C1FIFOCI12.getCFIFOCI : TBits_5; inline;
  74752. begin
  74753. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  74754. end;
  74755. procedure TCAN1_C1FIFOCI12.setw(thebits : TBits_32); inline;
  74756. begin
  74757. pTDefRegMap(@Self)^.val := thebits;
  74758. end;
  74759. function TCAN1_C1FIFOCI12.getw : TBits_32; inline;
  74760. begin
  74761. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74762. end;
  74763. procedure TCAN1_C1FIFOCON13.setTXPRI(thebits : TBits_2); inline;
  74764. begin
  74765. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  74766. end;
  74767. function TCAN1_C1FIFOCON13.getTXPRI : TBits_2; inline;
  74768. begin
  74769. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  74770. end;
  74771. procedure TCAN1_C1FIFOCON13.setRTREN; inline;
  74772. begin
  74773. pTDefRegMap(@Self)^.&set := $00000004;
  74774. end;
  74775. procedure TCAN1_C1FIFOCON13.clearRTREN; inline;
  74776. begin
  74777. pTDefRegMap(@Self)^.clr := $00000004;
  74778. end;
  74779. procedure TCAN1_C1FIFOCON13.setRTREN(thebits : TBits_1); inline;
  74780. begin
  74781. if thebits = 0 then
  74782. pTDefRegMap(@Self)^.clr := $00000004
  74783. else
  74784. pTDefRegMap(@Self)^.&set := $00000004;
  74785. end;
  74786. function TCAN1_C1FIFOCON13.getRTREN : TBits_1; inline;
  74787. begin
  74788. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74789. end;
  74790. procedure TCAN1_C1FIFOCON13.setTXREQ; inline;
  74791. begin
  74792. pTDefRegMap(@Self)^.&set := $00000008;
  74793. end;
  74794. procedure TCAN1_C1FIFOCON13.clearTXREQ; inline;
  74795. begin
  74796. pTDefRegMap(@Self)^.clr := $00000008;
  74797. end;
  74798. procedure TCAN1_C1FIFOCON13.setTXREQ(thebits : TBits_1); inline;
  74799. begin
  74800. if thebits = 0 then
  74801. pTDefRegMap(@Self)^.clr := $00000008
  74802. else
  74803. pTDefRegMap(@Self)^.&set := $00000008;
  74804. end;
  74805. function TCAN1_C1FIFOCON13.getTXREQ : TBits_1; inline;
  74806. begin
  74807. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74808. end;
  74809. procedure TCAN1_C1FIFOCON13.setTXERR; inline;
  74810. begin
  74811. pTDefRegMap(@Self)^.&set := $00000010;
  74812. end;
  74813. procedure TCAN1_C1FIFOCON13.clearTXERR; inline;
  74814. begin
  74815. pTDefRegMap(@Self)^.clr := $00000010;
  74816. end;
  74817. procedure TCAN1_C1FIFOCON13.setTXERR(thebits : TBits_1); inline;
  74818. begin
  74819. if thebits = 0 then
  74820. pTDefRegMap(@Self)^.clr := $00000010
  74821. else
  74822. pTDefRegMap(@Self)^.&set := $00000010;
  74823. end;
  74824. function TCAN1_C1FIFOCON13.getTXERR : TBits_1; inline;
  74825. begin
  74826. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74827. end;
  74828. procedure TCAN1_C1FIFOCON13.setTXLARB; inline;
  74829. begin
  74830. pTDefRegMap(@Self)^.&set := $00000020;
  74831. end;
  74832. procedure TCAN1_C1FIFOCON13.clearTXLARB; inline;
  74833. begin
  74834. pTDefRegMap(@Self)^.clr := $00000020;
  74835. end;
  74836. procedure TCAN1_C1FIFOCON13.setTXLARB(thebits : TBits_1); inline;
  74837. begin
  74838. if thebits = 0 then
  74839. pTDefRegMap(@Self)^.clr := $00000020
  74840. else
  74841. pTDefRegMap(@Self)^.&set := $00000020;
  74842. end;
  74843. function TCAN1_C1FIFOCON13.getTXLARB : TBits_1; inline;
  74844. begin
  74845. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  74846. end;
  74847. procedure TCAN1_C1FIFOCON13.setTXABAT; inline;
  74848. begin
  74849. pTDefRegMap(@Self)^.&set := $00000040;
  74850. end;
  74851. procedure TCAN1_C1FIFOCON13.clearTXABAT; inline;
  74852. begin
  74853. pTDefRegMap(@Self)^.clr := $00000040;
  74854. end;
  74855. procedure TCAN1_C1FIFOCON13.setTXABAT(thebits : TBits_1); inline;
  74856. begin
  74857. if thebits = 0 then
  74858. pTDefRegMap(@Self)^.clr := $00000040
  74859. else
  74860. pTDefRegMap(@Self)^.&set := $00000040;
  74861. end;
  74862. function TCAN1_C1FIFOCON13.getTXABAT : TBits_1; inline;
  74863. begin
  74864. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  74865. end;
  74866. procedure TCAN1_C1FIFOCON13.setTXEN; inline;
  74867. begin
  74868. pTDefRegMap(@Self)^.&set := $00000080;
  74869. end;
  74870. procedure TCAN1_C1FIFOCON13.clearTXEN; inline;
  74871. begin
  74872. pTDefRegMap(@Self)^.clr := $00000080;
  74873. end;
  74874. procedure TCAN1_C1FIFOCON13.setTXEN(thebits : TBits_1); inline;
  74875. begin
  74876. if thebits = 0 then
  74877. pTDefRegMap(@Self)^.clr := $00000080
  74878. else
  74879. pTDefRegMap(@Self)^.&set := $00000080;
  74880. end;
  74881. function TCAN1_C1FIFOCON13.getTXEN : TBits_1; inline;
  74882. begin
  74883. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  74884. end;
  74885. procedure TCAN1_C1FIFOCON13.setDONLY; inline;
  74886. begin
  74887. pTDefRegMap(@Self)^.&set := $00001000;
  74888. end;
  74889. procedure TCAN1_C1FIFOCON13.clearDONLY; inline;
  74890. begin
  74891. pTDefRegMap(@Self)^.clr := $00001000;
  74892. end;
  74893. procedure TCAN1_C1FIFOCON13.setDONLY(thebits : TBits_1); inline;
  74894. begin
  74895. if thebits = 0 then
  74896. pTDefRegMap(@Self)^.clr := $00001000
  74897. else
  74898. pTDefRegMap(@Self)^.&set := $00001000;
  74899. end;
  74900. function TCAN1_C1FIFOCON13.getDONLY : TBits_1; inline;
  74901. begin
  74902. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  74903. end;
  74904. procedure TCAN1_C1FIFOCON13.setUINC; inline;
  74905. begin
  74906. pTDefRegMap(@Self)^.&set := $00002000;
  74907. end;
  74908. procedure TCAN1_C1FIFOCON13.clearUINC; inline;
  74909. begin
  74910. pTDefRegMap(@Self)^.clr := $00002000;
  74911. end;
  74912. procedure TCAN1_C1FIFOCON13.setUINC(thebits : TBits_1); inline;
  74913. begin
  74914. if thebits = 0 then
  74915. pTDefRegMap(@Self)^.clr := $00002000
  74916. else
  74917. pTDefRegMap(@Self)^.&set := $00002000;
  74918. end;
  74919. function TCAN1_C1FIFOCON13.getUINC : TBits_1; inline;
  74920. begin
  74921. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  74922. end;
  74923. procedure TCAN1_C1FIFOCON13.setFRESET; inline;
  74924. begin
  74925. pTDefRegMap(@Self)^.&set := $00004000;
  74926. end;
  74927. procedure TCAN1_C1FIFOCON13.clearFRESET; inline;
  74928. begin
  74929. pTDefRegMap(@Self)^.clr := $00004000;
  74930. end;
  74931. procedure TCAN1_C1FIFOCON13.setFRESET(thebits : TBits_1); inline;
  74932. begin
  74933. if thebits = 0 then
  74934. pTDefRegMap(@Self)^.clr := $00004000
  74935. else
  74936. pTDefRegMap(@Self)^.&set := $00004000;
  74937. end;
  74938. function TCAN1_C1FIFOCON13.getFRESET : TBits_1; inline;
  74939. begin
  74940. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  74941. end;
  74942. procedure TCAN1_C1FIFOCON13.setFSIZE(thebits : TBits_5); inline;
  74943. begin
  74944. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  74945. end;
  74946. function TCAN1_C1FIFOCON13.getFSIZE : TBits_5; inline;
  74947. begin
  74948. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  74949. end;
  74950. procedure TCAN1_C1FIFOCON13.setw(thebits : TBits_32); inline;
  74951. begin
  74952. pTDefRegMap(@Self)^.val := thebits;
  74953. end;
  74954. function TCAN1_C1FIFOCON13.getw : TBits_32; inline;
  74955. begin
  74956. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74957. end;
  74958. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIF; inline;
  74959. begin
  74960. pTDefRegMap(@Self)^.&set := $00000001;
  74961. end;
  74962. procedure TCAN1_C1FIFOINT13.clearRXNEMPTYIF; inline;
  74963. begin
  74964. pTDefRegMap(@Self)^.clr := $00000001;
  74965. end;
  74966. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIF(thebits : TBits_1); inline;
  74967. begin
  74968. if thebits = 0 then
  74969. pTDefRegMap(@Self)^.clr := $00000001
  74970. else
  74971. pTDefRegMap(@Self)^.&set := $00000001;
  74972. end;
  74973. function TCAN1_C1FIFOINT13.getRXNEMPTYIF : TBits_1; inline;
  74974. begin
  74975. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74976. end;
  74977. procedure TCAN1_C1FIFOINT13.setRXHALFIF; inline;
  74978. begin
  74979. pTDefRegMap(@Self)^.&set := $00000002;
  74980. end;
  74981. procedure TCAN1_C1FIFOINT13.clearRXHALFIF; inline;
  74982. begin
  74983. pTDefRegMap(@Self)^.clr := $00000002;
  74984. end;
  74985. procedure TCAN1_C1FIFOINT13.setRXHALFIF(thebits : TBits_1); inline;
  74986. begin
  74987. if thebits = 0 then
  74988. pTDefRegMap(@Self)^.clr := $00000002
  74989. else
  74990. pTDefRegMap(@Self)^.&set := $00000002;
  74991. end;
  74992. function TCAN1_C1FIFOINT13.getRXHALFIF : TBits_1; inline;
  74993. begin
  74994. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74995. end;
  74996. procedure TCAN1_C1FIFOINT13.setRXFULLIF; inline;
  74997. begin
  74998. pTDefRegMap(@Self)^.&set := $00000004;
  74999. end;
  75000. procedure TCAN1_C1FIFOINT13.clearRXFULLIF; inline;
  75001. begin
  75002. pTDefRegMap(@Self)^.clr := $00000004;
  75003. end;
  75004. procedure TCAN1_C1FIFOINT13.setRXFULLIF(thebits : TBits_1); inline;
  75005. begin
  75006. if thebits = 0 then
  75007. pTDefRegMap(@Self)^.clr := $00000004
  75008. else
  75009. pTDefRegMap(@Self)^.&set := $00000004;
  75010. end;
  75011. function TCAN1_C1FIFOINT13.getRXFULLIF : TBits_1; inline;
  75012. begin
  75013. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75014. end;
  75015. procedure TCAN1_C1FIFOINT13.setRXOVFLIF; inline;
  75016. begin
  75017. pTDefRegMap(@Self)^.&set := $00000008;
  75018. end;
  75019. procedure TCAN1_C1FIFOINT13.clearRXOVFLIF; inline;
  75020. begin
  75021. pTDefRegMap(@Self)^.clr := $00000008;
  75022. end;
  75023. procedure TCAN1_C1FIFOINT13.setRXOVFLIF(thebits : TBits_1); inline;
  75024. begin
  75025. if thebits = 0 then
  75026. pTDefRegMap(@Self)^.clr := $00000008
  75027. else
  75028. pTDefRegMap(@Self)^.&set := $00000008;
  75029. end;
  75030. function TCAN1_C1FIFOINT13.getRXOVFLIF : TBits_1; inline;
  75031. begin
  75032. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75033. end;
  75034. procedure TCAN1_C1FIFOINT13.setTXEMPTYIF; inline;
  75035. begin
  75036. pTDefRegMap(@Self)^.&set := $00000100;
  75037. end;
  75038. procedure TCAN1_C1FIFOINT13.clearTXEMPTYIF; inline;
  75039. begin
  75040. pTDefRegMap(@Self)^.clr := $00000100;
  75041. end;
  75042. procedure TCAN1_C1FIFOINT13.setTXEMPTYIF(thebits : TBits_1); inline;
  75043. begin
  75044. if thebits = 0 then
  75045. pTDefRegMap(@Self)^.clr := $00000100
  75046. else
  75047. pTDefRegMap(@Self)^.&set := $00000100;
  75048. end;
  75049. function TCAN1_C1FIFOINT13.getTXEMPTYIF : TBits_1; inline;
  75050. begin
  75051. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  75052. end;
  75053. procedure TCAN1_C1FIFOINT13.setTXHALFIF; inline;
  75054. begin
  75055. pTDefRegMap(@Self)^.&set := $00000200;
  75056. end;
  75057. procedure TCAN1_C1FIFOINT13.clearTXHALFIF; inline;
  75058. begin
  75059. pTDefRegMap(@Self)^.clr := $00000200;
  75060. end;
  75061. procedure TCAN1_C1FIFOINT13.setTXHALFIF(thebits : TBits_1); inline;
  75062. begin
  75063. if thebits = 0 then
  75064. pTDefRegMap(@Self)^.clr := $00000200
  75065. else
  75066. pTDefRegMap(@Self)^.&set := $00000200;
  75067. end;
  75068. function TCAN1_C1FIFOINT13.getTXHALFIF : TBits_1; inline;
  75069. begin
  75070. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  75071. end;
  75072. procedure TCAN1_C1FIFOINT13.setTXNFULLIF; inline;
  75073. begin
  75074. pTDefRegMap(@Self)^.&set := $00000400;
  75075. end;
  75076. procedure TCAN1_C1FIFOINT13.clearTXNFULLIF; inline;
  75077. begin
  75078. pTDefRegMap(@Self)^.clr := $00000400;
  75079. end;
  75080. procedure TCAN1_C1FIFOINT13.setTXNFULLIF(thebits : TBits_1); inline;
  75081. begin
  75082. if thebits = 0 then
  75083. pTDefRegMap(@Self)^.clr := $00000400
  75084. else
  75085. pTDefRegMap(@Self)^.&set := $00000400;
  75086. end;
  75087. function TCAN1_C1FIFOINT13.getTXNFULLIF : TBits_1; inline;
  75088. begin
  75089. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  75090. end;
  75091. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIE; inline;
  75092. begin
  75093. pTDefRegMap(@Self)^.&set := $00010000;
  75094. end;
  75095. procedure TCAN1_C1FIFOINT13.clearRXNEMPTYIE; inline;
  75096. begin
  75097. pTDefRegMap(@Self)^.clr := $00010000;
  75098. end;
  75099. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIE(thebits : TBits_1); inline;
  75100. begin
  75101. if thebits = 0 then
  75102. pTDefRegMap(@Self)^.clr := $00010000
  75103. else
  75104. pTDefRegMap(@Self)^.&set := $00010000;
  75105. end;
  75106. function TCAN1_C1FIFOINT13.getRXNEMPTYIE : TBits_1; inline;
  75107. begin
  75108. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  75109. end;
  75110. procedure TCAN1_C1FIFOINT13.setRXHALFIE; inline;
  75111. begin
  75112. pTDefRegMap(@Self)^.&set := $00020000;
  75113. end;
  75114. procedure TCAN1_C1FIFOINT13.clearRXHALFIE; inline;
  75115. begin
  75116. pTDefRegMap(@Self)^.clr := $00020000;
  75117. end;
  75118. procedure TCAN1_C1FIFOINT13.setRXHALFIE(thebits : TBits_1); inline;
  75119. begin
  75120. if thebits = 0 then
  75121. pTDefRegMap(@Self)^.clr := $00020000
  75122. else
  75123. pTDefRegMap(@Self)^.&set := $00020000;
  75124. end;
  75125. function TCAN1_C1FIFOINT13.getRXHALFIE : TBits_1; inline;
  75126. begin
  75127. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  75128. end;
  75129. procedure TCAN1_C1FIFOINT13.setRXFULLIE; inline;
  75130. begin
  75131. pTDefRegMap(@Self)^.&set := $00040000;
  75132. end;
  75133. procedure TCAN1_C1FIFOINT13.clearRXFULLIE; inline;
  75134. begin
  75135. pTDefRegMap(@Self)^.clr := $00040000;
  75136. end;
  75137. procedure TCAN1_C1FIFOINT13.setRXFULLIE(thebits : TBits_1); inline;
  75138. begin
  75139. if thebits = 0 then
  75140. pTDefRegMap(@Self)^.clr := $00040000
  75141. else
  75142. pTDefRegMap(@Self)^.&set := $00040000;
  75143. end;
  75144. function TCAN1_C1FIFOINT13.getRXFULLIE : TBits_1; inline;
  75145. begin
  75146. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  75147. end;
  75148. procedure TCAN1_C1FIFOINT13.setRXOVFLIE; inline;
  75149. begin
  75150. pTDefRegMap(@Self)^.&set := $00080000;
  75151. end;
  75152. procedure TCAN1_C1FIFOINT13.clearRXOVFLIE; inline;
  75153. begin
  75154. pTDefRegMap(@Self)^.clr := $00080000;
  75155. end;
  75156. procedure TCAN1_C1FIFOINT13.setRXOVFLIE(thebits : TBits_1); inline;
  75157. begin
  75158. if thebits = 0 then
  75159. pTDefRegMap(@Self)^.clr := $00080000
  75160. else
  75161. pTDefRegMap(@Self)^.&set := $00080000;
  75162. end;
  75163. function TCAN1_C1FIFOINT13.getRXOVFLIE : TBits_1; inline;
  75164. begin
  75165. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  75166. end;
  75167. procedure TCAN1_C1FIFOINT13.setTXEMPTYIE; inline;
  75168. begin
  75169. pTDefRegMap(@Self)^.&set := $01000000;
  75170. end;
  75171. procedure TCAN1_C1FIFOINT13.clearTXEMPTYIE; inline;
  75172. begin
  75173. pTDefRegMap(@Self)^.clr := $01000000;
  75174. end;
  75175. procedure TCAN1_C1FIFOINT13.setTXEMPTYIE(thebits : TBits_1); inline;
  75176. begin
  75177. if thebits = 0 then
  75178. pTDefRegMap(@Self)^.clr := $01000000
  75179. else
  75180. pTDefRegMap(@Self)^.&set := $01000000;
  75181. end;
  75182. function TCAN1_C1FIFOINT13.getTXEMPTYIE : TBits_1; inline;
  75183. begin
  75184. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  75185. end;
  75186. procedure TCAN1_C1FIFOINT13.setTXHALFIE; inline;
  75187. begin
  75188. pTDefRegMap(@Self)^.&set := $02000000;
  75189. end;
  75190. procedure TCAN1_C1FIFOINT13.clearTXHALFIE; inline;
  75191. begin
  75192. pTDefRegMap(@Self)^.clr := $02000000;
  75193. end;
  75194. procedure TCAN1_C1FIFOINT13.setTXHALFIE(thebits : TBits_1); inline;
  75195. begin
  75196. if thebits = 0 then
  75197. pTDefRegMap(@Self)^.clr := $02000000
  75198. else
  75199. pTDefRegMap(@Self)^.&set := $02000000;
  75200. end;
  75201. function TCAN1_C1FIFOINT13.getTXHALFIE : TBits_1; inline;
  75202. begin
  75203. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  75204. end;
  75205. procedure TCAN1_C1FIFOINT13.setTXNFULLIE; inline;
  75206. begin
  75207. pTDefRegMap(@Self)^.&set := $04000000;
  75208. end;
  75209. procedure TCAN1_C1FIFOINT13.clearTXNFULLIE; inline;
  75210. begin
  75211. pTDefRegMap(@Self)^.clr := $04000000;
  75212. end;
  75213. procedure TCAN1_C1FIFOINT13.setTXNFULLIE(thebits : TBits_1); inline;
  75214. begin
  75215. if thebits = 0 then
  75216. pTDefRegMap(@Self)^.clr := $04000000
  75217. else
  75218. pTDefRegMap(@Self)^.&set := $04000000;
  75219. end;
  75220. function TCAN1_C1FIFOINT13.getTXNFULLIE : TBits_1; inline;
  75221. begin
  75222. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  75223. end;
  75224. procedure TCAN1_C1FIFOINT13.setw(thebits : TBits_32); inline;
  75225. begin
  75226. pTDefRegMap(@Self)^.val := thebits;
  75227. end;
  75228. function TCAN1_C1FIFOINT13.getw : TBits_32; inline;
  75229. begin
  75230. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75231. end;
  75232. procedure TCAN1_C1FIFOCI13.setCFIFOCI(thebits : TBits_5); inline;
  75233. begin
  75234. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  75235. end;
  75236. function TCAN1_C1FIFOCI13.getCFIFOCI : TBits_5; inline;
  75237. begin
  75238. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  75239. end;
  75240. procedure TCAN1_C1FIFOCI13.setw(thebits : TBits_32); inline;
  75241. begin
  75242. pTDefRegMap(@Self)^.val := thebits;
  75243. end;
  75244. function TCAN1_C1FIFOCI13.getw : TBits_32; inline;
  75245. begin
  75246. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75247. end;
  75248. procedure TCAN1_C1FIFOCON14.setTXPRI(thebits : TBits_2); inline;
  75249. begin
  75250. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  75251. end;
  75252. function TCAN1_C1FIFOCON14.getTXPRI : TBits_2; inline;
  75253. begin
  75254. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  75255. end;
  75256. procedure TCAN1_C1FIFOCON14.setRTREN; inline;
  75257. begin
  75258. pTDefRegMap(@Self)^.&set := $00000004;
  75259. end;
  75260. procedure TCAN1_C1FIFOCON14.clearRTREN; inline;
  75261. begin
  75262. pTDefRegMap(@Self)^.clr := $00000004;
  75263. end;
  75264. procedure TCAN1_C1FIFOCON14.setRTREN(thebits : TBits_1); inline;
  75265. begin
  75266. if thebits = 0 then
  75267. pTDefRegMap(@Self)^.clr := $00000004
  75268. else
  75269. pTDefRegMap(@Self)^.&set := $00000004;
  75270. end;
  75271. function TCAN1_C1FIFOCON14.getRTREN : TBits_1; inline;
  75272. begin
  75273. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75274. end;
  75275. procedure TCAN1_C1FIFOCON14.setTXREQ; inline;
  75276. begin
  75277. pTDefRegMap(@Self)^.&set := $00000008;
  75278. end;
  75279. procedure TCAN1_C1FIFOCON14.clearTXREQ; inline;
  75280. begin
  75281. pTDefRegMap(@Self)^.clr := $00000008;
  75282. end;
  75283. procedure TCAN1_C1FIFOCON14.setTXREQ(thebits : TBits_1); inline;
  75284. begin
  75285. if thebits = 0 then
  75286. pTDefRegMap(@Self)^.clr := $00000008
  75287. else
  75288. pTDefRegMap(@Self)^.&set := $00000008;
  75289. end;
  75290. function TCAN1_C1FIFOCON14.getTXREQ : TBits_1; inline;
  75291. begin
  75292. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75293. end;
  75294. procedure TCAN1_C1FIFOCON14.setTXERR; inline;
  75295. begin
  75296. pTDefRegMap(@Self)^.&set := $00000010;
  75297. end;
  75298. procedure TCAN1_C1FIFOCON14.clearTXERR; inline;
  75299. begin
  75300. pTDefRegMap(@Self)^.clr := $00000010;
  75301. end;
  75302. procedure TCAN1_C1FIFOCON14.setTXERR(thebits : TBits_1); inline;
  75303. begin
  75304. if thebits = 0 then
  75305. pTDefRegMap(@Self)^.clr := $00000010
  75306. else
  75307. pTDefRegMap(@Self)^.&set := $00000010;
  75308. end;
  75309. function TCAN1_C1FIFOCON14.getTXERR : TBits_1; inline;
  75310. begin
  75311. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  75312. end;
  75313. procedure TCAN1_C1FIFOCON14.setTXLARB; inline;
  75314. begin
  75315. pTDefRegMap(@Self)^.&set := $00000020;
  75316. end;
  75317. procedure TCAN1_C1FIFOCON14.clearTXLARB; inline;
  75318. begin
  75319. pTDefRegMap(@Self)^.clr := $00000020;
  75320. end;
  75321. procedure TCAN1_C1FIFOCON14.setTXLARB(thebits : TBits_1); inline;
  75322. begin
  75323. if thebits = 0 then
  75324. pTDefRegMap(@Self)^.clr := $00000020
  75325. else
  75326. pTDefRegMap(@Self)^.&set := $00000020;
  75327. end;
  75328. function TCAN1_C1FIFOCON14.getTXLARB : TBits_1; inline;
  75329. begin
  75330. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  75331. end;
  75332. procedure TCAN1_C1FIFOCON14.setTXABAT; inline;
  75333. begin
  75334. pTDefRegMap(@Self)^.&set := $00000040;
  75335. end;
  75336. procedure TCAN1_C1FIFOCON14.clearTXABAT; inline;
  75337. begin
  75338. pTDefRegMap(@Self)^.clr := $00000040;
  75339. end;
  75340. procedure TCAN1_C1FIFOCON14.setTXABAT(thebits : TBits_1); inline;
  75341. begin
  75342. if thebits = 0 then
  75343. pTDefRegMap(@Self)^.clr := $00000040
  75344. else
  75345. pTDefRegMap(@Self)^.&set := $00000040;
  75346. end;
  75347. function TCAN1_C1FIFOCON14.getTXABAT : TBits_1; inline;
  75348. begin
  75349. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  75350. end;
  75351. procedure TCAN1_C1FIFOCON14.setTXEN; inline;
  75352. begin
  75353. pTDefRegMap(@Self)^.&set := $00000080;
  75354. end;
  75355. procedure TCAN1_C1FIFOCON14.clearTXEN; inline;
  75356. begin
  75357. pTDefRegMap(@Self)^.clr := $00000080;
  75358. end;
  75359. procedure TCAN1_C1FIFOCON14.setTXEN(thebits : TBits_1); inline;
  75360. begin
  75361. if thebits = 0 then
  75362. pTDefRegMap(@Self)^.clr := $00000080
  75363. else
  75364. pTDefRegMap(@Self)^.&set := $00000080;
  75365. end;
  75366. function TCAN1_C1FIFOCON14.getTXEN : TBits_1; inline;
  75367. begin
  75368. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  75369. end;
  75370. procedure TCAN1_C1FIFOCON14.setDONLY; inline;
  75371. begin
  75372. pTDefRegMap(@Self)^.&set := $00001000;
  75373. end;
  75374. procedure TCAN1_C1FIFOCON14.clearDONLY; inline;
  75375. begin
  75376. pTDefRegMap(@Self)^.clr := $00001000;
  75377. end;
  75378. procedure TCAN1_C1FIFOCON14.setDONLY(thebits : TBits_1); inline;
  75379. begin
  75380. if thebits = 0 then
  75381. pTDefRegMap(@Self)^.clr := $00001000
  75382. else
  75383. pTDefRegMap(@Self)^.&set := $00001000;
  75384. end;
  75385. function TCAN1_C1FIFOCON14.getDONLY : TBits_1; inline;
  75386. begin
  75387. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  75388. end;
  75389. procedure TCAN1_C1FIFOCON14.setUINC; inline;
  75390. begin
  75391. pTDefRegMap(@Self)^.&set := $00002000;
  75392. end;
  75393. procedure TCAN1_C1FIFOCON14.clearUINC; inline;
  75394. begin
  75395. pTDefRegMap(@Self)^.clr := $00002000;
  75396. end;
  75397. procedure TCAN1_C1FIFOCON14.setUINC(thebits : TBits_1); inline;
  75398. begin
  75399. if thebits = 0 then
  75400. pTDefRegMap(@Self)^.clr := $00002000
  75401. else
  75402. pTDefRegMap(@Self)^.&set := $00002000;
  75403. end;
  75404. function TCAN1_C1FIFOCON14.getUINC : TBits_1; inline;
  75405. begin
  75406. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  75407. end;
  75408. procedure TCAN1_C1FIFOCON14.setFRESET; inline;
  75409. begin
  75410. pTDefRegMap(@Self)^.&set := $00004000;
  75411. end;
  75412. procedure TCAN1_C1FIFOCON14.clearFRESET; inline;
  75413. begin
  75414. pTDefRegMap(@Self)^.clr := $00004000;
  75415. end;
  75416. procedure TCAN1_C1FIFOCON14.setFRESET(thebits : TBits_1); inline;
  75417. begin
  75418. if thebits = 0 then
  75419. pTDefRegMap(@Self)^.clr := $00004000
  75420. else
  75421. pTDefRegMap(@Self)^.&set := $00004000;
  75422. end;
  75423. function TCAN1_C1FIFOCON14.getFRESET : TBits_1; inline;
  75424. begin
  75425. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  75426. end;
  75427. procedure TCAN1_C1FIFOCON14.setFSIZE(thebits : TBits_5); inline;
  75428. begin
  75429. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  75430. end;
  75431. function TCAN1_C1FIFOCON14.getFSIZE : TBits_5; inline;
  75432. begin
  75433. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  75434. end;
  75435. procedure TCAN1_C1FIFOCON14.setw(thebits : TBits_32); inline;
  75436. begin
  75437. pTDefRegMap(@Self)^.val := thebits;
  75438. end;
  75439. function TCAN1_C1FIFOCON14.getw : TBits_32; inline;
  75440. begin
  75441. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75442. end;
  75443. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIF; inline;
  75444. begin
  75445. pTDefRegMap(@Self)^.&set := $00000001;
  75446. end;
  75447. procedure TCAN1_C1FIFOINT14.clearRXNEMPTYIF; inline;
  75448. begin
  75449. pTDefRegMap(@Self)^.clr := $00000001;
  75450. end;
  75451. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIF(thebits : TBits_1); inline;
  75452. begin
  75453. if thebits = 0 then
  75454. pTDefRegMap(@Self)^.clr := $00000001
  75455. else
  75456. pTDefRegMap(@Self)^.&set := $00000001;
  75457. end;
  75458. function TCAN1_C1FIFOINT14.getRXNEMPTYIF : TBits_1; inline;
  75459. begin
  75460. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75461. end;
  75462. procedure TCAN1_C1FIFOINT14.setRXHALFIF; inline;
  75463. begin
  75464. pTDefRegMap(@Self)^.&set := $00000002;
  75465. end;
  75466. procedure TCAN1_C1FIFOINT14.clearRXHALFIF; inline;
  75467. begin
  75468. pTDefRegMap(@Self)^.clr := $00000002;
  75469. end;
  75470. procedure TCAN1_C1FIFOINT14.setRXHALFIF(thebits : TBits_1); inline;
  75471. begin
  75472. if thebits = 0 then
  75473. pTDefRegMap(@Self)^.clr := $00000002
  75474. else
  75475. pTDefRegMap(@Self)^.&set := $00000002;
  75476. end;
  75477. function TCAN1_C1FIFOINT14.getRXHALFIF : TBits_1; inline;
  75478. begin
  75479. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75480. end;
  75481. procedure TCAN1_C1FIFOINT14.setRXFULLIF; inline;
  75482. begin
  75483. pTDefRegMap(@Self)^.&set := $00000004;
  75484. end;
  75485. procedure TCAN1_C1FIFOINT14.clearRXFULLIF; inline;
  75486. begin
  75487. pTDefRegMap(@Self)^.clr := $00000004;
  75488. end;
  75489. procedure TCAN1_C1FIFOINT14.setRXFULLIF(thebits : TBits_1); inline;
  75490. begin
  75491. if thebits = 0 then
  75492. pTDefRegMap(@Self)^.clr := $00000004
  75493. else
  75494. pTDefRegMap(@Self)^.&set := $00000004;
  75495. end;
  75496. function TCAN1_C1FIFOINT14.getRXFULLIF : TBits_1; inline;
  75497. begin
  75498. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75499. end;
  75500. procedure TCAN1_C1FIFOINT14.setRXOVFLIF; inline;
  75501. begin
  75502. pTDefRegMap(@Self)^.&set := $00000008;
  75503. end;
  75504. procedure TCAN1_C1FIFOINT14.clearRXOVFLIF; inline;
  75505. begin
  75506. pTDefRegMap(@Self)^.clr := $00000008;
  75507. end;
  75508. procedure TCAN1_C1FIFOINT14.setRXOVFLIF(thebits : TBits_1); inline;
  75509. begin
  75510. if thebits = 0 then
  75511. pTDefRegMap(@Self)^.clr := $00000008
  75512. else
  75513. pTDefRegMap(@Self)^.&set := $00000008;
  75514. end;
  75515. function TCAN1_C1FIFOINT14.getRXOVFLIF : TBits_1; inline;
  75516. begin
  75517. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75518. end;
  75519. procedure TCAN1_C1FIFOINT14.setTXEMPTYIF; inline;
  75520. begin
  75521. pTDefRegMap(@Self)^.&set := $00000100;
  75522. end;
  75523. procedure TCAN1_C1FIFOINT14.clearTXEMPTYIF; inline;
  75524. begin
  75525. pTDefRegMap(@Self)^.clr := $00000100;
  75526. end;
  75527. procedure TCAN1_C1FIFOINT14.setTXEMPTYIF(thebits : TBits_1); inline;
  75528. begin
  75529. if thebits = 0 then
  75530. pTDefRegMap(@Self)^.clr := $00000100
  75531. else
  75532. pTDefRegMap(@Self)^.&set := $00000100;
  75533. end;
  75534. function TCAN1_C1FIFOINT14.getTXEMPTYIF : TBits_1; inline;
  75535. begin
  75536. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  75537. end;
  75538. procedure TCAN1_C1FIFOINT14.setTXHALFIF; inline;
  75539. begin
  75540. pTDefRegMap(@Self)^.&set := $00000200;
  75541. end;
  75542. procedure TCAN1_C1FIFOINT14.clearTXHALFIF; inline;
  75543. begin
  75544. pTDefRegMap(@Self)^.clr := $00000200;
  75545. end;
  75546. procedure TCAN1_C1FIFOINT14.setTXHALFIF(thebits : TBits_1); inline;
  75547. begin
  75548. if thebits = 0 then
  75549. pTDefRegMap(@Self)^.clr := $00000200
  75550. else
  75551. pTDefRegMap(@Self)^.&set := $00000200;
  75552. end;
  75553. function TCAN1_C1FIFOINT14.getTXHALFIF : TBits_1; inline;
  75554. begin
  75555. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  75556. end;
  75557. procedure TCAN1_C1FIFOINT14.setTXNFULLIF; inline;
  75558. begin
  75559. pTDefRegMap(@Self)^.&set := $00000400;
  75560. end;
  75561. procedure TCAN1_C1FIFOINT14.clearTXNFULLIF; inline;
  75562. begin
  75563. pTDefRegMap(@Self)^.clr := $00000400;
  75564. end;
  75565. procedure TCAN1_C1FIFOINT14.setTXNFULLIF(thebits : TBits_1); inline;
  75566. begin
  75567. if thebits = 0 then
  75568. pTDefRegMap(@Self)^.clr := $00000400
  75569. else
  75570. pTDefRegMap(@Self)^.&set := $00000400;
  75571. end;
  75572. function TCAN1_C1FIFOINT14.getTXNFULLIF : TBits_1; inline;
  75573. begin
  75574. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  75575. end;
  75576. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIE; inline;
  75577. begin
  75578. pTDefRegMap(@Self)^.&set := $00010000;
  75579. end;
  75580. procedure TCAN1_C1FIFOINT14.clearRXNEMPTYIE; inline;
  75581. begin
  75582. pTDefRegMap(@Self)^.clr := $00010000;
  75583. end;
  75584. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIE(thebits : TBits_1); inline;
  75585. begin
  75586. if thebits = 0 then
  75587. pTDefRegMap(@Self)^.clr := $00010000
  75588. else
  75589. pTDefRegMap(@Self)^.&set := $00010000;
  75590. end;
  75591. function TCAN1_C1FIFOINT14.getRXNEMPTYIE : TBits_1; inline;
  75592. begin
  75593. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  75594. end;
  75595. procedure TCAN1_C1FIFOINT14.setRXHALFIE; inline;
  75596. begin
  75597. pTDefRegMap(@Self)^.&set := $00020000;
  75598. end;
  75599. procedure TCAN1_C1FIFOINT14.clearRXHALFIE; inline;
  75600. begin
  75601. pTDefRegMap(@Self)^.clr := $00020000;
  75602. end;
  75603. procedure TCAN1_C1FIFOINT14.setRXHALFIE(thebits : TBits_1); inline;
  75604. begin
  75605. if thebits = 0 then
  75606. pTDefRegMap(@Self)^.clr := $00020000
  75607. else
  75608. pTDefRegMap(@Self)^.&set := $00020000;
  75609. end;
  75610. function TCAN1_C1FIFOINT14.getRXHALFIE : TBits_1; inline;
  75611. begin
  75612. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  75613. end;
  75614. procedure TCAN1_C1FIFOINT14.setRXFULLIE; inline;
  75615. begin
  75616. pTDefRegMap(@Self)^.&set := $00040000;
  75617. end;
  75618. procedure TCAN1_C1FIFOINT14.clearRXFULLIE; inline;
  75619. begin
  75620. pTDefRegMap(@Self)^.clr := $00040000;
  75621. end;
  75622. procedure TCAN1_C1FIFOINT14.setRXFULLIE(thebits : TBits_1); inline;
  75623. begin
  75624. if thebits = 0 then
  75625. pTDefRegMap(@Self)^.clr := $00040000
  75626. else
  75627. pTDefRegMap(@Self)^.&set := $00040000;
  75628. end;
  75629. function TCAN1_C1FIFOINT14.getRXFULLIE : TBits_1; inline;
  75630. begin
  75631. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  75632. end;
  75633. procedure TCAN1_C1FIFOINT14.setRXOVFLIE; inline;
  75634. begin
  75635. pTDefRegMap(@Self)^.&set := $00080000;
  75636. end;
  75637. procedure TCAN1_C1FIFOINT14.clearRXOVFLIE; inline;
  75638. begin
  75639. pTDefRegMap(@Self)^.clr := $00080000;
  75640. end;
  75641. procedure TCAN1_C1FIFOINT14.setRXOVFLIE(thebits : TBits_1); inline;
  75642. begin
  75643. if thebits = 0 then
  75644. pTDefRegMap(@Self)^.clr := $00080000
  75645. else
  75646. pTDefRegMap(@Self)^.&set := $00080000;
  75647. end;
  75648. function TCAN1_C1FIFOINT14.getRXOVFLIE : TBits_1; inline;
  75649. begin
  75650. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  75651. end;
  75652. procedure TCAN1_C1FIFOINT14.setTXEMPTYIE; inline;
  75653. begin
  75654. pTDefRegMap(@Self)^.&set := $01000000;
  75655. end;
  75656. procedure TCAN1_C1FIFOINT14.clearTXEMPTYIE; inline;
  75657. begin
  75658. pTDefRegMap(@Self)^.clr := $01000000;
  75659. end;
  75660. procedure TCAN1_C1FIFOINT14.setTXEMPTYIE(thebits : TBits_1); inline;
  75661. begin
  75662. if thebits = 0 then
  75663. pTDefRegMap(@Self)^.clr := $01000000
  75664. else
  75665. pTDefRegMap(@Self)^.&set := $01000000;
  75666. end;
  75667. function TCAN1_C1FIFOINT14.getTXEMPTYIE : TBits_1; inline;
  75668. begin
  75669. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  75670. end;
  75671. procedure TCAN1_C1FIFOINT14.setTXHALFIE; inline;
  75672. begin
  75673. pTDefRegMap(@Self)^.&set := $02000000;
  75674. end;
  75675. procedure TCAN1_C1FIFOINT14.clearTXHALFIE; inline;
  75676. begin
  75677. pTDefRegMap(@Self)^.clr := $02000000;
  75678. end;
  75679. procedure TCAN1_C1FIFOINT14.setTXHALFIE(thebits : TBits_1); inline;
  75680. begin
  75681. if thebits = 0 then
  75682. pTDefRegMap(@Self)^.clr := $02000000
  75683. else
  75684. pTDefRegMap(@Self)^.&set := $02000000;
  75685. end;
  75686. function TCAN1_C1FIFOINT14.getTXHALFIE : TBits_1; inline;
  75687. begin
  75688. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  75689. end;
  75690. procedure TCAN1_C1FIFOINT14.setTXNFULLIE; inline;
  75691. begin
  75692. pTDefRegMap(@Self)^.&set := $04000000;
  75693. end;
  75694. procedure TCAN1_C1FIFOINT14.clearTXNFULLIE; inline;
  75695. begin
  75696. pTDefRegMap(@Self)^.clr := $04000000;
  75697. end;
  75698. procedure TCAN1_C1FIFOINT14.setTXNFULLIE(thebits : TBits_1); inline;
  75699. begin
  75700. if thebits = 0 then
  75701. pTDefRegMap(@Self)^.clr := $04000000
  75702. else
  75703. pTDefRegMap(@Self)^.&set := $04000000;
  75704. end;
  75705. function TCAN1_C1FIFOINT14.getTXNFULLIE : TBits_1; inline;
  75706. begin
  75707. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  75708. end;
  75709. procedure TCAN1_C1FIFOINT14.setw(thebits : TBits_32); inline;
  75710. begin
  75711. pTDefRegMap(@Self)^.val := thebits;
  75712. end;
  75713. function TCAN1_C1FIFOINT14.getw : TBits_32; inline;
  75714. begin
  75715. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75716. end;
  75717. procedure TCAN1_C1FIFOCI14.setCFIFOCI(thebits : TBits_5); inline;
  75718. begin
  75719. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  75720. end;
  75721. function TCAN1_C1FIFOCI14.getCFIFOCI : TBits_5; inline;
  75722. begin
  75723. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  75724. end;
  75725. procedure TCAN1_C1FIFOCI14.setw(thebits : TBits_32); inline;
  75726. begin
  75727. pTDefRegMap(@Self)^.val := thebits;
  75728. end;
  75729. function TCAN1_C1FIFOCI14.getw : TBits_32; inline;
  75730. begin
  75731. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75732. end;
  75733. procedure TCAN1_C1FIFOCON15.setTXPRI(thebits : TBits_2); inline;
  75734. begin
  75735. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  75736. end;
  75737. function TCAN1_C1FIFOCON15.getTXPRI : TBits_2; inline;
  75738. begin
  75739. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  75740. end;
  75741. procedure TCAN1_C1FIFOCON15.setRTREN; inline;
  75742. begin
  75743. pTDefRegMap(@Self)^.&set := $00000004;
  75744. end;
  75745. procedure TCAN1_C1FIFOCON15.clearRTREN; inline;
  75746. begin
  75747. pTDefRegMap(@Self)^.clr := $00000004;
  75748. end;
  75749. procedure TCAN1_C1FIFOCON15.setRTREN(thebits : TBits_1); inline;
  75750. begin
  75751. if thebits = 0 then
  75752. pTDefRegMap(@Self)^.clr := $00000004
  75753. else
  75754. pTDefRegMap(@Self)^.&set := $00000004;
  75755. end;
  75756. function TCAN1_C1FIFOCON15.getRTREN : TBits_1; inline;
  75757. begin
  75758. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75759. end;
  75760. procedure TCAN1_C1FIFOCON15.setTXREQ; inline;
  75761. begin
  75762. pTDefRegMap(@Self)^.&set := $00000008;
  75763. end;
  75764. procedure TCAN1_C1FIFOCON15.clearTXREQ; inline;
  75765. begin
  75766. pTDefRegMap(@Self)^.clr := $00000008;
  75767. end;
  75768. procedure TCAN1_C1FIFOCON15.setTXREQ(thebits : TBits_1); inline;
  75769. begin
  75770. if thebits = 0 then
  75771. pTDefRegMap(@Self)^.clr := $00000008
  75772. else
  75773. pTDefRegMap(@Self)^.&set := $00000008;
  75774. end;
  75775. function TCAN1_C1FIFOCON15.getTXREQ : TBits_1; inline;
  75776. begin
  75777. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75778. end;
  75779. procedure TCAN1_C1FIFOCON15.setTXERR; inline;
  75780. begin
  75781. pTDefRegMap(@Self)^.&set := $00000010;
  75782. end;
  75783. procedure TCAN1_C1FIFOCON15.clearTXERR; inline;
  75784. begin
  75785. pTDefRegMap(@Self)^.clr := $00000010;
  75786. end;
  75787. procedure TCAN1_C1FIFOCON15.setTXERR(thebits : TBits_1); inline;
  75788. begin
  75789. if thebits = 0 then
  75790. pTDefRegMap(@Self)^.clr := $00000010
  75791. else
  75792. pTDefRegMap(@Self)^.&set := $00000010;
  75793. end;
  75794. function TCAN1_C1FIFOCON15.getTXERR : TBits_1; inline;
  75795. begin
  75796. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  75797. end;
  75798. procedure TCAN1_C1FIFOCON15.setTXLARB; inline;
  75799. begin
  75800. pTDefRegMap(@Self)^.&set := $00000020;
  75801. end;
  75802. procedure TCAN1_C1FIFOCON15.clearTXLARB; inline;
  75803. begin
  75804. pTDefRegMap(@Self)^.clr := $00000020;
  75805. end;
  75806. procedure TCAN1_C1FIFOCON15.setTXLARB(thebits : TBits_1); inline;
  75807. begin
  75808. if thebits = 0 then
  75809. pTDefRegMap(@Self)^.clr := $00000020
  75810. else
  75811. pTDefRegMap(@Self)^.&set := $00000020;
  75812. end;
  75813. function TCAN1_C1FIFOCON15.getTXLARB : TBits_1; inline;
  75814. begin
  75815. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  75816. end;
  75817. procedure TCAN1_C1FIFOCON15.setTXABAT; inline;
  75818. begin
  75819. pTDefRegMap(@Self)^.&set := $00000040;
  75820. end;
  75821. procedure TCAN1_C1FIFOCON15.clearTXABAT; inline;
  75822. begin
  75823. pTDefRegMap(@Self)^.clr := $00000040;
  75824. end;
  75825. procedure TCAN1_C1FIFOCON15.setTXABAT(thebits : TBits_1); inline;
  75826. begin
  75827. if thebits = 0 then
  75828. pTDefRegMap(@Self)^.clr := $00000040
  75829. else
  75830. pTDefRegMap(@Self)^.&set := $00000040;
  75831. end;
  75832. function TCAN1_C1FIFOCON15.getTXABAT : TBits_1; inline;
  75833. begin
  75834. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  75835. end;
  75836. procedure TCAN1_C1FIFOCON15.setTXEN; inline;
  75837. begin
  75838. pTDefRegMap(@Self)^.&set := $00000080;
  75839. end;
  75840. procedure TCAN1_C1FIFOCON15.clearTXEN; inline;
  75841. begin
  75842. pTDefRegMap(@Self)^.clr := $00000080;
  75843. end;
  75844. procedure TCAN1_C1FIFOCON15.setTXEN(thebits : TBits_1); inline;
  75845. begin
  75846. if thebits = 0 then
  75847. pTDefRegMap(@Self)^.clr := $00000080
  75848. else
  75849. pTDefRegMap(@Self)^.&set := $00000080;
  75850. end;
  75851. function TCAN1_C1FIFOCON15.getTXEN : TBits_1; inline;
  75852. begin
  75853. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  75854. end;
  75855. procedure TCAN1_C1FIFOCON15.setDONLY; inline;
  75856. begin
  75857. pTDefRegMap(@Self)^.&set := $00001000;
  75858. end;
  75859. procedure TCAN1_C1FIFOCON15.clearDONLY; inline;
  75860. begin
  75861. pTDefRegMap(@Self)^.clr := $00001000;
  75862. end;
  75863. procedure TCAN1_C1FIFOCON15.setDONLY(thebits : TBits_1); inline;
  75864. begin
  75865. if thebits = 0 then
  75866. pTDefRegMap(@Self)^.clr := $00001000
  75867. else
  75868. pTDefRegMap(@Self)^.&set := $00001000;
  75869. end;
  75870. function TCAN1_C1FIFOCON15.getDONLY : TBits_1; inline;
  75871. begin
  75872. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  75873. end;
  75874. procedure TCAN1_C1FIFOCON15.setUINC; inline;
  75875. begin
  75876. pTDefRegMap(@Self)^.&set := $00002000;
  75877. end;
  75878. procedure TCAN1_C1FIFOCON15.clearUINC; inline;
  75879. begin
  75880. pTDefRegMap(@Self)^.clr := $00002000;
  75881. end;
  75882. procedure TCAN1_C1FIFOCON15.setUINC(thebits : TBits_1); inline;
  75883. begin
  75884. if thebits = 0 then
  75885. pTDefRegMap(@Self)^.clr := $00002000
  75886. else
  75887. pTDefRegMap(@Self)^.&set := $00002000;
  75888. end;
  75889. function TCAN1_C1FIFOCON15.getUINC : TBits_1; inline;
  75890. begin
  75891. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  75892. end;
  75893. procedure TCAN1_C1FIFOCON15.setFRESET; inline;
  75894. begin
  75895. pTDefRegMap(@Self)^.&set := $00004000;
  75896. end;
  75897. procedure TCAN1_C1FIFOCON15.clearFRESET; inline;
  75898. begin
  75899. pTDefRegMap(@Self)^.clr := $00004000;
  75900. end;
  75901. procedure TCAN1_C1FIFOCON15.setFRESET(thebits : TBits_1); inline;
  75902. begin
  75903. if thebits = 0 then
  75904. pTDefRegMap(@Self)^.clr := $00004000
  75905. else
  75906. pTDefRegMap(@Self)^.&set := $00004000;
  75907. end;
  75908. function TCAN1_C1FIFOCON15.getFRESET : TBits_1; inline;
  75909. begin
  75910. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  75911. end;
  75912. procedure TCAN1_C1FIFOCON15.setFSIZE(thebits : TBits_5); inline;
  75913. begin
  75914. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  75915. end;
  75916. function TCAN1_C1FIFOCON15.getFSIZE : TBits_5; inline;
  75917. begin
  75918. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  75919. end;
  75920. procedure TCAN1_C1FIFOCON15.setw(thebits : TBits_32); inline;
  75921. begin
  75922. pTDefRegMap(@Self)^.val := thebits;
  75923. end;
  75924. function TCAN1_C1FIFOCON15.getw : TBits_32; inline;
  75925. begin
  75926. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75927. end;
  75928. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIF; inline;
  75929. begin
  75930. pTDefRegMap(@Self)^.&set := $00000001;
  75931. end;
  75932. procedure TCAN1_C1FIFOINT15.clearRXNEMPTYIF; inline;
  75933. begin
  75934. pTDefRegMap(@Self)^.clr := $00000001;
  75935. end;
  75936. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIF(thebits : TBits_1); inline;
  75937. begin
  75938. if thebits = 0 then
  75939. pTDefRegMap(@Self)^.clr := $00000001
  75940. else
  75941. pTDefRegMap(@Self)^.&set := $00000001;
  75942. end;
  75943. function TCAN1_C1FIFOINT15.getRXNEMPTYIF : TBits_1; inline;
  75944. begin
  75945. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75946. end;
  75947. procedure TCAN1_C1FIFOINT15.setRXHALFIF; inline;
  75948. begin
  75949. pTDefRegMap(@Self)^.&set := $00000002;
  75950. end;
  75951. procedure TCAN1_C1FIFOINT15.clearRXHALFIF; inline;
  75952. begin
  75953. pTDefRegMap(@Self)^.clr := $00000002;
  75954. end;
  75955. procedure TCAN1_C1FIFOINT15.setRXHALFIF(thebits : TBits_1); inline;
  75956. begin
  75957. if thebits = 0 then
  75958. pTDefRegMap(@Self)^.clr := $00000002
  75959. else
  75960. pTDefRegMap(@Self)^.&set := $00000002;
  75961. end;
  75962. function TCAN1_C1FIFOINT15.getRXHALFIF : TBits_1; inline;
  75963. begin
  75964. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75965. end;
  75966. procedure TCAN1_C1FIFOINT15.setRXFULLIF; inline;
  75967. begin
  75968. pTDefRegMap(@Self)^.&set := $00000004;
  75969. end;
  75970. procedure TCAN1_C1FIFOINT15.clearRXFULLIF; inline;
  75971. begin
  75972. pTDefRegMap(@Self)^.clr := $00000004;
  75973. end;
  75974. procedure TCAN1_C1FIFOINT15.setRXFULLIF(thebits : TBits_1); inline;
  75975. begin
  75976. if thebits = 0 then
  75977. pTDefRegMap(@Self)^.clr := $00000004
  75978. else
  75979. pTDefRegMap(@Self)^.&set := $00000004;
  75980. end;
  75981. function TCAN1_C1FIFOINT15.getRXFULLIF : TBits_1; inline;
  75982. begin
  75983. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75984. end;
  75985. procedure TCAN1_C1FIFOINT15.setRXOVFLIF; inline;
  75986. begin
  75987. pTDefRegMap(@Self)^.&set := $00000008;
  75988. end;
  75989. procedure TCAN1_C1FIFOINT15.clearRXOVFLIF; inline;
  75990. begin
  75991. pTDefRegMap(@Self)^.clr := $00000008;
  75992. end;
  75993. procedure TCAN1_C1FIFOINT15.setRXOVFLIF(thebits : TBits_1); inline;
  75994. begin
  75995. if thebits = 0 then
  75996. pTDefRegMap(@Self)^.clr := $00000008
  75997. else
  75998. pTDefRegMap(@Self)^.&set := $00000008;
  75999. end;
  76000. function TCAN1_C1FIFOINT15.getRXOVFLIF : TBits_1; inline;
  76001. begin
  76002. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76003. end;
  76004. procedure TCAN1_C1FIFOINT15.setTXEMPTYIF; inline;
  76005. begin
  76006. pTDefRegMap(@Self)^.&set := $00000100;
  76007. end;
  76008. procedure TCAN1_C1FIFOINT15.clearTXEMPTYIF; inline;
  76009. begin
  76010. pTDefRegMap(@Self)^.clr := $00000100;
  76011. end;
  76012. procedure TCAN1_C1FIFOINT15.setTXEMPTYIF(thebits : TBits_1); inline;
  76013. begin
  76014. if thebits = 0 then
  76015. pTDefRegMap(@Self)^.clr := $00000100
  76016. else
  76017. pTDefRegMap(@Self)^.&set := $00000100;
  76018. end;
  76019. function TCAN1_C1FIFOINT15.getTXEMPTYIF : TBits_1; inline;
  76020. begin
  76021. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  76022. end;
  76023. procedure TCAN1_C1FIFOINT15.setTXHALFIF; inline;
  76024. begin
  76025. pTDefRegMap(@Self)^.&set := $00000200;
  76026. end;
  76027. procedure TCAN1_C1FIFOINT15.clearTXHALFIF; inline;
  76028. begin
  76029. pTDefRegMap(@Self)^.clr := $00000200;
  76030. end;
  76031. procedure TCAN1_C1FIFOINT15.setTXHALFIF(thebits : TBits_1); inline;
  76032. begin
  76033. if thebits = 0 then
  76034. pTDefRegMap(@Self)^.clr := $00000200
  76035. else
  76036. pTDefRegMap(@Self)^.&set := $00000200;
  76037. end;
  76038. function TCAN1_C1FIFOINT15.getTXHALFIF : TBits_1; inline;
  76039. begin
  76040. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  76041. end;
  76042. procedure TCAN1_C1FIFOINT15.setTXNFULLIF; inline;
  76043. begin
  76044. pTDefRegMap(@Self)^.&set := $00000400;
  76045. end;
  76046. procedure TCAN1_C1FIFOINT15.clearTXNFULLIF; inline;
  76047. begin
  76048. pTDefRegMap(@Self)^.clr := $00000400;
  76049. end;
  76050. procedure TCAN1_C1FIFOINT15.setTXNFULLIF(thebits : TBits_1); inline;
  76051. begin
  76052. if thebits = 0 then
  76053. pTDefRegMap(@Self)^.clr := $00000400
  76054. else
  76055. pTDefRegMap(@Self)^.&set := $00000400;
  76056. end;
  76057. function TCAN1_C1FIFOINT15.getTXNFULLIF : TBits_1; inline;
  76058. begin
  76059. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  76060. end;
  76061. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIE; inline;
  76062. begin
  76063. pTDefRegMap(@Self)^.&set := $00010000;
  76064. end;
  76065. procedure TCAN1_C1FIFOINT15.clearRXNEMPTYIE; inline;
  76066. begin
  76067. pTDefRegMap(@Self)^.clr := $00010000;
  76068. end;
  76069. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIE(thebits : TBits_1); inline;
  76070. begin
  76071. if thebits = 0 then
  76072. pTDefRegMap(@Self)^.clr := $00010000
  76073. else
  76074. pTDefRegMap(@Self)^.&set := $00010000;
  76075. end;
  76076. function TCAN1_C1FIFOINT15.getRXNEMPTYIE : TBits_1; inline;
  76077. begin
  76078. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  76079. end;
  76080. procedure TCAN1_C1FIFOINT15.setRXHALFIE; inline;
  76081. begin
  76082. pTDefRegMap(@Self)^.&set := $00020000;
  76083. end;
  76084. procedure TCAN1_C1FIFOINT15.clearRXHALFIE; inline;
  76085. begin
  76086. pTDefRegMap(@Self)^.clr := $00020000;
  76087. end;
  76088. procedure TCAN1_C1FIFOINT15.setRXHALFIE(thebits : TBits_1); inline;
  76089. begin
  76090. if thebits = 0 then
  76091. pTDefRegMap(@Self)^.clr := $00020000
  76092. else
  76093. pTDefRegMap(@Self)^.&set := $00020000;
  76094. end;
  76095. function TCAN1_C1FIFOINT15.getRXHALFIE : TBits_1; inline;
  76096. begin
  76097. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  76098. end;
  76099. procedure TCAN1_C1FIFOINT15.setRXFULLIE; inline;
  76100. begin
  76101. pTDefRegMap(@Self)^.&set := $00040000;
  76102. end;
  76103. procedure TCAN1_C1FIFOINT15.clearRXFULLIE; inline;
  76104. begin
  76105. pTDefRegMap(@Self)^.clr := $00040000;
  76106. end;
  76107. procedure TCAN1_C1FIFOINT15.setRXFULLIE(thebits : TBits_1); inline;
  76108. begin
  76109. if thebits = 0 then
  76110. pTDefRegMap(@Self)^.clr := $00040000
  76111. else
  76112. pTDefRegMap(@Self)^.&set := $00040000;
  76113. end;
  76114. function TCAN1_C1FIFOINT15.getRXFULLIE : TBits_1; inline;
  76115. begin
  76116. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  76117. end;
  76118. procedure TCAN1_C1FIFOINT15.setRXOVFLIE; inline;
  76119. begin
  76120. pTDefRegMap(@Self)^.&set := $00080000;
  76121. end;
  76122. procedure TCAN1_C1FIFOINT15.clearRXOVFLIE; inline;
  76123. begin
  76124. pTDefRegMap(@Self)^.clr := $00080000;
  76125. end;
  76126. procedure TCAN1_C1FIFOINT15.setRXOVFLIE(thebits : TBits_1); inline;
  76127. begin
  76128. if thebits = 0 then
  76129. pTDefRegMap(@Self)^.clr := $00080000
  76130. else
  76131. pTDefRegMap(@Self)^.&set := $00080000;
  76132. end;
  76133. function TCAN1_C1FIFOINT15.getRXOVFLIE : TBits_1; inline;
  76134. begin
  76135. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  76136. end;
  76137. procedure TCAN1_C1FIFOINT15.setTXEMPTYIE; inline;
  76138. begin
  76139. pTDefRegMap(@Self)^.&set := $01000000;
  76140. end;
  76141. procedure TCAN1_C1FIFOINT15.clearTXEMPTYIE; inline;
  76142. begin
  76143. pTDefRegMap(@Self)^.clr := $01000000;
  76144. end;
  76145. procedure TCAN1_C1FIFOINT15.setTXEMPTYIE(thebits : TBits_1); inline;
  76146. begin
  76147. if thebits = 0 then
  76148. pTDefRegMap(@Self)^.clr := $01000000
  76149. else
  76150. pTDefRegMap(@Self)^.&set := $01000000;
  76151. end;
  76152. function TCAN1_C1FIFOINT15.getTXEMPTYIE : TBits_1; inline;
  76153. begin
  76154. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  76155. end;
  76156. procedure TCAN1_C1FIFOINT15.setTXHALFIE; inline;
  76157. begin
  76158. pTDefRegMap(@Self)^.&set := $02000000;
  76159. end;
  76160. procedure TCAN1_C1FIFOINT15.clearTXHALFIE; inline;
  76161. begin
  76162. pTDefRegMap(@Self)^.clr := $02000000;
  76163. end;
  76164. procedure TCAN1_C1FIFOINT15.setTXHALFIE(thebits : TBits_1); inline;
  76165. begin
  76166. if thebits = 0 then
  76167. pTDefRegMap(@Self)^.clr := $02000000
  76168. else
  76169. pTDefRegMap(@Self)^.&set := $02000000;
  76170. end;
  76171. function TCAN1_C1FIFOINT15.getTXHALFIE : TBits_1; inline;
  76172. begin
  76173. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  76174. end;
  76175. procedure TCAN1_C1FIFOINT15.setTXNFULLIE; inline;
  76176. begin
  76177. pTDefRegMap(@Self)^.&set := $04000000;
  76178. end;
  76179. procedure TCAN1_C1FIFOINT15.clearTXNFULLIE; inline;
  76180. begin
  76181. pTDefRegMap(@Self)^.clr := $04000000;
  76182. end;
  76183. procedure TCAN1_C1FIFOINT15.setTXNFULLIE(thebits : TBits_1); inline;
  76184. begin
  76185. if thebits = 0 then
  76186. pTDefRegMap(@Self)^.clr := $04000000
  76187. else
  76188. pTDefRegMap(@Self)^.&set := $04000000;
  76189. end;
  76190. function TCAN1_C1FIFOINT15.getTXNFULLIE : TBits_1; inline;
  76191. begin
  76192. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  76193. end;
  76194. procedure TCAN1_C1FIFOINT15.setw(thebits : TBits_32); inline;
  76195. begin
  76196. pTDefRegMap(@Self)^.val := thebits;
  76197. end;
  76198. function TCAN1_C1FIFOINT15.getw : TBits_32; inline;
  76199. begin
  76200. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76201. end;
  76202. procedure TCAN1_C1FIFOCI15.setCFIFOCI(thebits : TBits_5); inline;
  76203. begin
  76204. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  76205. end;
  76206. function TCAN1_C1FIFOCI15.getCFIFOCI : TBits_5; inline;
  76207. begin
  76208. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  76209. end;
  76210. procedure TCAN1_C1FIFOCI15.setw(thebits : TBits_32); inline;
  76211. begin
  76212. pTDefRegMap(@Self)^.val := thebits;
  76213. end;
  76214. function TCAN1_C1FIFOCI15.getw : TBits_32; inline;
  76215. begin
  76216. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76217. end;
  76218. procedure TCAN1_C1FIFOCON16.setTXPRI(thebits : TBits_2); inline;
  76219. begin
  76220. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  76221. end;
  76222. function TCAN1_C1FIFOCON16.getTXPRI : TBits_2; inline;
  76223. begin
  76224. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  76225. end;
  76226. procedure TCAN1_C1FIFOCON16.setRTREN; inline;
  76227. begin
  76228. pTDefRegMap(@Self)^.&set := $00000004;
  76229. end;
  76230. procedure TCAN1_C1FIFOCON16.clearRTREN; inline;
  76231. begin
  76232. pTDefRegMap(@Self)^.clr := $00000004;
  76233. end;
  76234. procedure TCAN1_C1FIFOCON16.setRTREN(thebits : TBits_1); inline;
  76235. begin
  76236. if thebits = 0 then
  76237. pTDefRegMap(@Self)^.clr := $00000004
  76238. else
  76239. pTDefRegMap(@Self)^.&set := $00000004;
  76240. end;
  76241. function TCAN1_C1FIFOCON16.getRTREN : TBits_1; inline;
  76242. begin
  76243. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76244. end;
  76245. procedure TCAN1_C1FIFOCON16.setTXREQ; inline;
  76246. begin
  76247. pTDefRegMap(@Self)^.&set := $00000008;
  76248. end;
  76249. procedure TCAN1_C1FIFOCON16.clearTXREQ; inline;
  76250. begin
  76251. pTDefRegMap(@Self)^.clr := $00000008;
  76252. end;
  76253. procedure TCAN1_C1FIFOCON16.setTXREQ(thebits : TBits_1); inline;
  76254. begin
  76255. if thebits = 0 then
  76256. pTDefRegMap(@Self)^.clr := $00000008
  76257. else
  76258. pTDefRegMap(@Self)^.&set := $00000008;
  76259. end;
  76260. function TCAN1_C1FIFOCON16.getTXREQ : TBits_1; inline;
  76261. begin
  76262. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76263. end;
  76264. procedure TCAN1_C1FIFOCON16.setTXERR; inline;
  76265. begin
  76266. pTDefRegMap(@Self)^.&set := $00000010;
  76267. end;
  76268. procedure TCAN1_C1FIFOCON16.clearTXERR; inline;
  76269. begin
  76270. pTDefRegMap(@Self)^.clr := $00000010;
  76271. end;
  76272. procedure TCAN1_C1FIFOCON16.setTXERR(thebits : TBits_1); inline;
  76273. begin
  76274. if thebits = 0 then
  76275. pTDefRegMap(@Self)^.clr := $00000010
  76276. else
  76277. pTDefRegMap(@Self)^.&set := $00000010;
  76278. end;
  76279. function TCAN1_C1FIFOCON16.getTXERR : TBits_1; inline;
  76280. begin
  76281. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  76282. end;
  76283. procedure TCAN1_C1FIFOCON16.setTXLARB; inline;
  76284. begin
  76285. pTDefRegMap(@Self)^.&set := $00000020;
  76286. end;
  76287. procedure TCAN1_C1FIFOCON16.clearTXLARB; inline;
  76288. begin
  76289. pTDefRegMap(@Self)^.clr := $00000020;
  76290. end;
  76291. procedure TCAN1_C1FIFOCON16.setTXLARB(thebits : TBits_1); inline;
  76292. begin
  76293. if thebits = 0 then
  76294. pTDefRegMap(@Self)^.clr := $00000020
  76295. else
  76296. pTDefRegMap(@Self)^.&set := $00000020;
  76297. end;
  76298. function TCAN1_C1FIFOCON16.getTXLARB : TBits_1; inline;
  76299. begin
  76300. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  76301. end;
  76302. procedure TCAN1_C1FIFOCON16.setTXABAT; inline;
  76303. begin
  76304. pTDefRegMap(@Self)^.&set := $00000040;
  76305. end;
  76306. procedure TCAN1_C1FIFOCON16.clearTXABAT; inline;
  76307. begin
  76308. pTDefRegMap(@Self)^.clr := $00000040;
  76309. end;
  76310. procedure TCAN1_C1FIFOCON16.setTXABAT(thebits : TBits_1); inline;
  76311. begin
  76312. if thebits = 0 then
  76313. pTDefRegMap(@Self)^.clr := $00000040
  76314. else
  76315. pTDefRegMap(@Self)^.&set := $00000040;
  76316. end;
  76317. function TCAN1_C1FIFOCON16.getTXABAT : TBits_1; inline;
  76318. begin
  76319. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  76320. end;
  76321. procedure TCAN1_C1FIFOCON16.setTXEN; inline;
  76322. begin
  76323. pTDefRegMap(@Self)^.&set := $00000080;
  76324. end;
  76325. procedure TCAN1_C1FIFOCON16.clearTXEN; inline;
  76326. begin
  76327. pTDefRegMap(@Self)^.clr := $00000080;
  76328. end;
  76329. procedure TCAN1_C1FIFOCON16.setTXEN(thebits : TBits_1); inline;
  76330. begin
  76331. if thebits = 0 then
  76332. pTDefRegMap(@Self)^.clr := $00000080
  76333. else
  76334. pTDefRegMap(@Self)^.&set := $00000080;
  76335. end;
  76336. function TCAN1_C1FIFOCON16.getTXEN : TBits_1; inline;
  76337. begin
  76338. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  76339. end;
  76340. procedure TCAN1_C1FIFOCON16.setDONLY; inline;
  76341. begin
  76342. pTDefRegMap(@Self)^.&set := $00001000;
  76343. end;
  76344. procedure TCAN1_C1FIFOCON16.clearDONLY; inline;
  76345. begin
  76346. pTDefRegMap(@Self)^.clr := $00001000;
  76347. end;
  76348. procedure TCAN1_C1FIFOCON16.setDONLY(thebits : TBits_1); inline;
  76349. begin
  76350. if thebits = 0 then
  76351. pTDefRegMap(@Self)^.clr := $00001000
  76352. else
  76353. pTDefRegMap(@Self)^.&set := $00001000;
  76354. end;
  76355. function TCAN1_C1FIFOCON16.getDONLY : TBits_1; inline;
  76356. begin
  76357. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  76358. end;
  76359. procedure TCAN1_C1FIFOCON16.setUINC; inline;
  76360. begin
  76361. pTDefRegMap(@Self)^.&set := $00002000;
  76362. end;
  76363. procedure TCAN1_C1FIFOCON16.clearUINC; inline;
  76364. begin
  76365. pTDefRegMap(@Self)^.clr := $00002000;
  76366. end;
  76367. procedure TCAN1_C1FIFOCON16.setUINC(thebits : TBits_1); inline;
  76368. begin
  76369. if thebits = 0 then
  76370. pTDefRegMap(@Self)^.clr := $00002000
  76371. else
  76372. pTDefRegMap(@Self)^.&set := $00002000;
  76373. end;
  76374. function TCAN1_C1FIFOCON16.getUINC : TBits_1; inline;
  76375. begin
  76376. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  76377. end;
  76378. procedure TCAN1_C1FIFOCON16.setFRESET; inline;
  76379. begin
  76380. pTDefRegMap(@Self)^.&set := $00004000;
  76381. end;
  76382. procedure TCAN1_C1FIFOCON16.clearFRESET; inline;
  76383. begin
  76384. pTDefRegMap(@Self)^.clr := $00004000;
  76385. end;
  76386. procedure TCAN1_C1FIFOCON16.setFRESET(thebits : TBits_1); inline;
  76387. begin
  76388. if thebits = 0 then
  76389. pTDefRegMap(@Self)^.clr := $00004000
  76390. else
  76391. pTDefRegMap(@Self)^.&set := $00004000;
  76392. end;
  76393. function TCAN1_C1FIFOCON16.getFRESET : TBits_1; inline;
  76394. begin
  76395. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  76396. end;
  76397. procedure TCAN1_C1FIFOCON16.setFSIZE(thebits : TBits_5); inline;
  76398. begin
  76399. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  76400. end;
  76401. function TCAN1_C1FIFOCON16.getFSIZE : TBits_5; inline;
  76402. begin
  76403. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  76404. end;
  76405. procedure TCAN1_C1FIFOCON16.setw(thebits : TBits_32); inline;
  76406. begin
  76407. pTDefRegMap(@Self)^.val := thebits;
  76408. end;
  76409. function TCAN1_C1FIFOCON16.getw : TBits_32; inline;
  76410. begin
  76411. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76412. end;
  76413. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIF; inline;
  76414. begin
  76415. pTDefRegMap(@Self)^.&set := $00000001;
  76416. end;
  76417. procedure TCAN1_C1FIFOINT16.clearRXNEMPTYIF; inline;
  76418. begin
  76419. pTDefRegMap(@Self)^.clr := $00000001;
  76420. end;
  76421. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIF(thebits : TBits_1); inline;
  76422. begin
  76423. if thebits = 0 then
  76424. pTDefRegMap(@Self)^.clr := $00000001
  76425. else
  76426. pTDefRegMap(@Self)^.&set := $00000001;
  76427. end;
  76428. function TCAN1_C1FIFOINT16.getRXNEMPTYIF : TBits_1; inline;
  76429. begin
  76430. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  76431. end;
  76432. procedure TCAN1_C1FIFOINT16.setRXHALFIF; inline;
  76433. begin
  76434. pTDefRegMap(@Self)^.&set := $00000002;
  76435. end;
  76436. procedure TCAN1_C1FIFOINT16.clearRXHALFIF; inline;
  76437. begin
  76438. pTDefRegMap(@Self)^.clr := $00000002;
  76439. end;
  76440. procedure TCAN1_C1FIFOINT16.setRXHALFIF(thebits : TBits_1); inline;
  76441. begin
  76442. if thebits = 0 then
  76443. pTDefRegMap(@Self)^.clr := $00000002
  76444. else
  76445. pTDefRegMap(@Self)^.&set := $00000002;
  76446. end;
  76447. function TCAN1_C1FIFOINT16.getRXHALFIF : TBits_1; inline;
  76448. begin
  76449. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  76450. end;
  76451. procedure TCAN1_C1FIFOINT16.setRXFULLIF; inline;
  76452. begin
  76453. pTDefRegMap(@Self)^.&set := $00000004;
  76454. end;
  76455. procedure TCAN1_C1FIFOINT16.clearRXFULLIF; inline;
  76456. begin
  76457. pTDefRegMap(@Self)^.clr := $00000004;
  76458. end;
  76459. procedure TCAN1_C1FIFOINT16.setRXFULLIF(thebits : TBits_1); inline;
  76460. begin
  76461. if thebits = 0 then
  76462. pTDefRegMap(@Self)^.clr := $00000004
  76463. else
  76464. pTDefRegMap(@Self)^.&set := $00000004;
  76465. end;
  76466. function TCAN1_C1FIFOINT16.getRXFULLIF : TBits_1; inline;
  76467. begin
  76468. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76469. end;
  76470. procedure TCAN1_C1FIFOINT16.setRXOVFLIF; inline;
  76471. begin
  76472. pTDefRegMap(@Self)^.&set := $00000008;
  76473. end;
  76474. procedure TCAN1_C1FIFOINT16.clearRXOVFLIF; inline;
  76475. begin
  76476. pTDefRegMap(@Self)^.clr := $00000008;
  76477. end;
  76478. procedure TCAN1_C1FIFOINT16.setRXOVFLIF(thebits : TBits_1); inline;
  76479. begin
  76480. if thebits = 0 then
  76481. pTDefRegMap(@Self)^.clr := $00000008
  76482. else
  76483. pTDefRegMap(@Self)^.&set := $00000008;
  76484. end;
  76485. function TCAN1_C1FIFOINT16.getRXOVFLIF : TBits_1; inline;
  76486. begin
  76487. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76488. end;
  76489. procedure TCAN1_C1FIFOINT16.setTXEMPTYIF; inline;
  76490. begin
  76491. pTDefRegMap(@Self)^.&set := $00000100;
  76492. end;
  76493. procedure TCAN1_C1FIFOINT16.clearTXEMPTYIF; inline;
  76494. begin
  76495. pTDefRegMap(@Self)^.clr := $00000100;
  76496. end;
  76497. procedure TCAN1_C1FIFOINT16.setTXEMPTYIF(thebits : TBits_1); inline;
  76498. begin
  76499. if thebits = 0 then
  76500. pTDefRegMap(@Self)^.clr := $00000100
  76501. else
  76502. pTDefRegMap(@Self)^.&set := $00000100;
  76503. end;
  76504. function TCAN1_C1FIFOINT16.getTXEMPTYIF : TBits_1; inline;
  76505. begin
  76506. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  76507. end;
  76508. procedure TCAN1_C1FIFOINT16.setTXHALFIF; inline;
  76509. begin
  76510. pTDefRegMap(@Self)^.&set := $00000200;
  76511. end;
  76512. procedure TCAN1_C1FIFOINT16.clearTXHALFIF; inline;
  76513. begin
  76514. pTDefRegMap(@Self)^.clr := $00000200;
  76515. end;
  76516. procedure TCAN1_C1FIFOINT16.setTXHALFIF(thebits : TBits_1); inline;
  76517. begin
  76518. if thebits = 0 then
  76519. pTDefRegMap(@Self)^.clr := $00000200
  76520. else
  76521. pTDefRegMap(@Self)^.&set := $00000200;
  76522. end;
  76523. function TCAN1_C1FIFOINT16.getTXHALFIF : TBits_1; inline;
  76524. begin
  76525. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  76526. end;
  76527. procedure TCAN1_C1FIFOINT16.setTXNFULLIF; inline;
  76528. begin
  76529. pTDefRegMap(@Self)^.&set := $00000400;
  76530. end;
  76531. procedure TCAN1_C1FIFOINT16.clearTXNFULLIF; inline;
  76532. begin
  76533. pTDefRegMap(@Self)^.clr := $00000400;
  76534. end;
  76535. procedure TCAN1_C1FIFOINT16.setTXNFULLIF(thebits : TBits_1); inline;
  76536. begin
  76537. if thebits = 0 then
  76538. pTDefRegMap(@Self)^.clr := $00000400
  76539. else
  76540. pTDefRegMap(@Self)^.&set := $00000400;
  76541. end;
  76542. function TCAN1_C1FIFOINT16.getTXNFULLIF : TBits_1; inline;
  76543. begin
  76544. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  76545. end;
  76546. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIE; inline;
  76547. begin
  76548. pTDefRegMap(@Self)^.&set := $00010000;
  76549. end;
  76550. procedure TCAN1_C1FIFOINT16.clearRXNEMPTYIE; inline;
  76551. begin
  76552. pTDefRegMap(@Self)^.clr := $00010000;
  76553. end;
  76554. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIE(thebits : TBits_1); inline;
  76555. begin
  76556. if thebits = 0 then
  76557. pTDefRegMap(@Self)^.clr := $00010000
  76558. else
  76559. pTDefRegMap(@Self)^.&set := $00010000;
  76560. end;
  76561. function TCAN1_C1FIFOINT16.getRXNEMPTYIE : TBits_1; inline;
  76562. begin
  76563. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  76564. end;
  76565. procedure TCAN1_C1FIFOINT16.setRXHALFIE; inline;
  76566. begin
  76567. pTDefRegMap(@Self)^.&set := $00020000;
  76568. end;
  76569. procedure TCAN1_C1FIFOINT16.clearRXHALFIE; inline;
  76570. begin
  76571. pTDefRegMap(@Self)^.clr := $00020000;
  76572. end;
  76573. procedure TCAN1_C1FIFOINT16.setRXHALFIE(thebits : TBits_1); inline;
  76574. begin
  76575. if thebits = 0 then
  76576. pTDefRegMap(@Self)^.clr := $00020000
  76577. else
  76578. pTDefRegMap(@Self)^.&set := $00020000;
  76579. end;
  76580. function TCAN1_C1FIFOINT16.getRXHALFIE : TBits_1; inline;
  76581. begin
  76582. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  76583. end;
  76584. procedure TCAN1_C1FIFOINT16.setRXFULLIE; inline;
  76585. begin
  76586. pTDefRegMap(@Self)^.&set := $00040000;
  76587. end;
  76588. procedure TCAN1_C1FIFOINT16.clearRXFULLIE; inline;
  76589. begin
  76590. pTDefRegMap(@Self)^.clr := $00040000;
  76591. end;
  76592. procedure TCAN1_C1FIFOINT16.setRXFULLIE(thebits : TBits_1); inline;
  76593. begin
  76594. if thebits = 0 then
  76595. pTDefRegMap(@Self)^.clr := $00040000
  76596. else
  76597. pTDefRegMap(@Self)^.&set := $00040000;
  76598. end;
  76599. function TCAN1_C1FIFOINT16.getRXFULLIE : TBits_1; inline;
  76600. begin
  76601. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  76602. end;
  76603. procedure TCAN1_C1FIFOINT16.setRXOVFLIE; inline;
  76604. begin
  76605. pTDefRegMap(@Self)^.&set := $00080000;
  76606. end;
  76607. procedure TCAN1_C1FIFOINT16.clearRXOVFLIE; inline;
  76608. begin
  76609. pTDefRegMap(@Self)^.clr := $00080000;
  76610. end;
  76611. procedure TCAN1_C1FIFOINT16.setRXOVFLIE(thebits : TBits_1); inline;
  76612. begin
  76613. if thebits = 0 then
  76614. pTDefRegMap(@Self)^.clr := $00080000
  76615. else
  76616. pTDefRegMap(@Self)^.&set := $00080000;
  76617. end;
  76618. function TCAN1_C1FIFOINT16.getRXOVFLIE : TBits_1; inline;
  76619. begin
  76620. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  76621. end;
  76622. procedure TCAN1_C1FIFOINT16.setTXEMPTYIE; inline;
  76623. begin
  76624. pTDefRegMap(@Self)^.&set := $01000000;
  76625. end;
  76626. procedure TCAN1_C1FIFOINT16.clearTXEMPTYIE; inline;
  76627. begin
  76628. pTDefRegMap(@Self)^.clr := $01000000;
  76629. end;
  76630. procedure TCAN1_C1FIFOINT16.setTXEMPTYIE(thebits : TBits_1); inline;
  76631. begin
  76632. if thebits = 0 then
  76633. pTDefRegMap(@Self)^.clr := $01000000
  76634. else
  76635. pTDefRegMap(@Self)^.&set := $01000000;
  76636. end;
  76637. function TCAN1_C1FIFOINT16.getTXEMPTYIE : TBits_1; inline;
  76638. begin
  76639. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  76640. end;
  76641. procedure TCAN1_C1FIFOINT16.setTXHALFIE; inline;
  76642. begin
  76643. pTDefRegMap(@Self)^.&set := $02000000;
  76644. end;
  76645. procedure TCAN1_C1FIFOINT16.clearTXHALFIE; inline;
  76646. begin
  76647. pTDefRegMap(@Self)^.clr := $02000000;
  76648. end;
  76649. procedure TCAN1_C1FIFOINT16.setTXHALFIE(thebits : TBits_1); inline;
  76650. begin
  76651. if thebits = 0 then
  76652. pTDefRegMap(@Self)^.clr := $02000000
  76653. else
  76654. pTDefRegMap(@Self)^.&set := $02000000;
  76655. end;
  76656. function TCAN1_C1FIFOINT16.getTXHALFIE : TBits_1; inline;
  76657. begin
  76658. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  76659. end;
  76660. procedure TCAN1_C1FIFOINT16.setTXNFULLIE; inline;
  76661. begin
  76662. pTDefRegMap(@Self)^.&set := $04000000;
  76663. end;
  76664. procedure TCAN1_C1FIFOINT16.clearTXNFULLIE; inline;
  76665. begin
  76666. pTDefRegMap(@Self)^.clr := $04000000;
  76667. end;
  76668. procedure TCAN1_C1FIFOINT16.setTXNFULLIE(thebits : TBits_1); inline;
  76669. begin
  76670. if thebits = 0 then
  76671. pTDefRegMap(@Self)^.clr := $04000000
  76672. else
  76673. pTDefRegMap(@Self)^.&set := $04000000;
  76674. end;
  76675. function TCAN1_C1FIFOINT16.getTXNFULLIE : TBits_1; inline;
  76676. begin
  76677. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  76678. end;
  76679. procedure TCAN1_C1FIFOINT16.setw(thebits : TBits_32); inline;
  76680. begin
  76681. pTDefRegMap(@Self)^.val := thebits;
  76682. end;
  76683. function TCAN1_C1FIFOINT16.getw : TBits_32; inline;
  76684. begin
  76685. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76686. end;
  76687. procedure TCAN1_C1FIFOCI16.setCFIFOCI(thebits : TBits_5); inline;
  76688. begin
  76689. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  76690. end;
  76691. function TCAN1_C1FIFOCI16.getCFIFOCI : TBits_5; inline;
  76692. begin
  76693. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  76694. end;
  76695. procedure TCAN1_C1FIFOCI16.setw(thebits : TBits_32); inline;
  76696. begin
  76697. pTDefRegMap(@Self)^.val := thebits;
  76698. end;
  76699. function TCAN1_C1FIFOCI16.getw : TBits_32; inline;
  76700. begin
  76701. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76702. end;
  76703. procedure TCAN1_C1FIFOCON17.setTXPRI(thebits : TBits_2); inline;
  76704. begin
  76705. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  76706. end;
  76707. function TCAN1_C1FIFOCON17.getTXPRI : TBits_2; inline;
  76708. begin
  76709. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  76710. end;
  76711. procedure TCAN1_C1FIFOCON17.setRTREN; inline;
  76712. begin
  76713. pTDefRegMap(@Self)^.&set := $00000004;
  76714. end;
  76715. procedure TCAN1_C1FIFOCON17.clearRTREN; inline;
  76716. begin
  76717. pTDefRegMap(@Self)^.clr := $00000004;
  76718. end;
  76719. procedure TCAN1_C1FIFOCON17.setRTREN(thebits : TBits_1); inline;
  76720. begin
  76721. if thebits = 0 then
  76722. pTDefRegMap(@Self)^.clr := $00000004
  76723. else
  76724. pTDefRegMap(@Self)^.&set := $00000004;
  76725. end;
  76726. function TCAN1_C1FIFOCON17.getRTREN : TBits_1; inline;
  76727. begin
  76728. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76729. end;
  76730. procedure TCAN1_C1FIFOCON17.setTXREQ; inline;
  76731. begin
  76732. pTDefRegMap(@Self)^.&set := $00000008;
  76733. end;
  76734. procedure TCAN1_C1FIFOCON17.clearTXREQ; inline;
  76735. begin
  76736. pTDefRegMap(@Self)^.clr := $00000008;
  76737. end;
  76738. procedure TCAN1_C1FIFOCON17.setTXREQ(thebits : TBits_1); inline;
  76739. begin
  76740. if thebits = 0 then
  76741. pTDefRegMap(@Self)^.clr := $00000008
  76742. else
  76743. pTDefRegMap(@Self)^.&set := $00000008;
  76744. end;
  76745. function TCAN1_C1FIFOCON17.getTXREQ : TBits_1; inline;
  76746. begin
  76747. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76748. end;
  76749. procedure TCAN1_C1FIFOCON17.setTXERR; inline;
  76750. begin
  76751. pTDefRegMap(@Self)^.&set := $00000010;
  76752. end;
  76753. procedure TCAN1_C1FIFOCON17.clearTXERR; inline;
  76754. begin
  76755. pTDefRegMap(@Self)^.clr := $00000010;
  76756. end;
  76757. procedure TCAN1_C1FIFOCON17.setTXERR(thebits : TBits_1); inline;
  76758. begin
  76759. if thebits = 0 then
  76760. pTDefRegMap(@Self)^.clr := $00000010
  76761. else
  76762. pTDefRegMap(@Self)^.&set := $00000010;
  76763. end;
  76764. function TCAN1_C1FIFOCON17.getTXERR : TBits_1; inline;
  76765. begin
  76766. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  76767. end;
  76768. procedure TCAN1_C1FIFOCON17.setTXLARB; inline;
  76769. begin
  76770. pTDefRegMap(@Self)^.&set := $00000020;
  76771. end;
  76772. procedure TCAN1_C1FIFOCON17.clearTXLARB; inline;
  76773. begin
  76774. pTDefRegMap(@Self)^.clr := $00000020;
  76775. end;
  76776. procedure TCAN1_C1FIFOCON17.setTXLARB(thebits : TBits_1); inline;
  76777. begin
  76778. if thebits = 0 then
  76779. pTDefRegMap(@Self)^.clr := $00000020
  76780. else
  76781. pTDefRegMap(@Self)^.&set := $00000020;
  76782. end;
  76783. function TCAN1_C1FIFOCON17.getTXLARB : TBits_1; inline;
  76784. begin
  76785. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  76786. end;
  76787. procedure TCAN1_C1FIFOCON17.setTXABAT; inline;
  76788. begin
  76789. pTDefRegMap(@Self)^.&set := $00000040;
  76790. end;
  76791. procedure TCAN1_C1FIFOCON17.clearTXABAT; inline;
  76792. begin
  76793. pTDefRegMap(@Self)^.clr := $00000040;
  76794. end;
  76795. procedure TCAN1_C1FIFOCON17.setTXABAT(thebits : TBits_1); inline;
  76796. begin
  76797. if thebits = 0 then
  76798. pTDefRegMap(@Self)^.clr := $00000040
  76799. else
  76800. pTDefRegMap(@Self)^.&set := $00000040;
  76801. end;
  76802. function TCAN1_C1FIFOCON17.getTXABAT : TBits_1; inline;
  76803. begin
  76804. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  76805. end;
  76806. procedure TCAN1_C1FIFOCON17.setTXEN; inline;
  76807. begin
  76808. pTDefRegMap(@Self)^.&set := $00000080;
  76809. end;
  76810. procedure TCAN1_C1FIFOCON17.clearTXEN; inline;
  76811. begin
  76812. pTDefRegMap(@Self)^.clr := $00000080;
  76813. end;
  76814. procedure TCAN1_C1FIFOCON17.setTXEN(thebits : TBits_1); inline;
  76815. begin
  76816. if thebits = 0 then
  76817. pTDefRegMap(@Self)^.clr := $00000080
  76818. else
  76819. pTDefRegMap(@Self)^.&set := $00000080;
  76820. end;
  76821. function TCAN1_C1FIFOCON17.getTXEN : TBits_1; inline;
  76822. begin
  76823. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  76824. end;
  76825. procedure TCAN1_C1FIFOCON17.setDONLY; inline;
  76826. begin
  76827. pTDefRegMap(@Self)^.&set := $00001000;
  76828. end;
  76829. procedure TCAN1_C1FIFOCON17.clearDONLY; inline;
  76830. begin
  76831. pTDefRegMap(@Self)^.clr := $00001000;
  76832. end;
  76833. procedure TCAN1_C1FIFOCON17.setDONLY(thebits : TBits_1); inline;
  76834. begin
  76835. if thebits = 0 then
  76836. pTDefRegMap(@Self)^.clr := $00001000
  76837. else
  76838. pTDefRegMap(@Self)^.&set := $00001000;
  76839. end;
  76840. function TCAN1_C1FIFOCON17.getDONLY : TBits_1; inline;
  76841. begin
  76842. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  76843. end;
  76844. procedure TCAN1_C1FIFOCON17.setUINC; inline;
  76845. begin
  76846. pTDefRegMap(@Self)^.&set := $00002000;
  76847. end;
  76848. procedure TCAN1_C1FIFOCON17.clearUINC; inline;
  76849. begin
  76850. pTDefRegMap(@Self)^.clr := $00002000;
  76851. end;
  76852. procedure TCAN1_C1FIFOCON17.setUINC(thebits : TBits_1); inline;
  76853. begin
  76854. if thebits = 0 then
  76855. pTDefRegMap(@Self)^.clr := $00002000
  76856. else
  76857. pTDefRegMap(@Self)^.&set := $00002000;
  76858. end;
  76859. function TCAN1_C1FIFOCON17.getUINC : TBits_1; inline;
  76860. begin
  76861. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  76862. end;
  76863. procedure TCAN1_C1FIFOCON17.setFRESET; inline;
  76864. begin
  76865. pTDefRegMap(@Self)^.&set := $00004000;
  76866. end;
  76867. procedure TCAN1_C1FIFOCON17.clearFRESET; inline;
  76868. begin
  76869. pTDefRegMap(@Self)^.clr := $00004000;
  76870. end;
  76871. procedure TCAN1_C1FIFOCON17.setFRESET(thebits : TBits_1); inline;
  76872. begin
  76873. if thebits = 0 then
  76874. pTDefRegMap(@Self)^.clr := $00004000
  76875. else
  76876. pTDefRegMap(@Self)^.&set := $00004000;
  76877. end;
  76878. function TCAN1_C1FIFOCON17.getFRESET : TBits_1; inline;
  76879. begin
  76880. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  76881. end;
  76882. procedure TCAN1_C1FIFOCON17.setFSIZE(thebits : TBits_5); inline;
  76883. begin
  76884. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  76885. end;
  76886. function TCAN1_C1FIFOCON17.getFSIZE : TBits_5; inline;
  76887. begin
  76888. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  76889. end;
  76890. procedure TCAN1_C1FIFOCON17.setw(thebits : TBits_32); inline;
  76891. begin
  76892. pTDefRegMap(@Self)^.val := thebits;
  76893. end;
  76894. function TCAN1_C1FIFOCON17.getw : TBits_32; inline;
  76895. begin
  76896. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76897. end;
  76898. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIF; inline;
  76899. begin
  76900. pTDefRegMap(@Self)^.&set := $00000001;
  76901. end;
  76902. procedure TCAN1_C1FIFOINT17.clearRXNEMPTYIF; inline;
  76903. begin
  76904. pTDefRegMap(@Self)^.clr := $00000001;
  76905. end;
  76906. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIF(thebits : TBits_1); inline;
  76907. begin
  76908. if thebits = 0 then
  76909. pTDefRegMap(@Self)^.clr := $00000001
  76910. else
  76911. pTDefRegMap(@Self)^.&set := $00000001;
  76912. end;
  76913. function TCAN1_C1FIFOINT17.getRXNEMPTYIF : TBits_1; inline;
  76914. begin
  76915. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  76916. end;
  76917. procedure TCAN1_C1FIFOINT17.setRXHALFIF; inline;
  76918. begin
  76919. pTDefRegMap(@Self)^.&set := $00000002;
  76920. end;
  76921. procedure TCAN1_C1FIFOINT17.clearRXHALFIF; inline;
  76922. begin
  76923. pTDefRegMap(@Self)^.clr := $00000002;
  76924. end;
  76925. procedure TCAN1_C1FIFOINT17.setRXHALFIF(thebits : TBits_1); inline;
  76926. begin
  76927. if thebits = 0 then
  76928. pTDefRegMap(@Self)^.clr := $00000002
  76929. else
  76930. pTDefRegMap(@Self)^.&set := $00000002;
  76931. end;
  76932. function TCAN1_C1FIFOINT17.getRXHALFIF : TBits_1; inline;
  76933. begin
  76934. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  76935. end;
  76936. procedure TCAN1_C1FIFOINT17.setRXFULLIF; inline;
  76937. begin
  76938. pTDefRegMap(@Self)^.&set := $00000004;
  76939. end;
  76940. procedure TCAN1_C1FIFOINT17.clearRXFULLIF; inline;
  76941. begin
  76942. pTDefRegMap(@Self)^.clr := $00000004;
  76943. end;
  76944. procedure TCAN1_C1FIFOINT17.setRXFULLIF(thebits : TBits_1); inline;
  76945. begin
  76946. if thebits = 0 then
  76947. pTDefRegMap(@Self)^.clr := $00000004
  76948. else
  76949. pTDefRegMap(@Self)^.&set := $00000004;
  76950. end;
  76951. function TCAN1_C1FIFOINT17.getRXFULLIF : TBits_1; inline;
  76952. begin
  76953. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76954. end;
  76955. procedure TCAN1_C1FIFOINT17.setRXOVFLIF; inline;
  76956. begin
  76957. pTDefRegMap(@Self)^.&set := $00000008;
  76958. end;
  76959. procedure TCAN1_C1FIFOINT17.clearRXOVFLIF; inline;
  76960. begin
  76961. pTDefRegMap(@Self)^.clr := $00000008;
  76962. end;
  76963. procedure TCAN1_C1FIFOINT17.setRXOVFLIF(thebits : TBits_1); inline;
  76964. begin
  76965. if thebits = 0 then
  76966. pTDefRegMap(@Self)^.clr := $00000008
  76967. else
  76968. pTDefRegMap(@Self)^.&set := $00000008;
  76969. end;
  76970. function TCAN1_C1FIFOINT17.getRXOVFLIF : TBits_1; inline;
  76971. begin
  76972. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76973. end;
  76974. procedure TCAN1_C1FIFOINT17.setTXEMPTYIF; inline;
  76975. begin
  76976. pTDefRegMap(@Self)^.&set := $00000100;
  76977. end;
  76978. procedure TCAN1_C1FIFOINT17.clearTXEMPTYIF; inline;
  76979. begin
  76980. pTDefRegMap(@Self)^.clr := $00000100;
  76981. end;
  76982. procedure TCAN1_C1FIFOINT17.setTXEMPTYIF(thebits : TBits_1); inline;
  76983. begin
  76984. if thebits = 0 then
  76985. pTDefRegMap(@Self)^.clr := $00000100
  76986. else
  76987. pTDefRegMap(@Self)^.&set := $00000100;
  76988. end;
  76989. function TCAN1_C1FIFOINT17.getTXEMPTYIF : TBits_1; inline;
  76990. begin
  76991. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  76992. end;
  76993. procedure TCAN1_C1FIFOINT17.setTXHALFIF; inline;
  76994. begin
  76995. pTDefRegMap(@Self)^.&set := $00000200;
  76996. end;
  76997. procedure TCAN1_C1FIFOINT17.clearTXHALFIF; inline;
  76998. begin
  76999. pTDefRegMap(@Self)^.clr := $00000200;
  77000. end;
  77001. procedure TCAN1_C1FIFOINT17.setTXHALFIF(thebits : TBits_1); inline;
  77002. begin
  77003. if thebits = 0 then
  77004. pTDefRegMap(@Self)^.clr := $00000200
  77005. else
  77006. pTDefRegMap(@Self)^.&set := $00000200;
  77007. end;
  77008. function TCAN1_C1FIFOINT17.getTXHALFIF : TBits_1; inline;
  77009. begin
  77010. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  77011. end;
  77012. procedure TCAN1_C1FIFOINT17.setTXNFULLIF; inline;
  77013. begin
  77014. pTDefRegMap(@Self)^.&set := $00000400;
  77015. end;
  77016. procedure TCAN1_C1FIFOINT17.clearTXNFULLIF; inline;
  77017. begin
  77018. pTDefRegMap(@Self)^.clr := $00000400;
  77019. end;
  77020. procedure TCAN1_C1FIFOINT17.setTXNFULLIF(thebits : TBits_1); inline;
  77021. begin
  77022. if thebits = 0 then
  77023. pTDefRegMap(@Self)^.clr := $00000400
  77024. else
  77025. pTDefRegMap(@Self)^.&set := $00000400;
  77026. end;
  77027. function TCAN1_C1FIFOINT17.getTXNFULLIF : TBits_1; inline;
  77028. begin
  77029. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  77030. end;
  77031. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIE; inline;
  77032. begin
  77033. pTDefRegMap(@Self)^.&set := $00010000;
  77034. end;
  77035. procedure TCAN1_C1FIFOINT17.clearRXNEMPTYIE; inline;
  77036. begin
  77037. pTDefRegMap(@Self)^.clr := $00010000;
  77038. end;
  77039. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIE(thebits : TBits_1); inline;
  77040. begin
  77041. if thebits = 0 then
  77042. pTDefRegMap(@Self)^.clr := $00010000
  77043. else
  77044. pTDefRegMap(@Self)^.&set := $00010000;
  77045. end;
  77046. function TCAN1_C1FIFOINT17.getRXNEMPTYIE : TBits_1; inline;
  77047. begin
  77048. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  77049. end;
  77050. procedure TCAN1_C1FIFOINT17.setRXHALFIE; inline;
  77051. begin
  77052. pTDefRegMap(@Self)^.&set := $00020000;
  77053. end;
  77054. procedure TCAN1_C1FIFOINT17.clearRXHALFIE; inline;
  77055. begin
  77056. pTDefRegMap(@Self)^.clr := $00020000;
  77057. end;
  77058. procedure TCAN1_C1FIFOINT17.setRXHALFIE(thebits : TBits_1); inline;
  77059. begin
  77060. if thebits = 0 then
  77061. pTDefRegMap(@Self)^.clr := $00020000
  77062. else
  77063. pTDefRegMap(@Self)^.&set := $00020000;
  77064. end;
  77065. function TCAN1_C1FIFOINT17.getRXHALFIE : TBits_1; inline;
  77066. begin
  77067. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  77068. end;
  77069. procedure TCAN1_C1FIFOINT17.setRXFULLIE; inline;
  77070. begin
  77071. pTDefRegMap(@Self)^.&set := $00040000;
  77072. end;
  77073. procedure TCAN1_C1FIFOINT17.clearRXFULLIE; inline;
  77074. begin
  77075. pTDefRegMap(@Self)^.clr := $00040000;
  77076. end;
  77077. procedure TCAN1_C1FIFOINT17.setRXFULLIE(thebits : TBits_1); inline;
  77078. begin
  77079. if thebits = 0 then
  77080. pTDefRegMap(@Self)^.clr := $00040000
  77081. else
  77082. pTDefRegMap(@Self)^.&set := $00040000;
  77083. end;
  77084. function TCAN1_C1FIFOINT17.getRXFULLIE : TBits_1; inline;
  77085. begin
  77086. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  77087. end;
  77088. procedure TCAN1_C1FIFOINT17.setRXOVFLIE; inline;
  77089. begin
  77090. pTDefRegMap(@Self)^.&set := $00080000;
  77091. end;
  77092. procedure TCAN1_C1FIFOINT17.clearRXOVFLIE; inline;
  77093. begin
  77094. pTDefRegMap(@Self)^.clr := $00080000;
  77095. end;
  77096. procedure TCAN1_C1FIFOINT17.setRXOVFLIE(thebits : TBits_1); inline;
  77097. begin
  77098. if thebits = 0 then
  77099. pTDefRegMap(@Self)^.clr := $00080000
  77100. else
  77101. pTDefRegMap(@Self)^.&set := $00080000;
  77102. end;
  77103. function TCAN1_C1FIFOINT17.getRXOVFLIE : TBits_1; inline;
  77104. begin
  77105. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77106. end;
  77107. procedure TCAN1_C1FIFOINT17.setTXEMPTYIE; inline;
  77108. begin
  77109. pTDefRegMap(@Self)^.&set := $01000000;
  77110. end;
  77111. procedure TCAN1_C1FIFOINT17.clearTXEMPTYIE; inline;
  77112. begin
  77113. pTDefRegMap(@Self)^.clr := $01000000;
  77114. end;
  77115. procedure TCAN1_C1FIFOINT17.setTXEMPTYIE(thebits : TBits_1); inline;
  77116. begin
  77117. if thebits = 0 then
  77118. pTDefRegMap(@Self)^.clr := $01000000
  77119. else
  77120. pTDefRegMap(@Self)^.&set := $01000000;
  77121. end;
  77122. function TCAN1_C1FIFOINT17.getTXEMPTYIE : TBits_1; inline;
  77123. begin
  77124. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  77125. end;
  77126. procedure TCAN1_C1FIFOINT17.setTXHALFIE; inline;
  77127. begin
  77128. pTDefRegMap(@Self)^.&set := $02000000;
  77129. end;
  77130. procedure TCAN1_C1FIFOINT17.clearTXHALFIE; inline;
  77131. begin
  77132. pTDefRegMap(@Self)^.clr := $02000000;
  77133. end;
  77134. procedure TCAN1_C1FIFOINT17.setTXHALFIE(thebits : TBits_1); inline;
  77135. begin
  77136. if thebits = 0 then
  77137. pTDefRegMap(@Self)^.clr := $02000000
  77138. else
  77139. pTDefRegMap(@Self)^.&set := $02000000;
  77140. end;
  77141. function TCAN1_C1FIFOINT17.getTXHALFIE : TBits_1; inline;
  77142. begin
  77143. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  77144. end;
  77145. procedure TCAN1_C1FIFOINT17.setTXNFULLIE; inline;
  77146. begin
  77147. pTDefRegMap(@Self)^.&set := $04000000;
  77148. end;
  77149. procedure TCAN1_C1FIFOINT17.clearTXNFULLIE; inline;
  77150. begin
  77151. pTDefRegMap(@Self)^.clr := $04000000;
  77152. end;
  77153. procedure TCAN1_C1FIFOINT17.setTXNFULLIE(thebits : TBits_1); inline;
  77154. begin
  77155. if thebits = 0 then
  77156. pTDefRegMap(@Self)^.clr := $04000000
  77157. else
  77158. pTDefRegMap(@Self)^.&set := $04000000;
  77159. end;
  77160. function TCAN1_C1FIFOINT17.getTXNFULLIE : TBits_1; inline;
  77161. begin
  77162. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  77163. end;
  77164. procedure TCAN1_C1FIFOINT17.setw(thebits : TBits_32); inline;
  77165. begin
  77166. pTDefRegMap(@Self)^.val := thebits;
  77167. end;
  77168. function TCAN1_C1FIFOINT17.getw : TBits_32; inline;
  77169. begin
  77170. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77171. end;
  77172. procedure TCAN1_C1FIFOCI17.setCFIFOCI(thebits : TBits_5); inline;
  77173. begin
  77174. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  77175. end;
  77176. function TCAN1_C1FIFOCI17.getCFIFOCI : TBits_5; inline;
  77177. begin
  77178. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  77179. end;
  77180. procedure TCAN1_C1FIFOCI17.setw(thebits : TBits_32); inline;
  77181. begin
  77182. pTDefRegMap(@Self)^.val := thebits;
  77183. end;
  77184. function TCAN1_C1FIFOCI17.getw : TBits_32; inline;
  77185. begin
  77186. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77187. end;
  77188. procedure TCAN1_C1FIFOCON18.setTXPRI(thebits : TBits_2); inline;
  77189. begin
  77190. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  77191. end;
  77192. function TCAN1_C1FIFOCON18.getTXPRI : TBits_2; inline;
  77193. begin
  77194. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  77195. end;
  77196. procedure TCAN1_C1FIFOCON18.setRTREN; inline;
  77197. begin
  77198. pTDefRegMap(@Self)^.&set := $00000004;
  77199. end;
  77200. procedure TCAN1_C1FIFOCON18.clearRTREN; inline;
  77201. begin
  77202. pTDefRegMap(@Self)^.clr := $00000004;
  77203. end;
  77204. procedure TCAN1_C1FIFOCON18.setRTREN(thebits : TBits_1); inline;
  77205. begin
  77206. if thebits = 0 then
  77207. pTDefRegMap(@Self)^.clr := $00000004
  77208. else
  77209. pTDefRegMap(@Self)^.&set := $00000004;
  77210. end;
  77211. function TCAN1_C1FIFOCON18.getRTREN : TBits_1; inline;
  77212. begin
  77213. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77214. end;
  77215. procedure TCAN1_C1FIFOCON18.setTXREQ; inline;
  77216. begin
  77217. pTDefRegMap(@Self)^.&set := $00000008;
  77218. end;
  77219. procedure TCAN1_C1FIFOCON18.clearTXREQ; inline;
  77220. begin
  77221. pTDefRegMap(@Self)^.clr := $00000008;
  77222. end;
  77223. procedure TCAN1_C1FIFOCON18.setTXREQ(thebits : TBits_1); inline;
  77224. begin
  77225. if thebits = 0 then
  77226. pTDefRegMap(@Self)^.clr := $00000008
  77227. else
  77228. pTDefRegMap(@Self)^.&set := $00000008;
  77229. end;
  77230. function TCAN1_C1FIFOCON18.getTXREQ : TBits_1; inline;
  77231. begin
  77232. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77233. end;
  77234. procedure TCAN1_C1FIFOCON18.setTXERR; inline;
  77235. begin
  77236. pTDefRegMap(@Self)^.&set := $00000010;
  77237. end;
  77238. procedure TCAN1_C1FIFOCON18.clearTXERR; inline;
  77239. begin
  77240. pTDefRegMap(@Self)^.clr := $00000010;
  77241. end;
  77242. procedure TCAN1_C1FIFOCON18.setTXERR(thebits : TBits_1); inline;
  77243. begin
  77244. if thebits = 0 then
  77245. pTDefRegMap(@Self)^.clr := $00000010
  77246. else
  77247. pTDefRegMap(@Self)^.&set := $00000010;
  77248. end;
  77249. function TCAN1_C1FIFOCON18.getTXERR : TBits_1; inline;
  77250. begin
  77251. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  77252. end;
  77253. procedure TCAN1_C1FIFOCON18.setTXLARB; inline;
  77254. begin
  77255. pTDefRegMap(@Self)^.&set := $00000020;
  77256. end;
  77257. procedure TCAN1_C1FIFOCON18.clearTXLARB; inline;
  77258. begin
  77259. pTDefRegMap(@Self)^.clr := $00000020;
  77260. end;
  77261. procedure TCAN1_C1FIFOCON18.setTXLARB(thebits : TBits_1); inline;
  77262. begin
  77263. if thebits = 0 then
  77264. pTDefRegMap(@Self)^.clr := $00000020
  77265. else
  77266. pTDefRegMap(@Self)^.&set := $00000020;
  77267. end;
  77268. function TCAN1_C1FIFOCON18.getTXLARB : TBits_1; inline;
  77269. begin
  77270. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  77271. end;
  77272. procedure TCAN1_C1FIFOCON18.setTXABAT; inline;
  77273. begin
  77274. pTDefRegMap(@Self)^.&set := $00000040;
  77275. end;
  77276. procedure TCAN1_C1FIFOCON18.clearTXABAT; inline;
  77277. begin
  77278. pTDefRegMap(@Self)^.clr := $00000040;
  77279. end;
  77280. procedure TCAN1_C1FIFOCON18.setTXABAT(thebits : TBits_1); inline;
  77281. begin
  77282. if thebits = 0 then
  77283. pTDefRegMap(@Self)^.clr := $00000040
  77284. else
  77285. pTDefRegMap(@Self)^.&set := $00000040;
  77286. end;
  77287. function TCAN1_C1FIFOCON18.getTXABAT : TBits_1; inline;
  77288. begin
  77289. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  77290. end;
  77291. procedure TCAN1_C1FIFOCON18.setTXEN; inline;
  77292. begin
  77293. pTDefRegMap(@Self)^.&set := $00000080;
  77294. end;
  77295. procedure TCAN1_C1FIFOCON18.clearTXEN; inline;
  77296. begin
  77297. pTDefRegMap(@Self)^.clr := $00000080;
  77298. end;
  77299. procedure TCAN1_C1FIFOCON18.setTXEN(thebits : TBits_1); inline;
  77300. begin
  77301. if thebits = 0 then
  77302. pTDefRegMap(@Self)^.clr := $00000080
  77303. else
  77304. pTDefRegMap(@Self)^.&set := $00000080;
  77305. end;
  77306. function TCAN1_C1FIFOCON18.getTXEN : TBits_1; inline;
  77307. begin
  77308. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  77309. end;
  77310. procedure TCAN1_C1FIFOCON18.setDONLY; inline;
  77311. begin
  77312. pTDefRegMap(@Self)^.&set := $00001000;
  77313. end;
  77314. procedure TCAN1_C1FIFOCON18.clearDONLY; inline;
  77315. begin
  77316. pTDefRegMap(@Self)^.clr := $00001000;
  77317. end;
  77318. procedure TCAN1_C1FIFOCON18.setDONLY(thebits : TBits_1); inline;
  77319. begin
  77320. if thebits = 0 then
  77321. pTDefRegMap(@Self)^.clr := $00001000
  77322. else
  77323. pTDefRegMap(@Self)^.&set := $00001000;
  77324. end;
  77325. function TCAN1_C1FIFOCON18.getDONLY : TBits_1; inline;
  77326. begin
  77327. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  77328. end;
  77329. procedure TCAN1_C1FIFOCON18.setUINC; inline;
  77330. begin
  77331. pTDefRegMap(@Self)^.&set := $00002000;
  77332. end;
  77333. procedure TCAN1_C1FIFOCON18.clearUINC; inline;
  77334. begin
  77335. pTDefRegMap(@Self)^.clr := $00002000;
  77336. end;
  77337. procedure TCAN1_C1FIFOCON18.setUINC(thebits : TBits_1); inline;
  77338. begin
  77339. if thebits = 0 then
  77340. pTDefRegMap(@Self)^.clr := $00002000
  77341. else
  77342. pTDefRegMap(@Self)^.&set := $00002000;
  77343. end;
  77344. function TCAN1_C1FIFOCON18.getUINC : TBits_1; inline;
  77345. begin
  77346. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  77347. end;
  77348. procedure TCAN1_C1FIFOCON18.setFRESET; inline;
  77349. begin
  77350. pTDefRegMap(@Self)^.&set := $00004000;
  77351. end;
  77352. procedure TCAN1_C1FIFOCON18.clearFRESET; inline;
  77353. begin
  77354. pTDefRegMap(@Self)^.clr := $00004000;
  77355. end;
  77356. procedure TCAN1_C1FIFOCON18.setFRESET(thebits : TBits_1); inline;
  77357. begin
  77358. if thebits = 0 then
  77359. pTDefRegMap(@Self)^.clr := $00004000
  77360. else
  77361. pTDefRegMap(@Self)^.&set := $00004000;
  77362. end;
  77363. function TCAN1_C1FIFOCON18.getFRESET : TBits_1; inline;
  77364. begin
  77365. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  77366. end;
  77367. procedure TCAN1_C1FIFOCON18.setFSIZE(thebits : TBits_5); inline;
  77368. begin
  77369. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  77370. end;
  77371. function TCAN1_C1FIFOCON18.getFSIZE : TBits_5; inline;
  77372. begin
  77373. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  77374. end;
  77375. procedure TCAN1_C1FIFOCON18.setw(thebits : TBits_32); inline;
  77376. begin
  77377. pTDefRegMap(@Self)^.val := thebits;
  77378. end;
  77379. function TCAN1_C1FIFOCON18.getw : TBits_32; inline;
  77380. begin
  77381. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77382. end;
  77383. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIF; inline;
  77384. begin
  77385. pTDefRegMap(@Self)^.&set := $00000001;
  77386. end;
  77387. procedure TCAN1_C1FIFOINT18.clearRXNEMPTYIF; inline;
  77388. begin
  77389. pTDefRegMap(@Self)^.clr := $00000001;
  77390. end;
  77391. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIF(thebits : TBits_1); inline;
  77392. begin
  77393. if thebits = 0 then
  77394. pTDefRegMap(@Self)^.clr := $00000001
  77395. else
  77396. pTDefRegMap(@Self)^.&set := $00000001;
  77397. end;
  77398. function TCAN1_C1FIFOINT18.getRXNEMPTYIF : TBits_1; inline;
  77399. begin
  77400. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  77401. end;
  77402. procedure TCAN1_C1FIFOINT18.setRXHALFIF; inline;
  77403. begin
  77404. pTDefRegMap(@Self)^.&set := $00000002;
  77405. end;
  77406. procedure TCAN1_C1FIFOINT18.clearRXHALFIF; inline;
  77407. begin
  77408. pTDefRegMap(@Self)^.clr := $00000002;
  77409. end;
  77410. procedure TCAN1_C1FIFOINT18.setRXHALFIF(thebits : TBits_1); inline;
  77411. begin
  77412. if thebits = 0 then
  77413. pTDefRegMap(@Self)^.clr := $00000002
  77414. else
  77415. pTDefRegMap(@Self)^.&set := $00000002;
  77416. end;
  77417. function TCAN1_C1FIFOINT18.getRXHALFIF : TBits_1; inline;
  77418. begin
  77419. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  77420. end;
  77421. procedure TCAN1_C1FIFOINT18.setRXFULLIF; inline;
  77422. begin
  77423. pTDefRegMap(@Self)^.&set := $00000004;
  77424. end;
  77425. procedure TCAN1_C1FIFOINT18.clearRXFULLIF; inline;
  77426. begin
  77427. pTDefRegMap(@Self)^.clr := $00000004;
  77428. end;
  77429. procedure TCAN1_C1FIFOINT18.setRXFULLIF(thebits : TBits_1); inline;
  77430. begin
  77431. if thebits = 0 then
  77432. pTDefRegMap(@Self)^.clr := $00000004
  77433. else
  77434. pTDefRegMap(@Self)^.&set := $00000004;
  77435. end;
  77436. function TCAN1_C1FIFOINT18.getRXFULLIF : TBits_1; inline;
  77437. begin
  77438. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77439. end;
  77440. procedure TCAN1_C1FIFOINT18.setRXOVFLIF; inline;
  77441. begin
  77442. pTDefRegMap(@Self)^.&set := $00000008;
  77443. end;
  77444. procedure TCAN1_C1FIFOINT18.clearRXOVFLIF; inline;
  77445. begin
  77446. pTDefRegMap(@Self)^.clr := $00000008;
  77447. end;
  77448. procedure TCAN1_C1FIFOINT18.setRXOVFLIF(thebits : TBits_1); inline;
  77449. begin
  77450. if thebits = 0 then
  77451. pTDefRegMap(@Self)^.clr := $00000008
  77452. else
  77453. pTDefRegMap(@Self)^.&set := $00000008;
  77454. end;
  77455. function TCAN1_C1FIFOINT18.getRXOVFLIF : TBits_1; inline;
  77456. begin
  77457. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77458. end;
  77459. procedure TCAN1_C1FIFOINT18.setTXEMPTYIF; inline;
  77460. begin
  77461. pTDefRegMap(@Self)^.&set := $00000100;
  77462. end;
  77463. procedure TCAN1_C1FIFOINT18.clearTXEMPTYIF; inline;
  77464. begin
  77465. pTDefRegMap(@Self)^.clr := $00000100;
  77466. end;
  77467. procedure TCAN1_C1FIFOINT18.setTXEMPTYIF(thebits : TBits_1); inline;
  77468. begin
  77469. if thebits = 0 then
  77470. pTDefRegMap(@Self)^.clr := $00000100
  77471. else
  77472. pTDefRegMap(@Self)^.&set := $00000100;
  77473. end;
  77474. function TCAN1_C1FIFOINT18.getTXEMPTYIF : TBits_1; inline;
  77475. begin
  77476. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  77477. end;
  77478. procedure TCAN1_C1FIFOINT18.setTXHALFIF; inline;
  77479. begin
  77480. pTDefRegMap(@Self)^.&set := $00000200;
  77481. end;
  77482. procedure TCAN1_C1FIFOINT18.clearTXHALFIF; inline;
  77483. begin
  77484. pTDefRegMap(@Self)^.clr := $00000200;
  77485. end;
  77486. procedure TCAN1_C1FIFOINT18.setTXHALFIF(thebits : TBits_1); inline;
  77487. begin
  77488. if thebits = 0 then
  77489. pTDefRegMap(@Self)^.clr := $00000200
  77490. else
  77491. pTDefRegMap(@Self)^.&set := $00000200;
  77492. end;
  77493. function TCAN1_C1FIFOINT18.getTXHALFIF : TBits_1; inline;
  77494. begin
  77495. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  77496. end;
  77497. procedure TCAN1_C1FIFOINT18.setTXNFULLIF; inline;
  77498. begin
  77499. pTDefRegMap(@Self)^.&set := $00000400;
  77500. end;
  77501. procedure TCAN1_C1FIFOINT18.clearTXNFULLIF; inline;
  77502. begin
  77503. pTDefRegMap(@Self)^.clr := $00000400;
  77504. end;
  77505. procedure TCAN1_C1FIFOINT18.setTXNFULLIF(thebits : TBits_1); inline;
  77506. begin
  77507. if thebits = 0 then
  77508. pTDefRegMap(@Self)^.clr := $00000400
  77509. else
  77510. pTDefRegMap(@Self)^.&set := $00000400;
  77511. end;
  77512. function TCAN1_C1FIFOINT18.getTXNFULLIF : TBits_1; inline;
  77513. begin
  77514. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  77515. end;
  77516. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIE; inline;
  77517. begin
  77518. pTDefRegMap(@Self)^.&set := $00010000;
  77519. end;
  77520. procedure TCAN1_C1FIFOINT18.clearRXNEMPTYIE; inline;
  77521. begin
  77522. pTDefRegMap(@Self)^.clr := $00010000;
  77523. end;
  77524. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIE(thebits : TBits_1); inline;
  77525. begin
  77526. if thebits = 0 then
  77527. pTDefRegMap(@Self)^.clr := $00010000
  77528. else
  77529. pTDefRegMap(@Self)^.&set := $00010000;
  77530. end;
  77531. function TCAN1_C1FIFOINT18.getRXNEMPTYIE : TBits_1; inline;
  77532. begin
  77533. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  77534. end;
  77535. procedure TCAN1_C1FIFOINT18.setRXHALFIE; inline;
  77536. begin
  77537. pTDefRegMap(@Self)^.&set := $00020000;
  77538. end;
  77539. procedure TCAN1_C1FIFOINT18.clearRXHALFIE; inline;
  77540. begin
  77541. pTDefRegMap(@Self)^.clr := $00020000;
  77542. end;
  77543. procedure TCAN1_C1FIFOINT18.setRXHALFIE(thebits : TBits_1); inline;
  77544. begin
  77545. if thebits = 0 then
  77546. pTDefRegMap(@Self)^.clr := $00020000
  77547. else
  77548. pTDefRegMap(@Self)^.&set := $00020000;
  77549. end;
  77550. function TCAN1_C1FIFOINT18.getRXHALFIE : TBits_1; inline;
  77551. begin
  77552. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  77553. end;
  77554. procedure TCAN1_C1FIFOINT18.setRXFULLIE; inline;
  77555. begin
  77556. pTDefRegMap(@Self)^.&set := $00040000;
  77557. end;
  77558. procedure TCAN1_C1FIFOINT18.clearRXFULLIE; inline;
  77559. begin
  77560. pTDefRegMap(@Self)^.clr := $00040000;
  77561. end;
  77562. procedure TCAN1_C1FIFOINT18.setRXFULLIE(thebits : TBits_1); inline;
  77563. begin
  77564. if thebits = 0 then
  77565. pTDefRegMap(@Self)^.clr := $00040000
  77566. else
  77567. pTDefRegMap(@Self)^.&set := $00040000;
  77568. end;
  77569. function TCAN1_C1FIFOINT18.getRXFULLIE : TBits_1; inline;
  77570. begin
  77571. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  77572. end;
  77573. procedure TCAN1_C1FIFOINT18.setRXOVFLIE; inline;
  77574. begin
  77575. pTDefRegMap(@Self)^.&set := $00080000;
  77576. end;
  77577. procedure TCAN1_C1FIFOINT18.clearRXOVFLIE; inline;
  77578. begin
  77579. pTDefRegMap(@Self)^.clr := $00080000;
  77580. end;
  77581. procedure TCAN1_C1FIFOINT18.setRXOVFLIE(thebits : TBits_1); inline;
  77582. begin
  77583. if thebits = 0 then
  77584. pTDefRegMap(@Self)^.clr := $00080000
  77585. else
  77586. pTDefRegMap(@Self)^.&set := $00080000;
  77587. end;
  77588. function TCAN1_C1FIFOINT18.getRXOVFLIE : TBits_1; inline;
  77589. begin
  77590. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77591. end;
  77592. procedure TCAN1_C1FIFOINT18.setTXEMPTYIE; inline;
  77593. begin
  77594. pTDefRegMap(@Self)^.&set := $01000000;
  77595. end;
  77596. procedure TCAN1_C1FIFOINT18.clearTXEMPTYIE; inline;
  77597. begin
  77598. pTDefRegMap(@Self)^.clr := $01000000;
  77599. end;
  77600. procedure TCAN1_C1FIFOINT18.setTXEMPTYIE(thebits : TBits_1); inline;
  77601. begin
  77602. if thebits = 0 then
  77603. pTDefRegMap(@Self)^.clr := $01000000
  77604. else
  77605. pTDefRegMap(@Self)^.&set := $01000000;
  77606. end;
  77607. function TCAN1_C1FIFOINT18.getTXEMPTYIE : TBits_1; inline;
  77608. begin
  77609. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  77610. end;
  77611. procedure TCAN1_C1FIFOINT18.setTXHALFIE; inline;
  77612. begin
  77613. pTDefRegMap(@Self)^.&set := $02000000;
  77614. end;
  77615. procedure TCAN1_C1FIFOINT18.clearTXHALFIE; inline;
  77616. begin
  77617. pTDefRegMap(@Self)^.clr := $02000000;
  77618. end;
  77619. procedure TCAN1_C1FIFOINT18.setTXHALFIE(thebits : TBits_1); inline;
  77620. begin
  77621. if thebits = 0 then
  77622. pTDefRegMap(@Self)^.clr := $02000000
  77623. else
  77624. pTDefRegMap(@Self)^.&set := $02000000;
  77625. end;
  77626. function TCAN1_C1FIFOINT18.getTXHALFIE : TBits_1; inline;
  77627. begin
  77628. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  77629. end;
  77630. procedure TCAN1_C1FIFOINT18.setTXNFULLIE; inline;
  77631. begin
  77632. pTDefRegMap(@Self)^.&set := $04000000;
  77633. end;
  77634. procedure TCAN1_C1FIFOINT18.clearTXNFULLIE; inline;
  77635. begin
  77636. pTDefRegMap(@Self)^.clr := $04000000;
  77637. end;
  77638. procedure TCAN1_C1FIFOINT18.setTXNFULLIE(thebits : TBits_1); inline;
  77639. begin
  77640. if thebits = 0 then
  77641. pTDefRegMap(@Self)^.clr := $04000000
  77642. else
  77643. pTDefRegMap(@Self)^.&set := $04000000;
  77644. end;
  77645. function TCAN1_C1FIFOINT18.getTXNFULLIE : TBits_1; inline;
  77646. begin
  77647. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  77648. end;
  77649. procedure TCAN1_C1FIFOINT18.setw(thebits : TBits_32); inline;
  77650. begin
  77651. pTDefRegMap(@Self)^.val := thebits;
  77652. end;
  77653. function TCAN1_C1FIFOINT18.getw : TBits_32; inline;
  77654. begin
  77655. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77656. end;
  77657. procedure TCAN1_C1FIFOCI18.setCFIFOCI(thebits : TBits_5); inline;
  77658. begin
  77659. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  77660. end;
  77661. function TCAN1_C1FIFOCI18.getCFIFOCI : TBits_5; inline;
  77662. begin
  77663. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  77664. end;
  77665. procedure TCAN1_C1FIFOCI18.setw(thebits : TBits_32); inline;
  77666. begin
  77667. pTDefRegMap(@Self)^.val := thebits;
  77668. end;
  77669. function TCAN1_C1FIFOCI18.getw : TBits_32; inline;
  77670. begin
  77671. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77672. end;
  77673. procedure TCAN1_C1FIFOCON19.setTXPRI(thebits : TBits_2); inline;
  77674. begin
  77675. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  77676. end;
  77677. function TCAN1_C1FIFOCON19.getTXPRI : TBits_2; inline;
  77678. begin
  77679. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  77680. end;
  77681. procedure TCAN1_C1FIFOCON19.setRTREN; inline;
  77682. begin
  77683. pTDefRegMap(@Self)^.&set := $00000004;
  77684. end;
  77685. procedure TCAN1_C1FIFOCON19.clearRTREN; inline;
  77686. begin
  77687. pTDefRegMap(@Self)^.clr := $00000004;
  77688. end;
  77689. procedure TCAN1_C1FIFOCON19.setRTREN(thebits : TBits_1); inline;
  77690. begin
  77691. if thebits = 0 then
  77692. pTDefRegMap(@Self)^.clr := $00000004
  77693. else
  77694. pTDefRegMap(@Self)^.&set := $00000004;
  77695. end;
  77696. function TCAN1_C1FIFOCON19.getRTREN : TBits_1; inline;
  77697. begin
  77698. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77699. end;
  77700. procedure TCAN1_C1FIFOCON19.setTXREQ; inline;
  77701. begin
  77702. pTDefRegMap(@Self)^.&set := $00000008;
  77703. end;
  77704. procedure TCAN1_C1FIFOCON19.clearTXREQ; inline;
  77705. begin
  77706. pTDefRegMap(@Self)^.clr := $00000008;
  77707. end;
  77708. procedure TCAN1_C1FIFOCON19.setTXREQ(thebits : TBits_1); inline;
  77709. begin
  77710. if thebits = 0 then
  77711. pTDefRegMap(@Self)^.clr := $00000008
  77712. else
  77713. pTDefRegMap(@Self)^.&set := $00000008;
  77714. end;
  77715. function TCAN1_C1FIFOCON19.getTXREQ : TBits_1; inline;
  77716. begin
  77717. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77718. end;
  77719. procedure TCAN1_C1FIFOCON19.setTXERR; inline;
  77720. begin
  77721. pTDefRegMap(@Self)^.&set := $00000010;
  77722. end;
  77723. procedure TCAN1_C1FIFOCON19.clearTXERR; inline;
  77724. begin
  77725. pTDefRegMap(@Self)^.clr := $00000010;
  77726. end;
  77727. procedure TCAN1_C1FIFOCON19.setTXERR(thebits : TBits_1); inline;
  77728. begin
  77729. if thebits = 0 then
  77730. pTDefRegMap(@Self)^.clr := $00000010
  77731. else
  77732. pTDefRegMap(@Self)^.&set := $00000010;
  77733. end;
  77734. function TCAN1_C1FIFOCON19.getTXERR : TBits_1; inline;
  77735. begin
  77736. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  77737. end;
  77738. procedure TCAN1_C1FIFOCON19.setTXLARB; inline;
  77739. begin
  77740. pTDefRegMap(@Self)^.&set := $00000020;
  77741. end;
  77742. procedure TCAN1_C1FIFOCON19.clearTXLARB; inline;
  77743. begin
  77744. pTDefRegMap(@Self)^.clr := $00000020;
  77745. end;
  77746. procedure TCAN1_C1FIFOCON19.setTXLARB(thebits : TBits_1); inline;
  77747. begin
  77748. if thebits = 0 then
  77749. pTDefRegMap(@Self)^.clr := $00000020
  77750. else
  77751. pTDefRegMap(@Self)^.&set := $00000020;
  77752. end;
  77753. function TCAN1_C1FIFOCON19.getTXLARB : TBits_1; inline;
  77754. begin
  77755. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  77756. end;
  77757. procedure TCAN1_C1FIFOCON19.setTXABAT; inline;
  77758. begin
  77759. pTDefRegMap(@Self)^.&set := $00000040;
  77760. end;
  77761. procedure TCAN1_C1FIFOCON19.clearTXABAT; inline;
  77762. begin
  77763. pTDefRegMap(@Self)^.clr := $00000040;
  77764. end;
  77765. procedure TCAN1_C1FIFOCON19.setTXABAT(thebits : TBits_1); inline;
  77766. begin
  77767. if thebits = 0 then
  77768. pTDefRegMap(@Self)^.clr := $00000040
  77769. else
  77770. pTDefRegMap(@Self)^.&set := $00000040;
  77771. end;
  77772. function TCAN1_C1FIFOCON19.getTXABAT : TBits_1; inline;
  77773. begin
  77774. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  77775. end;
  77776. procedure TCAN1_C1FIFOCON19.setTXEN; inline;
  77777. begin
  77778. pTDefRegMap(@Self)^.&set := $00000080;
  77779. end;
  77780. procedure TCAN1_C1FIFOCON19.clearTXEN; inline;
  77781. begin
  77782. pTDefRegMap(@Self)^.clr := $00000080;
  77783. end;
  77784. procedure TCAN1_C1FIFOCON19.setTXEN(thebits : TBits_1); inline;
  77785. begin
  77786. if thebits = 0 then
  77787. pTDefRegMap(@Self)^.clr := $00000080
  77788. else
  77789. pTDefRegMap(@Self)^.&set := $00000080;
  77790. end;
  77791. function TCAN1_C1FIFOCON19.getTXEN : TBits_1; inline;
  77792. begin
  77793. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  77794. end;
  77795. procedure TCAN1_C1FIFOCON19.setDONLY; inline;
  77796. begin
  77797. pTDefRegMap(@Self)^.&set := $00001000;
  77798. end;
  77799. procedure TCAN1_C1FIFOCON19.clearDONLY; inline;
  77800. begin
  77801. pTDefRegMap(@Self)^.clr := $00001000;
  77802. end;
  77803. procedure TCAN1_C1FIFOCON19.setDONLY(thebits : TBits_1); inline;
  77804. begin
  77805. if thebits = 0 then
  77806. pTDefRegMap(@Self)^.clr := $00001000
  77807. else
  77808. pTDefRegMap(@Self)^.&set := $00001000;
  77809. end;
  77810. function TCAN1_C1FIFOCON19.getDONLY : TBits_1; inline;
  77811. begin
  77812. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  77813. end;
  77814. procedure TCAN1_C1FIFOCON19.setUINC; inline;
  77815. begin
  77816. pTDefRegMap(@Self)^.&set := $00002000;
  77817. end;
  77818. procedure TCAN1_C1FIFOCON19.clearUINC; inline;
  77819. begin
  77820. pTDefRegMap(@Self)^.clr := $00002000;
  77821. end;
  77822. procedure TCAN1_C1FIFOCON19.setUINC(thebits : TBits_1); inline;
  77823. begin
  77824. if thebits = 0 then
  77825. pTDefRegMap(@Self)^.clr := $00002000
  77826. else
  77827. pTDefRegMap(@Self)^.&set := $00002000;
  77828. end;
  77829. function TCAN1_C1FIFOCON19.getUINC : TBits_1; inline;
  77830. begin
  77831. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  77832. end;
  77833. procedure TCAN1_C1FIFOCON19.setFRESET; inline;
  77834. begin
  77835. pTDefRegMap(@Self)^.&set := $00004000;
  77836. end;
  77837. procedure TCAN1_C1FIFOCON19.clearFRESET; inline;
  77838. begin
  77839. pTDefRegMap(@Self)^.clr := $00004000;
  77840. end;
  77841. procedure TCAN1_C1FIFOCON19.setFRESET(thebits : TBits_1); inline;
  77842. begin
  77843. if thebits = 0 then
  77844. pTDefRegMap(@Self)^.clr := $00004000
  77845. else
  77846. pTDefRegMap(@Self)^.&set := $00004000;
  77847. end;
  77848. function TCAN1_C1FIFOCON19.getFRESET : TBits_1; inline;
  77849. begin
  77850. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  77851. end;
  77852. procedure TCAN1_C1FIFOCON19.setFSIZE(thebits : TBits_5); inline;
  77853. begin
  77854. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  77855. end;
  77856. function TCAN1_C1FIFOCON19.getFSIZE : TBits_5; inline;
  77857. begin
  77858. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  77859. end;
  77860. procedure TCAN1_C1FIFOCON19.setw(thebits : TBits_32); inline;
  77861. begin
  77862. pTDefRegMap(@Self)^.val := thebits;
  77863. end;
  77864. function TCAN1_C1FIFOCON19.getw : TBits_32; inline;
  77865. begin
  77866. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77867. end;
  77868. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIF; inline;
  77869. begin
  77870. pTDefRegMap(@Self)^.&set := $00000001;
  77871. end;
  77872. procedure TCAN1_C1FIFOINT19.clearRXNEMPTYIF; inline;
  77873. begin
  77874. pTDefRegMap(@Self)^.clr := $00000001;
  77875. end;
  77876. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIF(thebits : TBits_1); inline;
  77877. begin
  77878. if thebits = 0 then
  77879. pTDefRegMap(@Self)^.clr := $00000001
  77880. else
  77881. pTDefRegMap(@Self)^.&set := $00000001;
  77882. end;
  77883. function TCAN1_C1FIFOINT19.getRXNEMPTYIF : TBits_1; inline;
  77884. begin
  77885. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  77886. end;
  77887. procedure TCAN1_C1FIFOINT19.setRXHALFIF; inline;
  77888. begin
  77889. pTDefRegMap(@Self)^.&set := $00000002;
  77890. end;
  77891. procedure TCAN1_C1FIFOINT19.clearRXHALFIF; inline;
  77892. begin
  77893. pTDefRegMap(@Self)^.clr := $00000002;
  77894. end;
  77895. procedure TCAN1_C1FIFOINT19.setRXHALFIF(thebits : TBits_1); inline;
  77896. begin
  77897. if thebits = 0 then
  77898. pTDefRegMap(@Self)^.clr := $00000002
  77899. else
  77900. pTDefRegMap(@Self)^.&set := $00000002;
  77901. end;
  77902. function TCAN1_C1FIFOINT19.getRXHALFIF : TBits_1; inline;
  77903. begin
  77904. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  77905. end;
  77906. procedure TCAN1_C1FIFOINT19.setRXFULLIF; inline;
  77907. begin
  77908. pTDefRegMap(@Self)^.&set := $00000004;
  77909. end;
  77910. procedure TCAN1_C1FIFOINT19.clearRXFULLIF; inline;
  77911. begin
  77912. pTDefRegMap(@Self)^.clr := $00000004;
  77913. end;
  77914. procedure TCAN1_C1FIFOINT19.setRXFULLIF(thebits : TBits_1); inline;
  77915. begin
  77916. if thebits = 0 then
  77917. pTDefRegMap(@Self)^.clr := $00000004
  77918. else
  77919. pTDefRegMap(@Self)^.&set := $00000004;
  77920. end;
  77921. function TCAN1_C1FIFOINT19.getRXFULLIF : TBits_1; inline;
  77922. begin
  77923. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77924. end;
  77925. procedure TCAN1_C1FIFOINT19.setRXOVFLIF; inline;
  77926. begin
  77927. pTDefRegMap(@Self)^.&set := $00000008;
  77928. end;
  77929. procedure TCAN1_C1FIFOINT19.clearRXOVFLIF; inline;
  77930. begin
  77931. pTDefRegMap(@Self)^.clr := $00000008;
  77932. end;
  77933. procedure TCAN1_C1FIFOINT19.setRXOVFLIF(thebits : TBits_1); inline;
  77934. begin
  77935. if thebits = 0 then
  77936. pTDefRegMap(@Self)^.clr := $00000008
  77937. else
  77938. pTDefRegMap(@Self)^.&set := $00000008;
  77939. end;
  77940. function TCAN1_C1FIFOINT19.getRXOVFLIF : TBits_1; inline;
  77941. begin
  77942. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77943. end;
  77944. procedure TCAN1_C1FIFOINT19.setTXEMPTYIF; inline;
  77945. begin
  77946. pTDefRegMap(@Self)^.&set := $00000100;
  77947. end;
  77948. procedure TCAN1_C1FIFOINT19.clearTXEMPTYIF; inline;
  77949. begin
  77950. pTDefRegMap(@Self)^.clr := $00000100;
  77951. end;
  77952. procedure TCAN1_C1FIFOINT19.setTXEMPTYIF(thebits : TBits_1); inline;
  77953. begin
  77954. if thebits = 0 then
  77955. pTDefRegMap(@Self)^.clr := $00000100
  77956. else
  77957. pTDefRegMap(@Self)^.&set := $00000100;
  77958. end;
  77959. function TCAN1_C1FIFOINT19.getTXEMPTYIF : TBits_1; inline;
  77960. begin
  77961. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  77962. end;
  77963. procedure TCAN1_C1FIFOINT19.setTXHALFIF; inline;
  77964. begin
  77965. pTDefRegMap(@Self)^.&set := $00000200;
  77966. end;
  77967. procedure TCAN1_C1FIFOINT19.clearTXHALFIF; inline;
  77968. begin
  77969. pTDefRegMap(@Self)^.clr := $00000200;
  77970. end;
  77971. procedure TCAN1_C1FIFOINT19.setTXHALFIF(thebits : TBits_1); inline;
  77972. begin
  77973. if thebits = 0 then
  77974. pTDefRegMap(@Self)^.clr := $00000200
  77975. else
  77976. pTDefRegMap(@Self)^.&set := $00000200;
  77977. end;
  77978. function TCAN1_C1FIFOINT19.getTXHALFIF : TBits_1; inline;
  77979. begin
  77980. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  77981. end;
  77982. procedure TCAN1_C1FIFOINT19.setTXNFULLIF; inline;
  77983. begin
  77984. pTDefRegMap(@Self)^.&set := $00000400;
  77985. end;
  77986. procedure TCAN1_C1FIFOINT19.clearTXNFULLIF; inline;
  77987. begin
  77988. pTDefRegMap(@Self)^.clr := $00000400;
  77989. end;
  77990. procedure TCAN1_C1FIFOINT19.setTXNFULLIF(thebits : TBits_1); inline;
  77991. begin
  77992. if thebits = 0 then
  77993. pTDefRegMap(@Self)^.clr := $00000400
  77994. else
  77995. pTDefRegMap(@Self)^.&set := $00000400;
  77996. end;
  77997. function TCAN1_C1FIFOINT19.getTXNFULLIF : TBits_1; inline;
  77998. begin
  77999. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  78000. end;
  78001. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIE; inline;
  78002. begin
  78003. pTDefRegMap(@Self)^.&set := $00010000;
  78004. end;
  78005. procedure TCAN1_C1FIFOINT19.clearRXNEMPTYIE; inline;
  78006. begin
  78007. pTDefRegMap(@Self)^.clr := $00010000;
  78008. end;
  78009. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIE(thebits : TBits_1); inline;
  78010. begin
  78011. if thebits = 0 then
  78012. pTDefRegMap(@Self)^.clr := $00010000
  78013. else
  78014. pTDefRegMap(@Self)^.&set := $00010000;
  78015. end;
  78016. function TCAN1_C1FIFOINT19.getRXNEMPTYIE : TBits_1; inline;
  78017. begin
  78018. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  78019. end;
  78020. procedure TCAN1_C1FIFOINT19.setRXHALFIE; inline;
  78021. begin
  78022. pTDefRegMap(@Self)^.&set := $00020000;
  78023. end;
  78024. procedure TCAN1_C1FIFOINT19.clearRXHALFIE; inline;
  78025. begin
  78026. pTDefRegMap(@Self)^.clr := $00020000;
  78027. end;
  78028. procedure TCAN1_C1FIFOINT19.setRXHALFIE(thebits : TBits_1); inline;
  78029. begin
  78030. if thebits = 0 then
  78031. pTDefRegMap(@Self)^.clr := $00020000
  78032. else
  78033. pTDefRegMap(@Self)^.&set := $00020000;
  78034. end;
  78035. function TCAN1_C1FIFOINT19.getRXHALFIE : TBits_1; inline;
  78036. begin
  78037. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  78038. end;
  78039. procedure TCAN1_C1FIFOINT19.setRXFULLIE; inline;
  78040. begin
  78041. pTDefRegMap(@Self)^.&set := $00040000;
  78042. end;
  78043. procedure TCAN1_C1FIFOINT19.clearRXFULLIE; inline;
  78044. begin
  78045. pTDefRegMap(@Self)^.clr := $00040000;
  78046. end;
  78047. procedure TCAN1_C1FIFOINT19.setRXFULLIE(thebits : TBits_1); inline;
  78048. begin
  78049. if thebits = 0 then
  78050. pTDefRegMap(@Self)^.clr := $00040000
  78051. else
  78052. pTDefRegMap(@Self)^.&set := $00040000;
  78053. end;
  78054. function TCAN1_C1FIFOINT19.getRXFULLIE : TBits_1; inline;
  78055. begin
  78056. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  78057. end;
  78058. procedure TCAN1_C1FIFOINT19.setRXOVFLIE; inline;
  78059. begin
  78060. pTDefRegMap(@Self)^.&set := $00080000;
  78061. end;
  78062. procedure TCAN1_C1FIFOINT19.clearRXOVFLIE; inline;
  78063. begin
  78064. pTDefRegMap(@Self)^.clr := $00080000;
  78065. end;
  78066. procedure TCAN1_C1FIFOINT19.setRXOVFLIE(thebits : TBits_1); inline;
  78067. begin
  78068. if thebits = 0 then
  78069. pTDefRegMap(@Self)^.clr := $00080000
  78070. else
  78071. pTDefRegMap(@Self)^.&set := $00080000;
  78072. end;
  78073. function TCAN1_C1FIFOINT19.getRXOVFLIE : TBits_1; inline;
  78074. begin
  78075. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  78076. end;
  78077. procedure TCAN1_C1FIFOINT19.setTXEMPTYIE; inline;
  78078. begin
  78079. pTDefRegMap(@Self)^.&set := $01000000;
  78080. end;
  78081. procedure TCAN1_C1FIFOINT19.clearTXEMPTYIE; inline;
  78082. begin
  78083. pTDefRegMap(@Self)^.clr := $01000000;
  78084. end;
  78085. procedure TCAN1_C1FIFOINT19.setTXEMPTYIE(thebits : TBits_1); inline;
  78086. begin
  78087. if thebits = 0 then
  78088. pTDefRegMap(@Self)^.clr := $01000000
  78089. else
  78090. pTDefRegMap(@Self)^.&set := $01000000;
  78091. end;
  78092. function TCAN1_C1FIFOINT19.getTXEMPTYIE : TBits_1; inline;
  78093. begin
  78094. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  78095. end;
  78096. procedure TCAN1_C1FIFOINT19.setTXHALFIE; inline;
  78097. begin
  78098. pTDefRegMap(@Self)^.&set := $02000000;
  78099. end;
  78100. procedure TCAN1_C1FIFOINT19.clearTXHALFIE; inline;
  78101. begin
  78102. pTDefRegMap(@Self)^.clr := $02000000;
  78103. end;
  78104. procedure TCAN1_C1FIFOINT19.setTXHALFIE(thebits : TBits_1); inline;
  78105. begin
  78106. if thebits = 0 then
  78107. pTDefRegMap(@Self)^.clr := $02000000
  78108. else
  78109. pTDefRegMap(@Self)^.&set := $02000000;
  78110. end;
  78111. function TCAN1_C1FIFOINT19.getTXHALFIE : TBits_1; inline;
  78112. begin
  78113. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  78114. end;
  78115. procedure TCAN1_C1FIFOINT19.setTXNFULLIE; inline;
  78116. begin
  78117. pTDefRegMap(@Self)^.&set := $04000000;
  78118. end;
  78119. procedure TCAN1_C1FIFOINT19.clearTXNFULLIE; inline;
  78120. begin
  78121. pTDefRegMap(@Self)^.clr := $04000000;
  78122. end;
  78123. procedure TCAN1_C1FIFOINT19.setTXNFULLIE(thebits : TBits_1); inline;
  78124. begin
  78125. if thebits = 0 then
  78126. pTDefRegMap(@Self)^.clr := $04000000
  78127. else
  78128. pTDefRegMap(@Self)^.&set := $04000000;
  78129. end;
  78130. function TCAN1_C1FIFOINT19.getTXNFULLIE : TBits_1; inline;
  78131. begin
  78132. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  78133. end;
  78134. procedure TCAN1_C1FIFOINT19.setw(thebits : TBits_32); inline;
  78135. begin
  78136. pTDefRegMap(@Self)^.val := thebits;
  78137. end;
  78138. function TCAN1_C1FIFOINT19.getw : TBits_32; inline;
  78139. begin
  78140. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78141. end;
  78142. procedure TCAN1_C1FIFOCI19.setCFIFOCI(thebits : TBits_5); inline;
  78143. begin
  78144. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  78145. end;
  78146. function TCAN1_C1FIFOCI19.getCFIFOCI : TBits_5; inline;
  78147. begin
  78148. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  78149. end;
  78150. procedure TCAN1_C1FIFOCI19.setw(thebits : TBits_32); inline;
  78151. begin
  78152. pTDefRegMap(@Self)^.val := thebits;
  78153. end;
  78154. function TCAN1_C1FIFOCI19.getw : TBits_32; inline;
  78155. begin
  78156. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78157. end;
  78158. procedure TCAN1_C1FIFOCON20.setTXPRI(thebits : TBits_2); inline;
  78159. begin
  78160. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  78161. end;
  78162. function TCAN1_C1FIFOCON20.getTXPRI : TBits_2; inline;
  78163. begin
  78164. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  78165. end;
  78166. procedure TCAN1_C1FIFOCON20.setRTREN; inline;
  78167. begin
  78168. pTDefRegMap(@Self)^.&set := $00000004;
  78169. end;
  78170. procedure TCAN1_C1FIFOCON20.clearRTREN; inline;
  78171. begin
  78172. pTDefRegMap(@Self)^.clr := $00000004;
  78173. end;
  78174. procedure TCAN1_C1FIFOCON20.setRTREN(thebits : TBits_1); inline;
  78175. begin
  78176. if thebits = 0 then
  78177. pTDefRegMap(@Self)^.clr := $00000004
  78178. else
  78179. pTDefRegMap(@Self)^.&set := $00000004;
  78180. end;
  78181. function TCAN1_C1FIFOCON20.getRTREN : TBits_1; inline;
  78182. begin
  78183. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78184. end;
  78185. procedure TCAN1_C1FIFOCON20.setTXREQ; inline;
  78186. begin
  78187. pTDefRegMap(@Self)^.&set := $00000008;
  78188. end;
  78189. procedure TCAN1_C1FIFOCON20.clearTXREQ; inline;
  78190. begin
  78191. pTDefRegMap(@Self)^.clr := $00000008;
  78192. end;
  78193. procedure TCAN1_C1FIFOCON20.setTXREQ(thebits : TBits_1); inline;
  78194. begin
  78195. if thebits = 0 then
  78196. pTDefRegMap(@Self)^.clr := $00000008
  78197. else
  78198. pTDefRegMap(@Self)^.&set := $00000008;
  78199. end;
  78200. function TCAN1_C1FIFOCON20.getTXREQ : TBits_1; inline;
  78201. begin
  78202. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78203. end;
  78204. procedure TCAN1_C1FIFOCON20.setTXERR; inline;
  78205. begin
  78206. pTDefRegMap(@Self)^.&set := $00000010;
  78207. end;
  78208. procedure TCAN1_C1FIFOCON20.clearTXERR; inline;
  78209. begin
  78210. pTDefRegMap(@Self)^.clr := $00000010;
  78211. end;
  78212. procedure TCAN1_C1FIFOCON20.setTXERR(thebits : TBits_1); inline;
  78213. begin
  78214. if thebits = 0 then
  78215. pTDefRegMap(@Self)^.clr := $00000010
  78216. else
  78217. pTDefRegMap(@Self)^.&set := $00000010;
  78218. end;
  78219. function TCAN1_C1FIFOCON20.getTXERR : TBits_1; inline;
  78220. begin
  78221. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  78222. end;
  78223. procedure TCAN1_C1FIFOCON20.setTXLARB; inline;
  78224. begin
  78225. pTDefRegMap(@Self)^.&set := $00000020;
  78226. end;
  78227. procedure TCAN1_C1FIFOCON20.clearTXLARB; inline;
  78228. begin
  78229. pTDefRegMap(@Self)^.clr := $00000020;
  78230. end;
  78231. procedure TCAN1_C1FIFOCON20.setTXLARB(thebits : TBits_1); inline;
  78232. begin
  78233. if thebits = 0 then
  78234. pTDefRegMap(@Self)^.clr := $00000020
  78235. else
  78236. pTDefRegMap(@Self)^.&set := $00000020;
  78237. end;
  78238. function TCAN1_C1FIFOCON20.getTXLARB : TBits_1; inline;
  78239. begin
  78240. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  78241. end;
  78242. procedure TCAN1_C1FIFOCON20.setTXABAT; inline;
  78243. begin
  78244. pTDefRegMap(@Self)^.&set := $00000040;
  78245. end;
  78246. procedure TCAN1_C1FIFOCON20.clearTXABAT; inline;
  78247. begin
  78248. pTDefRegMap(@Self)^.clr := $00000040;
  78249. end;
  78250. procedure TCAN1_C1FIFOCON20.setTXABAT(thebits : TBits_1); inline;
  78251. begin
  78252. if thebits = 0 then
  78253. pTDefRegMap(@Self)^.clr := $00000040
  78254. else
  78255. pTDefRegMap(@Self)^.&set := $00000040;
  78256. end;
  78257. function TCAN1_C1FIFOCON20.getTXABAT : TBits_1; inline;
  78258. begin
  78259. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  78260. end;
  78261. procedure TCAN1_C1FIFOCON20.setTXEN; inline;
  78262. begin
  78263. pTDefRegMap(@Self)^.&set := $00000080;
  78264. end;
  78265. procedure TCAN1_C1FIFOCON20.clearTXEN; inline;
  78266. begin
  78267. pTDefRegMap(@Self)^.clr := $00000080;
  78268. end;
  78269. procedure TCAN1_C1FIFOCON20.setTXEN(thebits : TBits_1); inline;
  78270. begin
  78271. if thebits = 0 then
  78272. pTDefRegMap(@Self)^.clr := $00000080
  78273. else
  78274. pTDefRegMap(@Self)^.&set := $00000080;
  78275. end;
  78276. function TCAN1_C1FIFOCON20.getTXEN : TBits_1; inline;
  78277. begin
  78278. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78279. end;
  78280. procedure TCAN1_C1FIFOCON20.setDONLY; inline;
  78281. begin
  78282. pTDefRegMap(@Self)^.&set := $00001000;
  78283. end;
  78284. procedure TCAN1_C1FIFOCON20.clearDONLY; inline;
  78285. begin
  78286. pTDefRegMap(@Self)^.clr := $00001000;
  78287. end;
  78288. procedure TCAN1_C1FIFOCON20.setDONLY(thebits : TBits_1); inline;
  78289. begin
  78290. if thebits = 0 then
  78291. pTDefRegMap(@Self)^.clr := $00001000
  78292. else
  78293. pTDefRegMap(@Self)^.&set := $00001000;
  78294. end;
  78295. function TCAN1_C1FIFOCON20.getDONLY : TBits_1; inline;
  78296. begin
  78297. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  78298. end;
  78299. procedure TCAN1_C1FIFOCON20.setUINC; inline;
  78300. begin
  78301. pTDefRegMap(@Self)^.&set := $00002000;
  78302. end;
  78303. procedure TCAN1_C1FIFOCON20.clearUINC; inline;
  78304. begin
  78305. pTDefRegMap(@Self)^.clr := $00002000;
  78306. end;
  78307. procedure TCAN1_C1FIFOCON20.setUINC(thebits : TBits_1); inline;
  78308. begin
  78309. if thebits = 0 then
  78310. pTDefRegMap(@Self)^.clr := $00002000
  78311. else
  78312. pTDefRegMap(@Self)^.&set := $00002000;
  78313. end;
  78314. function TCAN1_C1FIFOCON20.getUINC : TBits_1; inline;
  78315. begin
  78316. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  78317. end;
  78318. procedure TCAN1_C1FIFOCON20.setFRESET; inline;
  78319. begin
  78320. pTDefRegMap(@Self)^.&set := $00004000;
  78321. end;
  78322. procedure TCAN1_C1FIFOCON20.clearFRESET; inline;
  78323. begin
  78324. pTDefRegMap(@Self)^.clr := $00004000;
  78325. end;
  78326. procedure TCAN1_C1FIFOCON20.setFRESET(thebits : TBits_1); inline;
  78327. begin
  78328. if thebits = 0 then
  78329. pTDefRegMap(@Self)^.clr := $00004000
  78330. else
  78331. pTDefRegMap(@Self)^.&set := $00004000;
  78332. end;
  78333. function TCAN1_C1FIFOCON20.getFRESET : TBits_1; inline;
  78334. begin
  78335. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  78336. end;
  78337. procedure TCAN1_C1FIFOCON20.setFSIZE(thebits : TBits_5); inline;
  78338. begin
  78339. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78340. end;
  78341. function TCAN1_C1FIFOCON20.getFSIZE : TBits_5; inline;
  78342. begin
  78343. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78344. end;
  78345. procedure TCAN1_C1FIFOCON20.setw(thebits : TBits_32); inline;
  78346. begin
  78347. pTDefRegMap(@Self)^.val := thebits;
  78348. end;
  78349. function TCAN1_C1FIFOCON20.getw : TBits_32; inline;
  78350. begin
  78351. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78352. end;
  78353. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIF; inline;
  78354. begin
  78355. pTDefRegMap(@Self)^.&set := $00000001;
  78356. end;
  78357. procedure TCAN1_C1FIFOINT20.clearRXNEMPTYIF; inline;
  78358. begin
  78359. pTDefRegMap(@Self)^.clr := $00000001;
  78360. end;
  78361. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIF(thebits : TBits_1); inline;
  78362. begin
  78363. if thebits = 0 then
  78364. pTDefRegMap(@Self)^.clr := $00000001
  78365. else
  78366. pTDefRegMap(@Self)^.&set := $00000001;
  78367. end;
  78368. function TCAN1_C1FIFOINT20.getRXNEMPTYIF : TBits_1; inline;
  78369. begin
  78370. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  78371. end;
  78372. procedure TCAN1_C1FIFOINT20.setRXHALFIF; inline;
  78373. begin
  78374. pTDefRegMap(@Self)^.&set := $00000002;
  78375. end;
  78376. procedure TCAN1_C1FIFOINT20.clearRXHALFIF; inline;
  78377. begin
  78378. pTDefRegMap(@Self)^.clr := $00000002;
  78379. end;
  78380. procedure TCAN1_C1FIFOINT20.setRXHALFIF(thebits : TBits_1); inline;
  78381. begin
  78382. if thebits = 0 then
  78383. pTDefRegMap(@Self)^.clr := $00000002
  78384. else
  78385. pTDefRegMap(@Self)^.&set := $00000002;
  78386. end;
  78387. function TCAN1_C1FIFOINT20.getRXHALFIF : TBits_1; inline;
  78388. begin
  78389. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  78390. end;
  78391. procedure TCAN1_C1FIFOINT20.setRXFULLIF; inline;
  78392. begin
  78393. pTDefRegMap(@Self)^.&set := $00000004;
  78394. end;
  78395. procedure TCAN1_C1FIFOINT20.clearRXFULLIF; inline;
  78396. begin
  78397. pTDefRegMap(@Self)^.clr := $00000004;
  78398. end;
  78399. procedure TCAN1_C1FIFOINT20.setRXFULLIF(thebits : TBits_1); inline;
  78400. begin
  78401. if thebits = 0 then
  78402. pTDefRegMap(@Self)^.clr := $00000004
  78403. else
  78404. pTDefRegMap(@Self)^.&set := $00000004;
  78405. end;
  78406. function TCAN1_C1FIFOINT20.getRXFULLIF : TBits_1; inline;
  78407. begin
  78408. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78409. end;
  78410. procedure TCAN1_C1FIFOINT20.setRXOVFLIF; inline;
  78411. begin
  78412. pTDefRegMap(@Self)^.&set := $00000008;
  78413. end;
  78414. procedure TCAN1_C1FIFOINT20.clearRXOVFLIF; inline;
  78415. begin
  78416. pTDefRegMap(@Self)^.clr := $00000008;
  78417. end;
  78418. procedure TCAN1_C1FIFOINT20.setRXOVFLIF(thebits : TBits_1); inline;
  78419. begin
  78420. if thebits = 0 then
  78421. pTDefRegMap(@Self)^.clr := $00000008
  78422. else
  78423. pTDefRegMap(@Self)^.&set := $00000008;
  78424. end;
  78425. function TCAN1_C1FIFOINT20.getRXOVFLIF : TBits_1; inline;
  78426. begin
  78427. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78428. end;
  78429. procedure TCAN1_C1FIFOINT20.setTXEMPTYIF; inline;
  78430. begin
  78431. pTDefRegMap(@Self)^.&set := $00000100;
  78432. end;
  78433. procedure TCAN1_C1FIFOINT20.clearTXEMPTYIF; inline;
  78434. begin
  78435. pTDefRegMap(@Self)^.clr := $00000100;
  78436. end;
  78437. procedure TCAN1_C1FIFOINT20.setTXEMPTYIF(thebits : TBits_1); inline;
  78438. begin
  78439. if thebits = 0 then
  78440. pTDefRegMap(@Self)^.clr := $00000100
  78441. else
  78442. pTDefRegMap(@Self)^.&set := $00000100;
  78443. end;
  78444. function TCAN1_C1FIFOINT20.getTXEMPTYIF : TBits_1; inline;
  78445. begin
  78446. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  78447. end;
  78448. procedure TCAN1_C1FIFOINT20.setTXHALFIF; inline;
  78449. begin
  78450. pTDefRegMap(@Self)^.&set := $00000200;
  78451. end;
  78452. procedure TCAN1_C1FIFOINT20.clearTXHALFIF; inline;
  78453. begin
  78454. pTDefRegMap(@Self)^.clr := $00000200;
  78455. end;
  78456. procedure TCAN1_C1FIFOINT20.setTXHALFIF(thebits : TBits_1); inline;
  78457. begin
  78458. if thebits = 0 then
  78459. pTDefRegMap(@Self)^.clr := $00000200
  78460. else
  78461. pTDefRegMap(@Self)^.&set := $00000200;
  78462. end;
  78463. function TCAN1_C1FIFOINT20.getTXHALFIF : TBits_1; inline;
  78464. begin
  78465. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  78466. end;
  78467. procedure TCAN1_C1FIFOINT20.setTXNFULLIF; inline;
  78468. begin
  78469. pTDefRegMap(@Self)^.&set := $00000400;
  78470. end;
  78471. procedure TCAN1_C1FIFOINT20.clearTXNFULLIF; inline;
  78472. begin
  78473. pTDefRegMap(@Self)^.clr := $00000400;
  78474. end;
  78475. procedure TCAN1_C1FIFOINT20.setTXNFULLIF(thebits : TBits_1); inline;
  78476. begin
  78477. if thebits = 0 then
  78478. pTDefRegMap(@Self)^.clr := $00000400
  78479. else
  78480. pTDefRegMap(@Self)^.&set := $00000400;
  78481. end;
  78482. function TCAN1_C1FIFOINT20.getTXNFULLIF : TBits_1; inline;
  78483. begin
  78484. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  78485. end;
  78486. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIE; inline;
  78487. begin
  78488. pTDefRegMap(@Self)^.&set := $00010000;
  78489. end;
  78490. procedure TCAN1_C1FIFOINT20.clearRXNEMPTYIE; inline;
  78491. begin
  78492. pTDefRegMap(@Self)^.clr := $00010000;
  78493. end;
  78494. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIE(thebits : TBits_1); inline;
  78495. begin
  78496. if thebits = 0 then
  78497. pTDefRegMap(@Self)^.clr := $00010000
  78498. else
  78499. pTDefRegMap(@Self)^.&set := $00010000;
  78500. end;
  78501. function TCAN1_C1FIFOINT20.getRXNEMPTYIE : TBits_1; inline;
  78502. begin
  78503. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  78504. end;
  78505. procedure TCAN1_C1FIFOINT20.setRXHALFIE; inline;
  78506. begin
  78507. pTDefRegMap(@Self)^.&set := $00020000;
  78508. end;
  78509. procedure TCAN1_C1FIFOINT20.clearRXHALFIE; inline;
  78510. begin
  78511. pTDefRegMap(@Self)^.clr := $00020000;
  78512. end;
  78513. procedure TCAN1_C1FIFOINT20.setRXHALFIE(thebits : TBits_1); inline;
  78514. begin
  78515. if thebits = 0 then
  78516. pTDefRegMap(@Self)^.clr := $00020000
  78517. else
  78518. pTDefRegMap(@Self)^.&set := $00020000;
  78519. end;
  78520. function TCAN1_C1FIFOINT20.getRXHALFIE : TBits_1; inline;
  78521. begin
  78522. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  78523. end;
  78524. procedure TCAN1_C1FIFOINT20.setRXFULLIE; inline;
  78525. begin
  78526. pTDefRegMap(@Self)^.&set := $00040000;
  78527. end;
  78528. procedure TCAN1_C1FIFOINT20.clearRXFULLIE; inline;
  78529. begin
  78530. pTDefRegMap(@Self)^.clr := $00040000;
  78531. end;
  78532. procedure TCAN1_C1FIFOINT20.setRXFULLIE(thebits : TBits_1); inline;
  78533. begin
  78534. if thebits = 0 then
  78535. pTDefRegMap(@Self)^.clr := $00040000
  78536. else
  78537. pTDefRegMap(@Self)^.&set := $00040000;
  78538. end;
  78539. function TCAN1_C1FIFOINT20.getRXFULLIE : TBits_1; inline;
  78540. begin
  78541. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  78542. end;
  78543. procedure TCAN1_C1FIFOINT20.setRXOVFLIE; inline;
  78544. begin
  78545. pTDefRegMap(@Self)^.&set := $00080000;
  78546. end;
  78547. procedure TCAN1_C1FIFOINT20.clearRXOVFLIE; inline;
  78548. begin
  78549. pTDefRegMap(@Self)^.clr := $00080000;
  78550. end;
  78551. procedure TCAN1_C1FIFOINT20.setRXOVFLIE(thebits : TBits_1); inline;
  78552. begin
  78553. if thebits = 0 then
  78554. pTDefRegMap(@Self)^.clr := $00080000
  78555. else
  78556. pTDefRegMap(@Self)^.&set := $00080000;
  78557. end;
  78558. function TCAN1_C1FIFOINT20.getRXOVFLIE : TBits_1; inline;
  78559. begin
  78560. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  78561. end;
  78562. procedure TCAN1_C1FIFOINT20.setTXEMPTYIE; inline;
  78563. begin
  78564. pTDefRegMap(@Self)^.&set := $01000000;
  78565. end;
  78566. procedure TCAN1_C1FIFOINT20.clearTXEMPTYIE; inline;
  78567. begin
  78568. pTDefRegMap(@Self)^.clr := $01000000;
  78569. end;
  78570. procedure TCAN1_C1FIFOINT20.setTXEMPTYIE(thebits : TBits_1); inline;
  78571. begin
  78572. if thebits = 0 then
  78573. pTDefRegMap(@Self)^.clr := $01000000
  78574. else
  78575. pTDefRegMap(@Self)^.&set := $01000000;
  78576. end;
  78577. function TCAN1_C1FIFOINT20.getTXEMPTYIE : TBits_1; inline;
  78578. begin
  78579. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  78580. end;
  78581. procedure TCAN1_C1FIFOINT20.setTXHALFIE; inline;
  78582. begin
  78583. pTDefRegMap(@Self)^.&set := $02000000;
  78584. end;
  78585. procedure TCAN1_C1FIFOINT20.clearTXHALFIE; inline;
  78586. begin
  78587. pTDefRegMap(@Self)^.clr := $02000000;
  78588. end;
  78589. procedure TCAN1_C1FIFOINT20.setTXHALFIE(thebits : TBits_1); inline;
  78590. begin
  78591. if thebits = 0 then
  78592. pTDefRegMap(@Self)^.clr := $02000000
  78593. else
  78594. pTDefRegMap(@Self)^.&set := $02000000;
  78595. end;
  78596. function TCAN1_C1FIFOINT20.getTXHALFIE : TBits_1; inline;
  78597. begin
  78598. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  78599. end;
  78600. procedure TCAN1_C1FIFOINT20.setTXNFULLIE; inline;
  78601. begin
  78602. pTDefRegMap(@Self)^.&set := $04000000;
  78603. end;
  78604. procedure TCAN1_C1FIFOINT20.clearTXNFULLIE; inline;
  78605. begin
  78606. pTDefRegMap(@Self)^.clr := $04000000;
  78607. end;
  78608. procedure TCAN1_C1FIFOINT20.setTXNFULLIE(thebits : TBits_1); inline;
  78609. begin
  78610. if thebits = 0 then
  78611. pTDefRegMap(@Self)^.clr := $04000000
  78612. else
  78613. pTDefRegMap(@Self)^.&set := $04000000;
  78614. end;
  78615. function TCAN1_C1FIFOINT20.getTXNFULLIE : TBits_1; inline;
  78616. begin
  78617. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  78618. end;
  78619. procedure TCAN1_C1FIFOINT20.setw(thebits : TBits_32); inline;
  78620. begin
  78621. pTDefRegMap(@Self)^.val := thebits;
  78622. end;
  78623. function TCAN1_C1FIFOINT20.getw : TBits_32; inline;
  78624. begin
  78625. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78626. end;
  78627. procedure TCAN1_C1FIFOCI20.setCFIFOCI(thebits : TBits_5); inline;
  78628. begin
  78629. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  78630. end;
  78631. function TCAN1_C1FIFOCI20.getCFIFOCI : TBits_5; inline;
  78632. begin
  78633. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  78634. end;
  78635. procedure TCAN1_C1FIFOCI20.setw(thebits : TBits_32); inline;
  78636. begin
  78637. pTDefRegMap(@Self)^.val := thebits;
  78638. end;
  78639. function TCAN1_C1FIFOCI20.getw : TBits_32; inline;
  78640. begin
  78641. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78642. end;
  78643. procedure TCAN1_C1FIFOCON21.setTXPRI(thebits : TBits_2); inline;
  78644. begin
  78645. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  78646. end;
  78647. function TCAN1_C1FIFOCON21.getTXPRI : TBits_2; inline;
  78648. begin
  78649. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  78650. end;
  78651. procedure TCAN1_C1FIFOCON21.setRTREN; inline;
  78652. begin
  78653. pTDefRegMap(@Self)^.&set := $00000004;
  78654. end;
  78655. procedure TCAN1_C1FIFOCON21.clearRTREN; inline;
  78656. begin
  78657. pTDefRegMap(@Self)^.clr := $00000004;
  78658. end;
  78659. procedure TCAN1_C1FIFOCON21.setRTREN(thebits : TBits_1); inline;
  78660. begin
  78661. if thebits = 0 then
  78662. pTDefRegMap(@Self)^.clr := $00000004
  78663. else
  78664. pTDefRegMap(@Self)^.&set := $00000004;
  78665. end;
  78666. function TCAN1_C1FIFOCON21.getRTREN : TBits_1; inline;
  78667. begin
  78668. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78669. end;
  78670. procedure TCAN1_C1FIFOCON21.setTXREQ; inline;
  78671. begin
  78672. pTDefRegMap(@Self)^.&set := $00000008;
  78673. end;
  78674. procedure TCAN1_C1FIFOCON21.clearTXREQ; inline;
  78675. begin
  78676. pTDefRegMap(@Self)^.clr := $00000008;
  78677. end;
  78678. procedure TCAN1_C1FIFOCON21.setTXREQ(thebits : TBits_1); inline;
  78679. begin
  78680. if thebits = 0 then
  78681. pTDefRegMap(@Self)^.clr := $00000008
  78682. else
  78683. pTDefRegMap(@Self)^.&set := $00000008;
  78684. end;
  78685. function TCAN1_C1FIFOCON21.getTXREQ : TBits_1; inline;
  78686. begin
  78687. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78688. end;
  78689. procedure TCAN1_C1FIFOCON21.setTXERR; inline;
  78690. begin
  78691. pTDefRegMap(@Self)^.&set := $00000010;
  78692. end;
  78693. procedure TCAN1_C1FIFOCON21.clearTXERR; inline;
  78694. begin
  78695. pTDefRegMap(@Self)^.clr := $00000010;
  78696. end;
  78697. procedure TCAN1_C1FIFOCON21.setTXERR(thebits : TBits_1); inline;
  78698. begin
  78699. if thebits = 0 then
  78700. pTDefRegMap(@Self)^.clr := $00000010
  78701. else
  78702. pTDefRegMap(@Self)^.&set := $00000010;
  78703. end;
  78704. function TCAN1_C1FIFOCON21.getTXERR : TBits_1; inline;
  78705. begin
  78706. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  78707. end;
  78708. procedure TCAN1_C1FIFOCON21.setTXLARB; inline;
  78709. begin
  78710. pTDefRegMap(@Self)^.&set := $00000020;
  78711. end;
  78712. procedure TCAN1_C1FIFOCON21.clearTXLARB; inline;
  78713. begin
  78714. pTDefRegMap(@Self)^.clr := $00000020;
  78715. end;
  78716. procedure TCAN1_C1FIFOCON21.setTXLARB(thebits : TBits_1); inline;
  78717. begin
  78718. if thebits = 0 then
  78719. pTDefRegMap(@Self)^.clr := $00000020
  78720. else
  78721. pTDefRegMap(@Self)^.&set := $00000020;
  78722. end;
  78723. function TCAN1_C1FIFOCON21.getTXLARB : TBits_1; inline;
  78724. begin
  78725. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  78726. end;
  78727. procedure TCAN1_C1FIFOCON21.setTXABAT; inline;
  78728. begin
  78729. pTDefRegMap(@Self)^.&set := $00000040;
  78730. end;
  78731. procedure TCAN1_C1FIFOCON21.clearTXABAT; inline;
  78732. begin
  78733. pTDefRegMap(@Self)^.clr := $00000040;
  78734. end;
  78735. procedure TCAN1_C1FIFOCON21.setTXABAT(thebits : TBits_1); inline;
  78736. begin
  78737. if thebits = 0 then
  78738. pTDefRegMap(@Self)^.clr := $00000040
  78739. else
  78740. pTDefRegMap(@Self)^.&set := $00000040;
  78741. end;
  78742. function TCAN1_C1FIFOCON21.getTXABAT : TBits_1; inline;
  78743. begin
  78744. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  78745. end;
  78746. procedure TCAN1_C1FIFOCON21.setTXEN; inline;
  78747. begin
  78748. pTDefRegMap(@Self)^.&set := $00000080;
  78749. end;
  78750. procedure TCAN1_C1FIFOCON21.clearTXEN; inline;
  78751. begin
  78752. pTDefRegMap(@Self)^.clr := $00000080;
  78753. end;
  78754. procedure TCAN1_C1FIFOCON21.setTXEN(thebits : TBits_1); inline;
  78755. begin
  78756. if thebits = 0 then
  78757. pTDefRegMap(@Self)^.clr := $00000080
  78758. else
  78759. pTDefRegMap(@Self)^.&set := $00000080;
  78760. end;
  78761. function TCAN1_C1FIFOCON21.getTXEN : TBits_1; inline;
  78762. begin
  78763. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78764. end;
  78765. procedure TCAN1_C1FIFOCON21.setDONLY; inline;
  78766. begin
  78767. pTDefRegMap(@Self)^.&set := $00001000;
  78768. end;
  78769. procedure TCAN1_C1FIFOCON21.clearDONLY; inline;
  78770. begin
  78771. pTDefRegMap(@Self)^.clr := $00001000;
  78772. end;
  78773. procedure TCAN1_C1FIFOCON21.setDONLY(thebits : TBits_1); inline;
  78774. begin
  78775. if thebits = 0 then
  78776. pTDefRegMap(@Self)^.clr := $00001000
  78777. else
  78778. pTDefRegMap(@Self)^.&set := $00001000;
  78779. end;
  78780. function TCAN1_C1FIFOCON21.getDONLY : TBits_1; inline;
  78781. begin
  78782. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  78783. end;
  78784. procedure TCAN1_C1FIFOCON21.setUINC; inline;
  78785. begin
  78786. pTDefRegMap(@Self)^.&set := $00002000;
  78787. end;
  78788. procedure TCAN1_C1FIFOCON21.clearUINC; inline;
  78789. begin
  78790. pTDefRegMap(@Self)^.clr := $00002000;
  78791. end;
  78792. procedure TCAN1_C1FIFOCON21.setUINC(thebits : TBits_1); inline;
  78793. begin
  78794. if thebits = 0 then
  78795. pTDefRegMap(@Self)^.clr := $00002000
  78796. else
  78797. pTDefRegMap(@Self)^.&set := $00002000;
  78798. end;
  78799. function TCAN1_C1FIFOCON21.getUINC : TBits_1; inline;
  78800. begin
  78801. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  78802. end;
  78803. procedure TCAN1_C1FIFOCON21.setFRESET; inline;
  78804. begin
  78805. pTDefRegMap(@Self)^.&set := $00004000;
  78806. end;
  78807. procedure TCAN1_C1FIFOCON21.clearFRESET; inline;
  78808. begin
  78809. pTDefRegMap(@Self)^.clr := $00004000;
  78810. end;
  78811. procedure TCAN1_C1FIFOCON21.setFRESET(thebits : TBits_1); inline;
  78812. begin
  78813. if thebits = 0 then
  78814. pTDefRegMap(@Self)^.clr := $00004000
  78815. else
  78816. pTDefRegMap(@Self)^.&set := $00004000;
  78817. end;
  78818. function TCAN1_C1FIFOCON21.getFRESET : TBits_1; inline;
  78819. begin
  78820. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  78821. end;
  78822. procedure TCAN1_C1FIFOCON21.setFSIZE(thebits : TBits_5); inline;
  78823. begin
  78824. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78825. end;
  78826. function TCAN1_C1FIFOCON21.getFSIZE : TBits_5; inline;
  78827. begin
  78828. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78829. end;
  78830. procedure TCAN1_C1FIFOCON21.setw(thebits : TBits_32); inline;
  78831. begin
  78832. pTDefRegMap(@Self)^.val := thebits;
  78833. end;
  78834. function TCAN1_C1FIFOCON21.getw : TBits_32; inline;
  78835. begin
  78836. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78837. end;
  78838. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIF; inline;
  78839. begin
  78840. pTDefRegMap(@Self)^.&set := $00000001;
  78841. end;
  78842. procedure TCAN1_C1FIFOINT21.clearRXNEMPTYIF; inline;
  78843. begin
  78844. pTDefRegMap(@Self)^.clr := $00000001;
  78845. end;
  78846. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIF(thebits : TBits_1); inline;
  78847. begin
  78848. if thebits = 0 then
  78849. pTDefRegMap(@Self)^.clr := $00000001
  78850. else
  78851. pTDefRegMap(@Self)^.&set := $00000001;
  78852. end;
  78853. function TCAN1_C1FIFOINT21.getRXNEMPTYIF : TBits_1; inline;
  78854. begin
  78855. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  78856. end;
  78857. procedure TCAN1_C1FIFOINT21.setRXHALFIF; inline;
  78858. begin
  78859. pTDefRegMap(@Self)^.&set := $00000002;
  78860. end;
  78861. procedure TCAN1_C1FIFOINT21.clearRXHALFIF; inline;
  78862. begin
  78863. pTDefRegMap(@Self)^.clr := $00000002;
  78864. end;
  78865. procedure TCAN1_C1FIFOINT21.setRXHALFIF(thebits : TBits_1); inline;
  78866. begin
  78867. if thebits = 0 then
  78868. pTDefRegMap(@Self)^.clr := $00000002
  78869. else
  78870. pTDefRegMap(@Self)^.&set := $00000002;
  78871. end;
  78872. function TCAN1_C1FIFOINT21.getRXHALFIF : TBits_1; inline;
  78873. begin
  78874. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  78875. end;
  78876. procedure TCAN1_C1FIFOINT21.setRXFULLIF; inline;
  78877. begin
  78878. pTDefRegMap(@Self)^.&set := $00000004;
  78879. end;
  78880. procedure TCAN1_C1FIFOINT21.clearRXFULLIF; inline;
  78881. begin
  78882. pTDefRegMap(@Self)^.clr := $00000004;
  78883. end;
  78884. procedure TCAN1_C1FIFOINT21.setRXFULLIF(thebits : TBits_1); inline;
  78885. begin
  78886. if thebits = 0 then
  78887. pTDefRegMap(@Self)^.clr := $00000004
  78888. else
  78889. pTDefRegMap(@Self)^.&set := $00000004;
  78890. end;
  78891. function TCAN1_C1FIFOINT21.getRXFULLIF : TBits_1; inline;
  78892. begin
  78893. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78894. end;
  78895. procedure TCAN1_C1FIFOINT21.setRXOVFLIF; inline;
  78896. begin
  78897. pTDefRegMap(@Self)^.&set := $00000008;
  78898. end;
  78899. procedure TCAN1_C1FIFOINT21.clearRXOVFLIF; inline;
  78900. begin
  78901. pTDefRegMap(@Self)^.clr := $00000008;
  78902. end;
  78903. procedure TCAN1_C1FIFOINT21.setRXOVFLIF(thebits : TBits_1); inline;
  78904. begin
  78905. if thebits = 0 then
  78906. pTDefRegMap(@Self)^.clr := $00000008
  78907. else
  78908. pTDefRegMap(@Self)^.&set := $00000008;
  78909. end;
  78910. function TCAN1_C1FIFOINT21.getRXOVFLIF : TBits_1; inline;
  78911. begin
  78912. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78913. end;
  78914. procedure TCAN1_C1FIFOINT21.setTXEMPTYIF; inline;
  78915. begin
  78916. pTDefRegMap(@Self)^.&set := $00000100;
  78917. end;
  78918. procedure TCAN1_C1FIFOINT21.clearTXEMPTYIF; inline;
  78919. begin
  78920. pTDefRegMap(@Self)^.clr := $00000100;
  78921. end;
  78922. procedure TCAN1_C1FIFOINT21.setTXEMPTYIF(thebits : TBits_1); inline;
  78923. begin
  78924. if thebits = 0 then
  78925. pTDefRegMap(@Self)^.clr := $00000100
  78926. else
  78927. pTDefRegMap(@Self)^.&set := $00000100;
  78928. end;
  78929. function TCAN1_C1FIFOINT21.getTXEMPTYIF : TBits_1; inline;
  78930. begin
  78931. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  78932. end;
  78933. procedure TCAN1_C1FIFOINT21.setTXHALFIF; inline;
  78934. begin
  78935. pTDefRegMap(@Self)^.&set := $00000200;
  78936. end;
  78937. procedure TCAN1_C1FIFOINT21.clearTXHALFIF; inline;
  78938. begin
  78939. pTDefRegMap(@Self)^.clr := $00000200;
  78940. end;
  78941. procedure TCAN1_C1FIFOINT21.setTXHALFIF(thebits : TBits_1); inline;
  78942. begin
  78943. if thebits = 0 then
  78944. pTDefRegMap(@Self)^.clr := $00000200
  78945. else
  78946. pTDefRegMap(@Self)^.&set := $00000200;
  78947. end;
  78948. function TCAN1_C1FIFOINT21.getTXHALFIF : TBits_1; inline;
  78949. begin
  78950. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  78951. end;
  78952. procedure TCAN1_C1FIFOINT21.setTXNFULLIF; inline;
  78953. begin
  78954. pTDefRegMap(@Self)^.&set := $00000400;
  78955. end;
  78956. procedure TCAN1_C1FIFOINT21.clearTXNFULLIF; inline;
  78957. begin
  78958. pTDefRegMap(@Self)^.clr := $00000400;
  78959. end;
  78960. procedure TCAN1_C1FIFOINT21.setTXNFULLIF(thebits : TBits_1); inline;
  78961. begin
  78962. if thebits = 0 then
  78963. pTDefRegMap(@Self)^.clr := $00000400
  78964. else
  78965. pTDefRegMap(@Self)^.&set := $00000400;
  78966. end;
  78967. function TCAN1_C1FIFOINT21.getTXNFULLIF : TBits_1; inline;
  78968. begin
  78969. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  78970. end;
  78971. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIE; inline;
  78972. begin
  78973. pTDefRegMap(@Self)^.&set := $00010000;
  78974. end;
  78975. procedure TCAN1_C1FIFOINT21.clearRXNEMPTYIE; inline;
  78976. begin
  78977. pTDefRegMap(@Self)^.clr := $00010000;
  78978. end;
  78979. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIE(thebits : TBits_1); inline;
  78980. begin
  78981. if thebits = 0 then
  78982. pTDefRegMap(@Self)^.clr := $00010000
  78983. else
  78984. pTDefRegMap(@Self)^.&set := $00010000;
  78985. end;
  78986. function TCAN1_C1FIFOINT21.getRXNEMPTYIE : TBits_1; inline;
  78987. begin
  78988. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  78989. end;
  78990. procedure TCAN1_C1FIFOINT21.setRXHALFIE; inline;
  78991. begin
  78992. pTDefRegMap(@Self)^.&set := $00020000;
  78993. end;
  78994. procedure TCAN1_C1FIFOINT21.clearRXHALFIE; inline;
  78995. begin
  78996. pTDefRegMap(@Self)^.clr := $00020000;
  78997. end;
  78998. procedure TCAN1_C1FIFOINT21.setRXHALFIE(thebits : TBits_1); inline;
  78999. begin
  79000. if thebits = 0 then
  79001. pTDefRegMap(@Self)^.clr := $00020000
  79002. else
  79003. pTDefRegMap(@Self)^.&set := $00020000;
  79004. end;
  79005. function TCAN1_C1FIFOINT21.getRXHALFIE : TBits_1; inline;
  79006. begin
  79007. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  79008. end;
  79009. procedure TCAN1_C1FIFOINT21.setRXFULLIE; inline;
  79010. begin
  79011. pTDefRegMap(@Self)^.&set := $00040000;
  79012. end;
  79013. procedure TCAN1_C1FIFOINT21.clearRXFULLIE; inline;
  79014. begin
  79015. pTDefRegMap(@Self)^.clr := $00040000;
  79016. end;
  79017. procedure TCAN1_C1FIFOINT21.setRXFULLIE(thebits : TBits_1); inline;
  79018. begin
  79019. if thebits = 0 then
  79020. pTDefRegMap(@Self)^.clr := $00040000
  79021. else
  79022. pTDefRegMap(@Self)^.&set := $00040000;
  79023. end;
  79024. function TCAN1_C1FIFOINT21.getRXFULLIE : TBits_1; inline;
  79025. begin
  79026. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  79027. end;
  79028. procedure TCAN1_C1FIFOINT21.setRXOVFLIE; inline;
  79029. begin
  79030. pTDefRegMap(@Self)^.&set := $00080000;
  79031. end;
  79032. procedure TCAN1_C1FIFOINT21.clearRXOVFLIE; inline;
  79033. begin
  79034. pTDefRegMap(@Self)^.clr := $00080000;
  79035. end;
  79036. procedure TCAN1_C1FIFOINT21.setRXOVFLIE(thebits : TBits_1); inline;
  79037. begin
  79038. if thebits = 0 then
  79039. pTDefRegMap(@Self)^.clr := $00080000
  79040. else
  79041. pTDefRegMap(@Self)^.&set := $00080000;
  79042. end;
  79043. function TCAN1_C1FIFOINT21.getRXOVFLIE : TBits_1; inline;
  79044. begin
  79045. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79046. end;
  79047. procedure TCAN1_C1FIFOINT21.setTXEMPTYIE; inline;
  79048. begin
  79049. pTDefRegMap(@Self)^.&set := $01000000;
  79050. end;
  79051. procedure TCAN1_C1FIFOINT21.clearTXEMPTYIE; inline;
  79052. begin
  79053. pTDefRegMap(@Self)^.clr := $01000000;
  79054. end;
  79055. procedure TCAN1_C1FIFOINT21.setTXEMPTYIE(thebits : TBits_1); inline;
  79056. begin
  79057. if thebits = 0 then
  79058. pTDefRegMap(@Self)^.clr := $01000000
  79059. else
  79060. pTDefRegMap(@Self)^.&set := $01000000;
  79061. end;
  79062. function TCAN1_C1FIFOINT21.getTXEMPTYIE : TBits_1; inline;
  79063. begin
  79064. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  79065. end;
  79066. procedure TCAN1_C1FIFOINT21.setTXHALFIE; inline;
  79067. begin
  79068. pTDefRegMap(@Self)^.&set := $02000000;
  79069. end;
  79070. procedure TCAN1_C1FIFOINT21.clearTXHALFIE; inline;
  79071. begin
  79072. pTDefRegMap(@Self)^.clr := $02000000;
  79073. end;
  79074. procedure TCAN1_C1FIFOINT21.setTXHALFIE(thebits : TBits_1); inline;
  79075. begin
  79076. if thebits = 0 then
  79077. pTDefRegMap(@Self)^.clr := $02000000
  79078. else
  79079. pTDefRegMap(@Self)^.&set := $02000000;
  79080. end;
  79081. function TCAN1_C1FIFOINT21.getTXHALFIE : TBits_1; inline;
  79082. begin
  79083. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  79084. end;
  79085. procedure TCAN1_C1FIFOINT21.setTXNFULLIE; inline;
  79086. begin
  79087. pTDefRegMap(@Self)^.&set := $04000000;
  79088. end;
  79089. procedure TCAN1_C1FIFOINT21.clearTXNFULLIE; inline;
  79090. begin
  79091. pTDefRegMap(@Self)^.clr := $04000000;
  79092. end;
  79093. procedure TCAN1_C1FIFOINT21.setTXNFULLIE(thebits : TBits_1); inline;
  79094. begin
  79095. if thebits = 0 then
  79096. pTDefRegMap(@Self)^.clr := $04000000
  79097. else
  79098. pTDefRegMap(@Self)^.&set := $04000000;
  79099. end;
  79100. function TCAN1_C1FIFOINT21.getTXNFULLIE : TBits_1; inline;
  79101. begin
  79102. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  79103. end;
  79104. procedure TCAN1_C1FIFOINT21.setw(thebits : TBits_32); inline;
  79105. begin
  79106. pTDefRegMap(@Self)^.val := thebits;
  79107. end;
  79108. function TCAN1_C1FIFOINT21.getw : TBits_32; inline;
  79109. begin
  79110. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79111. end;
  79112. procedure TCAN1_C1FIFOCI21.setCFIFOCI(thebits : TBits_5); inline;
  79113. begin
  79114. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  79115. end;
  79116. function TCAN1_C1FIFOCI21.getCFIFOCI : TBits_5; inline;
  79117. begin
  79118. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  79119. end;
  79120. procedure TCAN1_C1FIFOCI21.setw(thebits : TBits_32); inline;
  79121. begin
  79122. pTDefRegMap(@Self)^.val := thebits;
  79123. end;
  79124. function TCAN1_C1FIFOCI21.getw : TBits_32; inline;
  79125. begin
  79126. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79127. end;
  79128. procedure TCAN1_C1FIFOCON22.setTXPRI(thebits : TBits_2); inline;
  79129. begin
  79130. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  79131. end;
  79132. function TCAN1_C1FIFOCON22.getTXPRI : TBits_2; inline;
  79133. begin
  79134. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  79135. end;
  79136. procedure TCAN1_C1FIFOCON22.setRTREN; inline;
  79137. begin
  79138. pTDefRegMap(@Self)^.&set := $00000004;
  79139. end;
  79140. procedure TCAN1_C1FIFOCON22.clearRTREN; inline;
  79141. begin
  79142. pTDefRegMap(@Self)^.clr := $00000004;
  79143. end;
  79144. procedure TCAN1_C1FIFOCON22.setRTREN(thebits : TBits_1); inline;
  79145. begin
  79146. if thebits = 0 then
  79147. pTDefRegMap(@Self)^.clr := $00000004
  79148. else
  79149. pTDefRegMap(@Self)^.&set := $00000004;
  79150. end;
  79151. function TCAN1_C1FIFOCON22.getRTREN : TBits_1; inline;
  79152. begin
  79153. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79154. end;
  79155. procedure TCAN1_C1FIFOCON22.setTXREQ; inline;
  79156. begin
  79157. pTDefRegMap(@Self)^.&set := $00000008;
  79158. end;
  79159. procedure TCAN1_C1FIFOCON22.clearTXREQ; inline;
  79160. begin
  79161. pTDefRegMap(@Self)^.clr := $00000008;
  79162. end;
  79163. procedure TCAN1_C1FIFOCON22.setTXREQ(thebits : TBits_1); inline;
  79164. begin
  79165. if thebits = 0 then
  79166. pTDefRegMap(@Self)^.clr := $00000008
  79167. else
  79168. pTDefRegMap(@Self)^.&set := $00000008;
  79169. end;
  79170. function TCAN1_C1FIFOCON22.getTXREQ : TBits_1; inline;
  79171. begin
  79172. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79173. end;
  79174. procedure TCAN1_C1FIFOCON22.setTXERR; inline;
  79175. begin
  79176. pTDefRegMap(@Self)^.&set := $00000010;
  79177. end;
  79178. procedure TCAN1_C1FIFOCON22.clearTXERR; inline;
  79179. begin
  79180. pTDefRegMap(@Self)^.clr := $00000010;
  79181. end;
  79182. procedure TCAN1_C1FIFOCON22.setTXERR(thebits : TBits_1); inline;
  79183. begin
  79184. if thebits = 0 then
  79185. pTDefRegMap(@Self)^.clr := $00000010
  79186. else
  79187. pTDefRegMap(@Self)^.&set := $00000010;
  79188. end;
  79189. function TCAN1_C1FIFOCON22.getTXERR : TBits_1; inline;
  79190. begin
  79191. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  79192. end;
  79193. procedure TCAN1_C1FIFOCON22.setTXLARB; inline;
  79194. begin
  79195. pTDefRegMap(@Self)^.&set := $00000020;
  79196. end;
  79197. procedure TCAN1_C1FIFOCON22.clearTXLARB; inline;
  79198. begin
  79199. pTDefRegMap(@Self)^.clr := $00000020;
  79200. end;
  79201. procedure TCAN1_C1FIFOCON22.setTXLARB(thebits : TBits_1); inline;
  79202. begin
  79203. if thebits = 0 then
  79204. pTDefRegMap(@Self)^.clr := $00000020
  79205. else
  79206. pTDefRegMap(@Self)^.&set := $00000020;
  79207. end;
  79208. function TCAN1_C1FIFOCON22.getTXLARB : TBits_1; inline;
  79209. begin
  79210. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  79211. end;
  79212. procedure TCAN1_C1FIFOCON22.setTXABAT; inline;
  79213. begin
  79214. pTDefRegMap(@Self)^.&set := $00000040;
  79215. end;
  79216. procedure TCAN1_C1FIFOCON22.clearTXABAT; inline;
  79217. begin
  79218. pTDefRegMap(@Self)^.clr := $00000040;
  79219. end;
  79220. procedure TCAN1_C1FIFOCON22.setTXABAT(thebits : TBits_1); inline;
  79221. begin
  79222. if thebits = 0 then
  79223. pTDefRegMap(@Self)^.clr := $00000040
  79224. else
  79225. pTDefRegMap(@Self)^.&set := $00000040;
  79226. end;
  79227. function TCAN1_C1FIFOCON22.getTXABAT : TBits_1; inline;
  79228. begin
  79229. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  79230. end;
  79231. procedure TCAN1_C1FIFOCON22.setTXEN; inline;
  79232. begin
  79233. pTDefRegMap(@Self)^.&set := $00000080;
  79234. end;
  79235. procedure TCAN1_C1FIFOCON22.clearTXEN; inline;
  79236. begin
  79237. pTDefRegMap(@Self)^.clr := $00000080;
  79238. end;
  79239. procedure TCAN1_C1FIFOCON22.setTXEN(thebits : TBits_1); inline;
  79240. begin
  79241. if thebits = 0 then
  79242. pTDefRegMap(@Self)^.clr := $00000080
  79243. else
  79244. pTDefRegMap(@Self)^.&set := $00000080;
  79245. end;
  79246. function TCAN1_C1FIFOCON22.getTXEN : TBits_1; inline;
  79247. begin
  79248. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  79249. end;
  79250. procedure TCAN1_C1FIFOCON22.setDONLY; inline;
  79251. begin
  79252. pTDefRegMap(@Self)^.&set := $00001000;
  79253. end;
  79254. procedure TCAN1_C1FIFOCON22.clearDONLY; inline;
  79255. begin
  79256. pTDefRegMap(@Self)^.clr := $00001000;
  79257. end;
  79258. procedure TCAN1_C1FIFOCON22.setDONLY(thebits : TBits_1); inline;
  79259. begin
  79260. if thebits = 0 then
  79261. pTDefRegMap(@Self)^.clr := $00001000
  79262. else
  79263. pTDefRegMap(@Self)^.&set := $00001000;
  79264. end;
  79265. function TCAN1_C1FIFOCON22.getDONLY : TBits_1; inline;
  79266. begin
  79267. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  79268. end;
  79269. procedure TCAN1_C1FIFOCON22.setUINC; inline;
  79270. begin
  79271. pTDefRegMap(@Self)^.&set := $00002000;
  79272. end;
  79273. procedure TCAN1_C1FIFOCON22.clearUINC; inline;
  79274. begin
  79275. pTDefRegMap(@Self)^.clr := $00002000;
  79276. end;
  79277. procedure TCAN1_C1FIFOCON22.setUINC(thebits : TBits_1); inline;
  79278. begin
  79279. if thebits = 0 then
  79280. pTDefRegMap(@Self)^.clr := $00002000
  79281. else
  79282. pTDefRegMap(@Self)^.&set := $00002000;
  79283. end;
  79284. function TCAN1_C1FIFOCON22.getUINC : TBits_1; inline;
  79285. begin
  79286. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  79287. end;
  79288. procedure TCAN1_C1FIFOCON22.setFRESET; inline;
  79289. begin
  79290. pTDefRegMap(@Self)^.&set := $00004000;
  79291. end;
  79292. procedure TCAN1_C1FIFOCON22.clearFRESET; inline;
  79293. begin
  79294. pTDefRegMap(@Self)^.clr := $00004000;
  79295. end;
  79296. procedure TCAN1_C1FIFOCON22.setFRESET(thebits : TBits_1); inline;
  79297. begin
  79298. if thebits = 0 then
  79299. pTDefRegMap(@Self)^.clr := $00004000
  79300. else
  79301. pTDefRegMap(@Self)^.&set := $00004000;
  79302. end;
  79303. function TCAN1_C1FIFOCON22.getFRESET : TBits_1; inline;
  79304. begin
  79305. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  79306. end;
  79307. procedure TCAN1_C1FIFOCON22.setFSIZE(thebits : TBits_5); inline;
  79308. begin
  79309. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  79310. end;
  79311. function TCAN1_C1FIFOCON22.getFSIZE : TBits_5; inline;
  79312. begin
  79313. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  79314. end;
  79315. procedure TCAN1_C1FIFOCON22.setw(thebits : TBits_32); inline;
  79316. begin
  79317. pTDefRegMap(@Self)^.val := thebits;
  79318. end;
  79319. function TCAN1_C1FIFOCON22.getw : TBits_32; inline;
  79320. begin
  79321. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79322. end;
  79323. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIF; inline;
  79324. begin
  79325. pTDefRegMap(@Self)^.&set := $00000001;
  79326. end;
  79327. procedure TCAN1_C1FIFOINT22.clearRXNEMPTYIF; inline;
  79328. begin
  79329. pTDefRegMap(@Self)^.clr := $00000001;
  79330. end;
  79331. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIF(thebits : TBits_1); inline;
  79332. begin
  79333. if thebits = 0 then
  79334. pTDefRegMap(@Self)^.clr := $00000001
  79335. else
  79336. pTDefRegMap(@Self)^.&set := $00000001;
  79337. end;
  79338. function TCAN1_C1FIFOINT22.getRXNEMPTYIF : TBits_1; inline;
  79339. begin
  79340. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  79341. end;
  79342. procedure TCAN1_C1FIFOINT22.setRXHALFIF; inline;
  79343. begin
  79344. pTDefRegMap(@Self)^.&set := $00000002;
  79345. end;
  79346. procedure TCAN1_C1FIFOINT22.clearRXHALFIF; inline;
  79347. begin
  79348. pTDefRegMap(@Self)^.clr := $00000002;
  79349. end;
  79350. procedure TCAN1_C1FIFOINT22.setRXHALFIF(thebits : TBits_1); inline;
  79351. begin
  79352. if thebits = 0 then
  79353. pTDefRegMap(@Self)^.clr := $00000002
  79354. else
  79355. pTDefRegMap(@Self)^.&set := $00000002;
  79356. end;
  79357. function TCAN1_C1FIFOINT22.getRXHALFIF : TBits_1; inline;
  79358. begin
  79359. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  79360. end;
  79361. procedure TCAN1_C1FIFOINT22.setRXFULLIF; inline;
  79362. begin
  79363. pTDefRegMap(@Self)^.&set := $00000004;
  79364. end;
  79365. procedure TCAN1_C1FIFOINT22.clearRXFULLIF; inline;
  79366. begin
  79367. pTDefRegMap(@Self)^.clr := $00000004;
  79368. end;
  79369. procedure TCAN1_C1FIFOINT22.setRXFULLIF(thebits : TBits_1); inline;
  79370. begin
  79371. if thebits = 0 then
  79372. pTDefRegMap(@Self)^.clr := $00000004
  79373. else
  79374. pTDefRegMap(@Self)^.&set := $00000004;
  79375. end;
  79376. function TCAN1_C1FIFOINT22.getRXFULLIF : TBits_1; inline;
  79377. begin
  79378. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79379. end;
  79380. procedure TCAN1_C1FIFOINT22.setRXOVFLIF; inline;
  79381. begin
  79382. pTDefRegMap(@Self)^.&set := $00000008;
  79383. end;
  79384. procedure TCAN1_C1FIFOINT22.clearRXOVFLIF; inline;
  79385. begin
  79386. pTDefRegMap(@Self)^.clr := $00000008;
  79387. end;
  79388. procedure TCAN1_C1FIFOINT22.setRXOVFLIF(thebits : TBits_1); inline;
  79389. begin
  79390. if thebits = 0 then
  79391. pTDefRegMap(@Self)^.clr := $00000008
  79392. else
  79393. pTDefRegMap(@Self)^.&set := $00000008;
  79394. end;
  79395. function TCAN1_C1FIFOINT22.getRXOVFLIF : TBits_1; inline;
  79396. begin
  79397. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79398. end;
  79399. procedure TCAN1_C1FIFOINT22.setTXEMPTYIF; inline;
  79400. begin
  79401. pTDefRegMap(@Self)^.&set := $00000100;
  79402. end;
  79403. procedure TCAN1_C1FIFOINT22.clearTXEMPTYIF; inline;
  79404. begin
  79405. pTDefRegMap(@Self)^.clr := $00000100;
  79406. end;
  79407. procedure TCAN1_C1FIFOINT22.setTXEMPTYIF(thebits : TBits_1); inline;
  79408. begin
  79409. if thebits = 0 then
  79410. pTDefRegMap(@Self)^.clr := $00000100
  79411. else
  79412. pTDefRegMap(@Self)^.&set := $00000100;
  79413. end;
  79414. function TCAN1_C1FIFOINT22.getTXEMPTYIF : TBits_1; inline;
  79415. begin
  79416. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  79417. end;
  79418. procedure TCAN1_C1FIFOINT22.setTXHALFIF; inline;
  79419. begin
  79420. pTDefRegMap(@Self)^.&set := $00000200;
  79421. end;
  79422. procedure TCAN1_C1FIFOINT22.clearTXHALFIF; inline;
  79423. begin
  79424. pTDefRegMap(@Self)^.clr := $00000200;
  79425. end;
  79426. procedure TCAN1_C1FIFOINT22.setTXHALFIF(thebits : TBits_1); inline;
  79427. begin
  79428. if thebits = 0 then
  79429. pTDefRegMap(@Self)^.clr := $00000200
  79430. else
  79431. pTDefRegMap(@Self)^.&set := $00000200;
  79432. end;
  79433. function TCAN1_C1FIFOINT22.getTXHALFIF : TBits_1; inline;
  79434. begin
  79435. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  79436. end;
  79437. procedure TCAN1_C1FIFOINT22.setTXNFULLIF; inline;
  79438. begin
  79439. pTDefRegMap(@Self)^.&set := $00000400;
  79440. end;
  79441. procedure TCAN1_C1FIFOINT22.clearTXNFULLIF; inline;
  79442. begin
  79443. pTDefRegMap(@Self)^.clr := $00000400;
  79444. end;
  79445. procedure TCAN1_C1FIFOINT22.setTXNFULLIF(thebits : TBits_1); inline;
  79446. begin
  79447. if thebits = 0 then
  79448. pTDefRegMap(@Self)^.clr := $00000400
  79449. else
  79450. pTDefRegMap(@Self)^.&set := $00000400;
  79451. end;
  79452. function TCAN1_C1FIFOINT22.getTXNFULLIF : TBits_1; inline;
  79453. begin
  79454. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  79455. end;
  79456. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIE; inline;
  79457. begin
  79458. pTDefRegMap(@Self)^.&set := $00010000;
  79459. end;
  79460. procedure TCAN1_C1FIFOINT22.clearRXNEMPTYIE; inline;
  79461. begin
  79462. pTDefRegMap(@Self)^.clr := $00010000;
  79463. end;
  79464. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIE(thebits : TBits_1); inline;
  79465. begin
  79466. if thebits = 0 then
  79467. pTDefRegMap(@Self)^.clr := $00010000
  79468. else
  79469. pTDefRegMap(@Self)^.&set := $00010000;
  79470. end;
  79471. function TCAN1_C1FIFOINT22.getRXNEMPTYIE : TBits_1; inline;
  79472. begin
  79473. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  79474. end;
  79475. procedure TCAN1_C1FIFOINT22.setRXHALFIE; inline;
  79476. begin
  79477. pTDefRegMap(@Self)^.&set := $00020000;
  79478. end;
  79479. procedure TCAN1_C1FIFOINT22.clearRXHALFIE; inline;
  79480. begin
  79481. pTDefRegMap(@Self)^.clr := $00020000;
  79482. end;
  79483. procedure TCAN1_C1FIFOINT22.setRXHALFIE(thebits : TBits_1); inline;
  79484. begin
  79485. if thebits = 0 then
  79486. pTDefRegMap(@Self)^.clr := $00020000
  79487. else
  79488. pTDefRegMap(@Self)^.&set := $00020000;
  79489. end;
  79490. function TCAN1_C1FIFOINT22.getRXHALFIE : TBits_1; inline;
  79491. begin
  79492. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  79493. end;
  79494. procedure TCAN1_C1FIFOINT22.setRXFULLIE; inline;
  79495. begin
  79496. pTDefRegMap(@Self)^.&set := $00040000;
  79497. end;
  79498. procedure TCAN1_C1FIFOINT22.clearRXFULLIE; inline;
  79499. begin
  79500. pTDefRegMap(@Self)^.clr := $00040000;
  79501. end;
  79502. procedure TCAN1_C1FIFOINT22.setRXFULLIE(thebits : TBits_1); inline;
  79503. begin
  79504. if thebits = 0 then
  79505. pTDefRegMap(@Self)^.clr := $00040000
  79506. else
  79507. pTDefRegMap(@Self)^.&set := $00040000;
  79508. end;
  79509. function TCAN1_C1FIFOINT22.getRXFULLIE : TBits_1; inline;
  79510. begin
  79511. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  79512. end;
  79513. procedure TCAN1_C1FIFOINT22.setRXOVFLIE; inline;
  79514. begin
  79515. pTDefRegMap(@Self)^.&set := $00080000;
  79516. end;
  79517. procedure TCAN1_C1FIFOINT22.clearRXOVFLIE; inline;
  79518. begin
  79519. pTDefRegMap(@Self)^.clr := $00080000;
  79520. end;
  79521. procedure TCAN1_C1FIFOINT22.setRXOVFLIE(thebits : TBits_1); inline;
  79522. begin
  79523. if thebits = 0 then
  79524. pTDefRegMap(@Self)^.clr := $00080000
  79525. else
  79526. pTDefRegMap(@Self)^.&set := $00080000;
  79527. end;
  79528. function TCAN1_C1FIFOINT22.getRXOVFLIE : TBits_1; inline;
  79529. begin
  79530. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79531. end;
  79532. procedure TCAN1_C1FIFOINT22.setTXEMPTYIE; inline;
  79533. begin
  79534. pTDefRegMap(@Self)^.&set := $01000000;
  79535. end;
  79536. procedure TCAN1_C1FIFOINT22.clearTXEMPTYIE; inline;
  79537. begin
  79538. pTDefRegMap(@Self)^.clr := $01000000;
  79539. end;
  79540. procedure TCAN1_C1FIFOINT22.setTXEMPTYIE(thebits : TBits_1); inline;
  79541. begin
  79542. if thebits = 0 then
  79543. pTDefRegMap(@Self)^.clr := $01000000
  79544. else
  79545. pTDefRegMap(@Self)^.&set := $01000000;
  79546. end;
  79547. function TCAN1_C1FIFOINT22.getTXEMPTYIE : TBits_1; inline;
  79548. begin
  79549. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  79550. end;
  79551. procedure TCAN1_C1FIFOINT22.setTXHALFIE; inline;
  79552. begin
  79553. pTDefRegMap(@Self)^.&set := $02000000;
  79554. end;
  79555. procedure TCAN1_C1FIFOINT22.clearTXHALFIE; inline;
  79556. begin
  79557. pTDefRegMap(@Self)^.clr := $02000000;
  79558. end;
  79559. procedure TCAN1_C1FIFOINT22.setTXHALFIE(thebits : TBits_1); inline;
  79560. begin
  79561. if thebits = 0 then
  79562. pTDefRegMap(@Self)^.clr := $02000000
  79563. else
  79564. pTDefRegMap(@Self)^.&set := $02000000;
  79565. end;
  79566. function TCAN1_C1FIFOINT22.getTXHALFIE : TBits_1; inline;
  79567. begin
  79568. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  79569. end;
  79570. procedure TCAN1_C1FIFOINT22.setTXNFULLIE; inline;
  79571. begin
  79572. pTDefRegMap(@Self)^.&set := $04000000;
  79573. end;
  79574. procedure TCAN1_C1FIFOINT22.clearTXNFULLIE; inline;
  79575. begin
  79576. pTDefRegMap(@Self)^.clr := $04000000;
  79577. end;
  79578. procedure TCAN1_C1FIFOINT22.setTXNFULLIE(thebits : TBits_1); inline;
  79579. begin
  79580. if thebits = 0 then
  79581. pTDefRegMap(@Self)^.clr := $04000000
  79582. else
  79583. pTDefRegMap(@Self)^.&set := $04000000;
  79584. end;
  79585. function TCAN1_C1FIFOINT22.getTXNFULLIE : TBits_1; inline;
  79586. begin
  79587. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  79588. end;
  79589. procedure TCAN1_C1FIFOINT22.setw(thebits : TBits_32); inline;
  79590. begin
  79591. pTDefRegMap(@Self)^.val := thebits;
  79592. end;
  79593. function TCAN1_C1FIFOINT22.getw : TBits_32; inline;
  79594. begin
  79595. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79596. end;
  79597. procedure TCAN1_C1FIFOCI22.setCFIFOCI(thebits : TBits_5); inline;
  79598. begin
  79599. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  79600. end;
  79601. function TCAN1_C1FIFOCI22.getCFIFOCI : TBits_5; inline;
  79602. begin
  79603. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  79604. end;
  79605. procedure TCAN1_C1FIFOCI22.setw(thebits : TBits_32); inline;
  79606. begin
  79607. pTDefRegMap(@Self)^.val := thebits;
  79608. end;
  79609. function TCAN1_C1FIFOCI22.getw : TBits_32; inline;
  79610. begin
  79611. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79612. end;
  79613. procedure TCAN1_C1FIFOCON23.setTXPRI(thebits : TBits_2); inline;
  79614. begin
  79615. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  79616. end;
  79617. function TCAN1_C1FIFOCON23.getTXPRI : TBits_2; inline;
  79618. begin
  79619. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  79620. end;
  79621. procedure TCAN1_C1FIFOCON23.setRTREN; inline;
  79622. begin
  79623. pTDefRegMap(@Self)^.&set := $00000004;
  79624. end;
  79625. procedure TCAN1_C1FIFOCON23.clearRTREN; inline;
  79626. begin
  79627. pTDefRegMap(@Self)^.clr := $00000004;
  79628. end;
  79629. procedure TCAN1_C1FIFOCON23.setRTREN(thebits : TBits_1); inline;
  79630. begin
  79631. if thebits = 0 then
  79632. pTDefRegMap(@Self)^.clr := $00000004
  79633. else
  79634. pTDefRegMap(@Self)^.&set := $00000004;
  79635. end;
  79636. function TCAN1_C1FIFOCON23.getRTREN : TBits_1; inline;
  79637. begin
  79638. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79639. end;
  79640. procedure TCAN1_C1FIFOCON23.setTXREQ; inline;
  79641. begin
  79642. pTDefRegMap(@Self)^.&set := $00000008;
  79643. end;
  79644. procedure TCAN1_C1FIFOCON23.clearTXREQ; inline;
  79645. begin
  79646. pTDefRegMap(@Self)^.clr := $00000008;
  79647. end;
  79648. procedure TCAN1_C1FIFOCON23.setTXREQ(thebits : TBits_1); inline;
  79649. begin
  79650. if thebits = 0 then
  79651. pTDefRegMap(@Self)^.clr := $00000008
  79652. else
  79653. pTDefRegMap(@Self)^.&set := $00000008;
  79654. end;
  79655. function TCAN1_C1FIFOCON23.getTXREQ : TBits_1; inline;
  79656. begin
  79657. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79658. end;
  79659. procedure TCAN1_C1FIFOCON23.setTXERR; inline;
  79660. begin
  79661. pTDefRegMap(@Self)^.&set := $00000010;
  79662. end;
  79663. procedure TCAN1_C1FIFOCON23.clearTXERR; inline;
  79664. begin
  79665. pTDefRegMap(@Self)^.clr := $00000010;
  79666. end;
  79667. procedure TCAN1_C1FIFOCON23.setTXERR(thebits : TBits_1); inline;
  79668. begin
  79669. if thebits = 0 then
  79670. pTDefRegMap(@Self)^.clr := $00000010
  79671. else
  79672. pTDefRegMap(@Self)^.&set := $00000010;
  79673. end;
  79674. function TCAN1_C1FIFOCON23.getTXERR : TBits_1; inline;
  79675. begin
  79676. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  79677. end;
  79678. procedure TCAN1_C1FIFOCON23.setTXLARB; inline;
  79679. begin
  79680. pTDefRegMap(@Self)^.&set := $00000020;
  79681. end;
  79682. procedure TCAN1_C1FIFOCON23.clearTXLARB; inline;
  79683. begin
  79684. pTDefRegMap(@Self)^.clr := $00000020;
  79685. end;
  79686. procedure TCAN1_C1FIFOCON23.setTXLARB(thebits : TBits_1); inline;
  79687. begin
  79688. if thebits = 0 then
  79689. pTDefRegMap(@Self)^.clr := $00000020
  79690. else
  79691. pTDefRegMap(@Self)^.&set := $00000020;
  79692. end;
  79693. function TCAN1_C1FIFOCON23.getTXLARB : TBits_1; inline;
  79694. begin
  79695. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  79696. end;
  79697. procedure TCAN1_C1FIFOCON23.setTXABAT; inline;
  79698. begin
  79699. pTDefRegMap(@Self)^.&set := $00000040;
  79700. end;
  79701. procedure TCAN1_C1FIFOCON23.clearTXABAT; inline;
  79702. begin
  79703. pTDefRegMap(@Self)^.clr := $00000040;
  79704. end;
  79705. procedure TCAN1_C1FIFOCON23.setTXABAT(thebits : TBits_1); inline;
  79706. begin
  79707. if thebits = 0 then
  79708. pTDefRegMap(@Self)^.clr := $00000040
  79709. else
  79710. pTDefRegMap(@Self)^.&set := $00000040;
  79711. end;
  79712. function TCAN1_C1FIFOCON23.getTXABAT : TBits_1; inline;
  79713. begin
  79714. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  79715. end;
  79716. procedure TCAN1_C1FIFOCON23.setTXEN; inline;
  79717. begin
  79718. pTDefRegMap(@Self)^.&set := $00000080;
  79719. end;
  79720. procedure TCAN1_C1FIFOCON23.clearTXEN; inline;
  79721. begin
  79722. pTDefRegMap(@Self)^.clr := $00000080;
  79723. end;
  79724. procedure TCAN1_C1FIFOCON23.setTXEN(thebits : TBits_1); inline;
  79725. begin
  79726. if thebits = 0 then
  79727. pTDefRegMap(@Self)^.clr := $00000080
  79728. else
  79729. pTDefRegMap(@Self)^.&set := $00000080;
  79730. end;
  79731. function TCAN1_C1FIFOCON23.getTXEN : TBits_1; inline;
  79732. begin
  79733. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  79734. end;
  79735. procedure TCAN1_C1FIFOCON23.setDONLY; inline;
  79736. begin
  79737. pTDefRegMap(@Self)^.&set := $00001000;
  79738. end;
  79739. procedure TCAN1_C1FIFOCON23.clearDONLY; inline;
  79740. begin
  79741. pTDefRegMap(@Self)^.clr := $00001000;
  79742. end;
  79743. procedure TCAN1_C1FIFOCON23.setDONLY(thebits : TBits_1); inline;
  79744. begin
  79745. if thebits = 0 then
  79746. pTDefRegMap(@Self)^.clr := $00001000
  79747. else
  79748. pTDefRegMap(@Self)^.&set := $00001000;
  79749. end;
  79750. function TCAN1_C1FIFOCON23.getDONLY : TBits_1; inline;
  79751. begin
  79752. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  79753. end;
  79754. procedure TCAN1_C1FIFOCON23.setUINC; inline;
  79755. begin
  79756. pTDefRegMap(@Self)^.&set := $00002000;
  79757. end;
  79758. procedure TCAN1_C1FIFOCON23.clearUINC; inline;
  79759. begin
  79760. pTDefRegMap(@Self)^.clr := $00002000;
  79761. end;
  79762. procedure TCAN1_C1FIFOCON23.setUINC(thebits : TBits_1); inline;
  79763. begin
  79764. if thebits = 0 then
  79765. pTDefRegMap(@Self)^.clr := $00002000
  79766. else
  79767. pTDefRegMap(@Self)^.&set := $00002000;
  79768. end;
  79769. function TCAN1_C1FIFOCON23.getUINC : TBits_1; inline;
  79770. begin
  79771. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  79772. end;
  79773. procedure TCAN1_C1FIFOCON23.setFRESET; inline;
  79774. begin
  79775. pTDefRegMap(@Self)^.&set := $00004000;
  79776. end;
  79777. procedure TCAN1_C1FIFOCON23.clearFRESET; inline;
  79778. begin
  79779. pTDefRegMap(@Self)^.clr := $00004000;
  79780. end;
  79781. procedure TCAN1_C1FIFOCON23.setFRESET(thebits : TBits_1); inline;
  79782. begin
  79783. if thebits = 0 then
  79784. pTDefRegMap(@Self)^.clr := $00004000
  79785. else
  79786. pTDefRegMap(@Self)^.&set := $00004000;
  79787. end;
  79788. function TCAN1_C1FIFOCON23.getFRESET : TBits_1; inline;
  79789. begin
  79790. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  79791. end;
  79792. procedure TCAN1_C1FIFOCON23.setFSIZE(thebits : TBits_5); inline;
  79793. begin
  79794. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  79795. end;
  79796. function TCAN1_C1FIFOCON23.getFSIZE : TBits_5; inline;
  79797. begin
  79798. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  79799. end;
  79800. procedure TCAN1_C1FIFOCON23.setw(thebits : TBits_32); inline;
  79801. begin
  79802. pTDefRegMap(@Self)^.val := thebits;
  79803. end;
  79804. function TCAN1_C1FIFOCON23.getw : TBits_32; inline;
  79805. begin
  79806. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79807. end;
  79808. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIF; inline;
  79809. begin
  79810. pTDefRegMap(@Self)^.&set := $00000001;
  79811. end;
  79812. procedure TCAN1_C1FIFOINT23.clearRXNEMPTYIF; inline;
  79813. begin
  79814. pTDefRegMap(@Self)^.clr := $00000001;
  79815. end;
  79816. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIF(thebits : TBits_1); inline;
  79817. begin
  79818. if thebits = 0 then
  79819. pTDefRegMap(@Self)^.clr := $00000001
  79820. else
  79821. pTDefRegMap(@Self)^.&set := $00000001;
  79822. end;
  79823. function TCAN1_C1FIFOINT23.getRXNEMPTYIF : TBits_1; inline;
  79824. begin
  79825. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  79826. end;
  79827. procedure TCAN1_C1FIFOINT23.setRXHALFIF; inline;
  79828. begin
  79829. pTDefRegMap(@Self)^.&set := $00000002;
  79830. end;
  79831. procedure TCAN1_C1FIFOINT23.clearRXHALFIF; inline;
  79832. begin
  79833. pTDefRegMap(@Self)^.clr := $00000002;
  79834. end;
  79835. procedure TCAN1_C1FIFOINT23.setRXHALFIF(thebits : TBits_1); inline;
  79836. begin
  79837. if thebits = 0 then
  79838. pTDefRegMap(@Self)^.clr := $00000002
  79839. else
  79840. pTDefRegMap(@Self)^.&set := $00000002;
  79841. end;
  79842. function TCAN1_C1FIFOINT23.getRXHALFIF : TBits_1; inline;
  79843. begin
  79844. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  79845. end;
  79846. procedure TCAN1_C1FIFOINT23.setRXFULLIF; inline;
  79847. begin
  79848. pTDefRegMap(@Self)^.&set := $00000004;
  79849. end;
  79850. procedure TCAN1_C1FIFOINT23.clearRXFULLIF; inline;
  79851. begin
  79852. pTDefRegMap(@Self)^.clr := $00000004;
  79853. end;
  79854. procedure TCAN1_C1FIFOINT23.setRXFULLIF(thebits : TBits_1); inline;
  79855. begin
  79856. if thebits = 0 then
  79857. pTDefRegMap(@Self)^.clr := $00000004
  79858. else
  79859. pTDefRegMap(@Self)^.&set := $00000004;
  79860. end;
  79861. function TCAN1_C1FIFOINT23.getRXFULLIF : TBits_1; inline;
  79862. begin
  79863. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79864. end;
  79865. procedure TCAN1_C1FIFOINT23.setRXOVFLIF; inline;
  79866. begin
  79867. pTDefRegMap(@Self)^.&set := $00000008;
  79868. end;
  79869. procedure TCAN1_C1FIFOINT23.clearRXOVFLIF; inline;
  79870. begin
  79871. pTDefRegMap(@Self)^.clr := $00000008;
  79872. end;
  79873. procedure TCAN1_C1FIFOINT23.setRXOVFLIF(thebits : TBits_1); inline;
  79874. begin
  79875. if thebits = 0 then
  79876. pTDefRegMap(@Self)^.clr := $00000008
  79877. else
  79878. pTDefRegMap(@Self)^.&set := $00000008;
  79879. end;
  79880. function TCAN1_C1FIFOINT23.getRXOVFLIF : TBits_1; inline;
  79881. begin
  79882. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79883. end;
  79884. procedure TCAN1_C1FIFOINT23.setTXEMPTYIF; inline;
  79885. begin
  79886. pTDefRegMap(@Self)^.&set := $00000100;
  79887. end;
  79888. procedure TCAN1_C1FIFOINT23.clearTXEMPTYIF; inline;
  79889. begin
  79890. pTDefRegMap(@Self)^.clr := $00000100;
  79891. end;
  79892. procedure TCAN1_C1FIFOINT23.setTXEMPTYIF(thebits : TBits_1); inline;
  79893. begin
  79894. if thebits = 0 then
  79895. pTDefRegMap(@Self)^.clr := $00000100
  79896. else
  79897. pTDefRegMap(@Self)^.&set := $00000100;
  79898. end;
  79899. function TCAN1_C1FIFOINT23.getTXEMPTYIF : TBits_1; inline;
  79900. begin
  79901. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  79902. end;
  79903. procedure TCAN1_C1FIFOINT23.setTXHALFIF; inline;
  79904. begin
  79905. pTDefRegMap(@Self)^.&set := $00000200;
  79906. end;
  79907. procedure TCAN1_C1FIFOINT23.clearTXHALFIF; inline;
  79908. begin
  79909. pTDefRegMap(@Self)^.clr := $00000200;
  79910. end;
  79911. procedure TCAN1_C1FIFOINT23.setTXHALFIF(thebits : TBits_1); inline;
  79912. begin
  79913. if thebits = 0 then
  79914. pTDefRegMap(@Self)^.clr := $00000200
  79915. else
  79916. pTDefRegMap(@Self)^.&set := $00000200;
  79917. end;
  79918. function TCAN1_C1FIFOINT23.getTXHALFIF : TBits_1; inline;
  79919. begin
  79920. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  79921. end;
  79922. procedure TCAN1_C1FIFOINT23.setTXNFULLIF; inline;
  79923. begin
  79924. pTDefRegMap(@Self)^.&set := $00000400;
  79925. end;
  79926. procedure TCAN1_C1FIFOINT23.clearTXNFULLIF; inline;
  79927. begin
  79928. pTDefRegMap(@Self)^.clr := $00000400;
  79929. end;
  79930. procedure TCAN1_C1FIFOINT23.setTXNFULLIF(thebits : TBits_1); inline;
  79931. begin
  79932. if thebits = 0 then
  79933. pTDefRegMap(@Self)^.clr := $00000400
  79934. else
  79935. pTDefRegMap(@Self)^.&set := $00000400;
  79936. end;
  79937. function TCAN1_C1FIFOINT23.getTXNFULLIF : TBits_1; inline;
  79938. begin
  79939. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  79940. end;
  79941. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIE; inline;
  79942. begin
  79943. pTDefRegMap(@Self)^.&set := $00010000;
  79944. end;
  79945. procedure TCAN1_C1FIFOINT23.clearRXNEMPTYIE; inline;
  79946. begin
  79947. pTDefRegMap(@Self)^.clr := $00010000;
  79948. end;
  79949. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIE(thebits : TBits_1); inline;
  79950. begin
  79951. if thebits = 0 then
  79952. pTDefRegMap(@Self)^.clr := $00010000
  79953. else
  79954. pTDefRegMap(@Self)^.&set := $00010000;
  79955. end;
  79956. function TCAN1_C1FIFOINT23.getRXNEMPTYIE : TBits_1; inline;
  79957. begin
  79958. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  79959. end;
  79960. procedure TCAN1_C1FIFOINT23.setRXHALFIE; inline;
  79961. begin
  79962. pTDefRegMap(@Self)^.&set := $00020000;
  79963. end;
  79964. procedure TCAN1_C1FIFOINT23.clearRXHALFIE; inline;
  79965. begin
  79966. pTDefRegMap(@Self)^.clr := $00020000;
  79967. end;
  79968. procedure TCAN1_C1FIFOINT23.setRXHALFIE(thebits : TBits_1); inline;
  79969. begin
  79970. if thebits = 0 then
  79971. pTDefRegMap(@Self)^.clr := $00020000
  79972. else
  79973. pTDefRegMap(@Self)^.&set := $00020000;
  79974. end;
  79975. function TCAN1_C1FIFOINT23.getRXHALFIE : TBits_1; inline;
  79976. begin
  79977. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  79978. end;
  79979. procedure TCAN1_C1FIFOINT23.setRXFULLIE; inline;
  79980. begin
  79981. pTDefRegMap(@Self)^.&set := $00040000;
  79982. end;
  79983. procedure TCAN1_C1FIFOINT23.clearRXFULLIE; inline;
  79984. begin
  79985. pTDefRegMap(@Self)^.clr := $00040000;
  79986. end;
  79987. procedure TCAN1_C1FIFOINT23.setRXFULLIE(thebits : TBits_1); inline;
  79988. begin
  79989. if thebits = 0 then
  79990. pTDefRegMap(@Self)^.clr := $00040000
  79991. else
  79992. pTDefRegMap(@Self)^.&set := $00040000;
  79993. end;
  79994. function TCAN1_C1FIFOINT23.getRXFULLIE : TBits_1; inline;
  79995. begin
  79996. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  79997. end;
  79998. procedure TCAN1_C1FIFOINT23.setRXOVFLIE; inline;
  79999. begin
  80000. pTDefRegMap(@Self)^.&set := $00080000;
  80001. end;
  80002. procedure TCAN1_C1FIFOINT23.clearRXOVFLIE; inline;
  80003. begin
  80004. pTDefRegMap(@Self)^.clr := $00080000;
  80005. end;
  80006. procedure TCAN1_C1FIFOINT23.setRXOVFLIE(thebits : TBits_1); inline;
  80007. begin
  80008. if thebits = 0 then
  80009. pTDefRegMap(@Self)^.clr := $00080000
  80010. else
  80011. pTDefRegMap(@Self)^.&set := $00080000;
  80012. end;
  80013. function TCAN1_C1FIFOINT23.getRXOVFLIE : TBits_1; inline;
  80014. begin
  80015. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80016. end;
  80017. procedure TCAN1_C1FIFOINT23.setTXEMPTYIE; inline;
  80018. begin
  80019. pTDefRegMap(@Self)^.&set := $01000000;
  80020. end;
  80021. procedure TCAN1_C1FIFOINT23.clearTXEMPTYIE; inline;
  80022. begin
  80023. pTDefRegMap(@Self)^.clr := $01000000;
  80024. end;
  80025. procedure TCAN1_C1FIFOINT23.setTXEMPTYIE(thebits : TBits_1); inline;
  80026. begin
  80027. if thebits = 0 then
  80028. pTDefRegMap(@Self)^.clr := $01000000
  80029. else
  80030. pTDefRegMap(@Self)^.&set := $01000000;
  80031. end;
  80032. function TCAN1_C1FIFOINT23.getTXEMPTYIE : TBits_1; inline;
  80033. begin
  80034. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  80035. end;
  80036. procedure TCAN1_C1FIFOINT23.setTXHALFIE; inline;
  80037. begin
  80038. pTDefRegMap(@Self)^.&set := $02000000;
  80039. end;
  80040. procedure TCAN1_C1FIFOINT23.clearTXHALFIE; inline;
  80041. begin
  80042. pTDefRegMap(@Self)^.clr := $02000000;
  80043. end;
  80044. procedure TCAN1_C1FIFOINT23.setTXHALFIE(thebits : TBits_1); inline;
  80045. begin
  80046. if thebits = 0 then
  80047. pTDefRegMap(@Self)^.clr := $02000000
  80048. else
  80049. pTDefRegMap(@Self)^.&set := $02000000;
  80050. end;
  80051. function TCAN1_C1FIFOINT23.getTXHALFIE : TBits_1; inline;
  80052. begin
  80053. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  80054. end;
  80055. procedure TCAN1_C1FIFOINT23.setTXNFULLIE; inline;
  80056. begin
  80057. pTDefRegMap(@Self)^.&set := $04000000;
  80058. end;
  80059. procedure TCAN1_C1FIFOINT23.clearTXNFULLIE; inline;
  80060. begin
  80061. pTDefRegMap(@Self)^.clr := $04000000;
  80062. end;
  80063. procedure TCAN1_C1FIFOINT23.setTXNFULLIE(thebits : TBits_1); inline;
  80064. begin
  80065. if thebits = 0 then
  80066. pTDefRegMap(@Self)^.clr := $04000000
  80067. else
  80068. pTDefRegMap(@Self)^.&set := $04000000;
  80069. end;
  80070. function TCAN1_C1FIFOINT23.getTXNFULLIE : TBits_1; inline;
  80071. begin
  80072. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  80073. end;
  80074. procedure TCAN1_C1FIFOINT23.setw(thebits : TBits_32); inline;
  80075. begin
  80076. pTDefRegMap(@Self)^.val := thebits;
  80077. end;
  80078. function TCAN1_C1FIFOINT23.getw : TBits_32; inline;
  80079. begin
  80080. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80081. end;
  80082. procedure TCAN1_C1FIFOCI23.setCFIFOCI(thebits : TBits_5); inline;
  80083. begin
  80084. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  80085. end;
  80086. function TCAN1_C1FIFOCI23.getCFIFOCI : TBits_5; inline;
  80087. begin
  80088. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  80089. end;
  80090. procedure TCAN1_C1FIFOCI23.setw(thebits : TBits_32); inline;
  80091. begin
  80092. pTDefRegMap(@Self)^.val := thebits;
  80093. end;
  80094. function TCAN1_C1FIFOCI23.getw : TBits_32; inline;
  80095. begin
  80096. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80097. end;
  80098. procedure TCAN1_C1FIFOCON24.setTXPRI(thebits : TBits_2); inline;
  80099. begin
  80100. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  80101. end;
  80102. function TCAN1_C1FIFOCON24.getTXPRI : TBits_2; inline;
  80103. begin
  80104. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  80105. end;
  80106. procedure TCAN1_C1FIFOCON24.setRTREN; inline;
  80107. begin
  80108. pTDefRegMap(@Self)^.&set := $00000004;
  80109. end;
  80110. procedure TCAN1_C1FIFOCON24.clearRTREN; inline;
  80111. begin
  80112. pTDefRegMap(@Self)^.clr := $00000004;
  80113. end;
  80114. procedure TCAN1_C1FIFOCON24.setRTREN(thebits : TBits_1); inline;
  80115. begin
  80116. if thebits = 0 then
  80117. pTDefRegMap(@Self)^.clr := $00000004
  80118. else
  80119. pTDefRegMap(@Self)^.&set := $00000004;
  80120. end;
  80121. function TCAN1_C1FIFOCON24.getRTREN : TBits_1; inline;
  80122. begin
  80123. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80124. end;
  80125. procedure TCAN1_C1FIFOCON24.setTXREQ; inline;
  80126. begin
  80127. pTDefRegMap(@Self)^.&set := $00000008;
  80128. end;
  80129. procedure TCAN1_C1FIFOCON24.clearTXREQ; inline;
  80130. begin
  80131. pTDefRegMap(@Self)^.clr := $00000008;
  80132. end;
  80133. procedure TCAN1_C1FIFOCON24.setTXREQ(thebits : TBits_1); inline;
  80134. begin
  80135. if thebits = 0 then
  80136. pTDefRegMap(@Self)^.clr := $00000008
  80137. else
  80138. pTDefRegMap(@Self)^.&set := $00000008;
  80139. end;
  80140. function TCAN1_C1FIFOCON24.getTXREQ : TBits_1; inline;
  80141. begin
  80142. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80143. end;
  80144. procedure TCAN1_C1FIFOCON24.setTXERR; inline;
  80145. begin
  80146. pTDefRegMap(@Self)^.&set := $00000010;
  80147. end;
  80148. procedure TCAN1_C1FIFOCON24.clearTXERR; inline;
  80149. begin
  80150. pTDefRegMap(@Self)^.clr := $00000010;
  80151. end;
  80152. procedure TCAN1_C1FIFOCON24.setTXERR(thebits : TBits_1); inline;
  80153. begin
  80154. if thebits = 0 then
  80155. pTDefRegMap(@Self)^.clr := $00000010
  80156. else
  80157. pTDefRegMap(@Self)^.&set := $00000010;
  80158. end;
  80159. function TCAN1_C1FIFOCON24.getTXERR : TBits_1; inline;
  80160. begin
  80161. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  80162. end;
  80163. procedure TCAN1_C1FIFOCON24.setTXLARB; inline;
  80164. begin
  80165. pTDefRegMap(@Self)^.&set := $00000020;
  80166. end;
  80167. procedure TCAN1_C1FIFOCON24.clearTXLARB; inline;
  80168. begin
  80169. pTDefRegMap(@Self)^.clr := $00000020;
  80170. end;
  80171. procedure TCAN1_C1FIFOCON24.setTXLARB(thebits : TBits_1); inline;
  80172. begin
  80173. if thebits = 0 then
  80174. pTDefRegMap(@Self)^.clr := $00000020
  80175. else
  80176. pTDefRegMap(@Self)^.&set := $00000020;
  80177. end;
  80178. function TCAN1_C1FIFOCON24.getTXLARB : TBits_1; inline;
  80179. begin
  80180. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  80181. end;
  80182. procedure TCAN1_C1FIFOCON24.setTXABAT; inline;
  80183. begin
  80184. pTDefRegMap(@Self)^.&set := $00000040;
  80185. end;
  80186. procedure TCAN1_C1FIFOCON24.clearTXABAT; inline;
  80187. begin
  80188. pTDefRegMap(@Self)^.clr := $00000040;
  80189. end;
  80190. procedure TCAN1_C1FIFOCON24.setTXABAT(thebits : TBits_1); inline;
  80191. begin
  80192. if thebits = 0 then
  80193. pTDefRegMap(@Self)^.clr := $00000040
  80194. else
  80195. pTDefRegMap(@Self)^.&set := $00000040;
  80196. end;
  80197. function TCAN1_C1FIFOCON24.getTXABAT : TBits_1; inline;
  80198. begin
  80199. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  80200. end;
  80201. procedure TCAN1_C1FIFOCON24.setTXEN; inline;
  80202. begin
  80203. pTDefRegMap(@Self)^.&set := $00000080;
  80204. end;
  80205. procedure TCAN1_C1FIFOCON24.clearTXEN; inline;
  80206. begin
  80207. pTDefRegMap(@Self)^.clr := $00000080;
  80208. end;
  80209. procedure TCAN1_C1FIFOCON24.setTXEN(thebits : TBits_1); inline;
  80210. begin
  80211. if thebits = 0 then
  80212. pTDefRegMap(@Self)^.clr := $00000080
  80213. else
  80214. pTDefRegMap(@Self)^.&set := $00000080;
  80215. end;
  80216. function TCAN1_C1FIFOCON24.getTXEN : TBits_1; inline;
  80217. begin
  80218. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  80219. end;
  80220. procedure TCAN1_C1FIFOCON24.setDONLY; inline;
  80221. begin
  80222. pTDefRegMap(@Self)^.&set := $00001000;
  80223. end;
  80224. procedure TCAN1_C1FIFOCON24.clearDONLY; inline;
  80225. begin
  80226. pTDefRegMap(@Self)^.clr := $00001000;
  80227. end;
  80228. procedure TCAN1_C1FIFOCON24.setDONLY(thebits : TBits_1); inline;
  80229. begin
  80230. if thebits = 0 then
  80231. pTDefRegMap(@Self)^.clr := $00001000
  80232. else
  80233. pTDefRegMap(@Self)^.&set := $00001000;
  80234. end;
  80235. function TCAN1_C1FIFOCON24.getDONLY : TBits_1; inline;
  80236. begin
  80237. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  80238. end;
  80239. procedure TCAN1_C1FIFOCON24.setUINC; inline;
  80240. begin
  80241. pTDefRegMap(@Self)^.&set := $00002000;
  80242. end;
  80243. procedure TCAN1_C1FIFOCON24.clearUINC; inline;
  80244. begin
  80245. pTDefRegMap(@Self)^.clr := $00002000;
  80246. end;
  80247. procedure TCAN1_C1FIFOCON24.setUINC(thebits : TBits_1); inline;
  80248. begin
  80249. if thebits = 0 then
  80250. pTDefRegMap(@Self)^.clr := $00002000
  80251. else
  80252. pTDefRegMap(@Self)^.&set := $00002000;
  80253. end;
  80254. function TCAN1_C1FIFOCON24.getUINC : TBits_1; inline;
  80255. begin
  80256. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  80257. end;
  80258. procedure TCAN1_C1FIFOCON24.setFRESET; inline;
  80259. begin
  80260. pTDefRegMap(@Self)^.&set := $00004000;
  80261. end;
  80262. procedure TCAN1_C1FIFOCON24.clearFRESET; inline;
  80263. begin
  80264. pTDefRegMap(@Self)^.clr := $00004000;
  80265. end;
  80266. procedure TCAN1_C1FIFOCON24.setFRESET(thebits : TBits_1); inline;
  80267. begin
  80268. if thebits = 0 then
  80269. pTDefRegMap(@Self)^.clr := $00004000
  80270. else
  80271. pTDefRegMap(@Self)^.&set := $00004000;
  80272. end;
  80273. function TCAN1_C1FIFOCON24.getFRESET : TBits_1; inline;
  80274. begin
  80275. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  80276. end;
  80277. procedure TCAN1_C1FIFOCON24.setFSIZE(thebits : TBits_5); inline;
  80278. begin
  80279. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  80280. end;
  80281. function TCAN1_C1FIFOCON24.getFSIZE : TBits_5; inline;
  80282. begin
  80283. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  80284. end;
  80285. procedure TCAN1_C1FIFOCON24.setw(thebits : TBits_32); inline;
  80286. begin
  80287. pTDefRegMap(@Self)^.val := thebits;
  80288. end;
  80289. function TCAN1_C1FIFOCON24.getw : TBits_32; inline;
  80290. begin
  80291. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80292. end;
  80293. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIF; inline;
  80294. begin
  80295. pTDefRegMap(@Self)^.&set := $00000001;
  80296. end;
  80297. procedure TCAN1_C1FIFOINT24.clearRXNEMPTYIF; inline;
  80298. begin
  80299. pTDefRegMap(@Self)^.clr := $00000001;
  80300. end;
  80301. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIF(thebits : TBits_1); inline;
  80302. begin
  80303. if thebits = 0 then
  80304. pTDefRegMap(@Self)^.clr := $00000001
  80305. else
  80306. pTDefRegMap(@Self)^.&set := $00000001;
  80307. end;
  80308. function TCAN1_C1FIFOINT24.getRXNEMPTYIF : TBits_1; inline;
  80309. begin
  80310. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80311. end;
  80312. procedure TCAN1_C1FIFOINT24.setRXHALFIF; inline;
  80313. begin
  80314. pTDefRegMap(@Self)^.&set := $00000002;
  80315. end;
  80316. procedure TCAN1_C1FIFOINT24.clearRXHALFIF; inline;
  80317. begin
  80318. pTDefRegMap(@Self)^.clr := $00000002;
  80319. end;
  80320. procedure TCAN1_C1FIFOINT24.setRXHALFIF(thebits : TBits_1); inline;
  80321. begin
  80322. if thebits = 0 then
  80323. pTDefRegMap(@Self)^.clr := $00000002
  80324. else
  80325. pTDefRegMap(@Self)^.&set := $00000002;
  80326. end;
  80327. function TCAN1_C1FIFOINT24.getRXHALFIF : TBits_1; inline;
  80328. begin
  80329. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80330. end;
  80331. procedure TCAN1_C1FIFOINT24.setRXFULLIF; inline;
  80332. begin
  80333. pTDefRegMap(@Self)^.&set := $00000004;
  80334. end;
  80335. procedure TCAN1_C1FIFOINT24.clearRXFULLIF; inline;
  80336. begin
  80337. pTDefRegMap(@Self)^.clr := $00000004;
  80338. end;
  80339. procedure TCAN1_C1FIFOINT24.setRXFULLIF(thebits : TBits_1); inline;
  80340. begin
  80341. if thebits = 0 then
  80342. pTDefRegMap(@Self)^.clr := $00000004
  80343. else
  80344. pTDefRegMap(@Self)^.&set := $00000004;
  80345. end;
  80346. function TCAN1_C1FIFOINT24.getRXFULLIF : TBits_1; inline;
  80347. begin
  80348. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80349. end;
  80350. procedure TCAN1_C1FIFOINT24.setRXOVFLIF; inline;
  80351. begin
  80352. pTDefRegMap(@Self)^.&set := $00000008;
  80353. end;
  80354. procedure TCAN1_C1FIFOINT24.clearRXOVFLIF; inline;
  80355. begin
  80356. pTDefRegMap(@Self)^.clr := $00000008;
  80357. end;
  80358. procedure TCAN1_C1FIFOINT24.setRXOVFLIF(thebits : TBits_1); inline;
  80359. begin
  80360. if thebits = 0 then
  80361. pTDefRegMap(@Self)^.clr := $00000008
  80362. else
  80363. pTDefRegMap(@Self)^.&set := $00000008;
  80364. end;
  80365. function TCAN1_C1FIFOINT24.getRXOVFLIF : TBits_1; inline;
  80366. begin
  80367. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80368. end;
  80369. procedure TCAN1_C1FIFOINT24.setTXEMPTYIF; inline;
  80370. begin
  80371. pTDefRegMap(@Self)^.&set := $00000100;
  80372. end;
  80373. procedure TCAN1_C1FIFOINT24.clearTXEMPTYIF; inline;
  80374. begin
  80375. pTDefRegMap(@Self)^.clr := $00000100;
  80376. end;
  80377. procedure TCAN1_C1FIFOINT24.setTXEMPTYIF(thebits : TBits_1); inline;
  80378. begin
  80379. if thebits = 0 then
  80380. pTDefRegMap(@Self)^.clr := $00000100
  80381. else
  80382. pTDefRegMap(@Self)^.&set := $00000100;
  80383. end;
  80384. function TCAN1_C1FIFOINT24.getTXEMPTYIF : TBits_1; inline;
  80385. begin
  80386. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  80387. end;
  80388. procedure TCAN1_C1FIFOINT24.setTXHALFIF; inline;
  80389. begin
  80390. pTDefRegMap(@Self)^.&set := $00000200;
  80391. end;
  80392. procedure TCAN1_C1FIFOINT24.clearTXHALFIF; inline;
  80393. begin
  80394. pTDefRegMap(@Self)^.clr := $00000200;
  80395. end;
  80396. procedure TCAN1_C1FIFOINT24.setTXHALFIF(thebits : TBits_1); inline;
  80397. begin
  80398. if thebits = 0 then
  80399. pTDefRegMap(@Self)^.clr := $00000200
  80400. else
  80401. pTDefRegMap(@Self)^.&set := $00000200;
  80402. end;
  80403. function TCAN1_C1FIFOINT24.getTXHALFIF : TBits_1; inline;
  80404. begin
  80405. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  80406. end;
  80407. procedure TCAN1_C1FIFOINT24.setTXNFULLIF; inline;
  80408. begin
  80409. pTDefRegMap(@Self)^.&set := $00000400;
  80410. end;
  80411. procedure TCAN1_C1FIFOINT24.clearTXNFULLIF; inline;
  80412. begin
  80413. pTDefRegMap(@Self)^.clr := $00000400;
  80414. end;
  80415. procedure TCAN1_C1FIFOINT24.setTXNFULLIF(thebits : TBits_1); inline;
  80416. begin
  80417. if thebits = 0 then
  80418. pTDefRegMap(@Self)^.clr := $00000400
  80419. else
  80420. pTDefRegMap(@Self)^.&set := $00000400;
  80421. end;
  80422. function TCAN1_C1FIFOINT24.getTXNFULLIF : TBits_1; inline;
  80423. begin
  80424. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  80425. end;
  80426. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIE; inline;
  80427. begin
  80428. pTDefRegMap(@Self)^.&set := $00010000;
  80429. end;
  80430. procedure TCAN1_C1FIFOINT24.clearRXNEMPTYIE; inline;
  80431. begin
  80432. pTDefRegMap(@Self)^.clr := $00010000;
  80433. end;
  80434. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIE(thebits : TBits_1); inline;
  80435. begin
  80436. if thebits = 0 then
  80437. pTDefRegMap(@Self)^.clr := $00010000
  80438. else
  80439. pTDefRegMap(@Self)^.&set := $00010000;
  80440. end;
  80441. function TCAN1_C1FIFOINT24.getRXNEMPTYIE : TBits_1; inline;
  80442. begin
  80443. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  80444. end;
  80445. procedure TCAN1_C1FIFOINT24.setRXHALFIE; inline;
  80446. begin
  80447. pTDefRegMap(@Self)^.&set := $00020000;
  80448. end;
  80449. procedure TCAN1_C1FIFOINT24.clearRXHALFIE; inline;
  80450. begin
  80451. pTDefRegMap(@Self)^.clr := $00020000;
  80452. end;
  80453. procedure TCAN1_C1FIFOINT24.setRXHALFIE(thebits : TBits_1); inline;
  80454. begin
  80455. if thebits = 0 then
  80456. pTDefRegMap(@Self)^.clr := $00020000
  80457. else
  80458. pTDefRegMap(@Self)^.&set := $00020000;
  80459. end;
  80460. function TCAN1_C1FIFOINT24.getRXHALFIE : TBits_1; inline;
  80461. begin
  80462. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  80463. end;
  80464. procedure TCAN1_C1FIFOINT24.setRXFULLIE; inline;
  80465. begin
  80466. pTDefRegMap(@Self)^.&set := $00040000;
  80467. end;
  80468. procedure TCAN1_C1FIFOINT24.clearRXFULLIE; inline;
  80469. begin
  80470. pTDefRegMap(@Self)^.clr := $00040000;
  80471. end;
  80472. procedure TCAN1_C1FIFOINT24.setRXFULLIE(thebits : TBits_1); inline;
  80473. begin
  80474. if thebits = 0 then
  80475. pTDefRegMap(@Self)^.clr := $00040000
  80476. else
  80477. pTDefRegMap(@Self)^.&set := $00040000;
  80478. end;
  80479. function TCAN1_C1FIFOINT24.getRXFULLIE : TBits_1; inline;
  80480. begin
  80481. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  80482. end;
  80483. procedure TCAN1_C1FIFOINT24.setRXOVFLIE; inline;
  80484. begin
  80485. pTDefRegMap(@Self)^.&set := $00080000;
  80486. end;
  80487. procedure TCAN1_C1FIFOINT24.clearRXOVFLIE; inline;
  80488. begin
  80489. pTDefRegMap(@Self)^.clr := $00080000;
  80490. end;
  80491. procedure TCAN1_C1FIFOINT24.setRXOVFLIE(thebits : TBits_1); inline;
  80492. begin
  80493. if thebits = 0 then
  80494. pTDefRegMap(@Self)^.clr := $00080000
  80495. else
  80496. pTDefRegMap(@Self)^.&set := $00080000;
  80497. end;
  80498. function TCAN1_C1FIFOINT24.getRXOVFLIE : TBits_1; inline;
  80499. begin
  80500. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80501. end;
  80502. procedure TCAN1_C1FIFOINT24.setTXEMPTYIE; inline;
  80503. begin
  80504. pTDefRegMap(@Self)^.&set := $01000000;
  80505. end;
  80506. procedure TCAN1_C1FIFOINT24.clearTXEMPTYIE; inline;
  80507. begin
  80508. pTDefRegMap(@Self)^.clr := $01000000;
  80509. end;
  80510. procedure TCAN1_C1FIFOINT24.setTXEMPTYIE(thebits : TBits_1); inline;
  80511. begin
  80512. if thebits = 0 then
  80513. pTDefRegMap(@Self)^.clr := $01000000
  80514. else
  80515. pTDefRegMap(@Self)^.&set := $01000000;
  80516. end;
  80517. function TCAN1_C1FIFOINT24.getTXEMPTYIE : TBits_1; inline;
  80518. begin
  80519. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  80520. end;
  80521. procedure TCAN1_C1FIFOINT24.setTXHALFIE; inline;
  80522. begin
  80523. pTDefRegMap(@Self)^.&set := $02000000;
  80524. end;
  80525. procedure TCAN1_C1FIFOINT24.clearTXHALFIE; inline;
  80526. begin
  80527. pTDefRegMap(@Self)^.clr := $02000000;
  80528. end;
  80529. procedure TCAN1_C1FIFOINT24.setTXHALFIE(thebits : TBits_1); inline;
  80530. begin
  80531. if thebits = 0 then
  80532. pTDefRegMap(@Self)^.clr := $02000000
  80533. else
  80534. pTDefRegMap(@Self)^.&set := $02000000;
  80535. end;
  80536. function TCAN1_C1FIFOINT24.getTXHALFIE : TBits_1; inline;
  80537. begin
  80538. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  80539. end;
  80540. procedure TCAN1_C1FIFOINT24.setTXNFULLIE; inline;
  80541. begin
  80542. pTDefRegMap(@Self)^.&set := $04000000;
  80543. end;
  80544. procedure TCAN1_C1FIFOINT24.clearTXNFULLIE; inline;
  80545. begin
  80546. pTDefRegMap(@Self)^.clr := $04000000;
  80547. end;
  80548. procedure TCAN1_C1FIFOINT24.setTXNFULLIE(thebits : TBits_1); inline;
  80549. begin
  80550. if thebits = 0 then
  80551. pTDefRegMap(@Self)^.clr := $04000000
  80552. else
  80553. pTDefRegMap(@Self)^.&set := $04000000;
  80554. end;
  80555. function TCAN1_C1FIFOINT24.getTXNFULLIE : TBits_1; inline;
  80556. begin
  80557. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  80558. end;
  80559. procedure TCAN1_C1FIFOINT24.setw(thebits : TBits_32); inline;
  80560. begin
  80561. pTDefRegMap(@Self)^.val := thebits;
  80562. end;
  80563. function TCAN1_C1FIFOINT24.getw : TBits_32; inline;
  80564. begin
  80565. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80566. end;
  80567. procedure TCAN1_C1FIFOCI24.setCFIFOCI(thebits : TBits_5); inline;
  80568. begin
  80569. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  80570. end;
  80571. function TCAN1_C1FIFOCI24.getCFIFOCI : TBits_5; inline;
  80572. begin
  80573. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  80574. end;
  80575. procedure TCAN1_C1FIFOCI24.setw(thebits : TBits_32); inline;
  80576. begin
  80577. pTDefRegMap(@Self)^.val := thebits;
  80578. end;
  80579. function TCAN1_C1FIFOCI24.getw : TBits_32; inline;
  80580. begin
  80581. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80582. end;
  80583. procedure TCAN1_C1FIFOCON25.setTXPRI(thebits : TBits_2); inline;
  80584. begin
  80585. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  80586. end;
  80587. function TCAN1_C1FIFOCON25.getTXPRI : TBits_2; inline;
  80588. begin
  80589. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  80590. end;
  80591. procedure TCAN1_C1FIFOCON25.setRTREN; inline;
  80592. begin
  80593. pTDefRegMap(@Self)^.&set := $00000004;
  80594. end;
  80595. procedure TCAN1_C1FIFOCON25.clearRTREN; inline;
  80596. begin
  80597. pTDefRegMap(@Self)^.clr := $00000004;
  80598. end;
  80599. procedure TCAN1_C1FIFOCON25.setRTREN(thebits : TBits_1); inline;
  80600. begin
  80601. if thebits = 0 then
  80602. pTDefRegMap(@Self)^.clr := $00000004
  80603. else
  80604. pTDefRegMap(@Self)^.&set := $00000004;
  80605. end;
  80606. function TCAN1_C1FIFOCON25.getRTREN : TBits_1; inline;
  80607. begin
  80608. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80609. end;
  80610. procedure TCAN1_C1FIFOCON25.setTXREQ; inline;
  80611. begin
  80612. pTDefRegMap(@Self)^.&set := $00000008;
  80613. end;
  80614. procedure TCAN1_C1FIFOCON25.clearTXREQ; inline;
  80615. begin
  80616. pTDefRegMap(@Self)^.clr := $00000008;
  80617. end;
  80618. procedure TCAN1_C1FIFOCON25.setTXREQ(thebits : TBits_1); inline;
  80619. begin
  80620. if thebits = 0 then
  80621. pTDefRegMap(@Self)^.clr := $00000008
  80622. else
  80623. pTDefRegMap(@Self)^.&set := $00000008;
  80624. end;
  80625. function TCAN1_C1FIFOCON25.getTXREQ : TBits_1; inline;
  80626. begin
  80627. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80628. end;
  80629. procedure TCAN1_C1FIFOCON25.setTXERR; inline;
  80630. begin
  80631. pTDefRegMap(@Self)^.&set := $00000010;
  80632. end;
  80633. procedure TCAN1_C1FIFOCON25.clearTXERR; inline;
  80634. begin
  80635. pTDefRegMap(@Self)^.clr := $00000010;
  80636. end;
  80637. procedure TCAN1_C1FIFOCON25.setTXERR(thebits : TBits_1); inline;
  80638. begin
  80639. if thebits = 0 then
  80640. pTDefRegMap(@Self)^.clr := $00000010
  80641. else
  80642. pTDefRegMap(@Self)^.&set := $00000010;
  80643. end;
  80644. function TCAN1_C1FIFOCON25.getTXERR : TBits_1; inline;
  80645. begin
  80646. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  80647. end;
  80648. procedure TCAN1_C1FIFOCON25.setTXLARB; inline;
  80649. begin
  80650. pTDefRegMap(@Self)^.&set := $00000020;
  80651. end;
  80652. procedure TCAN1_C1FIFOCON25.clearTXLARB; inline;
  80653. begin
  80654. pTDefRegMap(@Self)^.clr := $00000020;
  80655. end;
  80656. procedure TCAN1_C1FIFOCON25.setTXLARB(thebits : TBits_1); inline;
  80657. begin
  80658. if thebits = 0 then
  80659. pTDefRegMap(@Self)^.clr := $00000020
  80660. else
  80661. pTDefRegMap(@Self)^.&set := $00000020;
  80662. end;
  80663. function TCAN1_C1FIFOCON25.getTXLARB : TBits_1; inline;
  80664. begin
  80665. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  80666. end;
  80667. procedure TCAN1_C1FIFOCON25.setTXABAT; inline;
  80668. begin
  80669. pTDefRegMap(@Self)^.&set := $00000040;
  80670. end;
  80671. procedure TCAN1_C1FIFOCON25.clearTXABAT; inline;
  80672. begin
  80673. pTDefRegMap(@Self)^.clr := $00000040;
  80674. end;
  80675. procedure TCAN1_C1FIFOCON25.setTXABAT(thebits : TBits_1); inline;
  80676. begin
  80677. if thebits = 0 then
  80678. pTDefRegMap(@Self)^.clr := $00000040
  80679. else
  80680. pTDefRegMap(@Self)^.&set := $00000040;
  80681. end;
  80682. function TCAN1_C1FIFOCON25.getTXABAT : TBits_1; inline;
  80683. begin
  80684. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  80685. end;
  80686. procedure TCAN1_C1FIFOCON25.setTXEN; inline;
  80687. begin
  80688. pTDefRegMap(@Self)^.&set := $00000080;
  80689. end;
  80690. procedure TCAN1_C1FIFOCON25.clearTXEN; inline;
  80691. begin
  80692. pTDefRegMap(@Self)^.clr := $00000080;
  80693. end;
  80694. procedure TCAN1_C1FIFOCON25.setTXEN(thebits : TBits_1); inline;
  80695. begin
  80696. if thebits = 0 then
  80697. pTDefRegMap(@Self)^.clr := $00000080
  80698. else
  80699. pTDefRegMap(@Self)^.&set := $00000080;
  80700. end;
  80701. function TCAN1_C1FIFOCON25.getTXEN : TBits_1; inline;
  80702. begin
  80703. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  80704. end;
  80705. procedure TCAN1_C1FIFOCON25.setDONLY; inline;
  80706. begin
  80707. pTDefRegMap(@Self)^.&set := $00001000;
  80708. end;
  80709. procedure TCAN1_C1FIFOCON25.clearDONLY; inline;
  80710. begin
  80711. pTDefRegMap(@Self)^.clr := $00001000;
  80712. end;
  80713. procedure TCAN1_C1FIFOCON25.setDONLY(thebits : TBits_1); inline;
  80714. begin
  80715. if thebits = 0 then
  80716. pTDefRegMap(@Self)^.clr := $00001000
  80717. else
  80718. pTDefRegMap(@Self)^.&set := $00001000;
  80719. end;
  80720. function TCAN1_C1FIFOCON25.getDONLY : TBits_1; inline;
  80721. begin
  80722. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  80723. end;
  80724. procedure TCAN1_C1FIFOCON25.setUINC; inline;
  80725. begin
  80726. pTDefRegMap(@Self)^.&set := $00002000;
  80727. end;
  80728. procedure TCAN1_C1FIFOCON25.clearUINC; inline;
  80729. begin
  80730. pTDefRegMap(@Self)^.clr := $00002000;
  80731. end;
  80732. procedure TCAN1_C1FIFOCON25.setUINC(thebits : TBits_1); inline;
  80733. begin
  80734. if thebits = 0 then
  80735. pTDefRegMap(@Self)^.clr := $00002000
  80736. else
  80737. pTDefRegMap(@Self)^.&set := $00002000;
  80738. end;
  80739. function TCAN1_C1FIFOCON25.getUINC : TBits_1; inline;
  80740. begin
  80741. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  80742. end;
  80743. procedure TCAN1_C1FIFOCON25.setFRESET; inline;
  80744. begin
  80745. pTDefRegMap(@Self)^.&set := $00004000;
  80746. end;
  80747. procedure TCAN1_C1FIFOCON25.clearFRESET; inline;
  80748. begin
  80749. pTDefRegMap(@Self)^.clr := $00004000;
  80750. end;
  80751. procedure TCAN1_C1FIFOCON25.setFRESET(thebits : TBits_1); inline;
  80752. begin
  80753. if thebits = 0 then
  80754. pTDefRegMap(@Self)^.clr := $00004000
  80755. else
  80756. pTDefRegMap(@Self)^.&set := $00004000;
  80757. end;
  80758. function TCAN1_C1FIFOCON25.getFRESET : TBits_1; inline;
  80759. begin
  80760. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  80761. end;
  80762. procedure TCAN1_C1FIFOCON25.setFSIZE(thebits : TBits_5); inline;
  80763. begin
  80764. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  80765. end;
  80766. function TCAN1_C1FIFOCON25.getFSIZE : TBits_5; inline;
  80767. begin
  80768. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  80769. end;
  80770. procedure TCAN1_C1FIFOCON25.setw(thebits : TBits_32); inline;
  80771. begin
  80772. pTDefRegMap(@Self)^.val := thebits;
  80773. end;
  80774. function TCAN1_C1FIFOCON25.getw : TBits_32; inline;
  80775. begin
  80776. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80777. end;
  80778. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIF; inline;
  80779. begin
  80780. pTDefRegMap(@Self)^.&set := $00000001;
  80781. end;
  80782. procedure TCAN1_C1FIFOINT25.clearRXNEMPTYIF; inline;
  80783. begin
  80784. pTDefRegMap(@Self)^.clr := $00000001;
  80785. end;
  80786. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIF(thebits : TBits_1); inline;
  80787. begin
  80788. if thebits = 0 then
  80789. pTDefRegMap(@Self)^.clr := $00000001
  80790. else
  80791. pTDefRegMap(@Self)^.&set := $00000001;
  80792. end;
  80793. function TCAN1_C1FIFOINT25.getRXNEMPTYIF : TBits_1; inline;
  80794. begin
  80795. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80796. end;
  80797. procedure TCAN1_C1FIFOINT25.setRXHALFIF; inline;
  80798. begin
  80799. pTDefRegMap(@Self)^.&set := $00000002;
  80800. end;
  80801. procedure TCAN1_C1FIFOINT25.clearRXHALFIF; inline;
  80802. begin
  80803. pTDefRegMap(@Self)^.clr := $00000002;
  80804. end;
  80805. procedure TCAN1_C1FIFOINT25.setRXHALFIF(thebits : TBits_1); inline;
  80806. begin
  80807. if thebits = 0 then
  80808. pTDefRegMap(@Self)^.clr := $00000002
  80809. else
  80810. pTDefRegMap(@Self)^.&set := $00000002;
  80811. end;
  80812. function TCAN1_C1FIFOINT25.getRXHALFIF : TBits_1; inline;
  80813. begin
  80814. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80815. end;
  80816. procedure TCAN1_C1FIFOINT25.setRXFULLIF; inline;
  80817. begin
  80818. pTDefRegMap(@Self)^.&set := $00000004;
  80819. end;
  80820. procedure TCAN1_C1FIFOINT25.clearRXFULLIF; inline;
  80821. begin
  80822. pTDefRegMap(@Self)^.clr := $00000004;
  80823. end;
  80824. procedure TCAN1_C1FIFOINT25.setRXFULLIF(thebits : TBits_1); inline;
  80825. begin
  80826. if thebits = 0 then
  80827. pTDefRegMap(@Self)^.clr := $00000004
  80828. else
  80829. pTDefRegMap(@Self)^.&set := $00000004;
  80830. end;
  80831. function TCAN1_C1FIFOINT25.getRXFULLIF : TBits_1; inline;
  80832. begin
  80833. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80834. end;
  80835. procedure TCAN1_C1FIFOINT25.setRXOVFLIF; inline;
  80836. begin
  80837. pTDefRegMap(@Self)^.&set := $00000008;
  80838. end;
  80839. procedure TCAN1_C1FIFOINT25.clearRXOVFLIF; inline;
  80840. begin
  80841. pTDefRegMap(@Self)^.clr := $00000008;
  80842. end;
  80843. procedure TCAN1_C1FIFOINT25.setRXOVFLIF(thebits : TBits_1); inline;
  80844. begin
  80845. if thebits = 0 then
  80846. pTDefRegMap(@Self)^.clr := $00000008
  80847. else
  80848. pTDefRegMap(@Self)^.&set := $00000008;
  80849. end;
  80850. function TCAN1_C1FIFOINT25.getRXOVFLIF : TBits_1; inline;
  80851. begin
  80852. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80853. end;
  80854. procedure TCAN1_C1FIFOINT25.setTXEMPTYIF; inline;
  80855. begin
  80856. pTDefRegMap(@Self)^.&set := $00000100;
  80857. end;
  80858. procedure TCAN1_C1FIFOINT25.clearTXEMPTYIF; inline;
  80859. begin
  80860. pTDefRegMap(@Self)^.clr := $00000100;
  80861. end;
  80862. procedure TCAN1_C1FIFOINT25.setTXEMPTYIF(thebits : TBits_1); inline;
  80863. begin
  80864. if thebits = 0 then
  80865. pTDefRegMap(@Self)^.clr := $00000100
  80866. else
  80867. pTDefRegMap(@Self)^.&set := $00000100;
  80868. end;
  80869. function TCAN1_C1FIFOINT25.getTXEMPTYIF : TBits_1; inline;
  80870. begin
  80871. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  80872. end;
  80873. procedure TCAN1_C1FIFOINT25.setTXHALFIF; inline;
  80874. begin
  80875. pTDefRegMap(@Self)^.&set := $00000200;
  80876. end;
  80877. procedure TCAN1_C1FIFOINT25.clearTXHALFIF; inline;
  80878. begin
  80879. pTDefRegMap(@Self)^.clr := $00000200;
  80880. end;
  80881. procedure TCAN1_C1FIFOINT25.setTXHALFIF(thebits : TBits_1); inline;
  80882. begin
  80883. if thebits = 0 then
  80884. pTDefRegMap(@Self)^.clr := $00000200
  80885. else
  80886. pTDefRegMap(@Self)^.&set := $00000200;
  80887. end;
  80888. function TCAN1_C1FIFOINT25.getTXHALFIF : TBits_1; inline;
  80889. begin
  80890. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  80891. end;
  80892. procedure TCAN1_C1FIFOINT25.setTXNFULLIF; inline;
  80893. begin
  80894. pTDefRegMap(@Self)^.&set := $00000400;
  80895. end;
  80896. procedure TCAN1_C1FIFOINT25.clearTXNFULLIF; inline;
  80897. begin
  80898. pTDefRegMap(@Self)^.clr := $00000400;
  80899. end;
  80900. procedure TCAN1_C1FIFOINT25.setTXNFULLIF(thebits : TBits_1); inline;
  80901. begin
  80902. if thebits = 0 then
  80903. pTDefRegMap(@Self)^.clr := $00000400
  80904. else
  80905. pTDefRegMap(@Self)^.&set := $00000400;
  80906. end;
  80907. function TCAN1_C1FIFOINT25.getTXNFULLIF : TBits_1; inline;
  80908. begin
  80909. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  80910. end;
  80911. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIE; inline;
  80912. begin
  80913. pTDefRegMap(@Self)^.&set := $00010000;
  80914. end;
  80915. procedure TCAN1_C1FIFOINT25.clearRXNEMPTYIE; inline;
  80916. begin
  80917. pTDefRegMap(@Self)^.clr := $00010000;
  80918. end;
  80919. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIE(thebits : TBits_1); inline;
  80920. begin
  80921. if thebits = 0 then
  80922. pTDefRegMap(@Self)^.clr := $00010000
  80923. else
  80924. pTDefRegMap(@Self)^.&set := $00010000;
  80925. end;
  80926. function TCAN1_C1FIFOINT25.getRXNEMPTYIE : TBits_1; inline;
  80927. begin
  80928. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  80929. end;
  80930. procedure TCAN1_C1FIFOINT25.setRXHALFIE; inline;
  80931. begin
  80932. pTDefRegMap(@Self)^.&set := $00020000;
  80933. end;
  80934. procedure TCAN1_C1FIFOINT25.clearRXHALFIE; inline;
  80935. begin
  80936. pTDefRegMap(@Self)^.clr := $00020000;
  80937. end;
  80938. procedure TCAN1_C1FIFOINT25.setRXHALFIE(thebits : TBits_1); inline;
  80939. begin
  80940. if thebits = 0 then
  80941. pTDefRegMap(@Self)^.clr := $00020000
  80942. else
  80943. pTDefRegMap(@Self)^.&set := $00020000;
  80944. end;
  80945. function TCAN1_C1FIFOINT25.getRXHALFIE : TBits_1; inline;
  80946. begin
  80947. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  80948. end;
  80949. procedure TCAN1_C1FIFOINT25.setRXFULLIE; inline;
  80950. begin
  80951. pTDefRegMap(@Self)^.&set := $00040000;
  80952. end;
  80953. procedure TCAN1_C1FIFOINT25.clearRXFULLIE; inline;
  80954. begin
  80955. pTDefRegMap(@Self)^.clr := $00040000;
  80956. end;
  80957. procedure TCAN1_C1FIFOINT25.setRXFULLIE(thebits : TBits_1); inline;
  80958. begin
  80959. if thebits = 0 then
  80960. pTDefRegMap(@Self)^.clr := $00040000
  80961. else
  80962. pTDefRegMap(@Self)^.&set := $00040000;
  80963. end;
  80964. function TCAN1_C1FIFOINT25.getRXFULLIE : TBits_1; inline;
  80965. begin
  80966. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  80967. end;
  80968. procedure TCAN1_C1FIFOINT25.setRXOVFLIE; inline;
  80969. begin
  80970. pTDefRegMap(@Self)^.&set := $00080000;
  80971. end;
  80972. procedure TCAN1_C1FIFOINT25.clearRXOVFLIE; inline;
  80973. begin
  80974. pTDefRegMap(@Self)^.clr := $00080000;
  80975. end;
  80976. procedure TCAN1_C1FIFOINT25.setRXOVFLIE(thebits : TBits_1); inline;
  80977. begin
  80978. if thebits = 0 then
  80979. pTDefRegMap(@Self)^.clr := $00080000
  80980. else
  80981. pTDefRegMap(@Self)^.&set := $00080000;
  80982. end;
  80983. function TCAN1_C1FIFOINT25.getRXOVFLIE : TBits_1; inline;
  80984. begin
  80985. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80986. end;
  80987. procedure TCAN1_C1FIFOINT25.setTXEMPTYIE; inline;
  80988. begin
  80989. pTDefRegMap(@Self)^.&set := $01000000;
  80990. end;
  80991. procedure TCAN1_C1FIFOINT25.clearTXEMPTYIE; inline;
  80992. begin
  80993. pTDefRegMap(@Self)^.clr := $01000000;
  80994. end;
  80995. procedure TCAN1_C1FIFOINT25.setTXEMPTYIE(thebits : TBits_1); inline;
  80996. begin
  80997. if thebits = 0 then
  80998. pTDefRegMap(@Self)^.clr := $01000000
  80999. else
  81000. pTDefRegMap(@Self)^.&set := $01000000;
  81001. end;
  81002. function TCAN1_C1FIFOINT25.getTXEMPTYIE : TBits_1; inline;
  81003. begin
  81004. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  81005. end;
  81006. procedure TCAN1_C1FIFOINT25.setTXHALFIE; inline;
  81007. begin
  81008. pTDefRegMap(@Self)^.&set := $02000000;
  81009. end;
  81010. procedure TCAN1_C1FIFOINT25.clearTXHALFIE; inline;
  81011. begin
  81012. pTDefRegMap(@Self)^.clr := $02000000;
  81013. end;
  81014. procedure TCAN1_C1FIFOINT25.setTXHALFIE(thebits : TBits_1); inline;
  81015. begin
  81016. if thebits = 0 then
  81017. pTDefRegMap(@Self)^.clr := $02000000
  81018. else
  81019. pTDefRegMap(@Self)^.&set := $02000000;
  81020. end;
  81021. function TCAN1_C1FIFOINT25.getTXHALFIE : TBits_1; inline;
  81022. begin
  81023. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  81024. end;
  81025. procedure TCAN1_C1FIFOINT25.setTXNFULLIE; inline;
  81026. begin
  81027. pTDefRegMap(@Self)^.&set := $04000000;
  81028. end;
  81029. procedure TCAN1_C1FIFOINT25.clearTXNFULLIE; inline;
  81030. begin
  81031. pTDefRegMap(@Self)^.clr := $04000000;
  81032. end;
  81033. procedure TCAN1_C1FIFOINT25.setTXNFULLIE(thebits : TBits_1); inline;
  81034. begin
  81035. if thebits = 0 then
  81036. pTDefRegMap(@Self)^.clr := $04000000
  81037. else
  81038. pTDefRegMap(@Self)^.&set := $04000000;
  81039. end;
  81040. function TCAN1_C1FIFOINT25.getTXNFULLIE : TBits_1; inline;
  81041. begin
  81042. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  81043. end;
  81044. procedure TCAN1_C1FIFOINT25.setw(thebits : TBits_32); inline;
  81045. begin
  81046. pTDefRegMap(@Self)^.val := thebits;
  81047. end;
  81048. function TCAN1_C1FIFOINT25.getw : TBits_32; inline;
  81049. begin
  81050. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81051. end;
  81052. procedure TCAN1_C1FIFOCI25.setCFIFOCI(thebits : TBits_5); inline;
  81053. begin
  81054. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  81055. end;
  81056. function TCAN1_C1FIFOCI25.getCFIFOCI : TBits_5; inline;
  81057. begin
  81058. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  81059. end;
  81060. procedure TCAN1_C1FIFOCI25.setw(thebits : TBits_32); inline;
  81061. begin
  81062. pTDefRegMap(@Self)^.val := thebits;
  81063. end;
  81064. function TCAN1_C1FIFOCI25.getw : TBits_32; inline;
  81065. begin
  81066. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81067. end;
  81068. procedure TCAN1_C1FIFOCON26.setTXPRI(thebits : TBits_2); inline;
  81069. begin
  81070. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  81071. end;
  81072. function TCAN1_C1FIFOCON26.getTXPRI : TBits_2; inline;
  81073. begin
  81074. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  81075. end;
  81076. procedure TCAN1_C1FIFOCON26.setRTREN; inline;
  81077. begin
  81078. pTDefRegMap(@Self)^.&set := $00000004;
  81079. end;
  81080. procedure TCAN1_C1FIFOCON26.clearRTREN; inline;
  81081. begin
  81082. pTDefRegMap(@Self)^.clr := $00000004;
  81083. end;
  81084. procedure TCAN1_C1FIFOCON26.setRTREN(thebits : TBits_1); inline;
  81085. begin
  81086. if thebits = 0 then
  81087. pTDefRegMap(@Self)^.clr := $00000004
  81088. else
  81089. pTDefRegMap(@Self)^.&set := $00000004;
  81090. end;
  81091. function TCAN1_C1FIFOCON26.getRTREN : TBits_1; inline;
  81092. begin
  81093. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81094. end;
  81095. procedure TCAN1_C1FIFOCON26.setTXREQ; inline;
  81096. begin
  81097. pTDefRegMap(@Self)^.&set := $00000008;
  81098. end;
  81099. procedure TCAN1_C1FIFOCON26.clearTXREQ; inline;
  81100. begin
  81101. pTDefRegMap(@Self)^.clr := $00000008;
  81102. end;
  81103. procedure TCAN1_C1FIFOCON26.setTXREQ(thebits : TBits_1); inline;
  81104. begin
  81105. if thebits = 0 then
  81106. pTDefRegMap(@Self)^.clr := $00000008
  81107. else
  81108. pTDefRegMap(@Self)^.&set := $00000008;
  81109. end;
  81110. function TCAN1_C1FIFOCON26.getTXREQ : TBits_1; inline;
  81111. begin
  81112. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81113. end;
  81114. procedure TCAN1_C1FIFOCON26.setTXERR; inline;
  81115. begin
  81116. pTDefRegMap(@Self)^.&set := $00000010;
  81117. end;
  81118. procedure TCAN1_C1FIFOCON26.clearTXERR; inline;
  81119. begin
  81120. pTDefRegMap(@Self)^.clr := $00000010;
  81121. end;
  81122. procedure TCAN1_C1FIFOCON26.setTXERR(thebits : TBits_1); inline;
  81123. begin
  81124. if thebits = 0 then
  81125. pTDefRegMap(@Self)^.clr := $00000010
  81126. else
  81127. pTDefRegMap(@Self)^.&set := $00000010;
  81128. end;
  81129. function TCAN1_C1FIFOCON26.getTXERR : TBits_1; inline;
  81130. begin
  81131. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  81132. end;
  81133. procedure TCAN1_C1FIFOCON26.setTXLARB; inline;
  81134. begin
  81135. pTDefRegMap(@Self)^.&set := $00000020;
  81136. end;
  81137. procedure TCAN1_C1FIFOCON26.clearTXLARB; inline;
  81138. begin
  81139. pTDefRegMap(@Self)^.clr := $00000020;
  81140. end;
  81141. procedure TCAN1_C1FIFOCON26.setTXLARB(thebits : TBits_1); inline;
  81142. begin
  81143. if thebits = 0 then
  81144. pTDefRegMap(@Self)^.clr := $00000020
  81145. else
  81146. pTDefRegMap(@Self)^.&set := $00000020;
  81147. end;
  81148. function TCAN1_C1FIFOCON26.getTXLARB : TBits_1; inline;
  81149. begin
  81150. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  81151. end;
  81152. procedure TCAN1_C1FIFOCON26.setTXABAT; inline;
  81153. begin
  81154. pTDefRegMap(@Self)^.&set := $00000040;
  81155. end;
  81156. procedure TCAN1_C1FIFOCON26.clearTXABAT; inline;
  81157. begin
  81158. pTDefRegMap(@Self)^.clr := $00000040;
  81159. end;
  81160. procedure TCAN1_C1FIFOCON26.setTXABAT(thebits : TBits_1); inline;
  81161. begin
  81162. if thebits = 0 then
  81163. pTDefRegMap(@Self)^.clr := $00000040
  81164. else
  81165. pTDefRegMap(@Self)^.&set := $00000040;
  81166. end;
  81167. function TCAN1_C1FIFOCON26.getTXABAT : TBits_1; inline;
  81168. begin
  81169. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  81170. end;
  81171. procedure TCAN1_C1FIFOCON26.setTXEN; inline;
  81172. begin
  81173. pTDefRegMap(@Self)^.&set := $00000080;
  81174. end;
  81175. procedure TCAN1_C1FIFOCON26.clearTXEN; inline;
  81176. begin
  81177. pTDefRegMap(@Self)^.clr := $00000080;
  81178. end;
  81179. procedure TCAN1_C1FIFOCON26.setTXEN(thebits : TBits_1); inline;
  81180. begin
  81181. if thebits = 0 then
  81182. pTDefRegMap(@Self)^.clr := $00000080
  81183. else
  81184. pTDefRegMap(@Self)^.&set := $00000080;
  81185. end;
  81186. function TCAN1_C1FIFOCON26.getTXEN : TBits_1; inline;
  81187. begin
  81188. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  81189. end;
  81190. procedure TCAN1_C1FIFOCON26.setDONLY; inline;
  81191. begin
  81192. pTDefRegMap(@Self)^.&set := $00001000;
  81193. end;
  81194. procedure TCAN1_C1FIFOCON26.clearDONLY; inline;
  81195. begin
  81196. pTDefRegMap(@Self)^.clr := $00001000;
  81197. end;
  81198. procedure TCAN1_C1FIFOCON26.setDONLY(thebits : TBits_1); inline;
  81199. begin
  81200. if thebits = 0 then
  81201. pTDefRegMap(@Self)^.clr := $00001000
  81202. else
  81203. pTDefRegMap(@Self)^.&set := $00001000;
  81204. end;
  81205. function TCAN1_C1FIFOCON26.getDONLY : TBits_1; inline;
  81206. begin
  81207. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  81208. end;
  81209. procedure TCAN1_C1FIFOCON26.setUINC; inline;
  81210. begin
  81211. pTDefRegMap(@Self)^.&set := $00002000;
  81212. end;
  81213. procedure TCAN1_C1FIFOCON26.clearUINC; inline;
  81214. begin
  81215. pTDefRegMap(@Self)^.clr := $00002000;
  81216. end;
  81217. procedure TCAN1_C1FIFOCON26.setUINC(thebits : TBits_1); inline;
  81218. begin
  81219. if thebits = 0 then
  81220. pTDefRegMap(@Self)^.clr := $00002000
  81221. else
  81222. pTDefRegMap(@Self)^.&set := $00002000;
  81223. end;
  81224. function TCAN1_C1FIFOCON26.getUINC : TBits_1; inline;
  81225. begin
  81226. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  81227. end;
  81228. procedure TCAN1_C1FIFOCON26.setFRESET; inline;
  81229. begin
  81230. pTDefRegMap(@Self)^.&set := $00004000;
  81231. end;
  81232. procedure TCAN1_C1FIFOCON26.clearFRESET; inline;
  81233. begin
  81234. pTDefRegMap(@Self)^.clr := $00004000;
  81235. end;
  81236. procedure TCAN1_C1FIFOCON26.setFRESET(thebits : TBits_1); inline;
  81237. begin
  81238. if thebits = 0 then
  81239. pTDefRegMap(@Self)^.clr := $00004000
  81240. else
  81241. pTDefRegMap(@Self)^.&set := $00004000;
  81242. end;
  81243. function TCAN1_C1FIFOCON26.getFRESET : TBits_1; inline;
  81244. begin
  81245. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  81246. end;
  81247. procedure TCAN1_C1FIFOCON26.setFSIZE(thebits : TBits_5); inline;
  81248. begin
  81249. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  81250. end;
  81251. function TCAN1_C1FIFOCON26.getFSIZE : TBits_5; inline;
  81252. begin
  81253. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  81254. end;
  81255. procedure TCAN1_C1FIFOCON26.setw(thebits : TBits_32); inline;
  81256. begin
  81257. pTDefRegMap(@Self)^.val := thebits;
  81258. end;
  81259. function TCAN1_C1FIFOCON26.getw : TBits_32; inline;
  81260. begin
  81261. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81262. end;
  81263. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIF; inline;
  81264. begin
  81265. pTDefRegMap(@Self)^.&set := $00000001;
  81266. end;
  81267. procedure TCAN1_C1FIFOINT26.clearRXNEMPTYIF; inline;
  81268. begin
  81269. pTDefRegMap(@Self)^.clr := $00000001;
  81270. end;
  81271. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIF(thebits : TBits_1); inline;
  81272. begin
  81273. if thebits = 0 then
  81274. pTDefRegMap(@Self)^.clr := $00000001
  81275. else
  81276. pTDefRegMap(@Self)^.&set := $00000001;
  81277. end;
  81278. function TCAN1_C1FIFOINT26.getRXNEMPTYIF : TBits_1; inline;
  81279. begin
  81280. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  81281. end;
  81282. procedure TCAN1_C1FIFOINT26.setRXHALFIF; inline;
  81283. begin
  81284. pTDefRegMap(@Self)^.&set := $00000002;
  81285. end;
  81286. procedure TCAN1_C1FIFOINT26.clearRXHALFIF; inline;
  81287. begin
  81288. pTDefRegMap(@Self)^.clr := $00000002;
  81289. end;
  81290. procedure TCAN1_C1FIFOINT26.setRXHALFIF(thebits : TBits_1); inline;
  81291. begin
  81292. if thebits = 0 then
  81293. pTDefRegMap(@Self)^.clr := $00000002
  81294. else
  81295. pTDefRegMap(@Self)^.&set := $00000002;
  81296. end;
  81297. function TCAN1_C1FIFOINT26.getRXHALFIF : TBits_1; inline;
  81298. begin
  81299. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  81300. end;
  81301. procedure TCAN1_C1FIFOINT26.setRXFULLIF; inline;
  81302. begin
  81303. pTDefRegMap(@Self)^.&set := $00000004;
  81304. end;
  81305. procedure TCAN1_C1FIFOINT26.clearRXFULLIF; inline;
  81306. begin
  81307. pTDefRegMap(@Self)^.clr := $00000004;
  81308. end;
  81309. procedure TCAN1_C1FIFOINT26.setRXFULLIF(thebits : TBits_1); inline;
  81310. begin
  81311. if thebits = 0 then
  81312. pTDefRegMap(@Self)^.clr := $00000004
  81313. else
  81314. pTDefRegMap(@Self)^.&set := $00000004;
  81315. end;
  81316. function TCAN1_C1FIFOINT26.getRXFULLIF : TBits_1; inline;
  81317. begin
  81318. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81319. end;
  81320. procedure TCAN1_C1FIFOINT26.setRXOVFLIF; inline;
  81321. begin
  81322. pTDefRegMap(@Self)^.&set := $00000008;
  81323. end;
  81324. procedure TCAN1_C1FIFOINT26.clearRXOVFLIF; inline;
  81325. begin
  81326. pTDefRegMap(@Self)^.clr := $00000008;
  81327. end;
  81328. procedure TCAN1_C1FIFOINT26.setRXOVFLIF(thebits : TBits_1); inline;
  81329. begin
  81330. if thebits = 0 then
  81331. pTDefRegMap(@Self)^.clr := $00000008
  81332. else
  81333. pTDefRegMap(@Self)^.&set := $00000008;
  81334. end;
  81335. function TCAN1_C1FIFOINT26.getRXOVFLIF : TBits_1; inline;
  81336. begin
  81337. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81338. end;
  81339. procedure TCAN1_C1FIFOINT26.setTXEMPTYIF; inline;
  81340. begin
  81341. pTDefRegMap(@Self)^.&set := $00000100;
  81342. end;
  81343. procedure TCAN1_C1FIFOINT26.clearTXEMPTYIF; inline;
  81344. begin
  81345. pTDefRegMap(@Self)^.clr := $00000100;
  81346. end;
  81347. procedure TCAN1_C1FIFOINT26.setTXEMPTYIF(thebits : TBits_1); inline;
  81348. begin
  81349. if thebits = 0 then
  81350. pTDefRegMap(@Self)^.clr := $00000100
  81351. else
  81352. pTDefRegMap(@Self)^.&set := $00000100;
  81353. end;
  81354. function TCAN1_C1FIFOINT26.getTXEMPTYIF : TBits_1; inline;
  81355. begin
  81356. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  81357. end;
  81358. procedure TCAN1_C1FIFOINT26.setTXHALFIF; inline;
  81359. begin
  81360. pTDefRegMap(@Self)^.&set := $00000200;
  81361. end;
  81362. procedure TCAN1_C1FIFOINT26.clearTXHALFIF; inline;
  81363. begin
  81364. pTDefRegMap(@Self)^.clr := $00000200;
  81365. end;
  81366. procedure TCAN1_C1FIFOINT26.setTXHALFIF(thebits : TBits_1); inline;
  81367. begin
  81368. if thebits = 0 then
  81369. pTDefRegMap(@Self)^.clr := $00000200
  81370. else
  81371. pTDefRegMap(@Self)^.&set := $00000200;
  81372. end;
  81373. function TCAN1_C1FIFOINT26.getTXHALFIF : TBits_1; inline;
  81374. begin
  81375. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  81376. end;
  81377. procedure TCAN1_C1FIFOINT26.setTXNFULLIF; inline;
  81378. begin
  81379. pTDefRegMap(@Self)^.&set := $00000400;
  81380. end;
  81381. procedure TCAN1_C1FIFOINT26.clearTXNFULLIF; inline;
  81382. begin
  81383. pTDefRegMap(@Self)^.clr := $00000400;
  81384. end;
  81385. procedure TCAN1_C1FIFOINT26.setTXNFULLIF(thebits : TBits_1); inline;
  81386. begin
  81387. if thebits = 0 then
  81388. pTDefRegMap(@Self)^.clr := $00000400
  81389. else
  81390. pTDefRegMap(@Self)^.&set := $00000400;
  81391. end;
  81392. function TCAN1_C1FIFOINT26.getTXNFULLIF : TBits_1; inline;
  81393. begin
  81394. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  81395. end;
  81396. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIE; inline;
  81397. begin
  81398. pTDefRegMap(@Self)^.&set := $00010000;
  81399. end;
  81400. procedure TCAN1_C1FIFOINT26.clearRXNEMPTYIE; inline;
  81401. begin
  81402. pTDefRegMap(@Self)^.clr := $00010000;
  81403. end;
  81404. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIE(thebits : TBits_1); inline;
  81405. begin
  81406. if thebits = 0 then
  81407. pTDefRegMap(@Self)^.clr := $00010000
  81408. else
  81409. pTDefRegMap(@Self)^.&set := $00010000;
  81410. end;
  81411. function TCAN1_C1FIFOINT26.getRXNEMPTYIE : TBits_1; inline;
  81412. begin
  81413. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  81414. end;
  81415. procedure TCAN1_C1FIFOINT26.setRXHALFIE; inline;
  81416. begin
  81417. pTDefRegMap(@Self)^.&set := $00020000;
  81418. end;
  81419. procedure TCAN1_C1FIFOINT26.clearRXHALFIE; inline;
  81420. begin
  81421. pTDefRegMap(@Self)^.clr := $00020000;
  81422. end;
  81423. procedure TCAN1_C1FIFOINT26.setRXHALFIE(thebits : TBits_1); inline;
  81424. begin
  81425. if thebits = 0 then
  81426. pTDefRegMap(@Self)^.clr := $00020000
  81427. else
  81428. pTDefRegMap(@Self)^.&set := $00020000;
  81429. end;
  81430. function TCAN1_C1FIFOINT26.getRXHALFIE : TBits_1; inline;
  81431. begin
  81432. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  81433. end;
  81434. procedure TCAN1_C1FIFOINT26.setRXFULLIE; inline;
  81435. begin
  81436. pTDefRegMap(@Self)^.&set := $00040000;
  81437. end;
  81438. procedure TCAN1_C1FIFOINT26.clearRXFULLIE; inline;
  81439. begin
  81440. pTDefRegMap(@Self)^.clr := $00040000;
  81441. end;
  81442. procedure TCAN1_C1FIFOINT26.setRXFULLIE(thebits : TBits_1); inline;
  81443. begin
  81444. if thebits = 0 then
  81445. pTDefRegMap(@Self)^.clr := $00040000
  81446. else
  81447. pTDefRegMap(@Self)^.&set := $00040000;
  81448. end;
  81449. function TCAN1_C1FIFOINT26.getRXFULLIE : TBits_1; inline;
  81450. begin
  81451. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  81452. end;
  81453. procedure TCAN1_C1FIFOINT26.setRXOVFLIE; inline;
  81454. begin
  81455. pTDefRegMap(@Self)^.&set := $00080000;
  81456. end;
  81457. procedure TCAN1_C1FIFOINT26.clearRXOVFLIE; inline;
  81458. begin
  81459. pTDefRegMap(@Self)^.clr := $00080000;
  81460. end;
  81461. procedure TCAN1_C1FIFOINT26.setRXOVFLIE(thebits : TBits_1); inline;
  81462. begin
  81463. if thebits = 0 then
  81464. pTDefRegMap(@Self)^.clr := $00080000
  81465. else
  81466. pTDefRegMap(@Self)^.&set := $00080000;
  81467. end;
  81468. function TCAN1_C1FIFOINT26.getRXOVFLIE : TBits_1; inline;
  81469. begin
  81470. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  81471. end;
  81472. procedure TCAN1_C1FIFOINT26.setTXEMPTYIE; inline;
  81473. begin
  81474. pTDefRegMap(@Self)^.&set := $01000000;
  81475. end;
  81476. procedure TCAN1_C1FIFOINT26.clearTXEMPTYIE; inline;
  81477. begin
  81478. pTDefRegMap(@Self)^.clr := $01000000;
  81479. end;
  81480. procedure TCAN1_C1FIFOINT26.setTXEMPTYIE(thebits : TBits_1); inline;
  81481. begin
  81482. if thebits = 0 then
  81483. pTDefRegMap(@Self)^.clr := $01000000
  81484. else
  81485. pTDefRegMap(@Self)^.&set := $01000000;
  81486. end;
  81487. function TCAN1_C1FIFOINT26.getTXEMPTYIE : TBits_1; inline;
  81488. begin
  81489. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  81490. end;
  81491. procedure TCAN1_C1FIFOINT26.setTXHALFIE; inline;
  81492. begin
  81493. pTDefRegMap(@Self)^.&set := $02000000;
  81494. end;
  81495. procedure TCAN1_C1FIFOINT26.clearTXHALFIE; inline;
  81496. begin
  81497. pTDefRegMap(@Self)^.clr := $02000000;
  81498. end;
  81499. procedure TCAN1_C1FIFOINT26.setTXHALFIE(thebits : TBits_1); inline;
  81500. begin
  81501. if thebits = 0 then
  81502. pTDefRegMap(@Self)^.clr := $02000000
  81503. else
  81504. pTDefRegMap(@Self)^.&set := $02000000;
  81505. end;
  81506. function TCAN1_C1FIFOINT26.getTXHALFIE : TBits_1; inline;
  81507. begin
  81508. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  81509. end;
  81510. procedure TCAN1_C1FIFOINT26.setTXNFULLIE; inline;
  81511. begin
  81512. pTDefRegMap(@Self)^.&set := $04000000;
  81513. end;
  81514. procedure TCAN1_C1FIFOINT26.clearTXNFULLIE; inline;
  81515. begin
  81516. pTDefRegMap(@Self)^.clr := $04000000;
  81517. end;
  81518. procedure TCAN1_C1FIFOINT26.setTXNFULLIE(thebits : TBits_1); inline;
  81519. begin
  81520. if thebits = 0 then
  81521. pTDefRegMap(@Self)^.clr := $04000000
  81522. else
  81523. pTDefRegMap(@Self)^.&set := $04000000;
  81524. end;
  81525. function TCAN1_C1FIFOINT26.getTXNFULLIE : TBits_1; inline;
  81526. begin
  81527. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  81528. end;
  81529. procedure TCAN1_C1FIFOINT26.setw(thebits : TBits_32); inline;
  81530. begin
  81531. pTDefRegMap(@Self)^.val := thebits;
  81532. end;
  81533. function TCAN1_C1FIFOINT26.getw : TBits_32; inline;
  81534. begin
  81535. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81536. end;
  81537. procedure TCAN1_C1FIFOCI26.setCFIFOCI(thebits : TBits_5); inline;
  81538. begin
  81539. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  81540. end;
  81541. function TCAN1_C1FIFOCI26.getCFIFOCI : TBits_5; inline;
  81542. begin
  81543. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  81544. end;
  81545. procedure TCAN1_C1FIFOCI26.setw(thebits : TBits_32); inline;
  81546. begin
  81547. pTDefRegMap(@Self)^.val := thebits;
  81548. end;
  81549. function TCAN1_C1FIFOCI26.getw : TBits_32; inline;
  81550. begin
  81551. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81552. end;
  81553. procedure TCAN1_C1FIFOCON27.setTXPRI(thebits : TBits_2); inline;
  81554. begin
  81555. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  81556. end;
  81557. function TCAN1_C1FIFOCON27.getTXPRI : TBits_2; inline;
  81558. begin
  81559. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  81560. end;
  81561. procedure TCAN1_C1FIFOCON27.setRTREN; inline;
  81562. begin
  81563. pTDefRegMap(@Self)^.&set := $00000004;
  81564. end;
  81565. procedure TCAN1_C1FIFOCON27.clearRTREN; inline;
  81566. begin
  81567. pTDefRegMap(@Self)^.clr := $00000004;
  81568. end;
  81569. procedure TCAN1_C1FIFOCON27.setRTREN(thebits : TBits_1); inline;
  81570. begin
  81571. if thebits = 0 then
  81572. pTDefRegMap(@Self)^.clr := $00000004
  81573. else
  81574. pTDefRegMap(@Self)^.&set := $00000004;
  81575. end;
  81576. function TCAN1_C1FIFOCON27.getRTREN : TBits_1; inline;
  81577. begin
  81578. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81579. end;
  81580. procedure TCAN1_C1FIFOCON27.setTXREQ; inline;
  81581. begin
  81582. pTDefRegMap(@Self)^.&set := $00000008;
  81583. end;
  81584. procedure TCAN1_C1FIFOCON27.clearTXREQ; inline;
  81585. begin
  81586. pTDefRegMap(@Self)^.clr := $00000008;
  81587. end;
  81588. procedure TCAN1_C1FIFOCON27.setTXREQ(thebits : TBits_1); inline;
  81589. begin
  81590. if thebits = 0 then
  81591. pTDefRegMap(@Self)^.clr := $00000008
  81592. else
  81593. pTDefRegMap(@Self)^.&set := $00000008;
  81594. end;
  81595. function TCAN1_C1FIFOCON27.getTXREQ : TBits_1; inline;
  81596. begin
  81597. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81598. end;
  81599. procedure TCAN1_C1FIFOCON27.setTXERR; inline;
  81600. begin
  81601. pTDefRegMap(@Self)^.&set := $00000010;
  81602. end;
  81603. procedure TCAN1_C1FIFOCON27.clearTXERR; inline;
  81604. begin
  81605. pTDefRegMap(@Self)^.clr := $00000010;
  81606. end;
  81607. procedure TCAN1_C1FIFOCON27.setTXERR(thebits : TBits_1); inline;
  81608. begin
  81609. if thebits = 0 then
  81610. pTDefRegMap(@Self)^.clr := $00000010
  81611. else
  81612. pTDefRegMap(@Self)^.&set := $00000010;
  81613. end;
  81614. function TCAN1_C1FIFOCON27.getTXERR : TBits_1; inline;
  81615. begin
  81616. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  81617. end;
  81618. procedure TCAN1_C1FIFOCON27.setTXLARB; inline;
  81619. begin
  81620. pTDefRegMap(@Self)^.&set := $00000020;
  81621. end;
  81622. procedure TCAN1_C1FIFOCON27.clearTXLARB; inline;
  81623. begin
  81624. pTDefRegMap(@Self)^.clr := $00000020;
  81625. end;
  81626. procedure TCAN1_C1FIFOCON27.setTXLARB(thebits : TBits_1); inline;
  81627. begin
  81628. if thebits = 0 then
  81629. pTDefRegMap(@Self)^.clr := $00000020
  81630. else
  81631. pTDefRegMap(@Self)^.&set := $00000020;
  81632. end;
  81633. function TCAN1_C1FIFOCON27.getTXLARB : TBits_1; inline;
  81634. begin
  81635. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  81636. end;
  81637. procedure TCAN1_C1FIFOCON27.setTXABAT; inline;
  81638. begin
  81639. pTDefRegMap(@Self)^.&set := $00000040;
  81640. end;
  81641. procedure TCAN1_C1FIFOCON27.clearTXABAT; inline;
  81642. begin
  81643. pTDefRegMap(@Self)^.clr := $00000040;
  81644. end;
  81645. procedure TCAN1_C1FIFOCON27.setTXABAT(thebits : TBits_1); inline;
  81646. begin
  81647. if thebits = 0 then
  81648. pTDefRegMap(@Self)^.clr := $00000040
  81649. else
  81650. pTDefRegMap(@Self)^.&set := $00000040;
  81651. end;
  81652. function TCAN1_C1FIFOCON27.getTXABAT : TBits_1; inline;
  81653. begin
  81654. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  81655. end;
  81656. procedure TCAN1_C1FIFOCON27.setTXEN; inline;
  81657. begin
  81658. pTDefRegMap(@Self)^.&set := $00000080;
  81659. end;
  81660. procedure TCAN1_C1FIFOCON27.clearTXEN; inline;
  81661. begin
  81662. pTDefRegMap(@Self)^.clr := $00000080;
  81663. end;
  81664. procedure TCAN1_C1FIFOCON27.setTXEN(thebits : TBits_1); inline;
  81665. begin
  81666. if thebits = 0 then
  81667. pTDefRegMap(@Self)^.clr := $00000080
  81668. else
  81669. pTDefRegMap(@Self)^.&set := $00000080;
  81670. end;
  81671. function TCAN1_C1FIFOCON27.getTXEN : TBits_1; inline;
  81672. begin
  81673. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  81674. end;
  81675. procedure TCAN1_C1FIFOCON27.setDONLY; inline;
  81676. begin
  81677. pTDefRegMap(@Self)^.&set := $00001000;
  81678. end;
  81679. procedure TCAN1_C1FIFOCON27.clearDONLY; inline;
  81680. begin
  81681. pTDefRegMap(@Self)^.clr := $00001000;
  81682. end;
  81683. procedure TCAN1_C1FIFOCON27.setDONLY(thebits : TBits_1); inline;
  81684. begin
  81685. if thebits = 0 then
  81686. pTDefRegMap(@Self)^.clr := $00001000
  81687. else
  81688. pTDefRegMap(@Self)^.&set := $00001000;
  81689. end;
  81690. function TCAN1_C1FIFOCON27.getDONLY : TBits_1; inline;
  81691. begin
  81692. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  81693. end;
  81694. procedure TCAN1_C1FIFOCON27.setUINC; inline;
  81695. begin
  81696. pTDefRegMap(@Self)^.&set := $00002000;
  81697. end;
  81698. procedure TCAN1_C1FIFOCON27.clearUINC; inline;
  81699. begin
  81700. pTDefRegMap(@Self)^.clr := $00002000;
  81701. end;
  81702. procedure TCAN1_C1FIFOCON27.setUINC(thebits : TBits_1); inline;
  81703. begin
  81704. if thebits = 0 then
  81705. pTDefRegMap(@Self)^.clr := $00002000
  81706. else
  81707. pTDefRegMap(@Self)^.&set := $00002000;
  81708. end;
  81709. function TCAN1_C1FIFOCON27.getUINC : TBits_1; inline;
  81710. begin
  81711. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  81712. end;
  81713. procedure TCAN1_C1FIFOCON27.setFRESET; inline;
  81714. begin
  81715. pTDefRegMap(@Self)^.&set := $00004000;
  81716. end;
  81717. procedure TCAN1_C1FIFOCON27.clearFRESET; inline;
  81718. begin
  81719. pTDefRegMap(@Self)^.clr := $00004000;
  81720. end;
  81721. procedure TCAN1_C1FIFOCON27.setFRESET(thebits : TBits_1); inline;
  81722. begin
  81723. if thebits = 0 then
  81724. pTDefRegMap(@Self)^.clr := $00004000
  81725. else
  81726. pTDefRegMap(@Self)^.&set := $00004000;
  81727. end;
  81728. function TCAN1_C1FIFOCON27.getFRESET : TBits_1; inline;
  81729. begin
  81730. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  81731. end;
  81732. procedure TCAN1_C1FIFOCON27.setFSIZE(thebits : TBits_5); inline;
  81733. begin
  81734. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  81735. end;
  81736. function TCAN1_C1FIFOCON27.getFSIZE : TBits_5; inline;
  81737. begin
  81738. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  81739. end;
  81740. procedure TCAN1_C1FIFOCON27.setw(thebits : TBits_32); inline;
  81741. begin
  81742. pTDefRegMap(@Self)^.val := thebits;
  81743. end;
  81744. function TCAN1_C1FIFOCON27.getw : TBits_32; inline;
  81745. begin
  81746. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81747. end;
  81748. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIF; inline;
  81749. begin
  81750. pTDefRegMap(@Self)^.&set := $00000001;
  81751. end;
  81752. procedure TCAN1_C1FIFOINT27.clearRXNEMPTYIF; inline;
  81753. begin
  81754. pTDefRegMap(@Self)^.clr := $00000001;
  81755. end;
  81756. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIF(thebits : TBits_1); inline;
  81757. begin
  81758. if thebits = 0 then
  81759. pTDefRegMap(@Self)^.clr := $00000001
  81760. else
  81761. pTDefRegMap(@Self)^.&set := $00000001;
  81762. end;
  81763. function TCAN1_C1FIFOINT27.getRXNEMPTYIF : TBits_1; inline;
  81764. begin
  81765. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  81766. end;
  81767. procedure TCAN1_C1FIFOINT27.setRXHALFIF; inline;
  81768. begin
  81769. pTDefRegMap(@Self)^.&set := $00000002;
  81770. end;
  81771. procedure TCAN1_C1FIFOINT27.clearRXHALFIF; inline;
  81772. begin
  81773. pTDefRegMap(@Self)^.clr := $00000002;
  81774. end;
  81775. procedure TCAN1_C1FIFOINT27.setRXHALFIF(thebits : TBits_1); inline;
  81776. begin
  81777. if thebits = 0 then
  81778. pTDefRegMap(@Self)^.clr := $00000002
  81779. else
  81780. pTDefRegMap(@Self)^.&set := $00000002;
  81781. end;
  81782. function TCAN1_C1FIFOINT27.getRXHALFIF : TBits_1; inline;
  81783. begin
  81784. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  81785. end;
  81786. procedure TCAN1_C1FIFOINT27.setRXFULLIF; inline;
  81787. begin
  81788. pTDefRegMap(@Self)^.&set := $00000004;
  81789. end;
  81790. procedure TCAN1_C1FIFOINT27.clearRXFULLIF; inline;
  81791. begin
  81792. pTDefRegMap(@Self)^.clr := $00000004;
  81793. end;
  81794. procedure TCAN1_C1FIFOINT27.setRXFULLIF(thebits : TBits_1); inline;
  81795. begin
  81796. if thebits = 0 then
  81797. pTDefRegMap(@Self)^.clr := $00000004
  81798. else
  81799. pTDefRegMap(@Self)^.&set := $00000004;
  81800. end;
  81801. function TCAN1_C1FIFOINT27.getRXFULLIF : TBits_1; inline;
  81802. begin
  81803. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81804. end;
  81805. procedure TCAN1_C1FIFOINT27.setRXOVFLIF; inline;
  81806. begin
  81807. pTDefRegMap(@Self)^.&set := $00000008;
  81808. end;
  81809. procedure TCAN1_C1FIFOINT27.clearRXOVFLIF; inline;
  81810. begin
  81811. pTDefRegMap(@Self)^.clr := $00000008;
  81812. end;
  81813. procedure TCAN1_C1FIFOINT27.setRXOVFLIF(thebits : TBits_1); inline;
  81814. begin
  81815. if thebits = 0 then
  81816. pTDefRegMap(@Self)^.clr := $00000008
  81817. else
  81818. pTDefRegMap(@Self)^.&set := $00000008;
  81819. end;
  81820. function TCAN1_C1FIFOINT27.getRXOVFLIF : TBits_1; inline;
  81821. begin
  81822. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81823. end;
  81824. procedure TCAN1_C1FIFOINT27.setTXEMPTYIF; inline;
  81825. begin
  81826. pTDefRegMap(@Self)^.&set := $00000100;
  81827. end;
  81828. procedure TCAN1_C1FIFOINT27.clearTXEMPTYIF; inline;
  81829. begin
  81830. pTDefRegMap(@Self)^.clr := $00000100;
  81831. end;
  81832. procedure TCAN1_C1FIFOINT27.setTXEMPTYIF(thebits : TBits_1); inline;
  81833. begin
  81834. if thebits = 0 then
  81835. pTDefRegMap(@Self)^.clr := $00000100
  81836. else
  81837. pTDefRegMap(@Self)^.&set := $00000100;
  81838. end;
  81839. function TCAN1_C1FIFOINT27.getTXEMPTYIF : TBits_1; inline;
  81840. begin
  81841. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  81842. end;
  81843. procedure TCAN1_C1FIFOINT27.setTXHALFIF; inline;
  81844. begin
  81845. pTDefRegMap(@Self)^.&set := $00000200;
  81846. end;
  81847. procedure TCAN1_C1FIFOINT27.clearTXHALFIF; inline;
  81848. begin
  81849. pTDefRegMap(@Self)^.clr := $00000200;
  81850. end;
  81851. procedure TCAN1_C1FIFOINT27.setTXHALFIF(thebits : TBits_1); inline;
  81852. begin
  81853. if thebits = 0 then
  81854. pTDefRegMap(@Self)^.clr := $00000200
  81855. else
  81856. pTDefRegMap(@Self)^.&set := $00000200;
  81857. end;
  81858. function TCAN1_C1FIFOINT27.getTXHALFIF : TBits_1; inline;
  81859. begin
  81860. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  81861. end;
  81862. procedure TCAN1_C1FIFOINT27.setTXNFULLIF; inline;
  81863. begin
  81864. pTDefRegMap(@Self)^.&set := $00000400;
  81865. end;
  81866. procedure TCAN1_C1FIFOINT27.clearTXNFULLIF; inline;
  81867. begin
  81868. pTDefRegMap(@Self)^.clr := $00000400;
  81869. end;
  81870. procedure TCAN1_C1FIFOINT27.setTXNFULLIF(thebits : TBits_1); inline;
  81871. begin
  81872. if thebits = 0 then
  81873. pTDefRegMap(@Self)^.clr := $00000400
  81874. else
  81875. pTDefRegMap(@Self)^.&set := $00000400;
  81876. end;
  81877. function TCAN1_C1FIFOINT27.getTXNFULLIF : TBits_1; inline;
  81878. begin
  81879. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  81880. end;
  81881. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIE; inline;
  81882. begin
  81883. pTDefRegMap(@Self)^.&set := $00010000;
  81884. end;
  81885. procedure TCAN1_C1FIFOINT27.clearRXNEMPTYIE; inline;
  81886. begin
  81887. pTDefRegMap(@Self)^.clr := $00010000;
  81888. end;
  81889. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIE(thebits : TBits_1); inline;
  81890. begin
  81891. if thebits = 0 then
  81892. pTDefRegMap(@Self)^.clr := $00010000
  81893. else
  81894. pTDefRegMap(@Self)^.&set := $00010000;
  81895. end;
  81896. function TCAN1_C1FIFOINT27.getRXNEMPTYIE : TBits_1; inline;
  81897. begin
  81898. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  81899. end;
  81900. procedure TCAN1_C1FIFOINT27.setRXHALFIE; inline;
  81901. begin
  81902. pTDefRegMap(@Self)^.&set := $00020000;
  81903. end;
  81904. procedure TCAN1_C1FIFOINT27.clearRXHALFIE; inline;
  81905. begin
  81906. pTDefRegMap(@Self)^.clr := $00020000;
  81907. end;
  81908. procedure TCAN1_C1FIFOINT27.setRXHALFIE(thebits : TBits_1); inline;
  81909. begin
  81910. if thebits = 0 then
  81911. pTDefRegMap(@Self)^.clr := $00020000
  81912. else
  81913. pTDefRegMap(@Self)^.&set := $00020000;
  81914. end;
  81915. function TCAN1_C1FIFOINT27.getRXHALFIE : TBits_1; inline;
  81916. begin
  81917. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  81918. end;
  81919. procedure TCAN1_C1FIFOINT27.setRXFULLIE; inline;
  81920. begin
  81921. pTDefRegMap(@Self)^.&set := $00040000;
  81922. end;
  81923. procedure TCAN1_C1FIFOINT27.clearRXFULLIE; inline;
  81924. begin
  81925. pTDefRegMap(@Self)^.clr := $00040000;
  81926. end;
  81927. procedure TCAN1_C1FIFOINT27.setRXFULLIE(thebits : TBits_1); inline;
  81928. begin
  81929. if thebits = 0 then
  81930. pTDefRegMap(@Self)^.clr := $00040000
  81931. else
  81932. pTDefRegMap(@Self)^.&set := $00040000;
  81933. end;
  81934. function TCAN1_C1FIFOINT27.getRXFULLIE : TBits_1; inline;
  81935. begin
  81936. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  81937. end;
  81938. procedure TCAN1_C1FIFOINT27.setRXOVFLIE; inline;
  81939. begin
  81940. pTDefRegMap(@Self)^.&set := $00080000;
  81941. end;
  81942. procedure TCAN1_C1FIFOINT27.clearRXOVFLIE; inline;
  81943. begin
  81944. pTDefRegMap(@Self)^.clr := $00080000;
  81945. end;
  81946. procedure TCAN1_C1FIFOINT27.setRXOVFLIE(thebits : TBits_1); inline;
  81947. begin
  81948. if thebits = 0 then
  81949. pTDefRegMap(@Self)^.clr := $00080000
  81950. else
  81951. pTDefRegMap(@Self)^.&set := $00080000;
  81952. end;
  81953. function TCAN1_C1FIFOINT27.getRXOVFLIE : TBits_1; inline;
  81954. begin
  81955. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  81956. end;
  81957. procedure TCAN1_C1FIFOINT27.setTXEMPTYIE; inline;
  81958. begin
  81959. pTDefRegMap(@Self)^.&set := $01000000;
  81960. end;
  81961. procedure TCAN1_C1FIFOINT27.clearTXEMPTYIE; inline;
  81962. begin
  81963. pTDefRegMap(@Self)^.clr := $01000000;
  81964. end;
  81965. procedure TCAN1_C1FIFOINT27.setTXEMPTYIE(thebits : TBits_1); inline;
  81966. begin
  81967. if thebits = 0 then
  81968. pTDefRegMap(@Self)^.clr := $01000000
  81969. else
  81970. pTDefRegMap(@Self)^.&set := $01000000;
  81971. end;
  81972. function TCAN1_C1FIFOINT27.getTXEMPTYIE : TBits_1; inline;
  81973. begin
  81974. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  81975. end;
  81976. procedure TCAN1_C1FIFOINT27.setTXHALFIE; inline;
  81977. begin
  81978. pTDefRegMap(@Self)^.&set := $02000000;
  81979. end;
  81980. procedure TCAN1_C1FIFOINT27.clearTXHALFIE; inline;
  81981. begin
  81982. pTDefRegMap(@Self)^.clr := $02000000;
  81983. end;
  81984. procedure TCAN1_C1FIFOINT27.setTXHALFIE(thebits : TBits_1); inline;
  81985. begin
  81986. if thebits = 0 then
  81987. pTDefRegMap(@Self)^.clr := $02000000
  81988. else
  81989. pTDefRegMap(@Self)^.&set := $02000000;
  81990. end;
  81991. function TCAN1_C1FIFOINT27.getTXHALFIE : TBits_1; inline;
  81992. begin
  81993. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  81994. end;
  81995. procedure TCAN1_C1FIFOINT27.setTXNFULLIE; inline;
  81996. begin
  81997. pTDefRegMap(@Self)^.&set := $04000000;
  81998. end;
  81999. procedure TCAN1_C1FIFOINT27.clearTXNFULLIE; inline;
  82000. begin
  82001. pTDefRegMap(@Self)^.clr := $04000000;
  82002. end;
  82003. procedure TCAN1_C1FIFOINT27.setTXNFULLIE(thebits : TBits_1); inline;
  82004. begin
  82005. if thebits = 0 then
  82006. pTDefRegMap(@Self)^.clr := $04000000
  82007. else
  82008. pTDefRegMap(@Self)^.&set := $04000000;
  82009. end;
  82010. function TCAN1_C1FIFOINT27.getTXNFULLIE : TBits_1; inline;
  82011. begin
  82012. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  82013. end;
  82014. procedure TCAN1_C1FIFOINT27.setw(thebits : TBits_32); inline;
  82015. begin
  82016. pTDefRegMap(@Self)^.val := thebits;
  82017. end;
  82018. function TCAN1_C1FIFOINT27.getw : TBits_32; inline;
  82019. begin
  82020. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82021. end;
  82022. procedure TCAN1_C1FIFOCI27.setCFIFOCI(thebits : TBits_5); inline;
  82023. begin
  82024. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  82025. end;
  82026. function TCAN1_C1FIFOCI27.getCFIFOCI : TBits_5; inline;
  82027. begin
  82028. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  82029. end;
  82030. procedure TCAN1_C1FIFOCI27.setw(thebits : TBits_32); inline;
  82031. begin
  82032. pTDefRegMap(@Self)^.val := thebits;
  82033. end;
  82034. function TCAN1_C1FIFOCI27.getw : TBits_32; inline;
  82035. begin
  82036. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82037. end;
  82038. procedure TCAN1_C1FIFOCON28.setTXPRI(thebits : TBits_2); inline;
  82039. begin
  82040. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  82041. end;
  82042. function TCAN1_C1FIFOCON28.getTXPRI : TBits_2; inline;
  82043. begin
  82044. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  82045. end;
  82046. procedure TCAN1_C1FIFOCON28.setRTREN; inline;
  82047. begin
  82048. pTDefRegMap(@Self)^.&set := $00000004;
  82049. end;
  82050. procedure TCAN1_C1FIFOCON28.clearRTREN; inline;
  82051. begin
  82052. pTDefRegMap(@Self)^.clr := $00000004;
  82053. end;
  82054. procedure TCAN1_C1FIFOCON28.setRTREN(thebits : TBits_1); inline;
  82055. begin
  82056. if thebits = 0 then
  82057. pTDefRegMap(@Self)^.clr := $00000004
  82058. else
  82059. pTDefRegMap(@Self)^.&set := $00000004;
  82060. end;
  82061. function TCAN1_C1FIFOCON28.getRTREN : TBits_1; inline;
  82062. begin
  82063. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82064. end;
  82065. procedure TCAN1_C1FIFOCON28.setTXREQ; inline;
  82066. begin
  82067. pTDefRegMap(@Self)^.&set := $00000008;
  82068. end;
  82069. procedure TCAN1_C1FIFOCON28.clearTXREQ; inline;
  82070. begin
  82071. pTDefRegMap(@Self)^.clr := $00000008;
  82072. end;
  82073. procedure TCAN1_C1FIFOCON28.setTXREQ(thebits : TBits_1); inline;
  82074. begin
  82075. if thebits = 0 then
  82076. pTDefRegMap(@Self)^.clr := $00000008
  82077. else
  82078. pTDefRegMap(@Self)^.&set := $00000008;
  82079. end;
  82080. function TCAN1_C1FIFOCON28.getTXREQ : TBits_1; inline;
  82081. begin
  82082. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82083. end;
  82084. procedure TCAN1_C1FIFOCON28.setTXERR; inline;
  82085. begin
  82086. pTDefRegMap(@Self)^.&set := $00000010;
  82087. end;
  82088. procedure TCAN1_C1FIFOCON28.clearTXERR; inline;
  82089. begin
  82090. pTDefRegMap(@Self)^.clr := $00000010;
  82091. end;
  82092. procedure TCAN1_C1FIFOCON28.setTXERR(thebits : TBits_1); inline;
  82093. begin
  82094. if thebits = 0 then
  82095. pTDefRegMap(@Self)^.clr := $00000010
  82096. else
  82097. pTDefRegMap(@Self)^.&set := $00000010;
  82098. end;
  82099. function TCAN1_C1FIFOCON28.getTXERR : TBits_1; inline;
  82100. begin
  82101. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  82102. end;
  82103. procedure TCAN1_C1FIFOCON28.setTXLARB; inline;
  82104. begin
  82105. pTDefRegMap(@Self)^.&set := $00000020;
  82106. end;
  82107. procedure TCAN1_C1FIFOCON28.clearTXLARB; inline;
  82108. begin
  82109. pTDefRegMap(@Self)^.clr := $00000020;
  82110. end;
  82111. procedure TCAN1_C1FIFOCON28.setTXLARB(thebits : TBits_1); inline;
  82112. begin
  82113. if thebits = 0 then
  82114. pTDefRegMap(@Self)^.clr := $00000020
  82115. else
  82116. pTDefRegMap(@Self)^.&set := $00000020;
  82117. end;
  82118. function TCAN1_C1FIFOCON28.getTXLARB : TBits_1; inline;
  82119. begin
  82120. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  82121. end;
  82122. procedure TCAN1_C1FIFOCON28.setTXABAT; inline;
  82123. begin
  82124. pTDefRegMap(@Self)^.&set := $00000040;
  82125. end;
  82126. procedure TCAN1_C1FIFOCON28.clearTXABAT; inline;
  82127. begin
  82128. pTDefRegMap(@Self)^.clr := $00000040;
  82129. end;
  82130. procedure TCAN1_C1FIFOCON28.setTXABAT(thebits : TBits_1); inline;
  82131. begin
  82132. if thebits = 0 then
  82133. pTDefRegMap(@Self)^.clr := $00000040
  82134. else
  82135. pTDefRegMap(@Self)^.&set := $00000040;
  82136. end;
  82137. function TCAN1_C1FIFOCON28.getTXABAT : TBits_1; inline;
  82138. begin
  82139. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  82140. end;
  82141. procedure TCAN1_C1FIFOCON28.setTXEN; inline;
  82142. begin
  82143. pTDefRegMap(@Self)^.&set := $00000080;
  82144. end;
  82145. procedure TCAN1_C1FIFOCON28.clearTXEN; inline;
  82146. begin
  82147. pTDefRegMap(@Self)^.clr := $00000080;
  82148. end;
  82149. procedure TCAN1_C1FIFOCON28.setTXEN(thebits : TBits_1); inline;
  82150. begin
  82151. if thebits = 0 then
  82152. pTDefRegMap(@Self)^.clr := $00000080
  82153. else
  82154. pTDefRegMap(@Self)^.&set := $00000080;
  82155. end;
  82156. function TCAN1_C1FIFOCON28.getTXEN : TBits_1; inline;
  82157. begin
  82158. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  82159. end;
  82160. procedure TCAN1_C1FIFOCON28.setDONLY; inline;
  82161. begin
  82162. pTDefRegMap(@Self)^.&set := $00001000;
  82163. end;
  82164. procedure TCAN1_C1FIFOCON28.clearDONLY; inline;
  82165. begin
  82166. pTDefRegMap(@Self)^.clr := $00001000;
  82167. end;
  82168. procedure TCAN1_C1FIFOCON28.setDONLY(thebits : TBits_1); inline;
  82169. begin
  82170. if thebits = 0 then
  82171. pTDefRegMap(@Self)^.clr := $00001000
  82172. else
  82173. pTDefRegMap(@Self)^.&set := $00001000;
  82174. end;
  82175. function TCAN1_C1FIFOCON28.getDONLY : TBits_1; inline;
  82176. begin
  82177. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  82178. end;
  82179. procedure TCAN1_C1FIFOCON28.setUINC; inline;
  82180. begin
  82181. pTDefRegMap(@Self)^.&set := $00002000;
  82182. end;
  82183. procedure TCAN1_C1FIFOCON28.clearUINC; inline;
  82184. begin
  82185. pTDefRegMap(@Self)^.clr := $00002000;
  82186. end;
  82187. procedure TCAN1_C1FIFOCON28.setUINC(thebits : TBits_1); inline;
  82188. begin
  82189. if thebits = 0 then
  82190. pTDefRegMap(@Self)^.clr := $00002000
  82191. else
  82192. pTDefRegMap(@Self)^.&set := $00002000;
  82193. end;
  82194. function TCAN1_C1FIFOCON28.getUINC : TBits_1; inline;
  82195. begin
  82196. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  82197. end;
  82198. procedure TCAN1_C1FIFOCON28.setFRESET; inline;
  82199. begin
  82200. pTDefRegMap(@Self)^.&set := $00004000;
  82201. end;
  82202. procedure TCAN1_C1FIFOCON28.clearFRESET; inline;
  82203. begin
  82204. pTDefRegMap(@Self)^.clr := $00004000;
  82205. end;
  82206. procedure TCAN1_C1FIFOCON28.setFRESET(thebits : TBits_1); inline;
  82207. begin
  82208. if thebits = 0 then
  82209. pTDefRegMap(@Self)^.clr := $00004000
  82210. else
  82211. pTDefRegMap(@Self)^.&set := $00004000;
  82212. end;
  82213. function TCAN1_C1FIFOCON28.getFRESET : TBits_1; inline;
  82214. begin
  82215. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  82216. end;
  82217. procedure TCAN1_C1FIFOCON28.setFSIZE(thebits : TBits_5); inline;
  82218. begin
  82219. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  82220. end;
  82221. function TCAN1_C1FIFOCON28.getFSIZE : TBits_5; inline;
  82222. begin
  82223. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  82224. end;
  82225. procedure TCAN1_C1FIFOCON28.setw(thebits : TBits_32); inline;
  82226. begin
  82227. pTDefRegMap(@Self)^.val := thebits;
  82228. end;
  82229. function TCAN1_C1FIFOCON28.getw : TBits_32; inline;
  82230. begin
  82231. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82232. end;
  82233. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIF; inline;
  82234. begin
  82235. pTDefRegMap(@Self)^.&set := $00000001;
  82236. end;
  82237. procedure TCAN1_C1FIFOINT28.clearRXNEMPTYIF; inline;
  82238. begin
  82239. pTDefRegMap(@Self)^.clr := $00000001;
  82240. end;
  82241. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIF(thebits : TBits_1); inline;
  82242. begin
  82243. if thebits = 0 then
  82244. pTDefRegMap(@Self)^.clr := $00000001
  82245. else
  82246. pTDefRegMap(@Self)^.&set := $00000001;
  82247. end;
  82248. function TCAN1_C1FIFOINT28.getRXNEMPTYIF : TBits_1; inline;
  82249. begin
  82250. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  82251. end;
  82252. procedure TCAN1_C1FIFOINT28.setRXHALFIF; inline;
  82253. begin
  82254. pTDefRegMap(@Self)^.&set := $00000002;
  82255. end;
  82256. procedure TCAN1_C1FIFOINT28.clearRXHALFIF; inline;
  82257. begin
  82258. pTDefRegMap(@Self)^.clr := $00000002;
  82259. end;
  82260. procedure TCAN1_C1FIFOINT28.setRXHALFIF(thebits : TBits_1); inline;
  82261. begin
  82262. if thebits = 0 then
  82263. pTDefRegMap(@Self)^.clr := $00000002
  82264. else
  82265. pTDefRegMap(@Self)^.&set := $00000002;
  82266. end;
  82267. function TCAN1_C1FIFOINT28.getRXHALFIF : TBits_1; inline;
  82268. begin
  82269. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  82270. end;
  82271. procedure TCAN1_C1FIFOINT28.setRXFULLIF; inline;
  82272. begin
  82273. pTDefRegMap(@Self)^.&set := $00000004;
  82274. end;
  82275. procedure TCAN1_C1FIFOINT28.clearRXFULLIF; inline;
  82276. begin
  82277. pTDefRegMap(@Self)^.clr := $00000004;
  82278. end;
  82279. procedure TCAN1_C1FIFOINT28.setRXFULLIF(thebits : TBits_1); inline;
  82280. begin
  82281. if thebits = 0 then
  82282. pTDefRegMap(@Self)^.clr := $00000004
  82283. else
  82284. pTDefRegMap(@Self)^.&set := $00000004;
  82285. end;
  82286. function TCAN1_C1FIFOINT28.getRXFULLIF : TBits_1; inline;
  82287. begin
  82288. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82289. end;
  82290. procedure TCAN1_C1FIFOINT28.setRXOVFLIF; inline;
  82291. begin
  82292. pTDefRegMap(@Self)^.&set := $00000008;
  82293. end;
  82294. procedure TCAN1_C1FIFOINT28.clearRXOVFLIF; inline;
  82295. begin
  82296. pTDefRegMap(@Self)^.clr := $00000008;
  82297. end;
  82298. procedure TCAN1_C1FIFOINT28.setRXOVFLIF(thebits : TBits_1); inline;
  82299. begin
  82300. if thebits = 0 then
  82301. pTDefRegMap(@Self)^.clr := $00000008
  82302. else
  82303. pTDefRegMap(@Self)^.&set := $00000008;
  82304. end;
  82305. function TCAN1_C1FIFOINT28.getRXOVFLIF : TBits_1; inline;
  82306. begin
  82307. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82308. end;
  82309. procedure TCAN1_C1FIFOINT28.setTXEMPTYIF; inline;
  82310. begin
  82311. pTDefRegMap(@Self)^.&set := $00000100;
  82312. end;
  82313. procedure TCAN1_C1FIFOINT28.clearTXEMPTYIF; inline;
  82314. begin
  82315. pTDefRegMap(@Self)^.clr := $00000100;
  82316. end;
  82317. procedure TCAN1_C1FIFOINT28.setTXEMPTYIF(thebits : TBits_1); inline;
  82318. begin
  82319. if thebits = 0 then
  82320. pTDefRegMap(@Self)^.clr := $00000100
  82321. else
  82322. pTDefRegMap(@Self)^.&set := $00000100;
  82323. end;
  82324. function TCAN1_C1FIFOINT28.getTXEMPTYIF : TBits_1; inline;
  82325. begin
  82326. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  82327. end;
  82328. procedure TCAN1_C1FIFOINT28.setTXHALFIF; inline;
  82329. begin
  82330. pTDefRegMap(@Self)^.&set := $00000200;
  82331. end;
  82332. procedure TCAN1_C1FIFOINT28.clearTXHALFIF; inline;
  82333. begin
  82334. pTDefRegMap(@Self)^.clr := $00000200;
  82335. end;
  82336. procedure TCAN1_C1FIFOINT28.setTXHALFIF(thebits : TBits_1); inline;
  82337. begin
  82338. if thebits = 0 then
  82339. pTDefRegMap(@Self)^.clr := $00000200
  82340. else
  82341. pTDefRegMap(@Self)^.&set := $00000200;
  82342. end;
  82343. function TCAN1_C1FIFOINT28.getTXHALFIF : TBits_1; inline;
  82344. begin
  82345. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  82346. end;
  82347. procedure TCAN1_C1FIFOINT28.setTXNFULLIF; inline;
  82348. begin
  82349. pTDefRegMap(@Self)^.&set := $00000400;
  82350. end;
  82351. procedure TCAN1_C1FIFOINT28.clearTXNFULLIF; inline;
  82352. begin
  82353. pTDefRegMap(@Self)^.clr := $00000400;
  82354. end;
  82355. procedure TCAN1_C1FIFOINT28.setTXNFULLIF(thebits : TBits_1); inline;
  82356. begin
  82357. if thebits = 0 then
  82358. pTDefRegMap(@Self)^.clr := $00000400
  82359. else
  82360. pTDefRegMap(@Self)^.&set := $00000400;
  82361. end;
  82362. function TCAN1_C1FIFOINT28.getTXNFULLIF : TBits_1; inline;
  82363. begin
  82364. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  82365. end;
  82366. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIE; inline;
  82367. begin
  82368. pTDefRegMap(@Self)^.&set := $00010000;
  82369. end;
  82370. procedure TCAN1_C1FIFOINT28.clearRXNEMPTYIE; inline;
  82371. begin
  82372. pTDefRegMap(@Self)^.clr := $00010000;
  82373. end;
  82374. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIE(thebits : TBits_1); inline;
  82375. begin
  82376. if thebits = 0 then
  82377. pTDefRegMap(@Self)^.clr := $00010000
  82378. else
  82379. pTDefRegMap(@Self)^.&set := $00010000;
  82380. end;
  82381. function TCAN1_C1FIFOINT28.getRXNEMPTYIE : TBits_1; inline;
  82382. begin
  82383. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  82384. end;
  82385. procedure TCAN1_C1FIFOINT28.setRXHALFIE; inline;
  82386. begin
  82387. pTDefRegMap(@Self)^.&set := $00020000;
  82388. end;
  82389. procedure TCAN1_C1FIFOINT28.clearRXHALFIE; inline;
  82390. begin
  82391. pTDefRegMap(@Self)^.clr := $00020000;
  82392. end;
  82393. procedure TCAN1_C1FIFOINT28.setRXHALFIE(thebits : TBits_1); inline;
  82394. begin
  82395. if thebits = 0 then
  82396. pTDefRegMap(@Self)^.clr := $00020000
  82397. else
  82398. pTDefRegMap(@Self)^.&set := $00020000;
  82399. end;
  82400. function TCAN1_C1FIFOINT28.getRXHALFIE : TBits_1; inline;
  82401. begin
  82402. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  82403. end;
  82404. procedure TCAN1_C1FIFOINT28.setRXFULLIE; inline;
  82405. begin
  82406. pTDefRegMap(@Self)^.&set := $00040000;
  82407. end;
  82408. procedure TCAN1_C1FIFOINT28.clearRXFULLIE; inline;
  82409. begin
  82410. pTDefRegMap(@Self)^.clr := $00040000;
  82411. end;
  82412. procedure TCAN1_C1FIFOINT28.setRXFULLIE(thebits : TBits_1); inline;
  82413. begin
  82414. if thebits = 0 then
  82415. pTDefRegMap(@Self)^.clr := $00040000
  82416. else
  82417. pTDefRegMap(@Self)^.&set := $00040000;
  82418. end;
  82419. function TCAN1_C1FIFOINT28.getRXFULLIE : TBits_1; inline;
  82420. begin
  82421. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  82422. end;
  82423. procedure TCAN1_C1FIFOINT28.setRXOVFLIE; inline;
  82424. begin
  82425. pTDefRegMap(@Self)^.&set := $00080000;
  82426. end;
  82427. procedure TCAN1_C1FIFOINT28.clearRXOVFLIE; inline;
  82428. begin
  82429. pTDefRegMap(@Self)^.clr := $00080000;
  82430. end;
  82431. procedure TCAN1_C1FIFOINT28.setRXOVFLIE(thebits : TBits_1); inline;
  82432. begin
  82433. if thebits = 0 then
  82434. pTDefRegMap(@Self)^.clr := $00080000
  82435. else
  82436. pTDefRegMap(@Self)^.&set := $00080000;
  82437. end;
  82438. function TCAN1_C1FIFOINT28.getRXOVFLIE : TBits_1; inline;
  82439. begin
  82440. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  82441. end;
  82442. procedure TCAN1_C1FIFOINT28.setTXEMPTYIE; inline;
  82443. begin
  82444. pTDefRegMap(@Self)^.&set := $01000000;
  82445. end;
  82446. procedure TCAN1_C1FIFOINT28.clearTXEMPTYIE; inline;
  82447. begin
  82448. pTDefRegMap(@Self)^.clr := $01000000;
  82449. end;
  82450. procedure TCAN1_C1FIFOINT28.setTXEMPTYIE(thebits : TBits_1); inline;
  82451. begin
  82452. if thebits = 0 then
  82453. pTDefRegMap(@Self)^.clr := $01000000
  82454. else
  82455. pTDefRegMap(@Self)^.&set := $01000000;
  82456. end;
  82457. function TCAN1_C1FIFOINT28.getTXEMPTYIE : TBits_1; inline;
  82458. begin
  82459. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  82460. end;
  82461. procedure TCAN1_C1FIFOINT28.setTXHALFIE; inline;
  82462. begin
  82463. pTDefRegMap(@Self)^.&set := $02000000;
  82464. end;
  82465. procedure TCAN1_C1FIFOINT28.clearTXHALFIE; inline;
  82466. begin
  82467. pTDefRegMap(@Self)^.clr := $02000000;
  82468. end;
  82469. procedure TCAN1_C1FIFOINT28.setTXHALFIE(thebits : TBits_1); inline;
  82470. begin
  82471. if thebits = 0 then
  82472. pTDefRegMap(@Self)^.clr := $02000000
  82473. else
  82474. pTDefRegMap(@Self)^.&set := $02000000;
  82475. end;
  82476. function TCAN1_C1FIFOINT28.getTXHALFIE : TBits_1; inline;
  82477. begin
  82478. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  82479. end;
  82480. procedure TCAN1_C1FIFOINT28.setTXNFULLIE; inline;
  82481. begin
  82482. pTDefRegMap(@Self)^.&set := $04000000;
  82483. end;
  82484. procedure TCAN1_C1FIFOINT28.clearTXNFULLIE; inline;
  82485. begin
  82486. pTDefRegMap(@Self)^.clr := $04000000;
  82487. end;
  82488. procedure TCAN1_C1FIFOINT28.setTXNFULLIE(thebits : TBits_1); inline;
  82489. begin
  82490. if thebits = 0 then
  82491. pTDefRegMap(@Self)^.clr := $04000000
  82492. else
  82493. pTDefRegMap(@Self)^.&set := $04000000;
  82494. end;
  82495. function TCAN1_C1FIFOINT28.getTXNFULLIE : TBits_1; inline;
  82496. begin
  82497. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  82498. end;
  82499. procedure TCAN1_C1FIFOINT28.setw(thebits : TBits_32); inline;
  82500. begin
  82501. pTDefRegMap(@Self)^.val := thebits;
  82502. end;
  82503. function TCAN1_C1FIFOINT28.getw : TBits_32; inline;
  82504. begin
  82505. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82506. end;
  82507. procedure TCAN1_C1FIFOCI28.setCFIFOCI(thebits : TBits_5); inline;
  82508. begin
  82509. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  82510. end;
  82511. function TCAN1_C1FIFOCI28.getCFIFOCI : TBits_5; inline;
  82512. begin
  82513. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  82514. end;
  82515. procedure TCAN1_C1FIFOCI28.setw(thebits : TBits_32); inline;
  82516. begin
  82517. pTDefRegMap(@Self)^.val := thebits;
  82518. end;
  82519. function TCAN1_C1FIFOCI28.getw : TBits_32; inline;
  82520. begin
  82521. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82522. end;
  82523. procedure TCAN1_C1FIFOCON29.setTXPRI(thebits : TBits_2); inline;
  82524. begin
  82525. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  82526. end;
  82527. function TCAN1_C1FIFOCON29.getTXPRI : TBits_2; inline;
  82528. begin
  82529. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  82530. end;
  82531. procedure TCAN1_C1FIFOCON29.setRTREN; inline;
  82532. begin
  82533. pTDefRegMap(@Self)^.&set := $00000004;
  82534. end;
  82535. procedure TCAN1_C1FIFOCON29.clearRTREN; inline;
  82536. begin
  82537. pTDefRegMap(@Self)^.clr := $00000004;
  82538. end;
  82539. procedure TCAN1_C1FIFOCON29.setRTREN(thebits : TBits_1); inline;
  82540. begin
  82541. if thebits = 0 then
  82542. pTDefRegMap(@Self)^.clr := $00000004
  82543. else
  82544. pTDefRegMap(@Self)^.&set := $00000004;
  82545. end;
  82546. function TCAN1_C1FIFOCON29.getRTREN : TBits_1; inline;
  82547. begin
  82548. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82549. end;
  82550. procedure TCAN1_C1FIFOCON29.setTXREQ; inline;
  82551. begin
  82552. pTDefRegMap(@Self)^.&set := $00000008;
  82553. end;
  82554. procedure TCAN1_C1FIFOCON29.clearTXREQ; inline;
  82555. begin
  82556. pTDefRegMap(@Self)^.clr := $00000008;
  82557. end;
  82558. procedure TCAN1_C1FIFOCON29.setTXREQ(thebits : TBits_1); inline;
  82559. begin
  82560. if thebits = 0 then
  82561. pTDefRegMap(@Self)^.clr := $00000008
  82562. else
  82563. pTDefRegMap(@Self)^.&set := $00000008;
  82564. end;
  82565. function TCAN1_C1FIFOCON29.getTXREQ : TBits_1; inline;
  82566. begin
  82567. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82568. end;
  82569. procedure TCAN1_C1FIFOCON29.setTXERR; inline;
  82570. begin
  82571. pTDefRegMap(@Self)^.&set := $00000010;
  82572. end;
  82573. procedure TCAN1_C1FIFOCON29.clearTXERR; inline;
  82574. begin
  82575. pTDefRegMap(@Self)^.clr := $00000010;
  82576. end;
  82577. procedure TCAN1_C1FIFOCON29.setTXERR(thebits : TBits_1); inline;
  82578. begin
  82579. if thebits = 0 then
  82580. pTDefRegMap(@Self)^.clr := $00000010
  82581. else
  82582. pTDefRegMap(@Self)^.&set := $00000010;
  82583. end;
  82584. function TCAN1_C1FIFOCON29.getTXERR : TBits_1; inline;
  82585. begin
  82586. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  82587. end;
  82588. procedure TCAN1_C1FIFOCON29.setTXLARB; inline;
  82589. begin
  82590. pTDefRegMap(@Self)^.&set := $00000020;
  82591. end;
  82592. procedure TCAN1_C1FIFOCON29.clearTXLARB; inline;
  82593. begin
  82594. pTDefRegMap(@Self)^.clr := $00000020;
  82595. end;
  82596. procedure TCAN1_C1FIFOCON29.setTXLARB(thebits : TBits_1); inline;
  82597. begin
  82598. if thebits = 0 then
  82599. pTDefRegMap(@Self)^.clr := $00000020
  82600. else
  82601. pTDefRegMap(@Self)^.&set := $00000020;
  82602. end;
  82603. function TCAN1_C1FIFOCON29.getTXLARB : TBits_1; inline;
  82604. begin
  82605. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  82606. end;
  82607. procedure TCAN1_C1FIFOCON29.setTXABAT; inline;
  82608. begin
  82609. pTDefRegMap(@Self)^.&set := $00000040;
  82610. end;
  82611. procedure TCAN1_C1FIFOCON29.clearTXABAT; inline;
  82612. begin
  82613. pTDefRegMap(@Self)^.clr := $00000040;
  82614. end;
  82615. procedure TCAN1_C1FIFOCON29.setTXABAT(thebits : TBits_1); inline;
  82616. begin
  82617. if thebits = 0 then
  82618. pTDefRegMap(@Self)^.clr := $00000040
  82619. else
  82620. pTDefRegMap(@Self)^.&set := $00000040;
  82621. end;
  82622. function TCAN1_C1FIFOCON29.getTXABAT : TBits_1; inline;
  82623. begin
  82624. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  82625. end;
  82626. procedure TCAN1_C1FIFOCON29.setTXEN; inline;
  82627. begin
  82628. pTDefRegMap(@Self)^.&set := $00000080;
  82629. end;
  82630. procedure TCAN1_C1FIFOCON29.clearTXEN; inline;
  82631. begin
  82632. pTDefRegMap(@Self)^.clr := $00000080;
  82633. end;
  82634. procedure TCAN1_C1FIFOCON29.setTXEN(thebits : TBits_1); inline;
  82635. begin
  82636. if thebits = 0 then
  82637. pTDefRegMap(@Self)^.clr := $00000080
  82638. else
  82639. pTDefRegMap(@Self)^.&set := $00000080;
  82640. end;
  82641. function TCAN1_C1FIFOCON29.getTXEN : TBits_1; inline;
  82642. begin
  82643. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  82644. end;
  82645. procedure TCAN1_C1FIFOCON29.setDONLY; inline;
  82646. begin
  82647. pTDefRegMap(@Self)^.&set := $00001000;
  82648. end;
  82649. procedure TCAN1_C1FIFOCON29.clearDONLY; inline;
  82650. begin
  82651. pTDefRegMap(@Self)^.clr := $00001000;
  82652. end;
  82653. procedure TCAN1_C1FIFOCON29.setDONLY(thebits : TBits_1); inline;
  82654. begin
  82655. if thebits = 0 then
  82656. pTDefRegMap(@Self)^.clr := $00001000
  82657. else
  82658. pTDefRegMap(@Self)^.&set := $00001000;
  82659. end;
  82660. function TCAN1_C1FIFOCON29.getDONLY : TBits_1; inline;
  82661. begin
  82662. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  82663. end;
  82664. procedure TCAN1_C1FIFOCON29.setUINC; inline;
  82665. begin
  82666. pTDefRegMap(@Self)^.&set := $00002000;
  82667. end;
  82668. procedure TCAN1_C1FIFOCON29.clearUINC; inline;
  82669. begin
  82670. pTDefRegMap(@Self)^.clr := $00002000;
  82671. end;
  82672. procedure TCAN1_C1FIFOCON29.setUINC(thebits : TBits_1); inline;
  82673. begin
  82674. if thebits = 0 then
  82675. pTDefRegMap(@Self)^.clr := $00002000
  82676. else
  82677. pTDefRegMap(@Self)^.&set := $00002000;
  82678. end;
  82679. function TCAN1_C1FIFOCON29.getUINC : TBits_1; inline;
  82680. begin
  82681. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  82682. end;
  82683. procedure TCAN1_C1FIFOCON29.setFRESET; inline;
  82684. begin
  82685. pTDefRegMap(@Self)^.&set := $00004000;
  82686. end;
  82687. procedure TCAN1_C1FIFOCON29.clearFRESET; inline;
  82688. begin
  82689. pTDefRegMap(@Self)^.clr := $00004000;
  82690. end;
  82691. procedure TCAN1_C1FIFOCON29.setFRESET(thebits : TBits_1); inline;
  82692. begin
  82693. if thebits = 0 then
  82694. pTDefRegMap(@Self)^.clr := $00004000
  82695. else
  82696. pTDefRegMap(@Self)^.&set := $00004000;
  82697. end;
  82698. function TCAN1_C1FIFOCON29.getFRESET : TBits_1; inline;
  82699. begin
  82700. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  82701. end;
  82702. procedure TCAN1_C1FIFOCON29.setFSIZE(thebits : TBits_5); inline;
  82703. begin
  82704. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  82705. end;
  82706. function TCAN1_C1FIFOCON29.getFSIZE : TBits_5; inline;
  82707. begin
  82708. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  82709. end;
  82710. procedure TCAN1_C1FIFOCON29.setw(thebits : TBits_32); inline;
  82711. begin
  82712. pTDefRegMap(@Self)^.val := thebits;
  82713. end;
  82714. function TCAN1_C1FIFOCON29.getw : TBits_32; inline;
  82715. begin
  82716. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82717. end;
  82718. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIF; inline;
  82719. begin
  82720. pTDefRegMap(@Self)^.&set := $00000001;
  82721. end;
  82722. procedure TCAN1_C1FIFOINT29.clearRXNEMPTYIF; inline;
  82723. begin
  82724. pTDefRegMap(@Self)^.clr := $00000001;
  82725. end;
  82726. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIF(thebits : TBits_1); inline;
  82727. begin
  82728. if thebits = 0 then
  82729. pTDefRegMap(@Self)^.clr := $00000001
  82730. else
  82731. pTDefRegMap(@Self)^.&set := $00000001;
  82732. end;
  82733. function TCAN1_C1FIFOINT29.getRXNEMPTYIF : TBits_1; inline;
  82734. begin
  82735. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  82736. end;
  82737. procedure TCAN1_C1FIFOINT29.setRXHALFIF; inline;
  82738. begin
  82739. pTDefRegMap(@Self)^.&set := $00000002;
  82740. end;
  82741. procedure TCAN1_C1FIFOINT29.clearRXHALFIF; inline;
  82742. begin
  82743. pTDefRegMap(@Self)^.clr := $00000002;
  82744. end;
  82745. procedure TCAN1_C1FIFOINT29.setRXHALFIF(thebits : TBits_1); inline;
  82746. begin
  82747. if thebits = 0 then
  82748. pTDefRegMap(@Self)^.clr := $00000002
  82749. else
  82750. pTDefRegMap(@Self)^.&set := $00000002;
  82751. end;
  82752. function TCAN1_C1FIFOINT29.getRXHALFIF : TBits_1; inline;
  82753. begin
  82754. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  82755. end;
  82756. procedure TCAN1_C1FIFOINT29.setRXFULLIF; inline;
  82757. begin
  82758. pTDefRegMap(@Self)^.&set := $00000004;
  82759. end;
  82760. procedure TCAN1_C1FIFOINT29.clearRXFULLIF; inline;
  82761. begin
  82762. pTDefRegMap(@Self)^.clr := $00000004;
  82763. end;
  82764. procedure TCAN1_C1FIFOINT29.setRXFULLIF(thebits : TBits_1); inline;
  82765. begin
  82766. if thebits = 0 then
  82767. pTDefRegMap(@Self)^.clr := $00000004
  82768. else
  82769. pTDefRegMap(@Self)^.&set := $00000004;
  82770. end;
  82771. function TCAN1_C1FIFOINT29.getRXFULLIF : TBits_1; inline;
  82772. begin
  82773. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82774. end;
  82775. procedure TCAN1_C1FIFOINT29.setRXOVFLIF; inline;
  82776. begin
  82777. pTDefRegMap(@Self)^.&set := $00000008;
  82778. end;
  82779. procedure TCAN1_C1FIFOINT29.clearRXOVFLIF; inline;
  82780. begin
  82781. pTDefRegMap(@Self)^.clr := $00000008;
  82782. end;
  82783. procedure TCAN1_C1FIFOINT29.setRXOVFLIF(thebits : TBits_1); inline;
  82784. begin
  82785. if thebits = 0 then
  82786. pTDefRegMap(@Self)^.clr := $00000008
  82787. else
  82788. pTDefRegMap(@Self)^.&set := $00000008;
  82789. end;
  82790. function TCAN1_C1FIFOINT29.getRXOVFLIF : TBits_1; inline;
  82791. begin
  82792. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82793. end;
  82794. procedure TCAN1_C1FIFOINT29.setTXEMPTYIF; inline;
  82795. begin
  82796. pTDefRegMap(@Self)^.&set := $00000100;
  82797. end;
  82798. procedure TCAN1_C1FIFOINT29.clearTXEMPTYIF; inline;
  82799. begin
  82800. pTDefRegMap(@Self)^.clr := $00000100;
  82801. end;
  82802. procedure TCAN1_C1FIFOINT29.setTXEMPTYIF(thebits : TBits_1); inline;
  82803. begin
  82804. if thebits = 0 then
  82805. pTDefRegMap(@Self)^.clr := $00000100
  82806. else
  82807. pTDefRegMap(@Self)^.&set := $00000100;
  82808. end;
  82809. function TCAN1_C1FIFOINT29.getTXEMPTYIF : TBits_1; inline;
  82810. begin
  82811. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  82812. end;
  82813. procedure TCAN1_C1FIFOINT29.setTXHALFIF; inline;
  82814. begin
  82815. pTDefRegMap(@Self)^.&set := $00000200;
  82816. end;
  82817. procedure TCAN1_C1FIFOINT29.clearTXHALFIF; inline;
  82818. begin
  82819. pTDefRegMap(@Self)^.clr := $00000200;
  82820. end;
  82821. procedure TCAN1_C1FIFOINT29.setTXHALFIF(thebits : TBits_1); inline;
  82822. begin
  82823. if thebits = 0 then
  82824. pTDefRegMap(@Self)^.clr := $00000200
  82825. else
  82826. pTDefRegMap(@Self)^.&set := $00000200;
  82827. end;
  82828. function TCAN1_C1FIFOINT29.getTXHALFIF : TBits_1; inline;
  82829. begin
  82830. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  82831. end;
  82832. procedure TCAN1_C1FIFOINT29.setTXNFULLIF; inline;
  82833. begin
  82834. pTDefRegMap(@Self)^.&set := $00000400;
  82835. end;
  82836. procedure TCAN1_C1FIFOINT29.clearTXNFULLIF; inline;
  82837. begin
  82838. pTDefRegMap(@Self)^.clr := $00000400;
  82839. end;
  82840. procedure TCAN1_C1FIFOINT29.setTXNFULLIF(thebits : TBits_1); inline;
  82841. begin
  82842. if thebits = 0 then
  82843. pTDefRegMap(@Self)^.clr := $00000400
  82844. else
  82845. pTDefRegMap(@Self)^.&set := $00000400;
  82846. end;
  82847. function TCAN1_C1FIFOINT29.getTXNFULLIF : TBits_1; inline;
  82848. begin
  82849. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  82850. end;
  82851. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIE; inline;
  82852. begin
  82853. pTDefRegMap(@Self)^.&set := $00010000;
  82854. end;
  82855. procedure TCAN1_C1FIFOINT29.clearRXNEMPTYIE; inline;
  82856. begin
  82857. pTDefRegMap(@Self)^.clr := $00010000;
  82858. end;
  82859. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIE(thebits : TBits_1); inline;
  82860. begin
  82861. if thebits = 0 then
  82862. pTDefRegMap(@Self)^.clr := $00010000
  82863. else
  82864. pTDefRegMap(@Self)^.&set := $00010000;
  82865. end;
  82866. function TCAN1_C1FIFOINT29.getRXNEMPTYIE : TBits_1; inline;
  82867. begin
  82868. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  82869. end;
  82870. procedure TCAN1_C1FIFOINT29.setRXHALFIE; inline;
  82871. begin
  82872. pTDefRegMap(@Self)^.&set := $00020000;
  82873. end;
  82874. procedure TCAN1_C1FIFOINT29.clearRXHALFIE; inline;
  82875. begin
  82876. pTDefRegMap(@Self)^.clr := $00020000;
  82877. end;
  82878. procedure TCAN1_C1FIFOINT29.setRXHALFIE(thebits : TBits_1); inline;
  82879. begin
  82880. if thebits = 0 then
  82881. pTDefRegMap(@Self)^.clr := $00020000
  82882. else
  82883. pTDefRegMap(@Self)^.&set := $00020000;
  82884. end;
  82885. function TCAN1_C1FIFOINT29.getRXHALFIE : TBits_1; inline;
  82886. begin
  82887. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  82888. end;
  82889. procedure TCAN1_C1FIFOINT29.setRXFULLIE; inline;
  82890. begin
  82891. pTDefRegMap(@Self)^.&set := $00040000;
  82892. end;
  82893. procedure TCAN1_C1FIFOINT29.clearRXFULLIE; inline;
  82894. begin
  82895. pTDefRegMap(@Self)^.clr := $00040000;
  82896. end;
  82897. procedure TCAN1_C1FIFOINT29.setRXFULLIE(thebits : TBits_1); inline;
  82898. begin
  82899. if thebits = 0 then
  82900. pTDefRegMap(@Self)^.clr := $00040000
  82901. else
  82902. pTDefRegMap(@Self)^.&set := $00040000;
  82903. end;
  82904. function TCAN1_C1FIFOINT29.getRXFULLIE : TBits_1; inline;
  82905. begin
  82906. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  82907. end;
  82908. procedure TCAN1_C1FIFOINT29.setRXOVFLIE; inline;
  82909. begin
  82910. pTDefRegMap(@Self)^.&set := $00080000;
  82911. end;
  82912. procedure TCAN1_C1FIFOINT29.clearRXOVFLIE; inline;
  82913. begin
  82914. pTDefRegMap(@Self)^.clr := $00080000;
  82915. end;
  82916. procedure TCAN1_C1FIFOINT29.setRXOVFLIE(thebits : TBits_1); inline;
  82917. begin
  82918. if thebits = 0 then
  82919. pTDefRegMap(@Self)^.clr := $00080000
  82920. else
  82921. pTDefRegMap(@Self)^.&set := $00080000;
  82922. end;
  82923. function TCAN1_C1FIFOINT29.getRXOVFLIE : TBits_1; inline;
  82924. begin
  82925. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  82926. end;
  82927. procedure TCAN1_C1FIFOINT29.setTXEMPTYIE; inline;
  82928. begin
  82929. pTDefRegMap(@Self)^.&set := $01000000;
  82930. end;
  82931. procedure TCAN1_C1FIFOINT29.clearTXEMPTYIE; inline;
  82932. begin
  82933. pTDefRegMap(@Self)^.clr := $01000000;
  82934. end;
  82935. procedure TCAN1_C1FIFOINT29.setTXEMPTYIE(thebits : TBits_1); inline;
  82936. begin
  82937. if thebits = 0 then
  82938. pTDefRegMap(@Self)^.clr := $01000000
  82939. else
  82940. pTDefRegMap(@Self)^.&set := $01000000;
  82941. end;
  82942. function TCAN1_C1FIFOINT29.getTXEMPTYIE : TBits_1; inline;
  82943. begin
  82944. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  82945. end;
  82946. procedure TCAN1_C1FIFOINT29.setTXHALFIE; inline;
  82947. begin
  82948. pTDefRegMap(@Self)^.&set := $02000000;
  82949. end;
  82950. procedure TCAN1_C1FIFOINT29.clearTXHALFIE; inline;
  82951. begin
  82952. pTDefRegMap(@Self)^.clr := $02000000;
  82953. end;
  82954. procedure TCAN1_C1FIFOINT29.setTXHALFIE(thebits : TBits_1); inline;
  82955. begin
  82956. if thebits = 0 then
  82957. pTDefRegMap(@Self)^.clr := $02000000
  82958. else
  82959. pTDefRegMap(@Self)^.&set := $02000000;
  82960. end;
  82961. function TCAN1_C1FIFOINT29.getTXHALFIE : TBits_1; inline;
  82962. begin
  82963. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  82964. end;
  82965. procedure TCAN1_C1FIFOINT29.setTXNFULLIE; inline;
  82966. begin
  82967. pTDefRegMap(@Self)^.&set := $04000000;
  82968. end;
  82969. procedure TCAN1_C1FIFOINT29.clearTXNFULLIE; inline;
  82970. begin
  82971. pTDefRegMap(@Self)^.clr := $04000000;
  82972. end;
  82973. procedure TCAN1_C1FIFOINT29.setTXNFULLIE(thebits : TBits_1); inline;
  82974. begin
  82975. if thebits = 0 then
  82976. pTDefRegMap(@Self)^.clr := $04000000
  82977. else
  82978. pTDefRegMap(@Self)^.&set := $04000000;
  82979. end;
  82980. function TCAN1_C1FIFOINT29.getTXNFULLIE : TBits_1; inline;
  82981. begin
  82982. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  82983. end;
  82984. procedure TCAN1_C1FIFOINT29.setw(thebits : TBits_32); inline;
  82985. begin
  82986. pTDefRegMap(@Self)^.val := thebits;
  82987. end;
  82988. function TCAN1_C1FIFOINT29.getw : TBits_32; inline;
  82989. begin
  82990. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82991. end;
  82992. procedure TCAN1_C1FIFOCI29.setCFIFOCI(thebits : TBits_5); inline;
  82993. begin
  82994. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  82995. end;
  82996. function TCAN1_C1FIFOCI29.getCFIFOCI : TBits_5; inline;
  82997. begin
  82998. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  82999. end;
  83000. procedure TCAN1_C1FIFOCI29.setw(thebits : TBits_32); inline;
  83001. begin
  83002. pTDefRegMap(@Self)^.val := thebits;
  83003. end;
  83004. function TCAN1_C1FIFOCI29.getw : TBits_32; inline;
  83005. begin
  83006. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83007. end;
  83008. procedure TCAN1_C1FIFOCON30.setTXPRI(thebits : TBits_2); inline;
  83009. begin
  83010. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  83011. end;
  83012. function TCAN1_C1FIFOCON30.getTXPRI : TBits_2; inline;
  83013. begin
  83014. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  83015. end;
  83016. procedure TCAN1_C1FIFOCON30.setRTREN; inline;
  83017. begin
  83018. pTDefRegMap(@Self)^.&set := $00000004;
  83019. end;
  83020. procedure TCAN1_C1FIFOCON30.clearRTREN; inline;
  83021. begin
  83022. pTDefRegMap(@Self)^.clr := $00000004;
  83023. end;
  83024. procedure TCAN1_C1FIFOCON30.setRTREN(thebits : TBits_1); inline;
  83025. begin
  83026. if thebits = 0 then
  83027. pTDefRegMap(@Self)^.clr := $00000004
  83028. else
  83029. pTDefRegMap(@Self)^.&set := $00000004;
  83030. end;
  83031. function TCAN1_C1FIFOCON30.getRTREN : TBits_1; inline;
  83032. begin
  83033. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  83034. end;
  83035. procedure TCAN1_C1FIFOCON30.setTXREQ; inline;
  83036. begin
  83037. pTDefRegMap(@Self)^.&set := $00000008;
  83038. end;
  83039. procedure TCAN1_C1FIFOCON30.clearTXREQ; inline;
  83040. begin
  83041. pTDefRegMap(@Self)^.clr := $00000008;
  83042. end;
  83043. procedure TCAN1_C1FIFOCON30.setTXREQ(thebits : TBits_1); inline;
  83044. begin
  83045. if thebits = 0 then
  83046. pTDefRegMap(@Self)^.clr := $00000008
  83047. else
  83048. pTDefRegMap(@Self)^.&set := $00000008;
  83049. end;
  83050. function TCAN1_C1FIFOCON30.getTXREQ : TBits_1; inline;
  83051. begin
  83052. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  83053. end;
  83054. procedure TCAN1_C1FIFOCON30.setTXERR; inline;
  83055. begin
  83056. pTDefRegMap(@Self)^.&set := $00000010;
  83057. end;
  83058. procedure TCAN1_C1FIFOCON30.clearTXERR; inline;
  83059. begin
  83060. pTDefRegMap(@Self)^.clr := $00000010;
  83061. end;
  83062. procedure TCAN1_C1FIFOCON30.setTXERR(thebits : TBits_1); inline;
  83063. begin
  83064. if thebits = 0 then
  83065. pTDefRegMap(@Self)^.clr := $00000010
  83066. else
  83067. pTDefRegMap(@Self)^.&set := $00000010;
  83068. end;
  83069. function TCAN1_C1FIFOCON30.getTXERR : TBits_1; inline;
  83070. begin
  83071. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  83072. end;
  83073. procedure TCAN1_C1FIFOCON30.setTXLARB; inline;
  83074. begin
  83075. pTDefRegMap(@Self)^.&set := $00000020;
  83076. end;
  83077. procedure TCAN1_C1FIFOCON30.clearTXLARB; inline;
  83078. begin
  83079. pTDefRegMap(@Self)^.clr := $00000020;
  83080. end;
  83081. procedure TCAN1_C1FIFOCON30.setTXLARB(thebits : TBits_1); inline;
  83082. begin
  83083. if thebits = 0 then
  83084. pTDefRegMap(@Self)^.clr := $00000020
  83085. else
  83086. pTDefRegMap(@Self)^.&set := $00000020;
  83087. end;
  83088. function TCAN1_C1FIFOCON30.getTXLARB : TBits_1; inline;
  83089. begin
  83090. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  83091. end;
  83092. procedure TCAN1_C1FIFOCON30.setTXABAT; inline;
  83093. begin
  83094. pTDefRegMap(@Self)^.&set := $00000040;
  83095. end;
  83096. procedure TCAN1_C1FIFOCON30.clearTXABAT; inline;
  83097. begin
  83098. pTDefRegMap(@Self)^.clr := $00000040;
  83099. end;
  83100. procedure TCAN1_C1FIFOCON30.setTXABAT(thebits : TBits_1); inline;
  83101. begin
  83102. if thebits = 0 then
  83103. pTDefRegMap(@Self)^.clr := $00000040
  83104. else
  83105. pTDefRegMap(@Self)^.&set := $00000040;
  83106. end;
  83107. function TCAN1_C1FIFOCON30.getTXABAT : TBits_1; inline;
  83108. begin
  83109. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  83110. end;
  83111. procedure TCAN1_C1FIFOCON30.setTXEN; inline;
  83112. begin
  83113. pTDefRegMap(@Self)^.&set := $00000080;
  83114. end;
  83115. procedure TCAN1_C1FIFOCON30.clearTXEN; inline;
  83116. begin
  83117. pTDefRegMap(@Self)^.clr := $00000080;
  83118. end;
  83119. procedure TCAN1_C1FIFOCON30.setTXEN(thebits : TBits_1); inline;
  83120. begin
  83121. if thebits = 0 then
  83122. pTDefRegMap(@Self)^.clr := $00000080
  83123. else
  83124. pTDefRegMap(@Self)^.&set := $00000080;
  83125. end;
  83126. function TCAN1_C1FIFOCON30.getTXEN : TBits_1; inline;
  83127. begin
  83128. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83129. end;
  83130. procedure TCAN1_C1FIFOCON30.setDONLY; inline;
  83131. begin
  83132. pTDefRegMap(@Self)^.&set := $00001000;
  83133. end;
  83134. procedure TCAN1_C1FIFOCON30.clearDONLY; inline;
  83135. begin
  83136. pTDefRegMap(@Self)^.clr := $00001000;
  83137. end;
  83138. procedure TCAN1_C1FIFOCON30.setDONLY(thebits : TBits_1); inline;
  83139. begin
  83140. if thebits = 0 then
  83141. pTDefRegMap(@Self)^.clr := $00001000
  83142. else
  83143. pTDefRegMap(@Self)^.&set := $00001000;
  83144. end;
  83145. function TCAN1_C1FIFOCON30.getDONLY : TBits_1; inline;
  83146. begin
  83147. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  83148. end;
  83149. procedure TCAN1_C1FIFOCON30.setUINC; inline;
  83150. begin
  83151. pTDefRegMap(@Self)^.&set := $00002000;
  83152. end;
  83153. procedure TCAN1_C1FIFOCON30.clearUINC; inline;
  83154. begin
  83155. pTDefRegMap(@Self)^.clr := $00002000;
  83156. end;
  83157. procedure TCAN1_C1FIFOCON30.setUINC(thebits : TBits_1); inline;
  83158. begin
  83159. if thebits = 0 then
  83160. pTDefRegMap(@Self)^.clr := $00002000
  83161. else
  83162. pTDefRegMap(@Self)^.&set := $00002000;
  83163. end;
  83164. function TCAN1_C1FIFOCON30.getUINC : TBits_1; inline;
  83165. begin
  83166. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  83167. end;
  83168. procedure TCAN1_C1FIFOCON30.setFRESET; inline;
  83169. begin
  83170. pTDefRegMap(@Self)^.&set := $00004000;
  83171. end;
  83172. procedure TCAN1_C1FIFOCON30.clearFRESET; inline;
  83173. begin
  83174. pTDefRegMap(@Self)^.clr := $00004000;
  83175. end;
  83176. procedure TCAN1_C1FIFOCON30.setFRESET(thebits : TBits_1); inline;
  83177. begin
  83178. if thebits = 0 then
  83179. pTDefRegMap(@Self)^.clr := $00004000
  83180. else
  83181. pTDefRegMap(@Self)^.&set := $00004000;
  83182. end;
  83183. function TCAN1_C1FIFOCON30.getFRESET : TBits_1; inline;
  83184. begin
  83185. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  83186. end;
  83187. procedure TCAN1_C1FIFOCON30.setFSIZE(thebits : TBits_5); inline;
  83188. begin
  83189. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83190. end;
  83191. function TCAN1_C1FIFOCON30.getFSIZE : TBits_5; inline;
  83192. begin
  83193. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83194. end;
  83195. procedure TCAN1_C1FIFOCON30.setw(thebits : TBits_32); inline;
  83196. begin
  83197. pTDefRegMap(@Self)^.val := thebits;
  83198. end;
  83199. function TCAN1_C1FIFOCON30.getw : TBits_32; inline;
  83200. begin
  83201. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83202. end;
  83203. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIF; inline;
  83204. begin
  83205. pTDefRegMap(@Self)^.&set := $00000001;
  83206. end;
  83207. procedure TCAN1_C1FIFOINT30.clearRXNEMPTYIF; inline;
  83208. begin
  83209. pTDefRegMap(@Self)^.clr := $00000001;
  83210. end;
  83211. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIF(thebits : TBits_1); inline;
  83212. begin
  83213. if thebits = 0 then
  83214. pTDefRegMap(@Self)^.clr := $00000001
  83215. else
  83216. pTDefRegMap(@Self)^.&set := $00000001;
  83217. end;
  83218. function TCAN1_C1FIFOINT30.getRXNEMPTYIF : TBits_1; inline;
  83219. begin
  83220. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  83221. end;
  83222. procedure TCAN1_C1FIFOINT30.setRXHALFIF; inline;
  83223. begin
  83224. pTDefRegMap(@Self)^.&set := $00000002;
  83225. end;
  83226. procedure TCAN1_C1FIFOINT30.clearRXHALFIF; inline;
  83227. begin
  83228. pTDefRegMap(@Self)^.clr := $00000002;
  83229. end;
  83230. procedure TCAN1_C1FIFOINT30.setRXHALFIF(thebits : TBits_1); inline;
  83231. begin
  83232. if thebits = 0 then
  83233. pTDefRegMap(@Self)^.clr := $00000002
  83234. else
  83235. pTDefRegMap(@Self)^.&set := $00000002;
  83236. end;
  83237. function TCAN1_C1FIFOINT30.getRXHALFIF : TBits_1; inline;
  83238. begin
  83239. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  83240. end;
  83241. procedure TCAN1_C1FIFOINT30.setRXFULLIF; inline;
  83242. begin
  83243. pTDefRegMap(@Self)^.&set := $00000004;
  83244. end;
  83245. procedure TCAN1_C1FIFOINT30.clearRXFULLIF; inline;
  83246. begin
  83247. pTDefRegMap(@Self)^.clr := $00000004;
  83248. end;
  83249. procedure TCAN1_C1FIFOINT30.setRXFULLIF(thebits : TBits_1); inline;
  83250. begin
  83251. if thebits = 0 then
  83252. pTDefRegMap(@Self)^.clr := $00000004
  83253. else
  83254. pTDefRegMap(@Self)^.&set := $00000004;
  83255. end;
  83256. function TCAN1_C1FIFOINT30.getRXFULLIF : TBits_1; inline;
  83257. begin
  83258. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  83259. end;
  83260. procedure TCAN1_C1FIFOINT30.setRXOVFLIF; inline;
  83261. begin
  83262. pTDefRegMap(@Self)^.&set := $00000008;
  83263. end;
  83264. procedure TCAN1_C1FIFOINT30.clearRXOVFLIF; inline;
  83265. begin
  83266. pTDefRegMap(@Self)^.clr := $00000008;
  83267. end;
  83268. procedure TCAN1_C1FIFOINT30.setRXOVFLIF(thebits : TBits_1); inline;
  83269. begin
  83270. if thebits = 0 then
  83271. pTDefRegMap(@Self)^.clr := $00000008
  83272. else
  83273. pTDefRegMap(@Self)^.&set := $00000008;
  83274. end;
  83275. function TCAN1_C1FIFOINT30.getRXOVFLIF : TBits_1; inline;
  83276. begin
  83277. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  83278. end;
  83279. procedure TCAN1_C1FIFOINT30.setTXEMPTYIF; inline;
  83280. begin
  83281. pTDefRegMap(@Self)^.&set := $00000100;
  83282. end;
  83283. procedure TCAN1_C1FIFOINT30.clearTXEMPTYIF; inline;
  83284. begin
  83285. pTDefRegMap(@Self)^.clr := $00000100;
  83286. end;
  83287. procedure TCAN1_C1FIFOINT30.setTXEMPTYIF(thebits : TBits_1); inline;
  83288. begin
  83289. if thebits = 0 then
  83290. pTDefRegMap(@Self)^.clr := $00000100
  83291. else
  83292. pTDefRegMap(@Self)^.&set := $00000100;
  83293. end;
  83294. function TCAN1_C1FIFOINT30.getTXEMPTYIF : TBits_1; inline;
  83295. begin
  83296. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  83297. end;
  83298. procedure TCAN1_C1FIFOINT30.setTXHALFIF; inline;
  83299. begin
  83300. pTDefRegMap(@Self)^.&set := $00000200;
  83301. end;
  83302. procedure TCAN1_C1FIFOINT30.clearTXHALFIF; inline;
  83303. begin
  83304. pTDefRegMap(@Self)^.clr := $00000200;
  83305. end;
  83306. procedure TCAN1_C1FIFOINT30.setTXHALFIF(thebits : TBits_1); inline;
  83307. begin
  83308. if thebits = 0 then
  83309. pTDefRegMap(@Self)^.clr := $00000200
  83310. else
  83311. pTDefRegMap(@Self)^.&set := $00000200;
  83312. end;
  83313. function TCAN1_C1FIFOINT30.getTXHALFIF : TBits_1; inline;
  83314. begin
  83315. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  83316. end;
  83317. procedure TCAN1_C1FIFOINT30.setTXNFULLIF; inline;
  83318. begin
  83319. pTDefRegMap(@Self)^.&set := $00000400;
  83320. end;
  83321. procedure TCAN1_C1FIFOINT30.clearTXNFULLIF; inline;
  83322. begin
  83323. pTDefRegMap(@Self)^.clr := $00000400;
  83324. end;
  83325. procedure TCAN1_C1FIFOINT30.setTXNFULLIF(thebits : TBits_1); inline;
  83326. begin
  83327. if thebits = 0 then
  83328. pTDefRegMap(@Self)^.clr := $00000400
  83329. else
  83330. pTDefRegMap(@Self)^.&set := $00000400;
  83331. end;
  83332. function TCAN1_C1FIFOINT30.getTXNFULLIF : TBits_1; inline;
  83333. begin
  83334. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  83335. end;
  83336. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIE; inline;
  83337. begin
  83338. pTDefRegMap(@Self)^.&set := $00010000;
  83339. end;
  83340. procedure TCAN1_C1FIFOINT30.clearRXNEMPTYIE; inline;
  83341. begin
  83342. pTDefRegMap(@Self)^.clr := $00010000;
  83343. end;
  83344. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIE(thebits : TBits_1); inline;
  83345. begin
  83346. if thebits = 0 then
  83347. pTDefRegMap(@Self)^.clr := $00010000
  83348. else
  83349. pTDefRegMap(@Self)^.&set := $00010000;
  83350. end;
  83351. function TCAN1_C1FIFOINT30.getRXNEMPTYIE : TBits_1; inline;
  83352. begin
  83353. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  83354. end;
  83355. procedure TCAN1_C1FIFOINT30.setRXHALFIE; inline;
  83356. begin
  83357. pTDefRegMap(@Self)^.&set := $00020000;
  83358. end;
  83359. procedure TCAN1_C1FIFOINT30.clearRXHALFIE; inline;
  83360. begin
  83361. pTDefRegMap(@Self)^.clr := $00020000;
  83362. end;
  83363. procedure TCAN1_C1FIFOINT30.setRXHALFIE(thebits : TBits_1); inline;
  83364. begin
  83365. if thebits = 0 then
  83366. pTDefRegMap(@Self)^.clr := $00020000
  83367. else
  83368. pTDefRegMap(@Self)^.&set := $00020000;
  83369. end;
  83370. function TCAN1_C1FIFOINT30.getRXHALFIE : TBits_1; inline;
  83371. begin
  83372. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  83373. end;
  83374. procedure TCAN1_C1FIFOINT30.setRXFULLIE; inline;
  83375. begin
  83376. pTDefRegMap(@Self)^.&set := $00040000;
  83377. end;
  83378. procedure TCAN1_C1FIFOINT30.clearRXFULLIE; inline;
  83379. begin
  83380. pTDefRegMap(@Self)^.clr := $00040000;
  83381. end;
  83382. procedure TCAN1_C1FIFOINT30.setRXFULLIE(thebits : TBits_1); inline;
  83383. begin
  83384. if thebits = 0 then
  83385. pTDefRegMap(@Self)^.clr := $00040000
  83386. else
  83387. pTDefRegMap(@Self)^.&set := $00040000;
  83388. end;
  83389. function TCAN1_C1FIFOINT30.getRXFULLIE : TBits_1; inline;
  83390. begin
  83391. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  83392. end;
  83393. procedure TCAN1_C1FIFOINT30.setRXOVFLIE; inline;
  83394. begin
  83395. pTDefRegMap(@Self)^.&set := $00080000;
  83396. end;
  83397. procedure TCAN1_C1FIFOINT30.clearRXOVFLIE; inline;
  83398. begin
  83399. pTDefRegMap(@Self)^.clr := $00080000;
  83400. end;
  83401. procedure TCAN1_C1FIFOINT30.setRXOVFLIE(thebits : TBits_1); inline;
  83402. begin
  83403. if thebits = 0 then
  83404. pTDefRegMap(@Self)^.clr := $00080000
  83405. else
  83406. pTDefRegMap(@Self)^.&set := $00080000;
  83407. end;
  83408. function TCAN1_C1FIFOINT30.getRXOVFLIE : TBits_1; inline;
  83409. begin
  83410. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  83411. end;
  83412. procedure TCAN1_C1FIFOINT30.setTXEMPTYIE; inline;
  83413. begin
  83414. pTDefRegMap(@Self)^.&set := $01000000;
  83415. end;
  83416. procedure TCAN1_C1FIFOINT30.clearTXEMPTYIE; inline;
  83417. begin
  83418. pTDefRegMap(@Self)^.clr := $01000000;
  83419. end;
  83420. procedure TCAN1_C1FIFOINT30.setTXEMPTYIE(thebits : TBits_1); inline;
  83421. begin
  83422. if thebits = 0 then
  83423. pTDefRegMap(@Self)^.clr := $01000000
  83424. else
  83425. pTDefRegMap(@Self)^.&set := $01000000;
  83426. end;
  83427. function TCAN1_C1FIFOINT30.getTXEMPTYIE : TBits_1; inline;
  83428. begin
  83429. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  83430. end;
  83431. procedure TCAN1_C1FIFOINT30.setTXHALFIE; inline;
  83432. begin
  83433. pTDefRegMap(@Self)^.&set := $02000000;
  83434. end;
  83435. procedure TCAN1_C1FIFOINT30.clearTXHALFIE; inline;
  83436. begin
  83437. pTDefRegMap(@Self)^.clr := $02000000;
  83438. end;
  83439. procedure TCAN1_C1FIFOINT30.setTXHALFIE(thebits : TBits_1); inline;
  83440. begin
  83441. if thebits = 0 then
  83442. pTDefRegMap(@Self)^.clr := $02000000
  83443. else
  83444. pTDefRegMap(@Self)^.&set := $02000000;
  83445. end;
  83446. function TCAN1_C1FIFOINT30.getTXHALFIE : TBits_1; inline;
  83447. begin
  83448. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  83449. end;
  83450. procedure TCAN1_C1FIFOINT30.setTXNFULLIE; inline;
  83451. begin
  83452. pTDefRegMap(@Self)^.&set := $04000000;
  83453. end;
  83454. procedure TCAN1_C1FIFOINT30.clearTXNFULLIE; inline;
  83455. begin
  83456. pTDefRegMap(@Self)^.clr := $04000000;
  83457. end;
  83458. procedure TCAN1_C1FIFOINT30.setTXNFULLIE(thebits : TBits_1); inline;
  83459. begin
  83460. if thebits = 0 then
  83461. pTDefRegMap(@Self)^.clr := $04000000
  83462. else
  83463. pTDefRegMap(@Self)^.&set := $04000000;
  83464. end;
  83465. function TCAN1_C1FIFOINT30.getTXNFULLIE : TBits_1; inline;
  83466. begin
  83467. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  83468. end;
  83469. procedure TCAN1_C1FIFOINT30.setw(thebits : TBits_32); inline;
  83470. begin
  83471. pTDefRegMap(@Self)^.val := thebits;
  83472. end;
  83473. function TCAN1_C1FIFOINT30.getw : TBits_32; inline;
  83474. begin
  83475. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83476. end;
  83477. procedure TCAN1_C1FIFOCI30.setCFIFOCI(thebits : TBits_5); inline;
  83478. begin
  83479. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83480. end;
  83481. function TCAN1_C1FIFOCI30.getCFIFOCI : TBits_5; inline;
  83482. begin
  83483. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83484. end;
  83485. procedure TCAN1_C1FIFOCI30.setw(thebits : TBits_32); inline;
  83486. begin
  83487. pTDefRegMap(@Self)^.val := thebits;
  83488. end;
  83489. function TCAN1_C1FIFOCI30.getw : TBits_32; inline;
  83490. begin
  83491. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83492. end;
  83493. procedure TCAN1_C1FIFOCON31.setTXPRI(thebits : TBits_2); inline;
  83494. begin
  83495. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  83496. end;
  83497. function TCAN1_C1FIFOCON31.getTXPRI : TBits_2; inline;
  83498. begin
  83499. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  83500. end;
  83501. procedure TCAN1_C1FIFOCON31.setRTREN; inline;
  83502. begin
  83503. pTDefRegMap(@Self)^.&set := $00000004;
  83504. end;
  83505. procedure TCAN1_C1FIFOCON31.clearRTREN; inline;
  83506. begin
  83507. pTDefRegMap(@Self)^.clr := $00000004;
  83508. end;
  83509. procedure TCAN1_C1FIFOCON31.setRTREN(thebits : TBits_1); inline;
  83510. begin
  83511. if thebits = 0 then
  83512. pTDefRegMap(@Self)^.clr := $00000004
  83513. else
  83514. pTDefRegMap(@Self)^.&set := $00000004;
  83515. end;
  83516. function TCAN1_C1FIFOCON31.getRTREN : TBits_1; inline;
  83517. begin
  83518. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  83519. end;
  83520. procedure TCAN1_C1FIFOCON31.setTXREQ; inline;
  83521. begin
  83522. pTDefRegMap(@Self)^.&set := $00000008;
  83523. end;
  83524. procedure TCAN1_C1FIFOCON31.clearTXREQ; inline;
  83525. begin
  83526. pTDefRegMap(@Self)^.clr := $00000008;
  83527. end;
  83528. procedure TCAN1_C1FIFOCON31.setTXREQ(thebits : TBits_1); inline;
  83529. begin
  83530. if thebits = 0 then
  83531. pTDefRegMap(@Self)^.clr := $00000008
  83532. else
  83533. pTDefRegMap(@Self)^.&set := $00000008;
  83534. end;
  83535. function TCAN1_C1FIFOCON31.getTXREQ : TBits_1; inline;
  83536. begin
  83537. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  83538. end;
  83539. procedure TCAN1_C1FIFOCON31.setTXERR; inline;
  83540. begin
  83541. pTDefRegMap(@Self)^.&set := $00000010;
  83542. end;
  83543. procedure TCAN1_C1FIFOCON31.clearTXERR; inline;
  83544. begin
  83545. pTDefRegMap(@Self)^.clr := $00000010;
  83546. end;
  83547. procedure TCAN1_C1FIFOCON31.setTXERR(thebits : TBits_1); inline;
  83548. begin
  83549. if thebits = 0 then
  83550. pTDefRegMap(@Self)^.clr := $00000010
  83551. else
  83552. pTDefRegMap(@Self)^.&set := $00000010;
  83553. end;
  83554. function TCAN1_C1FIFOCON31.getTXERR : TBits_1; inline;
  83555. begin
  83556. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  83557. end;
  83558. procedure TCAN1_C1FIFOCON31.setTXLARB; inline;
  83559. begin
  83560. pTDefRegMap(@Self)^.&set := $00000020;
  83561. end;
  83562. procedure TCAN1_C1FIFOCON31.clearTXLARB; inline;
  83563. begin
  83564. pTDefRegMap(@Self)^.clr := $00000020;
  83565. end;
  83566. procedure TCAN1_C1FIFOCON31.setTXLARB(thebits : TBits_1); inline;
  83567. begin
  83568. if thebits = 0 then
  83569. pTDefRegMap(@Self)^.clr := $00000020
  83570. else
  83571. pTDefRegMap(@Self)^.&set := $00000020;
  83572. end;
  83573. function TCAN1_C1FIFOCON31.getTXLARB : TBits_1; inline;
  83574. begin
  83575. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  83576. end;
  83577. procedure TCAN1_C1FIFOCON31.setTXABAT; inline;
  83578. begin
  83579. pTDefRegMap(@Self)^.&set := $00000040;
  83580. end;
  83581. procedure TCAN1_C1FIFOCON31.clearTXABAT; inline;
  83582. begin
  83583. pTDefRegMap(@Self)^.clr := $00000040;
  83584. end;
  83585. procedure TCAN1_C1FIFOCON31.setTXABAT(thebits : TBits_1); inline;
  83586. begin
  83587. if thebits = 0 then
  83588. pTDefRegMap(@Self)^.clr := $00000040
  83589. else
  83590. pTDefRegMap(@Self)^.&set := $00000040;
  83591. end;
  83592. function TCAN1_C1FIFOCON31.getTXABAT : TBits_1; inline;
  83593. begin
  83594. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  83595. end;
  83596. procedure TCAN1_C1FIFOCON31.setTXEN; inline;
  83597. begin
  83598. pTDefRegMap(@Self)^.&set := $00000080;
  83599. end;
  83600. procedure TCAN1_C1FIFOCON31.clearTXEN; inline;
  83601. begin
  83602. pTDefRegMap(@Self)^.clr := $00000080;
  83603. end;
  83604. procedure TCAN1_C1FIFOCON31.setTXEN(thebits : TBits_1); inline;
  83605. begin
  83606. if thebits = 0 then
  83607. pTDefRegMap(@Self)^.clr := $00000080
  83608. else
  83609. pTDefRegMap(@Self)^.&set := $00000080;
  83610. end;
  83611. function TCAN1_C1FIFOCON31.getTXEN : TBits_1; inline;
  83612. begin
  83613. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83614. end;
  83615. procedure TCAN1_C1FIFOCON31.setDONLY; inline;
  83616. begin
  83617. pTDefRegMap(@Self)^.&set := $00001000;
  83618. end;
  83619. procedure TCAN1_C1FIFOCON31.clearDONLY; inline;
  83620. begin
  83621. pTDefRegMap(@Self)^.clr := $00001000;
  83622. end;
  83623. procedure TCAN1_C1FIFOCON31.setDONLY(thebits : TBits_1); inline;
  83624. begin
  83625. if thebits = 0 then
  83626. pTDefRegMap(@Self)^.clr := $00001000
  83627. else
  83628. pTDefRegMap(@Self)^.&set := $00001000;
  83629. end;
  83630. function TCAN1_C1FIFOCON31.getDONLY : TBits_1; inline;
  83631. begin
  83632. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  83633. end;
  83634. procedure TCAN1_C1FIFOCON31.setUINC; inline;
  83635. begin
  83636. pTDefRegMap(@Self)^.&set := $00002000;
  83637. end;
  83638. procedure TCAN1_C1FIFOCON31.clearUINC; inline;
  83639. begin
  83640. pTDefRegMap(@Self)^.clr := $00002000;
  83641. end;
  83642. procedure TCAN1_C1FIFOCON31.setUINC(thebits : TBits_1); inline;
  83643. begin
  83644. if thebits = 0 then
  83645. pTDefRegMap(@Self)^.clr := $00002000
  83646. else
  83647. pTDefRegMap(@Self)^.&set := $00002000;
  83648. end;
  83649. function TCAN1_C1FIFOCON31.getUINC : TBits_1; inline;
  83650. begin
  83651. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  83652. end;
  83653. procedure TCAN1_C1FIFOCON31.setFRESET; inline;
  83654. begin
  83655. pTDefRegMap(@Self)^.&set := $00004000;
  83656. end;
  83657. procedure TCAN1_C1FIFOCON31.clearFRESET; inline;
  83658. begin
  83659. pTDefRegMap(@Self)^.clr := $00004000;
  83660. end;
  83661. procedure TCAN1_C1FIFOCON31.setFRESET(thebits : TBits_1); inline;
  83662. begin
  83663. if thebits = 0 then
  83664. pTDefRegMap(@Self)^.clr := $00004000
  83665. else
  83666. pTDefRegMap(@Self)^.&set := $00004000;
  83667. end;
  83668. function TCAN1_C1FIFOCON31.getFRESET : TBits_1; inline;
  83669. begin
  83670. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  83671. end;
  83672. procedure TCAN1_C1FIFOCON31.setFSIZE(thebits : TBits_5); inline;
  83673. begin
  83674. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83675. end;
  83676. function TCAN1_C1FIFOCON31.getFSIZE : TBits_5; inline;
  83677. begin
  83678. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83679. end;
  83680. procedure TCAN1_C1FIFOCON31.setw(thebits : TBits_32); inline;
  83681. begin
  83682. pTDefRegMap(@Self)^.val := thebits;
  83683. end;
  83684. function TCAN1_C1FIFOCON31.getw : TBits_32; inline;
  83685. begin
  83686. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83687. end;
  83688. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIF; inline;
  83689. begin
  83690. pTDefRegMap(@Self)^.&set := $00000001;
  83691. end;
  83692. procedure TCAN1_C1FIFOINT31.clearRXNEMPTYIF; inline;
  83693. begin
  83694. pTDefRegMap(@Self)^.clr := $00000001;
  83695. end;
  83696. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIF(thebits : TBits_1); inline;
  83697. begin
  83698. if thebits = 0 then
  83699. pTDefRegMap(@Self)^.clr := $00000001
  83700. else
  83701. pTDefRegMap(@Self)^.&set := $00000001;
  83702. end;
  83703. function TCAN1_C1FIFOINT31.getRXNEMPTYIF : TBits_1; inline;
  83704. begin
  83705. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  83706. end;
  83707. procedure TCAN1_C1FIFOINT31.setRXHALFIF; inline;
  83708. begin
  83709. pTDefRegMap(@Self)^.&set := $00000002;
  83710. end;
  83711. procedure TCAN1_C1FIFOINT31.clearRXHALFIF; inline;
  83712. begin
  83713. pTDefRegMap(@Self)^.clr := $00000002;
  83714. end;
  83715. procedure TCAN1_C1FIFOINT31.setRXHALFIF(thebits : TBits_1); inline;
  83716. begin
  83717. if thebits = 0 then
  83718. pTDefRegMap(@Self)^.clr := $00000002
  83719. else
  83720. pTDefRegMap(@Self)^.&set := $00000002;
  83721. end;
  83722. function TCAN1_C1FIFOINT31.getRXHALFIF : TBits_1; inline;
  83723. begin
  83724. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  83725. end;
  83726. procedure TCAN1_C1FIFOINT31.setRXFULLIF; inline;
  83727. begin
  83728. pTDefRegMap(@Self)^.&set := $00000004;
  83729. end;
  83730. procedure TCAN1_C1FIFOINT31.clearRXFULLIF; inline;
  83731. begin
  83732. pTDefRegMap(@Self)^.clr := $00000004;
  83733. end;
  83734. procedure TCAN1_C1FIFOINT31.setRXFULLIF(thebits : TBits_1); inline;
  83735. begin
  83736. if thebits = 0 then
  83737. pTDefRegMap(@Self)^.clr := $00000004
  83738. else
  83739. pTDefRegMap(@Self)^.&set := $00000004;
  83740. end;
  83741. function TCAN1_C1FIFOINT31.getRXFULLIF : TBits_1; inline;
  83742. begin
  83743. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  83744. end;
  83745. procedure TCAN1_C1FIFOINT31.setRXOVFLIF; inline;
  83746. begin
  83747. pTDefRegMap(@Self)^.&set := $00000008;
  83748. end;
  83749. procedure TCAN1_C1FIFOINT31.clearRXOVFLIF; inline;
  83750. begin
  83751. pTDefRegMap(@Self)^.clr := $00000008;
  83752. end;
  83753. procedure TCAN1_C1FIFOINT31.setRXOVFLIF(thebits : TBits_1); inline;
  83754. begin
  83755. if thebits = 0 then
  83756. pTDefRegMap(@Self)^.clr := $00000008
  83757. else
  83758. pTDefRegMap(@Self)^.&set := $00000008;
  83759. end;
  83760. function TCAN1_C1FIFOINT31.getRXOVFLIF : TBits_1; inline;
  83761. begin
  83762. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  83763. end;
  83764. procedure TCAN1_C1FIFOINT31.setTXEMPTYIF; inline;
  83765. begin
  83766. pTDefRegMap(@Self)^.&set := $00000100;
  83767. end;
  83768. procedure TCAN1_C1FIFOINT31.clearTXEMPTYIF; inline;
  83769. begin
  83770. pTDefRegMap(@Self)^.clr := $00000100;
  83771. end;
  83772. procedure TCAN1_C1FIFOINT31.setTXEMPTYIF(thebits : TBits_1); inline;
  83773. begin
  83774. if thebits = 0 then
  83775. pTDefRegMap(@Self)^.clr := $00000100
  83776. else
  83777. pTDefRegMap(@Self)^.&set := $00000100;
  83778. end;
  83779. function TCAN1_C1FIFOINT31.getTXEMPTYIF : TBits_1; inline;
  83780. begin
  83781. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  83782. end;
  83783. procedure TCAN1_C1FIFOINT31.setTXHALFIF; inline;
  83784. begin
  83785. pTDefRegMap(@Self)^.&set := $00000200;
  83786. end;
  83787. procedure TCAN1_C1FIFOINT31.clearTXHALFIF; inline;
  83788. begin
  83789. pTDefRegMap(@Self)^.clr := $00000200;
  83790. end;
  83791. procedure TCAN1_C1FIFOINT31.setTXHALFIF(thebits : TBits_1); inline;
  83792. begin
  83793. if thebits = 0 then
  83794. pTDefRegMap(@Self)^.clr := $00000200
  83795. else
  83796. pTDefRegMap(@Self)^.&set := $00000200;
  83797. end;
  83798. function TCAN1_C1FIFOINT31.getTXHALFIF : TBits_1; inline;
  83799. begin
  83800. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  83801. end;
  83802. procedure TCAN1_C1FIFOINT31.setTXNFULLIF; inline;
  83803. begin
  83804. pTDefRegMap(@Self)^.&set := $00000400;
  83805. end;
  83806. procedure TCAN1_C1FIFOINT31.clearTXNFULLIF; inline;
  83807. begin
  83808. pTDefRegMap(@Self)^.clr := $00000400;
  83809. end;
  83810. procedure TCAN1_C1FIFOINT31.setTXNFULLIF(thebits : TBits_1); inline;
  83811. begin
  83812. if thebits = 0 then
  83813. pTDefRegMap(@Self)^.clr := $00000400
  83814. else
  83815. pTDefRegMap(@Self)^.&set := $00000400;
  83816. end;
  83817. function TCAN1_C1FIFOINT31.getTXNFULLIF : TBits_1; inline;
  83818. begin
  83819. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  83820. end;
  83821. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIE; inline;
  83822. begin
  83823. pTDefRegMap(@Self)^.&set := $00010000;
  83824. end;
  83825. procedure TCAN1_C1FIFOINT31.clearRXNEMPTYIE; inline;
  83826. begin
  83827. pTDefRegMap(@Self)^.clr := $00010000;
  83828. end;
  83829. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIE(thebits : TBits_1); inline;
  83830. begin
  83831. if thebits = 0 then
  83832. pTDefRegMap(@Self)^.clr := $00010000
  83833. else
  83834. pTDefRegMap(@Self)^.&set := $00010000;
  83835. end;
  83836. function TCAN1_C1FIFOINT31.getRXNEMPTYIE : TBits_1; inline;
  83837. begin
  83838. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  83839. end;
  83840. procedure TCAN1_C1FIFOINT31.setRXHALFIE; inline;
  83841. begin
  83842. pTDefRegMap(@Self)^.&set := $00020000;
  83843. end;
  83844. procedure TCAN1_C1FIFOINT31.clearRXHALFIE; inline;
  83845. begin
  83846. pTDefRegMap(@Self)^.clr := $00020000;
  83847. end;
  83848. procedure TCAN1_C1FIFOINT31.setRXHALFIE(thebits : TBits_1); inline;
  83849. begin
  83850. if thebits = 0 then
  83851. pTDefRegMap(@Self)^.clr := $00020000
  83852. else
  83853. pTDefRegMap(@Self)^.&set := $00020000;
  83854. end;
  83855. function TCAN1_C1FIFOINT31.getRXHALFIE : TBits_1; inline;
  83856. begin
  83857. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  83858. end;
  83859. procedure TCAN1_C1FIFOINT31.setRXFULLIE; inline;
  83860. begin
  83861. pTDefRegMap(@Self)^.&set := $00040000;
  83862. end;
  83863. procedure TCAN1_C1FIFOINT31.clearRXFULLIE; inline;
  83864. begin
  83865. pTDefRegMap(@Self)^.clr := $00040000;
  83866. end;
  83867. procedure TCAN1_C1FIFOINT31.setRXFULLIE(thebits : TBits_1); inline;
  83868. begin
  83869. if thebits = 0 then
  83870. pTDefRegMap(@Self)^.clr := $00040000
  83871. else
  83872. pTDefRegMap(@Self)^.&set := $00040000;
  83873. end;
  83874. function TCAN1_C1FIFOINT31.getRXFULLIE : TBits_1; inline;
  83875. begin
  83876. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  83877. end;
  83878. procedure TCAN1_C1FIFOINT31.setRXOVFLIE; inline;
  83879. begin
  83880. pTDefRegMap(@Self)^.&set := $00080000;
  83881. end;
  83882. procedure TCAN1_C1FIFOINT31.clearRXOVFLIE; inline;
  83883. begin
  83884. pTDefRegMap(@Self)^.clr := $00080000;
  83885. end;
  83886. procedure TCAN1_C1FIFOINT31.setRXOVFLIE(thebits : TBits_1); inline;
  83887. begin
  83888. if thebits = 0 then
  83889. pTDefRegMap(@Self)^.clr := $00080000
  83890. else
  83891. pTDefRegMap(@Self)^.&set := $00080000;
  83892. end;
  83893. function TCAN1_C1FIFOINT31.getRXOVFLIE : TBits_1; inline;
  83894. begin
  83895. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  83896. end;
  83897. procedure TCAN1_C1FIFOINT31.setTXEMPTYIE; inline;
  83898. begin
  83899. pTDefRegMap(@Self)^.&set := $01000000;
  83900. end;
  83901. procedure TCAN1_C1FIFOINT31.clearTXEMPTYIE; inline;
  83902. begin
  83903. pTDefRegMap(@Self)^.clr := $01000000;
  83904. end;
  83905. procedure TCAN1_C1FIFOINT31.setTXEMPTYIE(thebits : TBits_1); inline;
  83906. begin
  83907. if thebits = 0 then
  83908. pTDefRegMap(@Self)^.clr := $01000000
  83909. else
  83910. pTDefRegMap(@Self)^.&set := $01000000;
  83911. end;
  83912. function TCAN1_C1FIFOINT31.getTXEMPTYIE : TBits_1; inline;
  83913. begin
  83914. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  83915. end;
  83916. procedure TCAN1_C1FIFOINT31.setTXHALFIE; inline;
  83917. begin
  83918. pTDefRegMap(@Self)^.&set := $02000000;
  83919. end;
  83920. procedure TCAN1_C1FIFOINT31.clearTXHALFIE; inline;
  83921. begin
  83922. pTDefRegMap(@Self)^.clr := $02000000;
  83923. end;
  83924. procedure TCAN1_C1FIFOINT31.setTXHALFIE(thebits : TBits_1); inline;
  83925. begin
  83926. if thebits = 0 then
  83927. pTDefRegMap(@Self)^.clr := $02000000
  83928. else
  83929. pTDefRegMap(@Self)^.&set := $02000000;
  83930. end;
  83931. function TCAN1_C1FIFOINT31.getTXHALFIE : TBits_1; inline;
  83932. begin
  83933. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  83934. end;
  83935. procedure TCAN1_C1FIFOINT31.setTXNFULLIE; inline;
  83936. begin
  83937. pTDefRegMap(@Self)^.&set := $04000000;
  83938. end;
  83939. procedure TCAN1_C1FIFOINT31.clearTXNFULLIE; inline;
  83940. begin
  83941. pTDefRegMap(@Self)^.clr := $04000000;
  83942. end;
  83943. procedure TCAN1_C1FIFOINT31.setTXNFULLIE(thebits : TBits_1); inline;
  83944. begin
  83945. if thebits = 0 then
  83946. pTDefRegMap(@Self)^.clr := $04000000
  83947. else
  83948. pTDefRegMap(@Self)^.&set := $04000000;
  83949. end;
  83950. function TCAN1_C1FIFOINT31.getTXNFULLIE : TBits_1; inline;
  83951. begin
  83952. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  83953. end;
  83954. procedure TCAN1_C1FIFOINT31.setw(thebits : TBits_32); inline;
  83955. begin
  83956. pTDefRegMap(@Self)^.val := thebits;
  83957. end;
  83958. function TCAN1_C1FIFOINT31.getw : TBits_32; inline;
  83959. begin
  83960. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83961. end;
  83962. procedure TCAN1_C1FIFOCI31.setCFIFOCI(thebits : TBits_5); inline;
  83963. begin
  83964. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83965. end;
  83966. function TCAN1_C1FIFOCI31.getCFIFOCI : TBits_5; inline;
  83967. begin
  83968. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83969. end;
  83970. procedure TCAN1_C1FIFOCI31.setw(thebits : TBits_32); inline;
  83971. begin
  83972. pTDefRegMap(@Self)^.val := thebits;
  83973. end;
  83974. function TCAN1_C1FIFOCI31.getw : TBits_32; inline;
  83975. begin
  83976. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83977. end;
  83978. procedure TDEVCFG_DEVCFG3.setUSERID(thebits : TBits_16); inline;
  83979. begin
  83980. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  83981. end;
  83982. function TDEVCFG_DEVCFG3.getUSERID : TBits_16; inline;
  83983. begin
  83984. getUSERID := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  83985. end;
  83986. procedure TDEVCFG_DEVCFG3.setFSRSSEL(thebits : TBits_3); inline;
  83987. begin
  83988. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  83989. end;
  83990. function TDEVCFG_DEVCFG3.getFSRSSEL : TBits_3; inline;
  83991. begin
  83992. getFSRSSEL := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  83993. end;
  83994. procedure TDEVCFG_DEVCFG3.setFCANIO; inline;
  83995. begin
  83996. pTDefRegMap(@Self)^.&set := $04000000;
  83997. end;
  83998. procedure TDEVCFG_DEVCFG3.clearFCANIO; inline;
  83999. begin
  84000. pTDefRegMap(@Self)^.clr := $04000000;
  84001. end;
  84002. procedure TDEVCFG_DEVCFG3.setFCANIO(thebits : TBits_1); inline;
  84003. begin
  84004. if thebits = 0 then
  84005. pTDefRegMap(@Self)^.clr := $04000000
  84006. else
  84007. pTDefRegMap(@Self)^.&set := $04000000;
  84008. end;
  84009. function TDEVCFG_DEVCFG3.getFCANIO : TBits_1; inline;
  84010. begin
  84011. getFCANIO := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  84012. end;
  84013. procedure TDEVCFG_DEVCFG3.setFUSBIDIO; inline;
  84014. begin
  84015. pTDefRegMap(@Self)^.&set := $40000000;
  84016. end;
  84017. procedure TDEVCFG_DEVCFG3.clearFUSBIDIO; inline;
  84018. begin
  84019. pTDefRegMap(@Self)^.clr := $40000000;
  84020. end;
  84021. procedure TDEVCFG_DEVCFG3.setFUSBIDIO(thebits : TBits_1); inline;
  84022. begin
  84023. if thebits = 0 then
  84024. pTDefRegMap(@Self)^.clr := $40000000
  84025. else
  84026. pTDefRegMap(@Self)^.&set := $40000000;
  84027. end;
  84028. function TDEVCFG_DEVCFG3.getFUSBIDIO : TBits_1; inline;
  84029. begin
  84030. getFUSBIDIO := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  84031. end;
  84032. procedure TDEVCFG_DEVCFG3.setFVBUSONIO; inline;
  84033. begin
  84034. pTDefRegMap(@Self)^.&set := $80000000;
  84035. end;
  84036. procedure TDEVCFG_DEVCFG3.clearFVBUSONIO; inline;
  84037. begin
  84038. pTDefRegMap(@Self)^.clr := $80000000;
  84039. end;
  84040. procedure TDEVCFG_DEVCFG3.setFVBUSONIO(thebits : TBits_1); inline;
  84041. begin
  84042. if thebits = 0 then
  84043. pTDefRegMap(@Self)^.clr := $80000000
  84044. else
  84045. pTDefRegMap(@Self)^.&set := $80000000;
  84046. end;
  84047. function TDEVCFG_DEVCFG3.getFVBUSONIO : TBits_1; inline;
  84048. begin
  84049. getFVBUSONIO := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  84050. end;
  84051. procedure TDEVCFG_DEVCFG3.setw(thebits : TBits_32); inline;
  84052. begin
  84053. pTDefRegMap(@Self)^.val := thebits;
  84054. end;
  84055. function TDEVCFG_DEVCFG3.getw : TBits_32; inline;
  84056. begin
  84057. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84058. end;
  84059. procedure TDEVCFG_DEVCFG2.setFPLLIDIV(thebits : TBits_3); inline;
  84060. begin
  84061. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  84062. end;
  84063. function TDEVCFG_DEVCFG2.getFPLLIDIV : TBits_3; inline;
  84064. begin
  84065. getFPLLIDIV := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  84066. end;
  84067. procedure TDEVCFG_DEVCFG2.setFPLLMUL(thebits : TBits_3); inline;
  84068. begin
  84069. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  84070. end;
  84071. function TDEVCFG_DEVCFG2.getFPLLMUL : TBits_3; inline;
  84072. begin
  84073. getFPLLMUL := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  84074. end;
  84075. procedure TDEVCFG_DEVCFG2.setUPLLIDIV(thebits : TBits_3); inline;
  84076. begin
  84077. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  84078. end;
  84079. function TDEVCFG_DEVCFG2.getUPLLIDIV : TBits_3; inline;
  84080. begin
  84081. getUPLLIDIV := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  84082. end;
  84083. procedure TDEVCFG_DEVCFG2.setUPLLEN; inline;
  84084. begin
  84085. pTDefRegMap(@Self)^.&set := $00008000;
  84086. end;
  84087. procedure TDEVCFG_DEVCFG2.clearUPLLEN; inline;
  84088. begin
  84089. pTDefRegMap(@Self)^.clr := $00008000;
  84090. end;
  84091. procedure TDEVCFG_DEVCFG2.setUPLLEN(thebits : TBits_1); inline;
  84092. begin
  84093. if thebits = 0 then
  84094. pTDefRegMap(@Self)^.clr := $00008000
  84095. else
  84096. pTDefRegMap(@Self)^.&set := $00008000;
  84097. end;
  84098. function TDEVCFG_DEVCFG2.getUPLLEN : TBits_1; inline;
  84099. begin
  84100. getUPLLEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  84101. end;
  84102. procedure TDEVCFG_DEVCFG2.setFPLLODIV(thebits : TBits_3); inline;
  84103. begin
  84104. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  84105. end;
  84106. function TDEVCFG_DEVCFG2.getFPLLODIV : TBits_3; inline;
  84107. begin
  84108. getFPLLODIV := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  84109. end;
  84110. procedure TDEVCFG_DEVCFG2.setw(thebits : TBits_32); inline;
  84111. begin
  84112. pTDefRegMap(@Self)^.val := thebits;
  84113. end;
  84114. function TDEVCFG_DEVCFG2.getw : TBits_32; inline;
  84115. begin
  84116. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84117. end;
  84118. procedure TDEVCFG_DEVCFG1.setFNOSC(thebits : TBits_3); inline;
  84119. begin
  84120. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  84121. end;
  84122. function TDEVCFG_DEVCFG1.getFNOSC : TBits_3; inline;
  84123. begin
  84124. getFNOSC := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  84125. end;
  84126. procedure TDEVCFG_DEVCFG1.setFSOSCEN; inline;
  84127. begin
  84128. pTDefRegMap(@Self)^.&set := $00000020;
  84129. end;
  84130. procedure TDEVCFG_DEVCFG1.clearFSOSCEN; inline;
  84131. begin
  84132. pTDefRegMap(@Self)^.clr := $00000020;
  84133. end;
  84134. procedure TDEVCFG_DEVCFG1.setFSOSCEN(thebits : TBits_1); inline;
  84135. begin
  84136. if thebits = 0 then
  84137. pTDefRegMap(@Self)^.clr := $00000020
  84138. else
  84139. pTDefRegMap(@Self)^.&set := $00000020;
  84140. end;
  84141. function TDEVCFG_DEVCFG1.getFSOSCEN : TBits_1; inline;
  84142. begin
  84143. getFSOSCEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  84144. end;
  84145. procedure TDEVCFG_DEVCFG1.setIESO; inline;
  84146. begin
  84147. pTDefRegMap(@Self)^.&set := $00000080;
  84148. end;
  84149. procedure TDEVCFG_DEVCFG1.clearIESO; inline;
  84150. begin
  84151. pTDefRegMap(@Self)^.clr := $00000080;
  84152. end;
  84153. procedure TDEVCFG_DEVCFG1.setIESO(thebits : TBits_1); inline;
  84154. begin
  84155. if thebits = 0 then
  84156. pTDefRegMap(@Self)^.clr := $00000080
  84157. else
  84158. pTDefRegMap(@Self)^.&set := $00000080;
  84159. end;
  84160. function TDEVCFG_DEVCFG1.getIESO : TBits_1; inline;
  84161. begin
  84162. getIESO := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  84163. end;
  84164. procedure TDEVCFG_DEVCFG1.setPOSCMOD(thebits : TBits_2); inline;
  84165. begin
  84166. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  84167. end;
  84168. function TDEVCFG_DEVCFG1.getPOSCMOD : TBits_2; inline;
  84169. begin
  84170. getPOSCMOD := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  84171. end;
  84172. procedure TDEVCFG_DEVCFG1.setOSCIOFNC; inline;
  84173. begin
  84174. pTDefRegMap(@Self)^.&set := $00000400;
  84175. end;
  84176. procedure TDEVCFG_DEVCFG1.clearOSCIOFNC; inline;
  84177. begin
  84178. pTDefRegMap(@Self)^.clr := $00000400;
  84179. end;
  84180. procedure TDEVCFG_DEVCFG1.setOSCIOFNC(thebits : TBits_1); inline;
  84181. begin
  84182. if thebits = 0 then
  84183. pTDefRegMap(@Self)^.clr := $00000400
  84184. else
  84185. pTDefRegMap(@Self)^.&set := $00000400;
  84186. end;
  84187. function TDEVCFG_DEVCFG1.getOSCIOFNC : TBits_1; inline;
  84188. begin
  84189. getOSCIOFNC := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  84190. end;
  84191. procedure TDEVCFG_DEVCFG1.setFPBDIV(thebits : TBits_2); inline;
  84192. begin
  84193. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFCFFF or ( thebits shl 12 );
  84194. end;
  84195. function TDEVCFG_DEVCFG1.getFPBDIV : TBits_2; inline;
  84196. begin
  84197. getFPBDIV := (pTDefRegMap(@Self)^.val and $00003000) shr 12;
  84198. end;
  84199. procedure TDEVCFG_DEVCFG1.setFCKSM(thebits : TBits_2); inline;
  84200. begin
  84201. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  84202. end;
  84203. function TDEVCFG_DEVCFG1.getFCKSM : TBits_2; inline;
  84204. begin
  84205. getFCKSM := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  84206. end;
  84207. procedure TDEVCFG_DEVCFG1.setWDTPS(thebits : TBits_5); inline;
  84208. begin
  84209. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  84210. end;
  84211. function TDEVCFG_DEVCFG1.getWDTPS : TBits_5; inline;
  84212. begin
  84213. getWDTPS := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  84214. end;
  84215. procedure TDEVCFG_DEVCFG1.setFWDTEN; inline;
  84216. begin
  84217. pTDefRegMap(@Self)^.&set := $00800000;
  84218. end;
  84219. procedure TDEVCFG_DEVCFG1.clearFWDTEN; inline;
  84220. begin
  84221. pTDefRegMap(@Self)^.clr := $00800000;
  84222. end;
  84223. procedure TDEVCFG_DEVCFG1.setFWDTEN(thebits : TBits_1); inline;
  84224. begin
  84225. if thebits = 0 then
  84226. pTDefRegMap(@Self)^.clr := $00800000
  84227. else
  84228. pTDefRegMap(@Self)^.&set := $00800000;
  84229. end;
  84230. function TDEVCFG_DEVCFG1.getFWDTEN : TBits_1; inline;
  84231. begin
  84232. getFWDTEN := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  84233. end;
  84234. procedure TDEVCFG_DEVCFG1.setw(thebits : TBits_32); inline;
  84235. begin
  84236. pTDefRegMap(@Self)^.val := thebits;
  84237. end;
  84238. function TDEVCFG_DEVCFG1.getw : TBits_32; inline;
  84239. begin
  84240. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84241. end;
  84242. procedure TDEVCFG_DEVCFG0.setDEBUG(thebits : TBits_2); inline;
  84243. begin
  84244. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  84245. end;
  84246. function TDEVCFG_DEVCFG0.getDEBUG : TBits_2; inline;
  84247. begin
  84248. getDEBUG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  84249. end;
  84250. procedure TDEVCFG_DEVCFG0.setICESEL; inline;
  84251. begin
  84252. pTDefRegMap(@Self)^.&set := $00000008;
  84253. end;
  84254. procedure TDEVCFG_DEVCFG0.clearICESEL; inline;
  84255. begin
  84256. pTDefRegMap(@Self)^.clr := $00000008;
  84257. end;
  84258. procedure TDEVCFG_DEVCFG0.setICESEL(thebits : TBits_1); inline;
  84259. begin
  84260. if thebits = 0 then
  84261. pTDefRegMap(@Self)^.clr := $00000008
  84262. else
  84263. pTDefRegMap(@Self)^.&set := $00000008;
  84264. end;
  84265. function TDEVCFG_DEVCFG0.getICESEL : TBits_1; inline;
  84266. begin
  84267. getICESEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  84268. end;
  84269. procedure TDEVCFG_DEVCFG0.setPWP(thebits : TBits_8); inline;
  84270. begin
  84271. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF00FFF or ( thebits shl 12 );
  84272. end;
  84273. function TDEVCFG_DEVCFG0.getPWP : TBits_8; inline;
  84274. begin
  84275. getPWP := (pTDefRegMap(@Self)^.val and $000FF000) shr 12;
  84276. end;
  84277. procedure TDEVCFG_DEVCFG0.setBWP; inline;
  84278. begin
  84279. pTDefRegMap(@Self)^.&set := $01000000;
  84280. end;
  84281. procedure TDEVCFG_DEVCFG0.clearBWP; inline;
  84282. begin
  84283. pTDefRegMap(@Self)^.clr := $01000000;
  84284. end;
  84285. procedure TDEVCFG_DEVCFG0.setBWP(thebits : TBits_1); inline;
  84286. begin
  84287. if thebits = 0 then
  84288. pTDefRegMap(@Self)^.clr := $01000000
  84289. else
  84290. pTDefRegMap(@Self)^.&set := $01000000;
  84291. end;
  84292. function TDEVCFG_DEVCFG0.getBWP : TBits_1; inline;
  84293. begin
  84294. getBWP := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  84295. end;
  84296. procedure TDEVCFG_DEVCFG0.setCP; inline;
  84297. begin
  84298. pTDefRegMap(@Self)^.&set := $10000000;
  84299. end;
  84300. procedure TDEVCFG_DEVCFG0.clearCP; inline;
  84301. begin
  84302. pTDefRegMap(@Self)^.clr := $10000000;
  84303. end;
  84304. procedure TDEVCFG_DEVCFG0.setCP(thebits : TBits_1); inline;
  84305. begin
  84306. if thebits = 0 then
  84307. pTDefRegMap(@Self)^.clr := $10000000
  84308. else
  84309. pTDefRegMap(@Self)^.&set := $10000000;
  84310. end;
  84311. function TDEVCFG_DEVCFG0.getCP : TBits_1; inline;
  84312. begin
  84313. getCP := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  84314. end;
  84315. procedure TDEVCFG_DEVCFG0.setFDEBUG(thebits : TBits_2); inline;
  84316. begin
  84317. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  84318. end;
  84319. function TDEVCFG_DEVCFG0.getFDEBUG : TBits_2; inline;
  84320. begin
  84321. getFDEBUG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  84322. end;
  84323. procedure TDEVCFG_DEVCFG0.setw(thebits : TBits_32); inline;
  84324. begin
  84325. pTDefRegMap(@Self)^.val := thebits;
  84326. end;
  84327. function TDEVCFG_DEVCFG0.getw : TBits_32; inline;
  84328. begin
  84329. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84330. end;
  84331. procedure _CORE_TIMER_VECTOR_interrupt; external name '_CORE_TIMER_VECTOR_interrupt';
  84332. procedure _CORE_SOFTWARE_0_VECTOR_interrupt; external name '_CORE_SOFTWARE_0_VECTOR_interrupt';
  84333. procedure _CORE_SOFTWARE_1_VECTOR_interrupt; external name '_CORE_SOFTWARE_1_VECTOR_interrupt';
  84334. procedure _EXTERNAL_0_VECTOR_interrupt; external name '_EXTERNAL_0_VECTOR_interrupt';
  84335. procedure _TIMER_1_VECTOR_interrupt; external name '_TIMER_1_VECTOR_interrupt';
  84336. procedure _INPUT_CAPTURE_1_VECTOR_interrupt; external name '_INPUT_CAPTURE_1_VECTOR_interrupt';
  84337. procedure _OUTPUT_COMPARE_1_VECTOR_interrupt; external name '_OUTPUT_COMPARE_1_VECTOR_interrupt';
  84338. procedure _EXTERNAL_1_VECTOR_interrupt; external name '_EXTERNAL_1_VECTOR_interrupt';
  84339. procedure _TIMER_2_VECTOR_interrupt; external name '_TIMER_2_VECTOR_interrupt';
  84340. procedure _INPUT_CAPTURE_2_VECTOR_interrupt; external name '_INPUT_CAPTURE_2_VECTOR_interrupt';
  84341. procedure _OUTPUT_COMPARE_2_VECTOR_interrupt; external name '_OUTPUT_COMPARE_2_VECTOR_interrupt';
  84342. procedure _EXTERNAL_2_VECTOR_interrupt; external name '_EXTERNAL_2_VECTOR_interrupt';
  84343. procedure _TIMER_3_VECTOR_interrupt; external name '_TIMER_3_VECTOR_interrupt';
  84344. procedure _INPUT_CAPTURE_3_VECTOR_interrupt; external name '_INPUT_CAPTURE_3_VECTOR_interrupt';
  84345. procedure _OUTPUT_COMPARE_3_VECTOR_interrupt; external name '_OUTPUT_COMPARE_3_VECTOR_interrupt';
  84346. procedure _EXTERNAL_3_VECTOR_interrupt; external name '_EXTERNAL_3_VECTOR_interrupt';
  84347. procedure _TIMER_4_VECTOR_interrupt; external name '_TIMER_4_VECTOR_interrupt';
  84348. procedure _INPUT_CAPTURE_4_VECTOR_interrupt; external name '_INPUT_CAPTURE_4_VECTOR_interrupt';
  84349. procedure _OUTPUT_COMPARE_4_VECTOR_interrupt; external name '_OUTPUT_COMPARE_4_VECTOR_interrupt';
  84350. procedure _EXTERNAL_4_VECTOR_interrupt; external name '_EXTERNAL_4_VECTOR_interrupt';
  84351. procedure _TIMER_5_VECTOR_interrupt; external name '_TIMER_5_VECTOR_interrupt';
  84352. procedure _INPUT_CAPTURE_5_VECTOR_interrupt; external name '_INPUT_CAPTURE_5_VECTOR_interrupt';
  84353. procedure _OUTPUT_COMPARE_5_VECTOR_interrupt; external name '_OUTPUT_COMPARE_5_VECTOR_interrupt';
  84354. procedure _SPI_1A_VECTOR_interrupt; external name '_SPI_1A_VECTOR_interrupt';
  84355. procedure _UART_1_VECTOR_interrupt; external name '_UART_1_VECTOR_interrupt';
  84356. procedure _UART_1A_VECTOR_interrupt; external name '_UART_1A_VECTOR_interrupt';
  84357. procedure _I2C_3_VECTOR_interrupt; external name '_I2C_3_VECTOR_interrupt';
  84358. procedure _I2C_1A_VECTOR_interrupt; external name '_I2C_1A_VECTOR_interrupt';
  84359. procedure _SPI_3_VECTOR_interrupt; external name '_SPI_3_VECTOR_interrupt';
  84360. procedure _I2C_1_VECTOR_interrupt; external name '_I2C_1_VECTOR_interrupt';
  84361. procedure _CHANGE_NOTICE_VECTOR_interrupt; external name '_CHANGE_NOTICE_VECTOR_interrupt';
  84362. procedure _ADC_VECTOR_interrupt; external name '_ADC_VECTOR_interrupt';
  84363. procedure _PMP_VECTOR_interrupt; external name '_PMP_VECTOR_interrupt';
  84364. procedure _COMPARATOR_1_VECTOR_interrupt; external name '_COMPARATOR_1_VECTOR_interrupt';
  84365. procedure _COMPARATOR_2_VECTOR_interrupt; external name '_COMPARATOR_2_VECTOR_interrupt';
  84366. procedure _SPI_2A_VECTOR_interrupt; external name '_SPI_2A_VECTOR_interrupt';
  84367. procedure _UART_3_VECTOR_interrupt; external name '_UART_3_VECTOR_interrupt';
  84368. procedure _UART_2A_VECTOR_interrupt; external name '_UART_2A_VECTOR_interrupt';
  84369. procedure _I2C_4_VECTOR_interrupt; external name '_I2C_4_VECTOR_interrupt';
  84370. procedure _I2C_2A_VECTOR_interrupt; external name '_I2C_2A_VECTOR_interrupt';
  84371. procedure _SPI_2_VECTOR_interrupt; external name '_SPI_2_VECTOR_interrupt';
  84372. procedure _SPI_3A_VECTOR_interrupt; external name '_SPI_3A_VECTOR_interrupt';
  84373. procedure _UART_2_VECTOR_interrupt; external name '_UART_2_VECTOR_interrupt';
  84374. procedure _UART_3A_VECTOR_interrupt; external name '_UART_3A_VECTOR_interrupt';
  84375. procedure _I2C_5_VECTOR_interrupt; external name '_I2C_5_VECTOR_interrupt';
  84376. procedure _I2C_3A_VECTOR_interrupt; external name '_I2C_3A_VECTOR_interrupt';
  84377. procedure _SPI_4_VECTOR_interrupt; external name '_SPI_4_VECTOR_interrupt';
  84378. procedure _I2C_2_VECTOR_interrupt; external name '_I2C_2_VECTOR_interrupt';
  84379. procedure _FAIL_SAFE_MONITOR_VECTOR_interrupt; external name '_FAIL_SAFE_MONITOR_VECTOR_interrupt';
  84380. procedure _RTCC_VECTOR_interrupt; external name '_RTCC_VECTOR_interrupt';
  84381. procedure _DMA_0_VECTOR_interrupt; external name '_DMA_0_VECTOR_interrupt';
  84382. procedure _DMA_1_VECTOR_interrupt; external name '_DMA_1_VECTOR_interrupt';
  84383. procedure _DMA_2_VECTOR_interrupt; external name '_DMA_2_VECTOR_interrupt';
  84384. procedure _DMA_3_VECTOR_interrupt; external name '_DMA_3_VECTOR_interrupt';
  84385. procedure _DMA_4_VECTOR_interrupt; external name '_DMA_4_VECTOR_interrupt';
  84386. procedure _DMA_5_VECTOR_interrupt; external name '_DMA_5_VECTOR_interrupt';
  84387. procedure _DMA_6_VECTOR_interrupt; external name '_DMA_6_VECTOR_interrupt';
  84388. procedure _DMA_7_VECTOR_interrupt; external name '_DMA_7_VECTOR_interrupt';
  84389. procedure _FCE_VECTOR_interrupt; external name '_FCE_VECTOR_interrupt';
  84390. procedure _USB_1_VECTOR_interrupt; external name '_USB_1_VECTOR_interrupt';
  84391. procedure _CAN_1_VECTOR_interrupt; external name '_CAN_1_VECTOR_interrupt';
  84392. procedure _UART_1B_VECTOR_interrupt; external name '_UART_1B_VECTOR_interrupt';
  84393. procedure _UART_4_VECTOR_interrupt; external name '_UART_4_VECTOR_interrupt';
  84394. procedure _UART_2B_VECTOR_interrupt; external name '_UART_2B_VECTOR_interrupt';
  84395. procedure _UART_6_VECTOR_interrupt; external name '_UART_6_VECTOR_interrupt';
  84396. procedure _UART_3B_VECTOR_interrupt; external name '_UART_3B_VECTOR_interrupt';
  84397. procedure _UART_5_VECTOR_interrupt; external name '_UART_5_VECTOR_interrupt';
  84398. procedure Vectors; assembler; nostackframe;
  84399. label interrupt_vectors;
  84400. asm
  84401. .section ".init.interrupt_vectors,\"ax\",@progbits"
  84402. interrupt_vectors:
  84403. j _CORE_TIMER_VECTOR_interrupt
  84404. nop
  84405. nop
  84406. nop
  84407. nop
  84408. nop
  84409. nop
  84410. nop
  84411. j _CORE_SOFTWARE_0_VECTOR_interrupt
  84412. nop
  84413. nop
  84414. nop
  84415. nop
  84416. nop
  84417. nop
  84418. nop
  84419. j _CORE_SOFTWARE_1_VECTOR_interrupt
  84420. nop
  84421. nop
  84422. nop
  84423. nop
  84424. nop
  84425. nop
  84426. nop
  84427. j _EXTERNAL_0_VECTOR_interrupt
  84428. nop
  84429. nop
  84430. nop
  84431. nop
  84432. nop
  84433. nop
  84434. nop
  84435. j _TIMER_1_VECTOR_interrupt
  84436. nop
  84437. nop
  84438. nop
  84439. nop
  84440. nop
  84441. nop
  84442. nop
  84443. j _INPUT_CAPTURE_1_VECTOR_interrupt
  84444. nop
  84445. nop
  84446. nop
  84447. nop
  84448. nop
  84449. nop
  84450. nop
  84451. j _OUTPUT_COMPARE_1_VECTOR_interrupt
  84452. nop
  84453. nop
  84454. nop
  84455. nop
  84456. nop
  84457. nop
  84458. nop
  84459. j _EXTERNAL_1_VECTOR_interrupt
  84460. nop
  84461. nop
  84462. nop
  84463. nop
  84464. nop
  84465. nop
  84466. nop
  84467. j _TIMER_2_VECTOR_interrupt
  84468. nop
  84469. nop
  84470. nop
  84471. nop
  84472. nop
  84473. nop
  84474. nop
  84475. j _INPUT_CAPTURE_2_VECTOR_interrupt
  84476. nop
  84477. nop
  84478. nop
  84479. nop
  84480. nop
  84481. nop
  84482. nop
  84483. j _OUTPUT_COMPARE_2_VECTOR_interrupt
  84484. nop
  84485. nop
  84486. nop
  84487. nop
  84488. nop
  84489. nop
  84490. nop
  84491. j _EXTERNAL_2_VECTOR_interrupt
  84492. nop
  84493. nop
  84494. nop
  84495. nop
  84496. nop
  84497. nop
  84498. nop
  84499. j _TIMER_3_VECTOR_interrupt
  84500. nop
  84501. nop
  84502. nop
  84503. nop
  84504. nop
  84505. nop
  84506. nop
  84507. j _INPUT_CAPTURE_3_VECTOR_interrupt
  84508. nop
  84509. nop
  84510. nop
  84511. nop
  84512. nop
  84513. nop
  84514. nop
  84515. j _OUTPUT_COMPARE_3_VECTOR_interrupt
  84516. nop
  84517. nop
  84518. nop
  84519. nop
  84520. nop
  84521. nop
  84522. nop
  84523. j _EXTERNAL_3_VECTOR_interrupt
  84524. nop
  84525. nop
  84526. nop
  84527. nop
  84528. nop
  84529. nop
  84530. nop
  84531. j _TIMER_4_VECTOR_interrupt
  84532. nop
  84533. nop
  84534. nop
  84535. nop
  84536. nop
  84537. nop
  84538. nop
  84539. j _INPUT_CAPTURE_4_VECTOR_interrupt
  84540. nop
  84541. nop
  84542. nop
  84543. nop
  84544. nop
  84545. nop
  84546. nop
  84547. j _OUTPUT_COMPARE_4_VECTOR_interrupt
  84548. nop
  84549. nop
  84550. nop
  84551. nop
  84552. nop
  84553. nop
  84554. nop
  84555. j _EXTERNAL_4_VECTOR_interrupt
  84556. nop
  84557. nop
  84558. nop
  84559. nop
  84560. nop
  84561. nop
  84562. nop
  84563. j _TIMER_5_VECTOR_interrupt
  84564. nop
  84565. nop
  84566. nop
  84567. nop
  84568. nop
  84569. nop
  84570. nop
  84571. j _INPUT_CAPTURE_5_VECTOR_interrupt
  84572. nop
  84573. nop
  84574. nop
  84575. nop
  84576. nop
  84577. nop
  84578. nop
  84579. j _OUTPUT_COMPARE_5_VECTOR_interrupt
  84580. nop
  84581. nop
  84582. nop
  84583. nop
  84584. nop
  84585. nop
  84586. nop
  84587. nop
  84588. nop
  84589. nop
  84590. nop
  84591. nop
  84592. nop
  84593. nop
  84594. nop
  84595. j _SPI_1A_VECTOR_interrupt
  84596. nop
  84597. nop
  84598. nop
  84599. nop
  84600. nop
  84601. nop
  84602. nop
  84603. j _I2C_1_VECTOR_interrupt
  84604. nop
  84605. nop
  84606. nop
  84607. nop
  84608. nop
  84609. nop
  84610. nop
  84611. j _CHANGE_NOTICE_VECTOR_interrupt
  84612. nop
  84613. nop
  84614. nop
  84615. nop
  84616. nop
  84617. nop
  84618. nop
  84619. j _ADC_VECTOR_interrupt
  84620. nop
  84621. nop
  84622. nop
  84623. nop
  84624. nop
  84625. nop
  84626. nop
  84627. j _PMP_VECTOR_interrupt
  84628. nop
  84629. nop
  84630. nop
  84631. nop
  84632. nop
  84633. nop
  84634. nop
  84635. j _COMPARATOR_1_VECTOR_interrupt
  84636. nop
  84637. nop
  84638. nop
  84639. nop
  84640. nop
  84641. nop
  84642. nop
  84643. j _COMPARATOR_2_VECTOR_interrupt
  84644. nop
  84645. nop
  84646. nop
  84647. nop
  84648. nop
  84649. nop
  84650. nop
  84651. j _SPI_2A_VECTOR_interrupt
  84652. nop
  84653. nop
  84654. nop
  84655. nop
  84656. nop
  84657. nop
  84658. nop
  84659. j _SPI_3A_VECTOR_interrupt
  84660. nop
  84661. nop
  84662. nop
  84663. nop
  84664. nop
  84665. nop
  84666. nop
  84667. j _I2C_2_VECTOR_interrupt
  84668. nop
  84669. nop
  84670. nop
  84671. nop
  84672. nop
  84673. nop
  84674. nop
  84675. j _FAIL_SAFE_MONITOR_VECTOR_interrupt
  84676. nop
  84677. nop
  84678. nop
  84679. nop
  84680. nop
  84681. nop
  84682. nop
  84683. j _RTCC_VECTOR_interrupt
  84684. nop
  84685. nop
  84686. nop
  84687. nop
  84688. nop
  84689. nop
  84690. nop
  84691. j _DMA_0_VECTOR_interrupt
  84692. nop
  84693. nop
  84694. nop
  84695. nop
  84696. nop
  84697. nop
  84698. nop
  84699. j _DMA_1_VECTOR_interrupt
  84700. nop
  84701. nop
  84702. nop
  84703. nop
  84704. nop
  84705. nop
  84706. nop
  84707. j _DMA_2_VECTOR_interrupt
  84708. nop
  84709. nop
  84710. nop
  84711. nop
  84712. nop
  84713. nop
  84714. nop
  84715. j _DMA_3_VECTOR_interrupt
  84716. nop
  84717. nop
  84718. nop
  84719. nop
  84720. nop
  84721. nop
  84722. nop
  84723. j _DMA_4_VECTOR_interrupt
  84724. nop
  84725. nop
  84726. nop
  84727. nop
  84728. nop
  84729. nop
  84730. nop
  84731. j _DMA_5_VECTOR_interrupt
  84732. nop
  84733. nop
  84734. nop
  84735. nop
  84736. nop
  84737. nop
  84738. nop
  84739. j _DMA_6_VECTOR_interrupt
  84740. nop
  84741. nop
  84742. nop
  84743. nop
  84744. nop
  84745. nop
  84746. nop
  84747. j _DMA_7_VECTOR_interrupt
  84748. nop
  84749. nop
  84750. nop
  84751. nop
  84752. nop
  84753. nop
  84754. nop
  84755. j _FCE_VECTOR_interrupt
  84756. nop
  84757. nop
  84758. nop
  84759. nop
  84760. nop
  84761. nop
  84762. nop
  84763. j _USB_1_VECTOR_interrupt
  84764. nop
  84765. nop
  84766. nop
  84767. nop
  84768. nop
  84769. nop
  84770. nop
  84771. j _CAN_1_VECTOR_interrupt
  84772. nop
  84773. nop
  84774. nop
  84775. nop
  84776. nop
  84777. nop
  84778. nop
  84779. nop
  84780. nop
  84781. nop
  84782. nop
  84783. nop
  84784. nop
  84785. nop
  84786. nop
  84787. nop
  84788. nop
  84789. nop
  84790. nop
  84791. nop
  84792. nop
  84793. nop
  84794. nop
  84795. j _UART_1B_VECTOR_interrupt
  84796. nop
  84797. nop
  84798. nop
  84799. nop
  84800. nop
  84801. nop
  84802. nop
  84803. j _UART_2B_VECTOR_interrupt
  84804. nop
  84805. nop
  84806. nop
  84807. nop
  84808. nop
  84809. nop
  84810. nop
  84811. j _UART_3B_VECTOR_interrupt
  84812. nop
  84813. nop
  84814. nop
  84815. nop
  84816. nop
  84817. nop
  84818. nop
  84819. .weak _CORE_TIMER_VECTOR_interrupt
  84820. .weak _CORE_SOFTWARE_0_VECTOR_interrupt
  84821. .weak _CORE_SOFTWARE_1_VECTOR_interrupt
  84822. .weak _EXTERNAL_0_VECTOR_interrupt
  84823. .weak _TIMER_1_VECTOR_interrupt
  84824. .weak _INPUT_CAPTURE_1_VECTOR_interrupt
  84825. .weak _OUTPUT_COMPARE_1_VECTOR_interrupt
  84826. .weak _EXTERNAL_1_VECTOR_interrupt
  84827. .weak _TIMER_2_VECTOR_interrupt
  84828. .weak _INPUT_CAPTURE_2_VECTOR_interrupt
  84829. .weak _OUTPUT_COMPARE_2_VECTOR_interrupt
  84830. .weak _EXTERNAL_2_VECTOR_interrupt
  84831. .weak _TIMER_3_VECTOR_interrupt
  84832. .weak _INPUT_CAPTURE_3_VECTOR_interrupt
  84833. .weak _OUTPUT_COMPARE_3_VECTOR_interrupt
  84834. .weak _EXTERNAL_3_VECTOR_interrupt
  84835. .weak _TIMER_4_VECTOR_interrupt
  84836. .weak _INPUT_CAPTURE_4_VECTOR_interrupt
  84837. .weak _OUTPUT_COMPARE_4_VECTOR_interrupt
  84838. .weak _EXTERNAL_4_VECTOR_interrupt
  84839. .weak _TIMER_5_VECTOR_interrupt
  84840. .weak _INPUT_CAPTURE_5_VECTOR_interrupt
  84841. .weak _OUTPUT_COMPARE_5_VECTOR_interrupt
  84842. .weak _SPI_1A_VECTOR_interrupt
  84843. .weak _UART_1_VECTOR_interrupt
  84844. .weak _UART_1A_VECTOR_interrupt
  84845. .weak _I2C_3_VECTOR_interrupt
  84846. .weak _I2C_1A_VECTOR_interrupt
  84847. .weak _SPI_3_VECTOR_interrupt
  84848. .weak _I2C_1_VECTOR_interrupt
  84849. .weak _CHANGE_NOTICE_VECTOR_interrupt
  84850. .weak _ADC_VECTOR_interrupt
  84851. .weak _PMP_VECTOR_interrupt
  84852. .weak _COMPARATOR_1_VECTOR_interrupt
  84853. .weak _COMPARATOR_2_VECTOR_interrupt
  84854. .weak _SPI_2A_VECTOR_interrupt
  84855. .weak _UART_3_VECTOR_interrupt
  84856. .weak _UART_2A_VECTOR_interrupt
  84857. .weak _I2C_4_VECTOR_interrupt
  84858. .weak _I2C_2A_VECTOR_interrupt
  84859. .weak _SPI_2_VECTOR_interrupt
  84860. .weak _SPI_3A_VECTOR_interrupt
  84861. .weak _UART_2_VECTOR_interrupt
  84862. .weak _UART_3A_VECTOR_interrupt
  84863. .weak _I2C_5_VECTOR_interrupt
  84864. .weak _I2C_3A_VECTOR_interrupt
  84865. .weak _SPI_4_VECTOR_interrupt
  84866. .weak _I2C_2_VECTOR_interrupt
  84867. .weak _FAIL_SAFE_MONITOR_VECTOR_interrupt
  84868. .weak _RTCC_VECTOR_interrupt
  84869. .weak _DMA_0_VECTOR_interrupt
  84870. .weak _DMA_1_VECTOR_interrupt
  84871. .weak _DMA_2_VECTOR_interrupt
  84872. .weak _DMA_3_VECTOR_interrupt
  84873. .weak _DMA_4_VECTOR_interrupt
  84874. .weak _DMA_5_VECTOR_interrupt
  84875. .weak _DMA_6_VECTOR_interrupt
  84876. .weak _DMA_7_VECTOR_interrupt
  84877. .weak _FCE_VECTOR_interrupt
  84878. .weak _USB_1_VECTOR_interrupt
  84879. .weak _CAN_1_VECTOR_interrupt
  84880. .weak _UART_1B_VECTOR_interrupt
  84881. .weak _UART_4_VECTOR_interrupt
  84882. .weak _UART_2B_VECTOR_interrupt
  84883. .weak _UART_6_VECTOR_interrupt
  84884. .weak _UART_3B_VECTOR_interrupt
  84885. .weak _UART_5_VECTOR_interrupt
  84886. .text
  84887. end;
  84888. end.